call_o32.S 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108
  1. /*
  2. * O32 interface for the 64 (or N32) ABI.
  3. *
  4. * Copyright (C) 2002, 2014 Maciej W. Rozycki
  5. *
  6. * This program is free software; you can redistribute it and/or
  7. * modify it under the terms of the GNU General Public License
  8. * as published by the Free Software Foundation; either version
  9. * 2 of the License, or (at your option) any later version.
  10. */
  11. #include <asm/asm.h>
  12. #include <asm/regdef.h>
  13. /* O32 register size. */
  14. #define O32_SZREG 4
  15. /* Maximum number of arguments supported. Must be even! */
  16. #define O32_ARGC 32
  17. /* Number of static registers we save. */
  18. #define O32_STATC 11
  19. /* Argument area frame size. */
  20. #define O32_ARGSZ (O32_SZREG * O32_ARGC)
  21. /* Static register save area frame size. */
  22. #define O32_STATSZ (SZREG * O32_STATC)
  23. /* Stack pointer register save area frame size. */
  24. #define O32_SPSZ SZREG
  25. /* Combined area frame size. */
  26. #define O32_FRAMESZ (O32_ARGSZ + O32_SPSZ + O32_STATSZ)
  27. /* Switched stack frame size. */
  28. #define O32_NFRAMESZ (O32_ARGSZ + O32_SPSZ)
  29. .text
  30. /*
  31. * O32 function call dispatcher, for interfacing 32-bit ROM routines.
  32. *
  33. * The standard 64 (N32) calling sequence is supported, with a0 holding
  34. * a function pointer, a1 a pointer to the new stack to call the
  35. * function with or 0 if no stack switching is requested, a2-a7 -- the
  36. * function call's first six arguments, and the stack -- the remaining
  37. * arguments (up to O32_ARGC, including a2-a7). Static registers, gp
  38. * and fp are preserved, v0 holds the result. This code relies on the
  39. * called o32 function for sp and ra restoration and this dispatcher has
  40. * to be placed in a KSEGx (or KUSEG) address space. Any pointers
  41. * passed have to point to addresses within one of these spaces as well.
  42. */
  43. NESTED(call_o32, O32_FRAMESZ, ra)
  44. REG_SUBU sp,O32_FRAMESZ
  45. REG_S ra,O32_FRAMESZ-1*SZREG(sp)
  46. REG_S fp,O32_FRAMESZ-2*SZREG(sp)
  47. REG_S gp,O32_FRAMESZ-3*SZREG(sp)
  48. REG_S s7,O32_FRAMESZ-4*SZREG(sp)
  49. REG_S s6,O32_FRAMESZ-5*SZREG(sp)
  50. REG_S s5,O32_FRAMESZ-6*SZREG(sp)
  51. REG_S s4,O32_FRAMESZ-7*SZREG(sp)
  52. REG_S s3,O32_FRAMESZ-8*SZREG(sp)
  53. REG_S s2,O32_FRAMESZ-9*SZREG(sp)
  54. REG_S s1,O32_FRAMESZ-10*SZREG(sp)
  55. REG_S s0,O32_FRAMESZ-11*SZREG(sp)
  56. move jp,a0
  57. move fp,sp
  58. beqz a1,0f
  59. REG_SUBU fp,a1,O32_NFRAMESZ
  60. 0:
  61. REG_S sp,O32_NFRAMESZ-1*SZREG(fp)
  62. sll a0,a2,zero
  63. sll a1,a3,zero
  64. sll a2,a4,zero
  65. sll a3,a5,zero
  66. sw a6,4*O32_SZREG(fp)
  67. sw a7,5*O32_SZREG(fp)
  68. PTR_LA t0,O32_FRAMESZ(sp)
  69. PTR_LA t1,6*O32_SZREG(fp)
  70. li t2,O32_ARGC-6
  71. 1:
  72. lw t3,(t0)
  73. REG_ADDU t0,SZREG
  74. sw t3,(t1)
  75. REG_SUBU t2,1
  76. REG_ADDU t1,O32_SZREG
  77. bnez t2,1b
  78. move sp,fp
  79. jalr jp
  80. REG_L sp,O32_NFRAMESZ-1*SZREG(sp)
  81. REG_L s0,O32_FRAMESZ-11*SZREG(sp)
  82. REG_L s1,O32_FRAMESZ-10*SZREG(sp)
  83. REG_L s2,O32_FRAMESZ-9*SZREG(sp)
  84. REG_L s3,O32_FRAMESZ-8*SZREG(sp)
  85. REG_L s4,O32_FRAMESZ-7*SZREG(sp)
  86. REG_L s5,O32_FRAMESZ-6*SZREG(sp)
  87. REG_L s6,O32_FRAMESZ-5*SZREG(sp)
  88. REG_L s7,O32_FRAMESZ-4*SZREG(sp)
  89. REG_L gp,O32_FRAMESZ-3*SZREG(sp)
  90. REG_L fp,O32_FRAMESZ-2*SZREG(sp)
  91. REG_L ra,O32_FRAMESZ-1*SZREG(sp)
  92. REG_ADDU sp,O32_FRAMESZ
  93. jr ra
  94. END(call_o32)