1*b1cdbd2cSJim Jagielski /**************************************************************
2*b1cdbd2cSJim Jagielski *
3*b1cdbd2cSJim Jagielski * Licensed to the Apache Software Foundation (ASF) under one
4*b1cdbd2cSJim Jagielski * or more contributor license agreements. See the NOTICE file
5*b1cdbd2cSJim Jagielski * distributed with this work for additional information
6*b1cdbd2cSJim Jagielski * regarding copyright ownership. The ASF licenses this file
7*b1cdbd2cSJim Jagielski * to you under the Apache License, Version 2.0 (the
8*b1cdbd2cSJim Jagielski * "License"); you may not use this file except in compliance
9*b1cdbd2cSJim Jagielski * with the License. You may obtain a copy of the License at
10*b1cdbd2cSJim Jagielski *
11*b1cdbd2cSJim Jagielski * http://www.apache.org/licenses/LICENSE-2.0
12*b1cdbd2cSJim Jagielski *
13*b1cdbd2cSJim Jagielski * Unless required by applicable law or agreed to in writing,
14*b1cdbd2cSJim Jagielski * software distributed under the License is distributed on an
15*b1cdbd2cSJim Jagielski * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*b1cdbd2cSJim Jagielski * KIND, either express or implied. See the License for the
17*b1cdbd2cSJim Jagielski * specific language governing permissions and limitations
18*b1cdbd2cSJim Jagielski * under the License.
19*b1cdbd2cSJim Jagielski *
20*b1cdbd2cSJim Jagielski *************************************************************/
21*b1cdbd2cSJim Jagielski
22*b1cdbd2cSJim Jagielski
23*b1cdbd2cSJim Jagielski
24*b1cdbd2cSJim Jagielski // MARKER(update_precomp.py): autogen include statement, do not remove
25*b1cdbd2cSJim Jagielski #include "precompiled_bridges.hxx"
26*b1cdbd2cSJim Jagielski
27*b1cdbd2cSJim Jagielski #include <stdio.h>
28*b1cdbd2cSJim Jagielski #include <stdlib.h>
29*b1cdbd2cSJim Jagielski #include <hash_map>
30*b1cdbd2cSJim Jagielski
31*b1cdbd2cSJim Jagielski #include <rtl/alloc.h>
32*b1cdbd2cSJim Jagielski #include <osl/mutex.hxx>
33*b1cdbd2cSJim Jagielski
34*b1cdbd2cSJim Jagielski #include <com/sun/star/uno/genfunc.hxx>
35*b1cdbd2cSJim Jagielski #include "com/sun/star/uno/RuntimeException.hpp"
36*b1cdbd2cSJim Jagielski #include <uno/data.h>
37*b1cdbd2cSJim Jagielski #include <typelib/typedescription.hxx>
38*b1cdbd2cSJim Jagielski
39*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/bridge.hxx"
40*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/cppinterfaceproxy.hxx"
41*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/types.hxx"
42*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/vtablefactory.hxx"
43*b1cdbd2cSJim Jagielski
44*b1cdbd2cSJim Jagielski #include "abi.hxx"
45*b1cdbd2cSJim Jagielski #include "share.hxx"
46*b1cdbd2cSJim Jagielski
47*b1cdbd2cSJim Jagielski using namespace ::osl;
48*b1cdbd2cSJim Jagielski using namespace ::rtl;
49*b1cdbd2cSJim Jagielski using namespace ::com::sun::star::uno;
50*b1cdbd2cSJim Jagielski
51*b1cdbd2cSJim Jagielski //==================================================================================================
52*b1cdbd2cSJim Jagielski
53*b1cdbd2cSJim Jagielski // Perform the UNO call
54*b1cdbd2cSJim Jagielski //
55*b1cdbd2cSJim Jagielski // We must convert the paramaters stored in gpreg, fpreg and ovrflw to UNO
56*b1cdbd2cSJim Jagielski // arguments and call pThis->getUnoI()->pDispatcher.
57*b1cdbd2cSJim Jagielski //
58*b1cdbd2cSJim Jagielski // gpreg: [ret *], this, [gpr params]
59*b1cdbd2cSJim Jagielski // fpreg: [fpr params]
60*b1cdbd2cSJim Jagielski // ovrflw: [gpr or fpr params (properly aligned)]
61*b1cdbd2cSJim Jagielski //
62*b1cdbd2cSJim Jagielski // [ret *] is present when we are returning a structure bigger than 16 bytes
63*b1cdbd2cSJim Jagielski // Simple types are returned in rax, rdx (int), or xmm0, xmm1 (fp).
64*b1cdbd2cSJim Jagielski // Similarly structures <= 16 bytes are in rax, rdx, xmm0, xmm1 as necessary.
cpp2uno_call(bridges::cpp_uno::shared::CppInterfaceProxy * pThis,const typelib_TypeDescription * pMemberTypeDescr,typelib_TypeDescriptionReference * pReturnTypeRef,sal_Int32 nParams,typelib_MethodParameter * pParams,void ** gpreg,void ** fpreg,void ** ovrflw,sal_uInt64 * pRegisterReturn)65*b1cdbd2cSJim Jagielski static typelib_TypeClass cpp2uno_call(
66*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::CppInterfaceProxy * pThis,
67*b1cdbd2cSJim Jagielski const typelib_TypeDescription * pMemberTypeDescr,
68*b1cdbd2cSJim Jagielski typelib_TypeDescriptionReference * pReturnTypeRef, // 0 indicates void return
69*b1cdbd2cSJim Jagielski sal_Int32 nParams, typelib_MethodParameter * pParams,
70*b1cdbd2cSJim Jagielski void ** gpreg, void ** fpreg, void ** ovrflw,
71*b1cdbd2cSJim Jagielski sal_uInt64 * pRegisterReturn /* space for register return */ )
72*b1cdbd2cSJim Jagielski {
73*b1cdbd2cSJim Jagielski unsigned int nr_gpr = 0; //number of gpr registers used
74*b1cdbd2cSJim Jagielski unsigned int nr_fpr = 0; //number of fpr registers used
75*b1cdbd2cSJim Jagielski
76*b1cdbd2cSJim Jagielski // return
77*b1cdbd2cSJim Jagielski typelib_TypeDescription * pReturnTypeDescr = 0;
78*b1cdbd2cSJim Jagielski if (pReturnTypeRef)
79*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pReturnTypeDescr, pReturnTypeRef );
80*b1cdbd2cSJim Jagielski
81*b1cdbd2cSJim Jagielski void * pUnoReturn = 0;
82*b1cdbd2cSJim Jagielski void * pCppReturn = 0; // complex return ptr: if != 0 && != pUnoReturn, reconversion need
83*b1cdbd2cSJim Jagielski
84*b1cdbd2cSJim Jagielski if ( pReturnTypeDescr )
85*b1cdbd2cSJim Jagielski {
86*b1cdbd2cSJim Jagielski if ( x86_64::return_in_hidden_param( pReturnTypeRef ) )
87*b1cdbd2cSJim Jagielski {
88*b1cdbd2cSJim Jagielski pCppReturn = *gpreg++;
89*b1cdbd2cSJim Jagielski nr_gpr++;
90*b1cdbd2cSJim Jagielski
91*b1cdbd2cSJim Jagielski pUnoReturn = ( bridges::cpp_uno::shared::relatesToInterfaceType( pReturnTypeDescr )
92*b1cdbd2cSJim Jagielski ? alloca( pReturnTypeDescr->nSize )
93*b1cdbd2cSJim Jagielski : pCppReturn ); // direct way
94*b1cdbd2cSJim Jagielski }
95*b1cdbd2cSJim Jagielski else
96*b1cdbd2cSJim Jagielski pUnoReturn = pRegisterReturn; // direct way for simple types
97*b1cdbd2cSJim Jagielski }
98*b1cdbd2cSJim Jagielski
99*b1cdbd2cSJim Jagielski // pop this
100*b1cdbd2cSJim Jagielski gpreg++;
101*b1cdbd2cSJim Jagielski nr_gpr++;
102*b1cdbd2cSJim Jagielski
103*b1cdbd2cSJim Jagielski // stack space
104*b1cdbd2cSJim Jagielski // parameters
105*b1cdbd2cSJim Jagielski void ** pUnoArgs = (void **)alloca( 4 * sizeof(void *) * nParams );
106*b1cdbd2cSJim Jagielski void ** pCppArgs = pUnoArgs + nParams;
107*b1cdbd2cSJim Jagielski // indizes of values this have to be converted (interface conversion cpp<=>uno)
108*b1cdbd2cSJim Jagielski sal_Int32 * pTempIndizes = (sal_Int32 *)(pUnoArgs + (2 * nParams));
109*b1cdbd2cSJim Jagielski // type descriptions for reconversions
110*b1cdbd2cSJim Jagielski typelib_TypeDescription ** ppTempParamTypeDescr = (typelib_TypeDescription **)(pUnoArgs + (3 * nParams));
111*b1cdbd2cSJim Jagielski
112*b1cdbd2cSJim Jagielski sal_Int32 nTempIndizes = 0;
113*b1cdbd2cSJim Jagielski
114*b1cdbd2cSJim Jagielski for ( sal_Int32 nPos = 0; nPos < nParams; ++nPos )
115*b1cdbd2cSJim Jagielski {
116*b1cdbd2cSJim Jagielski const typelib_MethodParameter & rParam = pParams[nPos];
117*b1cdbd2cSJim Jagielski
118*b1cdbd2cSJim Jagielski int nUsedGPR = 0;
119*b1cdbd2cSJim Jagielski int nUsedSSE = 0;
120*b1cdbd2cSJim Jagielski #if OSL_DEBUG_LEVEL > 0
121*b1cdbd2cSJim Jagielski bool bFitsRegisters =
122*b1cdbd2cSJim Jagielski #endif
123*b1cdbd2cSJim Jagielski x86_64::examine_argument( rParam.pTypeRef, false, nUsedGPR, nUsedSSE );
124*b1cdbd2cSJim Jagielski if ( !rParam.bOut && bridges::cpp_uno::shared::isSimpleType( rParam.pTypeRef ) ) // value
125*b1cdbd2cSJim Jagielski {
126*b1cdbd2cSJim Jagielski // Simple types must fit exactly one register on x86_64
127*b1cdbd2cSJim Jagielski OSL_ASSERT( bFitsRegisters && ( ( nUsedSSE == 1 && nUsedGPR == 0 ) || ( nUsedSSE == 0 && nUsedGPR == 1 ) ) );
128*b1cdbd2cSJim Jagielski
129*b1cdbd2cSJim Jagielski if ( nUsedSSE == 1 )
130*b1cdbd2cSJim Jagielski {
131*b1cdbd2cSJim Jagielski if ( nr_fpr < x86_64::MAX_SSE_REGS )
132*b1cdbd2cSJim Jagielski {
133*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pUnoArgs[nPos] = fpreg++;
134*b1cdbd2cSJim Jagielski nr_fpr++;
135*b1cdbd2cSJim Jagielski }
136*b1cdbd2cSJim Jagielski else
137*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pUnoArgs[nPos] = ovrflw++;
138*b1cdbd2cSJim Jagielski }
139*b1cdbd2cSJim Jagielski else if ( nUsedGPR == 1 )
140*b1cdbd2cSJim Jagielski {
141*b1cdbd2cSJim Jagielski if ( nr_gpr < x86_64::MAX_GPR_REGS )
142*b1cdbd2cSJim Jagielski {
143*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pUnoArgs[nPos] = gpreg++;
144*b1cdbd2cSJim Jagielski nr_gpr++;
145*b1cdbd2cSJim Jagielski }
146*b1cdbd2cSJim Jagielski else
147*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pUnoArgs[nPos] = ovrflw++;
148*b1cdbd2cSJim Jagielski }
149*b1cdbd2cSJim Jagielski }
150*b1cdbd2cSJim Jagielski else // struct <= 16 bytes || ptr to complex value || ref
151*b1cdbd2cSJim Jagielski {
152*b1cdbd2cSJim Jagielski typelib_TypeDescription * pParamTypeDescr = 0;
153*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pParamTypeDescr, rParam.pTypeRef );
154*b1cdbd2cSJim Jagielski
155*b1cdbd2cSJim Jagielski void *pCppStack;
156*b1cdbd2cSJim Jagielski if ( nr_gpr < x86_64::MAX_GPR_REGS )
157*b1cdbd2cSJim Jagielski {
158*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pCppStack = *gpreg++;
159*b1cdbd2cSJim Jagielski nr_gpr++;
160*b1cdbd2cSJim Jagielski }
161*b1cdbd2cSJim Jagielski else
162*b1cdbd2cSJim Jagielski pCppArgs[nPos] = pCppStack = *ovrflw++;
163*b1cdbd2cSJim Jagielski
164*b1cdbd2cSJim Jagielski if (! rParam.bIn) // is pure out
165*b1cdbd2cSJim Jagielski {
166*b1cdbd2cSJim Jagielski // uno out is unconstructed mem!
167*b1cdbd2cSJim Jagielski pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize );
168*b1cdbd2cSJim Jagielski pTempIndizes[nTempIndizes] = nPos;
169*b1cdbd2cSJim Jagielski // will be released at reconversion
170*b1cdbd2cSJim Jagielski ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
171*b1cdbd2cSJim Jagielski }
172*b1cdbd2cSJim Jagielski else if ( bridges::cpp_uno::shared::relatesToInterfaceType( pParamTypeDescr ) ) // is in/inout
173*b1cdbd2cSJim Jagielski {
174*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize ),
175*b1cdbd2cSJim Jagielski pCppStack, pParamTypeDescr,
176*b1cdbd2cSJim Jagielski pThis->getBridge()->getCpp2Uno() );
177*b1cdbd2cSJim Jagielski pTempIndizes[nTempIndizes] = nPos; // has to be reconverted
178*b1cdbd2cSJim Jagielski // will be released at reconversion
179*b1cdbd2cSJim Jagielski ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
180*b1cdbd2cSJim Jagielski }
181*b1cdbd2cSJim Jagielski else // direct way
182*b1cdbd2cSJim Jagielski {
183*b1cdbd2cSJim Jagielski pUnoArgs[nPos] = pCppStack;
184*b1cdbd2cSJim Jagielski // no longer needed
185*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pParamTypeDescr );
186*b1cdbd2cSJim Jagielski }
187*b1cdbd2cSJim Jagielski }
188*b1cdbd2cSJim Jagielski }
189*b1cdbd2cSJim Jagielski
190*b1cdbd2cSJim Jagielski // ExceptionHolder
191*b1cdbd2cSJim Jagielski uno_Any aUnoExc; // Any will be constructed by callee
192*b1cdbd2cSJim Jagielski uno_Any * pUnoExc = &aUnoExc;
193*b1cdbd2cSJim Jagielski
194*b1cdbd2cSJim Jagielski // invoke uno dispatch call
195*b1cdbd2cSJim Jagielski (*pThis->getUnoI()->pDispatcher)( pThis->getUnoI(), pMemberTypeDescr, pUnoReturn, pUnoArgs, &pUnoExc );
196*b1cdbd2cSJim Jagielski
197*b1cdbd2cSJim Jagielski // in case an exception occured...
198*b1cdbd2cSJim Jagielski if ( pUnoExc )
199*b1cdbd2cSJim Jagielski {
200*b1cdbd2cSJim Jagielski // destruct temporary in/inout params
201*b1cdbd2cSJim Jagielski for ( ; nTempIndizes--; )
202*b1cdbd2cSJim Jagielski {
203*b1cdbd2cSJim Jagielski sal_Int32 nIndex = pTempIndizes[nTempIndizes];
204*b1cdbd2cSJim Jagielski
205*b1cdbd2cSJim Jagielski if (pParams[nIndex].bIn) // is in/inout => was constructed
206*b1cdbd2cSJim Jagielski uno_destructData( pUnoArgs[nIndex], ppTempParamTypeDescr[nTempIndizes], 0 );
207*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( ppTempParamTypeDescr[nTempIndizes] );
208*b1cdbd2cSJim Jagielski }
209*b1cdbd2cSJim Jagielski if (pReturnTypeDescr)
210*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
211*b1cdbd2cSJim Jagielski
212*b1cdbd2cSJim Jagielski CPPU_CURRENT_NAMESPACE::raiseException( &aUnoExc, pThis->getBridge()->getUno2Cpp() ); // has to destruct the any
213*b1cdbd2cSJim Jagielski // is here for dummy
214*b1cdbd2cSJim Jagielski return typelib_TypeClass_VOID;
215*b1cdbd2cSJim Jagielski }
216*b1cdbd2cSJim Jagielski else // else no exception occured...
217*b1cdbd2cSJim Jagielski {
218*b1cdbd2cSJim Jagielski // temporary params
219*b1cdbd2cSJim Jagielski for ( ; nTempIndizes--; )
220*b1cdbd2cSJim Jagielski {
221*b1cdbd2cSJim Jagielski sal_Int32 nIndex = pTempIndizes[nTempIndizes];
222*b1cdbd2cSJim Jagielski typelib_TypeDescription * pParamTypeDescr = ppTempParamTypeDescr[nTempIndizes];
223*b1cdbd2cSJim Jagielski
224*b1cdbd2cSJim Jagielski if ( pParams[nIndex].bOut ) // inout/out
225*b1cdbd2cSJim Jagielski {
226*b1cdbd2cSJim Jagielski // convert and assign
227*b1cdbd2cSJim Jagielski uno_destructData( pCppArgs[nIndex], pParamTypeDescr, cpp_release );
228*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pCppArgs[nIndex], pUnoArgs[nIndex], pParamTypeDescr,
229*b1cdbd2cSJim Jagielski pThis->getBridge()->getUno2Cpp() );
230*b1cdbd2cSJim Jagielski }
231*b1cdbd2cSJim Jagielski // destroy temp uno param
232*b1cdbd2cSJim Jagielski uno_destructData( pUnoArgs[nIndex], pParamTypeDescr, 0 );
233*b1cdbd2cSJim Jagielski
234*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pParamTypeDescr );
235*b1cdbd2cSJim Jagielski }
236*b1cdbd2cSJim Jagielski // return
237*b1cdbd2cSJim Jagielski if ( pCppReturn ) // has complex return
238*b1cdbd2cSJim Jagielski {
239*b1cdbd2cSJim Jagielski if ( pUnoReturn != pCppReturn ) // needs reconversion
240*b1cdbd2cSJim Jagielski {
241*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pCppReturn, pUnoReturn, pReturnTypeDescr,
242*b1cdbd2cSJim Jagielski pThis->getBridge()->getUno2Cpp() );
243*b1cdbd2cSJim Jagielski // destroy temp uno return
244*b1cdbd2cSJim Jagielski uno_destructData( pUnoReturn, pReturnTypeDescr, 0 );
245*b1cdbd2cSJim Jagielski }
246*b1cdbd2cSJim Jagielski // complex return ptr is set to return reg
247*b1cdbd2cSJim Jagielski *(void **)pRegisterReturn = pCppReturn;
248*b1cdbd2cSJim Jagielski }
249*b1cdbd2cSJim Jagielski if ( pReturnTypeDescr )
250*b1cdbd2cSJim Jagielski {
251*b1cdbd2cSJim Jagielski typelib_TypeClass eRet = (typelib_TypeClass)pReturnTypeDescr->eTypeClass;
252*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
253*b1cdbd2cSJim Jagielski return eRet;
254*b1cdbd2cSJim Jagielski }
255*b1cdbd2cSJim Jagielski else
256*b1cdbd2cSJim Jagielski return typelib_TypeClass_VOID;
257*b1cdbd2cSJim Jagielski }
258*b1cdbd2cSJim Jagielski }
259*b1cdbd2cSJim Jagielski
260*b1cdbd2cSJim Jagielski
261*b1cdbd2cSJim Jagielski //==================================================================================================
cpp_vtable_call(sal_Int32 nFunctionIndex,sal_Int32 nVtableOffset,void ** gpreg,void ** fpreg,void ** ovrflw,sal_uInt64 * pRegisterReturn)262*b1cdbd2cSJim Jagielski extern "C" typelib_TypeClass cpp_vtable_call(
263*b1cdbd2cSJim Jagielski sal_Int32 nFunctionIndex, sal_Int32 nVtableOffset,
264*b1cdbd2cSJim Jagielski void ** gpreg, void ** fpreg, void ** ovrflw,
265*b1cdbd2cSJim Jagielski sal_uInt64 * pRegisterReturn /* space for register return */ )
266*b1cdbd2cSJim Jagielski {
267*b1cdbd2cSJim Jagielski // gpreg: [ret *], this, [other gpr params]
268*b1cdbd2cSJim Jagielski // fpreg: [fpr params]
269*b1cdbd2cSJim Jagielski // ovrflw: [gpr or fpr params (properly aligned)]
270*b1cdbd2cSJim Jagielski void * pThis;
271*b1cdbd2cSJim Jagielski if ( nFunctionIndex & 0x80000000 )
272*b1cdbd2cSJim Jagielski {
273*b1cdbd2cSJim Jagielski nFunctionIndex &= 0x7fffffff;
274*b1cdbd2cSJim Jagielski pThis = gpreg[1];
275*b1cdbd2cSJim Jagielski }
276*b1cdbd2cSJim Jagielski else
277*b1cdbd2cSJim Jagielski {
278*b1cdbd2cSJim Jagielski pThis = gpreg[0];
279*b1cdbd2cSJim Jagielski }
280*b1cdbd2cSJim Jagielski pThis = static_cast<char *>( pThis ) - nVtableOffset;
281*b1cdbd2cSJim Jagielski
282*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::CppInterfaceProxy * pCppI =
283*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::CppInterfaceProxy::castInterfaceToProxy( pThis );
284*b1cdbd2cSJim Jagielski
285*b1cdbd2cSJim Jagielski typelib_InterfaceTypeDescription * pTypeDescr = pCppI->getTypeDescr();
286*b1cdbd2cSJim Jagielski
287*b1cdbd2cSJim Jagielski OSL_ENSURE( nFunctionIndex < pTypeDescr->nMapFunctionIndexToMemberIndex, "### illegal vtable index!\n" );
288*b1cdbd2cSJim Jagielski if ( nFunctionIndex >= pTypeDescr->nMapFunctionIndexToMemberIndex )
289*b1cdbd2cSJim Jagielski {
290*b1cdbd2cSJim Jagielski throw RuntimeException( OUString::createFromAscii("illegal vtable index!"),
291*b1cdbd2cSJim Jagielski reinterpret_cast<XInterface *>( pCppI ) );
292*b1cdbd2cSJim Jagielski }
293*b1cdbd2cSJim Jagielski
294*b1cdbd2cSJim Jagielski // determine called method
295*b1cdbd2cSJim Jagielski sal_Int32 nMemberPos = pTypeDescr->pMapFunctionIndexToMemberIndex[nFunctionIndex];
296*b1cdbd2cSJim Jagielski OSL_ENSURE( nMemberPos < pTypeDescr->nAllMembers, "### illegal member index!\n" );
297*b1cdbd2cSJim Jagielski
298*b1cdbd2cSJim Jagielski TypeDescription aMemberDescr( pTypeDescr->ppAllMembers[nMemberPos] );
299*b1cdbd2cSJim Jagielski
300*b1cdbd2cSJim Jagielski typelib_TypeClass eRet;
301*b1cdbd2cSJim Jagielski switch ( aMemberDescr.get()->eTypeClass )
302*b1cdbd2cSJim Jagielski {
303*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_ATTRIBUTE:
304*b1cdbd2cSJim Jagielski {
305*b1cdbd2cSJim Jagielski typelib_TypeDescriptionReference *pAttrTypeRef =
306*b1cdbd2cSJim Jagielski reinterpret_cast<typelib_InterfaceAttributeTypeDescription *>( aMemberDescr.get() )->pAttributeTypeRef;
307*b1cdbd2cSJim Jagielski
308*b1cdbd2cSJim Jagielski if ( pTypeDescr->pMapMemberIndexToFunctionIndex[nMemberPos] == nFunctionIndex )
309*b1cdbd2cSJim Jagielski {
310*b1cdbd2cSJim Jagielski // is GET method
311*b1cdbd2cSJim Jagielski eRet = cpp2uno_call( pCppI, aMemberDescr.get(), pAttrTypeRef,
312*b1cdbd2cSJim Jagielski 0, 0, // no params
313*b1cdbd2cSJim Jagielski gpreg, fpreg, ovrflw, pRegisterReturn );
314*b1cdbd2cSJim Jagielski }
315*b1cdbd2cSJim Jagielski else
316*b1cdbd2cSJim Jagielski {
317*b1cdbd2cSJim Jagielski // is SET method
318*b1cdbd2cSJim Jagielski typelib_MethodParameter aParam;
319*b1cdbd2cSJim Jagielski aParam.pTypeRef = pAttrTypeRef;
320*b1cdbd2cSJim Jagielski aParam.bIn = sal_True;
321*b1cdbd2cSJim Jagielski aParam.bOut = sal_False;
322*b1cdbd2cSJim Jagielski
323*b1cdbd2cSJim Jagielski eRet = cpp2uno_call( pCppI, aMemberDescr.get(),
324*b1cdbd2cSJim Jagielski 0, // indicates void return
325*b1cdbd2cSJim Jagielski 1, &aParam,
326*b1cdbd2cSJim Jagielski gpreg, fpreg, ovrflw, pRegisterReturn );
327*b1cdbd2cSJim Jagielski }
328*b1cdbd2cSJim Jagielski break;
329*b1cdbd2cSJim Jagielski }
330*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_METHOD:
331*b1cdbd2cSJim Jagielski {
332*b1cdbd2cSJim Jagielski // is METHOD
333*b1cdbd2cSJim Jagielski switch ( nFunctionIndex )
334*b1cdbd2cSJim Jagielski {
335*b1cdbd2cSJim Jagielski case 1: // acquire()
336*b1cdbd2cSJim Jagielski pCppI->acquireProxy(); // non virtual call!
337*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_VOID;
338*b1cdbd2cSJim Jagielski break;
339*b1cdbd2cSJim Jagielski case 2: // release()
340*b1cdbd2cSJim Jagielski pCppI->releaseProxy(); // non virtual call!
341*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_VOID;
342*b1cdbd2cSJim Jagielski break;
343*b1cdbd2cSJim Jagielski case 0: // queryInterface() opt
344*b1cdbd2cSJim Jagielski {
345*b1cdbd2cSJim Jagielski typelib_TypeDescription * pTD = 0;
346*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pTD, reinterpret_cast<Type *>( gpreg[2] )->getTypeLibType() );
347*b1cdbd2cSJim Jagielski if ( pTD )
348*b1cdbd2cSJim Jagielski {
349*b1cdbd2cSJim Jagielski XInterface * pInterface = 0;
350*b1cdbd2cSJim Jagielski (*pCppI->getBridge()->getCppEnv()->getRegisteredInterface)
351*b1cdbd2cSJim Jagielski ( pCppI->getBridge()->getCppEnv(),
352*b1cdbd2cSJim Jagielski (void **)&pInterface,
353*b1cdbd2cSJim Jagielski pCppI->getOid().pData,
354*b1cdbd2cSJim Jagielski reinterpret_cast<typelib_InterfaceTypeDescription *>( pTD ) );
355*b1cdbd2cSJim Jagielski
356*b1cdbd2cSJim Jagielski if ( pInterface )
357*b1cdbd2cSJim Jagielski {
358*b1cdbd2cSJim Jagielski ::uno_any_construct( reinterpret_cast<uno_Any *>( gpreg[0] ),
359*b1cdbd2cSJim Jagielski &pInterface, pTD, cpp_acquire );
360*b1cdbd2cSJim Jagielski
361*b1cdbd2cSJim Jagielski pInterface->release();
362*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pTD );
363*b1cdbd2cSJim Jagielski
364*b1cdbd2cSJim Jagielski reinterpret_cast<void **>( pRegisterReturn )[0] = gpreg[0];
365*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_ANY;
366*b1cdbd2cSJim Jagielski break;
367*b1cdbd2cSJim Jagielski }
368*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pTD );
369*b1cdbd2cSJim Jagielski }
370*b1cdbd2cSJim Jagielski } // else perform queryInterface()
371*b1cdbd2cSJim Jagielski default:
372*b1cdbd2cSJim Jagielski {
373*b1cdbd2cSJim Jagielski typelib_InterfaceMethodTypeDescription *pMethodTD =
374*b1cdbd2cSJim Jagielski reinterpret_cast<typelib_InterfaceMethodTypeDescription *>( aMemberDescr.get() );
375*b1cdbd2cSJim Jagielski
376*b1cdbd2cSJim Jagielski eRet = cpp2uno_call( pCppI, aMemberDescr.get(),
377*b1cdbd2cSJim Jagielski pMethodTD->pReturnTypeRef,
378*b1cdbd2cSJim Jagielski pMethodTD->nParams,
379*b1cdbd2cSJim Jagielski pMethodTD->pParams,
380*b1cdbd2cSJim Jagielski gpreg, fpreg, ovrflw, pRegisterReturn );
381*b1cdbd2cSJim Jagielski }
382*b1cdbd2cSJim Jagielski }
383*b1cdbd2cSJim Jagielski break;
384*b1cdbd2cSJim Jagielski }
385*b1cdbd2cSJim Jagielski default:
386*b1cdbd2cSJim Jagielski {
387*b1cdbd2cSJim Jagielski throw RuntimeException( OUString::createFromAscii("no member description found!"),
388*b1cdbd2cSJim Jagielski reinterpret_cast<XInterface *>( pCppI ) );
389*b1cdbd2cSJim Jagielski // is here for dummy
390*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_VOID;
391*b1cdbd2cSJim Jagielski }
392*b1cdbd2cSJim Jagielski }
393*b1cdbd2cSJim Jagielski
394*b1cdbd2cSJim Jagielski return eRet;
395*b1cdbd2cSJim Jagielski }
396*b1cdbd2cSJim Jagielski
397*b1cdbd2cSJim Jagielski //==================================================================================================
398*b1cdbd2cSJim Jagielski extern "C" void privateSnippetExecutor( ... );
399*b1cdbd2cSJim Jagielski
400*b1cdbd2cSJim Jagielski const int codeSnippetSize = 24;
401*b1cdbd2cSJim Jagielski
402*b1cdbd2cSJim Jagielski // Generate a trampoline that redirects method calls to
403*b1cdbd2cSJim Jagielski // privateSnippetExecutor().
404*b1cdbd2cSJim Jagielski //
405*b1cdbd2cSJim Jagielski // privateSnippetExecutor() saves all the registers that are used for
406*b1cdbd2cSJim Jagielski // parameter passing on x86_64, and calls the cpp_vtable_call().
407*b1cdbd2cSJim Jagielski // When it returns, privateSnippetExecutor() sets the return value.
408*b1cdbd2cSJim Jagielski //
409*b1cdbd2cSJim Jagielski // Note: The code snippet we build here must not create a stack frame,
410*b1cdbd2cSJim Jagielski // otherwise the UNO exceptions stop working thanks to non-existing
411*b1cdbd2cSJim Jagielski // unwinding info.
codeSnippet(unsigned char * code,sal_Int32 nFunctionIndex,sal_Int32 nVtableOffset,bool bHasHiddenParam)412*b1cdbd2cSJim Jagielski unsigned char * codeSnippet( unsigned char * code,
413*b1cdbd2cSJim Jagielski sal_Int32 nFunctionIndex, sal_Int32 nVtableOffset,
414*b1cdbd2cSJim Jagielski bool bHasHiddenParam ) SAL_THROW( () )
415*b1cdbd2cSJim Jagielski {
416*b1cdbd2cSJim Jagielski sal_uInt64 nOffsetAndIndex = ( ( (sal_uInt64) nVtableOffset ) << 32 ) | ( (sal_uInt64) nFunctionIndex );
417*b1cdbd2cSJim Jagielski
418*b1cdbd2cSJim Jagielski if ( bHasHiddenParam )
419*b1cdbd2cSJim Jagielski nOffsetAndIndex |= 0x80000000;
420*b1cdbd2cSJim Jagielski
421*b1cdbd2cSJim Jagielski // movq $<nOffsetAndIndex>, %r10
422*b1cdbd2cSJim Jagielski *reinterpret_cast<sal_uInt16 *>( code ) = 0xba49;
423*b1cdbd2cSJim Jagielski *reinterpret_cast<sal_uInt64 *>( code + 2 ) = nOffsetAndIndex;
424*b1cdbd2cSJim Jagielski
425*b1cdbd2cSJim Jagielski // movq $<address of the privateSnippetExecutor>, %r11
426*b1cdbd2cSJim Jagielski *reinterpret_cast<sal_uInt16 *>( code + 10 ) = 0xbb49;
427*b1cdbd2cSJim Jagielski *reinterpret_cast<sal_uInt64 *>( code + 12 ) = reinterpret_cast<sal_uInt64>( privateSnippetExecutor );
428*b1cdbd2cSJim Jagielski
429*b1cdbd2cSJim Jagielski // jmpq *%r11
430*b1cdbd2cSJim Jagielski *reinterpret_cast<sal_uInt32 *>( code + 20 ) = 0x00e3ff49;
431*b1cdbd2cSJim Jagielski
432*b1cdbd2cSJim Jagielski return code + codeSnippetSize;
433*b1cdbd2cSJim Jagielski }
434*b1cdbd2cSJim Jagielski
435*b1cdbd2cSJim Jagielski //==================================================================================================
436*b1cdbd2cSJim Jagielski struct bridges::cpp_uno::shared::VtableFactory::Slot { void * fn; };
437*b1cdbd2cSJim Jagielski
438*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::Slot *
mapBlockToVtable(void * block)439*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::mapBlockToVtable(void * block)
440*b1cdbd2cSJim Jagielski {
441*b1cdbd2cSJim Jagielski return static_cast< Slot * >(block) + 2;
442*b1cdbd2cSJim Jagielski }
443*b1cdbd2cSJim Jagielski
444*b1cdbd2cSJim Jagielski //==================================================================================================
getBlockSize(sal_Int32 slotCount)445*b1cdbd2cSJim Jagielski sal_Size bridges::cpp_uno::shared::VtableFactory::getBlockSize(
446*b1cdbd2cSJim Jagielski sal_Int32 slotCount)
447*b1cdbd2cSJim Jagielski {
448*b1cdbd2cSJim Jagielski return (slotCount + 2) * sizeof (Slot) + slotCount * codeSnippetSize;
449*b1cdbd2cSJim Jagielski }
450*b1cdbd2cSJim Jagielski
451*b1cdbd2cSJim Jagielski //==================================================================================================
452*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::Slot *
initializeBlock(void * block,sal_Int32 slotCount)453*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::initializeBlock(
454*b1cdbd2cSJim Jagielski void * block, sal_Int32 slotCount)
455*b1cdbd2cSJim Jagielski {
456*b1cdbd2cSJim Jagielski Slot * slots = mapBlockToVtable(block);
457*b1cdbd2cSJim Jagielski slots[-2].fn = 0;
458*b1cdbd2cSJim Jagielski slots[-1].fn = 0;
459*b1cdbd2cSJim Jagielski return slots + slotCount;
460*b1cdbd2cSJim Jagielski }
461*b1cdbd2cSJim Jagielski
462*b1cdbd2cSJim Jagielski //==================================================================================================
463*b1cdbd2cSJim Jagielski
addLocalFunctions(Slot ** slots,unsigned char * code,sal_PtrDiff writetoexecdiff,typelib_InterfaceTypeDescription const * type,sal_Int32 nFunctionOffset,sal_Int32 functionCount,sal_Int32 nVtableOffset)464*b1cdbd2cSJim Jagielski unsigned char * bridges::cpp_uno::shared::VtableFactory::addLocalFunctions(
465*b1cdbd2cSJim Jagielski Slot ** slots, unsigned char * code, sal_PtrDiff writetoexecdiff,
466*b1cdbd2cSJim Jagielski typelib_InterfaceTypeDescription const * type, sal_Int32 nFunctionOffset,
467*b1cdbd2cSJim Jagielski sal_Int32 functionCount, sal_Int32 nVtableOffset )
468*b1cdbd2cSJim Jagielski {
469*b1cdbd2cSJim Jagielski (*slots) -= functionCount;
470*b1cdbd2cSJim Jagielski Slot * s = *slots;
471*b1cdbd2cSJim Jagielski for ( sal_Int32 nPos = 0; nPos < type->nMembers; ++nPos )
472*b1cdbd2cSJim Jagielski {
473*b1cdbd2cSJim Jagielski typelib_TypeDescription * pTD = 0;
474*b1cdbd2cSJim Jagielski
475*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pTD, type->ppMembers[ nPos ] );
476*b1cdbd2cSJim Jagielski OSL_ASSERT( pTD );
477*b1cdbd2cSJim Jagielski
478*b1cdbd2cSJim Jagielski if ( typelib_TypeClass_INTERFACE_ATTRIBUTE == pTD->eTypeClass )
479*b1cdbd2cSJim Jagielski {
480*b1cdbd2cSJim Jagielski typelib_InterfaceAttributeTypeDescription *pAttrTD =
481*b1cdbd2cSJim Jagielski reinterpret_cast<typelib_InterfaceAttributeTypeDescription *>( pTD );
482*b1cdbd2cSJim Jagielski
483*b1cdbd2cSJim Jagielski // get method
484*b1cdbd2cSJim Jagielski (s++)->fn = code + writetoexecdiff;
485*b1cdbd2cSJim Jagielski code = codeSnippet( code, nFunctionOffset++, nVtableOffset,
486*b1cdbd2cSJim Jagielski x86_64::return_in_hidden_param( pAttrTD->pAttributeTypeRef ) );
487*b1cdbd2cSJim Jagielski
488*b1cdbd2cSJim Jagielski if ( ! pAttrTD->bReadOnly )
489*b1cdbd2cSJim Jagielski {
490*b1cdbd2cSJim Jagielski // set method
491*b1cdbd2cSJim Jagielski (s++)->fn = code + writetoexecdiff;
492*b1cdbd2cSJim Jagielski code = codeSnippet( code, nFunctionOffset++, nVtableOffset, false );
493*b1cdbd2cSJim Jagielski }
494*b1cdbd2cSJim Jagielski }
495*b1cdbd2cSJim Jagielski else if ( typelib_TypeClass_INTERFACE_METHOD == pTD->eTypeClass )
496*b1cdbd2cSJim Jagielski {
497*b1cdbd2cSJim Jagielski typelib_InterfaceMethodTypeDescription *pMethodTD =
498*b1cdbd2cSJim Jagielski reinterpret_cast<typelib_InterfaceMethodTypeDescription *>( pTD );
499*b1cdbd2cSJim Jagielski
500*b1cdbd2cSJim Jagielski (s++)->fn = code + writetoexecdiff;
501*b1cdbd2cSJim Jagielski code = codeSnippet( code, nFunctionOffset++, nVtableOffset,
502*b1cdbd2cSJim Jagielski x86_64::return_in_hidden_param( pMethodTD->pReturnTypeRef ) );
503*b1cdbd2cSJim Jagielski }
504*b1cdbd2cSJim Jagielski else
505*b1cdbd2cSJim Jagielski OSL_ASSERT( false );
506*b1cdbd2cSJim Jagielski
507*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pTD );
508*b1cdbd2cSJim Jagielski }
509*b1cdbd2cSJim Jagielski return code;
510*b1cdbd2cSJim Jagielski }
511*b1cdbd2cSJim Jagielski
512*b1cdbd2cSJim Jagielski //==================================================================================================
flushCode(unsigned char const *,unsigned char const *)513*b1cdbd2cSJim Jagielski void bridges::cpp_uno::shared::VtableFactory::flushCode(
514*b1cdbd2cSJim Jagielski unsigned char const *, unsigned char const * )
515*b1cdbd2cSJim Jagielski {
516*b1cdbd2cSJim Jagielski }
517