projects / unix-history / blobdiff
? search:
summary | tags | clone url | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
fixups just pre lint
[unix-history] / usr / src / sys / vax / vax / autoconf.c
diff --git a/usr/src/sys/vax/vax/autoconf.c b/usr/src/sys/vax/vax/autoconf.c
index c769fe7..f094dc5 100644 (file)
--- a/usr/src/sys/vax/vax/autoconf.c
+++ b/usr/src/sys/vax/vax/autoconf.c
@@ -1,7 +1,22 @@
-/*     autoconf.c      4.21    81/03/06        */
+/*     autoconf.c      4.24    81/03/08        */
 
 /*
 
 /*
- * Initialize the devices for the current machine.
+ * Setup the system to run on the current machine.
+ *
+ * Configure() is called at boot time and initializes the uba and mba
+ * device tables and the memory controller monitoring.  Available
+ * devices are determined (from possibilities mentioned in ioconf.c),
+ * and the drivers are initialized.
+ *
+ * N.B.: A lot of the conditionals based on processor type say
+ *     #if VAX780
+ * and
+ *     #if VAX750
+ * which may be incorrect after more processors are introduced if they
+ * are like either of these machines.  Thus the exact form of these
+ * lines may change.  Will future machines have configuration registers
+ * in the adapters and probable nexus space (like the 780), or wired
+ * addresses (like the 750)?  It remains to be seen.
  */
 
 #include "mba.h"
  */
 
 #include "mba.h"
@@ -12,34 +27,70 @@
 #include "../h/nexus.h"
 #include "../h/pte.h"
 #include "../h/buf.h"
 #include "../h/nexus.h"
 #include "../h/pte.h"
 #include "../h/buf.h"
-#include "../h/mba.h"
+#include "../h/mbareg.h"
+#include "../h/mbavar.h"
 #include "../h/dk.h"
 #include "../h/vm.h"
 #include "../h/dk.h"
 #include "../h/vm.h"
-#include "../h/uba.h"
+#include "../h/ubareg.h"
+#include "../h/ubavar.h"
 #include "../h/mtpr.h"
 #include "../h/cpu.h"
 #include "../h/scb.h"
 #include "../h/mem.h"
 
 #include "../h/mtpr.h"
 #include "../h/cpu.h"
 #include "../h/scb.h"
 #include "../h/mem.h"
 
-int    cold;
+/*
+ * The following several variables are related to
+ * the configuration process, and are used in initializing
+ * the machine.
+ */
+int    cold;           /* if 1, still working on cold-start */
 int    nexnum;         /* current nexus number */
 int    nexnum;         /* current nexus number */
-int    dkn;            /* number of dk numbers assigned so far */
+int    dkn;            /* number of iostat dk numbers assigned so far */
 
 
+/*
+ * Addresses of the (locore) routines which bootstrap us from
+ * hardware traps to C code.  Filled into the system control block
+ * as necessary.
+ */
 #if NMBA > 0
 int    (*mbaintv[4])() =       { Xmba0int, Xmba1int, Xmba2int, Xmba3int };
 #endif
 #if VAX780
 int    (*ubaintv[4])() =       { Xua0int, Xua1int, Xua2int, Xua3int };
 #if NMBA > 0
 int    (*mbaintv[4])() =       { Xmba0int, Xmba1int, Xmba2int, Xmba3int };
 #endif
 #if VAX780
 int    (*ubaintv[4])() =       { Xua0int, Xua1int, Xua2int, Xua3int };
+/*
+ * These are the (fixed) addresses of the (last 8k bytes of) unibus memory for
+ * each of the 4 possible unibus adapters.  Note that the unibus memory
+ * addresses are actually indexed by the unibus adapter type code,
+ * and are unrelated to tr (nexus) number.
+ */
 caddr_t        umaddr780[4] = {
        (caddr_t) 0x2013e000, (caddr_t) 0x2017e000,
        (caddr_t) 0x201be000, (caddr_t) 0x201fe000
 };
 #endif
 
 caddr_t        umaddr780[4] = {
        (caddr_t) 0x2013e000, (caddr_t) 0x2017e000,
        (caddr_t) 0x201be000, (caddr_t) 0x201fe000
 };
 #endif
 
+/*
+ * This allocates the space for the per-uba information,
+ * such as buffered data path usage.
+ */
+struct uba_hd uba_hd[MAXNUBA];
+
+/*
+ * The bits which decode the fault bits in the configuration register
+ * of nexus's are reusable per nexus-type, so we declare them once here
+ * to avoid replication.
+ */
 #if VAX780
 char   nexflt_bits[] = NEXFLT_BITS;
 #endif
 
 #if VAX780
 char   nexflt_bits[] = NEXFLT_BITS;
 #endif
 
+/*
+ * Per-processor type initialization routines and data.
+ * It would be nice to parameterize initialization more,
+ * but the 780 and 750 are really quite different at this
+ * level.  We await future machines before attempting 
+ * any significant parameterization.
+ */
 #if VAX780
 int    c780();
 #endif
 #if VAX780
 int    c780();
 #endif
@@ -73,16 +124,23 @@ configure()
        for (ocp = percpu; ocp < &percpu[NCPU]; ocp++)
                if (ocp->pc_cputype == cpusid.cpuany.cp_type) {
                        (*ocp->pc_config)(ocp);
        for (ocp = percpu; ocp < &percpu[NCPU]; ocp++)
                if (ocp->pc_cputype == cpusid.cpuany.cp_type) {
                        (*ocp->pc_config)(ocp);
-#if VAXANY
-                       setconf();
-#endif
+                       /*
+                        * Write protect the scb.  It is strange
+                        * that this code is here, but this is as soon
+                        * as we are done mucking with it, and the
+                        * write-enable was done in assembly language
+                        * to which we will never return.
+                        */
                        ip = (int *)Sysmap; *ip &= ~PG_PROT; *ip |= PG_KR;
                        mtpr(TBIS, Sysbase);
                        ip = (int *)Sysmap; *ip &= ~PG_PROT; *ip |= PG_KR;
                        mtpr(TBIS, Sysbase);
+#if GENERIC
+                       setconf();
+#endif
                        cold = 0;
                        memenable();
                        return;
                }
                        cold = 0;
                        memenable();
                        return;
                }
-       printf("cpu type %d unsupported\n", cpusid.cpuany.cp_type);
+       printf("cpu type %d not configured\n", cpusid.cpuany.cp_type);
        asm("halt");
 }
 
        asm("halt");
 }
 
@@ -111,35 +169,32 @@ c780(pcpu)
                switch (nexcsr.nex_type) {
 
                case NEX_MBA:
                switch (nexcsr.nex_type) {
 
                case NEX_MBA:
-#if NMBA > 0
                        printf("mba%d at tr%d\n", nummba, nexnum);
                        if (nummba >= NMBA) {
                        printf("mba%d at tr%d\n", nummba, nexnum);
                        if (nummba >= NMBA) {
-                               printf("%d mba's not configured\n", nummba+1);
-                               continue;
+                               printf("%d mba's", nummba);
+                               goto notconfig;
                        }
                        }
+#if NMBA > 0
                        mbafind(nxv, nxp);
                        nummba++;
                        mbafind(nxv, nxp);
                        nummba++;
-                       break;
-#else
-                       printf("mba's");
-                       goto unsupp;
 #endif
 #endif
+                       break;
 
                case NEX_UBA0:
                case NEX_UBA1:
                case NEX_UBA2:
                case NEX_UBA3:
 
                case NEX_UBA0:
                case NEX_UBA1:
                case NEX_UBA2:
                case NEX_UBA3:
+                       printf("uba%d at tr%d\n", numuba, nexnum);
                        if (numuba >= 4) {
                                printf("5 uba's");
                                goto unsupp;
                        }
                        if (numuba >= 4) {
                                printf("5 uba's");
                                goto unsupp;
                        }
-                       printf("uba%d at tr%d\n", numuba, nexnum);
                        setscbnex(nexnum, ubaintv[numuba]);
                        i = nexcsr.nex_type - NEX_UBA0;
                        unifind((struct uba_regs *)nxv, (struct uba_regs *)nxp,
                            umem[i], umaddr780[i]);
                        ((struct uba_regs *)nxv)->uba_cr =
                        setscbnex(nexnum, ubaintv[numuba]);
                        i = nexcsr.nex_type - NEX_UBA0;
                        unifind((struct uba_regs *)nxv, (struct uba_regs *)nxp,
                            umem[i], umaddr780[i]);
                        ((struct uba_regs *)nxv)->uba_cr =
-                           UBA_IFS|UBA_BRIE|UBA_USEFIE|UBA_SUEFIE;
+                           UBACR_IFS|UBACR_BRIE|UBACR_USEFIE|UBACR_SUEFIE;
                        numuba++;
                        break;
 
                        numuba++;
                        break;
 
@@ -152,11 +207,11 @@ c780(pcpu)
                case NEX_MEM4I:
                case NEX_MEM16:
                case NEX_MEM16I:
                case NEX_MEM4I:
                case NEX_MEM16:
                case NEX_MEM16I:
+                       printf("mcr%d at tr%d\n", nmcr, nexnum);
                        if (nmcr >= 4) {
                        if (nmcr >= 4) {
-                               printf("%d mcr's", 4);
+                               printf("5 mcr's");
                                goto unsupp;
                        }
                                goto unsupp;
                        }
-                       printf("mcr%d at tr%d\n", nmcr, nexnum);
                        mcraddr[nmcr++] = (struct mcr *)nxv;
                        break;
 
                        mcraddr[nmcr++] = (struct mcr *)nxv;
                        break;
 
@@ -172,6 +227,9 @@ c780(pcpu)
 unsupp:
                        printf(" unsupported (at tr %d)\n", nexnum);
                        continue;
 unsupp:
                        printf(" unsupported (at tr %d)\n", nexnum);
                        continue;
+unconfig:
+                       printf(" not configured\n");
+                       continue;
                }
        }
        timeout(ubawatch, 0, hz);
                }
        }
        timeout(ubawatch, 0, hz);
@@ -192,29 +250,30 @@ c750(pcpu)
        printf("mcr at %x\n", MCR_750);
        nxaccess((caddr_t)MCR_750, Nexmap[nexnum]);
        mcraddr[nmcr++] = (struct mcr *)nxv;
        printf("mcr at %x\n", MCR_750);
        nxaccess((caddr_t)MCR_750, Nexmap[nexnum]);
        mcraddr[nmcr++] = (struct mcr *)nxv;
-#if NMBA > 0
        for (nexnum = 0; nexnum < NNEX750; nexnum++, nxp++, nxv++) {
                nxaccess((caddr_t)nxp, Nexmap[nexnum]);
                if (badaddr((caddr_t)nxv, 4))
                        continue;
                printf("mba%d at %x\n", nummba, nxp);
        for (nexnum = 0; nexnum < NNEX750; nexnum++, nxp++, nxv++) {
                nxaccess((caddr_t)nxp, Nexmap[nexnum]);
                if (badaddr((caddr_t)nxv, 4))
                        continue;
                printf("mba%d at %x\n", nummba, nxp);
-               if (nummba >= NMBA)
-                       printf("%d mba's not configured\n", nummba+1);
-               else {
-                       mbafind(nxv, nxp);
-                       nummba++;
+               if (nummba >= NMBA) {
+                       printf("%d mba(s) not configured\n", nummba+1);
+                       continue;
                }
                }
-       }
+#if NMBA > 0
+               mbafind(nxv, nxp);
+               nummba++;
 #endif
 #endif
+       }
        printf("uba at %x\n", nxp);
        nxaccess((caddr_t)nxp, Nexmap[nexnum++]);
        printf("uba at %x\n", nxp);
        nxaccess((caddr_t)nxp, Nexmap[nexnum++]);
-       unifind((struct uba_regs *)nxv++, (struct uba_regs *)nxp,
+       unifind((struct uba_regs *)nxv, (struct uba_regs *)nxp,
            umem[0], UMEM750);
        numuba = 1;
 }
 #endif
 
 #if NMBA > 0
            umem[0], UMEM750);
        numuba = 1;
 }
 #endif
 
 #if NMBA > 0
+struct mba_device *mbaconfig();
 /*
  * Find devices attached to a particular mba
  * and look for each device found in the massbus
 /*
  * Find devices attached to a particular mba
  * and look for each device found in the massbus
@@ -225,8 +284,10 @@ mbafind(nxv, nxp)
 {
        register struct mba_regs *mdp;
        register struct mba_drv *mbd;
 {
        register struct mba_regs *mdp;
        register struct mba_drv *mbd;
+       register struct mba_device *mi;
+       register struct mba_slave *ms;
        int dn, dt, sn, ds;
        int dn, dt, sn, ds;
-       struct mba_info fnd;
+       struct mba_device       fnd;
 
        mdp = (struct mba_regs *)nxv;
        mba_hd[nummba].mh_mba = mdp;
 
        mdp = (struct mba_regs *)nxv;
        mba_hd[nummba].mh_mba = mdp;
@@ -245,18 +306,25 @@ mbafind(nxv, nxp)
                if (dt == MBDT_MOH)
                        continue;
                fnd.mi_drive = dn;
                if (dt == MBDT_MOH)
                        continue;
                fnd.mi_drive = dn;
-               if (dt & MBDT_TAP) {
-                       for (sn = 0; sn < 8; sn++) {
-                               mbd->mbd_tc = sn;
+               if ((mi = mbaconfig(&fnd, dt)) && (dt & MBDT_TAP)) {
+                       for (ms = mbsinit; ms->ms_driver; ms++)
+                       if (ms->ms_driver == mi->mi_driver && ms->ms_alive == 0 && 
+                           (ms->ms_ctlr == mi->mi_unit || ms->ms_ctlr=='?')) {
+                               mbd->mbd_tc = ms->ms_slave;
                                dt = mbd->mbd_dt;
                                dt = mbd->mbd_dt;
-                               if ((dt & MBDT_SPR) == 0)
-                                       continue;
-                               fnd.mi_slave = sn;
-                               mbaconfig(&fnd, dt);
+                               if (dt & MBDT_SPR) {
+                                       printf("%s%d at %s%d slave %d\n",
+                                           ms->ms_driver->md_sname,
+                                           ms->ms_unit,
+                                           mi->mi_driver->md_dname,
+                                           mi->mi_unit,
+                                           ms->ms_slave);
+                                       ms->ms_alive = 1;
+                                       ms->ms_ctlr = mi->mi_unit;
+                                       (*ms->ms_driver->md_slave)
+                                           (mi, ms);
+                               }
                        }
                        }
-               } else {
-                       fnd.mi_slave = -1;
-                       mbaconfig(&fnd, dt);
                }
        }
        mdp->mba_cr = MBAINIT;
                }
        }
        mdp->mba_cr = MBAINIT;
@@ -268,15 +336,16 @@ mbafind(nxv, nxp)
  * see if it is in the configuration table.
  * If so, fill in its data.
  */
  * see if it is in the configuration table.
  * If so, fill in its data.
  */
+struct mba_device *
 mbaconfig(ni, type)
 mbaconfig(ni, type)
-       register struct mba_info *ni;
+       register struct mba_device *ni;
        register int type;
 {
        register int type;
 {
-       register struct mba_info *mi;
+       register struct mba_device *mi;
        register short *tp;
        register struct mba_hd *mh;
 
        register short *tp;
        register struct mba_hd *mh;
 
-       for (mi = mbinit; mi->mi_driver; mi++) {
+       for (mi = mbdinit; mi->mi_driver; mi++) {
                if (mi->mi_alive)
                        continue;
                tp = mi->mi_driver->md_type;
                if (mi->mi_alive)
                        continue;
                tp = mi->mi_driver->md_type;
@@ -286,12 +355,11 @@ mbaconfig(ni, type)
                continue;
 found:
 #define        match(fld)      (ni->fld == mi->fld || mi->fld == '?')
                continue;
 found:
 #define        match(fld)      (ni->fld == mi->fld || mi->fld == '?')
-               if (!match(mi_slave) || !match(mi_drive) || !match(mi_mbanum))
+               if (!match(mi_drive) || !match(mi_mbanum))
                        continue;
                        continue;
-               printf("%c%d at mba%d drive %d",
-                   mi->mi_name, mi->mi_unit, ni->mi_mbanum, ni->mi_drive);
-               if (type & MBDT_TAP)
-                       printf(" slave %d", ni->ni_slave);
+               printf("%s%d at mba%d drive %d",
+                   mi->mi_driver->md_dname, mi->mi_unit,
+                   ni->mi_mbanum, ni->mi_drive);
                printf("\n");
                mi->mi_alive = 1;
                mh = &mba_hd[ni->mi_mbanum];
                printf("\n");
                mi->mi_alive = 1;
                mh = &mba_hd[ni->mi_mbanum];
@@ -303,13 +371,14 @@ found:
                mi->mi_driver->md_info[mi->mi_unit] = mi;
                mi->mi_mbanum = ni->mi_mbanum;
                mi->mi_drive = ni->mi_drive;
                mi->mi_driver->md_info[mi->mi_unit] = mi;
                mi->mi_mbanum = ni->mi_mbanum;
                mi->mi_drive = ni->mi_drive;
-               mi->mi_slave = ni->mi_slave;
                if (mi->mi_dk && dkn < DK_NDRIVE)
                        mi->mi_dk = dkn++;
                else
                        mi->mi_dk = -1;
                if (mi->mi_dk && dkn < DK_NDRIVE)
                        mi->mi_dk = dkn++;
                else
                        mi->mi_dk = -1;
-               (*mi->mi_driver->md_dkinit)(mi);
+               (*mi->mi_driver->md_attach)(mi);
+               return (mi);
        }
        }
+       return (0);
 }
 #endif
 
 }
 #endif
 
@@ -320,8 +389,8 @@ found:
  */
 fixctlrmask()
 {
  */
 fixctlrmask()
 {
-       register struct uba_minfo *um;
-       register struct uba_dinfo *ui;
+       register struct uba_ctlr *um;
+       register struct uba_device *ui;
        register struct uba_driver *ud;
 #define        phys(a,b) ((b)(((int)(a))&0x7fffffff))
 
        register struct uba_driver *ud;
 #define        phys(a,b) ((b)(((int)(a))&0x7fffffff))
 
@@ -342,8 +411,8 @@ unifind(vubp, pubp, vumem, pumem)
        caddr_t vumem, pumem;
 {
        register int br, cvec;                  /* MUST BE r11, r10 */
        caddr_t vumem, pumem;
 {
        register int br, cvec;                  /* MUST BE r11, r10 */
-       register struct uba_dinfo *ui;
-       register struct uba_minfo *um;
+       register struct uba_device *ui;
+       register struct uba_ctlr *um;
        u_short *umem = (u_short *)vumem, *sp, *reg, addr;
        struct uba_hd *uhp;
        struct uba_driver *udp;
        u_short *umem = (u_short *)vumem, *sp, *reg, addr;
        struct uba_hd *uhp;
        struct uba_driver *udp;
@@ -388,7 +457,7 @@ unifind(vubp, pubp, vumem, pumem)
 #if VAX780
        if (haveubasr) {
                vubp->uba_sr = vubp->uba_sr;
 #if VAX780
        if (haveubasr) {
                vubp->uba_sr = vubp->uba_sr;
-               vubp->uba_cr = UBA_IFS|UBA_BRIE;
+               vubp->uba_cr = UBACR_IFS|UBACR_BRIE;
        }
 #endif
        /*
        }
 #endif
        /*
@@ -397,7 +466,7 @@ unifind(vubp, pubp, vumem, pumem)
         * for devices which will need to dma
         * output to produce an interrupt.
         */
         * for devices which will need to dma
         * output to produce an interrupt.
         */
-       *(int *)(&vubp->uba_map[0]) = UBA_MRV;
+       *(int *)(&vubp->uba_map[0]) = UBAMR_MRV;
 
 #define        ubaddr(off)     (u_short *)((int)vumem + ((off)&0x1fff))
        /*
 
 #define        ubaddr(off)     (u_short *)((int)vumem + ((off)&0x1fff))
        /*
Continuous source code history from original PDP-7 UNIX to FreeBSD 2, the first fully unencumbered FreeBSD release.