--- /dev/null
+;------------------------------------------------------------------------------ ;\r
+; Copyright (c) 2016, Intel Corporation. All rights reserved.<BR>\r
+; 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
+; Module Name:\r
+;\r
+; MpFuncs.nasm\r
+;\r
+; Abstract:\r
+;\r
+; This is the assembly code for Multi-processor S3 support\r
+;\r
+;-------------------------------------------------------------------------------\r
+\r
+extern ASM_PFX(InitializeFloatingPointUnits)\r
+\r
+%define VacantFlag 0x0\r
+%define NotVacantFlag 0xff\r
+\r
+%define LockLocation RendezvousFunnelProcEnd - RendezvousFunnelProcStart\r
+%define StackStartAddressLocation LockLocation + 0x8\r
+%define StackSizeLocation LockLocation + 0x10\r
+%define CProcedureLocation LockLocation + 0x18\r
+%define GdtrLocation LockLocation + 0x20\r
+%define IdtrLocation LockLocation + 0x2A\r
+%define BufferStartLocation LockLocation + 0x34\r
+%define Cr3OffsetLocation LockLocation + 0x38\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 SEGMENT\r
+DEFAULT REL\r
+SECTION .text\r
+\r
+global ASM_PFX(RendezvousFunnelProc)\r
+ASM_PFX(RendezvousFunnelProc):\r
+RendezvousFunnelProcStart:\r
+\r
+; At this point CS = 0x(vv00) and ip= 0x0.\r
+\r
+ db 0x8c, 0xc8 ; mov ax, cs\r
+ db 0x8e, 0xd8 ; mov ds, ax\r
+ db 0x8e, 0xc0 ; mov es, ax\r
+ db 0x8e, 0xd0 ; mov ss, ax\r
+ db 0x33, 0xc0 ; xor ax, ax\r
+ db 0x8e, 0xe0 ; mov fs, ax\r
+ db 0x8e, 0xe8 ; mov gs, ax\r
+\r
+flat32Start:\r
+\r
+ db 0xBE\r
+ dw BufferStartLocation ; mov si, BufferStartLocation\r
+ db 0x66, 0x8B, 0x14 ; mov edx,dword ptr [si] ; EDX is keeping the start address of wakeup buffer\r
+\r
+ db 0xBE\r
+ dw Cr3OffsetLocation ; mov si, Cr3Location\r
+ db 0x66, 0x8B, 0xC ; mov ecx,dword ptr [si] ; ECX is keeping the value of CR3\r
+\r
+ db 0xBE\r
+ dw GdtrLocation ; mov si, GdtrProfile\r
+ db 0x66 ; db 66h\r
+ db 0x2E, 0xF, 0x1, 0x14 ; lgdt fword ptr cs:[si]\r
+\r
+ db 0xBE\r
+ dw IdtrLocation ; mov si, IdtrProfile\r
+ db 0x66 ; db 66h\r
+ db 0x2E, 0xF, 0x1, 0x1C ; lidt fword ptr cs:[si]\r
+\r
+ db 0x33, 0xC0 ; xor ax, ax\r
+ db 0x8E, 0xD8 ; mov ds, ax\r
+\r
+ db 0xF, 0x20, 0xC0 ; mov eax, cr0 ; Get control register 0\r
+ db 0x66, 0x83, 0xC8, 0x1 ; or eax, 000000001h ; Set PE bit (bit #0)\r
+ db 0xF, 0x22, 0xC0 ; mov cr0, eax\r
+\r
+FLAT32_JUMP:\r
+\r
+ db 0x66, 0x67, 0xEA ; far jump\r
+ dd 0x0 ; 32-bit offset\r
+ dw 0x20 ; 16-bit selector\r
+\r
+PMODE_ENTRY: ; protected mode entry point\r
+\r
+ db 0x66, 0xB8, 0x18, 0x0 ; mov ax, 18h\r
+ db 0x66, 0x8E, 0xD8 ; mov ds, ax\r
+ db 0x66, 0x8E, 0xC0 ; mov es, ax\r
+ db 0x66, 0x8E, 0xE0 ; mov fs, ax\r
+ db 0x66, 0x8E, 0xE8 ; mov gs, ax\r
+ db 0x66, 0x8E, 0xD0 ; mov ss, ax ; Flat mode setup.\r
+\r
+ db 0xF, 0x20, 0xE0 ; mov eax, cr4\r
+ db 0xF, 0xBA, 0xE8, 0x5 ; bts eax, 5\r
+ db 0xF, 0x22, 0xE0 ; mov cr4, eax\r
+\r
+ db 0xF, 0x22, 0xD9 ; mov cr3, ecx\r
+\r
+ db 0x8B, 0xF2 ; mov esi, edx ; Save wakeup buffer address\r
+\r
+ db 0xB9\r
+ dd 0xC0000080 ; mov ecx, 0c0000080h ; EFER MSR number.\r
+ db 0xF, 0x32 ; rdmsr ; Read EFER.\r
+ db 0xF, 0xBA, 0xE8, 0x8 ; bts eax, 8 ; Set LME=1.\r
+ db 0xF, 0x30 ; wrmsr ; Write EFER.\r
+\r
+ db 0xF, 0x20, 0xC0 ; mov eax, cr0 ; Read CR0.\r
+ db 0xF, 0xBA, 0xE8, 0x1F ; bts eax, 31 ; Set PG=1.\r
+ db 0xF, 0x22, 0xC0 ; mov cr0, eax ; Write CR0.\r
+\r
+LONG_JUMP:\r
+\r
+ db 0x67, 0xEA ; far jump\r
+ dd 0x0 ; 32-bit offset\r
+ dw 0x38 ; 16-bit selector\r
+\r
+LongModeStart:\r
+\r
+ mov ax, 0x30\r
+o16 mov ds, ax\r
+o16 mov es, ax\r
+o16 mov ss, ax\r
+\r
+ mov edi, esi\r
+ add edi, LockLocation\r
+ mov al, NotVacantFlag\r
+TestLock:\r
+ xchg byte [edi], al\r
+ cmp al, NotVacantFlag\r
+ jz TestLock\r
+\r
+ProgramStack:\r
+\r
+ mov edi, esi\r
+ add edi, StackSizeLocation\r
+ mov rax, qword [edi]\r
+ mov edi, esi\r
+ add edi, StackStartAddressLocation\r
+ add rax, qword [edi]\r
+ mov rsp, rax\r
+ mov qword [edi], rax\r
+\r
+Releaselock:\r
+\r
+ mov al, VacantFlag\r
+ mov edi, esi\r
+ add edi, LockLocation\r
+ xchg byte [edi], al\r
+\r
+ ;\r
+ ; Call assembly function to initialize FPU.\r
+ ;\r
+ mov rax, ASM_PFX(InitializeFloatingPointUnits)\r
+ sub rsp, 0x20\r
+ call rax\r
+ add rsp, 0x20\r
+\r
+ ;\r
+ ; Call C Function\r
+ ;\r
+ mov edi, esi\r
+ add edi, CProcedureLocation\r
+ mov rax, qword [edi]\r
+\r
+ test rax, rax\r
+ jz GoToSleep\r
+\r
+ sub rsp, 0x20\r
+ call rax\r
+ add rsp, 0x20\r
+\r
+GoToSleep:\r
+ cli\r
+ hlt\r
+ jmp $-2\r
+\r
+RendezvousFunnelProcEnd:\r
+\r
+;-------------------------------------------------------------------------------------\r
+; AsmGetAddressMap (&AddressMap);\r
+;-------------------------------------------------------------------------------------\r
+; comments here for definition of address map\r
+global ASM_PFX(AsmGetAddressMap)\r
+ASM_PFX(AsmGetAddressMap):\r
+ mov rax, RendezvousFunnelProcStart\r
+ mov qword [rcx], rax\r
+ mov qword [rcx+0x8], PMODE_ENTRY - RendezvousFunnelProcStart\r
+ mov qword [rcx+0x10], FLAT32_JUMP - RendezvousFunnelProcStart\r
+ mov qword [rcx+0x18], RendezvousFunnelProcEnd - RendezvousFunnelProcStart\r
+ mov qword [rcx+0x20], LongModeStart - RendezvousFunnelProcStart\r
+ mov qword [rcx+0x28], LONG_JUMP - RendezvousFunnelProcStart\r
+ ret\r
+\r