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

xpcom/reflect/xptcall/src/md/unix/xptcinvoke_netbsd_m68k.cpp@129ffea94266 (annotated)

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

Sat, 03 Jan 2015 20:18:00 +0100

author

Michael Schloh von Bennewitz <michael@schloh.com>

date

Sat, 03 Jan 2015 20:18:00 +0100

branch

TOR_BUG_3246

changeset 7

129ffea94266

permissions

-rw-r--r--

Conditionally enable double key logic according to:
private browsing mode or privacy.thirdparty.isolate preference and
implement in GetCookieStringCommon and FindCookie where it counts...
With some reservations of how to convince FindCookie users to test
condition and pass a nullptr when disabling double key logic.

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	// Remember that these 'words' are 32bit DWORDS
michael@0	11
michael@0	12	#if !defined(__NetBSD__) || !defined(__m68k__)
michael@0	13	#error This code is for NetBSD/m68k only
michael@0	14	#endif
michael@0	15
michael@0	16	extern "C" {
michael@0	17	static uint32_t
michael@0	18	invoke_count_words(uint32_t paramCount, nsXPTCVariant* s)
michael@0	19	{
michael@0	20	uint32_t result = 0;
michael@0	21	for(uint32_t i = 0; i < paramCount; i++, s++)
michael@0	22	{
michael@0	23	if(s->IsPtrData())
michael@0	24	{
michael@0	25	result++;
michael@0	26	continue;
michael@0	27	}
michael@0	28	switch(s->type)
michael@0	29	{
michael@0	30	case nsXPTType::T_I8 :
michael@0	31	case nsXPTType::T_I16 :
michael@0	32	case nsXPTType::T_I32 :
michael@0	33	result++;
michael@0	34	break;
michael@0	35	case nsXPTType::T_I64 :
michael@0	36	result+=2;
michael@0	37	break;
michael@0	38	case nsXPTType::T_U8 :
michael@0	39	case nsXPTType::T_U16 :
michael@0	40	case nsXPTType::T_U32 :
michael@0	41	result++;
michael@0	42	break;
michael@0	43	case nsXPTType::T_U64 :
michael@0	44	result+=2;
michael@0	45	break;
michael@0	46	case nsXPTType::T_FLOAT :
michael@0	47	result++;
michael@0	48	break;
michael@0	49	case nsXPTType::T_DOUBLE :
michael@0	50	result+=2;
michael@0	51	break;
michael@0	52	case nsXPTType::T_BOOL :
michael@0	53	case nsXPTType::T_CHAR :
michael@0	54	case nsXPTType::T_WCHAR :
michael@0	55	result++;
michael@0	56	break;
michael@0	57	default:
michael@0	58	// all the others are plain pointer types
michael@0	59	result++;
michael@0	60	break;
michael@0	61	}
michael@0	62	}
michael@0	63	return result;
michael@0	64	}
michael@0	65
michael@0	66	static void
michael@0	67	invoke_copy_to_stack(uint32_t* d, uint32_t paramCount, nsXPTCVariant* s)
michael@0	68	{
michael@0	69	for(uint32_t i = 0; i < paramCount; i++, d++, s++)
michael@0	70	{
michael@0	71	if(s->IsPtrData())
michael@0	72	{
michael@0	73	*((void**)d) = s->ptr;
michael@0	74	continue;
michael@0	75	}
michael@0	76	switch(s->type)
michael@0	77	{
michael@0	78	// 8 and 16 bit types should be promoted to 32 bits when copying
michael@0	79	// onto the stack.
michael@0	80	case nsXPTType::T_I8 : *((uint32_t*)d) = s->val.i8; break;
michael@0	81	case nsXPTType::T_I16 : *((uint32_t*)d) = s->val.i16; break;
michael@0	82	case nsXPTType::T_I32 : *((int32_t*) d) = s->val.i32; break;
michael@0	83	case nsXPTType::T_I64 : *((int64_t*) d) = s->val.i64; d++; break;
michael@0	84	case nsXPTType::T_U8 : *((uint32_t*)d) = s->val.u8; break;
michael@0	85	case nsXPTType::T_U16 : *((uint32_t*)d) = s->val.u16; break;
michael@0	86	case nsXPTType::T_U32 : *((uint32_t*)d) = s->val.u32; break;
michael@0	87	case nsXPTType::T_U64 : *((uint64_t*)d) = s->val.u64; d++; break;
michael@0	88	case nsXPTType::T_FLOAT : *((float*) d) = s->val.f; break;
michael@0	89	case nsXPTType::T_DOUBLE : *((double*) d) = s->val.d; d++; break;
michael@0	90	case nsXPTType::T_BOOL : *((uint32_t*)d) = s->val.b; break;
michael@0	91	case nsXPTType::T_CHAR : *((uint32_t*)d) = s->val.c; break;
michael@0	92	// wchar_t is an int (32 bits) on NetBSD
michael@0	93	case nsXPTType::T_WCHAR : *((wchar_t*) d) = s->val.wc; break;
michael@0	94	default:
michael@0	95	// all the others are plain pointer types
michael@0	96	*((void**)d) = s->val.p;
michael@0	97	break;
michael@0	98	}
michael@0	99	}
michael@0	100	}
michael@0	101	}
michael@0	102
michael@0	103	XPTC_PUBLIC_API(nsresult)
michael@0	104	XPTC_InvokeByIndex(nsISupports* that, uint32_t methodIndex,
michael@0	105	uint32_t paramCount, nsXPTCVariant* params)
michael@0	106	{
michael@0	107	uint32_t result;
michael@0	108
michael@0	109	__asm__ __volatile__(
michael@0	110	"movl %4, sp@-\n\t"
michael@0	111	"movl %3, sp@-\n\t"
michael@0	112	"jbsr _invoke_count_words\n\t" /* count words */
michael@0	113	"addql #8, sp\n\t"
michael@0	114	"lsll #2, d0\n\t" /* *= 4 */
michael@0	115	"movl sp, a2\n\t" /* save original sp */
michael@0	116	"subl d0, sp\n\t" /* make room for params */
michael@0	117	"movl sp, a0\n\t"
michael@0	118	"movl %4, sp@-\n\t"
michael@0	119	"movl %3, sp@-\n\t"
michael@0	120	"movl a0, sp@-\n\t"
michael@0	121	"jbsr _invoke_copy_to_stack\n\t" /* copy params */
michael@0	122	"addl #12, sp\n\t"
michael@0	123	"movl %1, a0\n\t"
michael@0	124	"movl a0@, a1\n\t"
michael@0	125	"movl %2, d0\n\t" /* function index */
michael@0	126	"movl a0, d1\n\t"
michael@0	127	"movw a1@(8,d0:l:8), a0\n\t"
michael@0	128	"addl a0, d1\n\t"
michael@0	129	"movl a1@(12,d0:l:8), a1\n\t"
michael@0	130	"movl d1, sp@-\n\t"
michael@0	131	"jbsr a1@\n\t"
michael@0	132	"movl a2, sp\n\t" /* restore original sp */
michael@0	133	"movl d0, %0\n\t"
michael@0	134	: "=g" (result) /* %0 */
michael@0	135	: "g" (that), /* %1 */
michael@0	136	"g" (methodIndex), /* %2 */
michael@0	137	"g" (paramCount), /* %3 */
michael@0	138	"g" (params) /* %4 */
michael@0	139	: "a0", "a1", "a2", "d0", "d1", "memory"
michael@0	140	);
michael@0	141
michael@0	142	return result;
michael@0	143	}