stoc/test/testsmgr_cpnt.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*
   3  * This file is part of the LibreOffice project.
   4  *
   5  * This Source Code Form is subject to the terms of the Mozilla Public
   6  * License, v. 2.0. If a copy of the MPL was not distributed with this
   7  * file, You can obtain one at http://mozilla.org/MPL/2.0/.
   8  *
   9  * This file incorporates work covered by the following license notice:
  10  *
  11  *   Licensed to the Apache Software Foundation (ASF) under one or more
  12  *   contributor license agreements. See the NOTICE file distributed
  13  *   with this work for additional information regarding copyright
  14  *   ownership. The ASF licenses this file to you under the Apache
  15  *   License, Version 2.0 (the "License"); you may not use this file
  16  *   except in compliance with the License. You may obtain a copy of
  17  *   the License at http://www.apache.org/licenses/LICENSE-2.0 .
  18  */
  19
  20 #include <rtl/alloc.h>
  21 #include <osl/security.h>
  22 #include <osl/thread.h>
  23 #include <osl/mutex.hxx>
  24 #include <cppuhelper/queryinterface.hxx>
  25 #include <cppuhelper/supportsservice.hxx>
  26 #include <cppuhelper/weak.hxx>
  27 #include <uno/mapping.hxx>
  28
  29
  30 #include <cppuhelper/factory.hxx>
  31 #include <cppuhelper/servicefactory.hxx>
  32 #include <cppuhelper/implbase.hxx>
  33 #include <registry/registry.hxx>
  34
  35 #include <com/sun/star/registry/XSimpleRegistry.hpp>
  36 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
  37 #include <com/sun/star/lang/XServiceInfo.hpp>
  38 #include <com/sun/star/registry/XImplementationRegistration.hpp>
  39 #include <com/sun/star/lang/XSingleServiceFactory.hpp>
  40 #include <com/sun/star/lang/XComponent.hpp>
  41 #include <com/sun/star/container/XContentEnumerationAccess.hpp>
  42 #include <com/sun/star/container/XEnumerationAccess.hpp>
  43 #include <com/sun/star/container/XEnumeration.hpp>
  44
  45 #include <stdio.h>
  46
  47 #if defined ( UNX )
  48 #include <limits.h>
  49 #define _MAX_PATH PATH_MAX
  50 #endif
  51
  52
  53 #define IMPLEMENTATION_NAME "com.sun.star.DummyService.V10"
  54 #define SERVICE_NAME "com.sun.star.ts.TestManagerImpl"
  55
  56
  57 using namespace css::uno;
  58 using namespace css::registry;
  59 using namespace css::lang;
  60 using namespace css::container;
  61 using namespace osl;
  62 using namespace cppu;
  63
  64
  65 Reference<XMultiServiceFactory> getProcessServiceManager()
  66 {
  67     static Reference<XMultiServiceFactory> s_x(
  68         createRegistryServiceFactory(OUString("stoctest.rdb"), sal_False));
  69     return s_x;
  70 }
  71
  72 Reference< XMultiServiceFactory > createRegistryServiceManager( const OUString& registryName )
  73 {
  74     return createRegistryServiceFactory( registryName );
  75 }
  76
  77
  78 /**********************************
  79 * The service, that is used to test the Service manager
  80 *
  81 *
  82 *
  83 *************************************/
  84 static sal_uInt32 nInstanceCount = 0;
  85 class Test_Manager_Impl : public WeakImplHelper< XServiceInfo >
  86 {
  87 public:
  88     Test_Manager_Impl(){ nInstanceCount++;}
  89     ~Test_Manager_Impl();
  90
  91     // XServiceInfo
  92     OUString                    SAL_CALL getImplementationName() throw();
  93     sal_Bool                    SAL_CALL supportsService(const OUString& ServiceName) throw();
  94     Sequence< OUString >        SAL_CALL getSupportedServiceNames() throw();
  95     static Sequence< OUString > SAL_CALL getSupportedServiceNames_Static() throw();
  96
  97 private:
  98 //  static XIdlClassRef     getStaticIdlClass();
  99 };
 100
 101 Test_Manager_Impl::~Test_Manager_Impl()
 102 {
 103     nInstanceCount--;
 104 }
 105
 106
 107 // old, is no longer needed by the new Mimic
 108 Reference< XInterface > SAL_CALL Test_Manager_Impl_CreateInstance_Impl()
 109 {
 110     return (OWeakObject *)new Test_Manager_Impl();
 111 }
 112
 113
 114 // Test_Manager_Impl_CreateInstance()
 115
 116 Reference < XInterface > SAL_CALL Test_Manager_Impl_CreateInstance(
 117     const Reference< XMultiServiceFactory > & /*rSMgr*/ ) throw (Exception)
 118 {
 119     Reference < XInterface >  xService = (XWeak *)(OWeakObject *)new Test_Manager_Impl( );
 120
 121     return xService;
 122 }
 123
 124
 125 // Test_Manager_Impl::getImplementationName
 126
 127 OUString Test_Manager_Impl::getImplementationName() throw()
 128 {
 129     return OUString(IMPLEMENTATION_NAME);
 130 }
 131
 132 // Test_Manager_Impl::supportsService
 133 sal_Bool Test_Manager_Impl::supportsService( const OUString& ServiceName ) throw()
 134 {
 135     return cppu::supportsService(this, ServiceName);
 136 }
 137
 138
 139 // Test_Manager_Impl::getSupportedServiceNames
 140
 141 Sequence< OUString > Test_Manager_Impl::getSupportedServiceNames() throw ()
 142 {
 143     return getSupportedServiceNames_Static();
 144 }
 145
 146
 147 // Test_Manager_Impl::getSupportedServiceNames_Static
 148
 149 Sequence< OUString > Test_Manager_Impl::getSupportedServiceNames_Static() throw ()
 150 {
 151     return { SERVICE_NAME, "com.sun.star.bridge.Bridge" };
 152 }
 153
 154
 155 /****
 156 *
 157 *
 158 *  This routine performs the test of the process service manager ( getProcessServiceManager is called )
 159 *
 160 *
 161 *
 162 ****/
 163
 164 extern "C" void SAL_CALL test_ServiceManager()
 165 {
 166 #if ! defined SAL_DLLPREFIX
 167 #define SAL_DLLPREFIX ""
 168 #endif
 169      OUString atUModule2 = SAL_DLLPREFIX "testsmgr_component" SAL_DLLEXTENSION ;
 170
 171     // expand shared library name
 172     OString  atModule2( OUStringToOString(atUModule2, RTL_TEXTENCODING_ASCII_US) );
 173
 174     // get the process servicemanager
 175     Reference <XMultiServiceFactory>  xSMgr = getProcessServiceManager();
 176
 177     OSL_ENSURE( xSMgr.is() , "query on XServiceManager failed" );
 178
 179     Reference<XContentEnumerationAccess> xContEnum(xSMgr, UNO_QUERY);
 180     OSL_ENSURE( xContEnum.is() , "query on XContentEnumerationAccess failed" );
 181     Reference<XEnumeration > xEnum(xContEnum->createContentEnumeration(OUString("com.sun.star.registry.SimpleRegistry")));
 182     OSL_ENSURE( xEnum.is() , "createContentEnumeration failed" );
 183     sal_Int32 nLen = 0;
 184     while( xEnum->hasMoreElements() )
 185     {
 186         nLen++;
 187         xEnum->nextElement();
 188     }
 189     OSL_ENSURE( nLen == 1, "more than one implementation for SimpleRegistry" );
 190
 191     Reference<XEnumerationAccess> xImplEnum(xSMgr, UNO_QUERY);
 192     OSL_ENSURE( xImplEnum.is() , "query on XEnumeration failed" );
 193     xEnum.set(xImplEnum->createEnumeration());
 194     OSL_ENSURE( xEnum.is() , "createEnumeration failed" );
 195     nLen = 0;
 196     while( xEnum->hasMoreElements() )
 197     {
 198         nLen++;
 199         Reference< XServiceInfo > sf( xEnum->nextElement(), UNO_QUERY );
 200         OString str( OUStringToOString( sf->getImplementationName(), RTL_TEXTENCODING_ASCII_US ) );
 201         ::fprintf( stderr, "> implementation name: %s\n", str.getStr() );
 202     }
 203     OSL_ENSURE( nLen == 8, "more than 6 factories" );
 204
 205     // try to get an instance for an unknown service
 206     OSL_VERIFY( !xSMgr->createInstance("bla.blup.Q").is() );
 207
 208
 209     // First test : register service via the internal function of the component itself
 210
 211     {
 212         Reference< XImplementationRegistration >
 213             xInst( xSMgr->createInstance("com.sun.star.registry.ImplementationRegistration"), UNO_QUERY );
 214         OSL_ENSURE( xInst.is(), "no ImplementationRegistration" );
 215
 216         try {
 217             // register the services via writeComponentRegInfo (see at end of this file)
 218             xInst->registerImplementation(OUString("com.sun.star.loader.SharedLibrary"), atUModule2, Reference< XSimpleRegistry >() );
 219         }
 220         catch(const CannotRegisterImplementationException &) {
 221             OSL_ENSURE( 0, "register implementation failed" );
 222         }
 223
 224         // getImplementations() check
 225          Sequence<OUString> seqImpl = xInst->getImplementations(OUString("com.sun.star.loader.SharedLibrary"), atUModule2);
 226         OSL_ENSURE( seqImpl.getLength() == 1, "count of implementations is wrong" );
 227         OSL_ENSURE( seqImpl.getConstArray()[0] == "com.sun.star.DummyService.V10", "implementation name is not equal" );
 228
 229
 230         // tests, if a service provider can be instantiated.
 231
 232         Reference< XInterface > xIFace(xSMgr->createInstance("com.sun.star.ts.TestManagerImpl"));
 233         OSL_ENSURE( xIFace.is(), "loadable service not found" );
 234
 235         // remove the service
 236         OSL_VERIFY( xInst->revokeImplementation(atUModule2, Reference< XSimpleRegistry > ()) );
 237     }
 238
 239     Reference<XComponent> xComp(xSMgr, UNO_QUERY);
 240     xComp->dispose();
 241
 242     xComp.clear();
 243     xSMgr.clear();
 244 }
 245
 246
 247 extern "C"
 248 {
 249
 250 sal_Bool SAL_CALL component_writeInfo(
 251     void * /*pServiceManager*/, void * pRegistryKey )
 252 {
 253     if (pRegistryKey)
 254     {
 255         try
 256         {
 257             Reference< XRegistryKey > xNewKey(
 258                 reinterpret_cast< XRegistryKey * >( pRegistryKey )->createKey(
 259                     OUString( "/" IMPLEMENTATION_NAME "/UNO/SERVICES" ) ) );
 260
 261             const Sequence< OUString > & rSNL =
 262                 Test_Manager_Impl::getSupportedServiceNames_Static();
 263             const OUString * pArray = rSNL.getConstArray();
 264             for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
 265                 xNewKey->createKey( pArray[nPos] );
 266
 267             return sal_True;
 268         }
 269         catch (InvalidRegistryException &)
 270         {
 271             OSL_FAIL( "### InvalidRegistryException!" );
 272         }
 273     }
 274     return sal_False;
 275 }
 276
 277 SAL_DLLPUBLIC_EXPORT void * SAL_CALL component_getFactory(
 278     const sal_Char * pImplName, void * pServiceManager, void * /*pRegistryKey*/ )
 279 {
 280     void * pRet = 0;
 281
 282     if (rtl_str_compare( pImplName, IMPLEMENTATION_NAME ) == 0)
 283     {
 284         Reference< XSingleServiceFactory > xFactory( createSingleFactory(
 285             reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
 286             OUString( IMPLEMENTATION_NAME ),
 287             Test_Manager_Impl_CreateInstance,
 288             Test_Manager_Impl::getSupportedServiceNames_Static() ) );
 289
 290         if (xFactory.is())
 291         {
 292             xFactory->acquire();
 293             pRet = xFactory.get();
 294         }
 295     }
 296
 297     return pRet;
 298 }
 299 }
 300
 301
 302 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */