machdep.c revision 1.29 1 /* $NetBSD: machdep.c,v 1.29 2006/07/13 22:56:01 gdamore Exp $ */
2
3 /*-
4 * Copyright (c) 2006 Itronix Inc.
5 * All rights reserved.
6 *
7 * Portions written by Garrett D'Amore for Itronix Inc.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of Itronix Inc. may not be used to endorse
18 * or promote products derived from this software without specific
19 * prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
23 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
25 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
26 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
27 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
28 * ON ANY THEORY OF LIABILITY, WHETHER IN
29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31 * POSSIBILITY OF SUCH DAMAGE.
32 */
33 /*
34 * Copyright (c) 1992, 1993
35 * The Regents of the University of California. All rights reserved.
36 *
37 * This code is derived from software contributed to Berkeley by
38 * the Systems Programming Group of the University of Utah Computer
39 * Science Department, The Mach Operating System project at
40 * Carnegie-Mellon University and Ralph Campbell.
41 *
42 * Redistribution and use in source and binary forms, with or without
43 * modification, are permitted provided that the following conditions
44 * are met:
45 * 1. Redistributions of source code must retain the above copyright
46 * notice, this list of conditions and the following disclaimer.
47 * 2. Redistributions in binary form must reproduce the above copyright
48 * notice, this list of conditions and the following disclaimer in the
49 * documentation and/or other materials provided with the distribution.
50 * 3. Neither the name of the University nor the names of its contributors
51 * may be used to endorse or promote products derived from this software
52 * without specific prior written permission.
53 *
54 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
55 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
56 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
57 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
58 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
59 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
60 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
61 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
62 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
63 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
64 * SUCH DAMAGE.
65 *
66 * @(#)machdep.c 8.3 (Berkeley) 1/12/94
67 * from: Utah Hdr: machdep.c 1.63 91/04/24
68 */
69 /*
70 * Copyright (c) 1988 University of Utah.
71 *
72 * This code is derived from software contributed to Berkeley by
73 * the Systems Programming Group of the University of Utah Computer
74 * Science Department, The Mach Operating System project at
75 * Carnegie-Mellon University and Ralph Campbell.
76 *
77 * Redistribution and use in source and binary forms, with or without
78 * modification, are permitted provided that the following conditions
79 * are met:
80 * 1. Redistributions of source code must retain the above copyright
81 * notice, this list of conditions and the following disclaimer.
82 * 2. Redistributions in binary form must reproduce the above copyright
83 * notice, this list of conditions and the following disclaimer in the
84 * documentation and/or other materials provided with the distribution.
85 * 3. All advertising materials mentioning features or use of this software
86 * must display the following acknowledgement:
87 * This product includes software developed by the University of
88 * California, Berkeley and its contributors.
89 * 4. Neither the name of the University nor the names of its contributors
90 * may be used to endorse or promote products derived from this software
91 * without specific prior written permission.
92 *
93 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
94 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
95 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
96 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
97 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
98 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
99 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
100 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
101 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
102 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
103 * SUCH DAMAGE.
104 *
105 * @(#)machdep.c 8.3 (Berkeley) 1/12/94
106 * from: Utah Hdr: machdep.c 1.63 91/04/24
107 */
108
109 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */
110 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.29 2006/07/13 22:56:01 gdamore Exp $");
111
112 #include "opt_ddb.h"
113 #include "opt_kgdb.h"
114
115 #include "opt_memsize.h"
116 #include "opt_ethaddr.h"
117
118 #include <sys/param.h>
119 #include <sys/systm.h>
120 #include <sys/kernel.h>
121 #include <sys/buf.h>
122 #include <sys/reboot.h>
123 #include <sys/user.h>
124 #include <sys/mount.h>
125 #include <sys/kcore.h>
126 #include <sys/boot_flag.h>
127 #include <sys/termios.h>
128 #include <sys/ksyms.h>
129
130 #include <net/if.h>
131 #include <net/if_ether.h>
132
133 #include <uvm/uvm_extern.h>
134
135 #include <dev/cons.h>
136
137 #include "ksyms.h"
138
139 #if NKSYMS || defined(DDB) || defined(LKM)
140 #include <machine/db_machdep.h>
141 #include <ddb/db_extern.h>
142 #endif
143
144 #include <mips/cache.h>
145 #include <mips/locore.h>
146 #include <machine/yamon.h>
147
148 #include <evbmips/alchemy/board.h>
149 #include <mips/alchemy/dev/aupcivar.h>
150 #include <mips/alchemy/dev/aupcmciavar.h>
151 #include <mips/alchemy/include/aureg.h>
152 #include <mips/alchemy/include/auvar.h>
153 #include <mips/alchemy/include/aubusvar.h>
154
155 #include "com.h"
156 #if NCOM > 0
157
158 int aucomcnrate = 0;
159 #endif /* NAUCOM > 0 */
160
161 #include "ohci.h"
162
163 struct user *proc0paddr;
164
165 /* Our exported CPU info; we can have only one. */
166 struct cpu_info cpu_info_store;
167
168 /* Maps for VM objects. */
169 struct vm_map *exec_map = NULL;
170 struct vm_map *mb_map = NULL;
171 struct vm_map *phys_map = NULL;
172
173 int physmem; /* # pages of physical memory */
174 int maxmem; /* max memory per process */
175
176 int mem_cluster_cnt;
177 phys_ram_seg_t mem_clusters[VM_PHYSSEG_MAX];
178
179 yamon_env_var *yamon_envp;
180 struct mips_bus_space alchemy_cpuregt;
181
182 void mach_init(int, char **, yamon_env_var *, u_long); /* XXX */
183
184 void
185 mach_init(int argc, char **argv, yamon_env_var *envp, u_long memsize)
186 {
187 bus_space_handle_t sh;
188 caddr_t kernend;
189 const char *cp;
190 u_long first, last;
191 caddr_t v;
192 int freqok, howto, i;
193 const struct alchemy_board *board;
194
195 extern char edata[], end[]; /* XXX */
196
197 board = board_info();
198 KASSERT(board != NULL);
199
200 /* clear the BSS segment */
201 kernend = (caddr_t)mips_round_page(end);
202 memset(edata, 0, kernend - (caddr_t)edata);
203
204 /* set CPU model info for sysctl_hw */
205 strcpy(cpu_model, board->ab_name);
206
207 /* save the yamon environment pointer */
208 yamon_envp = envp;
209
210 /* Use YAMON callbacks for early console I/O */
211 cn_tab = &yamon_promcd;
212
213 /*
214 * Set up the exception vectors and CPU-specific function
215 * vectors early on. We need the wbflush() vector set up
216 * before comcnattach() is called (or at least before the
217 * first printf() after that is called).
218 * Sets up mips_cpu_flags that may be queried by other
219 * functions called during startup.
220 * Also clears the I+D caches.
221 */
222 mips_vector_init();
223
224 /*
225 * Set the VM page size.
226 */
227 uvm_setpagesize();
228
229 /*
230 * Use YAMON's CPU frequency if available.
231 */
232 freqok = yamon_setcpufreq(1);
233
234 /*
235 * Initialize bus space tags.
236 */
237 au_cpureg_bus_mem_init(&alchemy_cpuregt, &alchemy_cpuregt);
238 aubus_st = &alchemy_cpuregt;
239
240 /*
241 * Calibrate the timer if YAMON failed to tell us.
242 */
243 if (!freqok) {
244 bus_space_map(aubus_st, PC_BASE, PC_SIZE, 0, &sh);
245 au_cal_timers(aubus_st, sh);
246 bus_space_unmap(aubus_st, sh, PC_SIZE);
247 }
248
249 /*
250 * Perform board-specific initialization.
251 */
252 board->ab_init();
253
254 /*
255 * Bring up the console.
256 */
257 #if NCOM > 0
258 #ifdef CONSPEED
259 if (aucomcnrate == 0)
260 aucomcnrate = CONSPEED;
261 #else /* !CONSPEED */
262 /*
263 * Learn default console speed. We use the YAMON environment,
264 * though we could probably also figure it out by checking the
265 * aucom registers directly.
266 */
267 if ((aucomcnrate == 0) && ((cp = yamon_getenv("modetty0")) != NULL))
268 aucomcnrate = strtoul(cp, NULL, 0);
269
270 if (aucomcnrate == 0) {
271 printf("FATAL: `modetty0' YAMON variable not set. Set it\n");
272 printf(" to the speed of the console and try again.\n");
273 printf(" Or, build a kernel with the `CONSPEED' "
274 "option.\n");
275 panic("mach_init");
276 }
277 #endif /* CONSPEED */
278
279 /*
280 * Delay to allow firmware putchars to complete.
281 * FIFO depth * character time.
282 * character time = (1000000 / (defaultrate / 10))
283 */
284 delay(160000000 / aucomcnrate);
285 if (com_aubus_cnattach(UART0_BASE, aucomcnrate) != 0)
286 panic("mach_init: unable to initialize serial console");
287
288 #else /* NCOM > 0 */
289 panic("mach_init: not configured to use serial console");
290 #endif /* NAUCOM > 0 */
291
292 /*
293 * Look at arguments passed to us and compute boothowto.
294 */
295 boothowto = RB_AUTOBOOT;
296 #ifdef KADB
297 boothowto |= RB_KDB;
298 #endif
299 for (i = 1; i < argc; i++) {
300 for (cp = argv[i]; *cp; cp++) {
301 /* Ignore superfluous '-', if there is one */
302 if (*cp == '-')
303 continue;
304
305 howto = 0;
306 BOOT_FLAG(*cp, howto);
307 if (! howto)
308 printf("bootflag '%c' not recognised\n", *cp);
309 else
310 boothowto |= howto;
311 }
312 }
313
314 /*
315 * Determine the memory size. Use the `memsize' PMON
316 * variable. If that's not available, panic.
317 *
318 * Note: Reserve the first page! That's where the trap
319 * vectors are located.
320 */
321
322 #if defined(MEMSIZE)
323 memsize = MEMSIZE;
324 #else
325 if (memsize == 0) {
326 if ((cp = yamon_getenv("memsize")) != NULL)
327 memsize = strtoul(cp, NULL, 0);
328 else {
329 printf("FATAL: `memsize' YAMON variable not set. Set it to\n");
330 printf(" the amount of memory (in MB) and try again.\n");
331 printf(" Or, build a kernel with the `MEMSIZE' "
332 "option.\n");
333 panic("mach_init");
334 }
335 }
336 #endif /* MEMSIZE */
337 printf("Memory size: 0x%08lx\n", memsize);
338 physmem = btoc(memsize);
339
340 mem_clusters[mem_cluster_cnt].start = PAGE_SIZE;
341 mem_clusters[mem_cluster_cnt].size =
342 memsize - mem_clusters[mem_cluster_cnt].start;
343 mem_cluster_cnt++;
344
345 /*
346 * Load the rest of the available pages into the VM system.
347 */
348 first = round_page(MIPS_KSEG0_TO_PHYS(kernend));
349 last = mem_clusters[0].start + mem_clusters[0].size;
350 uvm_page_physload(atop(first), atop(last), atop(first), atop(last),
351 VM_FREELIST_DEFAULT);
352
353 /*
354 * Initialize message buffer (at end of core).
355 */
356 mips_init_msgbuf();
357
358 /*
359 * Initialize the virtual memory system.
360 */
361 pmap_bootstrap();
362
363 /*
364 * Init mapping for u page(s) for proc0.
365 */
366 v = (caddr_t) uvm_pageboot_alloc(USPACE);
367 lwp0.l_addr = proc0paddr = (struct user *)v;
368 lwp0.l_md.md_regs = (struct frame *)(v + USPACE) - 1;
369 curpcb = &lwp0.l_addr->u_pcb;
370 curpcb->pcb_context[11] = MIPS_INT_MASK | MIPS_SR_INT_IE; /* SR */
371
372 /*
373 * Initialize debuggers, and break into them, if appropriate.
374 */
375 #if NKSYMS || defined(DDB) || defined(LKM)
376 ksyms_init(0, 0, 0);
377 #endif
378 #ifdef DDB
379 if (boothowto & RB_KDB)
380 Debugger();
381 #endif
382 }
383
384 void
385 consinit(void)
386 {
387
388 /*
389 * Everything related to console initialization is done
390 * in mach_init().
391 */
392 }
393
394 void
395 cpu_startup(void)
396 {
397 char pbuf[9];
398 vaddr_t minaddr, maxaddr;
399 #ifdef DEBUG
400 extern int pmapdebug; /* XXX */
401 int opmapdebug = pmapdebug;
402
403 pmapdebug = 0; /* Shut up pmap debug during bootstrap */
404 #endif
405
406 /*
407 * Good {morning,afternoon,evening,night}.
408 */
409 printf("%s%s", copyright, version);
410 printf("%s\n", cpu_model);
411 format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
412 printf("total memory = %s\n", pbuf);
413
414 minaddr = 0;
415 /*
416 * Allocate a submap for exec arguments. This map effectively
417 * limits the number of processes exec'ing at any time.
418 */
419 exec_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
420 16 * NCARGS, VM_MAP_PAGEABLE, FALSE, NULL);
421
422 /*
423 * Allocate a submap for physio
424 */
425 phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
426 VM_PHYS_SIZE, 0, FALSE, NULL);
427
428 /*
429 * No need to allocate an mbuf cluster submap. Mbuf clusters
430 * are allocated via the pool allocator, and we use KSEG to
431 * map those pages.
432 */
433
434 #ifdef DEBUG
435 pmapdebug = opmapdebug;
436 #endif
437 format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
438 printf("avail memory = %s\n", pbuf);
439 }
440
441 void
442 cpu_reboot(int howto, char *bootstr)
443 {
444 static int waittime = -1;
445 const struct alchemy_board *board;
446
447 /* Take a snapshot before clobbering any registers. */
448 if (curproc)
449 savectx((struct user *)curpcb);
450
451 board = board_info();
452 KASSERT(board != NULL);
453
454 /* If "always halt" was specified as a boot flag, obey. */
455 if (boothowto & RB_HALT)
456 howto |= RB_HALT;
457
458 boothowto = howto;
459
460 /* If system is cold, just halt. */
461 if (cold) {
462 boothowto |= RB_HALT;
463 goto haltsys;
464 }
465
466 if ((boothowto & RB_NOSYNC) == 0 && waittime < 0) {
467 waittime = 0;
468
469 /*
470 * Synchronize the disks....
471 */
472 vfs_shutdown();
473
474 /*
475 * If we've been adjusting the clock, the todr
476 * will be out of synch; adjust it now.
477 */
478 resettodr();
479 }
480
481 /* Disable interrupts. */
482 splhigh();
483
484 if (boothowto & RB_DUMP)
485 dumpsys();
486
487 haltsys:
488 /* Run any shutdown hooks. */
489 doshutdownhooks();
490
491 if ((boothowto & RB_POWERDOWN) == RB_POWERDOWN)
492 if (board && board->ab_poweroff)
493 board->ab_poweroff();
494
495 /*
496 * YAMON may autoboot (depending on settings), and we cannot pass
497 * flags to it (at least I haven't figured out how to yet), so
498 * we "pseudo-halt" now.
499 */
500 if (boothowto & RB_HALT) {
501 printf("\n");
502 printf("The operating system has halted.\n");
503 printf("Please press any key to reboot.\n\n");
504 cnpollc(1); /* For proper keyboard command handling */
505 cngetc();
506 cnpollc(0);
507 }
508
509 /*
510 * Try to use board-specific reset logic, which might involve a better
511 * hardware reset.
512 */
513 if (board->ab_reboot)
514 board->ab_reboot();
515
516 #if 1
517 /* XXX
518 * For some reason we are leaving the ethernet MAC in a state where
519 * YAMON isn't happy with it. So just call the reset vector (grr,
520 * Alchemy YAMON doesn't have a "reset" command).
521 */
522 printf("reseting board...\n\n");
523 mips_icache_sync_all();
524 mips_dcache_wbinv_all();
525 __asm volatile("jr %0" :: "r"(MIPS_RESET_EXC_VEC));
526 #else
527 printf("%s\n\n", ((howto & RB_HALT) != 0) ? "halted." : "rebooting...");
528 yamon_exit(boothowto);
529 printf("Oops, back from yamon_exit()\n\nSpinning...");
530 #endif
531 for (;;)
532 /* spin forever */ ; /* XXX */
533 /*NOTREACHED*/
534 }
535
536 /*
537 * Export our interrupt map function so aupci can find it.
538 */
539 int
540 aupci_intr_map(struct pci_attach_args *pa, pci_intr_handle_t *ihp)
541 {
542 const struct alchemy_board *board;
543
544 board = board_info();
545 if (board->ab_pci_intr_map != NULL)
546 return (board->ab_pci_intr_map(pa, ihp));
547 return 1;
548 }
549
550 struct aupcmcia_machdep *
551 aupcmcia_machdep(void)
552 {
553 const struct alchemy_board *board;
554
555 board = board_info();
556 return (board->ab_pcmcia);
557 }
558