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