330 lines
7.4 KiB
ArmAsm
330 lines
7.4 KiB
ArmAsm
|
/*
|
||
|
* linux/boot/head.S
|
||
|
*
|
||
|
* Copyright (C) 1991, 1992, 1993 Linus Torvalds
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* head.S contains the 32-bit startup code.
|
||
|
*
|
||
|
* NOTE!!! Startup happens at absolute address 0x00001000, which is also where
|
||
|
* the page directory will exist. The startup code will be overwritten by
|
||
|
* the page directory. [According to comments etc elsewhere on a compressed
|
||
|
* kernel it will end up at 0x1000 + 1Mb I hope so as I assume this. - AC]
|
||
|
*
|
||
|
* Page 0 is deliberately kept safe, since System Management Mode code in
|
||
|
* laptops may need to access the BIOS data stored there. This is also
|
||
|
* useful for future device drivers that either access the BIOS via VM86
|
||
|
* mode.
|
||
|
*/
|
||
|
|
||
|
/*
|
||
|
* High loaded stuff by Hans Lermen & Werner Almesberger, Feb. 1996
|
||
|
*/
|
||
|
.code32
|
||
|
.text
|
||
|
|
||
|
#include <linux/init.h>
|
||
|
#include <linux/linkage.h>
|
||
|
#include <asm/segment.h>
|
||
|
#include <asm/pgtable_types.h>
|
||
|
#include <asm/page_types.h>
|
||
|
#include <asm/boot.h>
|
||
|
#include <asm/msr.h>
|
||
|
#include <asm/processor-flags.h>
|
||
|
#include <asm/asm-offsets.h>
|
||
|
|
||
|
__HEAD
|
||
|
.code32
|
||
|
ENTRY(startup_32)
|
||
|
cld
|
||
|
/*
|
||
|
* Test KEEP_SEGMENTS flag to see if the bootloader is asking
|
||
|
* us to not reload segments
|
||
|
*/
|
||
|
testb $(1<<6), BP_loadflags(%esi)
|
||
|
jnz 1f
|
||
|
|
||
|
cli
|
||
|
movl $(__KERNEL_DS), %eax
|
||
|
movl %eax, %ds
|
||
|
movl %eax, %es
|
||
|
movl %eax, %ss
|
||
|
1:
|
||
|
|
||
|
/*
|
||
|
* Calculate the delta between where we were compiled to run
|
||
|
* at and where we were actually loaded at. This can only be done
|
||
|
* with a short local call on x86. Nothing else will tell us what
|
||
|
* address we are running at. The reserved chunk of the real-mode
|
||
|
* data at 0x1e4 (defined as a scratch field) are used as the stack
|
||
|
* for this calculation. Only 4 bytes are needed.
|
||
|
*/
|
||
|
leal (BP_scratch+4)(%esi), %esp
|
||
|
call 1f
|
||
|
1: popl %ebp
|
||
|
subl $1b, %ebp
|
||
|
|
||
|
/* setup a stack and make sure cpu supports long mode. */
|
||
|
movl $boot_stack_end, %eax
|
||
|
addl %ebp, %eax
|
||
|
movl %eax, %esp
|
||
|
|
||
|
call verify_cpu
|
||
|
testl %eax, %eax
|
||
|
jnz no_longmode
|
||
|
|
||
|
/*
|
||
|
* Compute the delta between where we were compiled to run at
|
||
|
* and where the code will actually run at.
|
||
|
*
|
||
|
* %ebp contains the address we are loaded at by the boot loader and %ebx
|
||
|
* contains the address where we should move the kernel image temporarily
|
||
|
* for safe in-place decompression.
|
||
|
*/
|
||
|
|
||
|
#ifdef CONFIG_RELOCATABLE
|
||
|
movl %ebp, %ebx
|
||
|
movl BP_kernel_alignment(%esi), %eax
|
||
|
decl %eax
|
||
|
addl %eax, %ebx
|
||
|
notl %eax
|
||
|
andl %eax, %ebx
|
||
|
#else
|
||
|
movl $LOAD_PHYSICAL_ADDR, %ebx
|
||
|
#endif
|
||
|
|
||
|
/* Target address to relocate to for decompression */
|
||
|
addl $z_extract_offset, %ebx
|
||
|
|
||
|
/*
|
||
|
* Prepare for entering 64 bit mode
|
||
|
*/
|
||
|
|
||
|
/* Load new GDT with the 64bit segments using 32bit descriptor */
|
||
|
leal gdt(%ebp), %eax
|
||
|
movl %eax, gdt+2(%ebp)
|
||
|
lgdt gdt(%ebp)
|
||
|
|
||
|
/* Enable PAE mode */
|
||
|
xorl %eax, %eax
|
||
|
orl $(X86_CR4_PAE), %eax
|
||
|
movl %eax, %cr4
|
||
|
|
||
|
/*
|
||
|
* Build early 4G boot pagetable
|
||
|
*/
|
||
|
/* Initialize Page tables to 0 */
|
||
|
leal pgtable(%ebx), %edi
|
||
|
xorl %eax, %eax
|
||
|
movl $((4096*6)/4), %ecx
|
||
|
rep stosl
|
||
|
|
||
|
/* Build Level 4 */
|
||
|
leal pgtable + 0(%ebx), %edi
|
||
|
leal 0x1007 (%edi), %eax
|
||
|
movl %eax, 0(%edi)
|
||
|
|
||
|
/* Build Level 3 */
|
||
|
leal pgtable + 0x1000(%ebx), %edi
|
||
|
leal 0x1007(%edi), %eax
|
||
|
movl $4, %ecx
|
||
|
1: movl %eax, 0x00(%edi)
|
||
|
addl $0x00001000, %eax
|
||
|
addl $8, %edi
|
||
|
decl %ecx
|
||
|
jnz 1b
|
||
|
|
||
|
/* Build Level 2 */
|
||
|
leal pgtable + 0x2000(%ebx), %edi
|
||
|
movl $0x00000183, %eax
|
||
|
movl $2048, %ecx
|
||
|
1: movl %eax, 0(%edi)
|
||
|
addl $0x00200000, %eax
|
||
|
addl $8, %edi
|
||
|
decl %ecx
|
||
|
jnz 1b
|
||
|
|
||
|
/* Enable the boot page tables */
|
||
|
leal pgtable(%ebx), %eax
|
||
|
movl %eax, %cr3
|
||
|
|
||
|
/* Enable Long mode in EFER (Extended Feature Enable Register) */
|
||
|
movl $MSR_EFER, %ecx
|
||
|
rdmsr
|
||
|
btsl $_EFER_LME, %eax
|
||
|
wrmsr
|
||
|
|
||
|
/*
|
||
|
* Setup for the jump to 64bit mode
|
||
|
*
|
||
|
* When the jump is performend we will be in long mode but
|
||
|
* in 32bit compatibility mode with EFER.LME = 1, CS.L = 0, CS.D = 1
|
||
|
* (and in turn EFER.LMA = 1). To jump into 64bit mode we use
|
||
|
* the new gdt/idt that has __KERNEL_CS with CS.L = 1.
|
||
|
* We place all of the values on our mini stack so lret can
|
||
|
* used to perform that far jump.
|
||
|
*/
|
||
|
pushl $__KERNEL_CS
|
||
|
leal startup_64(%ebp), %eax
|
||
|
pushl %eax
|
||
|
|
||
|
/* Enter paged protected Mode, activating Long Mode */
|
||
|
movl $(X86_CR0_PG | X86_CR0_PE), %eax /* Enable Paging and Protected mode */
|
||
|
movl %eax, %cr0
|
||
|
|
||
|
/* Jump from 32bit compatibility mode into 64bit mode. */
|
||
|
lret
|
||
|
ENDPROC(startup_32)
|
||
|
|
||
|
no_longmode:
|
||
|
/* This isn't an x86-64 CPU so hang */
|
||
|
1:
|
||
|
hlt
|
||
|
jmp 1b
|
||
|
|
||
|
#include "../../kernel/verify_cpu_64.S"
|
||
|
|
||
|
/*
|
||
|
* Be careful here startup_64 needs to be at a predictable
|
||
|
* address so I can export it in an ELF header. Bootloaders
|
||
|
* should look at the ELF header to find this address, as
|
||
|
* it may change in the future.
|
||
|
*/
|
||
|
.code64
|
||
|
.org 0x200
|
||
|
ENTRY(startup_64)
|
||
|
/*
|
||
|
* We come here either from startup_32 or directly from a
|
||
|
* 64bit bootloader. If we come here from a bootloader we depend on
|
||
|
* an identity mapped page table being provied that maps our
|
||
|
* entire text+data+bss and hopefully all of memory.
|
||
|
*/
|
||
|
|
||
|
/* Setup data segments. */
|
||
|
xorl %eax, %eax
|
||
|
movl %eax, %ds
|
||
|
movl %eax, %es
|
||
|
movl %eax, %ss
|
||
|
movl %eax, %fs
|
||
|
movl %eax, %gs
|
||
|
lldt %ax
|
||
|
movl $0x20, %eax
|
||
|
ltr %ax
|
||
|
|
||
|
/*
|
||
|
* Compute the decompressed kernel start address. It is where
|
||
|
* we were loaded at aligned to a 2M boundary. %rbp contains the
|
||
|
* decompressed kernel start address.
|
||
|
*
|
||
|
* If it is a relocatable kernel then decompress and run the kernel
|
||
|
* from load address aligned to 2MB addr, otherwise decompress and
|
||
|
* run the kernel from LOAD_PHYSICAL_ADDR
|
||
|
*
|
||
|
* We cannot rely on the calculation done in 32-bit mode, since we
|
||
|
* may have been invoked via the 64-bit entry point.
|
||
|
*/
|
||
|
|
||
|
/* Start with the delta to where the kernel will run at. */
|
||
|
#ifdef CONFIG_RELOCATABLE
|
||
|
leaq startup_32(%rip) /* - $startup_32 */, %rbp
|
||
|
movl BP_kernel_alignment(%rsi), %eax
|
||
|
decl %eax
|
||
|
addq %rax, %rbp
|
||
|
notq %rax
|
||
|
andq %rax, %rbp
|
||
|
#else
|
||
|
movq $LOAD_PHYSICAL_ADDR, %rbp
|
||
|
#endif
|
||
|
|
||
|
/* Target address to relocate to for decompression */
|
||
|
leaq z_extract_offset(%rbp), %rbx
|
||
|
|
||
|
/* Set up the stack */
|
||
|
leaq boot_stack_end(%rbx), %rsp
|
||
|
|
||
|
/* Zero EFLAGS */
|
||
|
pushq $0
|
||
|
popfq
|
||
|
|
||
|
/*
|
||
|
* Copy the compressed kernel to the end of our buffer
|
||
|
* where decompression in place becomes safe.
|
||
|
*/
|
||
|
pushq %rsi
|
||
|
leaq (_bss-8)(%rip), %rsi
|
||
|
leaq (_bss-8)(%rbx), %rdi
|
||
|
movq $_bss /* - $startup_32 */, %rcx
|
||
|
shrq $3, %rcx
|
||
|
std
|
||
|
rep movsq
|
||
|
cld
|
||
|
popq %rsi
|
||
|
|
||
|
/*
|
||
|
* Jump to the relocated address.
|
||
|
*/
|
||
|
leaq relocated(%rbx), %rax
|
||
|
jmp *%rax
|
||
|
|
||
|
.text
|
||
|
relocated:
|
||
|
|
||
|
/*
|
||
|
* Clear BSS (stack is currently empty)
|
||
|
*/
|
||
|
xorl %eax, %eax
|
||
|
leaq _bss(%rip), %rdi
|
||
|
leaq _ebss(%rip), %rcx
|
||
|
subq %rdi, %rcx
|
||
|
shrq $3, %rcx
|
||
|
rep stosq
|
||
|
|
||
|
/*
|
||
|
* Do the decompression, and jump to the new kernel..
|
||
|
*/
|
||
|
pushq %rsi /* Save the real mode argument */
|
||
|
movq %rsi, %rdi /* real mode address */
|
||
|
leaq boot_heap(%rip), %rsi /* malloc area for uncompression */
|
||
|
leaq input_data(%rip), %rdx /* input_data */
|
||
|
movl $z_input_len, %ecx /* input_len */
|
||
|
movq %rbp, %r8 /* output target address */
|
||
|
call decompress_kernel
|
||
|
popq %rsi
|
||
|
|
||
|
/*
|
||
|
* Jump to the decompressed kernel.
|
||
|
*/
|
||
|
jmp *%rbp
|
||
|
|
||
|
.data
|
||
|
gdt:
|
||
|
.word gdt_end - gdt
|
||
|
.long gdt
|
||
|
.word 0
|
||
|
.quad 0x0000000000000000 /* NULL descriptor */
|
||
|
.quad 0x00af9a000000ffff /* __KERNEL_CS */
|
||
|
.quad 0x00cf92000000ffff /* __KERNEL_DS */
|
||
|
.quad 0x0080890000000000 /* TS descriptor */
|
||
|
.quad 0x0000000000000000 /* TS continued */
|
||
|
gdt_end:
|
||
|
|
||
|
/*
|
||
|
* Stack and heap for uncompression
|
||
|
*/
|
||
|
.bss
|
||
|
.balign 4
|
||
|
boot_heap:
|
||
|
.fill BOOT_HEAP_SIZE, 1, 0
|
||
|
boot_stack:
|
||
|
.fill BOOT_STACK_SIZE, 1, 0
|
||
|
boot_stack_end:
|
||
|
|
||
|
/*
|
||
|
* Space for page tables (not in .bss so not zeroed)
|
||
|
*/
|
||
|
.section ".pgtable","a",@nobits
|
||
|
.balign 4096
|
||
|
pgtable:
|
||
|
.fill 6*4096, 1, 0
|