sync with netbsd -- this involved rearranging things for sanity reasons

and because separate builds of libsa are done.  this is a pretty nice
bootloader.

1 files changed, 257 insertions, 0 deletions

diff --git a/sys/arch/vax/stand/boot/autoconf.c b/sys/arch/vax/stand/boot/autoconf.c
new file mode 100644
index 00000000000..641d9184f72
--- /dev/null
+++ b/sys/arch/vax/stand/boot/autoconf.c
@@ -0,0 +1,257 @@
+/*	$OpenBSD: autoconf.c,v 1.1 2000/04/27 02:26:24 bjc Exp $ */
+/*	$NetBSD: autoconf.c,v 1.5 1999/08/23 19:09:27 ragge Exp $ */
+/*
+ * Copyright (c) 1994, 1998 Ludd, University of Lule}, Sweden.
+ * 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 at Ludd, University of Lule}.
+ * 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.
+ */
+
+ /* All bugs are subject to removal without further notice */
+		
+
+
+#include "sys/param.h"
+#include "../../include/mtpr.h"
+#include "../../include/sid.h"
+#include "../../include/trap.h"
+#include "../../include/frame.h"
+#include "vaxstand.h"
+
+extern  const struct ivec_dsp idsptch;	/* since we are not KERNEL */
+
+int	nmba=0, nuba=0, nbi=0,nsbi=0,nuda=0;
+int	*mbaaddr, *ubaaddr, *biaddr;
+int	*udaaddr, *uioaddr, tmsaddr, *bioaddr;
+
+static int mba750[]={0xf28000,0xf2a000,0xf2c000};
+static int uba750[]={0xf30000,0xf32000};
+static int uio750[]={0xfc0000,0xf80000};
+static int uda750[]={0772150};
+
+/* 11/780's only have 4, 8600 have 8 of these. */
+/* XXX - all of these should be bound to physical addresses */
+static int mba780[]={0x20010000,0x20012000,0x20014000,0x20016000,
+	0x22010000,0x22012000,0x22014000,0x22016000};
+static int uba780[]={0, 0, 0, 0x20006000,0x20008000,0x2000a000,0x2000c000, 0,
+		0, 0, 0, 0, 0, 0, 0, 0, 
+		0, 0, 0, 0x22006000,0x22008000,0x2200a000,0x2200c000};
+static int uio780[]={0, 0, 0, 0x20100000,0x20140000,0x20180000,0x201c0000, 0,
+		0, 0, 0, 0, 0, 0, 0, 0, 
+		0, 0, 0, 0x22100000,0x22140000,0x22180000,0x221c0000};
+static int bi8200[]={0x20000000, 0x22000000, 0x24000000, 0x26000000,
+	0x28000000, 0x2a000000};
+static int bio8200[]={0x20400000};
+
+static int uba630[]={0x20087800};
+static int uio630[]={0x30000000};
+#define qbdev(csr) (((csr) & 017777)-0x10000000)
+static int uda630[]={qbdev(0772150),qbdev(0760334)};
+
+static int uba670[]={0x20040000};
+static int uio670[]={0x20000000};
+static int uda670[]={0x20004030,0x20004230};
+#define qb670dev(csr) (((csr) & 017777)+0x20000000)
+
+/*
+ * Autoconf routine is really stupid; but it actually don't
+ * need any intelligence. We just assume that all possible
+ * devices exists on each cpu. Fast & easy.
+ */
+
+autoconf()
+{
+	extern int memsz;
+
+	findcpu(); /* Configures CPU variables */
+	consinit(); /* Allow us to print out things */
+	scbinit(); /* Fix interval clock etc */
+
+	switch (vax_boardtype) {
+
+	default:
+		printf("\nCPU type %d not supported by boot\n",vax_cputype);
+		printf("trying anyway...\n");
+		break;
+
+	case VAX_BTYP_780:
+	case VAX_BTYP_790:
+		memsz = 0;
+		nmba = 8;
+		nuba = 32; /* XXX */
+		nuda = 1;
+		mbaaddr = mba780;
+		ubaaddr = uba780;
+		udaaddr = uda750;
+		uioaddr = uio780;
+		tmsaddr = 0774500;
+		break;
+
+	case VAX_BTYP_750:
+		memsz = 0;
+		nmba = 3;
+		nuba = 2;
+		nuda = 1;
+		mbaaddr = mba750;
+		ubaaddr = uba750;
+		udaaddr = uda750;
+		uioaddr = uio750;
+		tmsaddr = 0774500;
+		break;
+
+	case VAX_BTYP_630:	/* the same for uvaxIII */
+	case VAX_BTYP_650:
+	case VAX_BTYP_660:
+	case VAX_BTYP_670:
+		nuba = 1;
+		nuda = 2;
+		ubaaddr = uba630;
+		udaaddr = uda630;
+		uioaddr = uio630;
+		tmsaddr = qbdev(0774500);
+		break;
+
+	case VAX_BTYP_8000:
+		memsz = 0;
+		nbi = 1;
+		biaddr = bi8200;
+		bioaddr = bio8200;
+		break;
+
+	case VAX_BTYP_46:
+	case VAX_BTYP_48:
+		{int *map, i;
+
+		/* Map all 16MB of I/O space to low 16MB of memory */
+		map = (int *)0x700000; /* XXX */
+		*(int *)0x20080008 = (int)map; /* XXX */
+		for (i = 0; i < 0x8000; i++)
+			map[i] = 0x80000000 | i;
+		}break;
+
+	case VAX_BTYP_410:
+	case VAX_BTYP_420:
+	case VAX_BTYP_43:
+	case VAX_BTYP_49:
+		break;
+	}
+}
+
+/*
+ * Clock handling routines, needed to do timing in standalone programs.
+ */
+
+volatile int tickcnt;
+
+getsecs()
+{
+	volatile int loop;
+	int todr;
+
+	return tickcnt/100;
+}
+
+void scb_stray(), rtimer();
+struct ivec_dsp **scb;
+struct ivec_dsp *scb_vec;
+
+/*
+ * Init the SCB and set up a handler for all vectors in the lower space,
+ * to detect unwanted interrupts.
+ */
+scbinit()
+{
+	extern int timer;
+	int i;
+
+	/*
+	 * Allocate space. We need one page for the SCB, and 128*16 == 2k
+	 * for the vectors. The SCB must be on a page boundary.
+	 */
+	i = alloc(VAX_NBPG * 6) + VAX_PGOFSET;
+	i &= ~VAX_PGOFSET;
+
+	mtpr(i, PR_SCBB);
+	scb = (void *)i;
+	scb_vec = (struct ivec_dsp *)(i + VAX_NBPG);
+
+	for (i = 0; i < 128; i++) {
+		scb[i] = &scb_vec[i];
+		(int)scb[i] |= 1;	/* Only interrupt stack */
+		memcpy(&scb_vec[i], &idsptch, sizeof(struct ivec_dsp));
+		scb_vec[i].hoppaddr = scb_stray;
+	}
+	scb_vec[0xc0/4].hoppaddr = rtimer;
+
+	mtpr(-10000, PR_NICR);		/* Load in count register */
+	mtpr(0x800000d1, PR_ICCS);	/* Start clock and enable interrupt */
+
+	mtpr(20, PR_IPL);
+}
+
+void
+rtimer()
+{
+	mtpr(31, PR_IPL);
+	tickcnt++;
+	mtpr(0xc1, PR_ICCS);
+}
+
+asm("
+	.globl  _idsptch, _eidsptch
+_idsptch:
+	pushr   $0x3f
+	pushl   $1
+	.long   0x9f01fb01
+	.long   0x12345678
+#
+#	gas do not accept this :-/ use hexcode instead
+#	nop
+#	calls   $1, *$0x12345678
+	popr    $0x3f
+	rei
+_eidsptch:
+");
+
+/*
+ * Stray interrupt handler.
+ * This function must _not_ save any registers (in the reg save mask).
+ */
+void
+scb_stray(arg)
+	int arg;
+{
+	static struct callsframe *cf;
+	static int vector, ipl, *a;
+
+	cf = FRAMEOFFSET(arg);
+	a = &cf->ca_arg1;
+	ipl = mfpr(PR_IPL);
+	vector = ((cf->ca_pc - (u_int)scb_vec)/4) & ~3;
+	printf("stray interrupt: pc %x vector 0x%x, ipl %d\n",
+	    cf->ca_pc, vector, ipl);
+}
+