INTEGRATION: CWS cd02 (1.1.2); FILE ADDED

2004/11/15 18:07:52 dbo 1.1.2.2: #i24030#
2004/11/15 17:29:02 dbo 1.1.2.1: #i24030# general cleanup to make buildable again

1 files changed, 561 insertions, 0 deletions

diff --git a/stoc/test/testsmgr_cpnt.cxx b/stoc/test/testsmgr_cpnt.cxx
new file mode 100644
index 000000000000..ce1f0dd3f0bc
--- /dev/null
+++ b/stoc/test/testsmgr_cpnt.cxx
@@ -0,0 +1,561 @@
+/*************************************************************************
+ *
+ *  $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 <rtl/alloc.h>
+#endif
+
+#ifndef _OSL_SECURITY_H_
+#include <osl/security.h>
+#endif
+#ifndef _OSL_THREAD_H_
+#include <osl/thread.h>
+#endif
+#ifndef _OSL_MUTEX_HXX_
+#include <osl/mutex.hxx>
+#endif
+#ifndef _CPPUHELPER_QUERYINTERFACE_HXX_
+#include <cppuhelper/queryinterface.hxx>
+#endif
+#ifndef _CPPUHELPER_WEAK_HXX_
+#include <cppuhelper/weak.hxx>
+#endif
+#ifndef _UNO_MAPPING_HXX_
+#include <uno/mapping.hxx>
+#endif
+
+
+#include <cppuhelper/factory.hxx>
+#include <cppuhelper/servicefactory.hxx>
+#include <cppuhelper/implbase1.hxx>
+
+#ifndef _REGISTRY_REGISTRY_HXX_
+#include <registry/registry.hxx>
+#endif
+
+#include <com/sun/star/registry/XSimpleRegistry.hpp>
+#include <com/sun/star/lang/XMultiServiceFactory.hpp>
+#include <com/sun/star/lang/XServiceInfo.hpp>
+#include <com/sun/star/registry/XImplementationRegistration.hpp>
+#include <com/sun/star/lang/XSingleServiceFactory.hpp>
+#include <com/sun/star/lang/XComponent.hpp>
+#include <com/sun/star/container/XContentEnumerationAccess.hpp>
+#include <com/sun/star/container/XEnumerationAccess.hpp>
+#include <com/sun/star/container/XEnumeration.hpp>
+
+#if defined ( UNX ) || defined( MAC )
+#include <limits.h>
+#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<XMultiServiceFactory> getProcessServiceManager()
+{
+    Reference<XMultiServiceFactory > 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 <stdio.h>
+
+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 <XMultiServiceFactory>  xSMgr = getProcessServiceManager();
+
+    TEST_ENSHURE( xSMgr.is() , "query on XServiceManager failed" );
+
+    Reference<XContentEnumerationAccess> xContEnum(xSMgr, UNO_QUERY);
+    TEST_ENSHURE( xContEnum.is() , "query on XContentEnumerationAccess failed" );
+    Reference<XEnumeration > 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<XEnumerationAccess> xImplEnum(xSMgr, UNO_QUERY);
+    TEST_ENSHURE( xImplEnum.is() , "query on XEnumeration failed" );
+    xEnum = Reference<XEnumeration >(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<OUString> 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<XComponent> 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<XRegistryKey> *)0 ) );
+            if (pKey)
+            {
+                Reference<XRegistryKey> xKey( pKey );
+                pKey->release();
+
+                try
+                {
+                    Reference<XRegistryKey> 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;
+}
+}
+
+
+