| /* |
| * arch/mips/dec/prom/call_o32.S |
| * |
| * O32 interface for the 64 (or N32) ABI. |
| * |
| * Copyright (C) 2002 Maciej W. Rozycki |
| * |
| * This program is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU General Public License |
| * as published by the Free Software Foundation; either version |
| * 2 of the License, or (at your option) any later version. |
| */ |
| |
| #include <asm/asm.h> |
| #include <asm/regdef.h> |
| |
| /* Maximum number of arguments supported. Must be even! */ |
| #define O32_ARGC 32 |
| /* Number of static registers we save. */ |
| #define O32_STATC 11 |
| /* Frame size for static register */ |
| #define O32_FRAMESZ (SZREG * O32_STATC) |
| /* Frame size on new stack */ |
| #define O32_FRAMESZ_NEW (SZREG + 4 * O32_ARGC) |
| |
| .text |
| |
| /* |
| * O32 function call dispatcher, for interfacing 32-bit ROM routines. |
| * |
| * The standard 64 (N32) calling sequence is supported, with a0 |
| * holding a function pointer, a1 a new stack pointer, a2-a7 -- its |
| * first six arguments and the stack -- remaining ones (up to O32_ARGC, |
| * including a2-a7). Static registers, gp and fp are preserved, v0 holds |
| * a result. This code relies on the called o32 function for sp and ra |
| * restoration and this dispatcher has to be placed in a KSEGx (or KUSEG) |
| * address space. Any pointers passed have to point to addresses within |
| * one of these spaces as well. |
| */ |
| NESTED(call_o32, O32_FRAMESZ, ra) |
| REG_SUBU sp,O32_FRAMESZ |
| |
| REG_S ra,O32_FRAMESZ-1*SZREG(sp) |
| REG_S fp,O32_FRAMESZ-2*SZREG(sp) |
| REG_S gp,O32_FRAMESZ-3*SZREG(sp) |
| REG_S s7,O32_FRAMESZ-4*SZREG(sp) |
| REG_S s6,O32_FRAMESZ-5*SZREG(sp) |
| REG_S s5,O32_FRAMESZ-6*SZREG(sp) |
| REG_S s4,O32_FRAMESZ-7*SZREG(sp) |
| REG_S s3,O32_FRAMESZ-8*SZREG(sp) |
| REG_S s2,O32_FRAMESZ-9*SZREG(sp) |
| REG_S s1,O32_FRAMESZ-10*SZREG(sp) |
| REG_S s0,O32_FRAMESZ-11*SZREG(sp) |
| |
| move jp,a0 |
| REG_SUBU s0,a1,O32_FRAMESZ_NEW |
| REG_S sp,O32_FRAMESZ_NEW-1*SZREG(s0) |
| |
| sll a0,a2,zero |
| sll a1,a3,zero |
| sll a2,a4,zero |
| sll a3,a5,zero |
| sw a6,0x10(s0) |
| sw a7,0x14(s0) |
| |
| PTR_LA t0,O32_FRAMESZ(sp) |
| PTR_LA t1,0x18(s0) |
| li t2,O32_ARGC-6 |
| 1: |
| lw t3,(t0) |
| REG_ADDU t0,SZREG |
| sw t3,(t1) |
| REG_SUBU t2,1 |
| REG_ADDU t1,4 |
| bnez t2,1b |
| |
| move sp,s0 |
| |
| jalr jp |
| |
| REG_L sp,O32_FRAMESZ_NEW-1*SZREG(sp) |
| |
| REG_L s0,O32_FRAMESZ-11*SZREG(sp) |
| REG_L s1,O32_FRAMESZ-10*SZREG(sp) |
| REG_L s2,O32_FRAMESZ-9*SZREG(sp) |
| REG_L s3,O32_FRAMESZ-8*SZREG(sp) |
| REG_L s4,O32_FRAMESZ-7*SZREG(sp) |
| REG_L s5,O32_FRAMESZ-6*SZREG(sp) |
| REG_L s6,O32_FRAMESZ-5*SZREG(sp) |
| REG_L s7,O32_FRAMESZ-4*SZREG(sp) |
| REG_L gp,O32_FRAMESZ-3*SZREG(sp) |
| REG_L fp,O32_FRAMESZ-2*SZREG(sp) |
| REG_L ra,O32_FRAMESZ-1*SZREG(sp) |
| |
| REG_ADDU sp,O32_FRAMESZ |
| jr ra |
| END(call_o32) |