• file
• revisions
• annotate
• diff
• comparison
• raw

xpcom/reflect/xptcall/src/md/unix/xptcinvoke_sparc_solaris.cpp@6474c204b198 (annotated)

xpcom/reflect/xptcall/src/md/unix/xptcinvoke_sparc_solaris.cpp

Wed, 31 Dec 2014 06:09:35 +0100

author

Michael Schloh von Bennewitz <michael@schloh.com>

date

Wed, 31 Dec 2014 06:09:35 +0100

changeset 0

6474c204b198

permissions

-rw-r--r--

Cloned upstream origin tor-browser at tor-browser-31.3.0esr-4.5-1-build1
revision ID fc1c9ff7c1b2defdbc039f12214767608f46423f for hacking purpose.

michael@0	1	/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
michael@0	2	/* This Source Code Form is subject to the terms of the Mozilla Public
michael@0	3	* License, v. 2.0. If a copy of the MPL was not distributed with this
michael@0	4	* file, You can obtain one at http://mozilla.org/MPL/2.0/. */
michael@0	5
michael@0	6	/* Platform specific code to invoke XPCOM methods on native objects */
michael@0	7
michael@0	8	#include "xptcprivate.h"
michael@0	9
michael@0	10	/* solaris defines __sparc for workshop compilers and
michael@0	11	linux defines __sparc__ */
michael@0	12
michael@0	13	#if !defined(__sparc) && !defined(__sparc__)
michael@0	14	#error "This code is for Sparc only"
michael@0	15	#endif
michael@0	16
michael@0	17	typedef unsigned nsXPCVariant;
michael@0	18
michael@0	19	extern "C" uint32_t
michael@0	20	invoke_count_words(uint32_t paramCount, nsXPTCVariant* s)
michael@0	21	{
michael@0	22	uint32_t result = 0;
michael@0	23	for(uint32_t i = 0; i < paramCount; i++, s++)
michael@0	24	{
michael@0	25	if(s->IsPtrData())
michael@0	26	{
michael@0	27	result++;
michael@0	28	continue;
michael@0	29	}
michael@0	30	switch(s->type)
michael@0	31	{
michael@0	32	case nsXPTType::T_I8 :
michael@0	33	case nsXPTType::T_I16 :
michael@0	34	case nsXPTType::T_I32 :
michael@0	35	result++;
michael@0	36	break;
michael@0	37	case nsXPTType::T_I64 :
michael@0	38	result+=2;
michael@0	39	break;
michael@0	40	case nsXPTType::T_U8 :
michael@0	41	case nsXPTType::T_U16 :
michael@0	42	case nsXPTType::T_U32 :
michael@0	43	result++;
michael@0	44	break;
michael@0	45	case nsXPTType::T_U64 :
michael@0	46	result+=2;
michael@0	47	break;
michael@0	48	case nsXPTType::T_FLOAT :
michael@0	49	result++;
michael@0	50	break;
michael@0	51	case nsXPTType::T_DOUBLE :
michael@0	52	result+=2;
michael@0	53	break;
michael@0	54	case nsXPTType::T_BOOL :
michael@0	55	case nsXPTType::T_CHAR :
michael@0	56	case nsXPTType::T_WCHAR :
michael@0	57	result++;
michael@0	58	break;
michael@0	59	default:
michael@0	60	// all the others are plain pointer types
michael@0	61	result++;
michael@0	62	break;
michael@0	63	}
michael@0	64	}
michael@0	65	// nuts, I know there's a cooler way of doing this, but it's late
michael@0	66	// now and it'll probably come to me in the morning.
michael@0	67	if (result & 0x3) result += 4 - (result & 0x3); // ensure q-word alignment
michael@0	68	return result;
michael@0	69	}
michael@0	70
michael@0	71	extern "C" uint32_t
michael@0	72	invoke_copy_to_stack(uint32_t* d, uint32_t paramCount, nsXPTCVariant* s)
michael@0	73	{
michael@0	74	/*
michael@0	75	We need to copy the parameters for this function to locals and use them
michael@0	76	from there since the parameters occupy the same stack space as the stack
michael@0	77	we're trying to populate.
michael@0	78	*/
michael@0	79	uint32_t *l_d = d;
michael@0	80	nsXPTCVariant *l_s = s;
michael@0	81	uint32_t l_paramCount = paramCount;
michael@0	82	uint32_t regCount = 0; // return the number of registers to load from the stack
michael@0	83
michael@0	84	typedef struct {
michael@0	85	uint32_t hi;
michael@0	86	uint32_t lo;
michael@0	87	} DU; // have to move 64 bit entities as 32 bit halves since
michael@0	88	// stack slots are not guaranteed 16 byte aligned
michael@0	89
michael@0	90	for(uint32_t i = 0; i < l_paramCount; i++, l_d++, l_s++)
michael@0	91	{
michael@0	92	if (regCount < 5) regCount++;
michael@0	93	if(l_s->IsPtrData())
michael@0	94	{
michael@0	95	if(l_s->type == nsXPTType::T_JSVAL)
michael@0	96	{
michael@0	97	// On SPARC, we need to pass a pointer to HandleValue
michael@0	98	*((void**)l_d) = &l_s->ptr;
michael@0	99	} else
michael@0	100	{
michael@0	101	*((void**)l_d) = l_s->ptr;
michael@0	102	}
michael@0	103	continue;
michael@0	104	}
michael@0	105	switch(l_s->type)
michael@0	106	{
michael@0	107	case nsXPTType::T_I8 : *((int32_t*) l_d) = l_s->val.i8; break;
michael@0	108	case nsXPTType::T_I16 : *((int32_t*) l_d) = l_s->val.i16; break;
michael@0	109	case nsXPTType::T_I32 : *((int32_t*) l_d) = l_s->val.i32; break;
michael@0	110	case nsXPTType::T_I64 :
michael@0	111	case nsXPTType::T_U64 :
michael@0	112	case nsXPTType::T_DOUBLE : *((uint32_t*) l_d++) = ((DU *)l_s)->hi;
michael@0	113	if (regCount < 5) regCount++;
michael@0	114	*((uint32_t*) l_d) = ((DU *)l_s)->lo;
michael@0	115	break;
michael@0	116	case nsXPTType::T_U8 : *((uint32_t*) l_d) = l_s->val.u8; break;
michael@0	117	case nsXPTType::T_U16 : *((uint32_t*) l_d) = l_s->val.u16; break;
michael@0	118	case nsXPTType::T_U32 : *((uint32_t*) l_d) = l_s->val.u32; break;
michael@0	119	case nsXPTType::T_FLOAT : *((float*) l_d) = l_s->val.f; break;
michael@0	120	case nsXPTType::T_BOOL : *((uint32_t*) l_d) = l_s->val.b; break;
michael@0	121	case nsXPTType::T_CHAR : *((uint32_t*) l_d) = l_s->val.c; break;
michael@0	122	case nsXPTType::T_WCHAR : *((int32_t*) l_d) = l_s->val.wc; break;
michael@0	123	default:
michael@0	124	// all the others are plain pointer types
michael@0	125	*((void**)l_d) = l_s->val.p;
michael@0	126	break;
michael@0	127	}
michael@0	128	}
michael@0	129	return regCount;
michael@0	130	}
michael@0	131