1// -*- Mode: Asm -*-
2//
3// This Source Code Form is subject to the terms of the Mozilla Public
4// License, v. 2.0. If a copy of the MPL was not distributed with this
5// file, You can obtain one at http://mozilla.org/MPL/2.0/.
6
7.set r0,0; .set sp,1; .set RTOC,2; .set r3,3; .set r4,4
8.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
9.set r10,10; .set r11,11; .set r12,12; .set r13,13; .set r14,14
10.set r15,15; .set r16,16; .set r17,17; .set r18,18; .set r19,19
11.set r20,20; .set r21,21; .set r22,22; .set r23,23; .set r24,24
12.set r25,25; .set r26,26; .set r27,27; .set r28,28; .set r29,29
13.set r30,30; .set r31,31
14.set f0,0; .set f1,1; .set f2,2; .set f3,3; .set f4,4
15.set f5,5; .set f6,6; .set f7,7; .set f8,8; .set f9,9
16.set f10,10; .set f11,11; .set f12,12; .set f13,13; .set f14,14
17.set f15,15; .set f16,16; .set f17,17; .set f18,18; .set f19,19
18.set f20,20; .set f21,21; .set f22,22; .set f23,23; .set f24,24
19.set f25,25; .set f26,26; .set f27,27; .set f28,28; .set f29,29
20.set f30,30; .set f31,31
21
22        .section ".text"
23	.align 2
24	.globl NS_InvokeByIndex
25	.type  NS_InvokeByIndex,@function
26
27//
28// NS_InvokeByIndex(nsISupports* that, uint32_t methodIndex,
29//                  uint32_t paramCount, nsXPTCVariant* params)
30//
31
32NS_InvokeByIndex:
33	stwu    sp,-32(sp)			// setup standard stack frame
34	mflr    r0				// save LR
35	stw     r3,8(sp)			// r3 <= that
36	stw     r4,12(sp)			// r4 <= methodIndex
37	stw     r30,16(sp)
38	stw     r31,20(sp)
39
40	stw     r0,36(sp)			// store LR backchain
41	mr      r31,sp
42
43	rlwinm  r10,r5,3,0,27			// r10 = (ParamCount * 2 * 4) & ~0x0f
44	addi    r0,r10,96			// reserve stack for GPR and FPR register save area r0 = r10 + 96
45	lwz     r9,0(sp)			// r9 = backchain
46	neg     r0,r0
47	stwux   r9,sp,r0			// reserve stack space and save SP backchain
48
49	addi    r3,sp,8				// r3 <= args
50	mr      r4,r5				// r4 <= paramCount
51	mr      r5,r6				// r5 <= params
52	add     r6,r3,r10			// r6 <= gpregs ( == args + r10 )
53	mr      r30,r6				// store in r30 for use later...
54#ifndef __NO_FPRS__
55	addi    r7,r6,32			// r7 <= fpregs ( == gpregs + 32 )
56#else
57	li	r7, 0
58#endif
59
60	bl      invoke_copy_to_stack@local	// (args, paramCount, params, gpregs, fpregs)
61#ifndef __NO_FPRS__
62	lfd     f1,32(r30)			// load FP registers with method parameters
63	lfd     f2,40(r30)
64	lfd     f3,48(r30)
65	lfd     f4,56(r30)
66	lfd     f5,64(r30)
67	lfd     f6,72(r30)
68	lfd     f7,80(r30)
69	lfd     f8,88(r30)
70#endif
71	lwz     r3,8(r31)			// r3 <= that
72	lwz     r4,12(r31)			// r4 <= methodIndex
73	lwz     r5,0(r3)			// r5 <= vtable ( == *that )
74	slwi    r4,r4,2				// convert to offset ( *= 4 )
75	lwzx    r0,r5,r4			// r0 <= methodpointer ( == vtable + offset )
76
77        lwz     r4,4(r30)			// load GP regs with method parameters
78	lwz     r5,8(r30)
79	lwz     r6,12(r30)
80	lwz     r7,16(r30)
81	lwz     r8,20(r30)
82	lwz     r9,24(r30)
83	lwz     r10,28(r30)
84
85	mtlr    r0				// copy methodpointer to LR
86	blrl					// call method
87
88	lwz     r30,16(r31)			// restore r30 & r31
89	lwz     r31,20(r31)
90
91	lwz     r11,0(sp)			// clean up the stack
92	lwz     r0,4(r11)
93	mtlr    r0
94	mr      sp,r11
95	blr
96
97/* Magic indicating no need for an executable stack */
98.section .note.GNU-stack, "", @progbits ; .previous
99