Home | History | Annotate | Line # | Download | only in common
bootxx.c revision 1.24
      1 /*	$NetBSD: bootxx.c,v 1.24 2001/07/07 14:21:01 simonb Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jonathan Stone, Michael Hitch and Simon Burge.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 /*
     40  * Copyright (c) 1992, 1993
     41  *	The Regents of the University of California.  All rights reserved.
     42  *
     43  * This code is derived from software contributed to Berkeley by
     44  * Ralph Campbell.
     45  *
     46  * Redistribution and use in source and binary forms, with or without
     47  * modification, are permitted provided that the following conditions
     48  * are met:
     49  * 1. Redistributions of source code must retain the above copyright
     50  *    notice, this list of conditions and the following disclaimer.
     51  * 2. Redistributions in binary form must reproduce the above copyright
     52  *    notice, this list of conditions and the following disclaimer in the
     53  *    documentation and/or other materials provided with the distribution.
     54  * 3. All advertising materials mentioning features or use of this software
     55  *    must display the following acknowledgement:
     56  *	This product includes software developed by the University of
     57  *	California, Berkeley and its contributors.
     58  * 4. Neither the name of the University nor the names of its contributors
     59  *    may be used to endorse or promote products derived from this software
     60  *    without specific prior written permission.
     61  *
     62  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     63  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     64  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     65  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     66  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     67  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     68  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     69  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     70  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     71  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     72  * SUCH DAMAGE.
     73  *
     74  *	@(#)boot.c	8.1 (Berkeley) 6/10/93
     75  */
     76 
     77 #include <sys/param.h>
     78 #include <sys/exec_elf.h>
     79 #include <lib/libsa/stand.h>
     80 #include <machine/dec_prom.h>
     81 
     82 typedef void (*entrypt) __P((int, char **, int, const void *));
     83 
     84 int main __P((int, char **));
     85 entrypt loadfile __P((char *path, char *name));
     86 
     87 extern int clear_cache __P((char *addr, int len));
     88 
     89 /*
     90  * This gets arguments from the PROM, calls other routines to open
     91  * and load the secondary boot loader called boot, and then transfers
     92  * execution to that program.
     93  *
     94  * Argv[0] should be something like "rz(0,0,0)netbsd" on a DECstation 3100.
     95  * Argv[0,1] should be something like "boot 5/rz0/netbsd" on a DECstation 5000.
     96  * The argument "-a" means netbsd should do an automatic reboot.
     97  */
     98 int
     99 main(argc, argv)
    100 	int argc;
    101 	char **argv;
    102 {
    103 	char *cp;
    104 	entrypt entry;
    105 
    106 	/* check for DS5000 boot */
    107 	if (strcmp(argv[0], "boot") == 0) {
    108 		argc--;
    109 		argv++;
    110 	}
    111 	cp = *argv;
    112 
    113         printf("\nNetBSD/pmax " NETBSD_VERS " " BOOTXX_FS_NAME " Primary Bootstrap\n");
    114 
    115 	entry = loadfile(cp, "/boot.pmax");
    116 	if ((int)entry != -1)
    117 		goto goodload;
    118 
    119 	/* Give old /boot a go... */
    120 	entry = loadfile(cp, "/boot");
    121 	if ((int)entry != -1)
    122 		goto goodload;
    123 
    124 	/* Booting off an 8.3 filesystem? */
    125 	entry = loadfile(cp, "/boot.pma");
    126 	if ((int)entry != -1)
    127 		goto goodload;
    128 
    129 	goto bad;
    130 goodload:
    131 
    132 	clear_cache((char *)PRIMARY_LOAD_ADDRESS, 1024 * 1024);
    133 	if (callv == &callvec)
    134 		entry(argc, argv, 0, 0);
    135 	else
    136 		entry(argc, argv, DEC_PROM_MAGIC, callv);
    137 bad:
    138 	/* XXX would calling prom_halt here be cleaner? */
    139 	return (1);
    140 }
    141 
    142 /*
    143  * Open 'filename', read in program and return the entry point or -1 if error.
    144  */
    145 entrypt
    146 loadfile(path, name)
    147 	char *path, *name;
    148 {
    149 	int fd, i;
    150 	char c, *buf, bootfname[64];
    151 	Elf32_Ehdr ehdr;
    152 	Elf32_Phdr phdr;
    153 
    154 	strcpy(bootfname, path);
    155 	buf = bootfname;
    156 	while ((c = *buf++) != '\0') {
    157 		if (c == ')')
    158 			break;
    159 		if (c != '/')
    160 			continue;
    161 		while ((c = *buf++) != '\0')
    162 			if (c == '/')
    163 				break;
    164 		/*
    165 		 * Make "N/rzY" with no trailing '/' valid by adding
    166 		 * the extra '/' before appending 'bootpmax' to the path.
    167 		 */
    168 		if (c != '/') {
    169 			buf--;
    170 			*buf++ = '/';
    171 			*buf = '\0';
    172 		}
    173 		break;
    174 	}
    175 	strcpy(buf, name);
    176 	if ((fd = open(bootfname, 0)) < 0) {
    177 		printf("open %s: %d\n", bootfname, errno);
    178 		goto err;
    179 	}
    180 
    181 	/* read the exec header */
    182 	i = read(fd, (char *)&ehdr, sizeof(ehdr));
    183 	if ((i != sizeof(ehdr)) ||
    184 	    (memcmp(ehdr.e_ident, ELFMAG, SELFMAG) != 0) ||
    185 	    (ehdr.e_ident[EI_CLASS] != ELFCLASS32)) {
    186 		printf("%s: No ELF header\n", bootfname);
    187 		goto cerr;
    188 	}
    189 
    190 	for (i = 0; i < ehdr.e_phnum; i++) {
    191 		if (lseek(fd, (off_t) ehdr.e_phoff + i * sizeof(phdr), 0) < 0)
    192 			goto cerr;
    193 		if (read(fd, &phdr, sizeof(phdr)) != sizeof(phdr))
    194 			goto cerr;
    195 		if (phdr.p_type != PT_LOAD)
    196 			continue;
    197 		if (lseek(fd, (off_t)phdr.p_offset, 0) < 0)
    198 			goto cerr;
    199 		if (read(fd, (char *)phdr.p_paddr, phdr.p_filesz) != phdr.p_filesz)
    200 			goto cerr;
    201 	}
    202 	return ((entrypt)ehdr.e_entry);
    203 
    204 cerr:
    205 #ifndef LIBSA_NO_FS_CLOSE
    206 	(void) close(fd);
    207 #endif
    208 err:
    209 	printf("Can't load '%s'\n", bootfname);
    210 	return ((entrypt)-1);
    211 }
    212