736 lines
25 KiB
C++
736 lines
25 KiB
C++
/*************************************************************************
|
|
*
|
|
* $RCSfile: dllcomponentloader.cxx,v $
|
|
*
|
|
* $Revision: 1.5 $
|
|
*
|
|
* last change: $Author: dbo $ $Date: 2000-12-14 16:23:39 $
|
|
*
|
|
* 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): _______________________________________
|
|
*
|
|
*
|
|
************************************************************************/
|
|
|
|
#include <stdlib.h>
|
|
#include <osl/file.h>
|
|
#include <vector>
|
|
#include <osl/mutex.hxx>
|
|
|
|
#ifdef MACOSX
|
|
#include <rtl/ustrbuf.hxx>
|
|
#endif
|
|
|
|
#ifndef _OSL_DIAGNOSE_H_
|
|
#include <osl/diagnose.h>
|
|
#endif
|
|
#ifndef _OSL_MODULE_H_
|
|
#include <osl/module.h>
|
|
#endif
|
|
#ifndef _RTL_USTRING_HXX_
|
|
#include <rtl/ustring.hxx>
|
|
#endif
|
|
#ifndef _RTL_STRBUF_HXX_
|
|
#include <rtl/strbuf.hxx>
|
|
#endif
|
|
|
|
#ifndef _UNO_ENVIRONMENT_H_
|
|
#include <uno/environment.h>
|
|
#endif
|
|
#ifndef _UNO_MAPPING_HXX_
|
|
#include <uno/mapping.hxx>
|
|
#endif
|
|
|
|
#ifndef _CPPUHELPER_QUERYINTERFACE_HXX_
|
|
#include <cppuhelper/queryinterface.hxx>
|
|
#endif
|
|
#ifndef _CPPUHELPER_WEAK_HXX_
|
|
#include <cppuhelper/weak.hxx>
|
|
#endif
|
|
#ifndef _CPPUHELPER_FACTORY_HXX_
|
|
#include <cppuhelper/factory.hxx>
|
|
#endif
|
|
#ifndef _CPPUHELPER_IMPLBASE3_HXX_
|
|
#include <cppuhelper/implbase3.hxx>
|
|
#endif
|
|
|
|
#include <com/sun/star/loader/XImplementationLoader.hpp>
|
|
#include <com/sun/star/lang/IllegalArgumentException.hpp>
|
|
#include <com/sun/star/lang/XMultiServiceFactory.hpp>
|
|
#include <com/sun/star/lang/XServiceInfo.hpp>
|
|
#include <com/sun/star/lang/XInitialization.hpp>
|
|
#include <com/sun/star/registry/XRegistryKey.hpp>
|
|
|
|
using namespace com::sun::star::uno;
|
|
using namespace com::sun::star::loader;
|
|
using namespace com::sun::star::lang;
|
|
using namespace com::sun::star::registry;
|
|
using namespace cppu;
|
|
using namespace rtl;
|
|
|
|
namespace stoc_loader
|
|
{
|
|
|
|
#define SERVICENAME "com.sun.star.loader.SharedLibrary"
|
|
#define IMPLNAME "com.sun.star.comp.stoc.DLLComponentLoader"
|
|
|
|
//*************************************************************************
|
|
// DllComponentLoader
|
|
//*************************************************************************
|
|
class DllComponentLoader
|
|
: public WeakImplHelper3< XImplementationLoader,
|
|
XInitialization,
|
|
XServiceInfo >
|
|
{
|
|
public:
|
|
DllComponentLoader( const Reference<XMultiServiceFactory> & rXSMgr );
|
|
~DllComponentLoader();
|
|
|
|
// XServiceInfo
|
|
virtual OUString SAL_CALL getImplementationName( ) throw(::com::sun::star::uno::RuntimeException);
|
|
virtual sal_Bool SAL_CALL supportsService( const OUString& ServiceName ) throw(::com::sun::star::uno::RuntimeException);
|
|
virtual Sequence< OUString > SAL_CALL getSupportedServiceNames( ) throw(::com::sun::star::uno::RuntimeException);
|
|
static Sequence< OUString > SAL_CALL getSupportedServiceNames_Static( );
|
|
|
|
// XInitialization
|
|
virtual void SAL_CALL initialize( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aArguments ) throw(::com::sun::star::uno::Exception, ::com::sun::star::uno::RuntimeException);
|
|
|
|
// XImplementationLoader
|
|
virtual Reference<XInterface> SAL_CALL activate( const OUString& implementationName, const OUString& implementationLoaderUrl, const OUString& locationUrl, const Reference<XRegistryKey>& xKey ) throw(CannotActivateFactoryException, RuntimeException);
|
|
virtual sal_Bool SAL_CALL writeRegistryInfo( const Reference<XRegistryKey>& xKey, const OUString& implementationLoaderUrl, const OUString& locationUrl ) throw(CannotRegisterImplementationException, RuntimeException);
|
|
|
|
private:
|
|
Reference<XMultiServiceFactory> m_xSMgr;
|
|
};
|
|
|
|
//*************************************************************************
|
|
DllComponentLoader::DllComponentLoader( const Reference<XMultiServiceFactory> & rXSMgr )
|
|
: m_xSMgr( rXSMgr )
|
|
{
|
|
}
|
|
|
|
//*************************************************************************
|
|
DllComponentLoader::~DllComponentLoader()
|
|
{
|
|
}
|
|
|
|
//*************************************************************************
|
|
OUString SAL_CALL DllComponentLoader::getImplementationName( )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return OUString( RTL_CONSTASCII_USTRINGPARAM(IMPLNAME) );
|
|
}
|
|
|
|
//*************************************************************************
|
|
sal_Bool SAL_CALL DllComponentLoader::supportsService( const OUString& ServiceName )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
Sequence< OUString > aSNL = getSupportedServiceNames();
|
|
const OUString * pArray = aSNL.getArray();
|
|
for( sal_Int32 i = 0; i < aSNL.getLength(); i++ )
|
|
if( pArray[i] == ServiceName )
|
|
return sal_True;
|
|
return sal_False;
|
|
}
|
|
|
|
//*************************************************************************
|
|
Sequence<OUString> SAL_CALL DllComponentLoader::getSupportedServiceNames( )
|
|
throw(::com::sun::star::uno::RuntimeException)
|
|
{
|
|
return getSupportedServiceNames_Static();
|
|
}
|
|
|
|
//*************************************************************************
|
|
Sequence<OUString> SAL_CALL DllComponentLoader::getSupportedServiceNames_Static( )
|
|
{
|
|
OUString aName( RTL_CONSTASCII_USTRINGPARAM(SERVICENAME) );
|
|
return Sequence< OUString >( &aName, 1 );
|
|
}
|
|
|
|
//*************************************************************************
|
|
void DllComponentLoader::initialize( const ::com::sun::star::uno::Sequence< ::com::sun::star::uno::Any >& aArgs )
|
|
throw(::com::sun::star::uno::Exception, ::com::sun::star::uno::RuntimeException)
|
|
{
|
|
if( aArgs.getLength() != 1 )
|
|
{
|
|
throw IllegalArgumentException();
|
|
}
|
|
|
|
Reference< XMultiServiceFactory > rServiceManager;
|
|
|
|
if( aArgs.getConstArray()[0].getValueType().getTypeClass() == TypeClass_INTERFACE )
|
|
{
|
|
aArgs.getConstArray()[0] >>= rServiceManager;
|
|
}
|
|
|
|
if( !rServiceManager.is() )
|
|
{
|
|
throw IllegalArgumentException();
|
|
}
|
|
|
|
m_xSMgr = rServiceManager;
|
|
}
|
|
|
|
#ifdef TRACE_CPLD
|
|
static inline void out( const char * p )
|
|
{
|
|
OSL_TRACE( p );
|
|
}
|
|
static inline void out( const OUString & r )
|
|
{
|
|
OString s( OUStringToOString( r, RTL_TEXTENCODING_ASCII_US ) );
|
|
out( s.getStr() );
|
|
}
|
|
#endif
|
|
|
|
//==================================================================================================
|
|
static const ::std::vector< OUString > * getAccessDPath()
|
|
{
|
|
static ::std::vector< OUString > * s_p = 0;
|
|
static sal_Bool s_bInit = sal_False;
|
|
|
|
if (! s_bInit)
|
|
{
|
|
::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
|
|
if (! s_bInit)
|
|
{
|
|
const char * pEnv = ::getenv( "CPLD_ACCESSPATH" );
|
|
if (pEnv)
|
|
{
|
|
static ::std::vector< OUString > s_v;
|
|
|
|
OString aEnv( pEnv );
|
|
sal_Int32 nToken = aEnv.getTokenCount( ';' );
|
|
|
|
for ( sal_Int32 i = 0; i < nToken; ++i )
|
|
{
|
|
OUString aStr( OStringToOUString(
|
|
aEnv.getToken( i, ';' ), RTL_TEXTENCODING_ASCII_US ) );
|
|
OUString aUNC;
|
|
if (osl_File_E_None == ::osl_normalizePath( aStr.pData, &aUNC.pData ))
|
|
{
|
|
s_v.push_back( aUNC );
|
|
}
|
|
}
|
|
#ifdef TRACE_CPLD
|
|
out( "> cpld: acknowledged following cpld path(s): \"" );
|
|
::std::vector< OUString >::const_iterator iPos( s_v.begin() );
|
|
while (iPos != s_v.end())
|
|
{
|
|
out( *iPos );
|
|
++iPos;
|
|
if (iPos != s_v.end())
|
|
out( ";" );
|
|
}
|
|
out( "\"\n" );
|
|
#endif
|
|
s_p = & s_v;
|
|
}
|
|
s_bInit = sal_True;
|
|
}
|
|
}
|
|
|
|
return s_p;
|
|
}
|
|
|
|
//==================================================================================================
|
|
static oslModule loadModule( const OUString & rLibName, sal_Int32 nMode )
|
|
{
|
|
#ifdef TRACE_CPLD
|
|
out( "> cpld trying to load module: \"" );
|
|
out( rLibName );
|
|
out( "\"\n" );
|
|
#endif
|
|
|
|
const ::std::vector< OUString > * pPath = getAccessDPath();
|
|
|
|
if (pPath)
|
|
{
|
|
for ( ::std::vector< OUString >::const_iterator iPos( pPath->begin() );
|
|
iPos != pPath->end(); ++iPos )
|
|
{
|
|
OUString aBaseDir( *iPos );
|
|
OUString aAbs;
|
|
|
|
if (rLibName.getLength() > 2 &&
|
|
rLibName.getStr()[0] == '/' &&
|
|
rLibName.getStr()[1] == '/') // absolute unc path given?
|
|
{
|
|
aAbs = rLibName;
|
|
#ifdef TRACE_CPLD
|
|
out( "> cpld takes path: \"" );
|
|
out( aAbs );
|
|
#endif
|
|
}
|
|
else
|
|
{
|
|
if (osl_File_E_None != ::osl_getAbsolutePath(
|
|
aBaseDir.pData, rLibName.pData, &aAbs.pData ))
|
|
{
|
|
continue;
|
|
}
|
|
#ifdef TRACE_CPLD
|
|
out( "> cpld found path: \"" );
|
|
out( aBaseDir );
|
|
out( "\" + \"" );
|
|
out( rLibName );
|
|
out( "\" => \"" );
|
|
out( aAbs );
|
|
#endif
|
|
}
|
|
|
|
if (0 == aAbs.indexOf( aBaseDir ) && // still part of it?
|
|
aBaseDir.getLength() < aAbs.getLength() &&
|
|
aAbs[ aBaseDir.getLength() -1 ] == '/') // dir boundary
|
|
{
|
|
// load from absolute path
|
|
oslModule lib = ::osl_loadModule( aAbs.pData, nMode );
|
|
#ifdef TRACE_CPLD
|
|
out( lib ? "\" ...loaded!\n" : "\" ...loading failed!\n" );
|
|
#endif
|
|
return lib;
|
|
}
|
|
#ifdef TRACE_CPLD
|
|
else
|
|
{
|
|
out( "\" ...does not match given path \"" );
|
|
out( aBaseDir );
|
|
out( "\".\n" );
|
|
}
|
|
#endif
|
|
}
|
|
return 0;
|
|
}
|
|
else
|
|
{
|
|
// no path set
|
|
return ::osl_loadModule( rLibName.pData, nMode );
|
|
}
|
|
}
|
|
|
|
#ifdef MACOSX
|
|
static OUString getMacSymbolName( const OUString & rLibName, const char * pSymName )
|
|
{
|
|
sal_Int32 nSlash = rLibName.lastIndexOf( (sal_Unicode)'/' );
|
|
sal_Int32 nStart = (nSlash >= 0 ? nSlash+1+3 : 3); // /.../libNAME.dylib.framework.so
|
|
sal_Int32 nEnd = rLibName.indexOf( (sal_Unicode)'.', nStart );
|
|
OSL_ASSERT( nEnd > nStart );
|
|
OUStringBuffer buf( 16 );
|
|
buf.append( rLibName.copy( nStart, nEnd - nStart ) );
|
|
buf.appendAscii( pSymName );
|
|
return buf.makeStringAndClear();
|
|
}
|
|
#endif
|
|
|
|
//*************************************************************************
|
|
Reference<XInterface> SAL_CALL DllComponentLoader::activate(
|
|
const OUString & rImplName, const OUString &, const OUString & rLibName,
|
|
const Reference< XRegistryKey > & xKey )
|
|
|
|
throw(CannotActivateFactoryException, RuntimeException)
|
|
{
|
|
Reference< XSingleServiceFactory > xRet;
|
|
OUString sMessage;
|
|
|
|
oslModule lib = loadModule( rLibName, SAL_LOADMODULE_LAZY | SAL_LOADMODULE_GLOBAL );
|
|
|
|
if (lib)
|
|
{
|
|
void * pSym;
|
|
|
|
// ========================= LATEST VERSION =========================
|
|
#ifdef MACOSX
|
|
OUString aGetEnvName( getMacSymbolName( rLibName, COMPONENT_GETENV ) );
|
|
#else
|
|
OUString aGetEnvName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_GETENV) );
|
|
#endif
|
|
if (pSym = osl_getSymbol( lib, aGetEnvName.pData ))
|
|
{
|
|
uno_Environment * pCurrentEnv = 0;
|
|
uno_Environment * pEnv = 0;
|
|
const sal_Char * pEnvTypeName = 0;
|
|
(*((component_getImplementationEnvironmentFunc)pSym))( &pEnvTypeName, &pEnv );
|
|
|
|
sal_Bool bNeedsMapping =
|
|
(pEnv || 0 != rtl_str_compare( pEnvTypeName, CPPU_CURRENT_LANGUAGE_BINDING_NAME ));
|
|
|
|
OUString aEnvTypeName( OUString::createFromAscii( pEnvTypeName ) );
|
|
|
|
if (bNeedsMapping)
|
|
{
|
|
if (! pEnv)
|
|
uno_getEnvironment( &pEnv, aEnvTypeName.pData, 0 );
|
|
if (pEnv)
|
|
{
|
|
OUString aCppEnvTypeName( RTL_CONSTASCII_USTRINGPARAM(CPPU_CURRENT_LANGUAGE_BINDING_NAME) );
|
|
uno_getEnvironment( &pCurrentEnv, aCppEnvTypeName.pData, 0 );
|
|
if (pCurrentEnv)
|
|
bNeedsMapping = (pEnv != pCurrentEnv);
|
|
}
|
|
}
|
|
|
|
#ifdef MACOSX
|
|
OUString aGetFactoryName( getMacSymbolName( rLibName, COMPONENT_GETFACTORY ) );
|
|
#else
|
|
OUString aGetFactoryName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_GETFACTORY) );
|
|
#endif
|
|
if (pSym = osl_getSymbol( lib, aGetFactoryName.pData ))
|
|
{
|
|
OString aImplName( OUStringToOString( rImplName, RTL_TEXTENCODING_ASCII_US ) );
|
|
|
|
if (bNeedsMapping)
|
|
{
|
|
if (pEnv && pCurrentEnv)
|
|
{
|
|
Mapping aCurrent2Env( pCurrentEnv, pEnv );
|
|
Mapping aEnv2Current( pEnv, pCurrentEnv );
|
|
|
|
if (aCurrent2Env.is() && aEnv2Current.is())
|
|
{
|
|
void * pSMgr = aCurrent2Env.mapInterface(
|
|
m_xSMgr.get(), ::getCppuType( (const Reference< XMultiServiceFactory > *)0 ) );
|
|
void * pKey = aCurrent2Env.mapInterface(
|
|
xKey.get(), ::getCppuType( (const Reference< XRegistryKey > *)0 ) );
|
|
|
|
void * pSSF = (*((component_getFactoryFunc)pSym))(
|
|
aImplName.getStr(), pSMgr, pKey );
|
|
|
|
if (pKey)
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pKey );
|
|
if (pSMgr)
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pSMgr );
|
|
|
|
if (pSSF)
|
|
{
|
|
XSingleServiceFactory * pRet = (XSingleServiceFactory *)
|
|
aEnv2Current.mapInterface(
|
|
pSSF, ::getCppuType( (const Reference< XSingleServiceFactory > *)0 ) );
|
|
if (pRet)
|
|
{
|
|
xRet = pRet;
|
|
pRet->release();
|
|
}
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pSSF );
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
XSingleServiceFactory * pRet = (XSingleServiceFactory *)
|
|
(*((component_getFactoryFunc)pSym))(
|
|
aImplName.getStr(), m_xSMgr.get(), xKey.get() );
|
|
if (pRet)
|
|
{
|
|
xRet = pRet;
|
|
pRet->release();
|
|
}
|
|
}
|
|
} else
|
|
{
|
|
sMessage = OUString::createFromAscii("symbol \"");
|
|
sMessage += aGetFactoryName;
|
|
sMessage += OUString::createFromAscii("\" could not be found in \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\"");
|
|
}
|
|
|
|
if (pEnv)
|
|
(*pEnv->release)( pEnv );
|
|
if (pCurrentEnv)
|
|
(*pCurrentEnv->release)( pCurrentEnv );
|
|
}
|
|
else
|
|
{
|
|
sMessage = OUString::createFromAscii("symbol \"");
|
|
sMessage += aGetEnvName;
|
|
sMessage += OUString::createFromAscii("\" could not be found in \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\"");
|
|
}
|
|
|
|
if (!xRet.is() && !sMessage.getLength())
|
|
{
|
|
sMessage = OUString::createFromAscii("got no factory from component \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\"!");
|
|
}
|
|
|
|
if (! xRet.is())
|
|
osl_unloadModule( lib );
|
|
} else
|
|
{
|
|
sMessage = OUString::createFromAscii("component library \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\" could not be loaded");
|
|
}
|
|
|
|
if (! xRet.is())
|
|
{
|
|
CannotActivateFactoryException e;
|
|
e.Message = OUString( RTL_CONSTASCII_USTRINGPARAM("component could not be activated: ") ) + sMessage;
|
|
throw e;
|
|
}
|
|
|
|
return xRet;
|
|
}
|
|
|
|
|
|
//*************************************************************************
|
|
sal_Bool SAL_CALL DllComponentLoader::writeRegistryInfo(
|
|
const Reference< XRegistryKey > & xKey, const OUString &, const OUString & rLibName )
|
|
|
|
throw(CannotRegisterImplementationException, RuntimeException)
|
|
{
|
|
sal_Bool bRet = sal_False;
|
|
OUString sMessage;
|
|
|
|
oslModule lib = loadModule( rLibName, SAL_LOADMODULE_LAZY | SAL_LOADMODULE_GLOBAL );
|
|
|
|
if (lib)
|
|
{
|
|
void * pSym;
|
|
|
|
// ========================= LATEST VERSION =========================
|
|
#ifdef MACOSX
|
|
OUString aGetEnvName( getMacSymbolName( rLibName, COMPONENT_GETENV ) );
|
|
#else
|
|
OUString aGetEnvName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_GETENV) );
|
|
#endif
|
|
if (pSym = osl_getSymbol( lib, aGetEnvName.pData ))
|
|
{
|
|
uno_Environment * pCurrentEnv = 0;
|
|
uno_Environment * pEnv = 0;
|
|
const sal_Char * pEnvTypeName = 0;
|
|
(*((component_getImplementationEnvironmentFunc)pSym))( &pEnvTypeName, &pEnv );
|
|
|
|
sal_Bool bNeedsMapping =
|
|
(pEnv || 0 != rtl_str_compare( pEnvTypeName, CPPU_CURRENT_LANGUAGE_BINDING_NAME ));
|
|
|
|
OUString aEnvTypeName( OUString::createFromAscii( pEnvTypeName ) );
|
|
|
|
if (bNeedsMapping)
|
|
{
|
|
if (! pEnv)
|
|
uno_getEnvironment( &pEnv, aEnvTypeName.pData, 0 );
|
|
if (pEnv)
|
|
{
|
|
OUString aCppEnvTypeName( RTL_CONSTASCII_USTRINGPARAM(CPPU_CURRENT_LANGUAGE_BINDING_NAME) );
|
|
uno_getEnvironment( &pCurrentEnv, aCppEnvTypeName.pData, 0 );
|
|
if (pCurrentEnv)
|
|
bNeedsMapping = (pEnv != pCurrentEnv);
|
|
}
|
|
}
|
|
|
|
#ifdef MACOSX
|
|
OUString aWriteInfoName( getMacSymbolName( rLibName, COMPONENT_WRITEINFO ) );
|
|
#else
|
|
OUString aWriteInfoName( RTL_CONSTASCII_USTRINGPARAM(COMPONENT_WRITEINFO) );
|
|
#endif
|
|
if (pSym = osl_getSymbol( lib, aWriteInfoName.pData ))
|
|
{
|
|
if (bNeedsMapping)
|
|
{
|
|
if (pEnv && pCurrentEnv)
|
|
{
|
|
Mapping aCurrent2Env( pCurrentEnv, pEnv );
|
|
if (aCurrent2Env.is())
|
|
{
|
|
void * pSMgr = aCurrent2Env.mapInterface(
|
|
m_xSMgr.get(), ::getCppuType( (const Reference< XMultiServiceFactory > *)0 ) );
|
|
void * pKey = aCurrent2Env.mapInterface(
|
|
xKey.get(), ::getCppuType( (const Reference< XRegistryKey > *)0 ) );
|
|
// key is mandatory
|
|
if (pKey)
|
|
{
|
|
bRet = (*((component_writeInfoFunc)pSym))( pSMgr, pKey );
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pKey );
|
|
}
|
|
|
|
if (pSMgr)
|
|
(*pEnv->pExtEnv->releaseInterface)( pEnv->pExtEnv, pSMgr );
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// key is mandatory
|
|
if (xKey.is())
|
|
bRet = (*((component_writeInfoFunc)pSym))( m_xSMgr.get(), xKey.get() );
|
|
}
|
|
} else
|
|
{
|
|
sMessage = OUString::createFromAscii("symbol \"");
|
|
sMessage += aWriteInfoName;
|
|
sMessage += OUString::createFromAscii("\" could not be found in \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\"");
|
|
}
|
|
|
|
if (pEnv)
|
|
(*pEnv->release)( pEnv );
|
|
if (pCurrentEnv)
|
|
(*pCurrentEnv->release)( pCurrentEnv );
|
|
}
|
|
else
|
|
{
|
|
sMessage = OUString::createFromAscii("symbol \"");
|
|
sMessage += aGetEnvName;
|
|
sMessage += OUString::createFromAscii("\" could not be found in \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\"");
|
|
}
|
|
|
|
if (!bRet && !sMessage.getLength())
|
|
{
|
|
sMessage = OUString::createFromAscii("calling symbol \"");
|
|
sMessage += OUString::createFromAscii( COMPONENT_WRITEINFO );
|
|
sMessage += OUString::createFromAscii("\" found in \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\" returned FALSE");
|
|
}
|
|
} else
|
|
{
|
|
sMessage = OUString::createFromAscii("component library \"");
|
|
sMessage += rLibName;
|
|
sMessage += OUString::createFromAscii("\" could not be loaded");
|
|
}
|
|
|
|
if (! bRet)
|
|
{
|
|
CannotRegisterImplementationException e;
|
|
e.Message = OUString( RTL_CONSTASCII_USTRINGPARAM("component could not be registered: ") ) + sMessage;
|
|
throw e;
|
|
}
|
|
|
|
return bRet;
|
|
}
|
|
|
|
|
|
//*************************************************************************
|
|
Reference<XInterface> SAL_CALL DllComponentLoader_CreateInstance( const Reference<XMultiServiceFactory> & rSMgr ) throw(Exception)
|
|
{
|
|
Reference<XInterface> xRet;
|
|
|
|
XImplementationLoader *pXLoader = (XImplementationLoader *)new DllComponentLoader(rSMgr);
|
|
|
|
if (pXLoader)
|
|
{
|
|
xRet = Reference<XInterface>::query(pXLoader);
|
|
}
|
|
|
|
return xRet;
|
|
}
|
|
|
|
}
|
|
|
|
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("/" IMPLNAME "/UNO/SERVICES") ) ) );
|
|
|
|
const Sequence< OUString > & rSNL =
|
|
::stoc_loader::DllComponentLoader::getSupportedServiceNames_Static();
|
|
const OUString * pArray = rSNL.getConstArray();
|
|
for ( sal_Int32 nPos = rSNL.getLength(); nPos--; )
|
|
xNewKey->createKey( pArray[nPos] );
|
|
|
|
return sal_True;
|
|
}
|
|
catch (InvalidRegistryException &)
|
|
{
|
|
OSL_ENSHURE( 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, IMPLNAME ) == 0)
|
|
{
|
|
Reference< XSingleServiceFactory > xFactory( createSingleFactory(
|
|
reinterpret_cast< XMultiServiceFactory * >( pServiceManager ),
|
|
OUString( RTL_CONSTASCII_USTRINGPARAM(IMPLNAME) ),
|
|
::stoc_loader::DllComponentLoader_CreateInstance,
|
|
::stoc_loader::DllComponentLoader::getSupportedServiceNames_Static() ) );
|
|
|
|
if (xFactory.is())
|
|
{
|
|
xFactory->acquire();
|
|
pRet = xFactory.get();
|
|
}
|
|
}
|
|
|
|
return pRet;
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|