mvme68k port by me. some parts by dale rahn.

1 files changed, 217 insertions, 0 deletions

diff --git a/sys/arch/mvme68k/dev/mc.c b/sys/arch/mvme68k/dev/mc.c
new file mode 100644
index 00000000000..1c7dc2889d1
--- /dev/null
+++ b/sys/arch/mvme68k/dev/mc.c
@@ -0,0 +1,217 @@
+/*	$NetBSD$ */
+
+/*
+ * Copyright (c) 1995 Theo de Raadt
+ * 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 Theo de Raadt
+ * 4. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
+ */
+
+/*
+ * VME162 MCchip
+ */
+#include <sys/param.h>
+#include <sys/conf.h>
+#include <sys/ioctl.h>
+#include <sys/proc.h>
+#include <sys/user.h>
+#include <sys/tty.h>
+#include <sys/uio.h>
+#include <sys/callout.h>
+#include <sys/systm.h>
+#include <sys/kernel.h>
+#include <sys/syslog.h>
+#include <sys/fcntl.h>
+#include <sys/device.h>
+#include <machine/cpu.h>
+#include <machine/autoconf.h>
+#include <dev/cons.h>
+
+#include <mvme68k/dev/mcreg.h>
+
+struct mcsoftc {
+	struct device	sc_dev;
+	caddr_t		sc_vaddr;
+	caddr_t		sc_paddr;
+	struct mcreg	*sc_mc;
+	struct intrhand	sc_nmiih;
+};
+
+void mcattach __P((struct device *, struct device *, void *));
+int  mcmatch __P((struct device *, void *, void *));
+int  mcabort __P((struct frame *));
+
+struct cfdriver mccd = {
+	NULL, "mc", mcmatch, mcattach,
+	DV_DULL, sizeof(struct mcsoftc), 0
+};
+
+struct mcreg *sys_mc = NULL;
+
+int
+mcmatch(parent, vcf, args)
+	struct device *parent;
+	void *vcf, *args;
+{
+	struct cfdata *cf = vcf;
+	struct confargs *ca = args;
+	struct mcreg *mc = (struct mcreg *)(IIOV(ca->ca_paddr) + MC_MCCHIP_OFF);
+
+	if (cputyp != CPU_162 || badvaddr(mc, 1) ||
+	    mc->mc_chipid != MC_CHIPID)
+		return (0);
+	return (1);
+}
+
+int
+mc_print(args, bus)
+	void *args;
+	char *bus;
+{
+	struct confargs *ca = args;
+
+	if (ca->ca_offset != -1)
+		printf(" offset 0x%x", ca->ca_offset);
+	if (ca->ca_ipl > 0)
+		printf(" ipl %d", ca->ca_ipl);
+	return (UNCONF);
+}
+
+int
+mc_scan(parent, child, args)
+	struct device *parent;
+	void *child, *args;
+{
+	struct cfdata *cf = child;
+	struct mcsoftc *sc = (struct mcsoftc *)parent;
+	struct confargs *ca = args;
+	struct confargs oca;
+
+	if (parent->dv_cfdata->cf_driver->cd_indirect) {
+                printf(" indirect devices not supported\n");
+                return 0;
+        }
+
+	bzero(&oca, sizeof oca);
+	oca.ca_offset = cf->cf_loc[0];
+	oca.ca_ipl = cf->cf_loc[1];
+	if (oca.ca_offset != -1 && ISIIOVA(sc->sc_vaddr + oca.ca_offset)) {
+		oca.ca_paddr = sc->sc_paddr + oca.ca_offset;
+		oca.ca_vaddr = sc->sc_vaddr + oca.ca_offset;
+	} else {
+		oca.ca_paddr = (caddr_t)-1;
+		oca.ca_vaddr = (caddr_t)-1;
+	}
+	oca.ca_bustype = BUS_MC;
+	oca.ca_master = (void *)sc->sc_mc;
+	oca.ca_name = cf->cf_driver->cd_name;
+	if ((*cf->cf_driver->cd_match)(parent, cf, &oca) == 0)
+		return (0);
+	config_attach(parent, cf, &oca, mc_print);
+	return (1);
+}
+
+void
+mcattach(parent, self, args)
+	struct device *parent, *self;
+	void *args;
+{
+	struct confargs *ca = args;
+	struct mcsoftc *sc = (struct mcsoftc *)self;
+	int i;
+
+	if (sys_mc)
+		panic("mc already attached!");
+
+	/*
+	 * since we know ourself to land in intiobase land,
+	 * we must adjust our address
+	 */
+	sc->sc_paddr = ca->ca_paddr;
+	sc->sc_vaddr = (caddr_t)IIOV(sc->sc_paddr);
+	sc->sc_mc = (struct mcreg *)(sc->sc_vaddr + MC_MCCHIP_OFF);
+	sys_mc = sc->sc_mc;
+
+	printf(": rev %d\n", sc->sc_mc->mc_chiprev);
+
+	sc->sc_nmiih.ih_fn = mcabort;
+	sc->sc_nmiih.ih_arg = 0;
+	sc->sc_nmiih.ih_ipl = 7;
+	sc->sc_nmiih.ih_wantframe = 1;
+	mcintr_establish(MCV_ABORT, &sc->sc_nmiih);
+
+	sc->sc_mc->mc_abortirq = 7 | MC_IRQ_IEN | MC_IRQ_ICLR;
+	sc->sc_mc->mc_vecbase = MC_VECBASE;
+
+	sc->sc_mc->mc_genctl |= MC_GENCTL_IEN;		/* global irq enable */
+
+	config_search(mc_scan, self, args);
+}
+
+/*
+ * MC interrupts land in a MC_NVEC sized hole starting at MC_VECBASE
+ */
+int
+mcintr_establish(vec, ih)
+	int vec;
+	struct intrhand *ih;
+{
+	if (vec >= MC_NVEC) {
+		printf("mc: illegal vector: 0x%x\n", vec);
+		panic("mcintr_establish");
+	}
+	return (intr_establish(MC_VECBASE+vec, ih));
+}
+
+int
+mcabort(frame)
+	struct frame *frame;
+{
+	/* wait for it to debounce */
+	while (sys_mc->mc_abortirq & MC_ABORT_ABS)
+		;
+
+	sys_mc->mc_abortirq = sys_mc->mc_abortirq | MC_IRQ_ICLR;
+
+	nmihand(frame);
+	return (1);
+}
+
+#include "flash.h"
+
+#if NFLASH > 0
+void
+mc_enableflashwrite(on)
+	int on;
+{
+	struct mcsoftc *sc = (struct mcsoftc *) mccd.cd_devs[0];
+	volatile char *ena, x;
+
+	ena = sc->sc_vaddr +
+	    (on ? MC_ENAFLASHWRITE_OFFSET : MC_DISFLASHWRITE_OFFSET);
+	x = *ena;
+}
+#endif