summaryrefslogtreecommitdiff
path: root/extensions/test/stm/datatest.cxx
diff options
context:
space:
mode:
authorMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
committerMichael Stahl <mstahl@redhat.com>2012-01-28 20:52:45 +0100
commit2e626373db2412ac22e8c5c27a60d11cd29e875b (patch)
tree9e9f67205cd5b72f1031721273e1534a3a1e5b0f /extensions/test/stm/datatest.cxx
parentf7ee7bbd5174b084f018c2ec94d8c70c98ee04da (diff)
replace obsolete "master" branch with README that points at new repoHEADmaster-deletedmaster
Diffstat (limited to 'extensions/test/stm/datatest.cxx')
-rw-r--r--extensions/test/stm/datatest.cxx1071
1 files changed, 0 insertions, 1071 deletions
diff --git a/extensions/test/stm/datatest.cxx b/extensions/test/stm/datatest.cxx
deleted file mode 100644
index 720fdad04..000000000
--- a/extensions/test/stm/datatest.cxx
+++ /dev/null
@@ -1,1071 +0,0 @@
-/* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
-/*************************************************************************
- *
- * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
- *
- * Copyright 2000, 2010 Oracle and/or its affiliates.
- *
- * OpenOffice.org - a multi-platform office productivity suite
- *
- * This file is part of OpenOffice.org.
- *
- * OpenOffice.org is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License version 3
- * only, as published by the Free Software Foundation.
- *
- * OpenOffice.org is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License version 3 for more details
- * (a copy is included in the LICENSE file that accompanied this code).
- *
- * You should have received a copy of the GNU Lesser General Public License
- * version 3 along with OpenOffice.org. If not, see
- * <http://www.openoffice.org/license.html>
- * for a copy of the LGPLv3 License.
- *
- ************************************************************************/
-
-// MARKER(update_precomp.py): autogen include statement, do not remove
-#include "precompiled_extensions.hxx"
-#include <smart/com/sun/star/test/XSimpleTest.hxx>
-#include <smart/com/sun/star/io/XObjectOutputStream.hxx>
-#include <smart/com/sun/star/io/XObjectInputStream.hxx>
-#include <smart/com/sun/star/io/XActiveDataSink.hxx>
-#include <smart/com/sun/star/io/XActiveDataSource.hxx>
-#include <smart/com/sun/star/io/XConnectable.hxx>
-#include <smart/com/sun/star/io/XMarkableStream.hxx>
-
-#include <smart/com/sun/star/lang/XServiceInfo.hxx>
-
-#include <smart/com/sun/star/beans/XPropertySet.hxx>
-
-#include <usr/services.hxx>
-#include <usr/factoryhlp.hxx>
-
-#include <usr/reflserv.hxx> // for EXTERN_SERVICE_CALLTYPE
-#include <usr/weak.hxx> // OWeakObject
-
-#include <osl/conditn.hxx>
-#include <osl/mutex.hxx>
-#include <osl/thread.hxx>
-
-#include <string.h>
-
-#include "testfactreg.hxx"
-
-using namespace usr;
-
-#define DATASTREAM_TEST_MAX_HANDLE 1
-
-/****
-* The following test class tests XDataInputStream and XDataOutputStream at equal terms,
-* so when errors occur, it may be in either one implementation.
-* The class also uses stardiv.uno.io.pipe. If problems occur, make sure to run also the
-* pipe test routines ( test.com.sun.star.io.pipe ).
-*
-*
-*****/
-
-class ODataStreamTest :
- public XSimpleTest,
- public OWeakObject
-{
-public:
- ODataStreamTest( const XMultiServiceFactoryRef & rFactory ) : m_rFactory( rFactory ){}
-
-public: // refcounting
- BOOL queryInterface( Uik aUik, XInterfaceRef & rOut );
- void acquire() { OWeakObject::acquire(); }
- void release() { OWeakObject::release(); }
- void* getImplementation(Reflection *p) { return OWeakObject::getImplementation(p); }
-
-public:
- virtual void testInvariant(const UString& TestName, const XInterfaceRef& TestObject)
- THROWS( ( IllegalArgumentException,
- UsrSystemException) );
-
- virtual INT32 test( const UString& TestName,
- const XInterfaceRef& TestObject,
- INT32 hTestHandle) THROWS( ( IllegalArgumentException,
- UsrSystemException) );
-
- virtual BOOL testPassed(void) THROWS( ( UsrSystemException) );
- virtual Sequence< UString > getErrors(void) THROWS( (UsrSystemException) );
- virtual Sequence< UsrAny > getErrorExceptions(void) THROWS( (UsrSystemException) );
- virtual Sequence< UString > getWarnings(void) THROWS( (UsrSystemException) );
-
-private:
- void testSimple( const XDataInputStreamRef & , const XDataOutputStreamRef &);
-
-protected:
- Sequence<UsrAny> m_seqExceptions;
- Sequence<UString> m_seqErrors;
- Sequence<UString> m_seqWarnings;
-
- XMultiServiceFactoryRef m_rFactory;
-};
-
-
-BOOL ODataStreamTest::queryInterface( Uik uik , XInterfaceRef &rOut )
-{
- if( XSimpleTest::getSmartUik() == uik ) {
- rOut = (XSimpleTest *) this;
- }
- else {
- return OWeakObject::queryInterface( uik , rOut );
- }
- return TRUE;
-}
-
-
-void ODataStreamTest::testInvariant( const UString& TestName, const XInterfaceRef& TestObject )
- THROWS( ( IllegalArgumentException,
- UsrSystemException) )
-{
- if( L"com.sun.star.io.DataInputStream" == TestName ) {
- XConnectableRef connect( TestObject , USR_QUERY );
- XActiveDataSinkRef active( TestObject , USR_QUERY );
- XInputStreamRef input( TestObject , USR_QUERY );
- XDataInputStreamRef dataInput( TestObject , USR_QUERY );
-
- WARNING_ASSERT( connect.is(), "XConnectable cannot be queried" );
- WARNING_ASSERT( active.is() , "XActiveDataSink cannot be queried" );
- ERROR_ASSERT( input.is() , "XInputStream cannot be queried" );
- ERROR_ASSERT( dataInput.is() , "XDataInputStream cannot be queried" );
-
-
- }
- else if( L"com.sun.star.io.DataInputStream" == TestName ) {
- XConnectableRef connect( TestObject , USR_QUERY );
- XActiveDataSourceRef active( TestObject , USR_QUERY );
- XOutputStreamRef output( TestObject , USR_QUERY );
- XDataOutputStreamRef dataOutput( TestObject , USR_QUERY );
-
- WARNING_ASSERT( connect.is(), "XConnectable cannot be queried" );
- WARNING_ASSERT( active.is() , "XActiveDataSink cannot be queried" );
- ERROR_ASSERT( output.is() , "XInputStream cannot be queried" );
- ERROR_ASSERT( dataOutput.is(), "XDataInputStream cannot be queried" );
-
- }
-
- XServiceInfoRef info( TestObject, USR_QUERY );
- ERROR_ASSERT( info.is() , "XServiceInfo not supported !" );
- if( info.is() )
- {
- ERROR_ASSERT( info->supportsService( TestName ), "XServiceInfo test failed" );
- ERROR_ASSERT( ! info->supportsService( L"bla bluzb" ) , "XServiceInfo test failed" );
- }
-
-}
-
-
-INT32 ODataStreamTest::test( const UString& TestName,
- const XInterfaceRef& TestObject,
- INT32 hTestHandle) THROWS( ( IllegalArgumentException,
- UsrSystemException) )
-{
- if( L"com.sun.star.io.DataInputStream" == TestName ||
- L"com.sun.star.io.DataOutputStream" == TestName ) {
-
- try {
- if( 0 == hTestHandle ) {
- testInvariant( TestName , TestObject );
- }
- else {
- XActiveDataSinkRef rSink( TestObject, USR_QUERY );
- XActiveDataSourceRef rSource( TestObject , USR_QUERY );
-
- XDataInputStreamRef rInput( TestObject , USR_QUERY );
- XDataOutputStreamRef rOutput( TestObject , USR_QUERY );
-
-
- XInterfaceRef x = m_rFactory->createInstance( L"com.sun.star.io.Pipe");
-
- XInputStreamRef rPipeInput( x , USR_QUERY );
- XOutputStreamRef rPipeOutput( x , USR_QUERY );
-
- if( ! rSink.is() ) {
- x = m_rFactory->createInstance( L"com.sun.star.io.DataInputStream" );
- x->queryInterface( XDataInputStream::getSmartUik() , rInput );
- x->queryInterface( XActiveDataSink::getSmartUik() , rSink );
- }
- else if ( !rSource.is() ) {
-
- x = m_rFactory->createInstance( L"com.sun.star.io.DataOutputStream" );
- x->queryInterface( XDataOutputStream::getSmartUik() , rOutput );
- x->queryInterface( XActiveDataSource::getSmartUik() , rSource );
- }
-
- OSL_ASSERT( rPipeInput.is() );
- OSL_ASSERT( rPipeOutput.is() );
- rSink->setInputStream( rPipeInput );
- rSource->setOutputStream( rPipeOutput );
-
- OSL_ASSERT( rSink->getInputStream().is() );
- OSL_ASSERT( rSource->getOutputStream().is() );
-
- if( 1 == hTestHandle ) {
- testSimple( rInput , rOutput );
- }
- }
- }
- catch( Exception& e ) {
- BUILD_ERROR( 0 , UStringToString( e.getName() , CHARSET_SYSTEM ).GetCharStr() );
- }
- catch(...) {
- BUILD_ERROR( 0 , "unknown exception (Exception is not base class)" );
- }
-
- hTestHandle ++;
-
- if( hTestHandle >= 2) {
- // all tests finished.
- hTestHandle = -1;
- }
- }
- else {
- BUILD_ERROR( 0 , "service not supported by test." );
- }
- return hTestHandle;
-}
-
-
-
-BOOL ODataStreamTest::testPassed(void) THROWS( (UsrSystemException) )
-{
- return m_seqErrors.getLen() == 0;
-}
-
-
-Sequence< UString > ODataStreamTest::getErrors(void) THROWS( (UsrSystemException) )
-{
- return m_seqErrors;
-}
-
-
-Sequence< UsrAny > ODataStreamTest::getErrorExceptions(void) THROWS( (UsrSystemException) )
-{
- return m_seqExceptions;
-}
-
-
-Sequence< UString > ODataStreamTest::getWarnings(void) THROWS( (UsrSystemException) )
-{
- return m_seqWarnings;
-}
-
-void ODataStreamTest::testSimple( const XDataInputStreamRef &rInput,
- const XDataOutputStreamRef &rOutput )
-{
- rOutput->writeLong( 0x34ff3c );
- rOutput->writeLong( 0x34ff3d );
-
- ERROR_ASSERT( 0x34ff3c == rInput->readLong() , "long read/write mismatch" );
- ERROR_ASSERT( 0x34ff3d == rInput->readLong() , "long read/write mismatch" );
-
- rOutput->writeByte( 0x87 );
- ERROR_ASSERT( 0x87 == rInput->readByte() , "byte read/write mismatch" );
-
- rOutput->writeBoolean( 25 );
- ERROR_ASSERT( rInput->readBoolean() , "boolean read/write mismatch" );
-
- rOutput->writeBoolean( FALSE );
- ERROR_ASSERT( ! rInput->readBoolean() , "boolean read/write mismatch" );
-
- rOutput->writeFloat( (float) 42.42 );
- ERROR_ASSERT( rInput->readFloat() == ((float)42.42) , "float read/write mismatch" );
-
- rOutput->writeDouble( (double) 42.42 );
- ERROR_ASSERT( rInput->readDouble() == 42.42 , "double read/write mismatch" );
-
- rOutput->writeUTF( L"Live long and prosper !" );
- ERROR_ASSERT( rInput->readUTF() == L"Live long and prosper !" ,
- "UTF read/write mismatch" );
-
- Sequence<wchar_t> wc(0x10001);
- for( int i = 0 ; i < 0x10000 ; i ++ ) {
- wc.getArray()[i] = L'c';
- }
- wc.getArray()[0x10000] = 0;
- UString str( wc.getArray() , 0x10000 );
- rOutput->writeUTF( str );
- ERROR_ASSERT( rInput->readUTF() == str , "error reading 64k block" );
-
- rOutput->closeOutput();
- try {
- rInput->readLong();
- ERROR_ASSERT( 0 , "eof-exception does not occur !" );
- }
- catch ( IOException& e ){
- //ok
- e.getName();
- }
- catch(...) {
- ERROR_ASSERT( 0 , "wrong exception after reading beyond eof" );
- }
-
- ERROR_ASSERT( ! rInput->readBytes( Sequence<BYTE> (1) , 1 ),
- "stream must be on eof !" );
-
- rInput->closeInput();
-
- try {
- rOutput->writeByte( 1 );
- ERROR_ASSERT( 0 , "writing still possible though chain must be interrupted" );
- }
- catch( IOException& e )
- {
- e.getName();
- // ok
- }
- catch( ... ) {
- ERROR_ASSERT( 0 , "IOException expected, but another exception was thrown" );
- }
-
-}
-
-
-
-/**
-* for external binding
-*
-*
-**/
-XInterfaceRef ODataStreamTest_CreateInstance( const XMultiServiceFactoryRef & rSMgr ) THROWS((Exception))
-{
- ODataStreamTest *p = new ODataStreamTest( rSMgr );
- XInterfaceRef xService = *p;
- return xService;
-}
-
-Sequence<UString> ODataStreamTest_getSupportedServiceNames( int i) THROWS( () )
-{
- Sequence<UString> aRet(1);
-
- aRet.getArray()[0] = ODataStreamTest_getImplementationName( i);
-
-
- return aRet;
-}
-
-UString ODataStreamTest_getServiceName( int i) THROWS( () )
-{
- if( 1 == i ) {
- return L"test.com.sun.star.io.DataInputStream";
- }
- else {
- return L"test.com.sun.star.io.DataOutputStream";
- }
-}
-
-UString ODataStreamTest_getImplementationName( int i) THROWS( () )
-{
- if( 1 == i ) {
- return L"test.com.sun.star.comp.extensions.stm.DataInputStream";
- }
- else {
- return L"test.com.sun.star.comp.extensions.stm.DataOutputStream";
- }
-}
-
-
-/**------------------------------------------------------
-*
-*
-*
-*
-*
-*------------------------------------------------------*/
-class MyPersistObject :
- public XPersistObject,
- public XPropertySet,
- public OWeakObject
-{
-public:
- MyPersistObject( ) : m_sServiceName( OMyPersistObject_getServiceName() )
- {}
- MyPersistObject( const UString & sServiceName ) : m_sServiceName( sServiceName )
- {}
- ~MyPersistObject()
- {}
-
-public:
- BOOL queryInterface( Uik aUik, XInterfaceRef & rOut );
- void acquire() { OWeakObject::acquire(); }
- void release() { OWeakObject::release(); }
- void* getImplementation(Reflection *p) { return OWeakObject::getImplementation(p); }
-
-public:
- virtual UString getServiceName(void) const THROWS( (UsrSystemException) );
- virtual void write(const XObjectOutputStreamRef& OutStream) THROWS( (IOException, UsrSystemException) );
- virtual void read(const XObjectInputStreamRef& InStream) THROWS( (IOException, UsrSystemException) );
-
-public:
-
- virtual XPropertySetInfoRef getPropertySetInfo(void) const THROWS( (UsrSystemException) );
- virtual void setPropertyValue(const UString& aPropertyName, const UsrAny& aValue)
- THROWS( ( UnknownPropertyException,
- PropertyVetoException,
- IllegalArgumentException,
- WrappedTargetException,
- UsrSystemException) );
- virtual UsrAny getPropertyValue(const UString& PropertyName) const
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) );
- virtual void addPropertyChangeListener( const UString& aPropertyName,
- const XPropertyChangeListenerRef& xListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) );
- virtual void removePropertyChangeListener( const UString& aPropertyName,
- const XPropertyChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) );
- virtual void addVetoableChangeListener( const UString& PropertyName,
- const XVetoableChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) );
- virtual void removeVetoableChangeListener( const UString& PropertyName,
- const XVetoableChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) );
-
-public:
- INT32 m_l;
- float m_f;
- double m_d;
- BOOL m_b;
- BYTE m_byte;
- wchar_t m_c;
- UString m_s;
- XPersistObjectRef m_ref;
- UString m_sServiceName;
-};
-
-
-
-XPropertySetInfoRef MyPersistObject::getPropertySetInfo(void) const THROWS( (UsrSystemException) )
-{
- return XPropertySetInfoRef();
-}
-
-void MyPersistObject::setPropertyValue(const UString& aPropertyName, const UsrAny& aValue)
- THROWS( ( UnknownPropertyException,
- PropertyVetoException,
- IllegalArgumentException,
- WrappedTargetException,
- UsrSystemException) )
-{
- if( L"long" == aPropertyName ) {
- m_l = aValue.getINT32();
- }
- else if ( L"float" == aPropertyName ) {
- m_f = aValue.getFloat();
- }
- else if( L"double" == aPropertyName ) {
- m_d = aValue.getDouble();
- }
- else if( L"bool" == aPropertyName ) {
- m_b = aValue.getBOOL();
- }
- else if( L"byte" == aPropertyName ) {
- m_byte = aValue.getBYTE();
- }
- else if( L"char" == aPropertyName ) {
- m_c = aValue.getChar();
- }
- else if( L"string" == aPropertyName ) {
- m_s = aValue.getString();
- }
- else if( L"object" == aPropertyName ) {
- if( aValue.getReflection() == XPersistObject_getReflection() ) {
- XPersistObjectRef *pRef = (XPersistObjectRef*) aValue.get();
- if( pRef ) {
- m_ref = *pRef;
- }
- else {
- m_ref = 0;
- }
- }
- else
- {
- m_ref = 0;
- }
- }
-}
-
-
-UsrAny MyPersistObject::getPropertyValue(const UString& aPropertyName) const
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) )
-{
- UsrAny aValue;
- if( L"long" == aPropertyName ) {
- aValue.setINT32( m_l );
- }
- else if ( L"float" == aPropertyName ) {
- aValue.setFloat( m_f );
- }
- else if( L"double" == aPropertyName ) {
- aValue.setDouble( m_d );
- }
- else if( L"bool" == aPropertyName ) {
- aValue.setBOOL( m_b );
- }
- else if( L"byte" == aPropertyName ) {
- aValue.setBYTE( m_byte );
- }
- else if( L"char" == aPropertyName ) {
- aValue.setChar( m_c );
- }
- else if( L"string" == aPropertyName ) {
- aValue.setString( m_s );
- }
- else if( L"object" == aPropertyName ) {
- aValue.set( &m_ref , XPersistObject_getReflection() );
- }
- return aValue;
-}
-
-
-void MyPersistObject::addPropertyChangeListener( const UString& aPropertyName,
- const XPropertyChangeListenerRef& xListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) )
-{
-
-}
-
-void MyPersistObject::removePropertyChangeListener( const UString& aPropertyName,
- const XPropertyChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) )
-{
-}
-void MyPersistObject::addVetoableChangeListener(const UString& PropertyName,
- const XVetoableChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) )
-{
-
-}
-
-void MyPersistObject::removeVetoableChangeListener( const UString& PropertyName,
- const XVetoableChangeListenerRef& aListener)
- THROWS( ( UnknownPropertyException,
- WrappedTargetException,
- UsrSystemException) )
-{
-
-}
-
-
-
-BOOL MyPersistObject::queryInterface( Uik aUik , XInterfaceRef &rOut )
-{
- if( XPersistObject::getSmartUik() == aUik ) {
- rOut = ( XPersistObject * ) this;
- }
- else if( XPropertySet::getSmartUik() == aUik ) {
- rOut = ( XPropertySet * ) this;
- }
- else
- return OWeakObject::queryInterface( aUik , rOut );
-
- return TRUE;
-}
-
-UString MyPersistObject::getServiceName() const THROWS( (UsrSystemException) )
-{
- return m_sServiceName;
-}
-
-void MyPersistObject::write( const XObjectOutputStreamRef & rOut )
- THROWS( (IOException,UsrSystemException))
-{
- rOut->writeLong( m_l);
- rOut->writeFloat( m_f );
- rOut->writeDouble( m_d );
- rOut->writeBoolean( m_b );
- rOut->writeByte( m_byte );
- rOut->writeChar( m_c );
- rOut->writeUTF( m_s );
- rOut->writeObject( m_ref );
-}
-
-
-void MyPersistObject::read( const XObjectInputStreamRef & rIn )
- THROWS( (IOException, UsrSystemException) )
-{
- m_l = rIn->readLong();
- m_f = rIn->readFloat();
- m_d = rIn->readDouble();
- m_b = rIn->readBoolean();
- m_byte = rIn->readByte();
- m_c = rIn->readChar();
- m_s = rIn->readUTF();
- m_ref = rIn->readObject();
-}
-
-XInterfaceRef OMyPersistObject_CreateInstance( const XMultiServiceFactoryRef & rSMgr )
- THROWS((Exception))
-{
- MyPersistObject *p = new MyPersistObject( );
- XInterfaceRef xService = *p;
- return xService;
-}
-
-Sequence<UString> OMyPersistObject_getSupportedServiceNames( ) THROWS( () )
-{
- Sequence<UString> aRet(1);
- aRet.getArray()[0] = OMyPersistObject_getImplementationName();
- return aRet;
-}
-
-UString OMyPersistObject_getServiceName( ) THROWS( () )
-{
- return L"test.com.sun.star.io.PersistTest";
-}
-
-UString OMyPersistObject_getImplementationName( ) THROWS( () )
-{
- return L"test.com.sun.star.io.PersistTest";
-}
-
-
-// ---------------------------------------------
-// -----------------------------------------------
-class OObjectStreamTest :
- public ODataStreamTest
-{
-public:
- OObjectStreamTest( const XMultiServiceFactoryRef &r) : ODataStreamTest(r) {}
-public: // refcounting
- BOOL queryInterface( Uik aUik, XInterfaceRef & rOut );
-
-public:
- virtual void testInvariant(const UString& TestName, const XInterfaceRef& TestObject)
- THROWS( ( IllegalArgumentException,
- UsrSystemException) );
-
- virtual INT32 test( const UString& TestName,
- const XInterfaceRef& TestObject,
- INT32 hTestHandle) THROWS( ( IllegalArgumentException,
- UsrSystemException) );
-
-
-private:
- void OObjectStreamTest::testObject( const XObjectOutputStreamRef &rOut,
- const XObjectInputStreamRef &rIn );
-
-private:
-};
-
-
-
-
-BOOL OObjectStreamTest::queryInterface( Uik uik , XInterfaceRef &rOut )
-{
- if( XSimpleTest::getSmartUik() == uik ) {
- rOut = (XSimpleTest *) this;
- }
- else {
- return ODataStreamTest::queryInterface( uik , rOut );
- }
- return TRUE;
-}
-
-
-void OObjectStreamTest::testInvariant( const UString& TestName, const XInterfaceRef& TestObject )
- THROWS( ( IllegalArgumentException,
- UsrSystemException) )
-{
-
-
- if( L"com.sun.star.io.ObjectInputStream" == TestName ) {
- ODataStreamTest::testInvariant( TestName , TestObject );
- XObjectInputStreamRef dataInput( TestObject , USR_QUERY );
- XMarkableStreamRef markable( TestObject , USR_QUERY );
- ERROR_ASSERT( dataInput.is() , "XObjectInputStream cannot be queried" );
- ERROR_ASSERT( markable.is() , "XMarkableStream cannot be queried" );
- }
- else if( L"com.sun.star.io.ObjectOutputStream" == TestName ) {
- ODataStreamTest::testInvariant( TestName , TestObject );
- XMarkableStreamRef markable( TestObject , USR_QUERY );
- XObjectOutputStreamRef dataOutput( TestObject , USR_QUERY );
- ERROR_ASSERT( dataOutput.is(), "XObjectOutputStream cannot be queried" );
- ERROR_ASSERT( markable.is() , "XMarkableStream cannot be queried" );
- }
-
- XServiceInfoRef info( TestObject, USR_QUERY );
- ERROR_ASSERT( info.is() , "XServiceInfo not supported !" );
- if( info.is() )
- {
- ERROR_ASSERT( info->supportsService( TestName ), "XServiceInfo test failed" );
- ERROR_ASSERT( ! info->supportsService( L"bla bluzb" ) , "XServiceInfo test failed" );
- }
-
-}
-
-INT32 OObjectStreamTest::test( const UString& TestName,
- const XInterfaceRef& TestObject,
- INT32 hTestHandle) THROWS( ( IllegalArgumentException,
- UsrSystemException) )
-{
- if( L"com.sun.star.io.ObjectInputStream" == TestName ||
- L"com.sun.star.io.ObjectOutputStream" == TestName ) {
-
- try {
- if( 0 == hTestHandle ) {
- testInvariant( TestName , TestObject );
- }
- else if( DATASTREAM_TEST_MAX_HANDLE >= hTestHandle ) {
- INT32 hOldHandle = hTestHandle;
- hTestHandle = ODataStreamTest::test( L"com.sun.star.io.DataInputStream" ,
- TestObject , hTestHandle );
- if( hTestHandle == -1 ){
- hTestHandle = hOldHandle;
- }
- }
- else {
-
- XActiveDataSinkRef rSink( TestObject, USR_QUERY );
- XActiveDataSourceRef rSource( TestObject , USR_QUERY );
-
- XObjectInputStreamRef rInput( TestObject , USR_QUERY );
- XObjectOutputStreamRef rOutput( TestObject , USR_QUERY );
-
-
- XInterfaceRef x = m_rFactory->createInstance( L"com.sun.star.io.Pipe");
-
- XInputStreamRef rPipeInput( x , USR_QUERY );
- XOutputStreamRef rPipeOutput( x , USR_QUERY );
-
- x = m_rFactory->createInstance( L"com.sun.star.io.MarkableInputStream" );
- XInputStreamRef markableInput( x , USR_QUERY );
- XActiveDataSinkRef markableSink( x , USR_QUERY );
-
- x = m_rFactory->createInstance( L"com.sun.star.io.MarkableOutputStream" );
- XOutputStreamRef markableOutput( x , USR_QUERY );
- XActiveDataSourceRef markableSource( x , USR_QUERY );
-
- OSL_ASSERT( markableInput.is() );
- OSL_ASSERT( markableOutput.is() );
- OSL_ASSERT( markableSink.is() );
- OSL_ASSERT( markableSource.is() );
-
- markableSink->setInputStream( rPipeInput );
- markableSource->setOutputStream( rPipeOutput );
-
- if( ! rSink.is() ) {
- x = m_rFactory->createInstance( L"com.sun.star.io.ObjectInputStream" );
- x->queryInterface( XObjectInputStream::getSmartUik() , rInput );
- x->queryInterface( XActiveDataSink::getSmartUik() , rSink );
- }
- else if ( !rSource.is() ) {
- x = m_rFactory->createInstance( L"com.sun.star.io.ObjectOutputStream" );
- x->queryInterface( XObjectOutputStream::getSmartUik() , rOutput );
- x->queryInterface( XActiveDataSource::getSmartUik() , rSource );
- }
-
- OSL_ASSERT( rPipeInput.is() );
- OSL_ASSERT( rPipeOutput.is() );
-
- rSink->setInputStream( markableInput );
- rSource->setOutputStream( markableOutput );
-
- OSL_ASSERT( rSink->getInputStream().is() );
- OSL_ASSERT( rSource->getOutputStream().is() );
-
- if( 1 + DATASTREAM_TEST_MAX_HANDLE == hTestHandle ) {
- testObject( rOutput , rInput);
- }
- rInput->closeInput();
- rOutput->closeOutput();
-
- }
- }
- catch( Exception& e ) {
- BUILD_ERROR( 0 , UStringToString( e.getName() , CHARSET_SYSTEM ).GetCharStr() );
- }
- catch(...) {
- BUILD_ERROR( 0 , "unknown exception (Exception is not base class)" );
- }
-
- hTestHandle ++;
-
- if( hTestHandle > 1 +DATASTREAM_TEST_MAX_HANDLE ) {
- // all tests finished.
- hTestHandle = -1;
- }
- }
- else {
- BUILD_ERROR( 0 , "service not supported by test." );
- }
- return hTestHandle;
-}
-
-
-BOOL compareMyPropertySet( XPropertySetRef &r1 , XPropertySetRef &r2 )
-{
- BOOL b = TRUE;
-
- if( r1->getPropertyValue( L"long" ).getReflection() == Void_getReflection() ||
- r2->getPropertyValue( L"long" ).getReflection() == Void_getReflection() ) {
-
- // one of the objects is not the correct propertyset !
- return FALSE;
- }
-
- b = b && ( r1->getPropertyValue( L"long" ).getINT32() ==
- r2->getPropertyValue( L"long" ).getINT32() );
-
- b = b && ( r1->getPropertyValue( L"float" ).getFloat() ==
- r2->getPropertyValue( L"float" ).getFloat() );
-
- b = b && ( r1->getPropertyValue( L"double" ).getDouble() ==
- r2->getPropertyValue( L"double" ).getDouble() );
-
- b = b && ( r1->getPropertyValue( L"bool" ).getBOOL() ==
- r2->getPropertyValue( L"bool" ).getBOOL() );
-
- b = b && ( r1->getPropertyValue( L"byte" ).getBYTE() ==
- r2->getPropertyValue( L"byte" ).getBYTE() );
-
- b = b && ( r1->getPropertyValue( L"char" ).getChar() ==
- r2->getPropertyValue( L"char" ).getChar() );
-
- b = b && ( r1->getPropertyValue( L"string" ).getString() ==
- r2->getPropertyValue( L"string" ).getString() );
-
- UsrAny o1 = r1->getPropertyValue( L"object" );
- UsrAny o2 = r2->getPropertyValue( L"object" );
-
- if( o1.getReflection() == XPersistObject_getReflection() ) {
-
- if( o2.getReflection() == XPersistObject_getReflection() ) {
- XPersistObjectRef rPersist1 = *((XPersistObjectRef*) o1.get());
- XPersistObjectRef rPersist2 = *((XPersistObjectRef*) o2.get());
- XPropertySetRef rProp1( rPersist1 , USR_QUERY );
- XPropertySetRef rProp2( rPersist2 , USR_QUERY );
-
- if( rProp1.is() && rProp2.is() && ! ( rProp1 == rProp2 )
- &&( rProp1 != r1 )) {
- compareMyPropertySet( rProp1 , rProp2 );
- }
- }
- else {
- b = FALSE;
- }
- }
- else {
- if( o2.getReflection() == XPersistObject_getReflection() ) {
- b = FALSE;
- }
- }
-
- return b;
-}
-
-void OObjectStreamTest::testObject( const XObjectOutputStreamRef &rOut,
- const XObjectInputStreamRef &rIn )
-{
- ERROR_ASSERT( rOut.is() , "no objectOutputStream" );
- ERROR_ASSERT( rIn.is() , "no objectInputStream" );
-
- XMultiServiceFactoryRef xProv = getProcessServiceManager();
- ERROR_ASSERT( xProv.is() , "no global service manager" );
-
-
- // tests, if saving an object with an unknown service name allows
- // reading the data behind the object !
- {
- XInterfaceRef x = * new MyPersistObject( L"bla blubs" );
-
- XPersistObjectRef persistRef( x , USR_QUERY );
- ERROR_ASSERT( persistRef.is() , "couldn't instantiate PersistTest object" );
-
- rOut->writeObject( persistRef );
- rOut->writeLong( (INT32) 0xdeadbeef );
-
- ERROR_ASSERT( 0 != rIn->available() , "no data arrived at input" );
-
- try
- {
- XPersistObjectRef xReadPersistRef = rIn->readObject();
- ERROR_ASSERT( 0 , "expected exception not thrown" );
- }
- catch( IOException& e )
- {
- // all is ok
- }
-
- ERROR_ASSERT( (INT32) 0xdeadbeef == rIn->readLong() ,
- "wrong data after object with unknown service name." );
- }
-
- {
- XInterfaceRef x = xProv->createInstance(L"test.com.sun.star.io.PersistTest");
- XPersistObjectRef persistRef( x , USR_QUERY );
-
- ERROR_ASSERT( persistRef.is() , "couldn't instantiate PersistTest object" );
-
- XPropertySetRef rProp( persistRef , USR_QUERY );
- ERROR_ASSERT( rProp.is() , "test object is no property set " );
-
- UsrAny any;
- any.setINT32( 0x83482 );
- rProp->setPropertyValue( L"long" , any );
-
- any.setFloat( 42.23 );
- rProp->setPropertyValue( L"float" , any );
-
- any.setDouble( 233.321412 );
- rProp->setPropertyValue( L"double" , any );
-
- any.setBOOL( TRUE );
- rProp->setPropertyValue( L"bool" , any );
-
- any.setBYTE( 130 );
- rProp->setPropertyValue( L"byte" , any );
-
- any.setChar( 'h' );
- rProp->setPropertyValue( L"char" , any );
-
- any.setString( L"hi du !" );
- rProp->setPropertyValue( L"string" , any );
-
- any.set( &persistRef, XPersistObject_getReflection() ); // try a self reference
- rProp->setPropertyValue( L"object" , any );
-
- // do read and write
- rOut->writeObject( persistRef );
- ERROR_ASSERT( 0 != rIn->available() , "no data arrived at input" );
- XPersistObjectRef xReadPersistRef = rIn->readObject( );
-
- XPropertySetRef rPropRead( xReadPersistRef , USR_QUERY );
- ERROR_ASSERT( compareMyPropertySet( rProp , rPropRead ) , "objects has not been read properly !" );
-
- // destroy selfreferences
- rProp->setPropertyValue( L"object", UsrAny() );
- rPropRead->setPropertyValue( L"object", UsrAny() );
- }
-
- {
- XMarkableStreamRef markableOut( rOut , USR_QUERY );
- ERROR_ASSERT( markableOut.is() , "markable stream cannot be queried" );
-
- // do the same thing multiple times to check if
- // buffering and marks work correctly
- for( int i = 0 ; i < 2000 ; i ++ ) {
-
- XInterfaceRef x = xProv->createInstance(L"test.com.sun.star.io.PersistTest");
- XPersistObjectRef persistRef( x , USR_QUERY );
-
- XPropertySetRef rProp( persistRef , USR_QUERY );
- ERROR_ASSERT( rProp.is() , "test object is no property set " );
-
- UsrAny any;
- any.setINT32( 0x83482 );
- rProp->setPropertyValue( L"long" , any );
-
- any.setFloat( 42.23 );
- rProp->setPropertyValue( L"float" , any );
-
- any.setDouble( 233.321412 );
- rProp->setPropertyValue( L"double" , any );
-
- any.setBOOL( TRUE );
- rProp->setPropertyValue( L"bool" , any );
-
- any.setBYTE( 130 );
- rProp->setPropertyValue( L"byte" , any );
-
- any.setChar( 'h' );
- rProp->setPropertyValue( L"char" , any );
-
- any.setString( L"hi du !" );
- rProp->setPropertyValue( L"string" , any );
-
-
- x = xProv->createInstance(L"test.com.sun.star.io.PersistTest");
- XPersistObjectRef persist2ndRef( x , USR_QUERY );
-
-
- // Note : persist2ndRef contains coincident values, but also coincident values must be
- // saved properly !
- any.set( &persist2ndRef, XPersistObject_getReflection() ); // try a self reference
- rProp->setPropertyValue( L"object" , any );
-
- // simply test, if markable operations and object operations do not interfere
- INT32 nMark = markableOut->createMark();
-
- // do read and write
- rOut->writeObject( persistRef );
-
- // further markable tests !
- INT32 nOffset = markableOut->offsetToMark( nMark );
- markableOut->jumpToMark( nMark );
- markableOut->deleteMark( nMark );
- markableOut->jumpToFurthest();
-
-
-
-
-
- ERROR_ASSERT( 0 != rIn->available() , "no data arrived at input" );
- XPersistObjectRef xReadPersistRef = rIn->readObject( );
-
- XPropertySetRef rProp1( persistRef , USR_QUERY );
- XPropertySetRef rProp2( xReadPersistRef , USR_QUERY );
- ERROR_ASSERT( compareMyPropertySet( rProp1, rProp2) , "objects has not been read properly !" );
- }
- }
-}
-
-
-XInterfaceRef OObjectStreamTest_CreateInstance( const XMultiServiceFactoryRef & rSMgr ) THROWS((Exception))
-{
- OObjectStreamTest *p = new OObjectStreamTest( rSMgr );
- XInterfaceRef xService = *p;
- return xService;
-}
-
-Sequence<UString> OObjectStreamTest_getSupportedServiceNames( int i) THROWS( () )
-{
- Sequence<UString> aRet(1);
- aRet.getArray()[0] = OObjectStreamTest_getImplementationName( i);
- return aRet;
-}
-
-UString OObjectStreamTest_getServiceName( int i) THROWS( () )
-{
- if( 1 == i ) {
- return L"test.com.sun.star.io.ObjectInputStream";
- }
- else {
- return L"test.com.sun.star.io.ObjectOutputStream";
- }
-}
-
-UString OObjectStreamTest_getImplementationName( int i) THROWS( () )
-{
- if( 1 == i ) {
- return L"test.com.sun.star.comp.extensions.stm.ObjectInputStream";
- }
- else {
- return L"test.com.sun.star.comp.extensions.stm.ObjectOutputStream";
- }
-}
-
-
-/* vim:set shiftwidth=4 softtabstop=4 expandtab: */