279 lines
14 KiB
NASM
279 lines
14 KiB
NASM
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;;
|
||
|
|
;; Microsoft Research Singularity
|
||
|
|
;;
|
||
|
|
;; Copyright (c) Microsoft Corporation. All rights reserved.
|
||
|
|
;;
|
||
|
|
;; File: halstack.asm
|
||
|
|
;;
|
||
|
|
;; Note:
|
||
|
|
;;
|
||
|
|
|
||
|
|
.686p
|
||
|
|
.mmx
|
||
|
|
.xmm
|
||
|
|
.model flat
|
||
|
|
.code
|
||
|
|
|
||
|
|
assume ds:flat
|
||
|
|
assume es:flat
|
||
|
|
assume ss:flat
|
||
|
|
assume fs:nothing
|
||
|
|
assume gs:nothing
|
||
|
|
|
||
|
|
include hal.inc
|
||
|
|
|
||
|
|
externdef ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ:NEAR
|
||
|
|
externdef ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ:NEAR
|
||
|
|
|
||
|
|
;;; Public symbols
|
||
|
|
public ?c_LinkedStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
public ?c_LinkStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
public ?c_LinkStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
public ?c_UnlinkStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
public ?c_UnlinkStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
public ?c_LinkedStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA
|
||
|
|
|
||
|
|
align 16
|
||
|
|
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;
|
||
|
|
;
|
||
|
|
; 1) Stack at entry of LinkStackN
|
||
|
|
; +-----------------------+
|
||
|
|
; old base -> | previous esp | 2) Stack on exit from LinkStackN
|
||
|
|
; +-----------------------+ +------------------------+ <- base
|
||
|
|
; | previous stackBase | | old esp |
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | previous stackLimit | | old base |
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | .. | | old limit |
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | .. | ==> | .. |
|
||
|
|
; | args | . | args |
|
||
|
|
; +-----------------------+ . +------------------------+
|
||
|
|
; | return addr in caller | . | return to UnlinkStackN |
|
||
|
|
; +-----------------------+ . +------------------------+
|
||
|
|
; old ebp -> | caller ebp | ==> | old ebp | <- esp &
|
||
|
|
; +-----------------------+ +------------------------+ ebp
|
||
|
|
; old esp -> | return addr in callee | | .. |
|
||
|
|
; +-----------------------+ | .. | <- limit
|
||
|
|
; * EAX = amount of stack needed.
|
||
|
|
;
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;;
|
||
|
|
;; Implementations of LinkStackNn just push the appropriate number
|
||
|
|
;; and call the general-purpose LinkStack.
|
||
|
|
|
||
|
|
?c_LinkedStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
?c_LinkStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
|
||
|
|
?g_LinkStack0@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 0
|
||
|
|
push ?g_UnlinkStack0@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack4@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 1
|
||
|
|
push ?g_UnlinkStack4@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack8@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 2
|
||
|
|
push ?g_UnlinkStack8@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack12@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 3
|
||
|
|
push ?g_UnlinkStack12@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack16@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 4
|
||
|
|
push ?g_UnlinkStack16@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack20@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 5
|
||
|
|
push ?g_UnlinkStack20@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack24@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 6
|
||
|
|
push ?g_UnlinkStack24@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack28@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 7
|
||
|
|
push ?g_UnlinkStack28@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack32@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 8
|
||
|
|
push ?g_UnlinkStack32@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack36@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 9
|
||
|
|
push ?g_UnlinkStack36@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack40@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 10
|
||
|
|
push ?g_UnlinkStack40@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack44@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 11
|
||
|
|
push ?g_UnlinkStack44@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack48@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 12
|
||
|
|
push ?g_UnlinkStack48@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack52@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 13
|
||
|
|
push ?g_UnlinkStack52@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack56@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 14
|
||
|
|
push ?g_UnlinkStack56@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack60@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 15
|
||
|
|
push ?g_UnlinkStack60@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
?g_LinkStack64@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
push 16
|
||
|
|
push ?g_UnlinkStack64@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ
|
||
|
|
jmp ?g_LinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;
|
||
|
|
;
|
||
|
|
?c_LinkStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;
|
||
|
|
; 1) Stacks on entry to UnlinkStackN:
|
||
|
|
; old base -> +-----------------------+Organization.tif
|
||
|
|
; | previous esp |
|
||
|
|
; +-----------------------+ +------------------------+ <- base
|
||
|
|
; | previous stackBase | | old esp |
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | previous stackLimit | | old base |
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | .. | | old limit | <- esp
|
||
|
|
; +-----------------------+ +------------------------+
|
||
|
|
; | .. | | .. | * ebp =
|
||
|
|
; | args | | .. | old ebp
|
||
|
|
; +-----------------------+ | .. |
|
||
|
|
; | return addr in caller | | .. | ecx
|
||
|
|
; +-----------------------+ | .. | is free
|
||
|
|
; ebp -> | caller ebp | | .. |
|
||
|
|
; +-----------------------+ | .. |
|
||
|
|
; old esp -> | return addr in callee | | .. |
|
||
|
|
; +-----------------------+ | .. | <- limit
|
||
|
|
; * EAX/EDX = return value from callee.
|
||
|
|
;
|
||
|
|
; 2) Stacks on exit from UnlinkStackN:
|
||
|
|
; stackBase -> +-----------------------+
|
||
|
|
; | previous esp |
|
||
|
|
; +-----------------------+
|
||
|
|
; | previous stackBase |
|
||
|
|
; +-----------------------+
|
||
|
|
; | previous stackLimit |
|
||
|
|
; +-----------------------+
|
||
|
|
; | .. |
|
||
|
|
; ebp -> | .. |
|
||
|
|
; | .. |
|
||
|
|
; esp -> | .. |
|
||
|
|
; +-----------------------+ * eip = return addr in caller
|
||
|
|
;
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;;
|
||
|
|
;; Implementations of UnlinkStackNn just push the appropriate number
|
||
|
|
;; and call the general-purpose UnlinkStack.
|
||
|
|
|
||
|
|
?c_UnlinkStackBegin@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
|
||
|
|
?g_UnlinkStack0@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,0
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack4@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,4
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack8@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,8
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack12@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,12
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack16@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,16
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack20@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,20
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack24@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,24
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack28@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,28
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack32@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,32
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack36@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,36
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack40@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,40
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack44@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,44
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack48@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,48
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack52@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,52
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack56@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,56
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack60@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,60
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
?g_UnlinkStack64@Class_Microsoft_Singularity_Memory_Stacks@@SIXXZ::
|
||
|
|
mov ecx,64
|
||
|
|
jmp ?g_UnlinkStack@Struct_Microsoft_Singularity_V1_Services_StackService@@SIXXZ
|
||
|
|
|
||
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
|
||
|
|
?c_UnlinkStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
?c_LinkedStackLimit@Class_Microsoft_Singularity_Memory_Stacks@@2EA byte 0
|
||
|
|
|
||
|
|
align 16
|
||
|
|
PUBLIC __checkStackLimit
|
||
|
|
__checkStackLimit PROC
|
||
|
|
push edx
|
||
|
|
mov edx, eax
|
||
|
|
CurrentThreadContext eax
|
||
|
|
mov eax, [eax][Struct_Microsoft_Singularity_X86_ThreadContext._stackLimit]
|
||
|
|
cmp edx, eax
|
||
|
|
jb debugHACK
|
||
|
|
pop edx
|
||
|
|
ret
|
||
|
|
debugHACK:
|
||
|
|
pop edx
|
||
|
|
ret
|
||
|
|
__checkStackLimit ENDP
|
||
|
|
|
||
|
|
end
|