[mirror_edk2.git] / EdkCompatibilityPkg / Compatibility / MpServicesOnFrameworkMpServicesThunk / X64 / MpFuncs.S

#------------------------------------------------------------------------------\r
# X64 assembly file for AP startup vector.\r
#\r
# Copyright (c) 2009, Intel Corporation\r
# All rights reserved. This program and the accompanying materials\r
# are licensed and made available under the terms and conditions of the BSD License\r
# which accompanies this distribution.  The full text of the license may be found at\r
# http://opensource.org/licenses/bsd-license.php\r
#\r
# THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,\r
# WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.\r
#\r
#------------------------------------------------------------------------------\r
\r
\r
.equ                   VacantFlag,       0x0\r
.equ                   NotVacantFlag,    0xff\r
\r
.equ                   LockLocation,              RendezvousFunnelProcEnd - RendezvousFunnelProcStart\r
.equ                   StackStartAddressLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x08\r
.equ                   StackSizeLocation,         RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x10\r
.equ                   CProcedureLocation,        RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x18\r
.equ                   GdtrLocation,              RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x20\r
.equ                   BufferStartLocation,       RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x2C\r
.equ                   Cr3OffsetLocation,         RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x30\r
\r
#-------------------------------------------------------------------------------------\r
\r
#-------------------------------------------------------------------------------------\r
#RendezvousFunnelProc  procedure follows. All APs execute their procedure. This\r
#procedure serializes all the AP processors through an Init sequence. It must be\r
#noted that APs arrive here very raw...ie: real mode, no stack.\r
#ALSO THIS PROCEDURE IS EXECUTED BY APs ONLY ON 16 BIT MODE. HENCE THIS PROC\r
#IS IN MACHINE CODE.\r
#-------------------------------------------------------------------------------------\r
#RendezvousFunnelProc (&WakeUpBuffer,MemAddress);\r
\r
.text\r
\r
ASM_GLOBAL ASM_PFX(RendezvousFunnelProc)\r
ASM_PFX(RendezvousFunnelProc):\r
RendezvousFunnelProcStart:\r
\r
# At this point CS = 0x(vv00) and ip= 0x0.\r
\r
        .byte 0x8c,0xc8               # mov        ax,  cs\r
        .byte 0x8e,0xd8               # mov        ds,  ax\r
        .byte 0x8e,0xc0               # mov        es,  ax\r
        .byte 0x8e,0xd0               # mov        ss,  ax \r
        .byte 0x33,0xc0               # xor        ax,  ax\r
        .byte 0x8e,0xe0               # mov        fs,  ax\r
        .byte 0x8e,0xe8               # mov        gs,  ax\r
\r
# Switch to flat mode.\r
\r
        .byte 0xBE\r
        .word BufferStartLocation\r
        .byte 0x66,0x8B,0x14          # mov        edx,dword ptr [si]          ; EDX is keeping the start address of wakeup buffer\r
\r
        .byte 0xBE\r
        .word Cr3OffsetLocation\r
        .byte 0x66,0x8B,0xC           # mov        ecx,dword ptr [si]          ; ECX is keeping the value of CR3\r
\r
        .byte 0xBE\r
        .word GdtrLocation\r
        .byte 0x66                    # db         66h\r
        .byte 0x2E,0xF,0x1,0x14       # lgdt       fword ptr cs:[si]\r
\r
        .byte 0x33,0xC0               # xor        ax,  ax\r
        .byte 0x8E,0xD8               # mov        ds,  ax\r
\r
        .byte 0xF,0x20,0xC0           # mov        eax, cr0                    ; Get control register 0\r
        .byte 0x66,0x83,0xC8,0x1      # or         eax, 000000001h             ; Set PE bit (bit #0)\r
        .byte 0xF,0x22,0xC0           # mov        cr0, eax\r
\r
FLAT32_JUMP:\r
\r
        .byte 0x66,0x67,0xEA          # far jump\r
        .long 0x0                     # 32-bit offset\r
        .word 0x20                    # 16-bit selector\r
\r
ProtectedModeStart:\r
\r
        .byte 0x66,0xB8,0x18,0x0      # mov        ax,  18h\r
        .byte 0x66,0x8E,0xD8          # mov        ds,  ax\r
        .byte 0x66,0x8E,0xC0          # mov        es,  ax\r
        .byte 0x66,0x8E,0xE0          # mov        fs,  ax\r
        .byte 0x66,0x8E,0xE8          # mov        gs,  ax\r
        .byte 0x66,0x8E,0xD0          # mov        ss,  ax                     ; Flat mode setup.\r
\r
        .byte 0xF,0x20,0xE0           # mov        eax, cr4\r
        .byte 0xF,0xBA,0xE8,0x5       # bts        eax, 5\r
        .byte 0xF,0x22,0xE0           # mov        cr4, eax\r
\r
        .byte 0xF,0x22,0xD9           # mov        cr3, ecx\r
\r
        .byte 0x8B,0xF2               # mov        esi, edx                    ; Save wakeup buffer address\r
\r
        .byte 0xB9\r
        .long 0xC0000080              # mov        ecx, 0c0000080h             ; EFER MSR number.\r
        .byte 0xF,0x32                # rdmsr                                  ; Read EFER.\r
        .byte 0xF,0xBA,0xE8,0x8       # bts        eax, 8                      ; Set LME=1.\r
        .byte 0xF,0x30                # wrmsr                                  ; Write EFER.\r
\r
        .byte 0xF,0x20,0xC0           # mov        eax, cr0                    ; Read CR0.\r
        .byte 0xF,0xBA,0xE8,0x1F      # bts        eax, 31                     ; Set PG=1.\r
        .byte 0xF,0x22,0xC0           # mov        cr0, eax                    ; Write CR0.\r
\r
LONG_JUMP:\r
\r
        .byte 0x67,0xEA               # far jump\r
        .long 0x0                     # 32-bit offset\r
        .word 0x38                    # 16-bit selector\r
\r
LongModeStart:\r
\r
        movw        $0x30,%ax\r
        .byte       0x66\r
        movw        %ax,%ds\r
        .byte       0x66\r
        movw        %ax,%es\r
        .byte       0x66\r
        movw        %ax,%ss\r
\r
        movl        %esi, %edi\r
        addl        $LockLocation, %edi\r
        movb        $NotVacantFlag, %al\r
TestLock:\r
        xchgb       (%edi), %al\r
        cmpb        $NotVacantFlag, %al\r
        jz          TestLock\r
\r
ProgramStack:\r
\r
        movl        %esi, %edi\r
        addl        $StackSizeLocation, %edi \r
        movq        (%edi), %rax\r
        movl        %esi, %edi\r
        addl        $StackStartAddressLocation, %edi\r
        addq        (%edi), %rax\r
        movq        %rax, %rsp\r
        movq        %rax, (%edi) \r
\r
Releaselock:\r
\r
        movb        $VacantFlag, %al\r
        movl        %esi, %edi\r
        addl        $LockLocation, %edi\r
        xchgb       (%edi), %al\r
\r
        #\r
        # Call C Function\r
        #\r
        movl        %esi,%edi\r
        addl        $CProcedureLocation, %edi\r
        movq        (%edi), %rax\r
\r
        testq       %rax, %rax\r
        jz          GoToSleep\r
\r
        subq        $0x20, %rsp\r
        call        *%rax\r
        addq        $0x20, %rsp\r
\r
GoToSleep:\r
\r
        cli\r
        hlt\r
        jmp         .-2\r
\r
RendezvousFunnelProcEnd:\r
\r
\r
#-------------------------------------------------------------------------------------\r
#  AsmGetAddressMap (&AddressMap);\r
#-------------------------------------------------------------------------------------\r
# comments here for definition of address map\r
ASM_GLOBAL ASM_PFX(AsmGetAddressMap)\r
ASM_PFX(AsmGetAddressMap):\r
\r
        movq         $RendezvousFunnelProcStart, %rax\r
        movq         %rax, (%rcx)\r
        movq         $(ProtectedModeStart - RendezvousFunnelProcStart), 0x08(%rcx)\r
        movq         $(FLAT32_JUMP - RendezvousFunnelProcStart), 0x10(%rcx)\r
        movq         $(LongModeStart - RendezvousFunnelProcStart), 0x18(%rcx)\r
        movq         $(LONG_JUMP - RendezvousFunnelProcStart), 0x20(%rcx)\r
        movq         $(RendezvousFunnelProcEnd - RendezvousFunnelProcStart), 0x28(%rcx)\r
\r
        ret\r
Commit	Line	Data
768e2a90	1	#------------------------------------------------------------------------------\r
	2	# X64 assembly file for AP startup vector.\r
	3	#\r
	4	# Copyright (c) 2009, Intel Corporation\r
	5	# All rights reserved. This program and the accompanying materials\r
	6	# are licensed and made available under the terms and conditions of the BSD License\r
	7	# which accompanies this distribution. The full text of the license may be found at\r
	8	# http://opensource.org/licenses/bsd-license.php\r
	9	#\r
	10	# THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,\r
	11	# WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.\r
	12	#\r
	13	#------------------------------------------------------------------------------\r
	14	\r
	15	\r
	16	.equ VacantFlag, 0x0\r
	17	.equ NotVacantFlag, 0xff\r
	18	\r
	19	.equ LockLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart\r
	20	.equ StackStartAddressLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x08\r
	21	.equ StackSizeLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x10\r
	22	.equ CProcedureLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x18\r
	23	.equ GdtrLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x20\r
	24	.equ BufferStartLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x2C\r
	25	.equ Cr3OffsetLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x30\r
	26	\r
	27	#-------------------------------------------------------------------------------------\r
	28	\r
	29	#-------------------------------------------------------------------------------------\r
	30	#RendezvousFunnelProc procedure follows. All APs execute their procedure. This\r
	31	#procedure serializes all the AP processors through an Init sequence. It must be\r
	32	#noted that APs arrive here very raw...ie: real mode, no stack.\r
	33	#ALSO THIS PROCEDURE IS EXECUTED BY APs ONLY ON 16 BIT MODE. HENCE THIS PROC\r
	34	#IS IN MACHINE CODE.\r
	35	#-------------------------------------------------------------------------------------\r
	36	#RendezvousFunnelProc (&WakeUpBuffer,MemAddress);\r
	37	\r
	38	.text\r
	39	\r
	40	ASM_GLOBAL ASM_PFX(RendezvousFunnelProc)\r
	41	ASM_PFX(RendezvousFunnelProc):\r
	42	RendezvousFunnelProcStart:\r
	43	\r
	44	# At this point CS = 0x(vv00) and ip= 0x0.\r
	45	\r
	46	.byte 0x8c,0xc8 # mov ax, cs\r
	47	.byte 0x8e,0xd8 # mov ds, ax\r
	48	.byte 0x8e,0xc0 # mov es, ax\r
	49	.byte 0x8e,0xd0 # mov ss, ax \r
	50	.byte 0x33,0xc0 # xor ax, ax\r
	51	.byte 0x8e,0xe0 # mov fs, ax\r
	52	.byte 0x8e,0xe8 # mov gs, ax\r
	53	\r
	54	# Switch to flat mode.\r
	55	\r
	56	.byte 0xBE\r
	57	.word BufferStartLocation\r
	58	.byte 0x66,0x8B,0x14 # mov edx,dword ptr [si] ; EDX is keeping the start address of wakeup buffer\r
	59	\r
	60	.byte 0xBE\r
	61	.word Cr3OffsetLocation\r
	62	.byte 0x66,0x8B,0xC # mov ecx,dword ptr [si] ; ECX is keeping the value of CR3\r
	63	\r
	64	.byte 0xBE\r
65	.word GdtrLocation\r
66	.byte 0x66 # db 66h\r
67	.byte 0x2E,0xF,0x1,0x14 # lgdt fword ptr cs:[si]\r
68	\r
69	.byte 0x33,0xC0 # xor ax, ax\r
70	.byte 0x8E,0xD8 # mov ds, ax\r
71	\r
72	.byte 0xF,0x20,0xC0 # mov eax, cr0 ; Get control register 0\r
73	.byte 0x66,0x83,0xC8,0x1 # or eax, 000000001h ; Set PE bit (bit #0)\r
74	.byte 0xF,0x22,0xC0 # mov cr0, eax\r
75	\r
76	FLAT32_JUMP:\r
77	\r
78	.byte 0x66,0x67,0xEA # far jump\r
79	.long 0x0 # 32-bit offset\r
80	.word 0x20 # 16-bit selector\r
81	\r
82	ProtectedModeStart:\r
83	\r
84	.byte 0x66,0xB8,0x18,0x0 # mov ax, 18h\r
85	.byte 0x66,0x8E,0xD8 # mov ds, ax\r
86	.byte 0x66,0x8E,0xC0 # mov es, ax\r
87	.byte 0x66,0x8E,0xE0 # mov fs, ax\r
88	.byte 0x66,0x8E,0xE8 # mov gs, ax\r
89	.byte 0x66,0x8E,0xD0 # mov ss, ax ; Flat mode setup.\r
90	\r
91	.byte 0xF,0x20,0xE0 # mov eax, cr4\r
92	.byte 0xF,0xBA,0xE8,0x5 # bts eax, 5\r
93	.byte 0xF,0x22,0xE0 # mov cr4, eax\r
94	\r
95	.byte 0xF,0x22,0xD9 # mov cr3, ecx\r
96	\r
97	.byte 0x8B,0xF2 # mov esi, edx ; Save wakeup buffer address\r
98	\r
99	.byte 0xB9\r
100	.long 0xC0000080 # mov ecx, 0c0000080h ; EFER MSR number.\r
101	.byte 0xF,0x32 # rdmsr ; Read EFER.\r
102	.byte 0xF,0xBA,0xE8,0x8 # bts eax, 8 ; Set LME=1.\r
103	.byte 0xF,0x30 # wrmsr ; Write EFER.\r
104	\r
105	.byte 0xF,0x20,0xC0 # mov eax, cr0 ; Read CR0.\r
106	.byte 0xF,0xBA,0xE8,0x1F # bts eax, 31 ; Set PG=1.\r
107	.byte 0xF,0x22,0xC0 # mov cr0, eax ; Write CR0.\r
108	\r
109	LONG_JUMP:\r
110	\r
111	.byte 0x67,0xEA # far jump\r
112	.long 0x0 # 32-bit offset\r
113	.word 0x38 # 16-bit selector\r
114	\r
115	LongModeStart:\r
116	\r
117	movw $0x30,%ax\r
118	.byte 0x66\r
119	movw %ax,%ds\r
120	.byte 0x66\r
121	movw %ax,%es\r
122	.byte 0x66\r
123	movw %ax,%ss\r
124	\r
125	movl %esi, %edi\r
126	addl $LockLocation, %edi\r
127	movb $NotVacantFlag, %al\r
128	TestLock:\r
129	xchgb (%edi), %al\r
130	cmpb $NotVacantFlag, %al\r
131	jz TestLock\r
132	\r
133	ProgramStack:\r
134	\r
135	movl %esi, %edi\r
136	addl $StackSizeLocation, %edi \r
137	movq (%edi), %rax\r
138	movl %esi, %edi\r
139	addl $StackStartAddressLocation, %edi\r
140	addq (%edi), %rax\r
141	movq %rax, %rsp\r
142	movq %rax, (%edi) \r
143	\r
144	Releaselock:\r
145	\r
146	movb $VacantFlag, %al\r
147	movl %esi, %edi\r
148	addl $LockLocation, %edi\r
149	xchgb (%edi), %al\r
150	\r
151	#\r
152	# Call C Function\r
153	#\r
154	movl %esi,%edi\r
155	addl $CProcedureLocation, %edi\r
156	movq (%edi), %rax\r
157	\r
158	testq %rax, %rax\r
159	jz GoToSleep\r
160	\r
161	subq $0x20, %rsp\r
162	call *%rax\r
163	addq $0x20, %rsp\r
164	\r
165	GoToSleep:\r
166	\r
167	cli\r
168	hlt\r
169	jmp .-2\r
170	\r
171	RendezvousFunnelProcEnd:\r
172	\r
173	\r
174	#-------------------------------------------------------------------------------------\r
175	# AsmGetAddressMap (&AddressMap);\r
176	#-------------------------------------------------------------------------------------\r
177	# comments here for definition of address map\r
178	ASM_GLOBAL ASM_PFX(AsmGetAddressMap)\r
179	ASM_PFX(AsmGetAddressMap):\r
180	\r
181	movq $RendezvousFunnelProcStart, %rax\r
182	movq %rax, (%rcx)\r
183	movq $(ProtectedModeStart - RendezvousFunnelProcStart), 0x08(%rcx)\r
184	movq $(FLAT32_JUMP - RendezvousFunnelProcStart), 0x10(%rcx)\r
185	movq $(LongModeStart - RendezvousFunnelProcStart), 0x18(%rcx)\r
186	movq $(LONG_JUMP - RendezvousFunnelProcStart), 0x20(%rcx)\r
187	movq $(RendezvousFunnelProcEnd - RendezvousFunnelProcStart), 0x28(%rcx)\r
188	\r
189	ret\r