1
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2
/* ***** BEGIN LICENSE BLOCK *****
3
* Version: NPL 1.1/GPL 2.0/LGPL 2.1
5
* The contents of this file are subject to the Netscape Public License
6
* Version 1.1 (the "License"); you may not use this file except in
7
* compliance with the License. You may obtain a copy of the License at
8
* http://www.mozilla.org/NPL/
10
* Software distributed under the License is distributed on an "AS IS" basis,
11
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
12
* for the specific language governing rights and limitations under the
15
* The Original Code is mozilla.org code.
17
* The Initial Developer of the Original Code is
18
* Netscape Communications Corporation.
19
* Portions created by the Initial Developer are Copyright (C) 1998
20
* the Initial Developer. All Rights Reserved.
24
* Alternatively, the contents of this file may be used under the terms of
25
* either the GNU General Public License Version 2 or later (the "GPL"), or
26
* the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
27
* in which case the provisions of the GPL or the LGPL are applicable instead
28
* of those above. If you wish to allow use of your version of this file only
29
* under the terms of either the GPL or the LGPL, and not to allow others to
30
* use your version of this file under the terms of the NPL, indicate your
31
* decision by deleting the provisions above and replace them with the notice
32
* and other provisions required by the GPL or the LGPL. If you do not delete
33
* the provisions above, a recipient may use your version of this file under
34
* the terms of any one of the NPL, the GPL or the LGPL.
36
* ***** END LICENSE BLOCK ***** */
38
/* Platform specific code to invoke XPCOM methods on native objects */
40
#include "xptcprivate.h"
43
#error "This code is for PowerPC only"
47
invoke_copy_to_stack(PRUint32* d, PRUint32 paramCount, nsXPTCVariant* s, double *fprData)
50
We need to copy the parameters for this function to locals and use them
51
from there since the parameters occupy the same stack space as the stack
52
we're trying to populate.
55
nsXPTCVariant *l_s = s;
56
PRUint32 l_paramCount = paramCount, fpCount = 0;
57
double *l_fprData = fprData;
62
} DU; // have to move 64 bit entities as 32 bit halves since
63
// stack slots are not guaranteed 16 byte aligned
65
for(uint32 i = 0; i < l_paramCount; i++, l_d++, l_s++)
69
*((void**)l_d) = l_s->ptr;
74
case nsXPTType::T_I8 : *((int32*) l_d) = l_s->val.i8; break;
75
case nsXPTType::T_I16 : *((int32*) l_d) = l_s->val.i16; break;
76
case nsXPTType::T_I32 : *((int32*) l_d) = l_s->val.i32; break;
77
case nsXPTType::T_I64 :
78
case nsXPTType::T_U64 :
79
*((uint32*) l_d++) = ((DU *)l_s)->hi;
80
*((uint32*) l_d) = ((DU *)l_s)->lo;
82
case nsXPTType::T_DOUBLE :
83
*((uint32*) l_d++) = ((DU *)l_s)->hi;
84
*((uint32*) l_d) = ((DU *)l_s)->lo;
86
l_fprData[fpCount++] = l_s->val.d;
88
case nsXPTType::T_U8 : *((uint32*) l_d) = l_s->val.u8; break;
89
case nsXPTType::T_U16 : *((uint32*) l_d) = l_s->val.u16; break;
90
case nsXPTType::T_U32 : *((uint32*) l_d) = l_s->val.u32; break;
91
case nsXPTType::T_FLOAT :
92
*((float*) l_d) = l_s->val.f;
94
l_fprData[fpCount++] = l_s->val.f;
96
case nsXPTType::T_BOOL : *((PRBool*) l_d) = l_s->val.b; break;
97
case nsXPTType::T_CHAR : *((uint32*) l_d) = l_s->val.c; break;
98
case nsXPTType::T_WCHAR : *((int32*) l_d) = l_s->val.wc; break;
100
// all the others are plain pointer types
101
*((void**)l_d) = l_s->val.p;