/*	$NetBSD: machdep.c,v 1.363 2021/10/09 20:00:41 tsutsui Exp $	*/

/*
 * Copyright (c) 1988 University of Utah.
 * Copyright (c) 1982, 1990 The Regents of the University of California.
 * All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * the Systems Programming Group of the University of Utah Computer
 * Science Department.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 */

/*-
 * Copyright (C) 1993	Allen K. Briggs, Chris P. Caputo,
 *			Michael L. Finch, Bradley A. Grantham, and
 *			Lawrence A. Kesteloot
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the Alice Group.
 * 4. The names of the Alice Group or any of its members may not be used
 *    to endorse or promote products derived from this software without
 *    specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE ALICE GROUP ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE ALICE GROUP BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 */
/*
 * from: Utah $Hdr: machdep.c 1.63 91/04/24$
 *
 *	@(#)machdep.c	7.16 (Berkeley) 6/3/91
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.363 2021/10/09 20:00:41 tsutsui Exp $");

#include "opt_adb.h"
#include "opt_compat_netbsd.h"
#include "opt_copy_symtab.h"
#include "opt_ddb.h"
#include "opt_ddbparam.h"
#include "opt_kgdb.h"
#include "opt_mac68k.h"
#include "opt_modular.h"

#include "akbd.h"
#include "genfb.h"
#include "macfb.h"
#include "zsc.h"

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/buf.h>
#include <sys/conf.h>
#include <sys/core.h>
#include <sys/exec.h>
#include <sys/exec_aout.h>		/* for MID_* */
#include <sys/extent.h>
#include <sys/file.h>
#include <sys/kcore.h>
#include <sys/kernel.h>
#include <sys/malloc.h>
#include <sys/mbuf.h>
#include <sys/mount.h>
#include <sys/msgbuf.h>
#include <sys/pool.h>
#include <sys/proc.h>
#include <sys/queue.h>
#include <sys/reboot.h>
#include <sys/signalvar.h>
#include <sys/syscallargs.h>
#include <sys/vnode.h>
#include <sys/ksyms.h>
#include <sys/module.h>
#ifdef	KGDB
#include <sys/kgdb.h>
#endif
#include <sys/exec_elf.h>
#include <sys/device.h>
#include <sys/cpu.h>

#include <m68k/cacheops.h>

#include <machine/db_machdep.h>
#include <ddb/db_sym.h>
#include <ddb/db_extern.h>

#include <machine/autoconf.h>
#include <machine/cpu.h>
#include <machine/reg.h>
#include <machine/pcb.h>
#include <machine/psl.h>
#include <machine/pte.h>
#include <machine/kcore.h>	/* XXX should be pulled in by sys/kcore.h */
#include <machine/video.h>

#define	MAXMEM	64*1024	/* XXX - from cmap.h */
#include <uvm/uvm_extern.h>

#include <sys/sysctl.h>

#include <dev/cons.h>
#include <dev/mm.h>

#include <machine/iopreg.h>
#include <machine/psc.h>
#include <machine/viareg.h>
#include <mac68k/mac68k/macrom.h>
#include <mac68k/dev/adbvar.h>
#if NAKBD > 0
#include <mac68k/dev/akbdvar.h>
#endif
#if NMACFB > 0
#include <mac68k/dev/macfbvar.h>
#endif
#include <mac68k/dev/zs_cons.h>

#include "ksyms.h"

int symsize, end, *ssym, *esym;

/* The following is used externally (sysctl_hw) */
char	machine[] = MACHINE;	/* from <machine/param.h> */

struct mac68k_machine_S mac68k_machine;

volatile u_char *Via1Base, *Via2Base, *PSCBase = NULL;
u_long	NuBusBase = NBBASE;
u_long	IOBase;

vaddr_t	SCSIBase;

/* These are used to map kernel space: */
extern int numranges;
extern u_long low[8];
extern u_long high[8];
extern int machineid;

/* These are used to map NuBus space: */
#define	NBMAXRANGES	16
int	nbnumranges;		/* = 0 == don't use the ranges */
u_long	nbphys[NBMAXRANGES];	/* Start physical addr of this range */
u_long	nblog[NBMAXRANGES];	/* Start logical addr of this range */
long	nblen[NBMAXRANGES];	/* Length of this range If the length is */
				/* negative, all phys addrs are the same. */

/* Definitions for the variables defined in machine/video.h */
struct mac68k_video mac68k_video;

/* Callback and cookie to run bell */
int	(*mac68k_bell_callback)(void *, int, int, int);
void *	mac68k_bell_cookie;

struct vm_map *phys_map = NULL;

int	maxmem;			/* max memory per process */

/*
 * Extent maps to manage all memory space, including I/O ranges.  Allocate
 * storage for 8 regions in each, initially.  Later, iomem_malloc_safe
 * will indicate that it's safe to use malloc() to dynamically allocate
 * region descriptors.
 *
 * The extent maps are not static!  Machine-dependent NuBus and on-board
 * I/O routines need access to them for bus address space allocation.
 */
static long iomem_ex_storage[EXTENT_FIXED_STORAGE_SIZE(8) / sizeof(long)];
struct extent *iomem_ex;
int iomem_malloc_safe;

/* Our exported CPU info; we can have only one. */  
struct cpu_info cpu_info_store;

static void	identifycpu(void);
static u_long	get_physical(u_int, u_long *);

void	initcpu(void);
int	cpu_dumpsize(void);
int	cpu_dump(int (*)(dev_t, daddr_t, void *, size_t), daddr_t *);
void	cpu_init_kcore_hdr(void);

void		getenvvars(u_long, char *);
static long	getenv(const char *);

/* functions called from locore.s */
void	dumpsys(void);
void	mac68k_init(void);
void	straytrap(int, int);
void	nmihand(struct frame);

/*
 * Machine-dependent crash dump header info.
 */
cpu_kcore_hdr_t cpu_kcore_hdr;

/*
 * XXX: For zs serial driver. We always initialize the base address
 * to avoid a bunch of #ifdefs.
 */
volatile unsigned char *sccA = 0;

/*
 * Early initialization, before main() is called.
 */
void
mac68k_init(void)
{
	int i;
	extern vaddr_t avail_start;

	/*
	 * Tell the VM system about available physical memory.
	 * Notice that we don't need to worry about avail_end here
	 * since it's equal to high[numranges-1].
	 */
	for (i = 0; i < numranges; i++) {
		if (low[i] <= avail_start && avail_start < high[i])
			uvm_page_physload(atop(avail_start), atop(high[i]),
			    atop(avail_start), atop(high[i]),
			    VM_FREELIST_DEFAULT);
		else
			uvm_page_physload(atop(low[i]), atop(high[i]),
			    atop(low[i]), atop(high[i]),
			    VM_FREELIST_DEFAULT);
	}

	/*
	 * Initialize the I/O mem extent map.
	 * Note: we don't have to check the return value since
	 * creation of a fixed extent map will never fail (since
	 * descriptor storage has already been allocated).
	 *
	 * N.B. The iomem extent manages _all_ physical addresses
	 * on the machine.  When the amount of RAM is found, all
	 * extents of RAM are allocated from the map.
	 */
	iomem_ex = extent_create("iomem", 0x0, 0xffffffff,
	    (void *)iomem_ex_storage, sizeof(iomem_ex_storage),
	    EX_NOCOALESCE|EX_NOWAIT);

	/* Initialize the interrupt handlers. */
	intr_init();

	/* Initialize the IOPs (if present) */
	iop_init(1);

	/*
	 * Initialize error message buffer (at end of core).
	 * high[numranges-1] was decremented in pmap_bootstrap.
	 */
	for (i = 0; i < btoc(MSGBUFSIZE); i++)
		pmap_enter(pmap_kernel(), (vaddr_t)msgbufaddr + i * PAGE_SIZE,
		    high[numranges - 1] + i * PAGE_SIZE,
		    VM_PROT_READ|VM_PROT_WRITE,
		    VM_PROT_READ|VM_PROT_WRITE|PMAP_WIRED);
	initmsgbuf(msgbufaddr, m68k_round_page(MSGBUFSIZE));
	pmap_update(pmap_kernel());
}

/*
 * Console initialization: called early on from main,
 * before vm init or startup.  Do enough configuration
 * to choose and initialize a console.
 */
void
consinit(void)
{
	/*
	 * Generic console: sys/dev/cons.c
	 *	Initializes either ite or ser as console.
	 *	Can be called from locore.s and init_main.c.  (Ugh.)
	 */
	static int init;	/* = 0 */

	if (!init) {
		cninit();
		init = 1;
	} else {
#if NAKBD > 0 && (NMACFB + NGENFB) > 0
		/*
		 * XXX  This is an evil hack on top of an evil hack!
		 *
		 * With the graybar stuff, we've got a catch-22:  we need
		 * to do at least some console setup really early on, even
		 * before we're running with the mappings we need.  On
		 * the other hand, we're not nearly ready to do anything
		 * with wscons or the ADB driver at that point.
		 *
		 * To get around this, maccninit() ignores the first call
		 * it gets (from cninit(), if not on a serial console).
		 * Once we're here, we call maccninit() again, which sets
		 * up the console devices and does the appropriate wscons
		 * initialization.
		 */
		if (mac68k_machine.serial_console == 0) {
			void maccninit(struct consdev *);
			maccninit(NULL);
		}
#endif

		mac68k_calibrate_delay();

#if NZSC > 0 && defined(KGDB)
		zs_kgdb_init();
#endif
#if NKSYMS || defined(DDB) || defined(MODULAR)
		/*
		 * Initialize kernel debugger, if compiled in.
		 */

		ksyms_addsyms_elf(symsize, ssym, esym);
#endif

		if (boothowto & RB_KDB) {
#ifdef KGDB
			/* XXX - Ask on console for kgdb_dev? */
			/* Note: this will just return if kgdb_dev==NODEV */
			kgdb_connect(1);
#else	/* KGDB */
#ifdef DDB
			/* Enter DDB.  We don't have a monitor PROM. */
			Debugger();
#endif /* DDB */
#endif	/* KGDB */
		}
	}
}

#define CURRENTBOOTERVER	111

/*
 * cpu_startup: allocate memory for variable-sized tables, make
 * (most of) kernel text read-only, and other miscellaneous bits
 */
void
cpu_startup(void)
{
	int vers;
	vaddr_t minaddr, maxaddr;
	int xdelay;
	char pbuf[9];

	/*
	 * Initialize the kernel crash dump header.
	 */
	cpu_init_kcore_hdr();

	/*
	 * Good {morning,afternoon,evening,night}.
	 */
	printf("%s%s", copyright, version);
	identifycpu();

	vers = mac68k_machine.booter_version;
	if (vers < CURRENTBOOTERVER) {
		/* fix older booters with indicies, not versions */
		if (vers < 100)
			vers += 99;

		printf("\nYou booted with booter version %d.%d.\n",
		    vers / 100, vers % 100);
		printf("Booter version %d.%d is necessary to fully support\n",
		    CURRENTBOOTERVER / 100, CURRENTBOOTERVER % 100);
		printf("this kernel.\n\n");
		for (xdelay = 0; xdelay < 1000000; xdelay++);
	}
	format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
	printf("total memory = %s\n", pbuf);

	minaddr = 0;
	/*
	 * Allocate a submap for physio
	 */
	phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
	    VM_PHYS_SIZE, 0, false, NULL);

	format_bytes(pbuf, sizeof(pbuf), ptoa(uvm_availmem(false)));
	printf("avail memory = %s\n", pbuf);

	/*
	 * Set up CPU-specific registers, cache, etc.
	 */
	initcpu();

	/* Safe for extent allocation to use malloc now. */
	iomem_malloc_safe = 1;
}

void
initcpu(void)
{
	/* Invalidate supervisor mode data cache. */
	DCIS();
}

void doboot(void) __attribute__((__noreturn__));

int	waittime = -1;
struct pcb dumppcb;

void
cpu_reboot(int howto, char *bootstr)
{
	struct pcb *pcb = lwp_getpcb(curlwp);
	extern u_long maxaddr;

	/* take a snap shot before clobbering any registers */
	if (pcb != NULL)
		savectx(pcb);

	/* If system is cold, just halt. */
	if (cold) {
		howto |= RB_HALT;
		goto haltsys;
	}

	boothowto = howto;
	if ((howto & RB_NOSYNC) == 0 && waittime < 0) {
		waittime = 0;
		vfs_shutdown();
# ifdef DIAGNOSTIC
		printf("NetBSD/mac68k does not trust itself to update the "
		    "RTC on shutdown.\n");
# endif
	}

	/* Disable interrupts. */
	splhigh();

	/* If rebooting and a dump is requested, do it. */
	if (howto & RB_DUMP)
		dumpsys();

 haltsys:
	/* Run any shutdown hooks. */
	doshutdownhooks();

	pmf_system_shutdown(boothowto);

	if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
		/* First try to power down under VIA control. */
		via_powerdown();

#ifndef MRG_ADB
		/*
		 * Shut down machines whose power functions are accessed
		 * via modified ADB calls.  adb_poweroff() is available
		 * only when the MRG ADB is not being used.
		 */
		adb_poweroff();
#endif
		/*
		 * RB_POWERDOWN implies RB_HALT... fall into it...
		 */
	}

	if (howto & RB_HALT) {
		printf("\n");
		printf("The operating system has halted.\n");
		printf("Please press any key to reboot.\n\n");
		cnpollc(1);
		(void)cngetc();
		cnpollc(0);
	}

	/* Map the last physical page VA = PA for doboot() */
	pmap_enter(pmap_kernel(), (vaddr_t)maxaddr, (vaddr_t)maxaddr,
	    VM_PROT_ALL, VM_PROT_ALL|PMAP_WIRED);
	pmap_update(pmap_kernel());

	printf("rebooting...\n");
	DELAY(1000000);
	doboot();
	/* NOTREACHED */
}

/*
 * Initialize the kernel crash dump header.
 */
void
cpu_init_kcore_hdr(void)
{
	extern int end;
	cpu_kcore_hdr_t *h = &cpu_kcore_hdr;
	struct m68k_kcore_hdr *m = &h->un._m68k;
	int i;

	memset(&cpu_kcore_hdr, 0, sizeof(cpu_kcore_hdr));

	/*
	 * Initialize the `dispatcher' portion of the header.
	 */
	strcpy(h->name, machine);
	h->page_size = PAGE_SIZE;
	h->kernbase = KERNBASE;

	/*
	 * Fill in information about our MMU configuration.
	 */
	m->mmutype	= mmutype;
	m->sg_v		= SG_V;
	m->sg_frame	= SG_FRAME;
	m->sg_ishift	= SG_ISHIFT;
	m->sg_pmask	= SG_PMASK;
	m->sg40_shift1	= SG4_SHIFT1;
	m->sg40_mask2	= SG4_MASK2;
	m->sg40_shift2	= SG4_SHIFT2;
	m->sg40_mask3	= SG4_MASK3;
	m->sg40_shift3	= SG4_SHIFT3;
	m->sg40_addr1	= SG4_ADDR1;
	m->sg40_addr2	= SG4_ADDR2;
	m->pg_v		= PG_V;
	m->pg_frame	= PG_FRAME;

	/*
	 * Initialize pointer to kernel segment table.
	 */
	m->sysseg_pa = (u_int32_t)(pmap_kernel()->pm_stpa);

	/*
	 * Initialize relocation value such that:
	 *
	 *	pa = (va - KERNBASE) + reloc
	 */
	m->reloc = load_addr;

	/*
	 * Define the end of the relocatable range.
	 */
	m->relocend = (u_int32_t)&end;

	/*
	 * mac68k has multiple RAM segments on some models.
	 */
	for (i = 0; i < numranges; i++) {
		m->ram_segs[i].start = low[i];
		m->ram_segs[i].size  = high[i] - low[i];
	}
}

/*
 * Compute the size of the machine-dependent crash dump header.
 * Returns size in disk blocks.
 */

#define CHDRSIZE (ALIGN(sizeof(kcore_seg_t)) + ALIGN(sizeof(cpu_kcore_hdr_t)))
#define MDHDRSIZE roundup(CHDRSIZE, dbtob(1))

int
cpu_dumpsize(void)
{

	return btodb(MDHDRSIZE);
}

/*
 * Called by dumpsys() to dump the machine-dependent header.
 */
int
cpu_dump(int (*dump)(dev_t, daddr_t, void *, size_t), daddr_t *blknop)
{
	int buf[MDHDRSIZE / sizeof(int)];
	cpu_kcore_hdr_t *chdr;
	kcore_seg_t *kseg;
	int error;

	kseg = (kcore_seg_t *)buf;
	chdr = (cpu_kcore_hdr_t *)&buf[ALIGN(sizeof(kcore_seg_t)) /
	    sizeof(int)];

	/* Create the segment header. */
	CORE_SETMAGIC(*kseg, KCORE_MAGIC, MID_MACHINE, CORE_CPU);
	kseg->c_size = MDHDRSIZE - ALIGN(sizeof(kcore_seg_t));

	memcpy(chdr, &cpu_kcore_hdr, sizeof(cpu_kcore_hdr_t));
	error = (*dump)(dumpdev, *blknop, (void *)buf, sizeof(buf));
	*blknop += btodb(sizeof(buf));
	return (error);
}

/*
 * These variables are needed by /sbin/savecore
 */
u_int32_t dumpmag = 0x8fca0101;	/* magic number */
int	dumpsize = 0;		/* pages */
long	dumplo = 0;		/* blocks */

/*
 * This is called by main to set dumplo and dumpsize.
 * Dumps always skip the first PAGE_SIZE of disk space in
 * case there might be a disk label stored there.  If there
 * is extra space, put dump at the end to reduce the chance
 * that swapping trashes it.
 */
void
cpu_dumpconf(void)
{
	cpu_kcore_hdr_t *h = &cpu_kcore_hdr;
	struct m68k_kcore_hdr *m = &h->un._m68k;
	int chdrsize;	/* size of dump header */
	int nblks;	/* size of dump area */
	int i;

	if (dumpdev == NODEV)
		return;

	nblks = bdev_size(dumpdev);
	chdrsize = cpu_dumpsize();

	dumpsize = 0;
	for (i = 0; i < M68K_NPHYS_RAM_SEGS && m->ram_segs[i].size; i++)
		dumpsize += btoc(m->ram_segs[i].size);

	/*
	 * Check to see if we will fit.  Note we always skip the
	 * first PAGE_SIZE in case there is a disk label there.
	 */
	if (nblks < (ctod(dumpsize) + chdrsize + ctod(1))) {
		dumpsize = 0;
		dumplo = -1;
		return;
	}

	/*
	 * Put dump at the end of the partition.
	 */
	dumplo = (nblks - 1) - ctod(dumpsize) - chdrsize;
}

void
dumpsys(void)
{
	cpu_kcore_hdr_t *h = &cpu_kcore_hdr;
	struct m68k_kcore_hdr *m = &h->un._m68k;
	const struct bdevsw *bdev;
	daddr_t blkno;		/* current block to write */
				/* dump routine */
	int (*dump)(dev_t, daddr_t, void *, size_t);
	int pg;			/* page being dumped */
	paddr_t maddr;		/* PA being dumped */
	int seg;		/* RAM segment being dumped */
	int error;		/* error code from (*dump)() */

	/* XXX initialized here because of gcc lossage */
	seg = 0;
	maddr = m->ram_segs[seg].start;
	pg = 0;

	/* Make sure dump device is valid. */
	if (dumpdev == NODEV)
		return;
	bdev = bdevsw_lookup(dumpdev);
	if (bdev == NULL)
		return;
	if (dumpsize == 0) {
		cpu_dumpconf();
		if (dumpsize == 0)
			return;
	}
	if (dumplo <= 0) {
		printf("\ndump to dev %u,%u not possible\n",
		    major(dumpdev), minor(dumpdev));
		return;
	}
	dump = bdev->d_dump;
	blkno = dumplo;

	printf("\ndumping to dev %u,%u offset %ld\n",
	    major(dumpdev), minor(dumpdev), dumplo);

	printf("dump ");

	/* Write the dump header. */
	error = cpu_dump(dump, &blkno);
	if (error)
		goto bad;

	for (pg = 0; pg < dumpsize; pg++) {
#define NPGMB	(1024*1024/PAGE_SIZE)
		/* print out how many MBs we have dumped */
		if (pg && (pg % NPGMB) == 0)
			printf("%d ", pg / NPGMB);
#undef NPGMB
		while (maddr >=
		    (m->ram_segs[seg].start + m->ram_segs[seg].size)) {
			if (++seg >= M68K_NPHYS_RAM_SEGS ||
			    m->ram_segs[seg].size == 0) {
				error = EINVAL;		/* XXX ?? */
				goto bad;
			}
			maddr = m->ram_segs[seg].start;
		}
		pmap_enter(pmap_kernel(), (vaddr_t)vmmap, maddr,
		    VM_PROT_READ, VM_PROT_READ|PMAP_WIRED);
		pmap_update(pmap_kernel());

		error = (*dump)(dumpdev, blkno, vmmap, PAGE_SIZE);
 bad:
		switch (error) {
		case 0:
			maddr += PAGE_SIZE;
			blkno += btodb(PAGE_SIZE);
			break;

		case ENXIO:
			printf("device bad\n");
			return;

		case EFAULT:
			printf("device not ready\n");
			return;

		case EINVAL:
			printf("area improper\n");
			return;

		case EIO:
			printf("i/o error\n");
			return;

		case EINTR:
			printf("aborted from console\n");
			return;

		default:
			printf("error %d\n", error);
			return;
		}
	}
	printf("succeeded\n");
}

void straytrap(int, int);

void
straytrap(int pc, int evec)
{
	printf("unexpected trap; vector offset 0x%x from 0x%x.\n",
	    (int)(evec & 0xfff), pc);
#ifdef DDB
	Debugger();
#endif
}

/*
 * Level 7 interrupts can be caused by the keyboard or parity errors.
 */
void	nmihand(struct frame);

void
nmihand(struct frame frame)
{
	static int nmihanddeep = 0;

	if (nmihanddeep++)
		return;
/*	regdump((struct trapframe *)&frame, 128);
	dumptrace(); */
#ifdef DDB
	printf("Panic switch: PC is 0x%x.\n", frame.f_pc);
	Debugger();
#endif
	nmihanddeep = 0;
}

/*
 * It should be possible to probe for the top of RAM, but Apple has
 * memory structured so that in at least some cases, it's possible
 * for RAM to be aliased across all memory--or for it to appear that
 * there is more RAM than there really is.
 */
int	get_top_of_ram(void);

int
get_top_of_ram(void)
{
	return ((mac68k_machine.mach_memsize * (1024 * 1024)) - PAGE_SIZE);
}

/*
 * machine dependent system variables.
 */
SYSCTL_SETUP(sysctl_machdep_setup, "sysctl machdep subtree setup")
{

	sysctl_createv(clog, 0, NULL, NULL,
		       CTLFLAG_PERMANENT,
		       CTLTYPE_NODE, "machdep", NULL,
		       NULL, 0, NULL, 0,
		       CTL_MACHDEP, CTL_EOL);

	sysctl_createv(clog, 0, NULL, NULL,
		       CTLFLAG_PERMANENT,
		       CTLTYPE_STRUCT, "console_device", NULL,
		       sysctl_consdev, 0, NULL, sizeof(dev_t),
		       CTL_MACHDEP, CPU_CONSDEV, CTL_EOL);
}

int
cpu_exec_aout_makecmds(struct lwp *l, struct exec_package *epp)
{
	int error = ENOEXEC;

#ifdef COMPAT_NOMID
	/* Check to see if MID == 0. */
	if (((struct exec *)epp->ep_hdr)->a_midmag == ZMAGIC)
		return exec_aout_prep_oldzmagic(l->l_proc, epp);
#endif

	return error;
}

#ifdef MODULAR
/*
 * Push any modules loaded by the bootloader etc.
 */
void
module_init_md(void)
{
}
#endif

static char *envbuf = NULL;

/*
 * getenvvars: Grab a few useful variables
 */

void
getenvvars(u_long flag, char *buf)
{
	extern u_long bootdev;
	extern u_long macos_boottime, MacOSROMBase;
	extern long macos_gmtbias;
	int root_scsi_id;
	u_long root_ata_dev;
	int i;
	Elf_Ehdr *ehdr;
	Elf_Shdr *shp;
	vaddr_t minsym;

	/*
	 * If flag & 0x80000000 == 0, then we're booting with the old booter
	 * and we should freak out.
	 */
	if ((flag & 0x80000000) == 0) {
		/* Freak out; print something if that becomes available */
	} else
		envbuf = buf;

	/* These next two should give us mapped video & serial */
	/* We need these for pre-mapping graybars & echo, but probably */
	/* only on MacII or LC.  --  XXX */
	/* mac68k_video.mv_kvaddr = getenv("MACOS_VIDEO"); */

	mac68k_video.mv_kvaddr = getenv("VIDEO_ADDR");
	mac68k_video.mv_stride = getenv("ROW_BYTES");
	mac68k_video.mv_depth = getenv("SCREEN_DEPTH");
	mac68k_video.mv_width = getenv("DIMENSIONS") & 0xffff;
	mac68k_video.mv_height = (getenv("DIMENSIONS") >> 16) & 0xffff;

	/*
	 * More misc stuff from booter.
	 */
	mac68k_machine.machineid = machineid = getenv("MACHINEID");
	mac68k_machine.mach_processor = getenv("PROCESSOR");
#ifndef MAC68K_MEMSIZE
	mac68k_machine.mach_memsize = getenv("MEMSIZE");
#else
	mac68k_machine.mach_memsize = MAC68K_MEMSIZE;
#endif
	mac68k_machine.do_graybars = getenv("GRAYBARS");
	mac68k_machine.serial_boot_echo = getenv("SERIALECHO");
	mac68k_machine.serial_console = getenv("SERIALCONSOLE");

	mac68k_machine.modem_flags = getenv("SERIAL_MODEM_FLAGS");
	mac68k_machine.modem_cts_clk = getenv("SERIAL_MODEM_HSKICLK");
	mac68k_machine.modem_dcd_clk = getenv("SERIAL_MODEM_GPICLK");
	mac68k_machine.modem_d_speed = getenv("SERIAL_MODEM_DSPEED");
	mac68k_machine.print_flags = getenv("SERIAL_PRINT_FLAGS");
	mac68k_machine.print_cts_clk = getenv("SERIAL_PRINT_HSKICLK");
	mac68k_machine.print_dcd_clk = getenv("SERIAL_PRINT_GPICLK");
	mac68k_machine.print_d_speed = getenv("SERIAL_PRINT_DSPEED");
	mac68k_machine.booter_version = getenv("BOOTERVER");

	/*
	 * For now, we assume that the boot device is off the first controller.
	 * Booter versions 1.11.0 and later set a flag to tell us to construct
	 * bootdev using the SCSI ID passed in via the environment.
	 */
	root_scsi_id = getenv("ROOT_SCSI_ID");
	root_ata_dev = getenv("ROOT_ATA_DEV");
	if (((mac68k_machine.booter_version < CURRENTBOOTERVER) ||
	    (flag & 0x40000)) && bootdev == 0) {
		if (root_ata_dev) {
			/*
			 * Consider only internal IDE drive.
			 * Buses(=channel) will be always 0.
			 * Because 68k Mac has only single channel.
			 */
			switch (root_ata_dev) {
			default: /* fall through */
			case 0xffffffe0: /* buses,drive = 0,0 */
			case 0x20: /* buses,drive = 1,0 */
			case 0x21: /* buses,drive = 1,1 */
				bootdev = MAKEBOOTDEV(22, 0, 0, 0, 0);
				break;
			case 0xffffffe1: /* buses,drive = 0,1 */
				bootdev = MAKEBOOTDEV(22, 0, 0, 1, 0);
				break;
			}
		} else {
			bootdev = MAKEBOOTDEV(4, 0, 0, root_scsi_id, 0);
		}
	}

	/*
	 * Booter 1.11.3 and later pass a BOOTHOWTO variable with the
	 * appropriate bits set.
	 */
	boothowto = getenv("BOOTHOWTO");
	if (boothowto == 0)
		boothowto = getenv("SINGLE_USER");

	/*
	 * Get end of symbols for kernel debugging
	 */
	esym = (int *)getenv("END_SYM");
#ifndef makeoptions_COPY_SYMTAB
	if (esym == (int *)0)
#endif
		esym = (int *)&end;

	/* Get MacOS time */
	macos_boottime = getenv("BOOTTIME");

	/* Save GMT BIAS saved in Booter parameters dialog box */
	macos_gmtbias = getenv("GMTBIAS");

	/*
	 * Save globals stolen from MacOS
	 */

	ROMBase = (void *)getenv("ROMBASE");
	if (ROMBase == (void *)0) {
		ROMBase = (void *)ROMBASE;
	}
	MacOSROMBase = (unsigned long)ROMBase;
	TimeDBRA = getenv("TIMEDBRA");
	ADBDelay = (u_short)getenv("ADBDELAY");
	HwCfgFlags  = getenv("HWCFGFLAGS");
	HwCfgFlags2 = getenv("HWCFGFLAG2");
	HwCfgFlags3 = getenv("HWCFGFLAG3");
 	ADBReInit_JTBL = getenv("ADBREINIT_JTBL");
 	mrg_ADBIntrPtr = (void *)getenv("ADBINTERRUPT");

	/*
	 * Check the ELF headers.
	 */

	ehdr = (void *)getenv("MARK_SYM");
	if (memcmp(ehdr->e_ident, ELFMAG, SELFMAG) != 0 ||
	    ehdr->e_ident[EI_CLASS] != ELFCLASS32) {
		return;
	}

	/*
	 * Find the end of the symbols and strings.
	 */

	minsym = ~0;
	shp = (Elf_Shdr *)(end + ehdr->e_shoff);
	for (i = 0; i < ehdr->e_shnum; i++) {
		if (shp[i].sh_type != SHT_SYMTAB &&
		    shp[i].sh_type != SHT_STRTAB) {
			continue;
		}
		minsym = MIN(minsym, (vaddr_t)end + shp[i].sh_offset);
	}

	symsize = 1;
	ssym = (int *)ehdr;
}

static long
getenv(const char *str)
{
	/*
	 * Returns the value of the environment variable "str".
	 *
	 * Format of the buffer is "var=val\0var=val\0...\0var=val\0\0".
	 *
	 * Returns 0 if the variable is not there, and 1 if the variable is
	 * there without an "=val".
	 */

	char *s;
	const char *s1;
	int val, base;

	s = envbuf;
	while (1) {
		for (s1 = str; *s1 && *s && *s != '='; s1++, s++) {
			if (toupper(*s1) != toupper(*s)) {
				break;
			}
		}
		if (*s1) {	/* No match */
			while (*s) {
				s++;
			}
			s++;
			if (*s == '\0') {	/* Not found */
				/* Boolean flags are false (0) if not there */
				return 0;
			}
			continue;
		}
		if (*s == '=') {/* Has a value */
			s++;
			val = 0;
			base = 10;
			if (*s == '0' && (*(s + 1) == 'x' || *(s + 1) == 'X')) {
				base = 16;
				s += 2;
			} else
				if (*s == '0') {
					base = 8;
				}
			while (*s) {
				if (toupper(*s) >= 'A' && toupper(*s) <= 'F') {
					val = val * base + toupper(*s) - 'A' + 10;
				} else {
					val = val * base + (*s - '0');
				}
				s++;
			}
			return val;
		} else {	/* TRUE (1) */
			return 1;
		}
	}
}

/*
 * ROM Vector information for calling drivers in ROMs
 *
 * According to information published on the Web by Apple, there have
 * been 9 different ROM families used in the Mac since the introduction
 * of the Lisa/XL through the latest PowerMacs (May 96).  Each family
 * has zero or more version variants and in some cases a version variant
 * may exist in one than one length format.  Generally any one specific
 * Mac will use a common set of routines within the ROM and a model-specific
 * set also in the ROM.  Luckily most of the routines used by NetBSD fall
 * into the common set and can therefore be defined in the ROM Family.
 * The offset addresses (address minus the ROM Base) of these common routines
 * is the same for all machines which use that ROM.  The offset addresses of
 * the machine-specific routines is generally different for each machine.
 * The machine-specific routines currently used by NetBSD/mac68k include:
 *       ADB_interrupt, PM_interrpt, ADBBase+130_interrupt,
 *       PMgrOp, jClkNoMem, Egret, InitEgret, and ADBReInit_JTBL
 *
 * It is possible that the routine at "jClkNoMem" is a common routine, but
 * some variation in addresses has been seen.  Also, execept for the very
 * earliest machines which used Egret, the machine-specific value of the
 * Egret routine may be unimportant as the machine-specific InitEgret code
 * seems to always set the OS Trap vector for Egret.
 *
 * Only three of the nine different ROMs are important to NetBSD/mac68k.
 * All other ROMs are used in early model Macs which are unable to run
 * NetBSD due to other hardware limitations such as 68000 CPU, no MMU
 * capability, or used only in PowerMacs.  The three that we are interested
 * in are:
 *
 * ROM Family $0178 - used in the II, IIx, IIcx, and SE/30
 *            All machines which use this ROM are now supported by NetBSD.
 *            There are no machine-dependent routines in these ROMs used by
 *            NetBSD/mac68k.  This ROM is always 256K in length.
 *
 * ROM Family $067c - used in Classic, Color Classic, Color Classic II,
 *                      IIci, IIsi, IIvi, IIvx, IIfx, LC, LC II, LC III,
 *                      LC III+, LC475, LC520, LC550, LC575, LC580, LC630,
 *                      MacTV, P200, P250, P275, P400/405/410/430, P450,
 *                      P460/466/467, P475/476, P520, P550/560, P575/577/578,
 *                      P580/588, P600, P630/631/635/636/637/638/640, Q605,
 *                      Q610, C610, Q630, C650, Q650, Q700, Q800, Q900, Q950,
 *                      PB140, PB145/145B, PB150, PB160, PB165, PB165c, PB170,
 *                      PB180, PB180c, Duo 210, Duo 230, Duo 250, Duo 270c,
 *                      Duo280, Duo 280c, PB 520/520c/540/540c/550
 *             This is the so-called "Universal" ROM used in almost all 68K
 *             machines. There are machine-dependent and machine-independent
 *             routines used by NetBSD/mac68k in this ROM, and except for the
 *             PowerBooks and the Duos, this ROM seems to be fairly well
 *             known by NetBSD/mac68k.  Desktop machines listed here that are
 *             not yet running NetBSD probably only lack the necessary
 *             addresses for the machine-dependent routines, or are waiting
 *             for IDE disk support.  This ROM is generally 1Meg in length,
 *             however when used in the IIci, IIfx, IIsi, LC, Classic II, and
 *             P400/405/410/430 it is 512K in length, and when used in the
 *             PB 520/520c/540/540c/550 it is 2Meg in length.
 *
 * ROM Family - $077d - used in C660AV/Q660AV, Q840AV
 *             The "Universal" ROM used on the PowerMacs and used in the
 *             68K line for the AV Macs only.  When used in the 68K AV
 *             machines the ROM is 2Meg in length; all uses in the PowerMac
 *             use a length of 4Meg.
 *
 *		Bob Nestor - <rnestor@metronet.com>
 */
static romvec_t romvecs[] =
{
	/* Vectors verified for II, IIx, IIcx, SE/30 */
	{			/* 0 */
		"Mac II class ROMs",
		(void *)0x40807002,	/* where does ADB interrupt */
		(void *)0x0,		/* PM interrupt (?) */
		(void *)0x4080a4d8,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x40807778,	/* CountADBs */
		(void *)0x40807792,	/* GetIndADB */
		(void *)0x408077be,	/* GetADBInfo */
		(void *)0x408077c4,	/* SetADBInfo */
		(void *)0x40807704,	/* ADBReInit */
		(void *)0x408072fa,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080d6d0,	/* WriteParam */
		(void *)0x4080d6fa,	/* SetDateTime */
		(void *)0x4080dbe8,	/* InitUtil */
		(void *)0x4080dd78,	/* ReadXPRam */
		(void *)0x4080dd82,	/* WriteXPRam */
		(void *)0x4080ddd6,	/* jClkNoMem */
		(void *)0x0,		/* ADBAlternateInit */
		(void *)0x0,		/* Egret */
		(void *)0x0,		/* InitEgret */
		(void *)0x0,		/* ADBReInit_JTBL */
		(void *)0x0,		/* ROMResourceMap List Head */
		(void *)0x40814c58,	/* FixDiv */
		(void *)0x40814b64,	/* FixMul */
	},
	/*
	 * Vectors verified for PB 140, PB 145, PB 170
	 * (PB 100?)
	 */
	{			/* 1 */
		"Powerbook class ROMs",
		(void *)0x4088ae5e,	/* ADB interrupt */
		(void *)0x408885ec,	/* PB ADB interrupt */
		(void *)0x4088ae0e,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x408888ec,	/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x4080b1e4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x0,		/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for IIsi, IIvx, IIvi
	 */
	{			/* 2 */
		"Mac IIsi class ROMs",
		(void *)0x40814912,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x408150f0,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x4080b1e4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x0,		/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for Mac Classic II and LC II
	 * (Other LC's?  680x0 Performas?)
	 */
	{			/* 3 */
		"Mac Classic II ROMs",
		(void *)0x40a14912,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x40a150f0,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x40a0a360,	/* CountADBs */
		(void *)0x40a0a37a,	/* GetIndADB */
		(void *)0x40a0a3a6,	/* GetADBInfo */
		(void *)0x40a0a3ac,	/* SetADBInfo */
		(void *)0x40a0a752,	/* ADBReInit */
		(void *)0x40a0a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x40a0c05c,	/* WriteParam */
		(void *)0x40a0c086,	/* SetDateTime */
		(void *)0x40a0c5cc,	/* InitUtil */
		(void *)0x40a0b186,	/* ReadXPRam */
		(void *)0x40a0b190,	/* WriteXPRam */
		(void *)0x40a0b1e4,	/* jClkNoMem */
		(void *)0x40a0a818,	/* ADBAlternateInit */
		(void *)0x40a14800,	/* Egret */
		(void *)0x40a147c4,	/* InitEgret */
		(void *)0x40a03ba6,	/* ADBReInit_JTBL */
		(void *)0x40a7eb90,	/* ROMResourceMap List Head */
		(void *)0x40a1c406,	/* FixDiv, wild guess */
		(void *)0x40a1c312,	/* FixMul, wild guess */
	},
	/*
	 * Vectors verified for IIci, Q700
	 */
	{			/* 4 */
		"Mac IIci/Q700 ROMs",
		(void *)0x4080a700,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x4080a5aa,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x4080b1e4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x0,		/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x0,		/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for Duo 230, PB 180, PB 160, PB 165/165C
	 * (Duo 210?  Duo 250?  Duo 270?)
	 */
	{			/* 5 */
		"2nd Powerbook class ROMs",
		(void *)0x408b2eec,	/* ADB interrupt */
		(void *)0x408885ec,	/* PB ADB interrupt */
		(void *)0x408b2e76,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x408888ec,	/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b39b2,	/* jClkNoMem */	/* From PB180 */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x40888400,	/* InitPwrMgr */ /* From PB180 */
		(void *)0x408cce28,	/* ADBReInit_JTBL -- from PB160*/
		(void *)0x4087eb90,	/* ROMRsrcMap List Head -- from PB160*/
		(void *)0x4081c406,	/* FixDiv, wild guess */
		(void *)0x4081c312,	/* FixMul, wild guess */
	},
	/*
	 * Vectors verified for the Quadra, Centris 650
	 *  (610, Q800?)
	 */
	{			/* 6 */
		"Quadra/Centris ROMs",
		(void *)0x408b2dea,	/* ADB int */
		(void *)0x0,		/* PM intr */
 		(void *)0x408b2c72,	/* ADBBase + 130 */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x40809ae6,	/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b39b6,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408d2b64,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv, wild guess */
		(void *)0x4081c312,	/* FixMul, wild guess */
	},
	/*
	 * Vectors verified for the Quadra 660AV
	 *  (Quadra 840AV?)
	 */
	{			/* 7 */
		"Quadra AV ROMs",
		(void *)0x4080cac6,	/* ADB int */
		(void *)0x0,		/* PM int */
		(void *)0x40805cd4,	/* ADBBase + 130 */
		(void *)0x40839600,	/* CountADBs */
		(void *)0x4083961a,	/* GetIndADB */
		(void *)0x40839646,	/* GetADBInfo */
		(void *)0x4083964c,	/* SetADBInfo */
		(void *)0x408397b8,	/* ADBReInit */
		(void *)0x4083967c,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4081141c,	/* WriteParam */
		(void *)0x4081144e,	/* SetDateTime */
		(void *)0x40811930,	/* InitUtil */
		(void *)0x4080b624,	/* ReadXPRam */
		(void *)0x4080b62e,	/* WriteXPRam */
		(void *)0x40806884,	/* jClkNoMem */
		(void *)0x408398c2,	/* ADBAlternateInit */
		(void *)0x4080cada,	/* Egret */
		(void *)0x4080de14,	/* InitEgret */
		(void *)0x408143b8,	/* ADBReInit_JTBL */
		(void *)0x409bdb60,	/* ROMResourceMap List Head */
		(void *)0x4083b3d8,	/* FixDiv */
		(void *)0x4083b2e4,	/* FixMul */
	},
	/*
	 * PB 540, PB 550
	 * (PB 520?  Duo 280?)
	 */
	{			/* 8 */
		"68040 PowerBook ROMs",
		(void *)0x400b2efc,	/* ADB int */
		(void *)0x400d8e66,	/* PM int */
		(void *)0x400b2e86,	/* ADBBase + 130 */
		(void *)0x4000a360,	/* CountADBs */
		(void *)0x4000a37a,	/* GetIndADB */
		(void *)0x4000a3a6,	/* GetADBInfo */
		(void *)0x4000a3ac,	/* SetADBInfo */
		(void *)0x4000a752,	/* ADBReInit */
		(void *)0x4000a3dc,	/* ADBOp */
		(void *)0x400d9302,	/* PmgrOp */
		(void *)0x4000c05c,	/* WriteParam */
		(void *)0x4000c086,	/* SetDateTime */
		(void *)0x4000c5cc,	/* InitUtil */
		(void *)0x4000b186,	/* ReadXPRam */
		(void *)0x4000b190,	/* WriteXPRam */
		(void *)0x400b3c08,	/* jClkNoMem */
		(void *)0x4000a818,	/* ADBAlternateInit */
		(void *)0x40009ae6,	/* Egret */ /* From PB520 */
		(void *)0x400147c4,	/* InitEgret */
		(void *)0x400a7a5c,	/* ADBReInit_JTBL */
		(void *)0x4007eb90,	/* ROMResourceMap List Head */
		(void *)0x4001c406,	/* FixDiv, wild guess */
		(void *)0x4001c312,	/* FixMul, wild guess */
	},
	/*
	 * Verified for the Q605
	 */
	{			/* 9 */
		"Quadra/Centris 605 ROMs",
		(void *)0x408a9b56,	/* ADB int */
		(void *)0x0,		/* PM int */
		(void *)0x408b2f94,	/* ADBBase + 130 */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PmgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b3bf8,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x408a99c0,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408a82c0,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for Duo 270c, PB150
	 */
	{			/* 10 */
		"Duo 270C ROMs",
		(void *)0x408b2efc,	/* ADB interrupt */
		(void *)0x408885ec,	/* PB ADB interrupt */
		(void *)0x408b2e86,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x408888ec,	/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b3bf8,	/* jClkNoMem */ /* from PB 150 */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x0,		/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv, wild guess */
		(void *)0x4081c312,	/* FixMul, wild guess */
	},
	/*
	 * Vectors verified for Performa/LC 550
	 */
	{			/* 11 */
		"P/LC 550 ROMs",
		(void *)0x408d16d6,	/* ADB interrupt */
		(void *)0x0,		/* PB ADB interrupt */
		(void *)0x408b2f84,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b3c04,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x408d1450,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408d24a4,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv for P550 */
		(void *)0x4081c312,	/* FixMul for P550 */
	},
	/*
	 * Vectors verified for the MacTV
	 */
	{			/* 12 */
		"MacTV ROMs",
		(void *)0x40acfed6,	/* ADB interrupt */
		(void *)0x0,		/* PB ADB interrupt */
		(void *)0x40ab2f84,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x40a0a360,	/* CountADBs */
		(void *)0x40a0a37a,	/* GetIndADB */	
		(void *)0x40a0a3a6,	/* GetADBInfo */
		(void *)0x40a0a3ac,	/* SetADBInfo */
		(void *)0x40a0a752,	/* ADBReInit */
		(void *)0x40a0a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x40a0c05c,	/* WriteParam */
		(void *)0x40a0c086,	/* SetDateTime */
		(void *)0x40a0c5cc,	/* InitUtil */
		(void *)0x40a0b186,	/* ReadXPRam */
		(void *)0x40a0b190,	/* WriteXPRam */
		(void *)0x40ab3bf4,	/* jClkNoMem */
		(void *)0x40a0a818,	/* ADBAlternateInit */
		(void *)0x40acfd40,	/* Egret */
		(void *)0x40a147c4,	/* InitEgret */
		(void *)0x40a038a0,	/* ADBReInit_JTBL */
		(void *)0x40a7eb90,	/* ROMResourceMap List Head */
		(void *)0x40a1c406,	/* FixDiv */
		(void *)0x40a1c312,	/* FixMul */
	},
	/*
	 * Vectors verified for the Quadra630
	 */
	{			/* 13 */
		"Quadra630 ROMs",
		(void *)0x408a9bd2,	/* ADB int */
		(void *)0x0,		/* PM intr */
 		(void *)0x408b2f94,	/* ADBBase + 130 */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* Wild guess at ReadXPRam */
		(void *)0x4080b190,	/* Wild guess at WriteXPRam */
		(void *)0x408b39f4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x408a99c0,	/* Egret */
		(void *)0x408147c8,	/* InitEgret */
		(void *)0x408a7ef8,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for LC III
	 */
	{			/* 14 */
		"LC III ROMs",
		(void *)0x40814912,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x408b2f94,	/* ADBBase + 130 interrupt */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b39b6,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408d2918,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for the LC520
	 */
	{			/* 15 */
		"MacLC520 ROMs",
		(void *)0x408d16d6,	/* ADB interrupt */
		(void *)0x0,		/* PB ADB interrupt */
		(void *)0x408b2f84,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b3c04,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x408d1450,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408d2460,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv for P520 */
		(void *)0x4081c312,	/* FixMul for P520 */
	},
	/*
	 * Vectors verified for the LC 575/577/578
	 */
	{			/* 16 */
		"MacLC575 ROMs",
		(void *)0x408a9b56,	/* ADB interrupt */
		(void *)0x0,		/* PB ADB interrupt */
		(void *)0x408b2f94,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x408b3bf8,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x408a99c0,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408a81a0,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv for P520 */
		(void *)0x4081c312,	/* FixMul for P520 */
	},
	/*
	 * Vectors verified for the Quadra 950
	 */
	{			/* 17 */
		"Quadra950 class ROMs",
		(void *)0x40814912,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x4080a4d8,	/* ADBBase + 130 interrupt; whatzit? */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x4080b1e4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x40814800,	/* Egret */
		(void *)0x408147c4,	/* InitEgret */
		(void *)0x408038bc,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for the Mac IIfx
	 */
	{			/* 18 */
		"Mac IIfx ROMs",
		(void *)0x40809f4a,	/* ADB interrupt */
		(void *)0x0,		/* PM ADB interrupt */
		(void *)0x4080a4d8,	/* ADBBase + 130 interrupt */
		(void *)0x4080a360,	/* CountADBs */
		(void *)0x4080a37a,	/* GetIndADB */
		(void *)0x4080a3a6,	/* GetADBInfo */
		(void *)0x4080a3ac,	/* SetADBInfo */
		(void *)0x4080a752,	/* ADBReInit */
		(void *)0x4080a3dc,	/* ADBOp */
		(void *)0x0,		/* PMgrOp */
		(void *)0x4080c05c,	/* WriteParam */
		(void *)0x4080c086,	/* SetDateTime */
		(void *)0x4080c5cc,	/* InitUtil */
		(void *)0x4080b186,	/* ReadXPRam */
		(void *)0x4080b190,	/* WriteXPRam */
		(void *)0x4080b1e4,	/* jClkNoMem */
		(void *)0x4080a818,	/* ADBAlternateInit */
		(void *)0x0,		/* Egret */
		(void *)0x0,		/* InitEgret */
		(void *)0x408037c0,	/* ADBReInit_JTBL */
		(void *)0x4087eb90,	/* ROMResourceMap List Head */
		(void *)0x4081c406,	/* FixDiv */
		(void *)0x4081c312,	/* FixMul */
	},
	/*
	 * Vectors verified for the Performa 588 (and 580?)
	 */
	{			/* 19 */
		"Performa 580 ROMs",
		(void *) 0x4089a8be,	/* ADB interrupt */
		(void *) 0x0,		/* PM ADB interrupt */
		(void *) 0x408b2f94,	/* ADBBase + 130 interrupt */
		(void *) 0x4080a360,	/* CountADBs */
		(void *) 0x4080a37a,	/* GetIndADB */
		(void *) 0x4080a3a6,	/* GetADBInfo */
		(void *) 0x4080a3ac,	/* SetADBInfo */
		(void *) 0x4080a752,	/* ADBReInit */
		(void *) 0x4080a3dc,	/* ADBOp */
		(void *) 0x0,		/* PMgrOp */
		(void *) 0x4080c05c,	/* WriteParam */
		(void *) 0x4080c086,	/* SetDateTime */
		(void *) 0x4080c5cc,	/* InitUtil */
		(void *) 0x4080b186,	/* ReadXPRam */
		(void *) 0x4080b190,	/* WriteXPRam */
		(void *) 0x408b3bf4,	/* jClkNoMem */
		(void *) 0x4080a818,	/* ADBAlternateInit */
		(void *) 0x408a99c0,	/* Egret */
		(void *) 0x408147c8,	/* InitEgret */
		(void *) 0x408a7f74,	/* ADBReInit_JTBL */
		(void *) 0x4087eb90,	/* ROMResourceMap List Head */
		(void *) 0x4081c406,	/* FixDiv */
		(void *) 0x4081c312,	/* FixMul */
	},
	/* Please fill these in! -BG */
};


struct cpu_model_info cpu_models[] = {

/* The first four. */
	{MACH_MACII, "II ", "", MACH_CLASSII, &romvecs[0]},
	{MACH_MACIIX, "IIx ", "", MACH_CLASSII, &romvecs[0]},
	{MACH_MACIICX, "IIcx ", "", MACH_CLASSII, &romvecs[0]},
	{MACH_MACSE30, "SE/30 ", "", MACH_CLASSII, &romvecs[0]},

/* The rest of the II series... */
	{MACH_MACIICI, "IIci ", "", MACH_CLASSIIci, &romvecs[4]},
	{MACH_MACIISI, "IIsi ", "", MACH_CLASSIIsi, &romvecs[2]},
	{MACH_MACIIVI, "IIvi ", "", MACH_CLASSIIvx, &romvecs[2]},
	{MACH_MACIIVX, "IIvx ", "", MACH_CLASSIIvx, &romvecs[2]},
	{MACH_MACIIFX, "IIfx ", "", MACH_CLASSIIfx, &romvecs[18]},

/* The Centris/Quadra series. */
	{MACH_MACQ700, "Quadra", " 700 ", MACH_CLASSQ, &romvecs[4]},
	{MACH_MACQ900, "Quadra", " 900 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACQ950, "Quadra", " 950 ", MACH_CLASSQ, &romvecs[17]},
	{MACH_MACQ800, "Quadra", " 800 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACQ650, "Quadra", " 650 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACC650, "Centris", " 650 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACQ605, "Quadra", " 605 ", MACH_CLASSQ, &romvecs[9]},
	{MACH_MACQ605_33, "Quadra", " 605/33 ", MACH_CLASSQ, &romvecs[9]},
	{MACH_MACC610, "Centris", " 610 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACQ610, "Quadra", " 610 ", MACH_CLASSQ, &romvecs[6]},
	{MACH_MACQ630, "Quadra", " 630 ", MACH_CLASSQ2, &romvecs[13]},
	{MACH_MACC660AV, "Centris", " 660AV ", MACH_CLASSAV, &romvecs[7]},
	{MACH_MACQ840AV, "Quadra", " 840AV ", MACH_CLASSAV, &romvecs[7]},

/* The Powerbooks/Duos... */
	{MACH_MACPB100, "PowerBook", " 100 ", MACH_CLASSPB, &romvecs[1]},
	/* PB 100 has no MMU! */
	{MACH_MACPB140, "PowerBook", " 140 ", MACH_CLASSPB, &romvecs[1]},
	{MACH_MACPB145, "PowerBook", " 145 ", MACH_CLASSPB, &romvecs[1]},
	{MACH_MACPB150, "PowerBook", " 150 ", MACH_CLASSDUO, &romvecs[10]},
	{MACH_MACPB160, "PowerBook", " 160 ", MACH_CLASSPB, &romvecs[5]},
	{MACH_MACPB165, "PowerBook", " 165 ", MACH_CLASSPB, &romvecs[5]},
	{MACH_MACPB165C, "PowerBook", " 165c ", MACH_CLASSPB, &romvecs[5]},
	{MACH_MACPB170, "PowerBook", " 170 ", MACH_CLASSPB, &romvecs[1]},
	{MACH_MACPB180, "PowerBook", " 180 ", MACH_CLASSPB, &romvecs[5]},
	{MACH_MACPB180C, "PowerBook", " 180c ", MACH_CLASSPB, &romvecs[5]},
	{MACH_MACPB190, "PowerBook", " 190 ", MACH_CLASSPB, &romvecs[8]},
	{MACH_MACPB190CS, "PowerBook", " 190cs ", MACH_CLASSPB, &romvecs[8]},
	{MACH_MACPB500, "PowerBook", " 500 ", MACH_CLASSPB, &romvecs[8]},

/* The Duos */
	{MACH_MACPB210, "PowerBook Duo", " 210 ", MACH_CLASSDUO, &romvecs[5]},
	{MACH_MACPB230, "PowerBook Duo", " 230 ", MACH_CLASSDUO, &romvecs[5]},
	{MACH_MACPB250, "PowerBook Duo", " 250 ", MACH_CLASSDUO, &romvecs[5]},
	{MACH_MACPB270, "PowerBook Duo", " 270C ", MACH_CLASSDUO, &romvecs[5]},
	{MACH_MACPB280, "PowerBook Duo", " 280 ", MACH_CLASSDUO, &romvecs[5]},
	{MACH_MACPB280C, "PowerBook Duo", " 280C ", MACH_CLASSDUO, &romvecs[5]},

/* The Performas... */
	{MACH_MACP600, "Performa", " 600 ", MACH_CLASSIIvx, &romvecs[2]},
	{MACH_MACP460, "Performa", " 460 ", MACH_CLASSLC, &romvecs[14]},
	{MACH_MACP550, "Performa", " 550 ", MACH_CLASSLC, &romvecs[11]},
	{MACH_MACP580, "Performa", " 580 ", MACH_CLASSQ2, &romvecs[19]},
	{MACH_MACTV,   "TV ",      "",      MACH_CLASSLC, &romvecs[12]},

/* The LCs... */
	{MACH_MACLCII,  "LC", " II ",  MACH_CLASSLC, &romvecs[3]},
	{MACH_MACLCIII, "LC", " III ", MACH_CLASSLC, &romvecs[14]},
	{MACH_MACLC475, "LC", " 475 ", MACH_CLASSQ,  &romvecs[9]},
	{MACH_MACLC475_33, "LC", " 475/33 ", MACH_CLASSQ,  &romvecs[9]},
	{MACH_MACLC520, "LC", " 520 ", MACH_CLASSLC, &romvecs[15]},
	{MACH_MACLC575, "LC", " 575 ", MACH_CLASSQ2, &romvecs[16]},
	{MACH_MACCCLASSIC, "Color Classic ", "", MACH_CLASSLC, &romvecs[3]},
	{MACH_MACCCLASSICII, "Color Classic"," II ", MACH_CLASSLC, &romvecs[3]},
/* Does this belong here? */
	{MACH_MACCLASSICII, "Classic", " II ", MACH_CLASSLC, &romvecs[3]},

/* The unknown one and the end... */
	{0, "Unknown", "", MACH_CLASSII, NULL},
	{0, NULL, NULL, 0, NULL},
};				/* End of cpu_models[] initialization. */

struct intvid_info_t {
	int	machineid;
	u_long	fbbase;
	u_long	fbmask;
	u_long	fblen;
} intvid_info[] = {
	{ MACH_MACCLASSICII,	0x009f9a80,	0x0,		21888 },
	{ MACH_MACPB140,	0xfee08000,	0x0,		32 * 1024 },
	{ MACH_MACPB145,	0xfee08000,	0x0,		32 * 1024 },
	{ MACH_MACPB170,	0xfee08000,	0x0,		32 * 1024 },
	{ MACH_MACPB150,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB160,	0x60000000,	0x0ffe0000,	128 * 1024 },
	{ MACH_MACPB165,	0x60000000,	0x0ffe0000,	128 * 1024 },
	{ MACH_MACPB180,	0x60000000,	0x0ffe0000,	128 * 1024 },
	{ MACH_MACPB210,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB230,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB250,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB270,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB280,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACPB280C,	0x60000000,	0x0,		128 * 1024 },
	{ MACH_MACIICI,		0x0,		0x0,		320 * 1024 },
	{ MACH_MACIISI,		0x0,		0x0,		320 * 1024 },
	{ MACH_MACCCLASSIC,	0x50f40000,	0x0,		512 * 1024 },
/*??*/	{ MACH_MACLCII,		0x50f40000,	0x0,		512 * 1024 },
	{ MACH_MACPB165C,	0xfc040000,	0x0,		512 * 1024 },
	{ MACH_MACPB180C,	0xfc040000,	0x0,		512 * 1024 },
	{ MACH_MACPB190,	0x60000000,	0x0,		512 * 1024 },
	{ MACH_MACPB190CS,	0x60000000,	0x0,		512 * 1024 },
	{ MACH_MACPB500,	0x60000000,	0x0,		512 * 1024 },
	{ MACH_MACLCIII,	0x60b00000,	0x0,		768 * 1024 },
	{ MACH_MACLC520,	0x60000000,	0x0,		1024 * 1024 },
	{ MACH_MACP550,		0x60000000,	0x0,		1024 * 1024 },
	{ MACH_MACTV,		0x60000000,	0x0,		1024 * 1024 },
	{ MACH_MACLC475,	0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACLC475_33,	0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACLC575,	0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACC610,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACC650,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACP580,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ605,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ605_33,	0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ610,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ630,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ650,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACC660AV,	0x50100000,	0x0,		1024 * 1024 },
	{ MACH_MACQ700,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ800,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ900,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ950,		0xf9000000,	0x0,		1024 * 1024 },
	{ MACH_MACQ840AV,	0x50100000,	0x0,		2048 * 1024 },
	{ 0,			0x0,		0x0,		0 },
};				/* End of intvid_info[] initialization. */

/*
 * Missing Mac Models:
 *	PowerMac 6100
 *	PowerMac 7100
 *	PowerMac 8100
 *	PowerBook 540
 *	PowerBook 520
 *	PowerBook 150
 *	Duo 280
 *	Performa 6000s
 * 	...?
 */

int	mach_cputype(void);

int
mach_cputype(void)
{
	return (mac68k_machine.mach_processor);
}

static void
identifycpu(void)
{
	extern u_int delay_factor;
	const char *mpu;

	switch (cputype) {
	case CPU_68020:
		mpu = ("(68020)");
		break;
	case CPU_68030:
		mpu = ("(68030)");
		break;
	case CPU_68040:
		mpu = ("(68040)");
		break;
	default:
		mpu = ("(unknown processor)");
		break;
	}
	cpu_setmodel("Apple Macintosh %s%s %s",
	    cpu_models[mac68k_machine.cpu_model_index].model_major,
	    cpu_models[mac68k_machine.cpu_model_index].model_minor,
	    mpu);
	printf("%s\n", cpu_getmodel());
	printf("cpu: delay factor %d\n", delay_factor);
	initfpu();
}

static void	get_machine_info(void);

static void
get_machine_info(void)
{
	int i;

	for (i = 0; cpu_models[i].model_major; i++)
		if (mac68k_machine.machineid == cpu_models[i].machineid)
			break;

	if (cpu_models[i].model_major == NULL)
		i--;

	mac68k_machine.cpu_model_index = i;
}

struct cpu_model_info *current_mac_model;
romvec_t *mrg_MacOSROMVectors = 0;

/*
 * Sets a bunch of machine-specific variables
 */
void	setmachdep(void);

void
setmachdep(void)
{
	struct cpu_model_info *cpui;

	/*
	 * First, set things that need to be set on the first pass only
	 * Ideally, we'd only call this once, but for some reason, the
	 * VIAs need interrupts turned off twice !?
	 */
	get_machine_info();

	load_addr = 0;
	cpui = &(cpu_models[mac68k_machine.cpu_model_index]);
	current_mac_model = cpui;

	mac68k_machine.via1_ipl = 1;
	mac68k_machine.via2_ipl = 2;
	mac68k_machine.aux_interrupts = 0;

	/*
	 * Set up any machine specific stuff that we have to before
	 * ANYTHING else happens
	 */
	switch (cpui->class) {	/* Base this on class of machine... */
	case MACH_CLASSII:
		VIA2 = VIA2OFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, vIER) = 0x7f;	/* disable VIA2 int */
		break;
	case MACH_CLASSPB:
		VIA2 = VIA2OFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		/* Disable everything but PM; we need it. */
		via_reg(VIA1, vIER) = 0x6f;	/* disable VIA1 int */
		/* Are we disabling something important? */
		via_reg(VIA2, vIER) = 0x7f;	/* disable VIA2 int */
		if (cputype == CPU_68040)
			mac68k_machine.sonic = 1;
		break;
	case MACH_CLASSDUO:
		/*
		 * The Duo definitely does not use a VIA2, but it looks
		 * like the VIA2 functions might be on the MSC at the RBV
		 * locations.  The rest is copied from the Powerbooks.
		 */
		VIA2 = RBVOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		/* Disable everything but PM; we need it. */
		via_reg(VIA1, vIER) = 0x6f;	/* disable VIA1 int */
		/* Are we disabling something important? */
		via_reg(VIA2, rIER) = 0x7f;	/* disable VIA2 int */
		break;
	case MACH_CLASSQ:
	case MACH_CLASSQ2:
		VIA2 = VIA2OFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.sonic = 1;
		mac68k_machine.scsi96 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, vIER) = 0x7f;	/* disable VIA2 int */

#if 1
		switch (current_mac_model->machineid) {
		default:
	/*	case MACH_MACQ900: These three, at least, support the
		case MACH_MACQ950: A/UX interrupts.  What Quadras don't?
		case MACH_MACQ700: */
			/* Enable A/UX interrupt scheme */
			mac68k_machine.aux_interrupts = 1;

			via_reg(VIA1, vBufB) &= (0xff ^ DB1O_AuxIntEnb);
			via_reg(VIA1, vDirB) |= DB1O_AuxIntEnb;
			mac68k_machine.via1_ipl = 6;
			mac68k_machine.via2_ipl = 2;
			break;
		}
#endif

		break;
	case MACH_CLASSAV:
	case MACH_CLASSP580:
		VIA2 = VIA2OFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi96 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, vIER) = 0x7f;	/* disable VIA2 int */
		break;
	case MACH_CLASSIIci:
		VIA2 = RBVOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, rIER) = 0x7f;	/* disable RBV int */
		break;
	case MACH_CLASSIIsi:
		VIA2 = RBVOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, rIER) = 0x7f;	/* disable RBV int */
		break;
	case MACH_CLASSIIvx:
		VIA2 = RBVOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, rIER) = 0x7f;	/* disable RBV int */
		break;
	case MACH_CLASSLC:
		VIA2 = RBVOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;	/* disable VIA1 int */
		via_reg(VIA2, rIER) = 0x7f;	/* disable RBV int */
		break;
	case MACH_CLASSIIfx:
		VIA2 = OSSOFF;
		IOBase = 0x50f00000;
		Via1Base = (volatile u_char *)IOBase;
		mac68k_machine.scsi80 = 1;
		mac68k_machine.zs_chip = 0;
		via_reg(VIA1, vIER) = 0x7f;  /* disable VIA1 int */
		break;
	default:
	case MACH_CLASSH:
		break;
	}

	/*
	 * Set up current ROM Glue vectors.  Actually now all we do
	 * is save the address of the ROM Glue Vector table. This gets
	 * used later when we re-map the vectors from MacOS Address
	 * Space to NetBSD Address Space.
	 */
	mrg_MacOSROMVectors = cpui->rom_vectors;
}

/*
 * Set IO offsets.
 */
void
mac68k_set_io_offsets(vaddr_t base)
{

	Via1Base = (volatile u_char *)base;
	Via2Base = Via1Base + 0x2000 * VIA2;
	switch (current_mac_model->class) {
	case MACH_CLASSQ:
		switch (current_mac_model->machineid) {
		case MACH_MACQ900:
		case MACH_MACQ950:
			sccA = (volatile u_char *)base + 0xc020;
			SCSIBase = base + 0xf000;
			mac68k_machine.scsi96_2 = 1;
			iop_init(0);	/* For console */
			break;
		case MACH_MACQ800:
			/*
			 * The H/W partially decode address for sccA; it is
			 * available at offsets 0xc000, 0xc020, .... Here,
			 * we choose 0xc020, where Mac toolbox ROM uses.
			 */
			sccA = (volatile u_char *)base + 0xc020;
			SCSIBase = base + 0x10000;
			break;
		case MACH_MACQ700:
			sccA = (volatile u_char *)base + 0xc000;
			SCSIBase = base + 0xf000;
			break;
		default:
			sccA = (volatile u_char *)base + 0xc000;
			SCSIBase = base + 0x10000;
			break;
		}
		break;
	case MACH_CLASSQ2:
		/*
		 * Note the different offset for sccA for this class of
		 * machines.  This seems to be common on many of the
		 * Quadra-type machines.
		 */
		sccA = (volatile u_char *)base + 0xc020;
		SCSIBase = base + 0x10000;
		break;
	case MACH_CLASSP580:
		/*
		 * Here's a queer bird... it seems to be a cross between
		 * the two different Quadra classes.
		 */
		sccA = (volatile u_char *)base + 0xc020;
		SCSIBase = base;
		break;
	case MACH_CLASSAV:
		sccA = (volatile u_char *)base + 0x4000;
		SCSIBase = base + 0x18000;
		PSCBase = (volatile u_char *)base + 0x31000;
		break;
	case MACH_CLASSII:
	case MACH_CLASSPB:
	case MACH_CLASSDUO:
	case MACH_CLASSIIci:
	case MACH_CLASSIIsi:
	case MACH_CLASSIIvx:
	case MACH_CLASSLC:
		sccA = (volatile u_char *)base + 0x4000;
		SCSIBase = base;
		break;
	case MACH_CLASSIIfx:
		/*
		 * Note that sccA base address is based on having
		 * the serial port in `compatible' mode (set in
		 * the Serial Switch control panel before booting).
		 */
		sccA = (volatile u_char *)base + 0x4020;
		SCSIBase = base;
		iop_init(0);	/* For console */
		break;
	default:
	case MACH_CLASSH:
		panic("Unknown/unsupported machine class (%d).",
		    current_mac_model->class);
		break;
	}
}

#if GRAYBARS
static u_long gray_nextaddr = 0;

void
gray_bar(void)
{
	static int i = 0;
	static int flag = 0;

/* MF basic premise as I see it:
	1) Save the scratch regs as they are not saved by the compilier.
   	2) Check to see if we want gray bars, if so,
		display some lines of gray,
		a couple of lines of white(about 8),
		and loop to slow this down.
   	3) restore regs
*/

	__asm volatile (
			"	movl %a0,%sp@-;"
			"	movl %a1,%sp@-;"
			"	movl %d0,%sp@-;"
			"	movl %d1,%sp@-");

/* check to see if gray bars are turned off */
	if (mac68k_machine.do_graybars) {
		/* MF the 10*stride/4 is done lots, but we want this to be
		 * slow */
		for (i = 0; i < 10 * mac68k_video.mv_stride / 4; i++)
			((u_long *)mac68k_video.mv_kvaddr)
			    [gray_nextaddr++] = 0xaaaaaaaa;
		for (i = 0; i < 2 * mac68k_video.mv_stride / 4; i++)
			((u_long *)mac68k_video.mv_kvaddr)
			    [gray_nextaddr++] = 0x00000000;
	}

	__asm volatile (
			"	movl %sp@+,%d1;"
			"	movl %sp@+,%d0;"
			"	movl %sp@+,%a1;"
			"	movl %sp@+,%a0");
}
#endif

/* in locore */
extern u_long ptest040(void *, u_int);
extern int get_pte(u_int, u_long *, u_short *);

/*
 * LAK (7/24/94): given a logical address, puts the physical address
 *  in *phys and return 1, or returns 0 on failure.  This is intended
 *  to look through MacOS page tables.
 */

static u_long
get_physical(u_int addr, u_long * phys)
{
	extern u_int macos_tc;
	u_long pte[2], ph, mask;
	u_short psr;
	int i, numbits;

	if (mmutype == MMU_68040) {
		ph = ptest040((void *)addr, FC_SUPERD);
		if ((ph & MMU40_RES) == 0) {
			ph = ptest040((void *)addr, FC_USERD);
			if ((ph & MMU40_RES) == 0)
				return 0;
		}
		if ((ph & MMU40_TTR) != 0)
			ph = addr;

		mask = (macos_tc & 0x4000) ? 0x00001fff : 0x00000fff;
		ph &= (~mask);
	} else {
		switch (get_pte(addr, pte, &psr)) {
		case (-1):
			return 0;
		case 0:
			ph = pte[0] & 0xFFFFFF00;
			break;
		case 1:
			ph = pte[1] & 0xFFFFFF00;
			break;
		default:
			panic("get_physical(): bad get_pte()");
		}

		/*
		 * We must now figure out how many levels down we went and
		 * mask the bits appropriately -- the returned value may only
		 * be the upper n bits, and we have to take the rest from addr.
		 */
		numbits = 0;
		psr &= 0x0007;		/* Number of levels we went */
		for (i = 0; i < psr; i++)
			numbits += (macos_tc >> (12 - i * 4)) & 0x0f;

		/*
		 * We have to take the most significant "numbits" from
		 * the returned value "ph", and the rest from our addr.
		 * Assume that numbits != 0.
		 */
		mask = (1 << (32 - numbits)) - 1;
	}
	*phys = ph + (addr & mask);

	return 1;
}

static void	check_video(const char *, u_long, u_long);

static void
check_video(const char *id, u_long limit, u_long maxm)
{
	u_long addr, phys;

	if (!get_physical(mac68k_video.mv_kvaddr, &phys)) {
		if (mac68k_machine.do_graybars)
			printf("get_mapping(): %s.  False start.\n", id);
	} else {
		mac68k_video.mv_log = mac68k_video.mv_kvaddr;
		mac68k_video.mv_phys = phys;
		mac68k_video.mv_len = 32768;
		addr = mac68k_video.mv_kvaddr + 32768;
		while (get_physical(addr, &phys)) {
			if ((phys - mac68k_video.mv_phys)
			    != mac68k_video.mv_len)
				break;
			if (mac68k_video.mv_len + 32768 > limit) {
				if (mac68k_machine.do_graybars) {
					printf("mapping: %s.  Does it never end?\n",
					    id);
					printf("    Forcing VRAM size ");
					printf("to a conservative %ldK.\n",
					    maxm/1024);
				}
				mac68k_video.mv_len = maxm;
				break;
			}
			mac68k_video.mv_len += 32768;
			addr += 32768;
		}
		if (mac68k_machine.do_graybars) {
			printf("  %s internal video at addr %p (phys %p), ",
			    id, (void *)mac68k_video.mv_log,
			    (void *)mac68k_video.mv_phys);
			printf("len 0x%x.\n", mac68k_video.mv_len);
		}
	}
}

/*
 * Find out how MacOS has mapped itself so we can do the same thing.
 * Returns the address of logical 0 so that locore can map the kernel
 * properly.
 */
u_int
get_mapping(void)
{
	struct intvid_info_t *iip;
	u_long addr, lastpage, phys, len, limit;
	int i, last, same;

	numranges = 0;
	for (i = 0; i < 8; i++) {
		low[i] = 0;
		high[i] = 0;
	}

	lastpage = get_top_of_ram();

	get_physical(0, &load_addr);

	if (mac68k_machine.do_graybars)
		printf("Loaded at 0x%0lx\n", load_addr);

	last = 0;
	for (addr = 0; addr <= lastpage && get_physical(addr, &phys);
	    addr += PAGE_SIZE) {
		if (numranges > 0 && phys != high[last]) {
			/*
			 * Attempt to find if this page is already
			 * accounted for in an existing physical segment.
			 */
			for (i = 0; i < numranges; i++) {
				if (low[i] <= phys && phys <= high[i]) {
					last = i;
					break;
				}
			}
			if (i >= numranges)
				last = numranges - 1;

			if (low[last] <= phys && phys < high[last])
				continue;	/* Skip pages we've seen. */
		}

		if (numranges > 0 && phys == high[last]) {
			/* Common case:  extend existing segment on high end */
			high[last] += PAGE_SIZE;
		} else {
			/* This is a new physical segment. */
			for (last = 0; last < numranges; last++)
				if (phys < low[last])
					break;

			/* Create space for segment, if necessary */
			if (last < numranges && phys < low[last]) {
				for (i = numranges; i > last; i--) {
					low[i] = low[i - 1];
					high[i] = high[i - 1];
				}
			}

			numranges++;
			low[last] = phys;
			high[last] = phys + PAGE_SIZE;
		}

		/* Coalesce adjoining segments as appropriate */
		if (last < (numranges - 1) && high[last] == low[last + 1] &&
		    low[last + 1] != load_addr) {
			high[last] = high[last + 1];
			for (i = last + 1; i < numranges; i++) {
				low[i] = low[i + 1];
				high[i] = high[i + 1];
			}
			--numranges;
		}
	}
	if (mac68k_machine.do_graybars) {
		printf("System RAM: %ld bytes in %ld pages.\n",
		    addr, addr / PAGE_SIZE);
		for (i = 0; i < numranges; i++) {
			printf("     Low = 0x%lx, high = 0x%lx\n",
			    low[i], high[i]);
		}
	}

	/*
	 * If we can't figure out the PA of the frame buffer by groveling
	 * the page tables, assume that we already have the correct
	 * address.  This is the case on several of the PowerBook 1xx
	 * series, in particular.
	 */
	if (!get_physical(mac68k_video.mv_kvaddr, &phys))
		phys = mac68k_video.mv_kvaddr;

	/*
	 * Find on-board video, if we have an idea of where to look
	 * on this system.
	 */
	for (iip = intvid_info; iip->machineid; iip++)
		if (mac68k_machine.machineid == iip->machineid)
			break;

	if (mac68k_machine.machineid == iip->machineid &&
	    (phys & ~iip->fbmask) >= iip->fbbase &&
	    (phys & ~iip->fbmask) < (iip->fbbase + iip->fblen)) {
		mac68k_video.mv_phys = phys & ~iip->fbmask;
		mac68k_video.mv_len = 32768 - (phys & 0x7fff);

		limit = iip->fbbase + iip->fblen - mac68k_video.mv_phys;
		if (mac68k_video.mv_len > limit) {
			mac68k_video.mv_len = limit;
		} else {
			addr = mac68k_video.mv_kvaddr + mac68k_video.mv_len;
			while (get_physical(addr, &phys)) {
				phys &= ~iip->fbmask;
				if ((phys - mac68k_video.mv_phys) !=
				    mac68k_video.mv_len)
					break;
				if ((mac68k_video.mv_phys + 32768) > limit) {
					mac68k_video.mv_len = limit;
					break;
				}
				mac68k_video.mv_len += 32768;
				addr += 32768;
			}
		}
	}

	if (mac68k_video.mv_len > 0) {
		/*
		 * We've already figured out where internal video is.
		 * Tell the user what we know.
		 */
		if (mac68k_machine.do_graybars)
			printf("On-board video at addr %p (phys %p), "
			    "len 0x%x.\n",
			    (void *)mac68k_video.mv_kvaddr,
			    (void *)mac68k_video.mv_phys,
			    mac68k_video.mv_len);
	} else {
		/*
		 * We should now look through all of NuBus space to find where
		 * the internal video is being mapped.  Just to be sure we
		 * handle all the cases, we simply map our NuBus space exactly
		 * how MacOS did it.  As above, we find a bunch of ranges that
		 * are contiguously mapped.  Since there are a lot of pages
		 * that are all mapped to 0, we handle that as a special case
		 * where the length is negative.  We search in increments of
		 * 32768 because that's the page size that MacOS uses.
		 */
		nbnumranges = 0;
		for (i = 0; i < NBMAXRANGES; i++) {
			nbphys[i] = 0;
			nblog[i] = 0;
			nblen[i] = 0;
		}

		same = 0;
		for (addr = 0xF9000000; addr < 0xFF000000; addr += 32768) {
			if (!get_physical(addr, &phys)) {
				continue;
			}
			len = nbnumranges == 0 ? 0 : nblen[nbnumranges - 1];

#ifdef __debug_mondo_verbose__
			if (mac68k_machine.do_graybars)
				printf ("0x%lx --> 0x%lx\n", addr, phys);
#endif

			if (nbnumranges > 0
			    && addr == nblog[nbnumranges - 1] + len
			    && phys == nbphys[nbnumranges - 1]) {
				/* Same as last one */
				nblen[nbnumranges - 1] += 32768;
				same = 1;
			} else {
				if ((nbnumranges > 0)
				    && !same
				    && (addr == nblog[nbnumranges - 1] + len)
				    && (phys == nbphys[nbnumranges - 1] + len))
					nblen[nbnumranges - 1] += 32768;
				else {
					if (same) {
						nblen[nbnumranges - 1] = -len;
						same = 0;
					}
					if (nbnumranges == NBMAXRANGES) {
						if (mac68k_machine.do_graybars)
							printf("get_mapping(): Too many NuBus ranges.\n");
						break;
					}
					nbnumranges++;
					nblog[nbnumranges - 1] = addr;
					nbphys[nbnumranges - 1] = phys;
					nblen[nbnumranges - 1] = 32768;
				}
			}
		}
		if (same) {
			nblen[nbnumranges - 1] = -nblen[nbnumranges - 1];
			same = 0;
		}
		if (mac68k_machine.do_graybars) {
			printf("Non-system RAM (nubus, etc.):\n");
			for (i = 0; i < nbnumranges; i++) {
				printf("     Log = 0x%lx, Phys = 0x%lx, Len = 0x%lx (%lu)\n",
				    nblog[i], nbphys[i], nblen[i], nblen[i]);
			}
		}

		/*
		 * We must now find the logical address of internal video in the
		 * ranges we made above.  Internal video is at physical 0, but
		 * a lot of pages map there.  Instead, we look for the logical
		 * page that maps to 32768 and go back one page.
		 */
		for (i = 0; i < nbnumranges; i++) {
			if (nblen[i] > 0
			    && nbphys[i] <= 32768
			    && 32768 <= nbphys[i] + nblen[i]) {
				mac68k_video.mv_log = nblog[i] - nbphys[i];
				mac68k_video.mv_len = nblen[i] + nbphys[i];
				mac68k_video.mv_phys = 0;
				break;
			}
		}
		if (i == nbnumranges) {
			if (0x60000000 <= mac68k_video.mv_kvaddr
			    && mac68k_video.mv_kvaddr < 0x70000000) {
				if (mac68k_machine.do_graybars)
					printf("Checking for Internal Video ");
				/*
				 * Kludge for IIvx internal video (60b0 0000).
				 * PB 520 (6000 0000)
				 */
				check_video("PB/IIvx (0x60?00000)",
				    1 * 1024 * 1024, 1 * 1024 * 1024);
			} else if (0x50F40000 <= mac68k_video.mv_kvaddr
			    && mac68k_video.mv_kvaddr < 0x50FBFFFF) {
				/*
				 * Kludge for LC internal video
				 */
				check_video("LC video (0x50f40000)",
				    512 * 1024, 512 * 1024);
			} else if (0x50100100 <= mac68k_video.mv_kvaddr
			    && mac68k_video.mv_kvaddr < 0x50400000) {
				/*
				 * Kludge for AV internal video
				 */
				check_video("AV video (0x50100100)",
				    1 * 1024 * 1024, 1 * 1024 * 1024);
			} else {
				if (mac68k_machine.do_graybars)
					printf("  no internal video at "
					    "address 0 -- "
					    "mac68k_video.mv_kvaddr is "
					    "0x%lx.\n",
					    mac68k_video.mv_kvaddr);
			}
		} else if (mac68k_machine.do_graybars) {
			printf("  Video address = %p\n",
			    (void *)mac68k_video.mv_kvaddr);
			printf("  Int video starts at %p\n",
			    (void *)mac68k_video.mv_log);
			printf("  Length = 0x%x (%d) bytes\n",
			    mac68k_video.mv_len, mac68k_video.mv_len);
		}
	}

	return load_addr;	/* Return physical address of logical 0 */
}

/*
 * Debugging code for locore page-traversal routine.
 */
void printstar(void);
void
printstar(void)
{
	/*
	 * Be careful as we assume that no registers are clobbered
	 * when we call this from assembly.
	 */
	__asm volatile (
			"	movl %a0,%sp@-;"
			"	movl %a1,%sp@-;"
			"	movl %d0,%sp@-;"
			"	movl %d1,%sp@-");

	/* printf("*"); */

	__asm volatile (
			"	movl %sp@+,%d1;"
			"	movl %sp@+,%d0;"
			"	movl %sp@+,%a1;"
			"	movl %sp@+,%a0");
}

/*
 * Console bell callback; modularizes the console terminal emulator
 * and the audio system, so neither requires direct knowledge of the
 * other.
 */

void
mac68k_set_bell_callback(int (*callback)(void *, int, int, int), void *cookie)
{
	mac68k_bell_callback = callback;
	mac68k_bell_cookie = (void *)cookie;
}

int
mac68k_ring_bell(int freq, int length, int volume)
{
	if (mac68k_bell_callback)
		return ((*mac68k_bell_callback)(mac68k_bell_cookie,
		    freq, length, volume));
	else
		return (ENXIO);
}

int
mm_md_physacc(paddr_t pa, vm_prot_t prot)
{
	extern u_long maxaddr;

	return (pa < maxaddr) ? 0 : EFAULT;
}
