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