2 * Copyright (c) 1990 The Regents of the University of California.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 * may be used to endorse or promote products derived from this software
18 * without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 * from: @(#)locore.s 7.3 (Berkeley) 5/13/91
35 * originally from: locore.s, by William F. Jolitz
37 * Substantially rewritten by David Greenman, Rod Grimes,
38 * Bruce Evans, Wolfgang Solfrank, Poul-Henning Kamp
42 #include "opt_bootp.h"
43 #include "opt_nfsroot.h"
46 #include <sys/reboot.h>
48 #include <machine/asmacros.h>
49 #include <machine/cputypes.h>
50 #include <machine/psl.h>
51 #include <machine/pmap.h>
52 #include <machine/specialreg.h>
57 * PTmap is recursive pagemap at top of virtual address space.
58 * Within PTmap, the page directory can be found (third indirection).
60 .globl PTmap,PTD,PTDpde
61 .set PTmap,(PTDPTDI << PDRSHIFT)
62 .set PTD,PTmap + (PTDPTDI * PAGE_SIZE)
63 .set PTDpde,PTD + (PTDPTDI * PDESIZE)
66 * Compiled KERNBASE location and the kernel load address, now identical.
69 .set kernbase,KERNBASE
71 .set kernload,KERNLOAD
77 ALIGN_DATA /* just to be sure */
79 .space 0x2000 /* space for tmpstk - temporary stack */
83 bootinfo: .space BOOTINFO_SIZE /* bootinfo that we can handle */
86 /**********************************************************************
88 * This is where the bootblocks start us, set the ball rolling...
91 NON_GPROF_ENTRY(btext)
93 /* Tell the bios to warmboot next time */
96 /* Set up a real frame in case the double return in newboot is executed. */
101 /* Don't trust what the BIOS gives for eflags. */
106 * Don't trust what the BIOS gives for %fs and %gs. Trust the bootstrap
107 * to set %cs, %ds, %es and %ss.
114 * Clear the bss. Not all boot programs do it, and it is our job anyway.
116 * XXX we don't check that there is memory for our bss and page tables
119 * Note: we must be careful to not overwrite an active gdt or idt. They
120 * inactive from now until we switch to new ones, since we don't load any
121 * more segment registers or permit interrupts until after the switch.
131 call recover_bootinfo
133 /* Get onto a stack that we can trust. */
135 * XXX this step is delayed in case recover_bootinfo needs to return via
136 * the old stack, but it need not be, since recover_bootinfo actually
137 * returns via the old frame.
144 /* set up bootstrap stack */
145 movl proc0kstack,%eax /* location of in-kernel stack */
148 * Only use bottom page for init386(). init386() calculates the
149 * PCB + FPU save area size and returns the true top of stack.
151 leal PAGE_SIZE(%eax),%esp
153 xorl %ebp,%ebp /* mark end of frames */
155 pushl physfree /* value of first for init386(first) */
156 call init386 /* wire 386 chip for unix operation */
159 * Clean up the stack in a way that db_numargs() understands, so
160 * that backtraces in ddb don't underrun the stack. Traps for
161 * inaccessible memory are more fatal than usual this early.
165 /* Switch to true top of stack. */
168 call mi_startup /* autoconfiguration, mountroot etc */
170 addl $0,%esp /* for db_numargs() again */
172 /**********************************************************************
174 * Recover the bootinfo passed to us from the boot program
179 * This code is called in different ways depending on what loaded
180 * and started the kernel. This is used to detect how we get the
181 * arguments from the other code and what we do with them.
183 * Old disk boot blocks:
184 * (*btext)(howto, bootdev, cyloffset, esym);
185 * [return address == 0, and can NOT be returned to]
186 * [cyloffset was not supported by the FreeBSD boot code
187 * and always passed in as 0]
188 * [esym is also known as total in the boot code, and
189 * was never properly supported by the FreeBSD boot code]
191 * Old diskless netboot code:
192 * (*btext)(0,0,0,0,&nfsdiskless,0,0,0);
193 * [return address != 0, and can NOT be returned to]
194 * If we are being booted by this code it will NOT work,
195 * so we are just going to halt if we find this case.
197 * New uniform boot code:
198 * (*btext)(howto, bootdev, 0, 0, 0, &bootinfo)
199 * [return address != 0, and can be returned to]
201 * There may seem to be a lot of wasted arguments in here, but
202 * that is so the newer boot code can still load very old kernels
203 * and old boot code can load new kernels.
207 * The old style disk boot blocks fake a frame on the stack and
208 * did an lret to get here. The frame on the stack has a return
215 * We have some form of return address, so this is either the
216 * old diskless netboot code, or the new uniform code. That can
217 * be detected by looking at the 5th argument, if it is 0
218 * we are being booted by the new uniform boot code.
224 * Seems we have been loaded by the old diskless boot code, we
225 * don't stand a chance of running as the diskless structure
226 * changed considerably between the two, so just halt.
231 * We have been loaded by the new uniform boot code.
232 * Let's check the bootinfo version, and if we do not understand
233 * it we return to the loader with a status of 1 to indicate this error
236 movl 28(%ebp),%ebx /* &bootinfo.version */
237 movl BI_VERSION(%ebx),%eax
238 cmpl $1,%eax /* We only understand version 1 */
240 movl $1,%eax /* Return status */
243 * XXX this returns to our caller's caller (as is required) since
244 * we didn't set up a frame and our caller did.
250 * If we have a kernelname copy it in
252 movl BI_KERNELNAME(%ebx),%esi
254 je 2f /* No kernelname */
255 movl $MAXPATHLEN,%ecx /* Brute force!!! */
256 movl $kernelname,%edi
257 cmpb $'/',(%esi) /* Make sure it starts with a slash */
269 * Determine the size of the boot loader's copy of the bootinfo
270 * struct. This is impossible to do properly because old versions
271 * of the struct don't contain a size field and there are 2 old
272 * versions with the same version number.
274 movl $BI_ENDCOMMON,%ecx /* prepare for sizeless version */
275 testl $RB_BOOTINFO,8(%ebp) /* bi_size (and bootinfo) valid? */
276 je got_bi_size /* no, sizeless version */
277 movl BI_SIZE(%ebx),%ecx
281 * Copy the common part of the bootinfo struct
285 cmpl $BOOTINFO_SIZE,%ecx
286 jbe got_common_bi_size
287 movl $BOOTINFO_SIZE,%ecx
296 * If we have a nfs_diskless structure copy it in
298 movl BI_NFS_DISKLESS(%ebx),%esi
301 movl $nfs_diskless,%edi
302 movl $NFSDISKLESS_SIZE,%ecx
306 movl $nfs_diskless_valid,%edi
312 * The old style disk boot.
313 * (*btext)(howto, bootdev, cyloffset, esym);
314 * Note that the newer boot code just falls into here to pick
315 * up howto and bootdev, cyloffset and esym are no longer used
326 /**********************************************************************
328 * Identify the CPU and initialize anything special about it
335 /* Try to toggle alignment check flag; does not exist on 386. */
352 /* NexGen CPU does not have aligment check flag. */
367 movl $0x4778654e,cpu_vendor # store vendor string
368 movl $0x72446e65,cpu_vendor+4
369 movl $0x6e657669,cpu_vendor+8
370 movl $0,cpu_vendor+12
373 try486: /* Try to toggle identification flag; does not exist on early 486s. */
393 * Cyrix CPUs do not change the undefined flags following
394 * execution of the divide instruction which divides 5 by 2.
396 * Note: CPUID is enabled on M2, so it passes another way.
406 jmp 3f /* You may use Intel CPU. */
411 * IBM Bluelighting CPU also doesn't change the undefined flags.
412 * Because IBM doesn't disclose the information for Bluelighting
413 * CPU, we couldn't distinguish it from Cyrix's (including IBM
414 * brand of Cyrix CPUs).
416 movl $0x69727943,cpu_vendor # store vendor string
417 movl $0x736e4978,cpu_vendor+4
418 movl $0x64616574,cpu_vendor+8
421 trycpuid: /* Use the `cpuid' instruction. */
424 movl %eax,cpu_high # highest capability
425 movl %ebx,cpu_vendor # store vendor string
426 movl %edx,cpu_vendor+4
427 movl %ecx,cpu_vendor+8
428 movb $0,cpu_vendor+12
432 movl %eax,cpu_id # store cpu_id
433 movl %ebx,cpu_procinfo # store cpu_procinfo
434 movl %edx,cpu_feature # store cpu_feature
435 movl %ecx,cpu_feature2 # store cpu_feature2
436 rorl $8,%eax # extract family type
441 /* less than Pentium; must be 486 */
451 /* Greater than Pentium...call it a Pentium Pro */
459 /* Xen Hypercall page */
461 .p2align PAGE_SHIFT, 0x90 /* Hypercall_page needs to be PAGE aligned */
463 NON_GPROF_ENTRY(hypercall_page)
464 .skip 0x1000, 0x90 /* Fill with "nop"s */