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 <sal/alloca.h>
28*b1cdbd2cSJim Jagielski
29*b1cdbd2cSJim Jagielski #include <com/sun/star/uno/genfunc.hxx>
30*b1cdbd2cSJim Jagielski #include <uno/data.h>
31*b1cdbd2cSJim Jagielski #include <typelib/typedescription.hxx>
32*b1cdbd2cSJim Jagielski
33*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/bridge.hxx"
34*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/cppinterfaceproxy.hxx"
35*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/types.hxx"
36*b1cdbd2cSJim Jagielski #include "bridges/cpp_uno/shared/vtablefactory.hxx"
37*b1cdbd2cSJim Jagielski
38*b1cdbd2cSJim Jagielski #include "cc50_solaris_sparc.hxx"
39*b1cdbd2cSJim Jagielski #include "flushcode.hxx"
40*b1cdbd2cSJim Jagielski
41*b1cdbd2cSJim Jagielski using namespace com::sun::star::uno;
42*b1cdbd2cSJim Jagielski
43*b1cdbd2cSJim Jagielski namespace
44*b1cdbd2cSJim Jagielski {
45*b1cdbd2cSJim Jagielski
46*b1cdbd2cSJim Jagielski //==================================================================================================
cpp2uno_call(bridges::cpp_uno::shared::CppInterfaceProxy * pThis,const typelib_TypeDescription * pMemberTypeDescr,typelib_TypeDescriptionReference * pReturnTypeRef,sal_Int32 nParams,typelib_MethodParameter * pParams,void ** pCallStack,sal_Int64 * pRegisterReturn)47*b1cdbd2cSJim Jagielski static typelib_TypeClass cpp2uno_call(
48*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::CppInterfaceProxy * pThis,
49*b1cdbd2cSJim Jagielski const typelib_TypeDescription * pMemberTypeDescr,
50*b1cdbd2cSJim Jagielski typelib_TypeDescriptionReference * pReturnTypeRef, // 0 indicates void return
51*b1cdbd2cSJim Jagielski sal_Int32 nParams, typelib_MethodParameter * pParams,
52*b1cdbd2cSJim Jagielski void ** pCallStack,
53*b1cdbd2cSJim Jagielski sal_Int64 * pRegisterReturn /* space for register return */ )
54*b1cdbd2cSJim Jagielski {
55*b1cdbd2cSJim Jagielski // pCallStack: [return ptr], this, params
56*b1cdbd2cSJim Jagielski char * pCppStack = (char *)pCallStack;
57*b1cdbd2cSJim Jagielski
58*b1cdbd2cSJim Jagielski // return
59*b1cdbd2cSJim Jagielski typelib_TypeDescription * pReturnTypeDescr = 0;
60*b1cdbd2cSJim Jagielski if (pReturnTypeRef)
61*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pReturnTypeDescr, pReturnTypeRef );
62*b1cdbd2cSJim Jagielski
63*b1cdbd2cSJim Jagielski void * pUnoReturn = 0;
64*b1cdbd2cSJim Jagielski void * pCppReturn = 0; // complex return ptr: if != 0 && != pUnoReturn, reconversion need
65*b1cdbd2cSJim Jagielski
66*b1cdbd2cSJim Jagielski if (pReturnTypeDescr)
67*b1cdbd2cSJim Jagielski {
68*b1cdbd2cSJim Jagielski if (bridges::cpp_uno::shared::isSimpleType( pReturnTypeDescr ))
69*b1cdbd2cSJim Jagielski {
70*b1cdbd2cSJim Jagielski pUnoReturn = pRegisterReturn; // direct way for simple types
71*b1cdbd2cSJim Jagielski }
72*b1cdbd2cSJim Jagielski else // complex return via ptr (pCppReturn)
73*b1cdbd2cSJim Jagielski {
74*b1cdbd2cSJim Jagielski pCppReturn = *pCallStack;
75*b1cdbd2cSJim Jagielski pCppStack += sizeof( void* );
76*b1cdbd2cSJim Jagielski pUnoReturn = (bridges::cpp_uno::shared::relatesToInterfaceType(
77*b1cdbd2cSJim Jagielski pReturnTypeDescr )
78*b1cdbd2cSJim Jagielski ? alloca( pReturnTypeDescr->nSize )
79*b1cdbd2cSJim Jagielski : pCppReturn); // direct way
80*b1cdbd2cSJim Jagielski }
81*b1cdbd2cSJim Jagielski }
82*b1cdbd2cSJim Jagielski // pop this
83*b1cdbd2cSJim Jagielski pCppStack += sizeof( void* );
84*b1cdbd2cSJim Jagielski
85*b1cdbd2cSJim Jagielski // stack space
86*b1cdbd2cSJim Jagielski OSL_ENSURE( sizeof(void *) == sizeof(sal_Int32), "### unexpected size!" );
87*b1cdbd2cSJim Jagielski // parameters
88*b1cdbd2cSJim Jagielski void ** pUnoArgs = (void **)alloca( 4 * sizeof(void *) * nParams );
89*b1cdbd2cSJim Jagielski void ** pCppArgs = pUnoArgs + nParams;
90*b1cdbd2cSJim Jagielski // indizes of values this have to be converted (interface conversion cpp<=>uno)
91*b1cdbd2cSJim Jagielski sal_Int32 * pTempIndizes = (sal_Int32 *)(pUnoArgs + (2 * nParams));
92*b1cdbd2cSJim Jagielski // type descriptions for reconversions
93*b1cdbd2cSJim Jagielski typelib_TypeDescription ** ppTempParamTypeDescr = (typelib_TypeDescription **)(pUnoArgs + (3 * nParams));
94*b1cdbd2cSJim Jagielski
95*b1cdbd2cSJim Jagielski sal_Int32 nTempIndizes = 0;
96*b1cdbd2cSJim Jagielski
97*b1cdbd2cSJim Jagielski for ( sal_Int32 nPos = 0; nPos < nParams; ++nPos )
98*b1cdbd2cSJim Jagielski {
99*b1cdbd2cSJim Jagielski const typelib_MethodParameter & rParam = pParams[nPos];
100*b1cdbd2cSJim Jagielski typelib_TypeDescription * pParamTypeDescr = 0;
101*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pParamTypeDescr, rParam.pTypeRef );
102*b1cdbd2cSJim Jagielski
103*b1cdbd2cSJim Jagielski if (!rParam.bOut
104*b1cdbd2cSJim Jagielski && bridges::cpp_uno::shared::isSimpleType( pParamTypeDescr ))
105*b1cdbd2cSJim Jagielski // value
106*b1cdbd2cSJim Jagielski {
107*b1cdbd2cSJim Jagielski pCppArgs[ nPos ] = pUnoArgs[ nPos ] =
108*b1cdbd2cSJim Jagielski CPPU_CURRENT_NAMESPACE::adjustPointer(
109*b1cdbd2cSJim Jagielski pCppStack, pParamTypeDescr );
110*b1cdbd2cSJim Jagielski switch (pParamTypeDescr->eTypeClass)
111*b1cdbd2cSJim Jagielski {
112*b1cdbd2cSJim Jagielski case typelib_TypeClass_HYPER:
113*b1cdbd2cSJim Jagielski case typelib_TypeClass_UNSIGNED_HYPER:
114*b1cdbd2cSJim Jagielski case typelib_TypeClass_DOUBLE:
115*b1cdbd2cSJim Jagielski pCppStack += sizeof(sal_Int32); // extra long
116*b1cdbd2cSJim Jagielski }
117*b1cdbd2cSJim Jagielski // no longer needed
118*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pParamTypeDescr );
119*b1cdbd2cSJim Jagielski }
120*b1cdbd2cSJim Jagielski else // ptr to complex value | ref
121*b1cdbd2cSJim Jagielski {
122*b1cdbd2cSJim Jagielski pCppArgs[nPos] = *(void **)pCppStack;
123*b1cdbd2cSJim Jagielski
124*b1cdbd2cSJim Jagielski if (! rParam.bIn) // is pure out
125*b1cdbd2cSJim Jagielski {
126*b1cdbd2cSJim Jagielski // uno out is unconstructed mem!
127*b1cdbd2cSJim Jagielski pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize );
128*b1cdbd2cSJim Jagielski pTempIndizes[nTempIndizes] = nPos;
129*b1cdbd2cSJim Jagielski // will be released at reconversion
130*b1cdbd2cSJim Jagielski ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
131*b1cdbd2cSJim Jagielski }
132*b1cdbd2cSJim Jagielski // is in/inout
133*b1cdbd2cSJim Jagielski else if (bridges::cpp_uno::shared::relatesToInterfaceType(
134*b1cdbd2cSJim Jagielski pParamTypeDescr ))
135*b1cdbd2cSJim Jagielski {
136*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize ),
137*b1cdbd2cSJim Jagielski *(void **)pCppStack, pParamTypeDescr,
138*b1cdbd2cSJim Jagielski pThis->getBridge()->getCpp2Uno() );
139*b1cdbd2cSJim Jagielski pTempIndizes[nTempIndizes] = nPos; // has to be reconverted
140*b1cdbd2cSJim Jagielski // will be released at reconversion
141*b1cdbd2cSJim Jagielski ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
142*b1cdbd2cSJim Jagielski }
143*b1cdbd2cSJim Jagielski else // direct way
144*b1cdbd2cSJim Jagielski {
145*b1cdbd2cSJim Jagielski pUnoArgs[nPos] = *(void **)pCppStack;
146*b1cdbd2cSJim Jagielski // no longer needed
147*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pParamTypeDescr );
148*b1cdbd2cSJim Jagielski }
149*b1cdbd2cSJim Jagielski }
150*b1cdbd2cSJim Jagielski pCppStack += sizeof(sal_Int32); // standard parameter length
151*b1cdbd2cSJim Jagielski }
152*b1cdbd2cSJim Jagielski
153*b1cdbd2cSJim Jagielski // ExceptionHolder
154*b1cdbd2cSJim Jagielski uno_Any aUnoExc; // Any will be constructed by callee
155*b1cdbd2cSJim Jagielski uno_Any * pUnoExc = &aUnoExc;
156*b1cdbd2cSJim Jagielski
157*b1cdbd2cSJim Jagielski // invoke uno dispatch call
158*b1cdbd2cSJim Jagielski (*pThis->getUnoI()->pDispatcher)(
159*b1cdbd2cSJim Jagielski pThis->getUnoI(), pMemberTypeDescr, pUnoReturn, pUnoArgs, &pUnoExc );
160*b1cdbd2cSJim Jagielski
161*b1cdbd2cSJim Jagielski // in case no exception occured...
162*b1cdbd2cSJim Jagielski if (pUnoExc)
163*b1cdbd2cSJim Jagielski {
164*b1cdbd2cSJim Jagielski // destruct temporary in/inout params
165*b1cdbd2cSJim Jagielski for ( ; nTempIndizes--; )
166*b1cdbd2cSJim Jagielski {
167*b1cdbd2cSJim Jagielski sal_Int32 nIndex = pTempIndizes[nTempIndizes];
168*b1cdbd2cSJim Jagielski
169*b1cdbd2cSJim Jagielski if (pParams[nIndex].bIn) // is in/inout => was constructed
170*b1cdbd2cSJim Jagielski uno_destructData( pUnoArgs[nIndex], ppTempParamTypeDescr[nTempIndizes], 0 );
171*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( ppTempParamTypeDescr[nTempIndizes] );
172*b1cdbd2cSJim Jagielski }
173*b1cdbd2cSJim Jagielski if (pReturnTypeDescr)
174*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
175*b1cdbd2cSJim Jagielski
176*b1cdbd2cSJim Jagielski CPPU_CURRENT_NAMESPACE::cc50_solaris_sparc_raiseException(
177*b1cdbd2cSJim Jagielski &aUnoExc, pThis->getBridge()->getUno2Cpp() );
178*b1cdbd2cSJim Jagielski // has to destruct the any
179*b1cdbd2cSJim Jagielski // is here for dummy
180*b1cdbd2cSJim Jagielski return typelib_TypeClass_VOID;
181*b1cdbd2cSJim Jagielski }
182*b1cdbd2cSJim Jagielski else // else no exception occured...
183*b1cdbd2cSJim Jagielski {
184*b1cdbd2cSJim Jagielski // temporary params
185*b1cdbd2cSJim Jagielski for ( ; nTempIndizes--; )
186*b1cdbd2cSJim Jagielski {
187*b1cdbd2cSJim Jagielski sal_Int32 nIndex = pTempIndizes[nTempIndizes];
188*b1cdbd2cSJim Jagielski typelib_TypeDescription * pParamTypeDescr = ppTempParamTypeDescr[nTempIndizes];
189*b1cdbd2cSJim Jagielski
190*b1cdbd2cSJim Jagielski if (pParams[nIndex].bOut) // inout/out
191*b1cdbd2cSJim Jagielski {
192*b1cdbd2cSJim Jagielski // convert and assign
193*b1cdbd2cSJim Jagielski uno_destructData(
194*b1cdbd2cSJim Jagielski pCppArgs[nIndex], pParamTypeDescr,
195*b1cdbd2cSJim Jagielski reinterpret_cast< uno_ReleaseFunc >(cpp_release) );
196*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pCppArgs[nIndex], pUnoArgs[nIndex], pParamTypeDescr,
197*b1cdbd2cSJim Jagielski pThis->getBridge()->getUno2Cpp() );
198*b1cdbd2cSJim Jagielski }
199*b1cdbd2cSJim Jagielski // destroy temp uno param
200*b1cdbd2cSJim Jagielski uno_destructData( pUnoArgs[nIndex], pParamTypeDescr, 0 );
201*b1cdbd2cSJim Jagielski
202*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pParamTypeDescr );
203*b1cdbd2cSJim Jagielski }
204*b1cdbd2cSJim Jagielski // return
205*b1cdbd2cSJim Jagielski if (pCppReturn) // has complex return
206*b1cdbd2cSJim Jagielski {
207*b1cdbd2cSJim Jagielski if (pUnoReturn != pCppReturn) // needs reconversion
208*b1cdbd2cSJim Jagielski {
209*b1cdbd2cSJim Jagielski uno_copyAndConvertData( pCppReturn, pUnoReturn, pReturnTypeDescr,
210*b1cdbd2cSJim Jagielski pThis->getBridge()->getUno2Cpp() );
211*b1cdbd2cSJim Jagielski // destroy temp uno return
212*b1cdbd2cSJim Jagielski uno_destructData( pUnoReturn, pReturnTypeDescr, 0 );
213*b1cdbd2cSJim Jagielski }
214*b1cdbd2cSJim Jagielski // complex return ptr is set to eax
215*b1cdbd2cSJim Jagielski *(void **)pRegisterReturn = pCppReturn;
216*b1cdbd2cSJim Jagielski }
217*b1cdbd2cSJim Jagielski if (pReturnTypeDescr)
218*b1cdbd2cSJim Jagielski {
219*b1cdbd2cSJim Jagielski typelib_TypeClass eRet = (typelib_TypeClass)pReturnTypeDescr->eTypeClass;
220*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
221*b1cdbd2cSJim Jagielski return eRet;
222*b1cdbd2cSJim Jagielski }
223*b1cdbd2cSJim Jagielski else
224*b1cdbd2cSJim Jagielski return typelib_TypeClass_VOID;
225*b1cdbd2cSJim Jagielski }
226*b1cdbd2cSJim Jagielski }
227*b1cdbd2cSJim Jagielski
228*b1cdbd2cSJim Jagielski
229*b1cdbd2cSJim Jagielski //==================================================================================================
cpp_mediate(sal_Int32 nFunctionIndex,sal_Int32 nVtableOffset,void ** pCallStack,sal_Int64 * pRegisterReturn)230*b1cdbd2cSJim Jagielski static typelib_TypeClass cpp_mediate(
231*b1cdbd2cSJim Jagielski sal_Int32 nFunctionIndex,
232*b1cdbd2cSJim Jagielski sal_Int32 nVtableOffset,
233*b1cdbd2cSJim Jagielski void ** pCallStack,
234*b1cdbd2cSJim Jagielski sal_Int64 * pRegisterReturn /* space for register return */ )
235*b1cdbd2cSJim Jagielski {
236*b1cdbd2cSJim Jagielski OSL_ENSURE( sizeof(sal_Int32)==sizeof(void *), "### unexpected!" );
237*b1cdbd2cSJim Jagielski
238*b1cdbd2cSJim Jagielski // pCallStack: this, params
239*b1cdbd2cSJim Jagielski void * pThis;
240*b1cdbd2cSJim Jagielski if( nFunctionIndex & 0x80000000 )
241*b1cdbd2cSJim Jagielski {
242*b1cdbd2cSJim Jagielski nFunctionIndex &= 0x7fffffff;
243*b1cdbd2cSJim Jagielski pThis = pCallStack[1];
244*b1cdbd2cSJim Jagielski }
245*b1cdbd2cSJim Jagielski else
246*b1cdbd2cSJim Jagielski {
247*b1cdbd2cSJim Jagielski pThis = pCallStack[0];
248*b1cdbd2cSJim Jagielski }
249*b1cdbd2cSJim Jagielski pThis = static_cast< char * >(pThis) - nVtableOffset;
250*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::CppInterfaceProxy * pCppI
251*b1cdbd2cSJim Jagielski = bridges::cpp_uno::shared::CppInterfaceProxy::castInterfaceToProxy(
252*b1cdbd2cSJim Jagielski pThis);
253*b1cdbd2cSJim Jagielski
254*b1cdbd2cSJim Jagielski typelib_InterfaceTypeDescription * pTypeDescr = pCppI->getTypeDescr();
255*b1cdbd2cSJim Jagielski
256*b1cdbd2cSJim Jagielski OSL_ENSURE( nFunctionIndex < pTypeDescr->nMapFunctionIndexToMemberIndex,
257*b1cdbd2cSJim Jagielski "### illegal vtable index!" );
258*b1cdbd2cSJim Jagielski // if (nFunctionIndex >= pTypeDescr->nMapFunctionIndexToMemberIndex)
259*b1cdbd2cSJim Jagielski // {
260*b1cdbd2cSJim Jagielski // RuntimeException aExc;
261*b1cdbd2cSJim Jagielski // aExc.Message = OUString::createFromAscii("illegal vtable index!");
262*b1cdbd2cSJim Jagielski // aExc.Context = (XInterface *)pThis;
263*b1cdbd2cSJim Jagielski // throw aExc;
264*b1cdbd2cSJim Jagielski // }
265*b1cdbd2cSJim Jagielski
266*b1cdbd2cSJim Jagielski // determine called method
267*b1cdbd2cSJim Jagielski sal_Int32 nMemberPos = pTypeDescr->pMapFunctionIndexToMemberIndex[nFunctionIndex];
268*b1cdbd2cSJim Jagielski OSL_ENSURE( nMemberPos < pTypeDescr->nAllMembers, "### illegal member index!" );
269*b1cdbd2cSJim Jagielski
270*b1cdbd2cSJim Jagielski TypeDescription aMemberDescr( pTypeDescr->ppAllMembers[nMemberPos] );
271*b1cdbd2cSJim Jagielski
272*b1cdbd2cSJim Jagielski typelib_TypeClass eRet;
273*b1cdbd2cSJim Jagielski switch (aMemberDescr.get()->eTypeClass)
274*b1cdbd2cSJim Jagielski {
275*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_ATTRIBUTE:
276*b1cdbd2cSJim Jagielski {
277*b1cdbd2cSJim Jagielski if (pTypeDescr->pMapMemberIndexToFunctionIndex[nMemberPos] == nFunctionIndex)
278*b1cdbd2cSJim Jagielski {
279*b1cdbd2cSJim Jagielski // is GET method
280*b1cdbd2cSJim Jagielski eRet = cpp2uno_call(
281*b1cdbd2cSJim Jagielski pCppI, aMemberDescr.get(),
282*b1cdbd2cSJim Jagielski ((typelib_InterfaceAttributeTypeDescription *)aMemberDescr.get())->pAttributeTypeRef,
283*b1cdbd2cSJim Jagielski 0, 0, // no params
284*b1cdbd2cSJim Jagielski pCallStack, pRegisterReturn );
285*b1cdbd2cSJim Jagielski }
286*b1cdbd2cSJim Jagielski else
287*b1cdbd2cSJim Jagielski {
288*b1cdbd2cSJim Jagielski // is SET method
289*b1cdbd2cSJim Jagielski typelib_MethodParameter aParam;
290*b1cdbd2cSJim Jagielski aParam.pTypeRef =
291*b1cdbd2cSJim Jagielski ((typelib_InterfaceAttributeTypeDescription *)aMemberDescr.get())->pAttributeTypeRef;
292*b1cdbd2cSJim Jagielski aParam.bIn = sal_True;
293*b1cdbd2cSJim Jagielski aParam.bOut = sal_False;
294*b1cdbd2cSJim Jagielski
295*b1cdbd2cSJim Jagielski eRet = cpp2uno_call(
296*b1cdbd2cSJim Jagielski pCppI, aMemberDescr.get(),
297*b1cdbd2cSJim Jagielski 0, // indicates void return
298*b1cdbd2cSJim Jagielski 1, &aParam,
299*b1cdbd2cSJim Jagielski pCallStack, pRegisterReturn );
300*b1cdbd2cSJim Jagielski }
301*b1cdbd2cSJim Jagielski break;
302*b1cdbd2cSJim Jagielski }
303*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_METHOD:
304*b1cdbd2cSJim Jagielski {
305*b1cdbd2cSJim Jagielski // is METHOD
306*b1cdbd2cSJim Jagielski switch (nFunctionIndex)
307*b1cdbd2cSJim Jagielski {
308*b1cdbd2cSJim Jagielski // standard XInterface vtable calls
309*b1cdbd2cSJim Jagielski case 1: // acquire()
310*b1cdbd2cSJim Jagielski pCppI->acquireProxy(); // non virtual call!
311*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_VOID;
312*b1cdbd2cSJim Jagielski break;
313*b1cdbd2cSJim Jagielski case 2: // release()
314*b1cdbd2cSJim Jagielski pCppI->releaseProxy(); // non virtual call!
315*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_VOID;
316*b1cdbd2cSJim Jagielski break;
317*b1cdbd2cSJim Jagielski case 0: // queryInterface() opt
318*b1cdbd2cSJim Jagielski {
319*b1cdbd2cSJim Jagielski typelib_TypeDescription * pTD = 0;
320*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET( &pTD, reinterpret_cast< Type * >( pCallStack[2] )->getTypeLibType() );
321*b1cdbd2cSJim Jagielski if (pTD)
322*b1cdbd2cSJim Jagielski {
323*b1cdbd2cSJim Jagielski XInterface * pInterface = 0;
324*b1cdbd2cSJim Jagielski (*pCppI->getBridge()->getCppEnv()->getRegisteredInterface)(
325*b1cdbd2cSJim Jagielski pCppI->getBridge()->getCppEnv(),
326*b1cdbd2cSJim Jagielski (void **)&pInterface, pCppI->getOid().pData,
327*b1cdbd2cSJim Jagielski (typelib_InterfaceTypeDescription *)pTD );
328*b1cdbd2cSJim Jagielski
329*b1cdbd2cSJim Jagielski if (pInterface)
330*b1cdbd2cSJim Jagielski {
331*b1cdbd2cSJim Jagielski ::uno_any_construct(
332*b1cdbd2cSJim Jagielski reinterpret_cast< uno_Any * >( pCallStack[0] ),
333*b1cdbd2cSJim Jagielski &pInterface, pTD,
334*b1cdbd2cSJim Jagielski reinterpret_cast< uno_AcquireFunc >(cpp_acquire) );
335*b1cdbd2cSJim Jagielski pInterface->release();
336*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pTD );
337*b1cdbd2cSJim Jagielski *(void **)pRegisterReturn = pCallStack[0];
338*b1cdbd2cSJim Jagielski eRet = typelib_TypeClass_ANY;
339*b1cdbd2cSJim Jagielski break;
340*b1cdbd2cSJim Jagielski }
341*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE( pTD );
342*b1cdbd2cSJim Jagielski }
343*b1cdbd2cSJim Jagielski } // else perform queryInterface()
344*b1cdbd2cSJim Jagielski default:
345*b1cdbd2cSJim Jagielski eRet = cpp2uno_call(
346*b1cdbd2cSJim Jagielski pCppI, aMemberDescr.get(),
347*b1cdbd2cSJim Jagielski ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->pReturnTypeRef,
348*b1cdbd2cSJim Jagielski ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->nParams,
349*b1cdbd2cSJim Jagielski ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->pParams,
350*b1cdbd2cSJim Jagielski pCallStack, pRegisterReturn );
351*b1cdbd2cSJim Jagielski }
352*b1cdbd2cSJim Jagielski break;
353*b1cdbd2cSJim Jagielski }
354*b1cdbd2cSJim Jagielski // default:
355*b1cdbd2cSJim Jagielski // {
356*b1cdbd2cSJim Jagielski // RuntimeException aExc;
357*b1cdbd2cSJim Jagielski // aExc.Message = OUString::createFromAscii("no member description found!");
358*b1cdbd2cSJim Jagielski // aExc.Context = (XInterface *)pThis;
359*b1cdbd2cSJim Jagielski // throw aExc;
360*b1cdbd2cSJim Jagielski // // is here for dummy
361*b1cdbd2cSJim Jagielski // eRet = typelib_TypeClass_VOID;
362*b1cdbd2cSJim Jagielski // }
363*b1cdbd2cSJim Jagielski }
364*b1cdbd2cSJim Jagielski
365*b1cdbd2cSJim Jagielski return eRet;
366*b1cdbd2cSJim Jagielski }
367*b1cdbd2cSJim Jagielski
368*b1cdbd2cSJim Jagielski }
369*b1cdbd2cSJim Jagielski
370*b1cdbd2cSJim Jagielski //==================================================================================================
cpp_vtable_call(int nFunctionIndex,int nVtableOffset,void ** pCallStack)371*b1cdbd2cSJim Jagielski extern "C" int cpp_vtable_call(
372*b1cdbd2cSJim Jagielski int nFunctionIndex, int nVtableOffset, void** pCallStack )
373*b1cdbd2cSJim Jagielski {
374*b1cdbd2cSJim Jagielski sal_Int64 nRegReturn;
375*b1cdbd2cSJim Jagielski typelib_TypeClass aType = cpp_mediate(
376*b1cdbd2cSJim Jagielski nFunctionIndex, nVtableOffset, pCallStack, &nRegReturn );
377*b1cdbd2cSJim Jagielski OSL_ASSERT( sizeof(void *) == sizeof(sal_Int32) );
378*b1cdbd2cSJim Jagielski switch( aType )
379*b1cdbd2cSJim Jagielski {
380*b1cdbd2cSJim Jagielski // move return value into register space
381*b1cdbd2cSJim Jagielski // (will be loaded by machine code snippet)
382*b1cdbd2cSJim Jagielski // Use pCallStack[1/2] instead of pCallStack[0/1], because the former is
383*b1cdbd2cSJim Jagielski // properly dword aligned:
384*b1cdbd2cSJim Jagielski case typelib_TypeClass_BOOLEAN:
385*b1cdbd2cSJim Jagielski case typelib_TypeClass_BYTE:
386*b1cdbd2cSJim Jagielski pCallStack[1] = (void*)*(char*)&nRegReturn;
387*b1cdbd2cSJim Jagielski break;
388*b1cdbd2cSJim Jagielski case typelib_TypeClass_CHAR:
389*b1cdbd2cSJim Jagielski case typelib_TypeClass_SHORT:
390*b1cdbd2cSJim Jagielski case typelib_TypeClass_UNSIGNED_SHORT:
391*b1cdbd2cSJim Jagielski pCallStack[1] = (void*)*(short*)&nRegReturn;
392*b1cdbd2cSJim Jagielski break;
393*b1cdbd2cSJim Jagielski case typelib_TypeClass_DOUBLE:
394*b1cdbd2cSJim Jagielski case typelib_TypeClass_HYPER:
395*b1cdbd2cSJim Jagielski case typelib_TypeClass_UNSIGNED_HYPER:
396*b1cdbd2cSJim Jagielski // move long to %i1
397*b1cdbd2cSJim Jagielski pCallStack[2] = ((void **)&nRegReturn)[ 1 ];
398*b1cdbd2cSJim Jagielski case typelib_TypeClass_FLOAT:
399*b1cdbd2cSJim Jagielski default:
400*b1cdbd2cSJim Jagielski // move long to %i0
401*b1cdbd2cSJim Jagielski pCallStack[1] = ((void **)&nRegReturn)[ 0 ];
402*b1cdbd2cSJim Jagielski break;
403*b1cdbd2cSJim Jagielski }
404*b1cdbd2cSJim Jagielski return aType;
405*b1cdbd2cSJim Jagielski }
406*b1cdbd2cSJim Jagielski
407*b1cdbd2cSJim Jagielski //==================================================================================================
408*b1cdbd2cSJim Jagielski namespace {
409*b1cdbd2cSJim Jagielski
410*b1cdbd2cSJim Jagielski extern "C" void privateSnippetExecutor();
411*b1cdbd2cSJim Jagielski
412*b1cdbd2cSJim Jagielski int const codeSnippetSize = 7 * 4;
413*b1cdbd2cSJim Jagielski
codeSnippet(unsigned char * code,sal_Int32 functionIndex,sal_Int32 vtableOffset,bool simpleRetType)414*b1cdbd2cSJim Jagielski unsigned char * codeSnippet(
415*b1cdbd2cSJim Jagielski unsigned char * code, sal_Int32 functionIndex, sal_Int32 vtableOffset,
416*b1cdbd2cSJim Jagielski bool simpleRetType)
417*b1cdbd2cSJim Jagielski {
418*b1cdbd2cSJim Jagielski sal_uInt32 index = functionIndex;
419*b1cdbd2cSJim Jagielski if (!simpleRetType) {
420*b1cdbd2cSJim Jagielski index |= 0x80000000;
421*b1cdbd2cSJim Jagielski }
422*b1cdbd2cSJim Jagielski unsigned int * p = reinterpret_cast< unsigned int * >(code);
423*b1cdbd2cSJim Jagielski OSL_ASSERT(sizeof (unsigned int) == 4);
424*b1cdbd2cSJim Jagielski // save %sp, -96, %sp ! 92 byte minimal stack frame, + 4 byte dword align:
425*b1cdbd2cSJim Jagielski *p++ = 0x9DE3BFA0;
426*b1cdbd2cSJim Jagielski // sethi %hi(privateSnippetExecutor), %l0:
427*b1cdbd2cSJim Jagielski *p++ = 0x21000000
428*b1cdbd2cSJim Jagielski | (reinterpret_cast< unsigned int >(privateSnippetExecutor) >> 10);
429*b1cdbd2cSJim Jagielski // sethi %hi(index), %o0:
430*b1cdbd2cSJim Jagielski *p++ = 0x11000000 | (index >> 10);
431*b1cdbd2cSJim Jagielski // or %o0, %lo(index), %o0:
432*b1cdbd2cSJim Jagielski *p++ = 0x90122000 | (index & 0x3FF);
433*b1cdbd2cSJim Jagielski // sethi %hi(vtableOffset), %o1:
434*b1cdbd2cSJim Jagielski *p++ = 0x13000000 | (vtableOffset >> 10);
435*b1cdbd2cSJim Jagielski // jmpl %l0, %lo(privateSnippetExecutor), %g0:
436*b1cdbd2cSJim Jagielski *p++ = 0x81C42000
437*b1cdbd2cSJim Jagielski | (reinterpret_cast< unsigned int >(privateSnippetExecutor) & 0x3FF);
438*b1cdbd2cSJim Jagielski // or %o1, %lo(vtableOffset), %o1:
439*b1cdbd2cSJim Jagielski *p++ = 0x92126000 | (vtableOffset & 0x3FF);
440*b1cdbd2cSJim Jagielski OSL_ASSERT(
441*b1cdbd2cSJim Jagielski reinterpret_cast< unsigned char * >(p) - code <= codeSnippetSize);
442*b1cdbd2cSJim Jagielski return code + codeSnippetSize;
443*b1cdbd2cSJim Jagielski }
444*b1cdbd2cSJim Jagielski
445*b1cdbd2cSJim Jagielski }
446*b1cdbd2cSJim Jagielski
447*b1cdbd2cSJim Jagielski struct bridges::cpp_uno::shared::VtableFactory::Slot { void * fn; };
448*b1cdbd2cSJim Jagielski
449*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::Slot *
mapBlockToVtable(void * block)450*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::mapBlockToVtable(void * block)
451*b1cdbd2cSJim Jagielski {
452*b1cdbd2cSJim Jagielski return static_cast< Slot * >(block) + 1;
453*b1cdbd2cSJim Jagielski }
454*b1cdbd2cSJim Jagielski
getBlockSize(sal_Int32 slotCount)455*b1cdbd2cSJim Jagielski sal_Size bridges::cpp_uno::shared::VtableFactory::getBlockSize(
456*b1cdbd2cSJim Jagielski sal_Int32 slotCount)
457*b1cdbd2cSJim Jagielski {
458*b1cdbd2cSJim Jagielski return (slotCount + 3) * sizeof (Slot) + slotCount * codeSnippetSize;
459*b1cdbd2cSJim Jagielski }
460*b1cdbd2cSJim Jagielski
461*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::Slot *
initializeBlock(void * block,sal_Int32 slotCount)462*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::VtableFactory::initializeBlock(
463*b1cdbd2cSJim Jagielski void * block, sal_Int32 slotCount)
464*b1cdbd2cSJim Jagielski {
465*b1cdbd2cSJim Jagielski Slot * slots = mapBlockToVtable(block) + 2;
466*b1cdbd2cSJim Jagielski slots[-3].fn = 0; // RTTI
467*b1cdbd2cSJim Jagielski slots[-2].fn = 0; // null
468*b1cdbd2cSJim Jagielski slots[-1].fn = 0; // destructor
469*b1cdbd2cSJim Jagielski return slots + slotCount;
470*b1cdbd2cSJim Jagielski }
471*b1cdbd2cSJim Jagielski
addLocalFunctions(Slot ** slots,unsigned char * code,typelib_InterfaceTypeDescription const * type,sal_Int32 functionOffset,sal_Int32 functionCount,sal_Int32 vtableOffset)472*b1cdbd2cSJim Jagielski unsigned char * bridges::cpp_uno::shared::VtableFactory::addLocalFunctions(
473*b1cdbd2cSJim Jagielski Slot ** slots, unsigned char * code,
474*b1cdbd2cSJim Jagielski typelib_InterfaceTypeDescription const * type, sal_Int32 functionOffset,
475*b1cdbd2cSJim Jagielski sal_Int32 functionCount, sal_Int32 vtableOffset)
476*b1cdbd2cSJim Jagielski {
477*b1cdbd2cSJim Jagielski (*slots) -= functionCount;
478*b1cdbd2cSJim Jagielski Slot * s = *slots;
479*b1cdbd2cSJim Jagielski for (sal_Int32 i = 0; i < type->nMembers; ++i) {
480*b1cdbd2cSJim Jagielski typelib_TypeDescription * member = 0;
481*b1cdbd2cSJim Jagielski TYPELIB_DANGER_GET(&member, type->ppMembers[i]);
482*b1cdbd2cSJim Jagielski OSL_ASSERT(member != 0);
483*b1cdbd2cSJim Jagielski switch (member->eTypeClass) {
484*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_ATTRIBUTE:
485*b1cdbd2cSJim Jagielski // Getter:
486*b1cdbd2cSJim Jagielski (s++)->fn = code;
487*b1cdbd2cSJim Jagielski code = codeSnippet(
488*b1cdbd2cSJim Jagielski code, functionOffset++, vtableOffset,
489*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::isSimpleType(
490*b1cdbd2cSJim Jagielski reinterpret_cast<
491*b1cdbd2cSJim Jagielski typelib_InterfaceAttributeTypeDescription * >(
492*b1cdbd2cSJim Jagielski member)->pAttributeTypeRef));
493*b1cdbd2cSJim Jagielski // Setter:
494*b1cdbd2cSJim Jagielski if (!reinterpret_cast<
495*b1cdbd2cSJim Jagielski typelib_InterfaceAttributeTypeDescription * >(
496*b1cdbd2cSJim Jagielski member)->bReadOnly)
497*b1cdbd2cSJim Jagielski {
498*b1cdbd2cSJim Jagielski (s++)->fn = code;
499*b1cdbd2cSJim Jagielski code = codeSnippet(code, functionOffset++, vtableOffset, true);
500*b1cdbd2cSJim Jagielski }
501*b1cdbd2cSJim Jagielski break;
502*b1cdbd2cSJim Jagielski
503*b1cdbd2cSJim Jagielski case typelib_TypeClass_INTERFACE_METHOD:
504*b1cdbd2cSJim Jagielski (s++)->fn = code;
505*b1cdbd2cSJim Jagielski code = codeSnippet(
506*b1cdbd2cSJim Jagielski code, functionOffset++, vtableOffset,
507*b1cdbd2cSJim Jagielski bridges::cpp_uno::shared::isSimpleType(
508*b1cdbd2cSJim Jagielski reinterpret_cast<
509*b1cdbd2cSJim Jagielski typelib_InterfaceMethodTypeDescription * >(
510*b1cdbd2cSJim Jagielski member)->pReturnTypeRef));
511*b1cdbd2cSJim Jagielski break;
512*b1cdbd2cSJim Jagielski
513*b1cdbd2cSJim Jagielski default:
514*b1cdbd2cSJim Jagielski OSL_ASSERT(false);
515*b1cdbd2cSJim Jagielski break;
516*b1cdbd2cSJim Jagielski }
517*b1cdbd2cSJim Jagielski TYPELIB_DANGER_RELEASE(member);
518*b1cdbd2cSJim Jagielski }
519*b1cdbd2cSJim Jagielski return code;
520*b1cdbd2cSJim Jagielski }
521*b1cdbd2cSJim Jagielski
flushCode(unsigned char const * begin,unsigned char const * end)522*b1cdbd2cSJim Jagielski void bridges::cpp_uno::shared::VtableFactory::flushCode(
523*b1cdbd2cSJim Jagielski unsigned char const * begin, unsigned char const * end)
524*b1cdbd2cSJim Jagielski {
525*b1cdbd2cSJim Jagielski bridges::cpp_uno::cc50_solaris_sparc::flushCode(begin, end);
526*b1cdbd2cSJim Jagielski }
527