/*-
* Copyright (c) 1982, 1986, 1990, 1993
* The Regents of the University of California. All rights reserved.
*
* 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. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 THE REGENTS OR CONTRIBUTORS 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.
*
* @(#)boot.c 8.1 (Berkeley) 6/10/93
*/
/*
* Boot device is derived from ROM provided information, or if there is none,
* this list is used in sequence, to find a kernel.
*/
char *kernels[] = {
"netbsd",
"netbsd.gz",
"netbsd.old",
"netbsd.old.gz",
"onetbsd",
"onetbsd.gz",
"vmunix",
#ifdef notyet
"netbsd.pl",
"netbsd.pl.gz",
"netbsd.el",
"netbsd.el.gz",
#endif
NULL
};
int
bootoptions(const char *ap)
{
int v = 0;
if (ap == NULL || *ap++ != '-')
return (0);
static paddr_t
getphysmem(u_long size)
{
struct memarr *pmemarr; /* physical memory regions */
int npmemarr; /* number of entries in pmemarr */
struct memarr *mp;
int i;
extern char start[]; /* top of stack (see srt0.S) */
/*
* Find the physical memory area that's in use by the boot loader.
* Our stack grows down from label `start'; assume we need no more
* than 16K of stack space.
* The top of the boot loader is the next 4MB boundary.
*/
if (pmap_extract((vaddr_t)start - (16*1024), &bstart) != 0)
return ((paddr_t)-1);
bend = roundup(bstart, 0x400000);
/*
* Get available physical memory from the prom.
*/
npmemarr = prom_makememarr(NULL, 0, MEMARR_AVAILPHYS);
pmemarr = alloc(npmemarr*sizeof(struct memarr));
if (pmemarr == NULL)
return ((paddr_t)-1);
npmemarr = prom_makememarr(pmemarr, npmemarr, MEMARR_AVAILPHYS);
/*
* Find a suitable loading address.
*/
for (mp = pmemarr, i = npmemarr; --i >= 0; mp++) {
paddr_t pa = (paddr_t)pmemarr[i].addr;
u_long len = (u_long)pmemarr[i].len;
/* Check whether it will fit in front of us */
if (pa < bstart && len >= size && (bstart - pa) >= size)
return (pa);
/* Skip the boot program memory */
if (pa < bend) {
if (len < bend - pa)
/* Not large enough */
continue;
/* Shrink this segment */
len -= bend - pa;
pa = bend;
}
/* Does it fit in the remainder of this segment? */
if (len >= size)
return (pa);
}
return ((paddr_t)-1);
}
static int
loadk(char *kernel, u_long *marks)
{
int fd, error;
vaddr_t va;
paddr_t pa;
u_long size;
int flags = LOAD_KERNEL;
/* We want that leading 16K in front of the kernel image */
size += PROM_LOADADDR;
va = marks[MARK_START] - PROM_LOADADDR;
/*
* Extra space for bootinfo and kernel bootstrap.
* In compat mode, we get to re-use the space occupied by the
* boot program. Traditionally, we've silently assumed that
* is enough for the kernel to work with.
*/
size += BOOTINFO_SIZE;
if (!compatmode)
size += 512 * 1024;
/* Get a physical load address */
pa = getphysmem(size);
if (pa == (paddr_t)-1) {
error = EFBIG;
goto out;
}
if (boothowto & AB_VERBOSE)
printf("Loading at physical address %lx\n", pa);
if (pmap_map(va, pa, size) != 0) {
error = EFAULT;
goto out;
}
/* XXX - to do: inspect kernel image and set compat mode */
if (compatmode) {
/* Double-map at VA 0 for compatibility */
if (pa + size >= bstart) {
printf("%s: too large for compat mode\n", kernel);
error = EFBIG;
goto out;
}
/*
* get default kernel.
*/
k = prom_getbootfile();
if (k != NULL && *k != '\0') {
i = -1; /* not using the kernels */
strcpy(kernel, k);
} else {
i = 0;
strcpy(kernel, kernels[i]);
}
k = prom_getbootpath();
if (k && *k)
strcpy(prom_bootdevice, k);
boothowto = bootoptions(prom_getbootargs());
for (;;) {
/*
* ask for a kernel first ..
*/
if (boothowto & RB_ASKNAME) {
printf("device[%s] (\"halt\" to halt): ",
prom_bootdevice);
kgets(dbuf, sizeof(dbuf));
if (strcmp(dbuf, "halt") == 0)
_rtt();
if (dbuf[0])
strcpy(prom_bootdevice, dbuf);
printf("boot (press RETURN to try default list): ");
kgets(fbuf, sizeof(fbuf));
if (fbuf[0])
strcpy(kernel, fbuf);
else {
boothowto &= ~RB_ASKNAME;
i = 0;
strcpy(kernel, kernels[i]);
}
}
/*
* if we have are not in askname mode, and we aren't using the
* prom bootfile, try the next one (if it exits). otherwise,
* go into askname mode.
*/
if ((boothowto & RB_ASKNAME) == 0 &&
i != -1 && kernels[++i]) {
strcpy(kernel, kernels[i]);
printf(": trying %s...\n", kernel);
} else {
printf("\n");
boothowto |= RB_ASKNAME;
}
}
