diff options
| author | gikidy <gikidy@6f19259b-4bc3-4df7-8a09-765794883524> | 2009-02-20 08:22:04 +0000 |
|---|---|---|
| committer | gikidy <gikidy@6f19259b-4bc3-4df7-8a09-765794883524> | 2009-02-20 08:22:04 +0000 |
| commit | ccec4c39691f3e2bc3108ef82f744b278b59fda3 (patch) | |
| tree | 1821798327a6f14124568495857ed96ff3e2721c /DuetPkg/BootSector/efi32.S | |
| parent | 01f1138afeda57f67d783c0e29aafeb7ce6edda6 (diff) | |
| download | edk2-platforms-ccec4c39691f3e2bc3108ef82f744b278b59fda3.tar.xz | |
Port Intel .asm to GAS S
git-svn-id: https://edk2.svn.sourceforge.net/svnroot/edk2/trunk/edk2@7557 6f19259b-4bc3-4df7-8a09-765794883524
Diffstat (limited to 'DuetPkg/BootSector/efi32.S')
| -rw-r--r-- | DuetPkg/BootSector/efi32.S | 581 |
1 files changed, 581 insertions, 0 deletions
diff --git a/DuetPkg/BootSector/efi32.S b/DuetPkg/BootSector/efi32.S new file mode 100644 index 0000000000..421271c516 --- /dev/null +++ b/DuetPkg/BootSector/efi32.S @@ -0,0 +1,581 @@ +#------------------------------------------------------------------------------
+#*
+#* Copyright 2006, Intel Corporation
+#* All rights reserved. This program and the accompanying materials
+#* are licensed and made available under the terms and conditions of the BSD License
+#* which accompanies this distribution. The full text of the license may be found at
+#* http://opensource.org/licenses/bsd-license.php
+#*
+#* THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
+#* WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
+#*
+#* efi32.asm
+#*
+#* Abstract:
+#*
+#------------------------------------------------------------------------------
+
+##############################################################################
+# Now in 32-bit protected mode.
+##############################################################################
+
+ .486:
+ #.MODEL flat
+ .stack:
+ .code:
+ .org 0x21000
+
+.equ DEFAULT_HANDLER_SIZE, INT1 - INT0
+
+.macro jmpCommonIdtEntry
+ # jmp commonIdtEntry - this must be hand coded to keep the assembler from
+ # using a 8 bit reletive jump when the entries are
+ # within 255 bytes of the common entry. This must
+ # be done to maintain the consistency of the size
+ # of entry points...
+ .byte 0xe9 # jmp 16 bit relative
+ .long commonIdtEntry - . - 4 # A problem
+.endm
+
+Start:
+ movw %ax, %ds
+ movw %ax, %es
+ movw %ax, %fs
+ movw %ax, %gs
+ movw %ax, %ss
+ movl $0x001ffff0, %esp
+
+ call ClearScreen
+
+ # Populate IDT with meaningful offsets for exception handlers...
+ sidt Idtr
+
+ movl Halt, %eax
+ movl %eax, %ebx # use bx to copy 15..0 to descriptors
+ shrl $16, %eax # use ax to copy 31..16 to descriptors
+ movl $0x78, %ecx # 78h IDT entries to initialize with unique entry points (exceptions)
+ movl (Idtr + 2), %esi
+ movl (%esi), %edi
+
+LOOP_1: # loop through all IDT entries exception handlers and initialize to default handler
+ movw %bx, (%edi) # write bits 15..0 of offset
+ movw $0x20, 2(%edi) # SYS_CODE_SEL from GDT
+ movw $(0x0e00 | 0x8000), 4(%edi) # type = 386 interrupt gate, present
+ movw %ax, 6(%edi) # write bits 31..16 of offset
+ addl $8, %edi # move up to next descriptor
+ addw DEFAULT_HANDLER_SIZE, %bx # move to next entry point
+ loopl LOOP_1 # loop back through again until all descriptors are initialized
+
+ ## at this point edi contains the offset of the descriptor for INT 20
+ ## and bx contains the low 16 bits of the offset of the default handler
+ ## so initialize all the rest of the descriptors with these two values...
+# mov ecx, 101 ; there are 100 descriptors left (INT 20 (14h) - INT 119 (77h)
+#@@: ; loop through all IDT entries exception handlers and initialize to default handler
+# mov word ptr [edi], bx ; write bits 15..0 of offset
+# mov word ptr [edi+2], 20h ; SYS_CODE_SEL from GDT
+# mov word ptr [edi+4], 0e00h OR 8000h ; type = 386 interrupt gate, present
+# mov word ptr [edi+6], ax ; write bits 31..16 of offset
+# add edi, 8 ; move up to next descriptor
+# loop @b ; loop back through again until all descriptors are initialized
+
+
+## DUMP location of IDT and several of the descriptors
+# mov ecx, 8
+# mov eax, [offset Idtr + 2]
+# mov eax, [eax]
+# mov edi, 0b8000h
+# call PrintDword
+# mov esi, eax
+# mov edi, 0b80a0h
+# jmp OuterLoop
+
+##
+## just for fun, let's do a software interrupt to see if we correctly land in the exception handler...
+# mov eax, 011111111h
+# mov ebx, 022222222h
+# mov ecx, 033333333h
+# mov edx, 044444444h
+# mov ebp, 055555555h
+# mov esi, 066666666h
+# mov edi, 077777777h
+# push 011111111h
+# push 022222222h
+# push 033333333h
+# int 119
+
+
+ movl $0x22000, %esi # esi = 22000
+ movl 0x14(%esi), %eax # eax = [22014]
+ addl %eax, %esi # esi = 22000 + [22014] = Base of EFILDR.C
+ movl 0x3c(%esi), %ebp # ebp = [22000 + [22014] + 3c] = NT Image Header for EFILDR.C
+ addl %esi, %ebp
+ movl 0x34(%ebp), %edi # edi = [[22000 + [22014] + 3c] + 30] = ImageBase
+ movl 0x28(%ebp), %eax # eax = [[22000 + [22014] + 3c] + 24] = EntryPoint
+ addl %edi, %eax # eax = ImageBase + EntryPoint
+ movl %eax, EfiLdrOffset # Modify far jump instruction for correct entry point
+
+ movw 6(%ebp), %bx # bx = Number of sections
+ xorl %eax, %eax
+ movw 0x14(%ebp), %ax # ax = Optional Header Size
+ addl %eax, %ebp
+ addl $0x18, %ebp # ebp = Start of 1st Section
+
+SectionLoop:
+ pushl %esi # Save Base of EFILDR.C
+ pushl %edi # Save ImageBase
+ addl 0x14(%ebp), %esi # esi = Base of EFILDR.C + PointerToRawData
+ addl 0x0c(%ebp), %edi # edi = ImageBase + VirtualAddress
+ movl 0x10(%ebp), %ecx # ecs = SizeOfRawData
+
+ cld
+ shrl $2, %ecx
+ rep
+ movsl
+
+ popl %edi # Restore ImageBase
+ popl %esi # Restore Base of EFILDR.C
+
+ addw $0x28, %bp # ebp = ebp + 028h = Pointer to next section record
+ decw %bx
+ cmpw $0, %bx
+ jne SectionLoop
+
+ movzwl Idtr, %eax # get size of IDT
+ incl %eax
+ addl Idtr + 2, %eax # add to base of IDT to get location of memory map...
+ pushl %eax # push memory map location on stack for call to EFILDR...
+
+ pushl %eax # push return address (useless, just for stack balance)
+ .byte 0xb8
+EfiLdrOffset:
+ .long 0x00401000 # Offset of EFILDR
+# mov eax, 401000h
+ pushl %eax
+ ret
+
+# db "**** DEFAULT IDT ENTRY ***",0
+ .align 0x2
+Halt:
+INT0:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x0
+ jmpCommonIdtEntry
+# db 0e9h ; jmp 16 bit reletive
+# dd commonIdtEntry - $ - 4 ; offset to jump to
+
+INT1:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x1
+ jmpCommonIdtEntry
+
+INT2:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x2
+ jmpCommonIdtEntry
+
+INT3:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x3
+ jmpCommonIdtEntry
+
+INT4:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x4
+ jmpCommonIdtEntry
+
+INT5:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x5
+ jmpCommonIdtEntry
+
+INT6:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x6
+ jmpCommonIdtEntry
+
+INT7:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x7
+ jmpCommonIdtEntry
+
+INT8:
+# Double fault causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $0x8
+ jmpCommonIdtEntry
+
+INT9:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $0x9
+ jmpCommonIdtEntry
+
+INT10:
+# Invalid TSS causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $10
+ jmpCommonIdtEntry
+
+INT11:
+# Segment Not Present causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $11
+ jmpCommonIdtEntry
+
+INT12:
+# Stack fault causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $12
+ jmpCommonIdtEntry
+
+INT13:
+# GP fault causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $13
+ jmpCommonIdtEntry
+
+INT14:
+# Page fault causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $14
+ jmpCommonIdtEntry
+
+INT15:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $15
+ jmpCommonIdtEntry
+
+INT16:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $16
+ jmpCommonIdtEntry
+
+INT17:
+# Alignment check causes an error code to be pushed so no phony push necessary
+ nop
+ nop
+ pushl $17
+ jmpCommonIdtEntry
+
+INT18:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $18
+ jmpCommonIdtEntry
+
+INT19:
+ pushl $0x0 # push error code place holder on the stack
+ pushl $19
+ jmpCommonIdtEntry
+
+INTUnknown:
+.rept (0x78 - 20)
+ pushl $0x0 # push error code place holder on the stack
+# push $0xxx # push vector number
+ .byte 0x6a
+ .long ( . - INTUnknown - 3 ) / 9 + 20 # vector number
+ jmpCommonIdtEntry
+.endr
+
+commonIdtEntry:
+ pushal
+ movl %esp, %ebp
+##
+## At this point the stack looks like this:
+##
+## eflags
+## Calling CS
+## Calling EIP
+## Error code or 0
+## Int num or 0ffh for unknown int num
+## eax
+## ecx
+## edx
+## ebx
+## esp
+## ebp
+## esi
+## edi <------- ESP, EBP
+##
+
+ call ClearScreen
+ movl String1, %esi
+ call PrintString
+ movl 32(%ebp), %eax ## move Int number into EAX
+ cmpl $19, %eax
+ ja PrintDefaultString
+PrintExceptionString:
+ shll $2, %eax ## multiply by 4 to get offset from StringTable to actual string address
+ addl StringTable, %eax
+ movl (%eax), %esi
+ jmp PrintTheString
+PrintDefaultString:
+ movl IntUnknownString, %esi
+ # patch Int number
+ movl %eax, %edx
+ call A2C
+ movb %al, 1(%esi)
+ movl %edx, %eax
+ shrl $4, %eax
+ call A2C
+ movb %al, (%esi)
+PrintTheString:
+ call PrintString
+ movl String2, %esi
+ call PrintString
+ movl 44(%ebp), %eax # CS
+ call PrintDword
+ movb ':', %al
+ movb %al, (%edi)
+ addl $2, %edi
+ movl 40(%ebp), %eax # EIP
+ call PrintDword
+ movl String3, %esi
+ call PrintString
+
+ movl $0xb8140, %edi
+
+ movl StringEax, %esi # eax
+ call PrintString
+ movl 28(%ebp), %eax
+ call PrintDword
+
+ movl StringEbx, %esi # ebx
+ call PrintString
+ movl 16(%ebp), %eax
+ call PrintDword
+
+ movl StringEcx, %esi # ecx
+ call PrintString
+ movl 24(%ebp), %eax
+ call PrintDword
+
+ movl StringEdx, %esi # edx
+ call PrintString
+ movl 20(%ebp), %eax
+ call PrintDword
+
+ movl StringEcode, %esi # error code
+ call PrintString
+ movl 36(%ebp), %eax
+ call PrintDword
+
+ movl $0xb81e0, %edi
+
+ movl StringEsp, %esi # esp
+ call PrintString
+ movl 12(%ebp), %eax
+ call PrintDword
+
+ movl StringEbp, %esi # ebp
+ call PrintString
+ movl 8(%ebp), %eax
+ call PrintDword
+
+ movl StringEsi, %esi # esi
+ call PrintString
+ movl 4(%ebp), %eax
+ call PrintDword
+
+ movl StringEdi, %esi # edi
+ call PrintString
+ movl (%ebp), %eax
+ call PrintDword
+
+ movl StringEflags, %esi # eflags
+ call PrintString
+ movl 48(%ebp), %eax
+ call PrintDword
+
+ movl $0xb8320, %edi
+
+ movl %ebp, %esi
+ addl $52, %esi
+ movl $8, %ecx
+
+
+OuterLoop:
+ pushl %ecx
+ movl $8, %ecx
+ movl %edi, %edx
+
+InnerLoop:
+ movl (%esi), %eax
+ call PrintDword
+ addl $4, %esi
+ movb ' ', %al
+ movb %al, (%edi)
+ addl $2, %edi
+ loop InnerLoop
+
+ popl %ecx
+ addl $0xa0, %edx
+ movl %edx, %edi
+ loop OuterLoop
+
+
+ movl $0xb8960, %edi
+
+ movl 40(%ebp), %eax # EIP
+ subl $32*4, %eax
+ movl %eax, %esi # esi = eip - 32 DWORD linear (total 64 DWORD)
+
+ movl $8, %ecx
+
+OuterLoop1:
+ pushl %ecx
+ movl $8, %ecx
+ movl %edi, %edx
+
+InnerLoop1:
+ movl (%esi), %eax
+ call PrintDword
+ addl $4, %esi
+ movb ' ', %al
+ movb %al, (%edi)
+ addl $2, %edi
+ loop InnerLoop1
+
+ popl %ecx
+ addl $0xa0, %edx
+ movl %edx, %edi
+ loop OuterLoop1
+
+
+
+# wbinvd ; this intruction does not support in early than 486 arch
+LN_C1:
+ jmp LN_C1
+#
+# return
+#
+ movl %ebp, %esp
+ popal
+ addl $8, %esp # error code and INT number
+
+ iretl
+
+
+PrintString:
+ pushl %eax
+LN_C2:
+ movb (%esi), %al
+ cmpb $0, %al
+ je LN_C3
+ movb %al, (%edi)
+ incl %esi
+ addl $2, %edi
+ jmp LN_C2
+LN_C3:
+ popl %eax
+ ret
+
+## EAX contains dword to print
+## EDI contains memory location (screen location) to print it to
+PrintDword:
+ pushl %ecx
+ pushl %ebx
+ pushl %eax
+
+ movl $8, %ecx
+looptop:
+ roll $4, %eax
+ movb %al, %bl
+ andb $0xf, %bl
+ addb '0', %bl
+ cmpb '9', %bl
+ jle LN_C4
+ addb $7, %bl
+LN_C4:
+ movb %bl, (%edi)
+ addl $2, %edi
+ loop looptop
+ #wbinvd
+
+ popl %eax
+ popl %ebx
+ popl %ecx
+ ret
+
+ClearScreen:
+ pushl %eax
+ pushl %ecx
+
+ movb ' ', %al
+ movb $0xc, %ah
+ movl $0xb8000, %edi
+ movl $80*24, %ecx
+LN_C5:
+ movw %ax, (%edi)
+ addl $2, %edi
+ loop LN_C5
+ movl $0xb8000, %edi
+
+ popl %ecx
+ popl %eax
+
+ ret
+
+A2C:
+ andb $0xf, %al
+ addb '0', %al
+ cmpb '9', %al
+ jle LN_C6
+ addb $7, %al
+LN_C6:
+ ret
+
+String1: .asciz "*** INT "
+
+Int0String: .asciz "00h Divide by 0 -"
+Int1String: .asciz "01h Debug exception -"
+Int2String: .asciz "02h NMI -"
+Int3String: .asciz "03h Breakpoint -"
+Int4String: .asciz "04h Overflow -"
+Int5String: .asciz "05h Bound -"
+Int6String: .asciz "06h Invalid opcode -"
+Int7String: .asciz "07h Device not available -"
+Int8String: .asciz "08h Double fault -"
+Int9String: .asciz "09h Coprocessor seg overrun (reserved) -"
+Int10String: .asciz "0Ah Invalid TSS -"
+Int11String: .asciz "0Bh Segment not present -"
+Int12String: .asciz "0Ch Stack fault -"
+Int13String: .asciz "0Dh General protection fault -"
+Int14String: .asciz "0Eh Page fault -"
+Int15String: .asciz "0Fh (Intel reserved) -"
+Int16String: .asciz "10h Floating point error -"
+Int17String: .asciz "11h Alignment check -"
+Int18String: .asciz "12h Machine check -"
+Int19String: .asciz "13h SIMD Floating-Point Exception -"
+IntUnknownString: .asciz "??h Unknown interrupt -"
+
+StringTable: .long Int0String, Int1String, Int2String, Int3String, \
+ Int4String, Int5String, Int6String, Int7String, \
+ Int8String, Int9String, Int10String, Int11String, \
+ Int12String, Int13String, Int14String, Int15String,\
+ Int16String, Int17String, Int18String, Int19String
+
+String2: .asciz " HALT!! *** ("
+String3: .asciz ")"
+StringEax: .asciz "EAX="
+StringEbx: .asciz "EBX="
+StringEcx: .asciz "ECX="
+StringEdx: .asciz "EDX="
+StringEcode: .asciz "ECODE="
+StringEsp: .asciz "ESP="
+StringEbp: .asciz "EBP="
+StringEsi: .asciz "ESI="
+StringEdi: .asciz "EDI="
+StringEflags: .asciz "EFLAGS="
+
+Idtr: .float 0
+
+ .org 0x21ffe
+BlockSignature:
+ .word 0xaa55
+
+
|