--- /dev/null
+#------------------------------------------------------------------------------\r
+#\r
+# Copyright (c) 2006 - 2015, 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.S\r
+#\r
+# Abstract:\r
+#\r
+# This is the assembly code for Multi-processor S3 support\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 IdtrLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x2A\r
+.equ BufferStartLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 0x34\r
+.equ Cr3OffsetLocation, RendezvousFunnelProcEnd - RendezvousFunnelProcStart + 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
+.code:\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
+flat32Start:\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 0xBE\r
+ .word IdtrLocation\r
+ .byte 0x66 # db 66h\r
+ .byte 0x2E,0xF,0x1,0x1C # lidt 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
+PMODE_ENTRY: # protected mode entry point\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 assembly function to initialize FPU.\r
+ #\r
+ movabsq $ASM_PFX(InitializeFloatingPointUnits), %rax\r
+ subq $0x20, %rsp\r
+ call *%rax\r
+ addq $0x20, %rsp\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
+ 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
+ movabsq $RendezvousFunnelProcStart, %rax\r
+ movq %rax, (%rcx)\r
+ movq $(PMODE_ENTRY - RendezvousFunnelProcStart), 0x08(%rcx)\r
+ movq $(FLAT32_JUMP - RendezvousFunnelProcStart), 0x10(%rcx)\r
+ movq $(RendezvousFunnelProcEnd - RendezvousFunnelProcStart), 0x18(%rcx)\r
+ movq $(LongModeStart - RendezvousFunnelProcStart), 0x20(%rcx)\r
+ movq $(LONG_JUMP - RendezvousFunnelProcStart), 0x28(%rcx)\r
+ ret\r
+\r