machdep.c revision 1.123.2.1 1 1.123.2.1 rmind /* $NetBSD: machdep.c,v 1.123.2.1 2010/03/18 04:36:53 rmind Exp $ */
2 1.1 gwr
3 1.1 gwr /*
4 1.1 gwr * Copyright (c) 1982, 1986, 1990, 1993
5 1.1 gwr * The Regents of the University of California. All rights reserved.
6 1.1 gwr *
7 1.1 gwr * This code is derived from software contributed to Berkeley by
8 1.1 gwr * the Systems Programming Group of the University of Utah Computer
9 1.1 gwr * Science Department.
10 1.1 gwr *
11 1.1 gwr * Redistribution and use in source and binary forms, with or without
12 1.1 gwr * modification, are permitted provided that the following conditions
13 1.1 gwr * are met:
14 1.1 gwr * 1. Redistributions of source code must retain the above copyright
15 1.1 gwr * notice, this list of conditions and the following disclaimer.
16 1.1 gwr * 2. Redistributions in binary form must reproduce the above copyright
17 1.1 gwr * notice, this list of conditions and the following disclaimer in the
18 1.1 gwr * documentation and/or other materials provided with the distribution.
19 1.91 agc * 3. Neither the name of the University nor the names of its contributors
20 1.91 agc * may be used to endorse or promote products derived from this software
21 1.91 agc * without specific prior written permission.
22 1.91 agc *
23 1.91 agc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.91 agc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.91 agc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.91 agc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.91 agc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.91 agc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.91 agc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.91 agc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.91 agc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.91 agc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.91 agc * SUCH DAMAGE.
34 1.91 agc *
35 1.91 agc * from: Utah Hdr: machdep.c 1.74 92/12/20
36 1.91 agc * from: @(#)machdep.c 8.10 (Berkeley) 4/20/94
37 1.91 agc */
38 1.91 agc /*
39 1.91 agc * Copyright (c) 1988 University of Utah.
40 1.91 agc *
41 1.91 agc * This code is derived from software contributed to Berkeley by
42 1.91 agc * the Systems Programming Group of the University of Utah Computer
43 1.91 agc * Science Department.
44 1.91 agc *
45 1.91 agc * Redistribution and use in source and binary forms, with or without
46 1.91 agc * modification, are permitted provided that the following conditions
47 1.91 agc * are met:
48 1.91 agc * 1. Redistributions of source code must retain the above copyright
49 1.91 agc * notice, this list of conditions and the following disclaimer.
50 1.91 agc * 2. Redistributions in binary form must reproduce the above copyright
51 1.91 agc * notice, this list of conditions and the following disclaimer in the
52 1.91 agc * documentation and/or other materials provided with the distribution.
53 1.1 gwr * 3. All advertising materials mentioning features or use of this software
54 1.1 gwr * must display the following acknowledgement:
55 1.1 gwr * This product includes software developed by the University of
56 1.1 gwr * California, Berkeley and its contributors.
57 1.1 gwr * 4. Neither the name of the University nor the names of its contributors
58 1.1 gwr * may be used to endorse or promote products derived from this software
59 1.1 gwr * without specific prior written permission.
60 1.1 gwr *
61 1.1 gwr * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
62 1.1 gwr * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
63 1.1 gwr * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
64 1.1 gwr * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
65 1.1 gwr * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
66 1.1 gwr * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
67 1.1 gwr * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
68 1.1 gwr * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
69 1.1 gwr * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
70 1.1 gwr * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
71 1.1 gwr * SUCH DAMAGE.
72 1.1 gwr *
73 1.1 gwr * from: Utah Hdr: machdep.c 1.74 92/12/20
74 1.1 gwr * from: @(#)machdep.c 8.10 (Berkeley) 4/20/94
75 1.1 gwr */
76 1.90 lukem
77 1.90 lukem #include <sys/cdefs.h>
78 1.123.2.1 rmind __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.123.2.1 2010/03/18 04:36:53 rmind Exp $");
79 1.1 gwr
80 1.35 jonathan #include "opt_ddb.h"
81 1.69 lukem #include "opt_kgdb.h"
82 1.118 apb #include "opt_modular.h"
83 1.34 gwr
84 1.1 gwr #include <sys/param.h>
85 1.1 gwr #include <sys/systm.h>
86 1.1 gwr #include <sys/kernel.h>
87 1.1 gwr #include <sys/proc.h>
88 1.1 gwr #include <sys/buf.h>
89 1.1 gwr #include <sys/reboot.h>
90 1.1 gwr #include <sys/conf.h>
91 1.1 gwr #include <sys/file.h>
92 1.37 kleink #include <sys/device.h>
93 1.1 gwr #include <sys/malloc.h>
94 1.1 gwr #include <sys/mbuf.h>
95 1.1 gwr #include <sys/msgbuf.h>
96 1.1 gwr #include <sys/ioctl.h>
97 1.1 gwr #include <sys/tty.h>
98 1.1 gwr #include <sys/mount.h>
99 1.1 gwr #include <sys/exec.h>
100 1.119 matt #include <sys/exec_aout.h> /* for MID_* */
101 1.1 gwr #include <sys/core.h>
102 1.1 gwr #include <sys/kcore.h>
103 1.1 gwr #include <sys/vnode.h>
104 1.1 gwr #include <sys/syscallargs.h>
105 1.87 ragge #include <sys/ksyms.h>
106 1.8 gwr #ifdef KGDB
107 1.8 gwr #include <sys/kgdb.h>
108 1.8 gwr #endif
109 1.26 hannken
110 1.42 mrg #include <uvm/uvm_extern.h>
111 1.34 gwr
112 1.26 hannken #include <sys/sysctl.h>
113 1.1 gwr
114 1.1 gwr #include <dev/cons.h>
115 1.123.2.1 rmind #include <dev/mm.h>
116 1.1 gwr
117 1.1 gwr #include <machine/cpu.h>
118 1.29 gwr #include <machine/dvma.h>
119 1.29 gwr #include <machine/idprom.h>
120 1.29 gwr #include <machine/kcore.h>
121 1.1 gwr #include <machine/reg.h>
122 1.1 gwr #include <machine/psl.h>
123 1.1 gwr #include <machine/pte.h>
124 1.123.2.1 rmind #include <machine/mon.h>
125 1.29 gwr
126 1.41 kleink #if defined(DDB)
127 1.1 gwr #include <machine/db_machdep.h>
128 1.33 gwr #include <ddb/db_sym.h>
129 1.32 tv #include <ddb/db_extern.h>
130 1.41 kleink #endif
131 1.1 gwr
132 1.29 gwr #include <sun3/sun3/machdep.h>
133 1.1 gwr
134 1.87 ragge #include "ksyms.h"
135 1.87 ragge
136 1.1 gwr /* Defined in locore.s */
137 1.1 gwr extern char kernel_text[];
138 1.1 gwr /* Defined by the linker */
139 1.1 gwr extern char etext[];
140 1.56 thorpej
141 1.56 thorpej /* Our exported CPU info; we can have only one. */
142 1.56 thorpej struct cpu_info cpu_info_store;
143 1.1 gwr
144 1.70 chs struct vm_map *phys_map = NULL;
145 1.34 gwr
146 1.1 gwr int physmem;
147 1.9 gwr int fputype;
148 1.107 christos void * msgbufaddr;
149 1.1 gwr
150 1.29 gwr /* Virtual page frame for /dev/mem (see mem.c) */
151 1.73 tsutsui vaddr_t vmmap;
152 1.79 lukem
153 1.1 gwr /*
154 1.1 gwr * safepri is a safe priority for sleep to set for a spin-wait
155 1.1 gwr * during autoconfiguration or after a panic.
156 1.1 gwr */
157 1.1 gwr int safepri = PSL_LOWIPL;
158 1.1 gwr
159 1.29 gwr u_char cpu_machine_id = 0;
160 1.100 tsutsui const char *cpu_string = NULL;
161 1.15 gwr int cpu_has_vme = 0;
162 1.15 gwr int has_iocache = 0;
163 1.15 gwr
164 1.66 chs vaddr_t dumppage;
165 1.66 chs
166 1.97 chs static void identifycpu(void);
167 1.97 chs static void initcpu(void);
168 1.1 gwr
169 1.1 gwr /*
170 1.1 gwr * Console initialization: called early on from main,
171 1.15 gwr * before vm init or cpu_startup. This system is able
172 1.29 gwr * to use the console for output immediately (via PROM)
173 1.29 gwr * but can not use it for input until after this point.
174 1.1 gwr */
175 1.97 chs void
176 1.97 chs consinit(void)
177 1.1 gwr {
178 1.29 gwr
179 1.29 gwr /*
180 1.29 gwr * Switch from the PROM console (output only)
181 1.29 gwr * to our own console driver.
182 1.29 gwr */
183 1.29 gwr cninit();
184 1.1 gwr
185 1.113 ad #if NKSYMS || defined(DDB) || defined(MODULAR)
186 1.32 tv {
187 1.63 chs extern int nsym;
188 1.63 chs extern char *ssym, *esym;
189 1.32 tv
190 1.115 martin ksyms_addsyms_elf(nsym, ssym, esym);
191 1.32 tv }
192 1.72 simonb #endif /* DDB */
193 1.31 gwr
194 1.31 gwr /*
195 1.31 gwr * Now that the console can do input as well as
196 1.31 gwr * output, consider stopping for a debugger.
197 1.31 gwr */
198 1.31 gwr if (boothowto & RB_KDB) {
199 1.31 gwr #ifdef KGDB
200 1.31 gwr /* XXX - Ask on console for kgdb_dev? */
201 1.31 gwr /* Note: this will just return if kgdb_dev==NODEV */
202 1.31 gwr kgdb_connect(1);
203 1.31 gwr #else /* KGDB */
204 1.31 gwr /* Either DDB or no debugger (just PROM). */
205 1.1 gwr Debugger();
206 1.31 gwr #endif /* KGDB */
207 1.31 gwr }
208 1.1 gwr }
209 1.1 gwr
210 1.1 gwr /*
211 1.1 gwr * cpu_startup: allocate memory for variable-sized tables,
212 1.95 wiz * initialize CPU, and do autoconfiguration.
213 1.1 gwr *
214 1.1 gwr * This is called early in init_main.c:main(), after the
215 1.1 gwr * kernel memory allocator is ready for use, but before
216 1.1 gwr * the creation of processes 1,2, and mountroot, etc.
217 1.1 gwr */
218 1.97 chs void
219 1.97 chs cpu_startup(void)
220 1.1 gwr {
221 1.108 tsutsui char *v;
222 1.73 tsutsui vaddr_t minaddr, maxaddr;
223 1.50 lukem char pbuf[9];
224 1.1 gwr
225 1.1 gwr /*
226 1.1 gwr * Initialize message buffer (for kernel printf).
227 1.1 gwr * This is put in physical page zero so it will
228 1.1 gwr * always be in the same place after a reboot.
229 1.1 gwr * Its mapping was prepared in pmap_bootstrap().
230 1.1 gwr * Also, offset some to avoid PROM scribbles.
231 1.1 gwr */
232 1.108 tsutsui v = (char *)KERNBASE;
233 1.108 tsutsui msgbufaddr = v + MSGBUFOFF;
234 1.23 gwr initmsgbuf(msgbufaddr, MSGBUFSIZE);
235 1.1 gwr
236 1.1 gwr /*
237 1.1 gwr * Good {morning,afternoon,evening,night}.
238 1.1 gwr */
239 1.99 lukem printf("%s%s", copyright, version);
240 1.1 gwr identifycpu();
241 1.1 gwr initfpu(); /* also prints FPU type */
242 1.1 gwr
243 1.50 lukem format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
244 1.50 lukem printf("total memory = %s\n", pbuf);
245 1.1 gwr
246 1.1 gwr /*
247 1.66 chs * Get scratch page for dumpsys().
248 1.66 chs */
249 1.98 yamt dumppage = uvm_km_alloc(kernel_map, PAGE_SIZE, 0, UVM_KMF_WIRED);
250 1.98 yamt if (dumppage == 0)
251 1.66 chs panic("startup: alloc dumppage");
252 1.66 chs
253 1.94 pk minaddr = 0;
254 1.1 gwr
255 1.1 gwr /*
256 1.84 chs * Allocate a submap for physio
257 1.1 gwr */
258 1.84 chs phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
259 1.106 thorpej VM_PHYS_SIZE, 0, false, NULL);
260 1.1 gwr
261 1.50 lukem format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
262 1.50 lukem printf("avail memory = %s\n", pbuf);
263 1.1 gwr
264 1.1 gwr /*
265 1.1 gwr * Allocate a virtual page (for use by /dev/mem)
266 1.1 gwr * This page is handed to pmap_enter() therefore
267 1.1 gwr * it has to be in the normal kernel VA range.
268 1.1 gwr */
269 1.98 yamt vmmap = uvm_km_alloc(kernel_map, PAGE_SIZE, 0,
270 1.98 yamt UVM_KMF_VAONLY | UVM_KMF_WAITVA);
271 1.1 gwr
272 1.1 gwr /*
273 1.1 gwr * Create the DVMA maps.
274 1.1 gwr */
275 1.1 gwr dvma_init();
276 1.1 gwr
277 1.1 gwr /*
278 1.1 gwr * Set up CPU-specific registers, cache, etc.
279 1.1 gwr */
280 1.1 gwr initcpu();
281 1.1 gwr }
282 1.1 gwr
283 1.1 gwr /*
284 1.1 gwr * Set registers on exec.
285 1.1 gwr */
286 1.97 chs void
287 1.122 matt setregs(struct lwp *l, struct exec_package *pack, vaddr_t stack)
288 1.1 gwr {
289 1.85 thorpej struct trapframe *tf = (struct trapframe *)l->l_md.md_regs;
290 1.121 rmind struct pcb *pcb = lwp_getpcb(l);
291 1.1 gwr
292 1.21 mycroft tf->tf_sr = PSL_USERSET;
293 1.5 gwr tf->tf_pc = pack->ep_entry & ~1;
294 1.20 mycroft tf->tf_regs[D0] = 0;
295 1.20 mycroft tf->tf_regs[D1] = 0;
296 1.20 mycroft tf->tf_regs[D2] = 0;
297 1.20 mycroft tf->tf_regs[D3] = 0;
298 1.20 mycroft tf->tf_regs[D4] = 0;
299 1.20 mycroft tf->tf_regs[D5] = 0;
300 1.20 mycroft tf->tf_regs[D6] = 0;
301 1.20 mycroft tf->tf_regs[D7] = 0;
302 1.20 mycroft tf->tf_regs[A0] = 0;
303 1.20 mycroft tf->tf_regs[A1] = 0;
304 1.85 thorpej tf->tf_regs[A2] = (int)l->l_proc->p_psstr;
305 1.20 mycroft tf->tf_regs[A3] = 0;
306 1.20 mycroft tf->tf_regs[A4] = 0;
307 1.20 mycroft tf->tf_regs[A5] = 0;
308 1.20 mycroft tf->tf_regs[A6] = 0;
309 1.5 gwr tf->tf_regs[SP] = stack;
310 1.1 gwr
311 1.1 gwr /* restore a null state frame */
312 1.121 rmind pcb->pcb_fpregs.fpf_null = 0;
313 1.19 mycroft if (fputype)
314 1.121 rmind m68881_restore(&pcb->pcb_fpregs);
315 1.19 mycroft
316 1.85 thorpej l->l_md.md_flags = 0;
317 1.1 gwr }
318 1.1 gwr
319 1.1 gwr /*
320 1.1 gwr * Info for CTL_HW
321 1.1 gwr */
322 1.46 gwr char machine[16] = MACHINE; /* from <machine/param.h> */
323 1.46 gwr char kernel_arch[16] = "sun3x"; /* XXX needs a sysctl node */
324 1.1 gwr char cpu_model[120];
325 1.15 gwr
326 1.15 gwr /*
327 1.15 gwr * XXX - Should empirically estimate the divisor...
328 1.15 gwr * Note that the value of delay_divisor is roughly
329 1.15 gwr * 2048 / cpuclock (where cpuclock is in MHz).
330 1.15 gwr */
331 1.16 gwr int delay_divisor = 62; /* assume the fastest (33 MHz) */
332 1.1 gwr
333 1.97 chs void
334 1.97 chs identifycpu(void)
335 1.1 gwr {
336 1.29 gwr u_char machtype;
337 1.1 gwr
338 1.15 gwr machtype = identity_prom.idp_machtype;
339 1.29 gwr if ((machtype & IDM_ARCH_MASK) != IDM_ARCH_SUN3X) {
340 1.29 gwr printf("Bad IDPROM arch!\n");
341 1.15 gwr sunmon_abort();
342 1.15 gwr }
343 1.15 gwr
344 1.29 gwr cpu_machine_id = machtype;
345 1.15 gwr switch (cpu_machine_id) {
346 1.15 gwr
347 1.101 thorpej case ID_SUN3X_80:
348 1.15 gwr cpu_string = "80"; /* Hydra */
349 1.16 gwr delay_divisor = 102; /* 20 MHz */
350 1.106 thorpej cpu_has_vme = false;
351 1.15 gwr break;
352 1.15 gwr
353 1.101 thorpej case ID_SUN3X_470:
354 1.15 gwr cpu_string = "470"; /* Pegasus */
355 1.15 gwr delay_divisor = 62; /* 33 MHz */
356 1.106 thorpej cpu_has_vme = true;
357 1.15 gwr break;
358 1.15 gwr
359 1.15 gwr default:
360 1.15 gwr printf("unknown sun3x model\n");
361 1.15 gwr sunmon_abort();
362 1.15 gwr }
363 1.15 gwr
364 1.15 gwr /* Other stuff? (VAC, mc6888x version, etc.) */
365 1.46 gwr /* Note: miniroot cares about the kernel_arch part. */
366 1.46 gwr sprintf(cpu_model, "%s %s", kernel_arch, cpu_string);
367 1.1 gwr
368 1.29 gwr printf("Model: %s\n", cpu_model);
369 1.1 gwr }
370 1.1 gwr
371 1.1 gwr /*
372 1.1 gwr * machine dependent system variables.
373 1.1 gwr */
374 1.93 atatat #if 0 /* XXX - Not yet... */
375 1.93 atatat static int
376 1.93 atatat sysctl_machdep_root_device(SYSCTLFN_ARGS)
377 1.1 gwr {
378 1.93 atatat struct sysctlnode node = *rnode;
379 1.1 gwr
380 1.93 atatat node.sysctl_data = some permutation on root_device;
381 1.93 atatat node.sysctl_size = strlen(root_device) + 1;
382 1.93 atatat return (sysctl_lookup(SYSCTLFN_CALL(&node)));
383 1.93 atatat }
384 1.1 gwr
385 1.93 atatat static int
386 1.93 atatat sysctl_machdep_booted_kernel(SYSCTLFN_ARGS)
387 1.93 atatat {
388 1.93 atatat struct sysctlnode node = *rnode;
389 1.1 gwr
390 1.93 atatat node.sysctl_data = some permutation on booted_kernel;
391 1.93 atatat node.sysctl_size = strlen(booted_kernel) + 1;
392 1.93 atatat return (sysctl_lookup(SYSCTLFN_CALL(&node)));
393 1.93 atatat }
394 1.1 gwr #endif
395 1.1 gwr
396 1.93 atatat SYSCTL_SETUP(sysctl_machdep_setup, "sysctl machdep subtree setup")
397 1.93 atatat {
398 1.93 atatat
399 1.96 atatat sysctl_createv(clog, 0, NULL, NULL,
400 1.96 atatat CTLFLAG_PERMANENT,
401 1.93 atatat CTLTYPE_NODE, "machdep", NULL,
402 1.93 atatat NULL, 0, NULL, 0,
403 1.93 atatat CTL_MACHDEP, CTL_EOL);
404 1.93 atatat
405 1.96 atatat sysctl_createv(clog, 0, NULL, NULL,
406 1.96 atatat CTLFLAG_PERMANENT,
407 1.93 atatat CTLTYPE_STRUCT, "console_device", NULL,
408 1.93 atatat sysctl_consdev, 0, NULL, sizeof(dev_t),
409 1.93 atatat CTL_MACHDEP, CPU_CONSDEV, CTL_EOL);
410 1.93 atatat #if 0 /* XXX - Not yet... */
411 1.96 atatat sysctl_createv(clog, 0, NULL, NULL,
412 1.96 atatat CTLFLAG_PERMANENT,
413 1.93 atatat CTLTYPE_STRING, "root_device", NULL,
414 1.93 atatat sysctl_machdep_root_device, 0, NULL, 0,
415 1.93 atatat CTL_MACHDEP, CPU_ROOT_DEVICE, CTL_EOL);
416 1.96 atatat sysctl_createv(clog, 0, NULL, NULL,
417 1.96 atatat CTLFLAG_PERMANENT,
418 1.93 atatat CTLTYPE_STRING, "booted_kernel", NULL,
419 1.93 atatat sysctl_machdep_booted_kernel, 0, NULL, 0,
420 1.93 atatat CTL_MACHDEP, CPU_BOOTED_KERNEL, CTL_EOL);
421 1.93 atatat #endif
422 1.1 gwr }
423 1.1 gwr
424 1.7 gwr /* See: sig_machdep.c */
425 1.1 gwr
426 1.1 gwr /*
427 1.1 gwr * Do a sync in preparation for a reboot.
428 1.1 gwr * XXX - This could probably be common code.
429 1.1 gwr * XXX - And now, most of it is in vfs_shutdown()
430 1.1 gwr * XXX - Put waittime checks in there too?
431 1.1 gwr */
432 1.1 gwr int waittime = -1; /* XXX - Who else looks at this? -gwr */
433 1.1 gwr static void
434 1.97 chs reboot_sync(void)
435 1.1 gwr {
436 1.1 gwr
437 1.1 gwr /* Check waittime here to localize its use to this function. */
438 1.1 gwr if (waittime >= 0)
439 1.1 gwr return;
440 1.1 gwr waittime = 0;
441 1.1 gwr vfs_shutdown();
442 1.1 gwr }
443 1.1 gwr
444 1.1 gwr /*
445 1.1 gwr * Common part of the BSD and SunOS reboot system calls.
446 1.1 gwr */
447 1.97 chs __dead void
448 1.97 chs cpu_reboot(int howto, char *user_boot_string)
449 1.1 gwr {
450 1.2 gwr /* Note: this string MUST be static! */
451 1.2 gwr static char bootstr[128];
452 1.2 gwr char *p;
453 1.1 gwr
454 1.1 gwr /* If system is cold, just halt. (early panic?) */
455 1.1 gwr if (cold)
456 1.1 gwr goto haltsys;
457 1.1 gwr
458 1.24 gwr /* Un-blank the screen if appropriate. */
459 1.24 gwr cnpollc(1);
460 1.24 gwr
461 1.1 gwr if ((howto & RB_NOSYNC) == 0) {
462 1.1 gwr reboot_sync();
463 1.1 gwr /*
464 1.1 gwr * If we've been adjusting the clock, the todr
465 1.1 gwr * will be out of synch; adjust it now.
466 1.1 gwr *
467 1.1 gwr * XXX - However, if the kernel has been sitting in ddb,
468 1.1 gwr * the time will be way off, so don't set the HW clock!
469 1.1 gwr * XXX - Should do sanity check against HW clock. -gwr
470 1.1 gwr */
471 1.1 gwr /* resettodr(); */
472 1.1 gwr }
473 1.1 gwr
474 1.1 gwr /* Disable interrupts. */
475 1.1 gwr splhigh();
476 1.1 gwr
477 1.1 gwr /* Write out a crash dump if asked. */
478 1.1 gwr if (howto & RB_DUMP)
479 1.1 gwr dumpsys();
480 1.1 gwr
481 1.1 gwr /* run any shutdown hooks */
482 1.1 gwr doshutdownhooks();
483 1.1 gwr
484 1.112 dyoung pmf_system_shutdown(boothowto);
485 1.112 dyoung
486 1.1 gwr if (howto & RB_HALT) {
487 1.1 gwr haltsys:
488 1.63 chs printf("halted.\n");
489 1.61 tsutsui sunmon_halt();
490 1.1 gwr }
491 1.1 gwr
492 1.1 gwr /*
493 1.1 gwr * Automatic reboot.
494 1.1 gwr */
495 1.2 gwr if (user_boot_string)
496 1.2 gwr strncpy(bootstr, user_boot_string, sizeof(bootstr));
497 1.2 gwr else {
498 1.1 gwr /*
499 1.1 gwr * Build our own boot string with an empty
500 1.1 gwr * boot device/file and (maybe) some flags.
501 1.1 gwr * The PROM will supply the device/file name.
502 1.1 gwr */
503 1.2 gwr p = bootstr;
504 1.2 gwr *p = '\0';
505 1.1 gwr if (howto & (RB_KDB|RB_ASKNAME|RB_SINGLE)) {
506 1.1 gwr /* Append the boot flags. */
507 1.1 gwr *p++ = ' ';
508 1.1 gwr *p++ = '-';
509 1.1 gwr if (howto & RB_KDB)
510 1.1 gwr *p++ = 'd';
511 1.1 gwr if (howto & RB_ASKNAME)
512 1.1 gwr *p++ = 'a';
513 1.1 gwr if (howto & RB_SINGLE)
514 1.1 gwr *p++ = 's';
515 1.1 gwr *p = '\0';
516 1.1 gwr }
517 1.1 gwr }
518 1.63 chs printf("rebooting...\n");
519 1.3 gwr sunmon_reboot(bootstr);
520 1.1 gwr for (;;) ;
521 1.1 gwr /*NOTREACHED*/
522 1.1 gwr }
523 1.1 gwr
524 1.1 gwr /*
525 1.1 gwr * These variables are needed by /sbin/savecore
526 1.1 gwr */
527 1.97 chs uint32_t dumpmag = 0x8fca0101; /* magic number */
528 1.1 gwr int dumpsize = 0; /* pages */
529 1.1 gwr long dumplo = 0; /* blocks */
530 1.1 gwr
531 1.71 tsutsui #define DUMP_EXTRA 1 /* CPU-dependent extra pages */
532 1.71 tsutsui
533 1.1 gwr /*
534 1.11 gwr * This is called by main to set dumplo, dumpsize.
535 1.86 thorpej * Dumps always skip the first PAGE_SIZE of disk space
536 1.1 gwr * in case there might be a disk label stored there.
537 1.1 gwr * If there is extra space, put dump at the end to
538 1.1 gwr * reduce the chance that swapping trashes it.
539 1.1 gwr */
540 1.97 chs void
541 1.97 chs cpu_dumpconf(void)
542 1.1 gwr {
543 1.81 gehenna const struct bdevsw *bdev;
544 1.71 tsutsui int devblks; /* size of dump device in blocks */
545 1.71 tsutsui int dumpblks; /* size of dump image in blocks */
546 1.97 chs int (*getsize)(dev_t);
547 1.1 gwr
548 1.1 gwr if (dumpdev == NODEV)
549 1.1 gwr return;
550 1.1 gwr
551 1.81 gehenna bdev = bdevsw_lookup(dumpdev);
552 1.104 mrg if (bdev == NULL) {
553 1.104 mrg dumpdev = NODEV;
554 1.104 mrg return;
555 1.104 mrg }
556 1.81 gehenna getsize = bdev->d_psize;
557 1.1 gwr if (getsize == NULL)
558 1.1 gwr return;
559 1.71 tsutsui devblks = (*getsize)(dumpdev);
560 1.71 tsutsui if (devblks <= ctod(1))
561 1.1 gwr return;
562 1.71 tsutsui devblks &= ~(ctod(1) - 1);
563 1.71 tsutsui
564 1.71 tsutsui /*
565 1.71 tsutsui * Note: savecore expects dumpsize to be the
566 1.71 tsutsui * number of pages AFTER the dump header.
567 1.71 tsutsui */
568 1.71 tsutsui dumpsize = physmem; /* pages */
569 1.1 gwr
570 1.1 gwr /* Position dump image near end of space, page aligned. */
571 1.71 tsutsui dumpblks = ctod(physmem + DUMP_EXTRA);
572 1.71 tsutsui dumplo = devblks - dumpblks;
573 1.1 gwr
574 1.1 gwr /* If it does not fit, truncate it by moving dumplo. */
575 1.1 gwr /* Note: Must force signed comparison. */
576 1.1 gwr if (dumplo < ((long)ctod(1))) {
577 1.1 gwr dumplo = ctod(1);
578 1.71 tsutsui dumpsize = dtoc(devblks - dumplo) - DUMP_EXTRA;
579 1.1 gwr }
580 1.1 gwr }
581 1.1 gwr
582 1.13 gwr /* Note: gdb looks for "dumppcb" in a kernel crash dump. */
583 1.1 gwr struct pcb dumppcb;
584 1.1 gwr
585 1.1 gwr /*
586 1.1 gwr * Write a crash dump. The format while in swap is:
587 1.1 gwr * kcore_seg_t cpu_hdr;
588 1.1 gwr * cpu_kcore_hdr_t cpu_data;
589 1.86 thorpej * padding (PAGE_SIZE-sizeof(kcore_seg_t))
590 1.86 thorpej * pagemap (2*PAGE_SIZE)
591 1.1 gwr * physical memory...
592 1.1 gwr */
593 1.97 chs void
594 1.97 chs dumpsys(void)
595 1.1 gwr {
596 1.81 gehenna const struct bdevsw *dsw;
597 1.66 chs kcore_seg_t *kseg_p;
598 1.10 gwr cpu_kcore_hdr_t *chdr_p;
599 1.14 thorpej struct sun3x_kcore_hdr *sh;
600 1.14 thorpej phys_ram_seg_t *crs_p;
601 1.1 gwr char *vaddr;
602 1.73 tsutsui paddr_t paddr;
603 1.10 gwr int psize, todo, seg, segsz;
604 1.1 gwr daddr_t blkno;
605 1.1 gwr int error = 0;
606 1.1 gwr
607 1.1 gwr if (dumpdev == NODEV)
608 1.1 gwr return;
609 1.81 gehenna dsw = bdevsw_lookup(dumpdev);
610 1.81 gehenna if (dsw == NULL || dsw->d_psize == NULL)
611 1.81 gehenna return;
612 1.1 gwr
613 1.1 gwr /*
614 1.1 gwr * For dumps during autoconfiguration,
615 1.1 gwr * if dump device has already configured...
616 1.1 gwr */
617 1.1 gwr if (dumpsize == 0)
618 1.11 gwr cpu_dumpconf();
619 1.28 mycroft if (dumplo <= 0) {
620 1.117 he printf("\ndump to dev %u,%u not possible\n",
621 1.116 tsutsui major(dumpdev), minor(dumpdev));
622 1.1 gwr return;
623 1.28 mycroft }
624 1.1 gwr savectx(&dumppcb);
625 1.1 gwr
626 1.1 gwr psize = (*(dsw->d_psize))(dumpdev);
627 1.1 gwr if (psize == -1) {
628 1.1 gwr printf("dump area unavailable\n");
629 1.1 gwr return;
630 1.1 gwr }
631 1.1 gwr
632 1.117 he printf("\ndumping to dev %u,%u offset %ld\n",
633 1.116 tsutsui major(dumpdev), minor(dumpdev), dumplo);
634 1.1 gwr
635 1.1 gwr /*
636 1.71 tsutsui * Prepare the dump header
637 1.1 gwr */
638 1.71 tsutsui blkno = dumplo;
639 1.71 tsutsui todo = dumpsize; /* pages */
640 1.71 tsutsui vaddr = (char *)dumppage;
641 1.86 thorpej memset(vaddr, 0, PAGE_SIZE);
642 1.25 gwr
643 1.25 gwr /* Set pointers to all three parts. */
644 1.71 tsutsui kseg_p = (kcore_seg_t *)vaddr;
645 1.66 chs chdr_p = (cpu_kcore_hdr_t *)(kseg_p + 1);
646 1.14 thorpej sh = &chdr_p->un._sun3x;
647 1.25 gwr
648 1.25 gwr /* Fill in kcore_seg_t part. */
649 1.10 gwr CORE_SETMAGIC(*kseg_p, KCORE_MAGIC, MID_MACHINE, CORE_CPU);
650 1.71 tsutsui kseg_p->c_size = (ctob(DUMP_EXTRA) - sizeof(*kseg_p));
651 1.25 gwr
652 1.25 gwr /* Fill in cpu_kcore_hdr_t part. */
653 1.46 gwr strncpy(chdr_p->name, kernel_arch, sizeof(chdr_p->name));
654 1.86 thorpej chdr_p->page_size = PAGE_SIZE;
655 1.25 gwr chdr_p->kernbase = KERNBASE;
656 1.25 gwr
657 1.25 gwr /* Fill in the sun3x_kcore_hdr part. */
658 1.25 gwr pmap_kcore_hdr(sh);
659 1.10 gwr
660 1.71 tsutsui /* Write out the dump header. */
661 1.86 thorpej error = (*dsw->d_dump)(dumpdev, blkno, vaddr, PAGE_SIZE);
662 1.71 tsutsui if (error)
663 1.71 tsutsui goto fail;
664 1.86 thorpej blkno += btodb(PAGE_SIZE);
665 1.71 tsutsui
666 1.10 gwr /*
667 1.10 gwr * Now dump physical memory. Note that physical memory
668 1.10 gwr * might NOT be congiguous, so do it by segments.
669 1.10 gwr */
670 1.10 gwr
671 1.66 chs vaddr = (char *)vmmap; /* Borrow /dev/mem VA */
672 1.1 gwr
673 1.14 thorpej for (seg = 0; seg < SUN3X_NPHYS_RAM_SEGS; seg++) {
674 1.14 thorpej crs_p = &sh->ram_segs[seg];
675 1.10 gwr paddr = crs_p->start;
676 1.10 gwr segsz = crs_p->size;
677 1.1 gwr
678 1.10 gwr while (todo && (segsz > 0)) {
679 1.1 gwr
680 1.10 gwr /* Print pages left after every 16. */
681 1.10 gwr if ((todo & 0xf) == 0)
682 1.114 ad printf_nolog("\r%4d", todo);
683 1.10 gwr
684 1.10 gwr /* Make a temporary mapping for the page. */
685 1.120 he pmap_kenter_pa(vmmap, paddr | PMAP_NC, VM_PROT_READ, 0);
686 1.75 chris pmap_update(pmap_kernel());
687 1.86 thorpej error = (*dsw->d_dump)(dumpdev, blkno, vaddr,
688 1.86 thorpej PAGE_SIZE);
689 1.86 thorpej pmap_kremove(vmmap, PAGE_SIZE);
690 1.75 chris pmap_update(pmap_kernel());
691 1.10 gwr if (error)
692 1.10 gwr goto fail;
693 1.86 thorpej paddr += PAGE_SIZE;
694 1.86 thorpej segsz -= PAGE_SIZE;
695 1.86 thorpej blkno += btodb(PAGE_SIZE);
696 1.10 gwr todo--;
697 1.10 gwr }
698 1.10 gwr }
699 1.1 gwr printf("\rdump succeeded\n");
700 1.1 gwr return;
701 1.1 gwr fail:
702 1.1 gwr printf(" dump error=%d\n", error);
703 1.1 gwr }
704 1.1 gwr
705 1.97 chs static void
706 1.97 chs initcpu(void)
707 1.1 gwr {
708 1.1 gwr /* XXX: Enable RAM parity/ECC checking? */
709 1.1 gwr /* XXX: parityenable(); */
710 1.1 gwr
711 1.1 gwr #ifdef HAVECACHE
712 1.1 gwr cache_enable();
713 1.1 gwr #endif
714 1.1 gwr }
715 1.1 gwr
716 1.8 gwr /* straptrap() in trap.c */
717 1.1 gwr
718 1.1 gwr /* from hp300: badaddr() */
719 1.15 gwr /* peek_byte(), peek_word() moved to bus_subr.c */
720 1.1 gwr
721 1.1 gwr /* XXX: parityenable() ? */
722 1.7 gwr /* regdump() moved to regdump.c */
723 1.1 gwr
724 1.1 gwr /*
725 1.1 gwr * cpu_exec_aout_makecmds():
726 1.95 wiz * CPU-dependent a.out format hook for execve().
727 1.1 gwr *
728 1.1 gwr * Determine if the given exec package refers to something which we
729 1.1 gwr * understand and, if so, set up the vmcmds for it.
730 1.1 gwr */
731 1.97 chs int
732 1.102 christos cpu_exec_aout_makecmds(struct lwp *l, struct exec_package *epp)
733 1.1 gwr {
734 1.27 tv return ENOEXEC;
735 1.1 gwr }
736 1.123.2.1 rmind
737 1.123.2.1 rmind int
738 1.123.2.1 rmind mm_md_physacc(paddr_t pa, vm_prot_t prot)
739 1.123.2.1 rmind {
740 1.123.2.1 rmind
741 1.123.2.1 rmind return pmap_pa_exists(pa) ? 0 : EFAULT;
742 1.123.2.1 rmind }
743 1.123.2.1 rmind
744 1.123.2.1 rmind bool
745 1.123.2.1 rmind mm_md_direct_mapped_phys(paddr_t paddr, vaddr_t *vaddr)
746 1.123.2.1 rmind {
747 1.123.2.1 rmind extern paddr_t avail_start;
748 1.123.2.1 rmind
749 1.123.2.1 rmind if (paddr >= avail_start)
750 1.123.2.1 rmind return false;
751 1.123.2.1 rmind *vaddr = KERNBASE + paddr;
752 1.123.2.1 rmind return true;
753 1.123.2.1 rmind }
754 1.123.2.1 rmind
755 1.123.2.1 rmind /*
756 1.123.2.1 rmind * Allow access to the PROM mapping similiar to uvm_kernacc().
757 1.123.2.1 rmind */
758 1.123.2.1 rmind int
759 1.123.2.1 rmind mm_md_kernacc(void *ptr, vm_prot_t prot, bool *handled)
760 1.123.2.1 rmind {
761 1.123.2.1 rmind
762 1.123.2.1 rmind if ((vaddr_t)ptr < SUN3X_PROM_BASE || (vaddr_t)ptr > SUN3X_MONEND) {
763 1.123.2.1 rmind *handled = false;
764 1.123.2.1 rmind return 0;
765 1.123.2.1 rmind }
766 1.123.2.1 rmind
767 1.123.2.1 rmind *handled = true;
768 1.123.2.1 rmind /* Read in the PROM itself is OK. */
769 1.123.2.1 rmind if ((prot & VM_PROT_WRITE) == 0)
770 1.123.2.1 rmind return 0;
771 1.123.2.1 rmind
772 1.123.2.1 rmind /* PROM data page is OK for read/write. */
773 1.123.2.1 rmind if ((vaddr_t)ptr >= SUN3X_MONDATA &&
774 1.123.2.1 rmind (vaddr_t)ptr < SUN3X_MONDATA + PAGE_SIZE)
775 1.123.2.1 rmind return 0;
776 1.123.2.1 rmind return EFAULT;
777 1.123.2.1 rmind }
778