161 lines
5.3 KiB
NASM
161 lines
5.3 KiB
NASM
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||
|
|
;;;
|
||
|
|
;;; Microsoft Research Singularity
|
||
|
|
;;;
|
||
|
|
;;; Copyright (c) Microsoft Corporation. All rights reserved.
|
||
|
|
;;;
|
||
|
|
;;; Assembly code for Isal.Target class
|
||
|
|
|
||
|
|
include hal.inc
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@XZ) proc
|
||
|
|
|
||
|
|
GET_THREAD_CONTEXT PAX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@XZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCurrentCpu@Class_Microsoft_Singularity_Isal_Isa@@SIPAUStruct_Microsoft_Singularity_Isal_CpuRecord@@XZ) proc
|
||
|
|
|
||
|
|
GET_PROCESSOR_CONTEXT PAX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCurrentCpu@Class_Microsoft_Singularity_Isal_Isa@@SIPAUStruct_Microsoft_Singularity_Isal_CpuRecord@@XZ) endp
|
||
|
|
|
||
|
|
ifdef SINGULARITY_KERNEL
|
||
|
|
|
||
|
|
SYMFIX(?g_InitializeCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@@Z) proc
|
||
|
|
|
||
|
|
mov eax, [?c_currentThreadOffset@Class_Microsoft_Singularity_Isal_Isa@@2HA]
|
||
|
|
mov PSEG:[eax], PCX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_InitializeCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@@Z) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_SetCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@@Z) proc
|
||
|
|
|
||
|
|
mov eax, [?c_currentThreadOffset@Class_Microsoft_Singularity_Isal_Isa@@2HA]
|
||
|
|
|
||
|
|
;; Must preserve active stack limit across thread context switch
|
||
|
|
mov PDX, PSEG:[eax]
|
||
|
|
mov PDX, [PDX].Struct_Microsoft_Singularity_Isal_ThreadRecord._activeStackLimit
|
||
|
|
mov [PCX].Struct_Microsoft_Singularity_Isal_ThreadRecord._activeStackLimit, PDX
|
||
|
|
|
||
|
|
mov PSEG:[eax], PCX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_SetCurrentThread@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_ThreadRecord@@@Z) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_InitializeCurrentCpu@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_CpuRecord@@@Z) proc
|
||
|
|
|
||
|
|
mov eax, [?c_currentCpuOffset@Class_Microsoft_Singularity_Isal_Isa@@2HA]
|
||
|
|
mov PSEG:[eax], PCX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_InitializeCurrentCpu@Class_Microsoft_Singularity_Isal_Isa@@SIXPAUStruct_Microsoft_Singularity_Isal_CpuRecord@@@Z) endp
|
||
|
|
|
||
|
|
SYMFIX(?c_DefaultReturnFromInterrupt@Class_Microsoft_Singularity_Isal_Isa@@2EA) label byte
|
||
|
|
IRETP
|
||
|
|
|
||
|
|
SYMFIX(?g_SwitchToInterruptStackAndCallback@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@PAUClass_Microsoft_Singularity_Isal_Isa_ICallback@@PAU2@@Z) proc
|
||
|
|
|
||
|
|
;; use an ebp frame so we can easily restore the old stack
|
||
|
|
push PBP
|
||
|
|
mov PBP, PSP
|
||
|
|
|
||
|
|
;; switch to the interrupt stack
|
||
|
|
GET_CPU_RECORD_FIELD PAX, _interruptStackBegin
|
||
|
|
mov PSP, PAX
|
||
|
|
|
||
|
|
;; Save previous limit
|
||
|
|
GET_THREAD_RECORD_FIELD PAX, _activeStackLimit
|
||
|
|
push PAX
|
||
|
|
|
||
|
|
;; set the new stack limit
|
||
|
|
GET_CPU_RECORD_FIELD PAX, _interruptStackLimit
|
||
|
|
SET_THREAD_RECORD_FIELD _activeStackLimit, PAX
|
||
|
|
|
||
|
|
;; call the callback
|
||
|
|
call SYMFIX(?g_DoCallback@Class_Microsoft_Singularity_Isal_Isa_ICallback@@SIPAUuintPtr@@PAU1@PAU2@@Z)
|
||
|
|
|
||
|
|
;; restore the stack limit
|
||
|
|
pop PCX
|
||
|
|
SET_THREAD_RECORD_FIELD _activeStackLimit, PCX
|
||
|
|
|
||
|
|
;; pop ebp frame
|
||
|
|
mov PSP, PBP
|
||
|
|
pop PBP
|
||
|
|
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_SwitchToInterruptStackAndCallback@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@PAUClass_Microsoft_Singularity_Isal_Isa_ICallback@@PAU2@@Z) endp
|
||
|
|
|
||
|
|
endif
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCs@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@XZ) proc
|
||
|
|
|
||
|
|
mov PAX, cs
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_GetCs@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@XZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_InitFpu@Class_Microsoft_Singularity_Isal_Isa@@SIXXZ) proc
|
||
|
|
|
||
|
|
finit
|
||
|
|
mov PAX, 37Eh
|
||
|
|
push PAX
|
||
|
|
fldcw [PSP]
|
||
|
|
pop PAX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_InitFpu@Class_Microsoft_Singularity_Isal_Isa@@SIXXZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_ReadFpuStatus@Class_Microsoft_Singularity_Isal_Isa@@Z@@XZ) proc
|
||
|
|
|
||
|
|
xor PAX,PAX
|
||
|
|
push PAX
|
||
|
|
fnstsw [PSP]
|
||
|
|
pop PAX
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_ReadFpuStatus@Class_Microsoft_Singularity_Isal_Isa@@Z@@XZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_ClearFpuStatus@Class_Microsoft_Singularity_Isal_Isa@@Z@@XZ) proc
|
||
|
|
|
||
|
|
fnclex
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_ClearFpuStatus@Class_Microsoft_Singularity_Isal_Isa@@Z@@XZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_EnterUserMode@Class_Microsoft_Singularity_Isal_Isa@@SIXXZ) proc
|
||
|
|
|
||
|
|
;; warning: preserve return values eax, edx (for returning from ABI)
|
||
|
|
|
||
|
|
push PDX
|
||
|
|
mov PCX, PSP
|
||
|
|
mov PDX, ring3
|
||
|
|
;;sysexit
|
||
|
|
db 0fh
|
||
|
|
db 35h
|
||
|
|
ring3:
|
||
|
|
pop PDX
|
||
|
|
|
||
|
|
ifdef ISA_IX86
|
||
|
|
mov cx, ss
|
||
|
|
mov ds, cx
|
||
|
|
mov es, cx
|
||
|
|
endif
|
||
|
|
mov cx, Struct_Microsoft_Singularity_Isal_IX_DescriptorTable_Gdt._pp + 3
|
||
|
|
mov PSEG, cx
|
||
|
|
|
||
|
|
ret
|
||
|
|
|
||
|
|
SYMFIX(?g_EnterUserMode@Class_Microsoft_Singularity_Isal_Isa@@SIXXZ) endp
|
||
|
|
|
||
|
|
SYMFIX(?g_GetFramePointer@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@XZ) proc
|
||
|
|
mov PAX, PBP
|
||
|
|
ret
|
||
|
|
SYMFIX(?g_GetFramePointer@Class_Microsoft_Singularity_Isal_Isa@@SIPAUuintPtr@@XZ) endp
|
||
|
|
|
||
|
|
END
|