michael@0: # This Source Code Form is subject to the terms of the Mozilla Public michael@0: # License, v. 2.0. If a copy of the MPL was not distributed with this michael@0: # file, You can obtain one at http://mozilla.org/MPL/2.0/. michael@0: michael@0: .set r0,0; .set sp,1; .set RTOC,2; .set r3,3; .set r4,4 michael@0: .set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9 michael@0: .set r10,10; .set r11,11; .set r12,12; .set r13,13; .set r14,14 michael@0: .set r15,15; .set r16,16; .set r17,17; .set r18,18; .set r19,19 michael@0: .set r20,20; .set r21,21; .set r22,22; .set r23,23; .set r24,24 michael@0: .set r25,25; .set r26,26; .set r27,27; .set r28,28; .set r29,29 michael@0: .set r30,30; .set r31,31 michael@0: .set f0,0; .set f1,1; .set f2,2; .set f3,3; .set f4,4 michael@0: .set f5,5; .set f6,6; .set f7,7; .set f8,8; .set f9,9 michael@0: .set f10,10; .set f11,11; .set f12,12; .set f13,13; .set f14,14 michael@0: .set f15,15; .set f16,16; .set f17,17; .set f18,18; .set f19,19 michael@0: .set f20,20; .set f21,21; .set f22,22; .set f23,23; .set f24,24 michael@0: .set f25,25; .set f26,26; .set f27,27; .set f28,28; .set f29,29 michael@0: .set f30,30; .set f31,31 michael@0: .set BO_IF,12 michael@0: .set CR0_EQ,2 michael@0: michael@0: .rename H.10.NO_SYMBOL{PR},"" michael@0: .rename H.18.NS_InvokeByIndex{TC},"NS_InvokeByIndex" michael@0: michael@0: michael@0: # .text section michael@0: michael@0: .csect H.10.NO_SYMBOL{PR} michael@0: .globl .NS_InvokeByIndex michael@0: .globl NS_InvokeByIndex{DS} michael@0: .extern .invoke_copy_to_stack michael@0: .extern ._ptrgl{PR} michael@0: michael@0: # michael@0: # NS_InvokeByIndex(nsISupports* that, uint32_t methodIndex, michael@0: # uint32_t paramCount, nsXPTCVariant* params) michael@0: # michael@0: michael@0: .NS_InvokeByIndex: michael@0: mflr r0 michael@0: std r31,-8(sp) michael@0: # michael@0: # save off the incoming values in the caller's parameter area michael@0: # michael@0: std r3,48(sp) # that michael@0: std r4,56(sp) # methodIndex michael@0: std r5,64(sp) # paramCount michael@0: std r6,72(sp) # params michael@0: std r0,16(sp) michael@0: stdu sp,-168(sp) # 2*24=48 for linkage area, michael@0: # 8*13=104 for fprData area michael@0: # 16 for saved registers michael@0: michael@0: # prepare args for 'invoke_copy_to_stack' call michael@0: # michael@0: ld r4,232(sp) # paramCount (168+8+56) michael@0: ld r5,240(sp) # params michael@0: mr r6,sp # fprData michael@0: sldi r3,r4,3 # number of bytes of stack required michael@0: # is at most numParams*8 michael@0: addi r3,r3,56 # linkage area (48) + this (8) michael@0: mr r31,sp # save original stack top michael@0: subfc sp,r3,sp # bump the stack michael@0: addi r3,sp,56 # parameter pointer excludes linkage area michael@0: # size + 'this' michael@0: michael@0: bl .invoke_copy_to_stack michael@0: nop michael@0: michael@0: lfd f1,0(r31) # Restore floating point registers michael@0: lfd f2,8(r31) michael@0: lfd f3,16(r31) michael@0: lfd f4,24(r31) michael@0: lfd f5,32(r31) michael@0: lfd f6,40(r31) michael@0: lfd f7,48(r31) michael@0: lfd f8,56(r31) michael@0: lfd f9,64(r31) michael@0: lfd f10,72(r31) michael@0: lfd f11,80(r31) michael@0: lfd f12,88(r31) michael@0: lfd f13,96(r31) michael@0: michael@0: ld r3,216(r31) # that (168+48) michael@0: ld r4,0(r3) # get vTable from 'that' michael@0: ld r5,224(r31) # methodIndex (168+56) michael@0: sldi r5,r5,3 # methodIndex * 8 michael@0: # No junk at the start of 64bit vtable !!! michael@0: ldx r11,r5,r4 # get function pointer (this jumps michael@0: # either to the function if no adjustment michael@0: # is needed (displacement = 0), or it michael@0: # jumps to the thunk code, which will jump michael@0: # to the function at the end) michael@0: michael@0: # No adjustment of the that pointer in 64bit mode, this is done michael@0: # by the thunk code michael@0: michael@0: ld r4,56(sp) michael@0: ld r5,64(sp) michael@0: ld r6,72(sp) michael@0: ld r7,80(sp) michael@0: ld r8,88(sp) michael@0: ld r9,96(sp) michael@0: ld r10,104(sp) michael@0: michael@0: bl ._ptrgl{PR} michael@0: nop michael@0: michael@0: mr sp,r31 michael@0: ld r0,184(sp) # 168+16 michael@0: addi sp,sp,168 michael@0: mtlr r0 michael@0: ld r31,-8(sp) michael@0: blr michael@0: michael@0: # .data section michael@0: michael@0: .toc # 0x00000038 michael@0: T.18.NS_InvokeByIndex: michael@0: .tc H.18.NS_InvokeByIndex{TC},NS_InvokeByIndex{DS} michael@0: michael@0: .csect NS_InvokeByIndex{DS} michael@0: .llong .NS_InvokeByIndex # "\0\0\0\0" michael@0: .llong TOC{TC0} # "\0\0\0008" michael@0: .llong 0x00000000 # "\0\0\0\0" michael@0: # End csect NS_InvokeByIndex{DS} michael@0: michael@0: # .bss section