md_darwin.S 3.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576
  1. /* If user disable the ASM, such as avoiding bugs in ASM, donot compile it. */
  2. #if !defined(MD_ST_NO_ASM)
  3. #if defined(__amd64__) || defined(__x86_64__)
  4. /****************************************************************/
  5. /*
  6. * Internal __jmp_buf layout
  7. */
  8. #define JB_RBX 0
  9. #define JB_RBP 1
  10. #define JB_R12 2 /* Backup IP, https://www.cnblogs.com/Five100Miles/p/8458561.html */
  11. #define JB_R13 3 /* Backup SP, https://www.cnblogs.com/Five100Miles/p/8458561.html */
  12. #define JB_R14 4 /* Backup LR, https://www.cnblogs.com/Five100Miles/p/8458561.html */
  13. #define JB_R15 5 /* Backup PC, https://www.cnblogs.com/Five100Miles/p/8458561.html */
  14. #define JB_RSP 6
  15. #define JB_PC 7
  16. .file "md_darwin.S"
  17. .text
  18. /* _st_md_cxt_save(__jmp_buf env) */ /* The env is rdi, http://blog.chinaunix.net/uid-20157960-id-1974354.html */
  19. .globl __st_md_cxt_save
  20. .align 16
  21. __st_md_cxt_save:
  22. /*
  23. * Save registers.
  24. */
  25. movq %rbx, (JB_RBX*8)(%rdi) /* Save rbx to env[0], *(int64_t*)(rdi+0)=rbx */
  26. movq %rbp, (JB_RBP*8)(%rdi) /* Save rbp to env[1], *(int64_t*)(rdi+1)=rbp */
  27. movq %r12, (JB_R12*8)(%rdi) /* Save r12 to env[2], *(int64_t*)(rdi+2)=r12 */
  28. movq %r13, (JB_R13*8)(%rdi) /* Save r13 to env[3], *(int64_t*)(rdi+3)=r13 */
  29. movq %r14, (JB_R14*8)(%rdi) /* Save r14 to env[4], *(int64_t*)(rdi+4)=r14 */
  30. movq %r15, (JB_R15*8)(%rdi) /* Save r15 to env[5], *(int64_t*)(rdi+5)=r15 */
  31. /* Save SP */
  32. leaq 8(%rsp), %rdx /* Save *(int64_t*)(rsp+8) to rdx, https://my.oschina.net/guonaihong/blog/508907 */
  33. movq %rdx, (JB_RSP*8)(%rdi) /* Save rdx(rsp) to env[6], *(int64_t*)(rdi+6)=rdx */
  34. /* Save PC we are returning to */
  35. movq (%rsp), %rax /* Save PC(parent function address) %(rsp) to rax */
  36. movq %rax, (JB_PC*8)(%rdi) /* Save rax(PC) to env[7], *(int64_t*)(rdi+7)=rax */
  37. xorq %rax, %rax /* Reset rax to 0 */
  38. ret
  39. /****************************************************************/
  40. /* _st_md_cxt_restore(__jmp_buf env, int val) */ /* The env is rdi, val is esi/rsi, http://blog.chinaunix.net/uid-20157960-id-1974354.html */
  41. .globl __st_md_cxt_restore
  42. .align 16
  43. __st_md_cxt_restore:
  44. /*
  45. * Restore registers.
  46. */
  47. movq (JB_RBX*8)(%rdi), %rbx /* Load rbx from env[0] */
  48. movq (JB_RBP*8)(%rdi), %rbp /* Load rbp from env[1] */
  49. movq (JB_R12*8)(%rdi), %r12 /* Load r12 from env[2] */
  50. movq (JB_R13*8)(%rdi), %r13 /* Load r13 from env[3] */
  51. movq (JB_R14*8)(%rdi), %r14 /* Load r14 from env[4] */
  52. movq (JB_R15*8)(%rdi), %r15 /* Load r15 from env[5] */
  53. /* Set return value */ /* The esi is param1 val, the eax is return value */
  54. test %esi, %esi /* if (!val) { */
  55. mov $01, %eax /* val=1; */
  56. cmove %eax, %esi /* } */
  57. mov %esi, %eax /* return val; */
  58. movq (JB_PC*8)(%rdi), %rdx /* Load rdx(PC) from env[7] */
  59. movq (JB_RSP*8)(%rdi), %rsp /* Load rsp from env[6] */
  60. /* Jump to saved PC */
  61. jmpq *%rdx /* Jump to rdx(PC) */
  62. /****************************************************************/
  63. #endif
  64. #endif