1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
|
;;
;; This file is part of the "Coroutine" project and released under the MIT License.
;;
;; Created by Samuel Williams on 10/5/2018.
;; Copyright, 2018, by Samuel Williams.
;;
.386
.model flat
.code
assume fs:nothing
; Using fastcall is a big win (and it's the same has how x64 works).
; In coroutine transfer, the arguments are passed in ecx and edx. We don't need
; to touch these in order to pass them to the destination coroutine.
@coroutine_transfer@8 proc
; Save the thread information block:
push fs:[0]
push fs:[4]
push fs:[8]
; Save caller registers:
push ebp
push ebx
push edi
push esi
; Save caller stack pointer:
mov dword ptr [ecx], esp
; Restore callee stack pointer:
mov esp, dword ptr [edx]
; Restore callee stack:
pop esi
pop edi
pop ebx
pop ebp
; Restore the thread information block:
pop fs:[8]
pop fs:[4]
pop fs:[0]
; Save the first argument as the return value:
mov eax, dword ptr ecx
; Jump to the address on the stack:
ret
@coroutine_transfer@8 endp
end
|
