chris
/
OpenHome
1
0
Fork 0
Code Issues 0 Pull Requests 0 Releases 0 Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
5 Commits
1 Branch
10.0MB
Tree: c5a7a8699c
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'c5a7a8699c'
${ noResults }
OpenHome/venv/Lib/site-packages/greenlet/platform/switch_x64_masm.asm

111 lines
1.8KB
Raw Blame History 

  1. ;

  2. ; stack switching code for MASM on x641

  3. ; Kristjan Valur Jonsson, sept 2005

  4. ;

  5. 

  6. 

  7. ;prototypes for our calls

  8. slp_save_state_asm PROTO

  9. slp_restore_state_asm PROTO

  10. 

  11. 

  12. pushxmm MACRO reg

  13.     sub rsp, 16

  14.     .allocstack 16

  15.     movaps [rsp], reg ; faster than movups, but we must be aligned

  16.     ; .savexmm128 reg, offset  (don't know what offset is, no documentation)

  17. ENDM

  18. popxmm MACRO reg

  19.     movaps reg, [rsp] ; faster than movups, but we must be aligned

  20.     add rsp, 16

  21. ENDM

  22. 

  23. pushreg MACRO reg

  24.     push reg

  25.     .pushreg reg

  26. ENDM

  27. popreg MACRO reg

  28.     pop reg

  29. ENDM

  30. 

  31. 

  32. .code

  33. slp_switch PROC FRAME

  34.     ;realign stack to 16 bytes after return address push, makes the following faster

  35.     sub rsp,8

  36.     .allocstack 8

  37. 

  38.     pushxmm xmm15

  39.     pushxmm xmm14

  40.     pushxmm xmm13

  41.     pushxmm xmm12

  42.     pushxmm xmm11

  43.     pushxmm xmm10

  44.     pushxmm xmm9

  45.     pushxmm xmm8

  46.     pushxmm xmm7

  47.     pushxmm xmm6

  48. 

  49.     pushreg r15

  50.     pushreg r14

  51.     pushreg r13

  52.     pushreg r12

  53. 

  54.     pushreg rbp

  55.     pushreg rbx

  56.     pushreg rdi

  57.     pushreg rsi

  58. 

  59.     sub rsp, 10h ;allocate the singlefunction argument (must be multiple of 16)

  60.     .allocstack 10h

  61. .endprolog

  62. 

  63.     lea rcx, [rsp+10h] ;load stack base that we are saving

  64.     call slp_save_state_asm ;pass stackpointer, return offset in eax

  65.     cmp rax, 1

  66.     je EXIT1

  67.     cmp rax, -1

  68.     je EXIT2

  69.     ;actual stack switch:

  70.     add rsp, rax

  71.     call slp_restore_state_asm

  72.     xor rax, rax ;return 0

  73. 

  74. EXIT:

  75. 

  76.     add rsp, 10h

  77.     popreg rsi

  78.     popreg rdi

  79.     popreg rbx

  80.     popreg rbp

  81. 

  82.     popreg r12

  83.     popreg r13

  84.     popreg r14

  85.     popreg r15

  86. 

  87.     popxmm xmm6

  88.     popxmm xmm7

  89.     popxmm xmm8

  90.     popxmm xmm9

  91.     popxmm xmm10

  92.     popxmm xmm11

  93.     popxmm xmm12

  94.     popxmm xmm13

  95.     popxmm xmm14

  96.     popxmm xmm15

  97. 

  98.     add rsp, 8

  99.     ret

  100. 

  101. EXIT1:

  102.     mov rax, 1

  103.     jmp EXIT

  104. 

  105. EXIT2:

  106.     sar rax, 1

  107.     jmp EXIT

  108. 

  109. slp_switch ENDP

  110. 

  111. END