/************************************************************************* * * $RCSfile: testsmgr_cpnt.cxx,v $ * * $Revision: 1.2 $ * * last change: $Author: kz $ $Date: 2005-01-13 19:02:07 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses * * - GNU Lesser General Public License Version 2.1 * - Sun Industry Standards Source License Version 1.1 * * Sun Microsystems Inc., October, 2000 * * GNU Lesser General Public License Version 2.1 * ============================================= * Copyright 2000 by Sun Microsystems, Inc. * 901 San Antonio Road, Palo Alto, CA 94303, USA * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License version 2.1, as published by the Free Software Foundation. * * This library 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 for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, * MA 02111-1307 USA * * * Sun Industry Standards Source License Version 1.1 * ================================================= * The contents of this file are subject to the Sun Industry Standards * Source License Version 1.1 (the "License"); You may not use this file * except in compliance with the License. You may obtain a copy of the * License at http://www.openoffice.org/license.html. * * Software provided under this License is provided on an "AS IS" basis, * WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, * WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS, * MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING. * See the License for the specific provisions governing your rights and * obligations concerning the Software. * * The Initial Developer of the Original Code is: Sun Microsystems, Inc. * * Copyright: 2000 by Sun Microsystems, Inc. * * All Rights Reserved. * * Contributor(s): _______________________________________ * * ************************************************************************/ #ifndef _RTL_ALLOC_H_ #include #endif #ifndef _OSL_SECURITY_H_ #include #endif #ifndef _OSL_THREAD_H_ #include #endif #ifndef _OSL_MUTEX_HXX_ #include #endif #ifndef _CPPUHELPER_QUERYINTERFACE_HXX_ #include #endif #ifndef _CPPUHELPER_WEAK_HXX_ #include #endif #ifndef _UNO_MAPPING_HXX_ #include #endif #include #include #include #ifndef _REGISTRY_REGISTRY_HXX_ #include #endif #include #include #include #include #include #include #include #include #include #if defined ( UNX ) || defined( MAC ) #include #define _MAX_PATH PATH_MAX #endif #if OSL_DEBUG_LEVEL > 0 #define TEST_ENSHURE(c, m) OSL_ENSURE(c, m) #else #define TEST_ENSHURE(c, m) OSL_VERIFY(c) #endif #define IMPLEMENTATION_NAME "com.sun.star.DummyService.V10" #define SERVICE_NAME "com.sun.star.ts.TestManagerImpl" using namespace com::sun::star::uno; using namespace com::sun::star::registry; using namespace com::sun::star::lang; using namespace com::sun::star::container; using namespace osl; using namespace rtl; using namespace cppu; Reference getProcessServiceManager() { Reference s_x; if (! s_x.is()) { MutexGuard aGuard( Mutex::getGlobalMutex() ); if (! s_x.is()) s_x = createRegistryServiceFactory( OUString::createFromAscii( "stoctest.rdb" ), sal_False ); } return s_x; } Reference< XMultiServiceFactory > createRegistryServiceManager( const OUString& registryName ) { return createRegistryServiceFactory( registryName ); } /********************************** * The service, that is used to test the Service manager * * * *************************************/ static sal_uInt32 nInstanceCount = 0; class Test_Manager_Impl : public WeakImplHelper1< XServiceInfo > { public: Test_Manager_Impl(){ nInstanceCount++;} ~Test_Manager_Impl(); // XServiceInfo OUString SAL_CALL getImplementationName() throw(); sal_Bool SAL_CALL supportsService(const OUString& ServiceName) throw(); Sequence< OUString > SAL_CALL getSupportedServiceNames(void) throw(); static Sequence< OUString > SAL_CALL getSupportedServiceNames_Static(void) throw(); private: // static XIdlClassRef getStaticIdlClass(); }; Test_Manager_Impl::~Test_Manager_Impl() { nInstanceCount--; } // alt, wird von der neuen Mimic nicht mehr gebraucht Reference< XInterface > SAL_CALL Test_Manager_Impl_CreateInstance_Impl() { return (OWeakObject *)new Test_Manager_Impl(); } //************************************************************************* // Test_Manager_Impl_CreateInstance() // Reference < XInterface > SAL_CALL Test_Manager_Impl_CreateInstance( const Reference< XMultiServiceFactory > & rSMgr ) throw (Exception) { Reference < XInterface > xService = (XWeak *)(OWeakObject *)new Test_Manager_Impl( ); return xService; } //************************************************************************* // Test_Manager_Impl::getImplementationName // OUString Test_Manager_Impl::getImplementationName() throw() { return OUString::createFromAscii(IMPLEMENTATION_NAME); } //************************************************************************* // Test_Manager_Impl::supportsService // sal_Bool Test_Manager_Impl::supportsService( const OUString& ServiceName ) throw() { Sequence< OUString > aSNL = getSupportedServiceNames(); const OUString * pArray = aSNL.getConstArray(); for( sal_Int32 i = 0; i < aSNL.getLength(); i++ ) if( pArray[i] == ServiceName ) return sal_True; return sal_False; } //************************************************************************* // Test_Manager_Impl::getSupportedServiceNames // Sequence< OUString > Test_Manager_Impl::getSupportedServiceNames(void) throw () { return getSupportedServiceNames_Static(); } //************************************************************************* // Test_Manager_Impl::getSupportedServiceNames_Static // Sequence< OUString > Test_Manager_Impl::getSupportedServiceNames_Static(void) throw () { Sequence< OUString > aSNS( 2 ); aSNS.getArray()[0] = OUString::createFromAscii(SERVICE_NAME); aSNS.getArray()[1] = OUString::createFromAscii("com.sun.star.bridge.Bridge"); return aSNS; } /**** * * * This routine performs the test of the process service manager ( getProcessServiceManager is called ) * * * ****/ #include extern "C" void SAL_CALL test_ServiceManager() { #if ! defined SAL_DLLPREFIX #define SAL_DLLPREFIX "" #endif OUString atUModule2 = OUString( RTL_CONSTASCII_USTRINGPARAM( SAL_DLLPREFIX "testsmgr_component" SAL_DLLEXTENSION ) ); // expand shared library name OString atModule2( OUStringToOString(atUModule2, RTL_TEXTENCODING_ASCII_US) ); // get the process servicemanager Reference xSMgr = getProcessServiceManager(); TEST_ENSHURE( xSMgr.is() , "query on XServiceManager failed" ); Reference xContEnum(xSMgr, UNO_QUERY); TEST_ENSHURE( xContEnum.is() , "query on XContentEnumerationAccess failed" ); Reference xEnum(xContEnum->createContentEnumeration(OUString::createFromAscii("com.sun.star.registry.SimpleRegistry"))); TEST_ENSHURE( xEnum.is() , "createContentEnumeration failed" ); sal_Int32 nLen = 0; while( xEnum->hasMoreElements() ) { nLen++; xEnum->nextElement(); } TEST_ENSHURE( nLen == 1, "more than one implementation for SimpleRegistry" ); Reference xImplEnum(xSMgr, UNO_QUERY); TEST_ENSHURE( xImplEnum.is() , "query on XEnumeration failed" ); xEnum = Reference(xImplEnum->createEnumeration()); TEST_ENSHURE( xEnum.is() , "createEnumeration failed" ); nLen = 0; while( xEnum->hasMoreElements() ) { nLen++; Reference< XServiceInfo > sf( xEnum->nextElement(), UNO_QUERY ); OString str( OUStringToOString( sf->getImplementationName(), RTL_TEXTENCODING_ASCII_US ) ); ::fprintf( stderr, "> implementation name: %s\n", str.getStr() ); } TEST_ENSHURE( nLen == 8, "more than 6 factories" ); // try to get an instance for a unknown service TEST_ENSHURE( !xSMgr->createInstance(OUString::createFromAscii("bla.blup.Q")).is(), "unknown service provider found" ); // // First test : register service via the internal function of the component itself // { Reference< XImplementationRegistration > xInst( xSMgr->createInstance(OUString::createFromAscii("com.sun.star.registry.ImplementationRegistration")), UNO_QUERY ); TEST_ENSHURE( xInst.is(), "no ImplementationRegistration" ); try { // register the services via writeComponentRegInfo (see at end of this file) xInst->registerImplementation(OUString::createFromAscii("com.sun.star.loader.SharedLibrary"), atUModule2, Reference< XSimpleRegistry >() ); } catch( CannotRegisterImplementationException e ) { TEST_ENSHURE( 0, "register implementation failed" ); } // getImplementations() check Sequence seqImpl = xInst->getImplementations(OUString::createFromAscii("com.sun.star.loader.SharedLibrary"), atUModule2); TEST_ENSHURE( seqImpl.getLength() == 1, "count of implementantions is wrong" ); TEST_ENSHURE( seqImpl.getConstArray()[0] == OUString::createFromAscii("com.sun.star.DummyService.V10"), "implementation name is not equal" ); // tests, if a service provider can be instantiated. Reference< XInterface > xIFace(xSMgr->createInstance(OUString::createFromAscii("com.sun.star.ts.TestManagerImpl"))); TEST_ENSHURE( xIFace.is(), "loadable service not found" ); // remove the service TEST_ENSHURE( xInst->revokeImplementation(atUModule2, Reference< XSimpleRegistry > ()), "revoke implementation failed" ); } // Reference < XSimpleRegistry > xSReg( xSMgr->createInstance(OUString::createFromAscii("com::sun::star.uno.repos.SimpleRegistry")), UNO_QUERY ); // TEST_ENSHURE( xSReg.is() , "Simple registry couldn't be instantiated" ); // xSReg->open(OUString::createFromAscii("dummy.reg"), sal_False, sal_True); // xSReg->close(); // laut dbo : C-API muss nicht mehr unterstuezt werden //TEST_ENSHURE( registerExternService(atModule, "dummy.reg"), "install failed" ); //TEST_ENSHURE( deregisterExternService(atModule, "dummy.reg"), "deinstall failed" ); // UNO_INTERFACE(XMultiServiceFactory) xUnoSMgr = {0,0}; // smart2uno(xSMgr, xUnoSMgr); // TEST_ENSHURE(registerExternImplementation(xUnoSMgr, "com::sun::star.loader.SharedLibrary", atModule2, "dummy.reg"), "install failed" ); // TEST_ENSHURE(revokeExternImplementation(xUnoSMgr, atModule2, "dummy.reg"), "deinstall failed" ); // TEST_ENSHURE(registerExternImplementation(xUnoSMgr, "com::sun::star.loader.SharedLibrary", atModule2, "dummy2.reg"), "install failed" ); //TODO : Java loader test // String testUrl(getTestJarUrl()); // TEST_ENSHURE(registerExternImplementation(xUnoSMgr, "com::sun::star.loader.Java", testUrl, "dummy.reg"), "install failed" ); // TEST_ENSHURE(revokeExternImplementation(xUnoSMgr, testUrl, "dummy.reg"), "deinstall failed" ); // if (!UNO_isNull((UNO_Ifc*)&xUnoSMgr)) // xUnoSMgr.m_pVmt->release(xUnoSMgr.m_pCtx); // xSReg->open(OUString::createFromAscii("dummy.reg"), sal_True, sal_False); // TEST_ENSHURE(!xSReg->getRootKey()->openKey(OUString::createFromAscii("/SERVICES/com::sun::star/ts/TestManagerImpl/URL")).is(), // "deinstall failed" ); // xSReg->close(); // xSReg->open(OUString::createFromAscii("dummy.reg"), sal_False, sal_False); // xSReg->destroy(); // xSReg->open(OUString::createFromAscii("dummy2.reg"), sal_False, sal_False); // xSReg->destroy(); // Test initialisieren /* XServiceProviderRef xSiSP1 = createSimpleServiceProvider( OUString::createFromAscii("com::sun::star.usr.Test_Manager_Impl1"), Test_Manager_Impl_getReflection ); XServiceProviderRef xSiSP11 = createSimpleServiceProvider( OUString::createFromAscii("com::sun::star.usr.Test_Manager_Impl1"), Test_Manager_Impl_getReflection ); XServiceProviderRef xSiSP2 = createSimpleServiceProvider( OUString::createFromAscii("com::sun::star.usr.Test_Manager_Impl2"), Test_Manager_Impl_getReflection ); */ /* // second test // create XServiceProvider via createSingleFactory and write them directly into the registry // For this is needed a sequence of supported servicenames and a createComponent function pointer { Reference< XServiceProvider > xSiSP1(createSingleFactory( xSMgr, OUString::createFromAscii("com::sun::star.usr.Test_Manager_Impl1), Test_Manager_Impl_CreateInstance, Test_Manager_Impl::getSupportedServiceNames_Static() ), UNO_QUERY); Reference< XServiceProvider > xSiSP11(createSingleFactory( xSMgr, OUString::createFromAscii("com::sun::star.usr.Test_Manager_Impl1"), Test_Manager_Impl_CreateInstance, Test_Manager_Impl::getSupportedServiceNames_Static() ),UNO_QUERY); Reference< XServiceProvider > xSiSP2(createSingleFactory( xSMgr, L"com::sun::star.usr.Test_Manager_Impl2", Test_Manager_Impl_CreateInstance, Test_Manager_Impl::getSupportedServiceNames_Static() ), UNO_QUERY); // put the service providers into the registry xReg->registerServiceProvider( L"com::sun::star.test.TestManager1", xSiSP1 ); xReg->registerServiceProvider( L"com::sun::star.test.TestManager1", xSiSP11 ); xReg->registerServiceProvider( L"com::sun::star.test.TestManager2", xSiSP2 ); // TestManager1 Reference< XServiceProvider > xProv = xSMgr->queryServiceProvider( L"com::sun::star.test.TestManager1"); Reference< XSingleServiceFactory > xFact( xProv, UNO_QUERY ); TEST_ENSHURE( xFact.is(), "Service com::sun::star.test.TestManager1 not found" ); Reference< XInterface > xTest1 = xFact->createInstance(); TEST_ENSHURE( nInstanceCount == 1, "wrong service instanciated" ); // TestManager2 xProv = xSMgr->queryServiceProvider( L"com::sun::star.test.TestManager2"); xFact = Reference < XSingleServiceFactory > ( xProv , UNO_QUERY ); TEST_ENSHURE( xFact.is(), "Service com::sun::star.test.TestManager2 not found" ); Reference < XInterface > xTest2 = xFact->createInstance(); TEST_ENSHURE( nInstanceCount == 2, "wrong service instanciated" ); xTest1 = Reference< XInterface >(); xTest2 = Reference< XInterface >(); TEST_ENSHURE( nInstanceCount == 0, "wrong service deleted" ); Reference< XEnumeration > xEnum = xSMgr->createProviderEnumeration( L"com::sun::star.test.TestManager1"); TEST_ENSHURE( xEnum.is() , "no provider enumeration" ); sal_Int32 nSPTestManagerImplLen2 = 0; while (xEnum.is() && xEnum->hasMoreElements()) { nSPTestManagerImplLen2++; xEnum->nextElement(); } TEST_ENSHURE( nSPTestManagerImplLen2 == 2, "queryServiceProviders() wrong length" ); sal_Int32 nCount = 0; xEnum = xSMgr->createProviderEnumeration( L"com::sun::star.test.TestManager1"); while (xEnum->hasMoreElements()) { Reference< XServiceProvider > xProv; xEnum->nextElement() >>= xProv; if (xProv == xSiSP1 || xProv == xSiSP11) nCount++; } TEST_ENSHURE( nCount == 2 , "not all com::sun::star.testimpl.TestManagerImpl registered" ); */ /* { Reference< XMultiServiceFactory > xTestManager(createRegistryServiceManager(L"testmanager.rdb")); TEST_ENSHURE( xTestManager.is(), "create Test ServiceManager failed!" ); } */ Reference xComp(xSMgr, UNO_QUERY); xComp->dispose(); xComp.clear(); xSMgr.clear(); } //************************************************************************* extern "C" sal_Bool SAL_CALL writeComponentInfo(uno_Interface* pXUnoKey) { sal_Bool ret = sal_False; if (pXUnoKey) { Mapping aUno2Current( OUString::createFromAscii(UNO_LB_UNO), OUString::createFromAscii(CPPU_CURRENT_LANGUAGE_BINDING_NAME) ); if (aUno2Current.is()) { XRegistryKey* pKey = (XRegistryKey *)aUno2Current.mapInterface( pXUnoKey, ::getCppuType( (const Reference *)0 ) ); if (pKey) { Reference xKey( pKey ); pKey->release(); try { Reference xNewKey = xKey->createKey( OUString::createFromAscii("/" IMPLEMENTATION_NAME "/UNO/SERVICES")); Sequence< OUString > aSNL = Test_Manager_Impl::getSupportedServiceNames_Static(); const OUString * pArray = aSNL.getArray(); for( sal_Int32 i = 0; i < aSNL.getLength(); i++ ) { xNewKey->createKey(pArray[i]); } ret = sal_True; } catch( InvalidRegistryException&) { } } } } return ret; } extern "C" { //================================================================================================== void SAL_CALL component_getImplementationEnvironment( const sal_Char ** ppEnvTypeName, uno_Environment ** ppEnv ) { *ppEnvTypeName = CPPU_CURRENT_LANGUAGE_BINDING_NAME; } //================================================================================================== sal_Bool SAL_CALL component_writeInfo( void * pServiceManager, void * pRegistryKey ) { if (pRegistryKey) { try { Reference< XRegistryKey > xNewKey( reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey( OUString( RTL_CONSTASCII_USTRINGPARAM("/" IMPLEMENTATION_NAME "/UNO/SERVICES") ) ) ); const Sequence< OUString > & rSNL = Test_Manager_Impl::getSupportedServiceNames_Static(); const OUString * pArray = rSNL.getConstArray(); for ( sal_Int32 nPos = rSNL.getLength(); nPos--; ) xNewKey->createKey( pArray[nPos] ); return sal_True; } catch (InvalidRegistryException &) { OSL_ENSURE( sal_False, "### InvalidRegistryException!" ); } } return sal_False; } //================================================================================================== void * SAL_CALL component_getFactory( const sal_Char * pImplName, void * pServiceManager, void * pRegistryKey ) { void * pRet = 0; if (rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0) { Reference< XSingleServiceFactory > xFactory( createSingleFactory( reinterpret_cast< XMultiServiceFactory * >( pServiceManager ), OUString( RTL_CONSTASCII_USTRINGPARAM(IMPLEMENTATION_NAME) ), Test_Manager_Impl_CreateInstance, Test_Manager_Impl::getSupportedServiceNames_Static() ) ); if (xFactory.is()) { xFactory->acquire(); pRet = xFactory.get(); } } return pRet; } }