Home | History | Annotate | Line # | Download | only in boot
init_main.c revision 1.5.6.3
      1  1.5.6.2  tls /*	$NetBSD: init_main.c,v 1.5.6.3 2013/06/23 06:20:07 tls Exp $	*/
      2  1.5.6.2  tls 
      3  1.5.6.2  tls /*
      4  1.5.6.2  tls  * Copyright (c) 1992 OMRON Corporation.
      5  1.5.6.2  tls  *
      6  1.5.6.2  tls  * This code is derived from software contributed to Berkeley by
      7  1.5.6.2  tls  * OMRON Corporation.
      8  1.5.6.2  tls  *
      9  1.5.6.2  tls  * Redistribution and use in source and binary forms, with or without
     10  1.5.6.2  tls  * modification, are permitted provided that the following conditions
     11  1.5.6.2  tls  * are met:
     12  1.5.6.2  tls  * 1. Redistributions of source code must retain the above copyright
     13  1.5.6.2  tls  *    notice, this list of conditions and the following disclaimer.
     14  1.5.6.2  tls  * 2. Redistributions in binary form must reproduce the above copyright
     15  1.5.6.2  tls  *    notice, this list of conditions and the following disclaimer in the
     16  1.5.6.2  tls  *    documentation and/or other materials provided with the distribution.
     17  1.5.6.2  tls  * 3. All advertising materials mentioning features or use of this software
     18  1.5.6.2  tls  *    must display the following acknowledgement:
     19  1.5.6.2  tls  *	This product includes software developed by the University of
     20  1.5.6.2  tls  *	California, Berkeley and its contributors.
     21  1.5.6.2  tls  * 4. Neither the name of the University nor the names of its contributors
     22  1.5.6.2  tls  *    may be used to endorse or promote products derived from this software
     23  1.5.6.2  tls  *    without specific prior written permission.
     24  1.5.6.2  tls  *
     25  1.5.6.2  tls  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     26  1.5.6.2  tls  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     27  1.5.6.2  tls  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     28  1.5.6.2  tls  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     29  1.5.6.2  tls  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     30  1.5.6.2  tls  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     31  1.5.6.2  tls  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     32  1.5.6.2  tls  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     33  1.5.6.2  tls  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     34  1.5.6.2  tls  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     35  1.5.6.2  tls  * SUCH DAMAGE.
     36  1.5.6.2  tls  *
     37  1.5.6.2  tls  *	@(#)init_main.c	8.2 (Berkeley) 8/15/93
     38  1.5.6.2  tls  */
     39  1.5.6.2  tls /*
     40  1.5.6.2  tls  * Copyright (c) 1992, 1993
     41  1.5.6.2  tls  *	The Regents of the University of California.  All rights reserved.
     42  1.5.6.2  tls  *
     43  1.5.6.2  tls  * This code is derived from software contributed to Berkeley by
     44  1.5.6.2  tls  * OMRON Corporation.
     45  1.5.6.2  tls  *
     46  1.5.6.2  tls  * Redistribution and use in source and binary forms, with or without
     47  1.5.6.2  tls  * modification, are permitted provided that the following conditions
     48  1.5.6.2  tls  * are met:
     49  1.5.6.2  tls  * 1. Redistributions of source code must retain the above copyright
     50  1.5.6.2  tls  *    notice, this list of conditions and the following disclaimer.
     51  1.5.6.2  tls  * 2. Redistributions in binary form must reproduce the above copyright
     52  1.5.6.2  tls  *    notice, this list of conditions and the following disclaimer in the
     53  1.5.6.2  tls  *    documentation and/or other materials provided with the distribution.
     54  1.5.6.2  tls  * 3. Neither the name of the University nor the names of its contributors
     55  1.5.6.2  tls  *    may be used to endorse or promote products derived from this software
     56  1.5.6.2  tls  *    without specific prior written permission.
     57  1.5.6.2  tls  *
     58  1.5.6.2  tls  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     59  1.5.6.2  tls  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     60  1.5.6.2  tls  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     61  1.5.6.2  tls  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     62  1.5.6.2  tls  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     63  1.5.6.2  tls  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     64  1.5.6.2  tls  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     65  1.5.6.2  tls  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     66  1.5.6.2  tls  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     67  1.5.6.2  tls  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     68  1.5.6.2  tls  * SUCH DAMAGE.
     69  1.5.6.2  tls  *
     70  1.5.6.2  tls  *	@(#)init_main.c	8.2 (Berkeley) 8/15/93
     71  1.5.6.2  tls  */
     72  1.5.6.2  tls 
     73  1.5.6.2  tls #include <sys/param.h>
     74  1.5.6.3  tls #include <sys/boot_flag.h>
     75  1.5.6.2  tls #include <machine/cpu.h>
     76  1.5.6.2  tls #include <luna68k/stand/boot/samachdep.h>
     77  1.5.6.2  tls #include <luna68k/stand/boot/stinger.h>
     78  1.5.6.2  tls #include <luna68k/stand/boot/romvec.h>
     79  1.5.6.2  tls #include <luna68k/stand/boot/status.h>
     80  1.5.6.2  tls #include <lib/libsa/loadfile.h>
     81  1.5.6.2  tls #ifdef SUPPORT_ETHERNET
     82  1.5.6.2  tls #include <lib/libsa/dev_net.h>
     83  1.5.6.2  tls #endif
     84  1.5.6.2  tls 
     85  1.5.6.2  tls static int get_plane_numbers(void);
     86  1.5.6.2  tls static int reorder_dipsw(int);
     87  1.5.6.2  tls 
     88  1.5.6.2  tls int cpuspeed;	/* for DELAY() macro */
     89  1.5.6.2  tls int hz = 60;
     90  1.5.6.2  tls int machtype;
     91  1.5.6.3  tls char default_file[64];
     92  1.5.6.2  tls 
     93  1.5.6.2  tls #define	VERS_LOCAL	"Phase-31"
     94  1.5.6.2  tls 
     95  1.5.6.2  tls int nplane;
     96  1.5.6.2  tls 
     97  1.5.6.2  tls /* KIFF */
     98  1.5.6.2  tls 
     99  1.5.6.2  tls struct KernInter  KIFF;
    100  1.5.6.2  tls struct KernInter *kiff = &KIFF;
    101  1.5.6.2  tls 
    102  1.5.6.2  tls /* for command parser */
    103  1.5.6.2  tls 
    104  1.5.6.2  tls #define BUFFSIZE 100
    105  1.5.6.2  tls #define MAXARGS  30
    106  1.5.6.2  tls 
    107  1.5.6.2  tls char buffer[BUFFSIZE];
    108  1.5.6.2  tls 
    109  1.5.6.2  tls int   argc;
    110  1.5.6.2  tls char *argv[MAXARGS];
    111  1.5.6.2  tls 
    112  1.5.6.2  tls #define BOOT_TIMEOUT 10
    113  1.5.6.2  tls int boot_timeout = BOOT_TIMEOUT;
    114  1.5.6.2  tls 
    115  1.5.6.2  tls char  prompt[16] = "boot> ";
    116  1.5.6.2  tls 
    117  1.5.6.2  tls void
    118  1.5.6.2  tls main(void)
    119  1.5.6.2  tls {
    120  1.5.6.2  tls 	int i, status = 0;
    121  1.5.6.2  tls 	const char *machstr;
    122  1.5.6.3  tls 	const char *cp;
    123  1.5.6.3  tls 	char bootarg[64];
    124  1.5.6.3  tls 	bool netboot = false;
    125  1.5.6.3  tls 	int unit, part;
    126  1.5.6.2  tls 
    127  1.5.6.2  tls 	/*
    128  1.5.6.2  tls 	 * Initialize the console before we print anything out.
    129  1.5.6.2  tls 	 */
    130  1.5.6.2  tls 	if (cputype == CPU_68030) {
    131  1.5.6.2  tls 		machtype = LUNA_I;
    132  1.5.6.2  tls 		machstr  = "LUNA-I";
    133  1.5.6.2  tls 		cpuspeed = MHZ_25;
    134  1.5.6.2  tls 		hz = 60;
    135  1.5.6.3  tls 		memcpy(bootarg, (char *)*RVPtr->vec53, sizeof(bootarg));
    136  1.5.6.3  tls 
    137  1.5.6.3  tls 		/* check netboot */
    138  1.5.6.3  tls 		for (i = 0, cp = bootarg; i < sizeof(bootarg); i++, cp++) {
    139  1.5.6.3  tls 			if (*cp == '\0')
    140  1.5.6.3  tls 				break;
    141  1.5.6.3  tls 			if (*cp == 'E' && memcmp("ENADDR=", cp, 7) == 0) {
    142  1.5.6.3  tls 				netboot = true;
    143  1.5.6.3  tls 				break;
    144  1.5.6.3  tls 			}
    145  1.5.6.3  tls 		}
    146  1.5.6.2  tls 	} else {
    147  1.5.6.2  tls 		machtype = LUNA_II;
    148  1.5.6.2  tls 		machstr  = "LUNA-II";
    149  1.5.6.2  tls 		cpuspeed = MHZ_25 * 2;	/* XXX */
    150  1.5.6.2  tls 		hz = 100;
    151  1.5.6.3  tls 		memcpy(bootarg, (char *)*RVPtr->vec02, sizeof(bootarg));
    152  1.5.6.3  tls 
    153  1.5.6.3  tls 		/* LUNA-II's boot monitor doesn't support netboot */
    154  1.5.6.2  tls 	}
    155  1.5.6.2  tls 
    156  1.5.6.2  tls 	nplane   = get_plane_numbers();
    157  1.5.6.2  tls 
    158  1.5.6.2  tls 	cninit();
    159  1.5.6.2  tls 
    160  1.5.6.2  tls 	printf("\n");
    161  1.5.6.2  tls 	printf(">> %s, Revision %s\n", bootprog_name, bootprog_rev);
    162  1.5.6.2  tls 	printf(">> (based on Stinger ver 0.0 [%s])\n", VERS_LOCAL);
    163  1.5.6.2  tls 	printf("\n");
    164  1.5.6.2  tls 
    165  1.5.6.2  tls 	kiff->maxaddr = (void *) (ROM_memsize -1);
    166  1.5.6.2  tls 	kiff->dipsw   = ~((dipsw2 << 8) | dipsw1) & 0xFFFF;
    167  1.5.6.2  tls 	kiff->plane   = nplane;
    168  1.5.6.2  tls 
    169  1.5.6.2  tls 	i = (int) kiff->maxaddr + 1;
    170  1.5.6.2  tls 	printf("Machine model   = %s\n", machstr);
    171  1.5.6.2  tls 	printf("Physical Memory = 0x%x  ", i);
    172  1.5.6.2  tls 	i >>= 20;
    173  1.5.6.2  tls 	printf("(%d MB)\n", i);
    174  1.5.6.2  tls 	printf("\n");
    175  1.5.6.2  tls 
    176  1.5.6.2  tls 	/*
    177  1.5.6.2  tls 	 * IO configuration
    178  1.5.6.2  tls 	 */
    179  1.5.6.2  tls 
    180  1.5.6.2  tls #ifdef SUPPORT_ETHERNET
    181  1.5.6.2  tls 	try_bootp = 1;
    182  1.5.6.2  tls #endif
    183  1.5.6.2  tls 
    184  1.5.6.2  tls 	find_devs();
    185  1.5.6.2  tls 	configure();
    186  1.5.6.2  tls 	printf("\n");
    187  1.5.6.2  tls 
    188  1.5.6.3  tls 	unit = 0;	/* XXX should parse monitor's Boot-file constant */
    189  1.5.6.3  tls 	part = 0;
    190  1.5.6.3  tls 	snprintf(default_file, sizeof(default_file),
    191  1.5.6.3  tls 	    "%s(%d,%d)%s", netboot ? "le" : "sd", unit, part, "netbsd");
    192  1.5.6.3  tls 
    193  1.5.6.2  tls 	howto = reorder_dipsw(dipsw2);
    194  1.5.6.2  tls 
    195  1.5.6.2  tls 	if ((howto & 0xFE) == 0) {
    196  1.5.6.2  tls 		char c;
    197  1.5.6.2  tls 
    198  1.5.6.2  tls 		printf("Press return to boot now,"
    199  1.5.6.2  tls 		    " any other key for boot menu\n");
    200  1.5.6.2  tls 		printf("booting %s - starting in ", default_file);
    201  1.5.6.2  tls 		c = awaitkey("%d seconds. ", boot_timeout, true);
    202  1.5.6.2  tls 		if (c == '\r' || c == '\n' || c == 0) {
    203  1.5.6.2  tls 			printf("auto-boot %s\n", default_file);
    204  1.5.6.2  tls 			bootnetbsd(default_file);
    205  1.5.6.2  tls 		}
    206  1.5.6.2  tls 	}
    207  1.5.6.2  tls 
    208  1.5.6.2  tls 	/*
    209  1.5.6.2  tls 	 * Main Loop
    210  1.5.6.2  tls 	 */
    211  1.5.6.2  tls 
    212  1.5.6.2  tls 	printf("type \"help\" for help.\n");
    213  1.5.6.2  tls 
    214  1.5.6.2  tls 	do {
    215  1.5.6.2  tls 		memset(buffer, 0, BUFFSIZE);
    216  1.5.6.2  tls 		if (getline(prompt, buffer) > 0) {
    217  1.5.6.2  tls 			argc = getargs(buffer, argv, sizeof(argv)/sizeof(char *));
    218  1.5.6.2  tls 
    219  1.5.6.2  tls 			status = parse(argc, argv);
    220  1.5.6.2  tls 			if (status == ST_NOTFOUND)
    221  1.5.6.2  tls 				printf("Command \"%s\" is not found !!\n", argv[0]);
    222  1.5.6.2  tls 		}
    223  1.5.6.2  tls 	} while(status != ST_EXIT);
    224  1.5.6.2  tls 
    225  1.5.6.2  tls 	exit(0);
    226  1.5.6.2  tls }
    227  1.5.6.2  tls 
    228  1.5.6.2  tls int
    229  1.5.6.2  tls get_plane_numbers(void)
    230  1.5.6.2  tls {
    231  1.5.6.2  tls 	int r = ROM_plane;
    232  1.5.6.2  tls 	int n = 0;
    233  1.5.6.2  tls 
    234  1.5.6.2  tls 	for (; r ; r >>= 1)
    235  1.5.6.2  tls 		if (r & 0x1)
    236  1.5.6.2  tls 			n++;
    237  1.5.6.2  tls 
    238  1.5.6.2  tls 	return(n);
    239  1.5.6.2  tls }
    240  1.5.6.2  tls 
    241  1.5.6.2  tls int
    242  1.5.6.2  tls reorder_dipsw(int dipsw)
    243  1.5.6.2  tls {
    244  1.5.6.2  tls 	int i, sw = 0;
    245  1.5.6.2  tls 
    246  1.5.6.2  tls 	for (i = 0; i < 8; i++) {
    247  1.5.6.2  tls 		if ((dipsw & 0x01) == 0)
    248  1.5.6.2  tls 			sw += 1;
    249  1.5.6.2  tls 
    250  1.5.6.2  tls 		if (i == 7)
    251  1.5.6.2  tls 			break;
    252  1.5.6.2  tls 
    253  1.5.6.2  tls 		sw <<= 1;
    254  1.5.6.2  tls 		dipsw >>= 1;
    255  1.5.6.2  tls 	}
    256  1.5.6.2  tls 
    257  1.5.6.2  tls 	return(sw);
    258  1.5.6.2  tls }
    259