bridges/source/cpp_uno/shared/component.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: component.cxx,v $
  10  * $Revision: 1.8 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_bridges.hxx"
  33
  34 #include "component.hxx"
  35
  36 #include "bridges/cpp_uno/shared/bridge.hxx"
  37
  38 #include "com/sun/star/uno/Reference.hxx"
  39 #include "com/sun/star/uno/RuntimeException.hpp"
  40 #include "com/sun/star/uno/XInterface.hpp"
  41 #include "osl/diagnose.h"
  42 #include "osl/mutex.hxx"
  43 #include "osl/time.h"
  44 #include "rtl/process.h"
  45 #include "rtl/unload.h"
  46 #include "rtl/ustrbuf.hxx"
  47 #include "rtl/ustring.h"
  48 #include "rtl/ustring.hxx"
  49 #include "sal/types.h"
  50 #include "uno/environment.h"
  51 #include "uno/lbnames.h"
  52 #include "uno/mapping.h"
  53 #include "cppu/EnvDcp.hxx"
  54
  55 namespace bridges { namespace cpp_uno { namespace shared {
  56
  57 rtl_StandardModuleCount g_moduleCount = MODULE_COUNT_INIT;
  58
  59 } } }
  60
  61 namespace {
  62
  63 #if (defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
  64     || (defined(__GNUC__) && defined(__APPLE__))
  65 static ::rtl::OUString * s_pStaticOidPart = 0;
  66 #endif
  67
  68 const ::rtl::OUString & SAL_CALL cppu_cppenv_getStaticOIdPart() SAL_THROW( () )
  69 {
  70 #if ! ((defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
  71     || (defined(__GNUC__) && defined(__APPLE__)))
  72     static ::rtl::OUString * s_pStaticOidPart = 0;
  73 #endif
  74     if (! s_pStaticOidPart)
  75     {
  76         ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
  77         if (! s_pStaticOidPart)
  78         {
  79             ::rtl::OUStringBuffer aRet( 64 );
  80             aRet.appendAscii( RTL_CONSTASCII_STRINGPARAM("];") );
  81             // good guid
  82             sal_uInt8 ar[16];
  83             ::rtl_getGlobalProcessId( ar );
  84             for ( sal_Int32 i = 0; i < 16; ++i )
  85             {
  86                 aRet.append( (sal_Int32)ar[i], 16 );
  87             }
  88 #if (defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
  89     || (defined(__GNUC__) && defined(__APPLE__))
  90             s_pStaticOidPart = new ::rtl::OUString( aRet.makeStringAndClear() );
  91 #else
  92             static ::rtl::OUString s_aStaticOidPart(
  93                 aRet.makeStringAndClear() );
  94             s_pStaticOidPart = &s_aStaticOidPart;
  95 #endif
  96         }
  97     }
  98     return *s_pStaticOidPart;
  99 }
 100
 101 }
 102
 103 extern "C" {
 104
 105 static void s_stub_computeObjectIdentifier(va_list * pParam)
 106     SAL_THROW( () )
 107 {
 108     uno_ExtEnvironment  * pEnv       = va_arg(*pParam, uno_ExtEnvironment *);
 109     rtl_uString        ** ppOId      = va_arg(*pParam, rtl_uString **);
 110     void                * pInterface = va_arg(*pParam, void *);
 111
 112
 113     OSL_ENSURE( pEnv && ppOId && pInterface, "### null ptr!" );
 114     if (pEnv && ppOId && pInterface)
 115     {
 116         if (*ppOId)
 117         {
 118             rtl_uString_release( *ppOId );
 119             *ppOId = 0;
 120         }
 121
 122         try
 123         {
 124             ::com::sun::star::uno::Reference<
 125                   ::com::sun::star::uno::XInterface > xHome(
 126                       reinterpret_cast< ::com::sun::star::uno::XInterface * >(
 127                           pInterface ),
 128                       ::com::sun::star::uno::UNO_QUERY );
 129             OSL_ENSURE( xHome.is(), "### query to XInterface failed!" );
 130             if (xHome.is())
 131             {
 132                 // interface
 133                 ::rtl::OUStringBuffer oid( 64 );
 134                 oid.append( reinterpret_cast< sal_Int64 >(xHome.get()), 16 );
 135                 oid.append( (sal_Unicode)';' );
 136                 // ;environment[context]
 137                 oid.append(
 138                     *reinterpret_cast< ::rtl::OUString const * >(
 139                         &((uno_Environment *) pEnv)->pTypeName ) );
 140                 oid.append( (sal_Unicode)'[' );
 141                 oid.append(
 142                     reinterpret_cast< sal_Int64 >(
 143                         ((uno_Environment *)pEnv)->pContext),
 144                     16 );
 145                 // ];good guid
 146                 oid.append( cppu_cppenv_getStaticOIdPart() );
 147                 ::rtl::OUString aRet( oid.makeStringAndClear() );
 148                 ::rtl_uString_acquire( *ppOId = aRet.pData );
 149             }
 150         }
 151         catch (::com::sun::star::uno::RuntimeException &)
 152         {
 153             OSL_ENSURE(
 154                 0, "### RuntimeException occured udring queryInterface()!" );
 155         }
 156     }
 157 }
 158
 159 static void SAL_CALL computeObjectIdentifier(
 160     uno_ExtEnvironment * pExtEnv, rtl_uString ** ppOId, void * pInterface )
 161     SAL_THROW( () )
 162 {
 163     uno_Environment_invoke(&pExtEnv->aBase, s_stub_computeObjectIdentifier, pExtEnv, ppOId, pInterface);
 164 }
 165
 166 static void s_stub_acquireInterface(va_list * pParam)
 167     SAL_THROW( () )
 168 {
 169     /*uno_ExtEnvironment * pExtEnv = */va_arg(*pParam, uno_ExtEnvironment *);
 170     void               * pCppI   = va_arg(*pParam, void *);
 171
 172     reinterpret_cast< ::com::sun::star::uno::XInterface * >( pCppI )->acquire();
 173 }
 174
 175 static void SAL_CALL acquireInterface( uno_ExtEnvironment * pExtEnv, void * pCppI )
 176     SAL_THROW( () )
 177 {
 178     uno_Environment_invoke(&pExtEnv->aBase, s_stub_acquireInterface, pExtEnv, pCppI);
 179 }
 180
 181 static void s_stub_releaseInterface(va_list * pParam)
 182     SAL_THROW( () )
 183 {
 184     /*uno_ExtEnvironment * pExtEnv = */va_arg(*pParam, uno_ExtEnvironment *);
 185     void               * pCppI   = va_arg(*pParam, void *);
 186
 187     reinterpret_cast< ::com::sun::star::uno::XInterface * >( pCppI )->release();
 188 }
 189
 190 static void SAL_CALL releaseInterface( uno_ExtEnvironment * pExtEnv, void * pCppI )
 191     SAL_THROW( () )
 192 {
 193     uno_Environment_invoke(&pExtEnv->aBase, s_stub_releaseInterface, pExtEnv, pCppI);
 194 }
 195
 196 static void SAL_CALL environmentDisposing( uno_Environment * ) SAL_THROW( () )
 197 {
 198     bridges::cpp_uno::shared::g_moduleCount.modCnt.release(
 199         &bridges::cpp_uno::shared::g_moduleCount.modCnt );
 200 }
 201
 202 sal_Bool SAL_CALL component_canUnload(TimeValue * pTime) SAL_THROW_EXTERN_C() {
 203     return bridges::cpp_uno::shared::g_moduleCount.canUnload(
 204         &bridges::cpp_uno::shared::g_moduleCount, pTime);
 205 }
 206
 207 void SAL_CALL uno_initEnvironment(uno_Environment * pCppEnv)
 208     SAL_THROW_EXTERN_C()
 209 {
 210     OSL_ENSURE( pCppEnv->pExtEnv, "### expected extended environment!" );
 211     OSL_ENSURE(
 212         ::rtl_ustr_ascii_compare_WithLength(
 213              pCppEnv->pTypeName->buffer, rtl_str_getLength(CPPU_CURRENT_LANGUAGE_BINDING_NAME), CPPU_CURRENT_LANGUAGE_BINDING_NAME )
 214         == 0,
 215         "### wrong environment type!" );
 216     bridges::cpp_uno::shared::g_moduleCount.modCnt.acquire(
 217         &bridges::cpp_uno::shared::g_moduleCount.modCnt );
 218     ((uno_ExtEnvironment *)pCppEnv)->computeObjectIdentifier
 219         = computeObjectIdentifier;
 220     ((uno_ExtEnvironment *)pCppEnv)->acquireInterface = acquireInterface;
 221     ((uno_ExtEnvironment *)pCppEnv)->releaseInterface = releaseInterface;
 222     pCppEnv->environmentDisposing = environmentDisposing;
 223 }
 224
 225 void SAL_CALL uno_ext_getMapping(
 226     uno_Mapping ** ppMapping, uno_Environment * pFrom, uno_Environment * pTo)
 227     SAL_THROW_EXTERN_C()
 228 {
 229     OSL_ASSERT( ppMapping && pFrom && pTo );
 230     if (ppMapping && pFrom && pTo && pFrom->pExtEnv && pTo->pExtEnv)
 231     {
 232         uno_Mapping * pMapping = 0;
 233
 234         rtl::OUString from_envTypeName(cppu::EnvDcp::getTypeName(pFrom->pTypeName));
 235         rtl::OUString to_envTypeName(cppu::EnvDcp::getTypeName(pTo->pTypeName));
 236
 237         if (0 == rtl_ustr_ascii_compare(
 238                 from_envTypeName.pData->buffer,
 239                 CPPU_CURRENT_LANGUAGE_BINDING_NAME ) &&
 240             0 == rtl_ustr_ascii_compare(
 241                 to_envTypeName.pData->buffer, UNO_LB_UNO ))
 242         {
 243             // ref count initially 1
 244             pMapping = bridges::cpp_uno::shared::Bridge::createMapping(
 245                 pFrom->pExtEnv, pTo->pExtEnv, sal_True );
 246             ::uno_registerMapping(
 247                 &pMapping, bridges::cpp_uno::shared::freeMapping,
 248                 (uno_Environment *)pFrom->pExtEnv,
 249                 (uno_Environment *)pTo->pExtEnv, 0 );
 250         }
 251         else if (0 == rtl_ustr_ascii_compare(
 252                      to_envTypeName.pData->buffer,
 253                      CPPU_CURRENT_LANGUAGE_BINDING_NAME ) &&
 254                  0 == rtl_ustr_ascii_compare(
 255                      from_envTypeName.pData->buffer, UNO_LB_UNO ))
 256         {
 257             // ref count initially 1
 258             pMapping = bridges::cpp_uno::shared::Bridge::createMapping(
 259                 pTo->pExtEnv, pFrom->pExtEnv, sal_False );
 260             ::uno_registerMapping(
 261                 &pMapping, bridges::cpp_uno::shared::freeMapping,
 262                 (uno_Environment *)pFrom->pExtEnv,
 263                 (uno_Environment *)pTo->pExtEnv, 0 );
 264         }
 265
 266         if (*ppMapping)
 267         {
 268             (*(*ppMapping)->release)( *ppMapping );
 269         }
 270         if (pMapping)
 271         *ppMapping = pMapping;
 272     }
 273 }
 274
 275 }