1 /* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 /* This Source Code Form is subject to the terms of the Mozilla Public
3 * License, v. 2.0. If a copy of the MPL was not distributed with this
4 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
5
6 /* Platform specific code to invoke XPCOM methods on native objects */
7
8 #include "xptcprivate.h"
9
10 extern "C" uint32_t
invoke_count_words(uint32_t paramCount,nsXPTCVariant * s)11 invoke_count_words(uint32_t paramCount, nsXPTCVariant* s)
12 {
13 uint32_t result = 0;
14 /* fprintf(stderr,"invoke_count_words(%d,%p)\n",paramCount, s);*/
15
16 for(uint32_t i = 0; i < paramCount; i++, s++)
17 {
18 if(s->IsPtrData())
19 {
20 result++;
21 continue;
22 }
23 switch(s->type)
24 {
25 case nsXPTType::T_I8 :
26 case nsXPTType::T_I16 :
27 case nsXPTType::T_I32 :
28 result++;
29 break;
30 case nsXPTType::T_I64 :
31 result+=2;
32 break;
33 case nsXPTType::T_U8 :
34 case nsXPTType::T_U16 :
35 case nsXPTType::T_U32 :
36 result++;
37 break;
38 case nsXPTType::T_U64 :
39 result+=2;
40 break;
41 case nsXPTType::T_FLOAT :
42 result++;
43 break;
44 case nsXPTType::T_DOUBLE :
45 result+=2;
46 break;
47 case nsXPTType::T_BOOL :
48 case nsXPTType::T_CHAR :
49 case nsXPTType::T_WCHAR :
50 result++;
51 break;
52 default:
53 // all the others are plain pointer types
54 result++;
55 break;
56 }
57 }
58 return result;
59 }
60
61 extern "C" void
invoke_copy_to_stack(uint32_t * d,uint32_t paramCount,nsXPTCVariant * s,double * fprData)62 invoke_copy_to_stack(uint32_t* d, uint32_t paramCount, nsXPTCVariant* s, double *fprData)
63 {
64 uint32_t fpCount = 0;
65
66 /* fprintf(stderr,"invoke_copy_to_stack(%p, %d, %p, %p)\n", d, paramCount, s, fprData);*/
67
68 for(uint32_t i = 0; i < paramCount; i++, d++, s++)
69 {
70 if(s->IsPtrData())
71 {
72 *((void**)d) = s->ptr;
73 continue;
74 }
75 switch(s->type)
76 {
77 case nsXPTType::T_I8 : *((int32_t*) d) = s->val.i8; break;
78 case nsXPTType::T_I16 : *((int32_t*) d) = s->val.i16; break;
79 case nsXPTType::T_I32 : *((int32_t*) d) = s->val.i32; break;
80 case nsXPTType::T_I64 : *((int64_t*) d) = s->val.i64; d++; break;
81 case nsXPTType::T_U8 : *((uint32_t*) d) = s->val.u8; break;
82 case nsXPTType::T_U16 : *((uint32_t*)d) = s->val.u16; break;
83 case nsXPTType::T_U32 : *((uint32_t*)d) = s->val.u32; break;
84 case nsXPTType::T_U64 : *((uint64_t*)d) = s->val.u64; d++; break;
85 case nsXPTType::T_FLOAT : *((float*) d) = s->val.f;
86 if (fpCount < 13)
87 fprData[fpCount++] = s->val.f;
88 break;
89 case nsXPTType::T_DOUBLE : *((double*) d) = s->val.d; d++;
90 if (fpCount < 13)
91 fprData[fpCount++] = s->val.d;
92 break;
93 case nsXPTType::T_BOOL : *((uint32_t*) d) = s->val.b; break;
94 case nsXPTType::T_CHAR : *((int32_t*) d) = s->val.c; break;
95 case nsXPTType::T_WCHAR : *((uint32_t*) d) = s->val.wc; break;
96 default:
97 // all the others are plain pointer types
98 *((void**)d) = s->val.p;
99 break;
100 }
101 }
102 }
103
104 extern "C" nsresult _NS_InvokeByIndex(nsISupports* that, uint32_t methodIndex,
105 uint32_t paramCount,
106 nsXPTCVariant* params);
107
108 EXPORT_XPCOM_API(nsresult)
NS_InvokeByIndex(nsISupports * that,uint32_t methodIndex,uint32_t paramCount,nsXPTCVariant * params)109 NS_InvokeByIndex(nsISupports* that, uint32_t methodIndex,
110 uint32_t paramCount, nsXPTCVariant* params)
111 {
112 return _NS_InvokeByIndex(that, methodIndex, paramCount, params);
113 }
114