1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/xpcom/reflect/xptcall/src/md/unix/xptcinvoke_ipf32.cpp Wed Dec 31 06:09:35 2014 +0100
1.3 @@ -0,0 +1,132 @@
1.4 +
1.5 +/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*-
1.6 + *
1.7 + * This Source Code Form is subject to the terms of the Mozilla Public
1.8 + * License, v. 2.0. If a copy of the MPL was not distributed with this
1.9 + * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
1.10 +
1.11 +#include "xptcprivate.h"
1.12 +
1.13 +#include <iostream.h>
1.14 +
1.15 +// "This code is for IA64 only"
1.16 +
1.17 +
1.18 +/* invoke_copy_to_stack() will copy from variant array 's' to
1.19 + * the stack argument area 'mloc', the integer register area 'iloc', and
1.20 + * the float register area 'floc'.
1.21 + *
1.22 + */
1.23 +extern "C" void
1.24 +invoke_copy_to_stack(uint64_t* mloc, uint64_t* iloc, uint64_t* floc,
1.25 + const uint32_t paramCount, nsXPTCVariant* s)
1.26 +{
1.27 + uint64_t* dest = mloc;
1.28 + uint32_t len = paramCount;
1.29 + nsXPTCVariant* source = s;
1.30 +
1.31 + uint32_t indx;
1.32 + uint32_t endlen;
1.33 + endlen = (len > 7) ? 7 : len;
1.34 + /* handle the memory arguments */
1.35 + for (indx = 7; indx < len; ++indx)
1.36 + {
1.37 + if (source[indx].IsPtrData())
1.38 + {
1.39 +#ifdef __LP64__
1.40 + /* 64 bit pointer mode */
1.41 + *((void**) dest) = source[indx].ptr;
1.42 +#else
1.43 + /* 32 bit pointer mode */
1.44 + uint32_t* adr = (uint32_t*) dest;
1.45 + *(adr) = 0;
1.46 + *(adr+1) = (uint32_t) source[indx].ptr;
1.47 +#endif
1.48 + }
1.49 + else
1.50 + switch (source[indx].type)
1.51 + {
1.52 + case nsXPTType::T_I8 : *(dest) = source[indx].val.i8; break;
1.53 + case nsXPTType::T_I16 : *(dest) = source[indx].val.i16; break;
1.54 + case nsXPTType::T_I32 : *(dest) = source[indx].val.i32; break;
1.55 + case nsXPTType::T_I64 : *(dest) = source[indx].val.i64; break;
1.56 + case nsXPTType::T_U8 : *(dest) = source[indx].val.u8; break;
1.57 + case nsXPTType::T_U16 : *(dest) = source[indx].val.u16; break;
1.58 + case nsXPTType::T_U32 : *(dest) = source[indx].val.u32; break;
1.59 + case nsXPTType::T_U64 : *(dest) = source[indx].val.u64; break;
1.60 + case nsXPTType::T_FLOAT : *(dest) = source[indx].val.u32; break;
1.61 + case nsXPTType::T_DOUBLE: *(dest) = source[indx].val.u64; break;
1.62 + case nsXPTType::T_BOOL : *(dest) = source[indx].val.b; break;
1.63 + case nsXPTType::T_CHAR : *(dest) = source[indx].val.c; break;
1.64 + case nsXPTType::T_WCHAR : *(dest) = source[indx].val.wc; break;
1.65 + default:
1.66 + // all the others are plain pointer types
1.67 +#ifdef __LP64__
1.68 + /* 64 bit pointer mode */
1.69 + *((void**) dest) = source[indx].val.p;
1.70 +#else
1.71 + {
1.72 + /* 32 bit pointer mode */
1.73 + uint32_t* adr = (uint32_t*) dest;
1.74 + *(adr) = 0;
1.75 + *(adr+1) = (uint32_t) source[indx].val.p;
1.76 + }
1.77 +#endif
1.78 + }
1.79 + ++dest;
1.80 + }
1.81 + /* process register arguments */
1.82 + dest = iloc;
1.83 + for (indx = 0; indx < endlen; ++indx)
1.84 + {
1.85 + if (source[indx].IsPtrData())
1.86 + {
1.87 +#ifdef __LP64__
1.88 + /* 64 bit pointer mode */
1.89 + *((void**) dest) = source[indx].ptr;
1.90 +#else
1.91 + /* 32 bit pointer mode */
1.92 + uint32_t* adr = (uint32_t*) dest;
1.93 + *(adr) = 0;
1.94 + *(adr+1) = (uint32_t) source[indx].ptr;
1.95 +#endif
1.96 + }
1.97 + else
1.98 + switch (source[indx].type)
1.99 + {
1.100 + case nsXPTType::T_I8 : *(dest) = source[indx].val.i8; break;
1.101 + case nsXPTType::T_I16 : *(dest) = source[indx].val.i16; break;
1.102 + case nsXPTType::T_I32 : *(dest) = source[indx].val.i32; break;
1.103 + case nsXPTType::T_I64 : *(dest) = source[indx].val.i64; break;
1.104 + case nsXPTType::T_U8 : *(dest) = source[indx].val.u8; break;
1.105 + case nsXPTType::T_U16 : *(dest) = source[indx].val.u16; break;
1.106 + case nsXPTType::T_U32 : *(dest) = source[indx].val.u32; break;
1.107 + case nsXPTType::T_U64 : *(dest) = source[indx].val.u64; break;
1.108 + case nsXPTType::T_FLOAT :
1.109 + *((double*) (floc++)) = (double) source[indx].val.f;
1.110 + break;
1.111 + case nsXPTType::T_DOUBLE:
1.112 + *((double*) (floc++)) = source[indx].val.d;
1.113 + break;
1.114 + case nsXPTType::T_BOOL : *(dest) = source[indx].val.b; break;
1.115 + case nsXPTType::T_CHAR : *(dest) = source[indx].val.c; break;
1.116 + case nsXPTType::T_WCHAR : *(dest) = source[indx].val.wc; break;
1.117 + default:
1.118 + // all the others are plain pointer types
1.119 +#ifdef __LP64__
1.120 + /* 64 bit pointer mode */
1.121 + *((void**) dest) = source[indx].val.p;
1.122 +#else
1.123 + {
1.124 + /* 32 bit pointer mode */
1.125 + uint32_t* adr = (uint32_t*) dest;
1.126 + *(adr) = 0;
1.127 + *(adr+1) = (uint32_t) source[indx].val.p;
1.128 + }
1.129 +#endif
1.130 + }
1.131 + ++dest;
1.132 + }
1.133 +
1.134 +}
1.135 +
