1*af84ad07SPedro Giffuni /**************************************************************
2*af84ad07SPedro Giffuni *
3*af84ad07SPedro Giffuni * Licensed to the Apache Software Foundation (ASF) under one
4*af84ad07SPedro Giffuni * or more contributor license agreements. See the NOTICE file
5*af84ad07SPedro Giffuni * distributed with this work for additional information
6*af84ad07SPedro Giffuni * regarding copyright ownership. The ASF licenses this file
7*af84ad07SPedro Giffuni * to you under the Apache License, Version 2.0 (the
8*af84ad07SPedro Giffuni * "License"); you may not use this file except in compliance
9*af84ad07SPedro Giffuni * with the License. You may obtain a copy of the License at
10*af84ad07SPedro Giffuni *
11*af84ad07SPedro Giffuni * http://www.apache.org/licenses/LICENSE-2.0
12*af84ad07SPedro Giffuni *
13*af84ad07SPedro Giffuni * Unless required by applicable law or agreed to in writing,
14*af84ad07SPedro Giffuni * software distributed under the License is distributed on an
15*af84ad07SPedro Giffuni * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*af84ad07SPedro Giffuni * KIND, either express or implied. See the License for the
17*af84ad07SPedro Giffuni * specific language governing permissions and limitations
18*af84ad07SPedro Giffuni * under the License.
19*af84ad07SPedro Giffuni *
20*af84ad07SPedro Giffuni *************************************************************/
21*af84ad07SPedro Giffuni
22*af84ad07SPedro Giffuni
23*af84ad07SPedro Giffuni
24*af84ad07SPedro Giffuni // MARKER(update_precomp.py): autogen include statement, do not remove
25*af84ad07SPedro Giffuni #include "precompiled_bridges.hxx"
26*af84ad07SPedro Giffuni
27*af84ad07SPedro Giffuni #include <string.h>
28*af84ad07SPedro Giffuni
29*af84ad07SPedro Giffuni #include <com/sun/star/uno/genfunc.hxx>
30*af84ad07SPedro Giffuni #include <uno/data.h>
31*af84ad07SPedro Giffuni #include <typelib/typedescription.hxx>
32*af84ad07SPedro Giffuni
33*af84ad07SPedro Giffuni #include "bridges/cpp_uno/shared/bridge.hxx"
34*af84ad07SPedro Giffuni #include "bridges/cpp_uno/shared/cppinterfaceproxy.hxx"
35*af84ad07SPedro Giffuni #include "bridges/cpp_uno/shared/types.hxx"
36*af84ad07SPedro Giffuni #include "bridges/cpp_uno/shared/vtablefactory.hxx"
37*af84ad07SPedro Giffuni
38*af84ad07SPedro Giffuni #include "share.hxx"
39*af84ad07SPedro Giffuni // #include <stdio.h>
40*af84ad07SPedro Giffuni
41*af84ad07SPedro Giffuni
42*af84ad07SPedro Giffuni using namespace ::com::sun::star::uno;
43*af84ad07SPedro Giffuni
44*af84ad07SPedro Giffuni namespace
45*af84ad07SPedro Giffuni {
46*af84ad07SPedro Giffuni
47*af84ad07SPedro Giffuni //==================================================================================================
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_Int64 * pRegisterReturn)48*af84ad07SPedro Giffuni static typelib_TypeClass cpp2uno_call(
49*af84ad07SPedro Giffuni bridges::cpp_uno::shared::CppInterfaceProxy * pThis,
50*af84ad07SPedro Giffuni const typelib_TypeDescription * pMemberTypeDescr,
51*af84ad07SPedro Giffuni typelib_TypeDescriptionReference * pReturnTypeRef, // 0 indicates void return
52*af84ad07SPedro Giffuni sal_Int32 nParams, typelib_MethodParameter * pParams,
53*af84ad07SPedro Giffuni void ** gpreg, void ** fpreg, void ** ovrflw,
54*af84ad07SPedro Giffuni sal_Int64 * pRegisterReturn /* space for register return */ )
55*af84ad07SPedro Giffuni {
56*af84ad07SPedro Giffuni int ng = 0; //number of gpr registers used
57*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
58*af84ad07SPedro Giffuni int nf = 0; //number of fpr regsiters used
59*af84ad07SPedro Giffuni #endif
60*af84ad07SPedro Giffuni void ** pCppStack; //temporary stack pointer
61*af84ad07SPedro Giffuni
62*af84ad07SPedro Giffuni // gpreg: [ret *], this, [gpr params]
63*af84ad07SPedro Giffuni // fpreg: [fpr params]
64*af84ad07SPedro Giffuni // ovrflw: [gpr or fpr params (properly aligned)]
65*af84ad07SPedro Giffuni
66*af84ad07SPedro Giffuni // return
67*af84ad07SPedro Giffuni typelib_TypeDescription * pReturnTypeDescr = 0;
68*af84ad07SPedro Giffuni if (pReturnTypeRef)
69*af84ad07SPedro Giffuni TYPELIB_DANGER_GET( &pReturnTypeDescr, pReturnTypeRef );
70*af84ad07SPedro Giffuni
71*af84ad07SPedro Giffuni void * pUnoReturn = 0;
72*af84ad07SPedro Giffuni void * pCppReturn = 0; // complex return ptr: if != 0 && != pUnoReturn, reconversion need
73*af84ad07SPedro Giffuni
74*af84ad07SPedro Giffuni if (pReturnTypeDescr)
75*af84ad07SPedro Giffuni {
76*af84ad07SPedro Giffuni if (bridges::cpp_uno::shared::isSimpleType( pReturnTypeDescr ))
77*af84ad07SPedro Giffuni {
78*af84ad07SPedro Giffuni pUnoReturn = pRegisterReturn; // direct way for simple types
79*af84ad07SPedro Giffuni }
80*af84ad07SPedro Giffuni else // complex return via ptr (pCppReturn)
81*af84ad07SPedro Giffuni {
82*af84ad07SPedro Giffuni pCppReturn = *(void **)gpreg;
83*af84ad07SPedro Giffuni gpreg++;
84*af84ad07SPedro Giffuni ng++;
85*af84ad07SPedro Giffuni
86*af84ad07SPedro Giffuni pUnoReturn = (bridges::cpp_uno::shared::relatesToInterfaceType( pReturnTypeDescr )
87*af84ad07SPedro Giffuni ? alloca( pReturnTypeDescr->nSize )
88*af84ad07SPedro Giffuni : pCppReturn); // direct way
89*af84ad07SPedro Giffuni }
90*af84ad07SPedro Giffuni }
91*af84ad07SPedro Giffuni // pop this
92*af84ad07SPedro Giffuni gpreg++;
93*af84ad07SPedro Giffuni ng++;
94*af84ad07SPedro Giffuni
95*af84ad07SPedro Giffuni // stack space
96*af84ad07SPedro Giffuni OSL_ENSURE( sizeof(void *) == sizeof(sal_Int32), "### unexpected size!" );
97*af84ad07SPedro Giffuni // parameters
98*af84ad07SPedro Giffuni void ** pUnoArgs = (void **)alloca( 4 * sizeof(void *) * nParams );
99*af84ad07SPedro Giffuni void ** pCppArgs = pUnoArgs + nParams;
100*af84ad07SPedro Giffuni // indizes of values this have to be converted (interface conversion cpp<=>uno)
101*af84ad07SPedro Giffuni sal_Int32 * pTempIndizes = (sal_Int32 *)(pUnoArgs + (2 * nParams));
102*af84ad07SPedro Giffuni // type descriptions for reconversions
103*af84ad07SPedro Giffuni typelib_TypeDescription ** ppTempParamTypeDescr = (typelib_TypeDescription **)(pUnoArgs + (3 * nParams));
104*af84ad07SPedro Giffuni
105*af84ad07SPedro Giffuni sal_Int32 nTempIndizes = 0;
106*af84ad07SPedro Giffuni
107*af84ad07SPedro Giffuni for ( sal_Int32 nPos = 0; nPos < nParams; ++nPos )
108*af84ad07SPedro Giffuni {
109*af84ad07SPedro Giffuni const typelib_MethodParameter & rParam = pParams[nPos];
110*af84ad07SPedro Giffuni typelib_TypeDescription * pParamTypeDescr = 0;
111*af84ad07SPedro Giffuni TYPELIB_DANGER_GET( &pParamTypeDescr, rParam.pTypeRef );
112*af84ad07SPedro Giffuni
113*af84ad07SPedro Giffuni if (!rParam.bOut && bridges::cpp_uno::shared::isSimpleType( pParamTypeDescr ))
114*af84ad07SPedro Giffuni // value
115*af84ad07SPedro Giffuni {
116*af84ad07SPedro Giffuni
117*af84ad07SPedro Giffuni switch (pParamTypeDescr->eTypeClass)
118*af84ad07SPedro Giffuni {
119*af84ad07SPedro Giffuni
120*af84ad07SPedro Giffuni case typelib_TypeClass_DOUBLE:
121*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
122*af84ad07SPedro Giffuni if (nf < 8) {
123*af84ad07SPedro Giffuni pCppArgs[nPos] = fpreg;
124*af84ad07SPedro Giffuni pUnoArgs[nPos] = fpreg;
125*af84ad07SPedro Giffuni nf++;
126*af84ad07SPedro Giffuni fpreg += 2;
127*af84ad07SPedro Giffuni #else
128*af84ad07SPedro Giffuni if (ng & 1) {
129*af84ad07SPedro Giffuni ng++;
130*af84ad07SPedro Giffuni gpreg++;
131*af84ad07SPedro Giffuni }
132*af84ad07SPedro Giffuni if (ng < 8) {
133*af84ad07SPedro Giffuni pCppArgs[nPos] = gpreg;
134*af84ad07SPedro Giffuni pUnoArgs[nPos] = gpreg;
135*af84ad07SPedro Giffuni ng += 2;
136*af84ad07SPedro Giffuni gpreg += 2;
137*af84ad07SPedro Giffuni #endif
138*af84ad07SPedro Giffuni } else {
139*af84ad07SPedro Giffuni if (((long)ovrflw) & 4) ovrflw++;
140*af84ad07SPedro Giffuni pCppArgs[nPos] = ovrflw;
141*af84ad07SPedro Giffuni pUnoArgs[nPos] = ovrflw;
142*af84ad07SPedro Giffuni ovrflw += 2;
143*af84ad07SPedro Giffuni }
144*af84ad07SPedro Giffuni break;
145*af84ad07SPedro Giffuni
146*af84ad07SPedro Giffuni case typelib_TypeClass_FLOAT:
147*af84ad07SPedro Giffuni // fpreg are all double values so need to
148*af84ad07SPedro Giffuni // modify fpreg to be a single word float value
149*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
150*af84ad07SPedro Giffuni if (nf < 8) {
151*af84ad07SPedro Giffuni float tmp = (float) (*((double *)fpreg));
152*af84ad07SPedro Giffuni (*((float *) fpreg)) = tmp;
153*af84ad07SPedro Giffuni pCppArgs[nPos] = fpreg;
154*af84ad07SPedro Giffuni pUnoArgs[nPos] = fpreg;
155*af84ad07SPedro Giffuni nf++;
156*af84ad07SPedro Giffuni fpreg += 2;
157*af84ad07SPedro Giffuni #else
158*af84ad07SPedro Giffuni if (ng < 8) {
159*af84ad07SPedro Giffuni pCppArgs[nPos] = gpreg;
160*af84ad07SPedro Giffuni pUnoArgs[nPos] = gpreg;
161*af84ad07SPedro Giffuni ng++;
162*af84ad07SPedro Giffuni gpreg++;
163*af84ad07SPedro Giffuni #endif
164*af84ad07SPedro Giffuni } else {
165*af84ad07SPedro Giffuni #if 0 /* abi is not being followed correctly */
166*af84ad07SPedro Giffuni if (((long)ovrflw) & 4) ovrflw++;
167*af84ad07SPedro Giffuni float tmp = (float) (*((double *)ovrflw));
168*af84ad07SPedro Giffuni (*((float *) ovrflw)) = tmp;
169*af84ad07SPedro Giffuni pCppArgs[nPos] = ovrflw;
170*af84ad07SPedro Giffuni pUnoArgs[nPos] = ovrflw;
171*af84ad07SPedro Giffuni ovrflw += 2;
172*af84ad07SPedro Giffuni #else
173*af84ad07SPedro Giffuni pCppArgs[nPos] = ovrflw;
174*af84ad07SPedro Giffuni pUnoArgs[nPos] = ovrflw;
175*af84ad07SPedro Giffuni ovrflw += 1;
176*af84ad07SPedro Giffuni #endif
177*af84ad07SPedro Giffuni }
178*af84ad07SPedro Giffuni break;
179*af84ad07SPedro Giffuni
180*af84ad07SPedro Giffuni case typelib_TypeClass_HYPER:
181*af84ad07SPedro Giffuni case typelib_TypeClass_UNSIGNED_HYPER:
182*af84ad07SPedro Giffuni if (ng & 1) {
183*af84ad07SPedro Giffuni ng++;
184*af84ad07SPedro Giffuni gpreg++;
185*af84ad07SPedro Giffuni }
186*af84ad07SPedro Giffuni if (ng < 8) {
187*af84ad07SPedro Giffuni pCppArgs[nPos] = gpreg;
188*af84ad07SPedro Giffuni pUnoArgs[nPos] = gpreg;
189*af84ad07SPedro Giffuni ng += 2;
190*af84ad07SPedro Giffuni gpreg += 2;
191*af84ad07SPedro Giffuni } else {
192*af84ad07SPedro Giffuni if (((long)ovrflw) & 4) ovrflw++;
193*af84ad07SPedro Giffuni pCppArgs[nPos] = ovrflw;
194*af84ad07SPedro Giffuni pUnoArgs[nPos] = ovrflw;
195*af84ad07SPedro Giffuni ovrflw += 2;
196*af84ad07SPedro Giffuni }
197*af84ad07SPedro Giffuni break;
198*af84ad07SPedro Giffuni
199*af84ad07SPedro Giffuni case typelib_TypeClass_BYTE:
200*af84ad07SPedro Giffuni case typelib_TypeClass_BOOLEAN:
201*af84ad07SPedro Giffuni if (ng < 8) {
202*af84ad07SPedro Giffuni pCppArgs[nPos] = (((char *)gpreg) + 3);
203*af84ad07SPedro Giffuni pUnoArgs[nPos] = (((char *)gpreg) + 3);
204*af84ad07SPedro Giffuni ng++;
205*af84ad07SPedro Giffuni gpreg++;
206*af84ad07SPedro Giffuni } else {
207*af84ad07SPedro Giffuni pCppArgs[nPos] = (((char *)ovrflw) + 3);
208*af84ad07SPedro Giffuni pUnoArgs[nPos] = (((char *)ovrflw) + 3);
209*af84ad07SPedro Giffuni ovrflw++;
210*af84ad07SPedro Giffuni }
211*af84ad07SPedro Giffuni break;
212*af84ad07SPedro Giffuni
213*af84ad07SPedro Giffuni
214*af84ad07SPedro Giffuni case typelib_TypeClass_CHAR:
215*af84ad07SPedro Giffuni case typelib_TypeClass_SHORT:
216*af84ad07SPedro Giffuni case typelib_TypeClass_UNSIGNED_SHORT:
217*af84ad07SPedro Giffuni if (ng < 8) {
218*af84ad07SPedro Giffuni pCppArgs[nPos] = (((char *)gpreg)+ 2);
219*af84ad07SPedro Giffuni pUnoArgs[nPos] = (((char *)gpreg)+ 2);
220*af84ad07SPedro Giffuni ng++;
221*af84ad07SPedro Giffuni gpreg++;
222*af84ad07SPedro Giffuni } else {
223*af84ad07SPedro Giffuni pCppArgs[nPos] = (((char *)ovrflw) + 2);
224*af84ad07SPedro Giffuni pUnoArgs[nPos] = (((char *)ovrflw) + 2);
225*af84ad07SPedro Giffuni ovrflw++;
226*af84ad07SPedro Giffuni }
227*af84ad07SPedro Giffuni break;
228*af84ad07SPedro Giffuni
229*af84ad07SPedro Giffuni
230*af84ad07SPedro Giffuni default:
231*af84ad07SPedro Giffuni if (ng < 8) {
232*af84ad07SPedro Giffuni pCppArgs[nPos] = gpreg;
233*af84ad07SPedro Giffuni pUnoArgs[nPos] = gpreg;
234*af84ad07SPedro Giffuni ng++;
235*af84ad07SPedro Giffuni gpreg++;
236*af84ad07SPedro Giffuni } else {
237*af84ad07SPedro Giffuni pCppArgs[nPos] = ovrflw;
238*af84ad07SPedro Giffuni pUnoArgs[nPos] = ovrflw;
239*af84ad07SPedro Giffuni ovrflw++;
240*af84ad07SPedro Giffuni }
241*af84ad07SPedro Giffuni break;
242*af84ad07SPedro Giffuni
243*af84ad07SPedro Giffuni }
244*af84ad07SPedro Giffuni // no longer needed
245*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pParamTypeDescr );
246*af84ad07SPedro Giffuni }
247*af84ad07SPedro Giffuni else // ptr to complex value | ref
248*af84ad07SPedro Giffuni {
249*af84ad07SPedro Giffuni
250*af84ad07SPedro Giffuni if (ng < 8) {
251*af84ad07SPedro Giffuni pCppArgs[nPos] = *(void **)gpreg;
252*af84ad07SPedro Giffuni pCppStack = gpreg;
253*af84ad07SPedro Giffuni ng++;
254*af84ad07SPedro Giffuni gpreg++;
255*af84ad07SPedro Giffuni } else {
256*af84ad07SPedro Giffuni pCppArgs[nPos] = *(void **)ovrflw;
257*af84ad07SPedro Giffuni pCppStack = ovrflw;
258*af84ad07SPedro Giffuni ovrflw++;
259*af84ad07SPedro Giffuni }
260*af84ad07SPedro Giffuni
261*af84ad07SPedro Giffuni if (! rParam.bIn) // is pure out
262*af84ad07SPedro Giffuni {
263*af84ad07SPedro Giffuni // uno out is unconstructed mem!
264*af84ad07SPedro Giffuni pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize );
265*af84ad07SPedro Giffuni pTempIndizes[nTempIndizes] = nPos;
266*af84ad07SPedro Giffuni // will be released at reconversion
267*af84ad07SPedro Giffuni ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
268*af84ad07SPedro Giffuni }
269*af84ad07SPedro Giffuni // is in/inout
270*af84ad07SPedro Giffuni else if (bridges::cpp_uno::shared::relatesToInterfaceType( pParamTypeDescr ))
271*af84ad07SPedro Giffuni {
272*af84ad07SPedro Giffuni uno_copyAndConvertData( pUnoArgs[nPos] = alloca( pParamTypeDescr->nSize ),
273*af84ad07SPedro Giffuni *(void **)pCppStack, pParamTypeDescr,
274*af84ad07SPedro Giffuni pThis->getBridge()->getCpp2Uno() );
275*af84ad07SPedro Giffuni pTempIndizes[nTempIndizes] = nPos; // has to be reconverted
276*af84ad07SPedro Giffuni // will be released at reconversion
277*af84ad07SPedro Giffuni ppTempParamTypeDescr[nTempIndizes++] = pParamTypeDescr;
278*af84ad07SPedro Giffuni }
279*af84ad07SPedro Giffuni else // direct way
280*af84ad07SPedro Giffuni {
281*af84ad07SPedro Giffuni pUnoArgs[nPos] = *(void **)pCppStack;
282*af84ad07SPedro Giffuni // no longer needed
283*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pParamTypeDescr );
284*af84ad07SPedro Giffuni }
285*af84ad07SPedro Giffuni }
286*af84ad07SPedro Giffuni }
287*af84ad07SPedro Giffuni
288*af84ad07SPedro Giffuni // ExceptionHolder
289*af84ad07SPedro Giffuni uno_Any aUnoExc; // Any will be constructed by callee
290*af84ad07SPedro Giffuni uno_Any * pUnoExc = &aUnoExc;
291*af84ad07SPedro Giffuni
292*af84ad07SPedro Giffuni // invoke uno dispatch call
293*af84ad07SPedro Giffuni (*pThis->getUnoI()->pDispatcher)( pThis->getUnoI(), pMemberTypeDescr, pUnoReturn, pUnoArgs, &pUnoExc );
294*af84ad07SPedro Giffuni
295*af84ad07SPedro Giffuni // in case an exception occurred...
296*af84ad07SPedro Giffuni if (pUnoExc)
297*af84ad07SPedro Giffuni {
298*af84ad07SPedro Giffuni // destruct temporary in/inout params
299*af84ad07SPedro Giffuni for ( ; nTempIndizes--; )
300*af84ad07SPedro Giffuni {
301*af84ad07SPedro Giffuni sal_Int32 nIndex = pTempIndizes[nTempIndizes];
302*af84ad07SPedro Giffuni
303*af84ad07SPedro Giffuni if (pParams[nIndex].bIn) // is in/inout => was constructed
304*af84ad07SPedro Giffuni uno_destructData( pUnoArgs[nIndex], ppTempParamTypeDescr[nTempIndizes], 0 );
305*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( ppTempParamTypeDescr[nTempIndizes] );
306*af84ad07SPedro Giffuni }
307*af84ad07SPedro Giffuni if (pReturnTypeDescr)
308*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
309*af84ad07SPedro Giffuni
310*af84ad07SPedro Giffuni CPPU_CURRENT_NAMESPACE::raiseException( &aUnoExc, pThis->getBridge()->getUno2Cpp() );
311*af84ad07SPedro Giffuni // has to destruct the any
312*af84ad07SPedro Giffuni // is here for dummy
313*af84ad07SPedro Giffuni return typelib_TypeClass_VOID;
314*af84ad07SPedro Giffuni }
315*af84ad07SPedro Giffuni else // else no exception occurred...
316*af84ad07SPedro Giffuni {
317*af84ad07SPedro Giffuni // temporary params
318*af84ad07SPedro Giffuni for ( ; nTempIndizes--; )
319*af84ad07SPedro Giffuni {
320*af84ad07SPedro Giffuni sal_Int32 nIndex = pTempIndizes[nTempIndizes];
321*af84ad07SPedro Giffuni typelib_TypeDescription * pParamTypeDescr = ppTempParamTypeDescr[nTempIndizes];
322*af84ad07SPedro Giffuni
323*af84ad07SPedro Giffuni if (pParams[nIndex].bOut) // inout/out
324*af84ad07SPedro Giffuni {
325*af84ad07SPedro Giffuni // convert and assign
326*af84ad07SPedro Giffuni uno_destructData( pCppArgs[nIndex], pParamTypeDescr, cpp_release );
327*af84ad07SPedro Giffuni uno_copyAndConvertData( pCppArgs[nIndex], pUnoArgs[nIndex], pParamTypeDescr,
328*af84ad07SPedro Giffuni pThis->getBridge()->getUno2Cpp() );
329*af84ad07SPedro Giffuni }
330*af84ad07SPedro Giffuni // destroy temp uno param
331*af84ad07SPedro Giffuni uno_destructData( pUnoArgs[nIndex], pParamTypeDescr, 0 );
332*af84ad07SPedro Giffuni
333*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pParamTypeDescr );
334*af84ad07SPedro Giffuni }
335*af84ad07SPedro Giffuni // return
336*af84ad07SPedro Giffuni if (pCppReturn) // has complex return
337*af84ad07SPedro Giffuni {
338*af84ad07SPedro Giffuni if (pUnoReturn != pCppReturn) // needs reconversion
339*af84ad07SPedro Giffuni {
340*af84ad07SPedro Giffuni uno_copyAndConvertData( pCppReturn, pUnoReturn, pReturnTypeDescr,
341*af84ad07SPedro Giffuni pThis->getBridge()->getUno2Cpp() );
342*af84ad07SPedro Giffuni // destroy temp uno return
343*af84ad07SPedro Giffuni uno_destructData( pUnoReturn, pReturnTypeDescr, 0 );
344*af84ad07SPedro Giffuni }
345*af84ad07SPedro Giffuni // complex return ptr is set to return reg
346*af84ad07SPedro Giffuni *(void **)pRegisterReturn = pCppReturn;
347*af84ad07SPedro Giffuni }
348*af84ad07SPedro Giffuni if (pReturnTypeDescr)
349*af84ad07SPedro Giffuni {
350*af84ad07SPedro Giffuni typelib_TypeClass eRet = (typelib_TypeClass)pReturnTypeDescr->eTypeClass;
351*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pReturnTypeDescr );
352*af84ad07SPedro Giffuni return eRet;
353*af84ad07SPedro Giffuni }
354*af84ad07SPedro Giffuni else
355*af84ad07SPedro Giffuni return typelib_TypeClass_VOID;
356*af84ad07SPedro Giffuni }
357*af84ad07SPedro Giffuni }
358*af84ad07SPedro Giffuni
359*af84ad07SPedro Giffuni
360*af84ad07SPedro Giffuni //==================================================================================================
361*af84ad07SPedro Giffuni static typelib_TypeClass cpp_mediate(
362*af84ad07SPedro Giffuni sal_Int32 nFunctionIndex,
363*af84ad07SPedro Giffuni sal_Int32 nVtableOffset,
364*af84ad07SPedro Giffuni void ** gpreg, void ** fpreg, void ** ovrflw,
365*af84ad07SPedro Giffuni sal_Int64 * pRegisterReturn /* space for register return */ )
366*af84ad07SPedro Giffuni {
367*af84ad07SPedro Giffuni OSL_ENSURE( sizeof(sal_Int32)==sizeof(void *), "### unexpected!" );
368*af84ad07SPedro Giffuni
369*af84ad07SPedro Giffuni // gpreg: [ret *], this, [other gpr params]
370*af84ad07SPedro Giffuni // fpreg: [fpr params]
371*af84ad07SPedro Giffuni // ovrflw: [gpr or fpr params (properly aligned)]
372*af84ad07SPedro Giffuni
373*af84ad07SPedro Giffuni void * pThis;
374*af84ad07SPedro Giffuni if (nFunctionIndex & 0x80000000 )
375*af84ad07SPedro Giffuni {
376*af84ad07SPedro Giffuni nFunctionIndex &= 0x7fffffff;
377*af84ad07SPedro Giffuni pThis = gpreg[1];
378*af84ad07SPedro Giffuni }
379*af84ad07SPedro Giffuni else
380*af84ad07SPedro Giffuni {
381*af84ad07SPedro Giffuni pThis = gpreg[0];
382*af84ad07SPedro Giffuni }
383*af84ad07SPedro Giffuni
384*af84ad07SPedro Giffuni pThis = static_cast< char * >(pThis) - nVtableOffset;
385*af84ad07SPedro Giffuni bridges::cpp_uno::shared::CppInterfaceProxy * pCppI
386*af84ad07SPedro Giffuni = bridges::cpp_uno::shared::CppInterfaceProxy::castInterfaceToProxy(
387*af84ad07SPedro Giffuni pThis);
388*af84ad07SPedro Giffuni
389*af84ad07SPedro Giffuni typelib_InterfaceTypeDescription * pTypeDescr = pCppI->getTypeDescr();
390*af84ad07SPedro Giffuni
391*af84ad07SPedro Giffuni OSL_ENSURE( nFunctionIndex < pTypeDescr->nMapFunctionIndexToMemberIndex, "### illegal vtable index!" );
392*af84ad07SPedro Giffuni if (nFunctionIndex >= pTypeDescr->nMapFunctionIndexToMemberIndex)
393*af84ad07SPedro Giffuni {
394*af84ad07SPedro Giffuni throw RuntimeException(
395*af84ad07SPedro Giffuni rtl::OUString::createFromAscii("illegal vtable index!"),
396*af84ad07SPedro Giffuni (XInterface *)pThis );
397*af84ad07SPedro Giffuni }
398*af84ad07SPedro Giffuni
399*af84ad07SPedro Giffuni // determine called method
400*af84ad07SPedro Giffuni sal_Int32 nMemberPos = pTypeDescr->pMapFunctionIndexToMemberIndex[nFunctionIndex];
401*af84ad07SPedro Giffuni OSL_ENSURE( nMemberPos < pTypeDescr->nAllMembers, "### illegal member index!" );
402*af84ad07SPedro Giffuni
403*af84ad07SPedro Giffuni TypeDescription aMemberDescr( pTypeDescr->ppAllMembers[nMemberPos] );
404*af84ad07SPedro Giffuni
405*af84ad07SPedro Giffuni typelib_TypeClass eRet;
406*af84ad07SPedro Giffuni switch (aMemberDescr.get()->eTypeClass)
407*af84ad07SPedro Giffuni {
408*af84ad07SPedro Giffuni case typelib_TypeClass_INTERFACE_ATTRIBUTE:
409*af84ad07SPedro Giffuni {
410*af84ad07SPedro Giffuni if (pTypeDescr->pMapMemberIndexToFunctionIndex[nMemberPos] == nFunctionIndex)
411*af84ad07SPedro Giffuni {
412*af84ad07SPedro Giffuni // is GET method
413*af84ad07SPedro Giffuni eRet = cpp2uno_call(
414*af84ad07SPedro Giffuni pCppI, aMemberDescr.get(),
415*af84ad07SPedro Giffuni ((typelib_InterfaceAttributeTypeDescription *)aMemberDescr.get())->pAttributeTypeRef,
416*af84ad07SPedro Giffuni 0, 0, // no params
417*af84ad07SPedro Giffuni gpreg, fpreg, ovrflw, pRegisterReturn );
418*af84ad07SPedro Giffuni }
419*af84ad07SPedro Giffuni else
420*af84ad07SPedro Giffuni {
421*af84ad07SPedro Giffuni // is SET method
422*af84ad07SPedro Giffuni typelib_MethodParameter aParam;
423*af84ad07SPedro Giffuni aParam.pTypeRef =
424*af84ad07SPedro Giffuni ((typelib_InterfaceAttributeTypeDescription *)aMemberDescr.get())->pAttributeTypeRef;
425*af84ad07SPedro Giffuni aParam.bIn = sal_True;
426*af84ad07SPedro Giffuni aParam.bOut = sal_False;
427*af84ad07SPedro Giffuni
428*af84ad07SPedro Giffuni eRet = cpp2uno_call(
429*af84ad07SPedro Giffuni pCppI, aMemberDescr.get(),
430*af84ad07SPedro Giffuni 0, // indicates void return
431*af84ad07SPedro Giffuni 1, &aParam,
432*af84ad07SPedro Giffuni gpreg, fpreg, ovrflw, pRegisterReturn );
433*af84ad07SPedro Giffuni }
434*af84ad07SPedro Giffuni break;
435*af84ad07SPedro Giffuni }
436*af84ad07SPedro Giffuni case typelib_TypeClass_INTERFACE_METHOD:
437*af84ad07SPedro Giffuni {
438*af84ad07SPedro Giffuni // is METHOD
439*af84ad07SPedro Giffuni switch (nFunctionIndex)
440*af84ad07SPedro Giffuni {
441*af84ad07SPedro Giffuni case 1: // acquire()
442*af84ad07SPedro Giffuni pCppI->acquireProxy(); // non virtual call!
443*af84ad07SPedro Giffuni eRet = typelib_TypeClass_VOID;
444*af84ad07SPedro Giffuni break;
445*af84ad07SPedro Giffuni case 2: // release()
446*af84ad07SPedro Giffuni pCppI->releaseProxy(); // non virtual call!
447*af84ad07SPedro Giffuni eRet = typelib_TypeClass_VOID;
448*af84ad07SPedro Giffuni break;
449*af84ad07SPedro Giffuni case 0: // queryInterface() opt
450*af84ad07SPedro Giffuni {
451*af84ad07SPedro Giffuni typelib_TypeDescription * pTD = 0;
452*af84ad07SPedro Giffuni TYPELIB_DANGER_GET( &pTD, reinterpret_cast< Type * >( gpreg[2] )->getTypeLibType() );
453*af84ad07SPedro Giffuni if (pTD)
454*af84ad07SPedro Giffuni {
455*af84ad07SPedro Giffuni XInterface * pInterface = 0;
456*af84ad07SPedro Giffuni (*pCppI->getBridge()->getCppEnv()->getRegisteredInterface)(
457*af84ad07SPedro Giffuni pCppI->getBridge()->getCppEnv(),
458*af84ad07SPedro Giffuni (void **)&pInterface, pCppI->getOid().pData,
459*af84ad07SPedro Giffuni (typelib_InterfaceTypeDescription *)pTD );
460*af84ad07SPedro Giffuni
461*af84ad07SPedro Giffuni if (pInterface)
462*af84ad07SPedro Giffuni {
463*af84ad07SPedro Giffuni ::uno_any_construct(
464*af84ad07SPedro Giffuni reinterpret_cast< uno_Any * >( gpreg[0] ),
465*af84ad07SPedro Giffuni &pInterface, pTD, cpp_acquire );
466*af84ad07SPedro Giffuni pInterface->release();
467*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pTD );
468*af84ad07SPedro Giffuni *(void **)pRegisterReturn = gpreg[0];
469*af84ad07SPedro Giffuni eRet = typelib_TypeClass_ANY;
470*af84ad07SPedro Giffuni break;
471*af84ad07SPedro Giffuni }
472*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE( pTD );
473*af84ad07SPedro Giffuni }
474*af84ad07SPedro Giffuni } // else perform queryInterface()
475*af84ad07SPedro Giffuni default:
476*af84ad07SPedro Giffuni eRet = cpp2uno_call(
477*af84ad07SPedro Giffuni pCppI, aMemberDescr.get(),
478*af84ad07SPedro Giffuni ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->pReturnTypeRef,
479*af84ad07SPedro Giffuni ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->nParams,
480*af84ad07SPedro Giffuni ((typelib_InterfaceMethodTypeDescription *)aMemberDescr.get())->pParams,
481*af84ad07SPedro Giffuni gpreg, fpreg, ovrflw, pRegisterReturn );
482*af84ad07SPedro Giffuni }
483*af84ad07SPedro Giffuni break;
484*af84ad07SPedro Giffuni }
485*af84ad07SPedro Giffuni default:
486*af84ad07SPedro Giffuni {
487*af84ad07SPedro Giffuni throw RuntimeException(
488*af84ad07SPedro Giffuni rtl::OUString::createFromAscii("no member description found!"),
489*af84ad07SPedro Giffuni (XInterface *)pThis );
490*af84ad07SPedro Giffuni // is here for dummy
491*af84ad07SPedro Giffuni eRet = typelib_TypeClass_VOID;
492*af84ad07SPedro Giffuni }
493*af84ad07SPedro Giffuni }
494*af84ad07SPedro Giffuni
495*af84ad07SPedro Giffuni return eRet;
496*af84ad07SPedro Giffuni }
497*af84ad07SPedro Giffuni
498*af84ad07SPedro Giffuni //==================================================================================================
499*af84ad07SPedro Giffuni /**
500*af84ad07SPedro Giffuni * is called on incoming vtable calls
501*af84ad07SPedro Giffuni * (called by asm snippets)
502*af84ad07SPedro Giffuni */
503*af84ad07SPedro Giffuni static void cpp_vtable_call( int nFunctionIndex, int nVtableOffset, void** gpregptr, void** fpregptr, void** ovrflw)
504*af84ad07SPedro Giffuni {
505*af84ad07SPedro Giffuni sal_Int32 gpreg[8];
506*af84ad07SPedro Giffuni memcpy( gpreg, gpregptr, 32);
507*af84ad07SPedro Giffuni
508*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
509*af84ad07SPedro Giffuni double fpreg[8];
510*af84ad07SPedro Giffuni memcpy( fpreg, fpregptr, 64);
511*af84ad07SPedro Giffuni #endif
512*af84ad07SPedro Giffuni
513*af84ad07SPedro Giffuni volatile long nRegReturn[2];
514*af84ad07SPedro Giffuni
515*af84ad07SPedro Giffuni // fprintf(stderr,"in cpp_vtable_call nFunctionIndex is %x\n",nFunctionIndex);
516*af84ad07SPedro Giffuni // fprintf(stderr,"in cpp_vtable_call nVtableOffset is %x\n",nVtableOffset);
517*af84ad07SPedro Giffuni // fflush(stderr);
518*af84ad07SPedro Giffuni
519*af84ad07SPedro Giffuni typelib_TypeClass aType =
520*af84ad07SPedro Giffuni cpp_mediate( nFunctionIndex, nVtableOffset, (void**)gpreg,
521*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
522*af84ad07SPedro Giffuni (void**)fpreg,
523*af84ad07SPedro Giffuni #else
524*af84ad07SPedro Giffuni NULL,
525*af84ad07SPedro Giffuni #endif
526*af84ad07SPedro Giffuni ovrflw, (sal_Int64*)nRegReturn );
527*af84ad07SPedro Giffuni
528*af84ad07SPedro Giffuni switch( aType )
529*af84ad07SPedro Giffuni {
530*af84ad07SPedro Giffuni
531*af84ad07SPedro Giffuni // move return value into register space
532*af84ad07SPedro Giffuni // (will be loaded by machine code snippet)
533*af84ad07SPedro Giffuni
534*af84ad07SPedro Giffuni case typelib_TypeClass_BOOLEAN:
535*af84ad07SPedro Giffuni case typelib_TypeClass_BYTE:
536*af84ad07SPedro Giffuni __asm__( "lbz 3,%0\n\t" : :
537*af84ad07SPedro Giffuni "m"(nRegReturn[0]) );
538*af84ad07SPedro Giffuni break;
539*af84ad07SPedro Giffuni
540*af84ad07SPedro Giffuni case typelib_TypeClass_CHAR:
541*af84ad07SPedro Giffuni case typelib_TypeClass_SHORT:
542*af84ad07SPedro Giffuni case typelib_TypeClass_UNSIGNED_SHORT:
543*af84ad07SPedro Giffuni __asm__( "lhz 3,%0\n\t" : :
544*af84ad07SPedro Giffuni "m"(nRegReturn[0]) );
545*af84ad07SPedro Giffuni break;
546*af84ad07SPedro Giffuni
547*af84ad07SPedro Giffuni case typelib_TypeClass_FLOAT:
548*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
549*af84ad07SPedro Giffuni __asm__( "lfs 1,%0\n\t" : :
550*af84ad07SPedro Giffuni "m" (*((float*)nRegReturn)) );
551*af84ad07SPedro Giffuni #else
552*af84ad07SPedro Giffuni __asm__( "lwz 3,%0\n\t" : :
553*af84ad07SPedro Giffuni "m"(nRegReturn[0]) );
554*af84ad07SPedro Giffuni #endif
555*af84ad07SPedro Giffuni break;
556*af84ad07SPedro Giffuni
557*af84ad07SPedro Giffuni case typelib_TypeClass_DOUBLE:
558*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
559*af84ad07SPedro Giffuni __asm__( "lfd 1,%0\n\t" : :
560*af84ad07SPedro Giffuni "m" (*((double*)nRegReturn)) );
561*af84ad07SPedro Giffuni #else
562*af84ad07SPedro Giffuni __asm__( "lwz 3,%0\n\t" : :
563*af84ad07SPedro Giffuni "m"(nRegReturn[0]) );
564*af84ad07SPedro Giffuni __asm__( "lwz 4,%0\n\t" : :
565*af84ad07SPedro Giffuni "m"(nRegReturn[1]) );
566*af84ad07SPedro Giffuni #endif
567*af84ad07SPedro Giffuni break;
568*af84ad07SPedro Giffuni
569*af84ad07SPedro Giffuni case typelib_TypeClass_HYPER:
570*af84ad07SPedro Giffuni case typelib_TypeClass_UNSIGNED_HYPER:
571*af84ad07SPedro Giffuni __asm__( "lwz 4,%0\n\t" : :
572*af84ad07SPedro Giffuni "m"(nRegReturn[1]) ); // fall through
573*af84ad07SPedro Giffuni
574*af84ad07SPedro Giffuni default:
575*af84ad07SPedro Giffuni __asm__( "lwz 3,%0\n\t" : :
576*af84ad07SPedro Giffuni "m"(nRegReturn[0]) );
577*af84ad07SPedro Giffuni break;
578*af84ad07SPedro Giffuni }
579*af84ad07SPedro Giffuni }
580*af84ad07SPedro Giffuni
581*af84ad07SPedro Giffuni
582*af84ad07SPedro Giffuni int const codeSnippetSize = 108;
583*af84ad07SPedro Giffuni
584*af84ad07SPedro Giffuni unsigned char * codeSnippet( unsigned char * code, sal_Int32 functionIndex, sal_Int32 vtableOffset,
585*af84ad07SPedro Giffuni bool simpleRetType)
586*af84ad07SPedro Giffuni {
587*af84ad07SPedro Giffuni
588*af84ad07SPedro Giffuni // fprintf(stderr,"in codeSnippet functionIndex is %x\n", functionIndex);
589*af84ad07SPedro Giffuni // fprintf(stderr,"in codeSnippet vtableOffset is %x\n", vtableOffset);
590*af84ad07SPedro Giffuni // fflush(stderr);
591*af84ad07SPedro Giffuni
592*af84ad07SPedro Giffuni if (! simpleRetType )
593*af84ad07SPedro Giffuni functionIndex |= 0x80000000;
594*af84ad07SPedro Giffuni
595*af84ad07SPedro Giffuni unsigned long * p = (unsigned long *) code;
596*af84ad07SPedro Giffuni
597*af84ad07SPedro Giffuni // OSL_ASSERT( sizeof (long) == 4 );
598*af84ad07SPedro Giffuni OSL_ASSERT((((unsigned long)code) & 0x3) == 0 ); //aligned to 4 otherwise a mistake
599*af84ad07SPedro Giffuni
600*af84ad07SPedro Giffuni /* generate this code */
601*af84ad07SPedro Giffuni // # so first save gpr 3 to gpr 10 (aligned to 4)
602*af84ad07SPedro Giffuni // stw r3,-2048(r1)
603*af84ad07SPedro Giffuni // stw r4,-2044(r1)
604*af84ad07SPedro Giffuni // stw r5,-2040(r1)
605*af84ad07SPedro Giffuni // stw r6,-2036(r1)
606*af84ad07SPedro Giffuni // stw r7,-2032(r1)
607*af84ad07SPedro Giffuni // stw r8,-2028(r1)
608*af84ad07SPedro Giffuni // stw r9,-2024(r1)
609*af84ad07SPedro Giffuni // stw r10,-2020(r1)
610*af84ad07SPedro Giffuni
611*af84ad07SPedro Giffuni
612*af84ad07SPedro Giffuni // # next save fpr 1 to fpr 8 (aligned to 8)
613*af84ad07SPedro Giffuni // if dedicated floating point registers are used
614*af84ad07SPedro Giffuni // stfd f1,-2016(r1)
615*af84ad07SPedro Giffuni // stfd f2,-2008(r1)
616*af84ad07SPedro Giffuni // stfd f3,-2000(r1)
617*af84ad07SPedro Giffuni // stfd f4,-1992(r1)
618*af84ad07SPedro Giffuni // stfd f5,-1984(r1)
619*af84ad07SPedro Giffuni // stfd f6,-1976(r1)
620*af84ad07SPedro Giffuni // stfd f7,-1968(r1)
621*af84ad07SPedro Giffuni // stfd f8,-1960(r1)
622*af84ad07SPedro Giffuni
623*af84ad07SPedro Giffuni // # now here is where cpp_vtable_call must go
624*af84ad07SPedro Giffuni // lis r3,-8531
625*af84ad07SPedro Giffuni // ori r3,r3,48879
626*af84ad07SPedro Giffuni // mtctr r3
627*af84ad07SPedro Giffuni
628*af84ad07SPedro Giffuni // # now load up the functionIndex
629*af84ad07SPedro Giffuni // lis r3,-8531
630*af84ad07SPedro Giffuni // ori r3,r3,48879
631*af84ad07SPedro Giffuni
632*af84ad07SPedro Giffuni // # now load up the vtableOffset
633*af84ad07SPedro Giffuni // lis r4,-8531
634*af84ad07SPedro Giffuni // ori r4,r4,48879
635*af84ad07SPedro Giffuni
636*af84ad07SPedro Giffuni // #now load up the pointer to the saved gpr registers
637*af84ad07SPedro Giffuni // addi r5,r1,-2048
638*af84ad07SPedro Giffuni
639*af84ad07SPedro Giffuni // #now load up the pointer to the saved fpr registers
640*af84ad07SPedro Giffuni // addi r6,r1,-2016
641*af84ad07SPedro Giffuni // if no dedicated floating point registers are used than we have NULL
642*af84ad07SPedro Giffuni // pointer there
643*af84ad07SPedro Giffuni // li r6, 0
644*af84ad07SPedro Giffuni //
645*af84ad07SPedro Giffuni
646*af84ad07SPedro Giffuni // #now load up the pointer to the overflow call stack
647*af84ad07SPedro Giffuni // addi r7,r1,8
648*af84ad07SPedro Giffuni // bctr
649*af84ad07SPedro Giffuni
650*af84ad07SPedro Giffuni * p++ = 0x9061f800;
651*af84ad07SPedro Giffuni * p++ = 0x9081f804;
652*af84ad07SPedro Giffuni * p++ = 0x90a1f808;
653*af84ad07SPedro Giffuni * p++ = 0x90c1f80c;
654*af84ad07SPedro Giffuni * p++ = 0x90e1f810;
655*af84ad07SPedro Giffuni * p++ = 0x9101f814;
656*af84ad07SPedro Giffuni * p++ = 0x9121f818;
657*af84ad07SPedro Giffuni * p++ = 0x9141f81c;
658*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
659*af84ad07SPedro Giffuni * p++ = 0xd821f820;
660*af84ad07SPedro Giffuni * p++ = 0xd841f828;
661*af84ad07SPedro Giffuni * p++ = 0xd861f830;
662*af84ad07SPedro Giffuni * p++ = 0xd881f838;
663*af84ad07SPedro Giffuni * p++ = 0xd8a1f840;
664*af84ad07SPedro Giffuni * p++ = 0xd8c1f848;
665*af84ad07SPedro Giffuni * p++ = 0xd8e1f850;
666*af84ad07SPedro Giffuni * p++ = 0xd901f858;
667*af84ad07SPedro Giffuni #else
668*af84ad07SPedro Giffuni /* these nops could be replaced with a smaller codeSnippetSize - 8 * 4 */
669*af84ad07SPedro Giffuni * p++ = 0x60000000;
670*af84ad07SPedro Giffuni * p++ = 0x60000000;
671*af84ad07SPedro Giffuni * p++ = 0x60000000;
672*af84ad07SPedro Giffuni * p++ = 0x60000000;
673*af84ad07SPedro Giffuni * p++ = 0x60000000;
674*af84ad07SPedro Giffuni * p++ = 0x60000000;
675*af84ad07SPedro Giffuni * p++ = 0x60000000;
676*af84ad07SPedro Giffuni * p++ = 0x60000000;
677*af84ad07SPedro Giffuni #endif
678*af84ad07SPedro Giffuni * p++ = 0x3c600000 | (((unsigned long)cpp_vtable_call) >> 16);
679*af84ad07SPedro Giffuni * p++ = 0x60630000 | (((unsigned long)cpp_vtable_call) & 0x0000FFFF);
680*af84ad07SPedro Giffuni * p++ = 0x7c6903a6;
681*af84ad07SPedro Giffuni * p++ = 0x3c600000 | (((unsigned long)functionIndex) >> 16);
682*af84ad07SPedro Giffuni * p++ = 0x60630000 | (((unsigned long)functionIndex) & 0x0000FFFF);
683*af84ad07SPedro Giffuni * p++ = 0x3c800000 | (((unsigned long)vtableOffset) >> 16);
684*af84ad07SPedro Giffuni * p++ = 0x60840000 | (((unsigned long)vtableOffset) & 0x0000FFFF);
685*af84ad07SPedro Giffuni * p++ = 0x38a1f800;
686*af84ad07SPedro Giffuni #ifndef __NO_FPRS__
687*af84ad07SPedro Giffuni * p++ = 0x38c1f820;
688*af84ad07SPedro Giffuni #else
689*af84ad07SPedro Giffuni * p++ = 0x38c00000;
690*af84ad07SPedro Giffuni #endif
691*af84ad07SPedro Giffuni * p++ = 0x38e10008;
692*af84ad07SPedro Giffuni * p++ = 0x4e800420;
693*af84ad07SPedro Giffuni return (code + codeSnippetSize);
694*af84ad07SPedro Giffuni
695*af84ad07SPedro Giffuni }
696*af84ad07SPedro Giffuni
697*af84ad07SPedro Giffuni
698*af84ad07SPedro Giffuni }
699*af84ad07SPedro Giffuni
700*af84ad07SPedro Giffuni void bridges::cpp_uno::shared::VtableFactory::flushCode(unsigned char const * bptr, unsigned char const * eptr)
701*af84ad07SPedro Giffuni {
702*af84ad07SPedro Giffuni int const lineSize = 32;
703*af84ad07SPedro Giffuni for (unsigned char const * p = bptr; p < eptr + lineSize; p += lineSize) {
704*af84ad07SPedro Giffuni __asm__ volatile ("dcbst 0, %0" : : "r"(p) : "memory");
705*af84ad07SPedro Giffuni }
706*af84ad07SPedro Giffuni __asm__ volatile ("sync" : : : "memory");
707*af84ad07SPedro Giffuni for (unsigned char const * p = bptr; p < eptr + lineSize; p += lineSize) {
708*af84ad07SPedro Giffuni __asm__ volatile ("icbi 0, %0" : : "r"(p) : "memory");
709*af84ad07SPedro Giffuni }
710*af84ad07SPedro Giffuni __asm__ volatile ("isync" : : : "memory");
711*af84ad07SPedro Giffuni }
712*af84ad07SPedro Giffuni
713*af84ad07SPedro Giffuni struct bridges::cpp_uno::shared::VtableFactory::Slot { void * fn; };
714*af84ad07SPedro Giffuni
715*af84ad07SPedro Giffuni bridges::cpp_uno::shared::VtableFactory::Slot *
716*af84ad07SPedro Giffuni bridges::cpp_uno::shared::VtableFactory::mapBlockToVtable(void * block)
717*af84ad07SPedro Giffuni {
718*af84ad07SPedro Giffuni return static_cast< Slot * >(block) + 2;
719*af84ad07SPedro Giffuni }
720*af84ad07SPedro Giffuni
721*af84ad07SPedro Giffuni sal_Size bridges::cpp_uno::shared::VtableFactory::getBlockSize(
722*af84ad07SPedro Giffuni sal_Int32 slotCount)
723*af84ad07SPedro Giffuni {
724*af84ad07SPedro Giffuni return (slotCount + 2) * sizeof (Slot) + slotCount * codeSnippetSize;
725*af84ad07SPedro Giffuni }
726*af84ad07SPedro Giffuni
727*af84ad07SPedro Giffuni bridges::cpp_uno::shared::VtableFactory::Slot *
728*af84ad07SPedro Giffuni bridges::cpp_uno::shared::VtableFactory::initializeBlock(
729*af84ad07SPedro Giffuni void * block, sal_Int32 slotCount)
730*af84ad07SPedro Giffuni {
731*af84ad07SPedro Giffuni Slot * slots = mapBlockToVtable(block);
732*af84ad07SPedro Giffuni slots[-2].fn = 0;
733*af84ad07SPedro Giffuni slots[-1].fn = 0;
734*af84ad07SPedro Giffuni return slots + slotCount;
735*af84ad07SPedro Giffuni }
736*af84ad07SPedro Giffuni
737*af84ad07SPedro Giffuni unsigned char * bridges::cpp_uno::shared::VtableFactory::addLocalFunctions(
738*af84ad07SPedro Giffuni Slot ** slots, unsigned char * code, sal_PtrDiff writetoexecdiff,
739*af84ad07SPedro Giffuni typelib_InterfaceTypeDescription const * type, sal_Int32 functionOffset,
740*af84ad07SPedro Giffuni sal_Int32 functionCount, sal_Int32 vtableOffset)
741*af84ad07SPedro Giffuni {
742*af84ad07SPedro Giffuni (*slots) -= functionCount;
743*af84ad07SPedro Giffuni Slot * s = *slots;
744*af84ad07SPedro Giffuni // fprintf(stderr, "in addLocalFunctions functionOffset is %x\n",functionOffset);
745*af84ad07SPedro Giffuni // fprintf(stderr, "in addLocalFunctions vtableOffset is %x\n",vtableOffset);
746*af84ad07SPedro Giffuni // fflush(stderr);
747*af84ad07SPedro Giffuni
748*af84ad07SPedro Giffuni for (sal_Int32 i = 0; i < type->nMembers; ++i) {
749*af84ad07SPedro Giffuni typelib_TypeDescription * member = 0;
750*af84ad07SPedro Giffuni TYPELIB_DANGER_GET(&member, type->ppMembers[i]);
751*af84ad07SPedro Giffuni OSL_ASSERT(member != 0);
752*af84ad07SPedro Giffuni switch (member->eTypeClass) {
753*af84ad07SPedro Giffuni case typelib_TypeClass_INTERFACE_ATTRIBUTE:
754*af84ad07SPedro Giffuni // Getter:
755*af84ad07SPedro Giffuni (s++)->fn = code + writetoexecdiff;
756*af84ad07SPedro Giffuni code = codeSnippet(
757*af84ad07SPedro Giffuni code, functionOffset++, vtableOffset,
758*af84ad07SPedro Giffuni bridges::cpp_uno::shared::isSimpleType(
759*af84ad07SPedro Giffuni reinterpret_cast<
760*af84ad07SPedro Giffuni typelib_InterfaceAttributeTypeDescription * >(
761*af84ad07SPedro Giffuni member)->pAttributeTypeRef));
762*af84ad07SPedro Giffuni
763*af84ad07SPedro Giffuni // Setter:
764*af84ad07SPedro Giffuni if (!reinterpret_cast<
765*af84ad07SPedro Giffuni typelib_InterfaceAttributeTypeDescription * >(
766*af84ad07SPedro Giffuni member)->bReadOnly)
767*af84ad07SPedro Giffuni {
768*af84ad07SPedro Giffuni (s++)->fn = code + writetoexecdiff;
769*af84ad07SPedro Giffuni code = codeSnippet(code, functionOffset++, vtableOffset, true);
770*af84ad07SPedro Giffuni }
771*af84ad07SPedro Giffuni break;
772*af84ad07SPedro Giffuni
773*af84ad07SPedro Giffuni case typelib_TypeClass_INTERFACE_METHOD:
774*af84ad07SPedro Giffuni (s++)->fn = code + writetoexecdiff;
775*af84ad07SPedro Giffuni code = codeSnippet(
776*af84ad07SPedro Giffuni code, functionOffset++, vtableOffset,
777*af84ad07SPedro Giffuni bridges::cpp_uno::shared::isSimpleType(
778*af84ad07SPedro Giffuni reinterpret_cast<
779*af84ad07SPedro Giffuni typelib_InterfaceMethodTypeDescription * >(
780*af84ad07SPedro Giffuni member)->pReturnTypeRef));
781*af84ad07SPedro Giffuni break;
782*af84ad07SPedro Giffuni
783*af84ad07SPedro Giffuni default:
784*af84ad07SPedro Giffuni OSL_ASSERT(false);
785*af84ad07SPedro Giffuni break;
786*af84ad07SPedro Giffuni }
787*af84ad07SPedro Giffuni TYPELIB_DANGER_RELEASE(member);
788*af84ad07SPedro Giffuni }
789*af84ad07SPedro Giffuni return code;
790*af84ad07SPedro Giffuni }
791*af84ad07SPedro Giffuni
792