1*61dff127SAndrew Rist /**************************************************************
2cdf0e10cSrcweir *
3*61dff127SAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one
4*61dff127SAndrew Rist * or more contributor license agreements. See the NOTICE file
5*61dff127SAndrew Rist * distributed with this work for additional information
6*61dff127SAndrew Rist * regarding copyright ownership. The ASF licenses this file
7*61dff127SAndrew Rist * to you under the Apache License, Version 2.0 (the
8*61dff127SAndrew Rist * "License"); you may not use this file except in compliance
9*61dff127SAndrew Rist * with the License. You may obtain a copy of the License at
10*61dff127SAndrew Rist *
11*61dff127SAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0
12*61dff127SAndrew Rist *
13*61dff127SAndrew Rist * Unless required by applicable law or agreed to in writing,
14*61dff127SAndrew Rist * software distributed under the License is distributed on an
15*61dff127SAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*61dff127SAndrew Rist * KIND, either express or implied. See the License for the
17*61dff127SAndrew Rist * specific language governing permissions and limitations
18*61dff127SAndrew Rist * under the License.
19*61dff127SAndrew Rist *
20*61dff127SAndrew Rist *************************************************************/
21*61dff127SAndrew Rist
22*61dff127SAndrew Rist
23cdf0e10cSrcweir
24cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove
25cdf0e10cSrcweir #include "precompiled_bridges.hxx"
26cdf0e10cSrcweir
27cdf0e10cSrcweir #include "component.hxx"
28cdf0e10cSrcweir
29cdf0e10cSrcweir #include "bridges/cpp_uno/shared/bridge.hxx"
30cdf0e10cSrcweir
31cdf0e10cSrcweir #include "com/sun/star/uno/Reference.hxx"
32cdf0e10cSrcweir #include "com/sun/star/uno/RuntimeException.hpp"
33cdf0e10cSrcweir #include "com/sun/star/uno/XInterface.hpp"
34cdf0e10cSrcweir #include "osl/diagnose.h"
35cdf0e10cSrcweir #include "osl/mutex.hxx"
36cdf0e10cSrcweir #include "osl/time.h"
37cdf0e10cSrcweir #include "rtl/process.h"
38cdf0e10cSrcweir #include "rtl/unload.h"
39cdf0e10cSrcweir #include "rtl/ustrbuf.hxx"
40cdf0e10cSrcweir #include "rtl/ustring.h"
41cdf0e10cSrcweir #include "rtl/ustring.hxx"
42cdf0e10cSrcweir #include "sal/types.h"
43cdf0e10cSrcweir #include "uno/environment.h"
44cdf0e10cSrcweir #include "uno/lbnames.h"
45cdf0e10cSrcweir #include "uno/mapping.h"
46cdf0e10cSrcweir #include "cppu/EnvDcp.hxx"
47cdf0e10cSrcweir
48cdf0e10cSrcweir namespace bridges { namespace cpp_uno { namespace shared {
49cdf0e10cSrcweir
50cdf0e10cSrcweir rtl_StandardModuleCount g_moduleCount = MODULE_COUNT_INIT;
51cdf0e10cSrcweir
52cdf0e10cSrcweir } } }
53cdf0e10cSrcweir
54cdf0e10cSrcweir namespace {
55cdf0e10cSrcweir
56cdf0e10cSrcweir #if (defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
57cdf0e10cSrcweir || (defined(__GNUC__) && defined(__APPLE__))
58cdf0e10cSrcweir static ::rtl::OUString * s_pStaticOidPart = 0;
59cdf0e10cSrcweir #endif
60cdf0e10cSrcweir
cppu_cppenv_getStaticOIdPart()61cdf0e10cSrcweir const ::rtl::OUString & SAL_CALL cppu_cppenv_getStaticOIdPart() SAL_THROW( () )
62cdf0e10cSrcweir {
63cdf0e10cSrcweir #if ! ((defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
64cdf0e10cSrcweir || (defined(__GNUC__) && defined(__APPLE__)))
65cdf0e10cSrcweir static ::rtl::OUString * s_pStaticOidPart = 0;
66cdf0e10cSrcweir #endif
67cdf0e10cSrcweir if (! s_pStaticOidPart)
68cdf0e10cSrcweir {
69cdf0e10cSrcweir ::osl::MutexGuard aGuard( ::osl::Mutex::getGlobalMutex() );
70cdf0e10cSrcweir if (! s_pStaticOidPart)
71cdf0e10cSrcweir {
72cdf0e10cSrcweir ::rtl::OUStringBuffer aRet( 64 );
73cdf0e10cSrcweir aRet.appendAscii( RTL_CONSTASCII_STRINGPARAM("];") );
74cdf0e10cSrcweir // good guid
75cdf0e10cSrcweir sal_uInt8 ar[16];
76cdf0e10cSrcweir ::rtl_getGlobalProcessId( ar );
77cdf0e10cSrcweir for ( sal_Int32 i = 0; i < 16; ++i )
78cdf0e10cSrcweir {
79cdf0e10cSrcweir aRet.append( (sal_Int32)ar[i], 16 );
80cdf0e10cSrcweir }
81cdf0e10cSrcweir #if (defined(__SUNPRO_CC) && (__SUNPRO_CC == 0x500)) \
82cdf0e10cSrcweir || (defined(__GNUC__) && defined(__APPLE__))
83cdf0e10cSrcweir s_pStaticOidPart = new ::rtl::OUString( aRet.makeStringAndClear() );
84cdf0e10cSrcweir #else
85cdf0e10cSrcweir static ::rtl::OUString s_aStaticOidPart(
86cdf0e10cSrcweir aRet.makeStringAndClear() );
87cdf0e10cSrcweir s_pStaticOidPart = &s_aStaticOidPart;
88cdf0e10cSrcweir #endif
89cdf0e10cSrcweir }
90cdf0e10cSrcweir }
91cdf0e10cSrcweir return *s_pStaticOidPart;
92cdf0e10cSrcweir }
93cdf0e10cSrcweir
94cdf0e10cSrcweir }
95cdf0e10cSrcweir
96cdf0e10cSrcweir extern "C" {
97cdf0e10cSrcweir
s_stub_computeObjectIdentifier(va_list * pParam)98cdf0e10cSrcweir static void s_stub_computeObjectIdentifier(va_list * pParam)
99cdf0e10cSrcweir SAL_THROW( () )
100cdf0e10cSrcweir {
101cdf0e10cSrcweir uno_ExtEnvironment * pEnv = va_arg(*pParam, uno_ExtEnvironment *);
102cdf0e10cSrcweir rtl_uString ** ppOId = va_arg(*pParam, rtl_uString **);
103cdf0e10cSrcweir void * pInterface = va_arg(*pParam, void *);
104cdf0e10cSrcweir
105cdf0e10cSrcweir
106cdf0e10cSrcweir OSL_ENSURE( pEnv && ppOId && pInterface, "### null ptr!" );
107cdf0e10cSrcweir if (pEnv && ppOId && pInterface)
108cdf0e10cSrcweir {
109cdf0e10cSrcweir if (*ppOId)
110cdf0e10cSrcweir {
111cdf0e10cSrcweir rtl_uString_release( *ppOId );
112cdf0e10cSrcweir *ppOId = 0;
113cdf0e10cSrcweir }
114cdf0e10cSrcweir
115cdf0e10cSrcweir try
116cdf0e10cSrcweir {
117cdf0e10cSrcweir ::com::sun::star::uno::Reference<
118cdf0e10cSrcweir ::com::sun::star::uno::XInterface > xHome(
119cdf0e10cSrcweir reinterpret_cast< ::com::sun::star::uno::XInterface * >(
120cdf0e10cSrcweir pInterface ),
121cdf0e10cSrcweir ::com::sun::star::uno::UNO_QUERY );
122cdf0e10cSrcweir OSL_ENSURE( xHome.is(), "### query to XInterface failed!" );
123cdf0e10cSrcweir if (xHome.is())
124cdf0e10cSrcweir {
125cdf0e10cSrcweir // interface
126cdf0e10cSrcweir ::rtl::OUStringBuffer oid( 64 );
127cdf0e10cSrcweir oid.append( reinterpret_cast< sal_Int64 >(xHome.get()), 16 );
128cdf0e10cSrcweir oid.append( (sal_Unicode)';' );
129cdf0e10cSrcweir // ;environment[context]
130cdf0e10cSrcweir oid.append(
131cdf0e10cSrcweir *reinterpret_cast< ::rtl::OUString const * >(
132cdf0e10cSrcweir &((uno_Environment *) pEnv)->pTypeName ) );
133cdf0e10cSrcweir oid.append( (sal_Unicode)'[' );
134cdf0e10cSrcweir oid.append(
135cdf0e10cSrcweir reinterpret_cast< sal_Int64 >(
136cdf0e10cSrcweir ((uno_Environment *)pEnv)->pContext),
137cdf0e10cSrcweir 16 );
138cdf0e10cSrcweir // ];good guid
139cdf0e10cSrcweir oid.append( cppu_cppenv_getStaticOIdPart() );
140cdf0e10cSrcweir ::rtl::OUString aRet( oid.makeStringAndClear() );
141cdf0e10cSrcweir ::rtl_uString_acquire( *ppOId = aRet.pData );
142cdf0e10cSrcweir }
143cdf0e10cSrcweir }
144cdf0e10cSrcweir catch (::com::sun::star::uno::RuntimeException &)
145cdf0e10cSrcweir {
146cdf0e10cSrcweir OSL_ENSURE(
147cdf0e10cSrcweir 0, "### RuntimeException occured udring queryInterface()!" );
148cdf0e10cSrcweir }
149cdf0e10cSrcweir }
150cdf0e10cSrcweir }
151cdf0e10cSrcweir
computeObjectIdentifier(uno_ExtEnvironment * pExtEnv,rtl_uString ** ppOId,void * pInterface)152cdf0e10cSrcweir static void SAL_CALL computeObjectIdentifier(
153cdf0e10cSrcweir uno_ExtEnvironment * pExtEnv, rtl_uString ** ppOId, void * pInterface )
154cdf0e10cSrcweir SAL_THROW( () )
155cdf0e10cSrcweir {
156cdf0e10cSrcweir uno_Environment_invoke(&pExtEnv->aBase, s_stub_computeObjectIdentifier, pExtEnv, ppOId, pInterface);
157cdf0e10cSrcweir }
158cdf0e10cSrcweir
s_stub_acquireInterface(va_list * pParam)159cdf0e10cSrcweir static void s_stub_acquireInterface(va_list * pParam)
160cdf0e10cSrcweir SAL_THROW( () )
161cdf0e10cSrcweir {
162cdf0e10cSrcweir /*uno_ExtEnvironment * pExtEnv = */va_arg(*pParam, uno_ExtEnvironment *);
163cdf0e10cSrcweir void * pCppI = va_arg(*pParam, void *);
164cdf0e10cSrcweir
165cdf0e10cSrcweir reinterpret_cast< ::com::sun::star::uno::XInterface * >( pCppI )->acquire();
166cdf0e10cSrcweir }
167cdf0e10cSrcweir
acquireInterface(uno_ExtEnvironment * pExtEnv,void * pCppI)168cdf0e10cSrcweir static void SAL_CALL acquireInterface( uno_ExtEnvironment * pExtEnv, void * pCppI )
169cdf0e10cSrcweir SAL_THROW( () )
170cdf0e10cSrcweir {
171cdf0e10cSrcweir uno_Environment_invoke(&pExtEnv->aBase, s_stub_acquireInterface, pExtEnv, pCppI);
172cdf0e10cSrcweir }
173cdf0e10cSrcweir
s_stub_releaseInterface(va_list * pParam)174cdf0e10cSrcweir static void s_stub_releaseInterface(va_list * pParam)
175cdf0e10cSrcweir SAL_THROW( () )
176cdf0e10cSrcweir {
177cdf0e10cSrcweir /*uno_ExtEnvironment * pExtEnv = */va_arg(*pParam, uno_ExtEnvironment *);
178cdf0e10cSrcweir void * pCppI = va_arg(*pParam, void *);
179cdf0e10cSrcweir
180cdf0e10cSrcweir reinterpret_cast< ::com::sun::star::uno::XInterface * >( pCppI )->release();
181cdf0e10cSrcweir }
182cdf0e10cSrcweir
releaseInterface(uno_ExtEnvironment * pExtEnv,void * pCppI)183cdf0e10cSrcweir static void SAL_CALL releaseInterface( uno_ExtEnvironment * pExtEnv, void * pCppI )
184cdf0e10cSrcweir SAL_THROW( () )
185cdf0e10cSrcweir {
186cdf0e10cSrcweir uno_Environment_invoke(&pExtEnv->aBase, s_stub_releaseInterface, pExtEnv, pCppI);
187cdf0e10cSrcweir }
188cdf0e10cSrcweir
environmentDisposing(uno_Environment *)189cdf0e10cSrcweir static void SAL_CALL environmentDisposing( uno_Environment * ) SAL_THROW( () )
190cdf0e10cSrcweir {
191cdf0e10cSrcweir bridges::cpp_uno::shared::g_moduleCount.modCnt.release(
192cdf0e10cSrcweir &bridges::cpp_uno::shared::g_moduleCount.modCnt );
193cdf0e10cSrcweir }
194cdf0e10cSrcweir
component_canUnload(TimeValue * pTime)195cdf0e10cSrcweir sal_Bool SAL_CALL component_canUnload(TimeValue * pTime) SAL_THROW_EXTERN_C() {
196cdf0e10cSrcweir return bridges::cpp_uno::shared::g_moduleCount.canUnload(
197cdf0e10cSrcweir &bridges::cpp_uno::shared::g_moduleCount, pTime);
198cdf0e10cSrcweir }
199cdf0e10cSrcweir
uno_initEnvironment(uno_Environment * pCppEnv)200cdf0e10cSrcweir void SAL_CALL uno_initEnvironment(uno_Environment * pCppEnv)
201cdf0e10cSrcweir SAL_THROW_EXTERN_C()
202cdf0e10cSrcweir {
203cdf0e10cSrcweir OSL_ENSURE( pCppEnv->pExtEnv, "### expected extended environment!" );
204cdf0e10cSrcweir OSL_ENSURE(
205cdf0e10cSrcweir ::rtl_ustr_ascii_compare_WithLength(
206cdf0e10cSrcweir pCppEnv->pTypeName->buffer, rtl_str_getLength(CPPU_CURRENT_LANGUAGE_BINDING_NAME), CPPU_CURRENT_LANGUAGE_BINDING_NAME )
207cdf0e10cSrcweir == 0,
208cdf0e10cSrcweir "### wrong environment type!" );
209cdf0e10cSrcweir bridges::cpp_uno::shared::g_moduleCount.modCnt.acquire(
210cdf0e10cSrcweir &bridges::cpp_uno::shared::g_moduleCount.modCnt );
211cdf0e10cSrcweir ((uno_ExtEnvironment *)pCppEnv)->computeObjectIdentifier
212cdf0e10cSrcweir = computeObjectIdentifier;
213cdf0e10cSrcweir ((uno_ExtEnvironment *)pCppEnv)->acquireInterface = acquireInterface;
214cdf0e10cSrcweir ((uno_ExtEnvironment *)pCppEnv)->releaseInterface = releaseInterface;
215cdf0e10cSrcweir pCppEnv->environmentDisposing = environmentDisposing;
216cdf0e10cSrcweir }
217cdf0e10cSrcweir
uno_ext_getMapping(uno_Mapping ** ppMapping,uno_Environment * pFrom,uno_Environment * pTo)218cdf0e10cSrcweir void SAL_CALL uno_ext_getMapping(
219cdf0e10cSrcweir uno_Mapping ** ppMapping, uno_Environment * pFrom, uno_Environment * pTo)
220cdf0e10cSrcweir SAL_THROW_EXTERN_C()
221cdf0e10cSrcweir {
222cdf0e10cSrcweir OSL_ASSERT( ppMapping && pFrom && pTo );
223cdf0e10cSrcweir if (ppMapping && pFrom && pTo && pFrom->pExtEnv && pTo->pExtEnv)
224cdf0e10cSrcweir {
225cdf0e10cSrcweir uno_Mapping * pMapping = 0;
226cdf0e10cSrcweir
227cdf0e10cSrcweir rtl::OUString from_envTypeName(cppu::EnvDcp::getTypeName(pFrom->pTypeName));
228cdf0e10cSrcweir rtl::OUString to_envTypeName(cppu::EnvDcp::getTypeName(pTo->pTypeName));
229cdf0e10cSrcweir
230cdf0e10cSrcweir if (0 == rtl_ustr_ascii_compare(
231cdf0e10cSrcweir from_envTypeName.pData->buffer,
232cdf0e10cSrcweir CPPU_CURRENT_LANGUAGE_BINDING_NAME ) &&
233cdf0e10cSrcweir 0 == rtl_ustr_ascii_compare(
234cdf0e10cSrcweir to_envTypeName.pData->buffer, UNO_LB_UNO ))
235cdf0e10cSrcweir {
236cdf0e10cSrcweir // ref count initially 1
237cdf0e10cSrcweir pMapping = bridges::cpp_uno::shared::Bridge::createMapping(
238cdf0e10cSrcweir pFrom->pExtEnv, pTo->pExtEnv, sal_True );
239cdf0e10cSrcweir ::uno_registerMapping(
240cdf0e10cSrcweir &pMapping, bridges::cpp_uno::shared::freeMapping,
241cdf0e10cSrcweir (uno_Environment *)pFrom->pExtEnv,
242cdf0e10cSrcweir (uno_Environment *)pTo->pExtEnv, 0 );
243cdf0e10cSrcweir }
244cdf0e10cSrcweir else if (0 == rtl_ustr_ascii_compare(
245cdf0e10cSrcweir to_envTypeName.pData->buffer,
246cdf0e10cSrcweir CPPU_CURRENT_LANGUAGE_BINDING_NAME ) &&
247cdf0e10cSrcweir 0 == rtl_ustr_ascii_compare(
248cdf0e10cSrcweir from_envTypeName.pData->buffer, UNO_LB_UNO ))
249cdf0e10cSrcweir {
250cdf0e10cSrcweir // ref count initially 1
251cdf0e10cSrcweir pMapping = bridges::cpp_uno::shared::Bridge::createMapping(
252cdf0e10cSrcweir pTo->pExtEnv, pFrom->pExtEnv, sal_False );
253cdf0e10cSrcweir ::uno_registerMapping(
254cdf0e10cSrcweir &pMapping, bridges::cpp_uno::shared::freeMapping,
255cdf0e10cSrcweir (uno_Environment *)pFrom->pExtEnv,
256cdf0e10cSrcweir (uno_Environment *)pTo->pExtEnv, 0 );
257cdf0e10cSrcweir }
258cdf0e10cSrcweir
259cdf0e10cSrcweir if (*ppMapping)
260cdf0e10cSrcweir {
261cdf0e10cSrcweir (*(*ppMapping)->release)( *ppMapping );
262cdf0e10cSrcweir }
263cdf0e10cSrcweir if (pMapping)
264cdf0e10cSrcweir *ppMapping = pMapping;
265cdf0e10cSrcweir }
266cdf0e10cSrcweir }
267cdf0e10cSrcweir
268cdf0e10cSrcweir }
269