| version 1.52, 2007/10/17 19:54:45 |
version 1.53, 2007/10/18 15:28:35 |
|
|
| /* $NetBSD$ */ |
/* $NetBSD$ */ |
| |
|
| |
/* |
| |
* Copyright-o-rama! |
| |
*/ |
| |
|
| |
/* |
| |
* Copyright (c) 2001 Wasabi Systems, Inc. |
| |
* All rights reserved. |
| |
* |
| |
* Written by Frank van der Linden for Wasabi Systems, Inc. |
| |
* |
| |
* Redistribution and use in source and binary forms, with or without |
| |
* modification, are permitted provided that the following conditions |
| |
* are met: |
| |
* 1. Redistributions of source code must retain the above copyright |
| |
* notice, this list of conditions and the following disclaimer. |
| |
* 2. Redistributions in binary form must reproduce the above copyright |
| |
* notice, this list of conditions and the following disclaimer in the |
| |
* documentation and/or other materials provided with the distribution. |
| |
* 3. All advertising materials mentioning features or use of this software |
| |
* must display the following acknowledgement: |
| |
* This product includes software developed for the NetBSD Project by |
| |
* Wasabi Systems, Inc. |
| |
* 4. The name of Wasabi Systems, Inc. may not be used to endorse |
| |
* or promote products derived from this software without specific prior |
| |
* written permission. |
| |
* |
| |
* THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND |
| |
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED |
| |
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
| |
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC |
| |
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
| |
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
| |
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
| |
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
| |
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
| |
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
| |
* POSSIBILITY OF SUCH DAMAGE. |
| |
*/ |
| |
|
| |
|
| /*- |
/*- |
| * Copyright (c) 1998, 2000, 2004, 2006, 2007 The NetBSD Foundation, Inc. |
* Copyright (c) 1998, 2000, 2004, 2006, 2007 The NetBSD Foundation, Inc. |
| * All rights reserved. |
* All rights reserved. |
| Line 139 _C_LABEL(cpu): .long 0 # are we 80486, |
|
| Line 179 _C_LABEL(cpu): .long 0 # are we 80486, |
|
| _C_LABEL(atdevbase): .long 0 # location of start of iomem in virtual |
_C_LABEL(atdevbase): .long 0 # location of start of iomem in virtual |
| _C_LABEL(proc0uarea): .long 0 |
_C_LABEL(proc0uarea): .long 0 |
| _C_LABEL(PDPpaddr): .long 0 # paddr of PDP, for libkvm |
_C_LABEL(PDPpaddr): .long 0 # paddr of PDP, for libkvm |
| |
_C_LABEL(tablesize): .long 0 |
| |
|
| .space 512 |
.space 512 |
| tmpstk: |
tmpstk: |
| Line 384 try586: /* Use the `cpuid' instruction. |
|
| Line 425 try586: /* Use the `cpuid' instruction. |
|
| /* |
/* |
| * Virtual address space of kernel: |
* Virtual address space of kernel: |
| * |
* |
| * text | data | bss | [syms] | page dir | proc0 kstack |
* text | data | bss | [syms] | page dir | proc0 kstack | L1 ptp |
| * 0 1 2 3 |
* 0 1 2 3 |
| */ |
*/ |
| #define PROC0PDIR ((0) * PAGE_SIZE) |
|
| #define PROC0STACK ((1) * PAGE_SIZE) |
#define PROC0_PDIR_OFF 0 |
| #define SYSMAP ((1+UPAGES) * PAGE_SIZE) |
#define PROC0_STK_OFF (PROC0_PDIR_OFF + PAGE_SIZE) |
| #define TABLESIZE ((1+UPAGES) * PAGE_SIZE) /* + nkpde * PAGE_SIZE */ |
#define PROC0_PTP1_OFF (PROC0_STK_OFF + UPAGES * PAGE_SIZE) |
| |
|
| |
/* |
| |
* fillkpt |
| |
* eax = pte (page frame | control | status) |
| |
* ebx = page table address |
| |
* ecx = number of pages to map |
| |
*/ |
| |
|
| |
#define fillkpt \ |
| |
1: movl %eax,(%ebx) ; /* store phys addr */ \ |
| |
addl $4,%ebx ; /* next pte/pde */ \ |
| |
addl $PAGE_SIZE,%eax ; /* next phys page */ \ |
| |
loop 1b ; \ |
| |
|
| |
|
| /* Find end of kernel image. */ |
/* Find end of kernel image. */ |
| movl $RELOC(end),%edi |
movl $RELOC(end),%edi |
| Line 404 try586: /* Use the `cpuid' instruction. |
|
| Line 459 try586: /* Use the `cpuid' instruction. |
|
| 1: |
1: |
| #endif |
#endif |
| |
|
| /* Calculate where to start the bootstrap tables. */ |
/* Compute sizes */ |
| movl %edi,%esi # edi = esym ? esym : end |
movl %edi,%esi # edi = esym ? esym : end |
| addl $PGOFSET,%esi # page align up |
addl $PGOFSET,%esi # page align up |
| andl $~PGOFSET,%esi |
andl $~PGOFSET,%esi |
| |
|
| /* |
/* nkptp[1] = (esi + ~L2_FRAME) >> L2_SHIFT + 1; */ |
| * Calculate the size of the kernel page table directory, and |
movl %esi,%eax |
| * how many entries it will have. Adjust nkpde to the actual |
addl $~L2_FRAME,%eax |
| * kernel size automatically. Account for the bootstrap tables, |
shrl $L2_SHIFT,%eax |
| * round up, and add an extra 4MB. |
incl %eax /* one more ptp for VAs stolen by bootstrap */ |
| */ |
1: movl %eax,RELOC(nkptp)+1*4 |
| leal TABLESIZE+NBPD+PDOFSET(%edi),%eax |
|
| shrl $PDSHIFT,%eax |
/* tablesize = (1 + UPAGES + nkptp) << PGSHIFT; */ |
| movl RELOC(nkpde),%ecx # get nkpde |
addl $(1+UPAGES),%eax |
| cmpl %ecx,%eax |
shll $PGSHIFT,%eax |
| jb 1f |
movl %eax,RELOC(tablesize) |
| movl %eax,%ecx |
|
| 1: cmpl $NKPTP_MIN,%ecx # larger than min? |
/* ensure that nkptp covers bootstrap tables */ |
| jge 1f |
addl %esi,%eax |
| movl $NKPTP_MIN,%ecx # set at min |
addl $~L2_FRAME,%eax |
| jmp 2f |
shrl $L2_SHIFT,%eax |
| 1: cmpl $NKPTP_MAX,%ecx # larger than max? |
incl %eax |
| jle 2f |
cmpl %eax,RELOC(nkptp)+1*4 |
| movl $NKPTP_MAX,%ecx |
jnz 1b |
| 2: movl %ecx,RELOC(nkpde) |
|
| |
/* Clear tables */ |
| /* Clear memory for bootstrap tables. */ |
movl %esi,%edi |
| shll $PGSHIFT,%ecx |
|
| addl $TABLESIZE,%ecx |
|
| addl %esi,%ecx # end of tables |
|
| subl %edi,%ecx # size of tables |
|
| shrl $2,%ecx |
|
| xorl %eax,%eax |
xorl %eax,%eax |
| cld |
cld |
| |
movl RELOC(tablesize),%ecx |
| |
shrl $2,%ecx |
| rep |
rep |
| stosl |
stosl |
| |
|
| /* |
leal (PROC0_PTP1_OFF)(%esi), %ebx |
| * fillkpt |
|
| * eax = pte (page frame | control | status) |
|
| * ebx = page table address |
|
| * ecx = number of pages to map |
|
| */ |
|
| #define fillkpt \ |
|
| 1: movl %eax,(%ebx) ; \ |
|
| addl $PAGE_SIZE,%eax ; /* increment physical address */ \ |
|
| addl $4,%ebx ; /* next pte */ \ |
|
| loop 1b ; |
|
| |
|
| /* |
/* |
| * Build initial page tables. |
* Build initial page tables. |
| */ |
*/ |
| /* Calculate end of text segment, rounded to a page. */ |
/* |
| leal (RELOC(etext)+PGOFSET),%edx |
* Compute &__data_start - KERNBASE. This can't be > 4G, |
| |
* or we can't deal with it anyway, since we can't load it in |
| |
* 32 bit mode. So use the bottom 32 bits. |
| |
*/ |
| |
movl $RELOC(__data_start),%edx |
| andl $~PGOFSET,%edx |
andl $~PGOFSET,%edx |
| |
|
| /* Skip over the first 1MB. */ |
/* |
| |
* Skip the first MB. |
| |
*/ |
| movl $_RELOC(KERNTEXTOFF),%eax |
movl $_RELOC(KERNTEXTOFF),%eax |
| movl %eax,%ecx |
movl %eax,%ecx |
| shrl $PGSHIFT,%ecx |
shrl $(PGSHIFT-2),%ecx /* ((n >> PGSHIFT) << 2) for # pdes */ |
| leal (SYSMAP)(%esi,%ecx,4),%ebx |
addl %ecx,%ebx |
| |
|
| /* Map the kernel text read-only. */ |
/* Map the kernel text read-only. */ |
| movl %edx,%ecx |
movl %edx,%ecx |
| Line 475 try586: /* Use the `cpuid' instruction. |
|
| Line 523 try586: /* Use the `cpuid' instruction. |
|
| |
|
| /* Map the data, BSS, and bootstrap tables read-write. */ |
/* Map the data, BSS, and bootstrap tables read-write. */ |
| leal (PG_V|PG_KW)(%edx),%eax |
leal (PG_V|PG_KW)(%edx),%eax |
| movl RELOC(nkpde),%ecx |
movl RELOC(tablesize),%ecx |
| shll $PGSHIFT,%ecx |
|
| addl $TABLESIZE,%ecx |
|
| addl %esi,%ecx # end of tables |
addl %esi,%ecx # end of tables |
| subl %edx,%ecx # subtract end of text |
subl %edx,%ecx # subtract end of text |
| shrl $PGSHIFT,%ecx |
shrl $PGSHIFT,%ecx |
| fillkpt |
fillkpt |
| |
|
| /* Map ISA I/O memory. */ |
/* Map ISA I/O mem (later atdevbase) */ |
| movl $(IOM_BEGIN|PG_V|PG_KW/*|PG_N*/),%eax # having these bits set |
movl $(IOM_BEGIN|PG_V|PG_KW/*|PG_N*/),%eax # having these bits set |
| movl $(IOM_SIZE>>PGSHIFT),%ecx # for this many pte s, |
movl $(IOM_SIZE>>PGSHIFT),%ecx # for this many pte s, |
| fillkpt |
fillkpt |
| Line 491 try586: /* Use the `cpuid' instruction. |
|
| Line 537 try586: /* Use the `cpuid' instruction. |
|
| /* |
/* |
| * Construct a page table directory. |
* Construct a page table directory. |
| */ |
*/ |
| /* Install PDEs for temporary double map of kernel. */ |
/* Set up top level entries for identity mapping */ |
| movl RELOC(nkpde),%ecx # for this many pde s, |
leal (PROC0_PDIR_OFF)(%esi),%ebx |
| leal (PROC0PDIR+0*4)(%esi),%ebx # which is where temp maps! |
leal (PROC0_PTP1_OFF)(%esi),%eax |
| leal (SYSMAP+PG_V|PG_KW)(%esi),%eax # pte for KPT in proc 0, |
orl $(PG_V|PG_KW), %eax |
| |
movl RELOC(nkptp)+1*4,%ecx |
| fillkpt |
fillkpt |
| |
|
| /* Map kernel PDEs. */ |
/* Set up top level entries for actual kernel mapping */ |
| movl RELOC(nkpde),%ecx # for this many pde s, |
leal (PROC0_PDIR_OFF + L2_SLOT_KERNBASE*4)(%esi),%ebx |
| leal (PROC0PDIR+PDSLOT_KERN*4)(%esi),%ebx # kernel pde offset |
leal (PROC0_PTP1_OFF)(%esi),%eax |
| leal (SYSMAP+PG_V|PG_KW)(%esi),%eax # pte for KPT in proc 0, |
orl $(PG_V|PG_KW), %eax |
| |
movl RELOC(nkptp)+1*4,%ecx |
| fillkpt |
fillkpt |
| |
|
| /* Install a PDE recursively mapping page directory as a page table! */ |
/* Install a PDE recursively mapping page directory as a page table! */ |
| leal (PROC0PDIR+PG_V|PG_KW)(%esi),%eax # pte for ptd |
leal (PROC0_PDIR_OFF + PDIR_SLOT_PTE*4)(%esi),%ebx |
| movl %eax,(PROC0PDIR+PDSLOT_PTE*4)(%esi) # recursive PD slot |
leal (PROC0_PDIR_OFF)(%esi),%eax |
| |
orl $(PG_V|PG_KW),%eax |
| |
movl %eax,(%ebx) |
| |
|
| |
|
| /* Save phys. addr of PDP, for libkvm. */ |
/* Save phys. addr of PDP, for libkvm. */ |
| movl %esi,RELOC(PDPpaddr) |
movl %esi,RELOC(PDPpaddr) |
| |
|
| /* Load base of page directory and enable mapping. */ |
/* |
| |
* Startup checklist: |
| |
* 1. Load %cr3 with pointer to PDIR. |
| |
*/ |
| movl %esi,%eax # phys address of ptd in proc 0 |
movl %esi,%eax # phys address of ptd in proc 0 |
| movl %eax,%cr3 # load ptd addr into mmu |
movl %eax,%cr3 # load ptd addr into mmu |
| |
|
| |
/* |
| |
* 2. Enable paging and the rest of it. |
| |
*/ |
| movl %cr0,%eax # get control word |
movl %cr0,%eax # get control word |
| # enable paging & NPX emulation |
# enable paging & NPX emulation |
| orl $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_EM|CR0_MP),%eax |
orl $(CR0_PE|CR0_PG|CR0_NE|CR0_TS|CR0_EM|CR0_MP),%eax |
| Line 522 try586: /* Use the `cpuid' instruction. |
|
| Line 580 try586: /* Use the `cpuid' instruction. |
|
| ret |
ret |
| |
|
| begin: |
begin: |
| /* Now running relocated at KERNBASE. Remove double mapping. */ |
/* |
| movl _C_LABEL(nkpde),%ecx # for this many pde s, |
* We have arrived. |
| leal (PROC0PDIR+0*4)(%esi),%ebx # which is where temp maps! |
* There's no need anymore for the identity mapping in low |
| addl $(KERNBASE), %ebx # now use relocated address |
* memory, remove it. |
| |
*/ |
| |
movl _C_LABEL(nkptp)+1*4,%ecx |
| |
leal (PROC0_PDIR_OFF)(%esi),%ebx # old, phys address of PDIR |
| |
addl $(KERNBASE), %ebx # new, virtual address of PDIR |
| 1: movl $0,(%ebx) |
1: movl $0,(%ebx) |
| addl $4,%ebx # next pde |
addl $4,%ebx |
| loop 1b |
loop 1b |
| |
|
| /* Relocate atdevbase. */ |
/* Relocate atdevbase. */ |
| movl _C_LABEL(nkpde),%edx |
movl $KERNBASE,%edx |
| shll $PGSHIFT,%edx |
addl _C_LABEL(tablesize),%edx |
| addl $(TABLESIZE+KERNBASE),%edx |
|
| addl %esi,%edx |
addl %esi,%edx |
| movl %edx,_C_LABEL(atdevbase) |
movl %edx,_C_LABEL(atdevbase) |
| |
|
| /* Set up bootstrap stack. */ |
/* Set up bootstrap stack. */ |
| leal (PROC0STACK+KERNBASE)(%esi),%eax |
leal (PROC0_STK_OFF+KERNBASE)(%esi),%eax |
| movl %eax,_C_LABEL(proc0uarea) |
movl %eax,_C_LABEL(proc0uarea) |
| leal (KSTACK_SIZE-FRAMESIZE)(%eax),%esp |
leal (KSTACK_SIZE-FRAMESIZE)(%eax),%esp |
| movl %esi,(KSTACK_SIZE+PCB_CR3)(%eax) # pcb->pcb_cr3 |
movl %esi,(KSTACK_SIZE+PCB_CR3)(%eax) # pcb->pcb_cr3 |
|
|
| call _C_LABEL(initgdt) |
call _C_LABEL(initgdt) |
| addl $4,%esp |
addl $4,%esp |
| |
|
| movl _C_LABEL(nkpde),%eax |
movl _C_LABEL(tablesize),%eax |
| shll $PGSHIFT,%eax |
|
| addl $TABLESIZE,%eax |
|
| addl %esi,%eax # skip past stack and page tables |
addl %esi,%eax # skip past stack and page tables |
| |
|
| pushl %eax |
pushl %eax |
| Line 604 NENTRY(lwp_trampoline) |
|
| Line 663 NENTRY(lwp_trampoline) |
|
| pushl %ebx |
pushl %ebx |
| call *%esi |
call *%esi |
| addl $4,%esp |
addl $4,%esp |
| DO_DEFERRED_SWITCH(%eax) |
DO_DEFERRED_SWITCH |
| INTRFASTEXIT |
INTRFASTEXIT |
| /* NOTREACHED */ |
/* NOTREACHED */ |
| |
|
|
|
| call _C_LABEL(trap) |
call _C_LABEL(trap) |
| addl $4,%esp |
addl $4,%esp |
| jmp .Lsyscall_checkast /* re-check ASTs */ |
jmp .Lsyscall_checkast /* re-check ASTs */ |
| 1: CHECK_DEFERRED_SWITCH(%eax) |
1: CHECK_DEFERRED_SWITCH |
| jnz 9f |
jnz 9f |
| #ifndef DIAGNOSTIC |
#ifndef DIAGNOSTIC |
| INTRFASTEXIT |
INTRFASTEXIT |
|
|
| int $3 |
int $3 |
| #endif /* DDB */ |
#endif /* DDB */ |
| movl $IPL_NONE,CPUVAR(ILEVEL) |
movl $IPL_NONE,CPUVAR(ILEVEL) |
| jmp 2b |
jmp .Lsyscall_checkast |
| 4: .asciz "WARNING: SPL NOT LOWERED ON SYSCALL EXIT\n" |
4: .asciz "WARNING: SPL NOT LOWERED ON SYSCALL EXIT\n" |
| 5: .asciz "WARNING: SPL NOT ZERO ON SYSCALL ENTRY\n" |
5: .asciz "WARNING: SPL NOT ZERO ON SYSCALL ENTRY\n" |
| 6: .asciz "WARNING: WANT PMAPLOAD ON SYSCALL ENTRY\n" |
6: .asciz "WARNING: WANT PMAPLOAD ON SYSCALL ENTRY\n" |