[SVN-Commit] r119 - in branches/experimental/www/libxul: . files
svn-freebsd-gecko at chruetertee.ch
svn-freebsd-gecko at chruetertee.ch
Tue Sep 29 20:03:30 UTC 2009
Author: andreast
Date: Tue Sep 29 20:03:22 2009
New Revision: 119
Log:
Add support for powerpc.
Added:
branches/experimental/www/libxul/files/patch-xptcall-powerpc
Modified:
branches/experimental/www/libxul/Makefile
branches/experimental/www/libxul/files/patch-security_coreconf_FreeBSD.mk
branches/experimental/www/libxul/files/patch-xpcom_reflect_xptcall_src_md_unix_Makefile.in
Modified: branches/experimental/www/libxul/Makefile
==============================================================================
--- branches/experimental/www/libxul/Makefile Mon Sep 28 21:21:18 2009 (r118)
+++ branches/experimental/www/libxul/Makefile Tue Sep 29 20:03:22 2009 (r119)
@@ -50,6 +50,9 @@
.include <bsd.port.pre.mk>
+GECKO_PTHREAD_LIBS!=${CC} -dumpspecs | ${GREP} -m 1 '%{\!pg: %{pthread:' | ${SED
+} -e 's|^.*%{\!pg: %{pthread:|| ; s|}.*$$||' || ${TRUE}
+
.if ${OSVERSION} < 700000
LIB_DEPENDS+= pulse.0:${PORTSDIR}/audio/pulseaudio
EXTRA_PATCHES= ${FILESDIR}/releng6_pulseaudio
Modified: branches/experimental/www/libxul/files/patch-security_coreconf_FreeBSD.mk
==============================================================================
--- branches/experimental/www/libxul/files/patch-security_coreconf_FreeBSD.mk Mon Sep 28 21:21:18 2009 (r118)
+++ branches/experimental/www/libxul/files/patch-security_coreconf_FreeBSD.mk Tue Sep 29 20:03:22 2009 (r119)
@@ -1,6 +1,6 @@
---- security/coreconf/FreeBSD.mk.orig Wed Mar 26 20:17:25 2003
-+++ security/coreconf/FreeBSD.mk Thu Jul 8 12:56:24 2004
-@@ -35,16 +35,18 @@
+--- security/coreconf/FreeBSD.mk.orig 2009-08-24 17:52:57.000000000 +0200
++++ security/coreconf/FreeBSD.mk 2009-09-27 21:08:00.000000000 +0200
+@@ -37,16 +37,22 @@
include $(CORE_DEPTH)/coreconf/UNIX.mk
@@ -16,13 +16,17 @@
+ifeq ($(OS_TEST),amd64)
+CPU_ARCH = amd64
+else
++ifeq ($(OS_TEST),powerpc)
++CPU_ARCH = powerpc
++else
CPU_ARCH = x86
endif
+endif
++endif
- OS_CFLAGS = $(DSO_CFLAGS) -ansi -Wall -DFREEBSD -DHAVE_STRERROR -DHAVE_BSD_FLOCK
+ OS_CFLAGS = $(DSO_CFLAGS) -ansi -Wall -Wno-switch -DFREEBSD -DHAVE_STRERROR -DHAVE_BSD_FLOCK
-@@ -71,7 +73,11 @@
+@@ -73,7 +79,11 @@
DLL_SUFFIX = so.1.0
endif
@@ -33,5 +37,11 @@
+MKSHLIB = $(CC) -Wl,-Bsymbolic $(DSO_LDOPTS) -o $@
+endif
ifdef MAPFILE
- # Add LD options to restrict exported symbols to those in the map file
+ MKSHLIB += -Wl,--version-script,$(MAPFILE)
endif
+@@ -82,4 +92,4 @@
+
+ G++INCLUDES = -I/usr/include/g++
+
+-INCLUDES += -I/usr/X11R6/include
++INCLUDES += -I/usr/local/include
Modified: branches/experimental/www/libxul/files/patch-xpcom_reflect_xptcall_src_md_unix_Makefile.in
==============================================================================
--- branches/experimental/www/libxul/files/patch-xpcom_reflect_xptcall_src_md_unix_Makefile.in Mon Sep 28 21:21:18 2009 (r118)
+++ branches/experimental/www/libxul/files/patch-xpcom_reflect_xptcall_src_md_unix_Makefile.in Tue Sep 29 20:03:22 2009 (r119)
@@ -1,16 +1,16 @@
---- xpcom/reflect/xptcall/src/md/unix/Makefile.in.orig Thu Aug 14 21:00:23 2003
-+++ xpcom/reflect/xptcall/src/md/unix/Makefile.in Sun Feb 1 15:06:40 2004
-@@ -49,6 +49,9 @@
- ifeq (86,$(findstring 86,$(OS_TEST)))
- CPPSRCS := xptcinvoke_unixish_x86.cpp xptcstubs_unixish_x86.cpp
+--- xpcom/reflect/xptcall/src/md/unix/Makefile.in.orig 2009-08-24 17:53:28.000000000 +0200
++++ xpcom/reflect/xptcall/src/md/unix/Makefile.in 2009-09-27 21:15:47.000000000 +0200
+@@ -70,6 +70,9 @@
+ ifeq (Darwin,$(OS_ARCH))
+ DEFINES += -DKEEP_STACK_16_BYTE_ALIGNED
endif
+ifeq (x86_64,$(OS_TEST))
+CPPSRCS := xptcinvoke_x86_64_linux.cpp xptcstubs_x86_64_linux.cpp
+endif
endif
+ endif
#
- # New code for Linux, et. al., with gcc
-@@ -60,7 +63,7 @@
+@@ -87,7 +90,7 @@
endif
endif
# IA64 Linux
@@ -19,7 +19,7 @@
ifneq (,$(findstring ia64,$(OS_TEST)))
CPPSRCS := xptcinvoke_ipf64.cpp xptcstubs_ipf64.cpp
ASFILES := xptcstubs_asm_ipf64.s xptcinvoke_asm_ipf64.s
-@@ -106,9 +109,15 @@
+@@ -150,9 +153,15 @@
ASFILES := xptcinvoke_asm_osf1_alpha.s xptcstubs_asm_osf1_alpha.s
endif
#
@@ -36,12 +36,25 @@
CPPSRCS := xptcinvoke_linux_alpha.cpp xptcstubs_linux_alpha.cpp
endif
#
-@@ -294,6 +303,15 @@
- ifeq ($(OS_ARCH)$(OS_TEST),NetBSDsparc)
- CPPSRCS := xptcinvoke_sparc_netbsd.cpp xptcstubs_sparc_netbsd.cpp
- ASFILES := xptcinvoke_asm_sparc_netbsd.s xptcstubs_asm_sparc_netbsd.s
+@@ -304,6 +313,14 @@
+ CXXFLAGS := $(filter-out $(MOZ_OPTIMIZE_FLAGS), $(CXXFLAGS))
+ endif
+
++# FreeBSD/PPC
++#
++ifeq ($(OS_ARCH)$(OS_TEST),FreeBSDpowerpc)
++CPPSRCS := xptcinvoke_ppc_freebsd.cpp xptcstubs_ppc_freebsd.cpp
++ASFILES := xptcinvoke_asm_ppc_freebsd.s xptcstubs_asm_ppc_freebsd.s
+endif
-+#
++
++
+ #
+ # Linux/PPC
+ #
+@@ -385,6 +402,15 @@
+ ASFILES := xptcinvoke_asm_sparc_netbsd.s xptcstubs_asm_sparc_netbsd.s
+ endif
+ #
+# FreeBSD/SPARC64
+#
+ifeq ($(OS_ARCH),FreeBSD)
@@ -49,6 +62,8 @@
+CPPSRCS := xptcinvoke_sparc64_freebsd.cpp xptcstubs_sparc64_freebsd.cpp
+ASFILES := xptcinvoke_asm_sparc64_freebsd.s xptcstubs_asm_sparcv9_solaris.s
+endif
- endif
++endif
++#
+ # OpenBSD/SPARC
#
- # Solaris/SPARC
+ ifeq ($(OS_ARCH)$(OS_TEST),OpenBSDsparc)
Added: branches/experimental/www/libxul/files/patch-xptcall-powerpc
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ branches/experimental/www/libxul/files/patch-xptcall-powerpc Tue Sep 29 20:03:22 2009 (r119)
@@ -0,0 +1,580 @@
+--- xpcom/reflect/xptcall/src/md/unix/xptcinvoke_asm_ppc_freebsd.s.orig 2009-09-26 22:23:56.000000000 +0200
++++ xpcom/reflect/xptcall/src/md/unix/xptcinvoke_asm_ppc_freebsd.s 2009-09-27 10:01:48.000000000 +0200
+@@ -0,0 +1,110 @@
++# -*- Mode: Asm -*-
++#
++# The contents of this file are subject to the Netscape Public
++# License Version 1.1 (the "License"); you may not use this file
++# except in compliance with the License. You may obtain a copy of
++# the License at http://www.mozilla.org/NPL/
++#
++# Software distributed under the License is distributed on an "AS
++# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
++# implied. See the License for the specific language governing
++# rights and limitations under the License.
++#
++# The Original Code is mozilla.org code.
++#
++# The Initial Developer of the Original Code is Netscape
++# Communications Corporation. Portions created by Netscape are
++# Copyright (C) 1999 Netscape Communications Corporation. All
++# Rights Reserved.
++#
++# Contributor(s):
++# Franz.Sirl-kernel at lauterbach.com (Franz Sirl)
++# beard at netscape.com (Patrick Beard)
++# waterson at netscape.com (Chris Waterson)
++#
++.set r0,0; .set sp,1; .set RTOC,2; .set r3,3; .set r4,4
++.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
++.set r10,10; .set r11,11; .set r12,12; .set r13,13; .set r14,14
++.set r15,15; .set r16,16; .set r17,17; .set r18,18; .set r19,19
++.set r20,20; .set r21,21; .set r22,22; .set r23,23; .set r24,24
++.set r25,25; .set r26,26; .set r27,27; .set r28,28; .set r29,29
++.set r30,30; .set r31,31
++.set f0,0; .set f1,1; .set f2,2; .set f3,3; .set f4,4
++.set f5,5; .set f6,6; .set f7,7; .set f8,8; .set f9,9
++.set f10,10; .set f11,11; .set f12,12; .set f13,13; .set f14,14
++.set f15,15; .set f16,16; .set f17,17; .set f18,18; .set f19,19
++.set f20,20; .set f21,21; .set f22,22; .set f23,23; .set f24,24
++.set f25,25; .set f26,26; .set f27,27; .set f28,28; .set f29,29
++.set f30,30; .set f31,31
++
++ .section ".text"
++ .align 2
++ .globl NS_InvokeByIndex_P
++ .type NS_InvokeByIndex_P, at function
++
++#
++# NS_InvokeByIndex_P(nsISupports* that, PRUint32 methodIndex,
++# PRUint32 paramCount, nsXPTCVariant* params)
++#
++
++NS_InvokeByIndex_P:
++ stwu sp,-32(sp) # setup standard stack frame
++ mflr r0 # save LR
++ stw r3,8(sp) # r3 <= that
++ stw r4,12(sp) # r4 <= methodIndex
++ stw r30,16(sp)
++ stw r31,20(sp)
++
++ stw r0,36(sp) # store LR backchain
++ mr r31,sp
++
++ rlwinm r10,r5,3,0,27 # r10 = (ParamCount * 2 * 4) & ~0x0f
++ addi r0,r10,96 # reserve stack for GPR and FPR register save area r0 = r10 + 96
++ lwz r9,0(sp) # r9 = backchain
++ neg r0,r0
++ stwux r9,sp,r0 # reserve stack sapce and save SP backchain
++
++ addi r3,sp,8 # r3 <= args
++ mr r4,r5 # r4 <= paramCount
++ mr r5,r6 # r5 <= params
++ add r6,r3,r10 # r6 <= gpregs ( == args + r10 )
++ mr r30,r6 # store in r30 for use later...
++ addi r7,r6,32 # r7 <= fpregs ( == gpregs + 32 )
++
++ bl invoke_copy_to_stack at local # (args, paramCount, params, gpregs, fpregs)
++
++ lfd f1,32(r30) # load FP registers with method parameters
++ lfd f2,40(r30)
++ lfd f3,48(r30)
++ lfd f4,56(r30)
++ lfd f5,64(r30)
++ lfd f6,72(r30)
++ lfd f7,80(r30)
++ lfd f8,88(r30)
++
++ lwz r3,8(r31) # r3 <= that
++ lwz r4,12(r31) # r4 <= methodIndex
++ lwz r5,0(r3) # r5 <= vtable ( == *that )
++
++ slwi r4,r4,2 # convert to offset ( *= 4 )
++ lwzx r0,r5,r4 # r0 <= methodpointer ( == vtable + offset )
++
++ lwz r4,4(r30) # load GP regs with method parameters
++ lwz r5,8(r30)
++ lwz r6,12(r30)
++ lwz r7,16(r30)
++ lwz r8,20(r30)
++ lwz r9,24(r30)
++ lwz r10,28(r30)
++
++ mtlr r0 # copy methodpointer to LR
++ blrl # call method
++
++ lwz r30,16(r31) # restore r30 & r31
++ lwz r31,20(r31)
++
++ lwz r11,0(sp) # clean up the stack
++ lwz r0,4(r11)
++ mtlr r0
++ mr sp,r11
++ blr
+--- xpcom/reflect/xptcall/src/md/unix/xptcinvoke_ppc_freebsd.cpp.orig 2009-09-26 22:23:56.000000000 +0200
++++ xpcom/reflect/xptcall/src/md/unix/xptcinvoke_ppc_freebsd.cpp 2009-09-27 09:58:59.000000000 +0200
+@@ -0,0 +1,141 @@
++/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
++/* ***** BEGIN LICENSE BLOCK *****
++ * Version: MPL 1.1/GPL 2.0/LGPL 2.1
++ *
++ * The contents of this file are subject to the Mozilla Public License Version
++ * 1.1 (the "License"); you may not use this file except in compliance with
++ * the License. You may obtain a copy of the License at
++ * http://www.mozilla.org/MPL/
++ *
++ * Software distributed under the License is distributed on an "AS IS" basis,
++ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
++ * for the specific language governing rights and limitations under the
++ * License.
++ *
++ * The Original Code is mozilla.org code.
++ *
++ * The Initial Developer of the Original Code is
++ * Netscape Communications Corporation.
++ * Portions created by the Initial Developer are Copyright (C) 1998
++ * the Initial Developer. All Rights Reserved.
++ *
++ * Contributor(s):
++ * Franz.Sirl-kernel at lauterbach.com (Franz Sirl)
++ * beard at netscape.com (Patrick Beard)
++ * waterson at netscape.com (Chris Waterson)
++ *
++ * Alternatively, the contents of this file may be used under the terms of
++ * either of the GNU General Public License Version 2 or later (the "GPL"),
++ * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
++ * in which case the provisions of the GPL or the LGPL are applicable instead
++ * of those above. If you wish to allow use of your version of this file only
++ * under the terms of either the GPL or the LGPL, and not to allow others to
++ * use your version of this file under the terms of the MPL, indicate your
++ * decision by deleting the provisions above and replace them with the notice
++ * and other provisions required by the GPL or the LGPL. If you do not delete
++ * the provisions above, a recipient may use your version of this file under
++ * the terms of any one of the MPL, the GPL or the LGPL.
++ *
++ * ***** END LICENSE BLOCK ***** */
++
++// Platform specific code to invoke XPCOM methods on native objects
++
++// The purpose of NS_InvokeByIndex_P() is to map a platform
++// indepenpent call to the platform ABI. To do that,
++// NS_InvokeByIndex_P() has to determine the method to call via vtable
++// access. The parameters for the method are read from the
++// nsXPTCVariant* and prepared for th native ABI. For the Linux/PPC
++// ABI this means that the first 8 integral and floating point
++// parameters are passed in registers.
++
++#include "xptcprivate.h"
++
++// 8 integral parameters are passed in registers
++#define GPR_COUNT 8
++
++// 8 floating point parameters are passed in registers, floats are
++// promoted to doubles when passed in registers
++#define FPR_COUNT 8
++
++extern "C" PRUint32
++invoke_count_words(PRUint32 paramCount, nsXPTCVariant* s)
++{
++ return PRUint32(((paramCount * 2) + 3) & ~3);
++}
++
++extern "C" void
++invoke_copy_to_stack(PRUint32* d,
++ PRUint32 paramCount,
++ nsXPTCVariant* s,
++ PRUint32* gpregs,
++ double* fpregs)
++{
++ PRUint32 gpr = 1; // skip one GP reg for 'that'
++ PRUint32 fpr = 0;
++ PRUint32 tempu32;
++ PRUint64 tempu64;
++
++ for(uint32 i = 0; i < paramCount; i++, s++) {
++ if(s->IsPtrData())
++ tempu32 = (PRUint32) s->ptr;
++ else {
++ switch(s->type) {
++ case nsXPTType::T_FLOAT: break;
++ case nsXPTType::T_DOUBLE: break;
++ case nsXPTType::T_I8: tempu32 = s->val.i8; break;
++ case nsXPTType::T_I16: tempu32 = s->val.i16; break;
++ case nsXPTType::T_I32: tempu32 = s->val.i32; break;
++ case nsXPTType::T_I64: tempu64 = s->val.i64; break;
++ case nsXPTType::T_U8: tempu32 = s->val.u8; break;
++ case nsXPTType::T_U16: tempu32 = s->val.u16; break;
++ case nsXPTType::T_U32: tempu32 = s->val.u32; break;
++ case nsXPTType::T_U64: tempu64 = s->val.u64; break;
++ case nsXPTType::T_BOOL: tempu32 = s->val.b; break;
++ case nsXPTType::T_CHAR: tempu32 = s->val.c; break;
++ case nsXPTType::T_WCHAR: tempu32 = s->val.wc; break;
++ default: tempu32 = (PRUint32) s->val.p; break;
++ }
++ }
++
++ if (!s->IsPtrData() && s->type == nsXPTType::T_DOUBLE) {
++ if (fpr < FPR_COUNT)
++ fpregs[fpr++] = s->val.d;
++ else {
++ if ((PRUint32) d & 4) d++; // doubles are 8-byte aligned on stack
++ *((double*) d) = s->val.d;
++ d += 2;
++ }
++ }
++ else if (!s->IsPtrData() && s->type == nsXPTType::T_FLOAT) {
++ if (fpr < FPR_COUNT)
++ fpregs[fpr++] = s->val.f; // if passed in registers, floats are promoted to doubles
++ else
++ *((float*) d++) = s->val.f;
++ }
++ else if (!s->IsPtrData() && (s->type == nsXPTType::T_I64
++ || s->type == nsXPTType::T_U64)) {
++ if ((gpr + 1) < GPR_COUNT) {
++ if (gpr & 1) gpr++; // longlongs are aligned in odd/even register pairs, eg. r5/r6
++ *((PRUint64*) &gpregs[gpr]) = tempu64;
++ gpr += 2;
++ }
++ else {
++ if ((PRUint32) d & 4) d++; // longlongs are 8-byte aligned on stack
++ *((PRUint64*) d) = tempu64;
++ d += 2;
++ }
++ }
++ else {
++ if (gpr < GPR_COUNT)
++ gpregs[gpr++] = tempu32;
++ else
++ *d++ = tempu32;
++ }
++
++ }
++}
++
++extern "C"
++EXPORT_XPCOM_API(nsresult)
++NS_InvokeByIndex_P(nsISupports* that, PRUint32 methodIndex,
++ PRUint32 paramCount, nsXPTCVariant* params);
+--- xpcom/reflect/xptcall/src/md/unix/xptcstubs_asm_ppc_freebsd.s.orig 2009-09-26 22:23:56.000000000 +0200
++++ xpcom/reflect/xptcall/src/md/unix/xptcstubs_asm_ppc_freebsd.s 2009-09-26 22:23:56.000000000 +0200
+@@ -0,0 +1,89 @@
++# -*- Mode: Asm -*-
++#
++# The contents of this file are subject to the Netscape Public
++# License Version 1.1 (the "License"); you may not use this file
++# except in compliance with the License. You may obtain a copy of
++# the License at http://www.mozilla.org/NPL/
++#
++# Software distributed under the License is distributed on an "AS
++# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
++# implied. See the License for the specific language governing
++# rights and limitations under the License.
++#
++# The Original Code is mozilla.org code.
++#
++# The Initial Developer of the Original Code is Netscape
++# Communications Corporation. Portions created by Netscape are
++# Copyright (C) 1999 Netscape Communications Corporation. All
++# Rights Reserved.
++#
++# Contributor(s):
++# Franz.Sirl-kernel at lauterbach.com (Franz Sirl)
++# beard at netscape.com (Patrick Beard)
++# waterson at netscape.com (Chris Waterson)
++#
++
++.set r0,0; .set sp,1; .set RTOC,2; .set r3,3; .set r4,4
++.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
++.set r10,10; .set r11,11; .set r12,12; .set r13,13; .set r14,14
++.set r15,15; .set r16,16; .set r17,17; .set r18,18; .set r19,19
++.set r20,20; .set r21,21; .set r22,22; .set r23,23; .set r24,24
++.set r25,25; .set r26,26; .set r27,27; .set r28,28; .set r29,29
++.set r30,30; .set r31,31
++.set f0,0; .set f1,1; .set f2,2; .set f3,3; .set f4,4
++.set f5,5; .set f6,6; .set f7,7; .set f8,8; .set f9,9
++.set f10,10; .set f11,11; .set f12,12; .set f13,13; .set f14,14
++.set f15,15; .set f16,16; .set f17,17; .set f18,18; .set f19,19
++.set f20,20; .set f21,21; .set f22,22; .set f23,23; .set f24,24
++.set f25,25; .set f26,26; .set f27,27; .set f28,28; .set f29,29
++.set f30,30; .set f31,31
++
++ .section ".text"
++ .align 2
++ .globl SharedStub
++ .type SharedStub, at function
++
++SharedStub:
++ stwu sp,-112(sp) # room for
++ # linkage (8),
++ # gprData (32),
++ # fprData (64),
++ # stack alignment(8)
++ mflr r0
++ stw r0,116(sp) # save LR backchain
++
++ stw r4,12(sp) # save GP registers
++ stw r5,16(sp) # (n.b. that we don't save r3
++ stw r6,20(sp) # because PrepareAndDispatch() is savvy)
++ stw r7,24(sp)
++ stw r8,28(sp)
++ stw r9,32(sp)
++ stw r10,36(sp)
++
++ stfd f1,40(sp) # save FP registers
++ stfd f2,48(sp)
++ stfd f3,56(sp)
++ stfd f4,64(sp)
++ stfd f5,72(sp)
++ stfd f6,80(sp)
++ stfd f7,88(sp)
++ stfd f8,96(sp)
++
++ # r3 has the 'self' pointer already
++
++ mr r4,r11 # r4 <= methodIndex selector, passed
++ # via r11 in the nsXPTCStubBase::StubXX() call
++
++ addi r5,sp,120 # r5 <= pointer to callers args area,
++ # beyond r3-r10/f1-f8 mapped range
++
++ addi r6,sp,8 # r6 <= gprData
++ addi r7,sp,40 # r7 <= fprData
++
++ bl PrepareAndDispatch at local # Go!
++
++ lwz r0,116(sp) # restore LR
++ mtlr r0
++ la sp,112(sp) # clean up the stack
++ blr
++
+--- xpcom/reflect/xptcall/src/md/unix/xptcstubs_ppc_freebsd.cpp.orig 2009-09-26 22:23:56.000000000 +0200
++++ xpcom/reflect/xptcall/src/md/unix/xptcstubs_ppc_freebsd.cpp 2009-09-26 22:43:57.000000000 +0200
+@@ -0,0 +1,228 @@
++/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
++/* ***** BEGIN LICENSE BLOCK *****
++ * Version: MPL 1.1/GPL 2.0/LGPL 2.1
++ *
++ * The contents of this file are subject to the Mozilla Public License Version
++ * 1.1 (the "License"); you may not use this file except in compliance with
++ * the License. You may obtain a copy of the License at
++ * http://www.mozilla.org/MPL/
++ *
++ * Software distributed under the License is distributed on an "AS IS" basis,
++ * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
++ * for the specific language governing rights and limitations under the
++ * License.
++ *
++ * The Original Code is mozilla.org code.
++ *
++ * The Initial Developer of the Original Code is
++ * Netscape Communications Corporation.
++ * Portions created by the Initial Developer are Copyright (C) 1999
++ * the Initial Developer. All Rights Reserved.
++ *
++ * Contributor(s):
++ * Franz.Sirl-kernel at lauterbach.com (Franz Sirl)
++ * beard at netscape.com (Patrick Beard)
++ * waterson at netscape.com (Chris Waterson)
++ *
++ * Alternatively, the contents of this file may be used under the terms of
++ * either of the GNU General Public License Version 2 or later (the "GPL"),
++ * or the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
++ * in which case the provisions of the GPL or the LGPL are applicable instead
++ * of those above. If you wish to allow use of your version of this file only
++ * under the terms of either the GPL or the LGPL, and not to allow others to
++ * use your version of this file under the terms of the MPL, indicate your
++ * decision by deleting the provisions above and replace them with the notice
++ * and other provisions required by the GPL or the LGPL. If you do not delete
++ * the provisions above, a recipient may use your version of this file under
++ * the terms of any one of the MPL, the GPL or the LGPL.
++ *
++ * ***** END LICENSE BLOCK ***** */
++
++// Implement shared vtbl methods.
++
++#include "xptcprivate.h"
++#include "xptiprivate.h"
++
++// The PPC/SYSV ABI passes the first 8 integral
++// parameters and the first 8 floating point parameters in registers
++// (r3-r10 and f1-f8), no stack space is allocated for these by the
++// caller. The rest of the parameters are passed in the callers stack
++// area. The stack pointer has to retain 16-byte alignment, longlongs
++// and doubles are aligned on 8-byte boundaries.
++
++#define PARAM_BUFFER_COUNT 16
++#define GPR_COUNT 8
++#define FPR_COUNT 8
++
++// PrepareAndDispatch() is called by SharedStub() and calls the actual method.
++//
++// - 'args[]' contains the arguments passed on stack
++// - 'gprData[]' contains the arguments passed in integer registers
++// - 'fprData[]' contains the arguments passed in floating point registers
++//
++// The parameters are mapped into an array of type 'nsXPTCMiniVariant'
++// and then the method gets called.
++
++extern "C" nsresult
++PrepareAndDispatch(nsXPTCStubBase* self,
++ PRUint32 methodIndex,
++ PRUint32* args,
++ PRUint32 *gprData,
++ double *fprData)
++{
++ nsXPTCMiniVariant paramBuffer[PARAM_BUFFER_COUNT];
++ nsXPTCMiniVariant* dispatchParams = NULL;
++ const nsXPTMethodInfo* info = NULL;
++ PRUint32 paramCount;
++ PRUint32 i;
++ nsresult result = NS_ERROR_FAILURE;
++
++ NS_ASSERTION(self,"no self");
++
++ self->mEntry->GetMethodInfo(PRUint16(methodIndex), &info);
++ NS_ASSERTION(info,"no method info");
++ if (! info)
++ return NS_ERROR_UNEXPECTED;
++
++ paramCount = info->GetParamCount();
++
++ // setup variant array pointer
++ if(paramCount > PARAM_BUFFER_COUNT)
++ dispatchParams = new nsXPTCMiniVariant[paramCount];
++ else
++ dispatchParams = paramBuffer;
++
++ NS_ASSERTION(dispatchParams,"no place for params");
++ if (! dispatchParams)
++ return NS_ERROR_OUT_OF_MEMORY;
++
++ PRUint32* ap = args;
++ PRUint32 gpr = 1; // skip one GPR register
++ PRUint32 fpr = 0;
++ PRUint32 tempu32;
++ PRUint64 tempu64;
++
++ for(i = 0; i < paramCount; i++) {
++ const nsXPTParamInfo& param = info->GetParam(i);
++ const nsXPTType& type = param.GetType();
++ nsXPTCMiniVariant* dp = &dispatchParams[i];
++
++ if (!param.IsOut() && type == nsXPTType::T_DOUBLE) {
++ if (fpr < FPR_COUNT)
++ dp->val.d = fprData[fpr++];
++ else {
++ if ((PRUint32) ap & 4) ap++; // doubles are 8-byte aligned on stack
++ dp->val.d = *(double*) ap;
++ ap += 2;
++ }
++ continue;
++ }
++ else if (!param.IsOut() && type == nsXPTType::T_FLOAT) {
++ if (fpr < FPR_COUNT)
++ dp->val.f = (float) fprData[fpr++]; // in registers floats are passed as doubles
++ else
++ dp->val.f = *(float*) ap++;
++ continue;
++ }
++ else if (!param.IsOut() && (type == nsXPTType::T_I64
++ || type == nsXPTType::T_U64)) {
++ if (gpr & 1) gpr++; // longlongs are aligned in odd/even register pairs, eg. r5/r6
++ if ((gpr + 1) < GPR_COUNT) {
++ tempu64 = *(PRUint64*) &gprData[gpr];
++ gpr += 2;
++ }
++ else {
++ if ((PRUint32) ap & 4) ap++; // longlongs are 8-byte aligned on stack
++ tempu64 = *(PRUint64*) ap;
++ ap += 2;
++ }
++ }
++ else {
++ if (gpr < GPR_COUNT)
++ tempu32 = gprData[gpr++];
++ else
++ tempu32 = *ap++;
++ }
++
++ if(param.IsOut() || !type.IsArithmetic()) {
++ dp->val.p = (void*) tempu32;
++ continue;
++ }
++
++ switch(type) {
++ case nsXPTType::T_I8: dp->val.i8 = (PRInt8) tempu32; break;
++ case nsXPTType::T_I16: dp->val.i16 = (PRInt16) tempu32; break;
++ case nsXPTType::T_I32: dp->val.i32 = (PRInt32) tempu32; break;
++ case nsXPTType::T_I64: dp->val.i64 = (PRInt64) tempu64; break;
++ case nsXPTType::T_U8: dp->val.u8 = (PRUint8) tempu32; break;
++ case nsXPTType::T_U16: dp->val.u16 = (PRUint16) tempu32; break;
++ case nsXPTType::T_U32: dp->val.u32 = (PRUint32) tempu32; break;
++ case nsXPTType::T_U64: dp->val.u64 = (PRUint64) tempu64; break;
++ case nsXPTType::T_BOOL: dp->val.b = (PRBool) tempu32; break;
++ case nsXPTType::T_CHAR: dp->val.c = (char) tempu32; break;
++ case nsXPTType::T_WCHAR: dp->val.wc = (wchar_t) tempu32; break;
++
++ default:
++ NS_ASSERTION(0, "bad type");
++ break;
++ }
++ }
++
++ result = self->mOuter->CallMethod((PRUint16)methodIndex,
++ info,
++ dispatchParams);
++
++ if (dispatchParams != paramBuffer)
++ delete [] dispatchParams;
++
++ return result;
++
++}
++
++// Load r11 with the constant 'n' and branch to SharedStub().
++
++// As G++3 ABI contains the length of the functionname in the mangled
++// name, it is difficult to get a generic assembler mechanism like
++// in the G++ 2.95 case.
++// Create names would be like:
++// _ZN14nsXPTCStubBase5Stub1Ev
++// _ZN14nsXPTCStubBase6Stub12Ev
++// _ZN14nsXPTCStubBase7Stub123Ev
++// _ZN14nsXPTCStubBase8Stub1234Ev
++// etc.
++// Use assembler directives to get the names right...
++
++# define STUB_ENTRY(n) \
++__asm__ ( \
++ ".align 2 \n\t" \
++ ".if "#n" < 10 \n\t" \
++ ".globl _ZN14nsXPTCStubBase5Stub"#n"Ev \n\t" \
++ ".type _ZN14nsXPTCStubBase5Stub"#n"Ev, at function \n\n" \
++"_ZN14nsXPTCStubBase5Stub"#n"Ev: \n\t" \
++ \
++ ".elseif "#n" < 100 \n\t" \
++ ".globl _ZN14nsXPTCStubBase6Stub"#n"Ev \n\t" \
++ ".type _ZN14nsXPTCStubBase6Stub"#n"Ev, at function \n\n" \
++"_ZN14nsXPTCStubBase6Stub"#n"Ev: \n\t" \
++ \
++ ".elseif "#n" < 1000 \n\t" \
++ ".globl _ZN14nsXPTCStubBase7Stub"#n"Ev \n\t" \
++ ".type _ZN14nsXPTCStubBase7Stub"#n"Ev, at function \n\n" \
++"_ZN14nsXPTCStubBase7Stub"#n"Ev: \n\t" \
++ \
++ ".else \n\t" \
++ ".err \"stub number "#n" >= 1000 not yet supported\"\n" \
++ ".endif \n\t" \
++ \
++ "li 11,"#n" \n\t" \
++ "b SharedStub at local \n" \
++);
++
++#define SENTINEL_ENTRY(n) \
++nsresult nsXPTCStubBase::Sentinel##n() \
++{ \
++ NS_ASSERTION(0,"nsXPTCStubBase::Sentinel called"); \
++ return NS_ERROR_NOT_IMPLEMENTED; \
++}
++
++#include "xptcstubsdef.inc"
More information about the freebsd-gecko
mailing list