386BSD 0.1 development
[unix-history] / usr / src / usr.sbin / config / mkioconf.c
index dfc631a..eadb024 100644 (file)
@@ -2,16 +2,37 @@
  * Copyright (c) 1980 Regents of the University of California.
  * All rights reserved.
  *
  * Copyright (c) 1980 Regents of the University of California.
  * All rights reserved.
  *
- * Redistribution and use in source and binary forms are permitted
- * provided that this notice is preserved and that due credit is given
- * to the University of California at Berkeley. The name of the University
- * may not be used to endorse or promote products derived from this
- * software without specific prior written permission. This software
- * is provided ``as is'' without express or implied warranty.
+ * 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 University of
+ *     California, Berkeley and its contributors.
+ * 4. 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.
  */
 
 #ifndef lint
  */
 
 #ifndef lint
-static char sccsid[] = "@(#)mkioconf.c 5.9 (Berkeley) %G%";
+static char sccsid[] = "@(#)mkioconf.c 5.18 (Berkeley) 5/10/91";
 #endif /* not lint */
 
 #include <stdio.h>
 #endif /* not lint */
 
 #include <stdio.h>
@@ -36,14 +57,13 @@ vax_ioconf()
                perror(path("ioconf.c"));
                exit(1);
        }
                perror(path("ioconf.c"));
                exit(1);
        }
-       fprintf(fp, "#include \"../machine/pte.h\"\n");
-       fprintf(fp, "#include \"../h/param.h\"\n");
-       fprintf(fp, "#include \"../h/buf.h\"\n");
-       fprintf(fp, "#include \"../h/map.h\"\n");
-       fprintf(fp, "#include \"../h/vm.h\"\n");
+       fprintf(fp, "#include \"vax/include/pte.h\"\n");
+       fprintf(fp, "#include \"sys/param.h\"\n");
+       fprintf(fp, "#include \"sys/buf.h\"\n");
+       fprintf(fp, "#include \"sys/map.h\"\n");
        fprintf(fp, "\n");
        fprintf(fp, "\n");
-       fprintf(fp, "#include \"../vaxmba/mbavar.h\"\n");
-       fprintf(fp, "#include \"../vaxuba/ubavar.h\"\n\n");
+       fprintf(fp, "#include \"vax/mba/mbavar.h\"\n");
+       fprintf(fp, "#include \"vax/uba/ubavar.h\"\n\n");
        fprintf(fp, "\n");
        fprintf(fp, "#define C (caddr_t)\n\n");
        /*
        fprintf(fp, "\n");
        fprintf(fp, "#define C (caddr_t)\n\n");
        /*
@@ -280,12 +300,12 @@ tahoe_ioconf()
                perror(path("ioconf.c"));
                exit(1);
        }
                perror(path("ioconf.c"));
                exit(1);
        }
-       fprintf(fp, "#include \"../h/param.h\"\n");
-       fprintf(fp, "#include \"../machine/pte.h\"\n");
-       fprintf(fp, "#include \"../h/buf.h\"\n");
-       fprintf(fp, "#include \"../h/map.h\"\n");
+       fprintf(fp, "#include \"sys/param.h\"\n");
+       fprintf(fp, "#include \"tahoe/include/pte.h\"\n");
+       fprintf(fp, "#include \"sys/buf.h\"\n");
+       fprintf(fp, "#include \"sys/map.h\"\n");
        fprintf(fp, "\n");
        fprintf(fp, "\n");
-       fprintf(fp, "#include \"../tahoevba/vbavar.h\"\n");
+       fprintf(fp, "#include \"tahoe/vba/vbavar.h\"\n");
        fprintf(fp, "\n");
        fprintf(fp, "#define C (caddr_t)\n\n");
        /*
        fprintf(fp, "\n");
        fprintf(fp, "#define C (caddr_t)\n\n");
        /*
@@ -442,6 +462,281 @@ tahoe_ioconf()
 }
 #endif
 
 }
 #endif
 
+#if MACHINE_HP300
+hp300_ioconf()
+{
+       register struct device *dp, *mp, *np;
+       register int hpib, slave;
+       FILE *fp;
+       extern char *wnum();
+
+       fp = fopen(path("ioconf.c"), "w");
+       if (fp == 0) {
+               perror(path("ioconf.c"));
+               exit(1);
+       }
+       fprintf(fp, "#include \"sys/param.h\"\n");
+       fprintf(fp, "#include \"sys/buf.h\"\n");
+       fprintf(fp, "#include \"sys/map.h\"\n");
+       fprintf(fp, "\n");
+       fprintf(fp, "#include \"hp300/dev/device.h\"\n\n");
+       fprintf(fp, "\n");
+       fprintf(fp, "#define C (caddr_t)\n");
+       fprintf(fp, "#define D (struct driver *)\n\n");
+       /*
+        * First print the hpib controller initialization structures
+        */
+       for (dp = dtab; dp != 0; dp = dp->d_next) {
+               mp = dp->d_conn;
+               if (dp->d_unit == QUES || mp == 0)
+                       continue;
+               fprintf(fp, "extern struct driver %sdriver;\n", dp->d_name);
+       }
+       fprintf(fp, "\nstruct hp_ctlr hp_cinit[] = {\n");
+       fprintf(fp, "/*\tdriver,\t\tunit,\talive,\taddr,\tflags */\n");
+       for (dp = dtab; dp != 0; dp = dp->d_next) {
+               mp = dp->d_conn;
+               if (dp->d_unit == QUES ||
+                       dp->d_type != MASTER && dp->d_type != CONTROLLER)
+                       continue;
+               if (mp != TO_NEXUS) {
+                       printf("%s%s must be attached to an sc (nexus)\n",
+                               dp->d_name, wnum(dp->d_unit));
+                       continue;
+               }
+               if (dp->d_drive != UNKNOWN || dp->d_slave != UNKNOWN) {
+                       printf("can't specify drive/slave for %s%s\n",
+                               dp->d_name, wnum(dp->d_unit));
+                       continue;
+               }
+               fprintf(fp,
+                       "\t{ &%sdriver,\t%d,\t0,\tC 0x%x,\t0x%x },\n",
+                       dp->d_name, dp->d_unit, dp->d_addr, dp->d_flags);
+       }
+       fprintf(fp, "\t0\n};\n");
+/* devices */
+       fprintf(fp, "\nstruct hp_device hp_dinit[] = {\n");
+       fprintf(fp,
+          "/*driver,\tcdriver,\tunit,\tctlr,\tslave,\taddr,\tdk,\tflags*/\n");
+       for (dp = dtab; dp != 0; dp = dp->d_next) {
+               mp = dp->d_conn;
+               if (mp == 0 || dp->d_type != DEVICE || hpbadslave(mp, dp))
+                       continue;
+               if (mp == TO_NEXUS) {
+                       if (dp->d_drive != UNKNOWN || dp->d_slave != UNKNOWN) {
+                               printf("can't specify drive/slave for %s%s\n",
+                                       dp->d_name, wnum(dp->d_unit));
+                               continue;
+                       }
+                       slave = QUES;
+                       hpib = QUES;
+               } else {
+                       if (dp->d_addr != 0) {
+                               printf("can't specify sc for device %s%s\n",
+                                       dp->d_name, wnum(dp->d_unit));
+                               continue;
+                       }
+                       if (mp->d_type == CONTROLLER) {
+                               if (dp->d_drive == UNKNOWN) {
+                                       printf("must specify drive for %s%s\n",
+                                               dp->d_name, wnum(dp->d_unit));
+                                       continue;
+                               }
+                               slave = dp->d_drive;
+                       } else {
+                               if (dp->d_slave == UNKNOWN) {
+                                       printf("must specify slave for %s%s\n",
+                                               dp->d_name, wnum(dp->d_unit));
+                                       continue;
+                               }
+                               slave = dp->d_slave;
+                       }
+                       hpib = mp->d_unit;
+               }
+               fprintf(fp, "{ &%sdriver,\t", dp->d_name);
+               if (mp == TO_NEXUS)
+                       fprintf(fp, "D 0x0,\t");
+               else
+                       fprintf(fp, "&%sdriver,", mp->d_name);
+               fprintf(fp, "\t%d,\t%d,\t%d,\tC 0x%x,\t%d,\t0x%x },\n",
+                       dp->d_unit, hpib, slave,
+                       dp->d_addr, dp->d_dk, dp->d_flags);
+       }
+       fprintf(fp, "0\n};\n");
+       (void) fclose(fp);
+}
+
+#define ishpibdev(n) (eq(n,"rd") || eq(n,"ct") || eq(n,"mt") || eq(n,"ppi"))
+#define isscsidev(n) (eq(n,"sd") || eq(n,"st"))
+
+hpbadslave(mp, dp)
+       register struct device *dp, *mp;
+{
+       extern char *wnum();
+
+       if (mp == TO_NEXUS && ishpibdev(dp->d_name) ||
+           mp != TO_NEXUS && eq(mp->d_name, "hpib") &&
+           !ishpibdev(dp->d_name)) {
+               printf("%s%s must be attached to an hpib\n",
+                      dp->d_name, wnum(dp->d_unit));
+               return (1);
+       }
+       if (mp == TO_NEXUS && isscsidev(dp->d_name) ||
+           mp != TO_NEXUS && eq(mp->d_name, "scsi") &&
+           !isscsidev(dp->d_name)) {
+               printf("%s%s must be attached to a scsi\n",
+                      dp->d_name, wnum(dp->d_unit));
+               return (1);
+       }
+       return (0);
+}
+
+char *
+wnum(num)
+{
+
+       if (num == QUES || num == UNKNOWN)
+               return ("?");
+       (void) sprintf(errbuf, "%d", num);
+       return (errbuf);
+}
+#endif
+
+#if MACHINE_I386
+char *sirq();
+
+i386_ioconf()
+{
+       register struct device *dp, *mp, *np;
+       register int uba_n, slave;
+       FILE *fp;
+
+       fp = fopen(path("ioconf.c"), "w");
+       if (fp == 0) {
+               perror(path("ioconf.c"));
+               exit(1);
+       }
+       fprintf(fp, "/*\n");
+       fprintf(fp, " * ioconf.c \n");
+       fprintf(fp, " * Generated by config program\n");
+       fprintf(fp, " */\n\n");
+       fprintf(fp, "#include \"machine/pte.h\"\n");
+       fprintf(fp, "#include \"sys/param.h\"\n");
+       fprintf(fp, "#include \"sys/buf.h\"\n");
+       fprintf(fp, "\n");
+       fprintf(fp, "#define V(s)       V##s\n");
+       fprintf(fp, "#define C (caddr_t)\n\n");
+       /*
+        * First print the isa initialization structures
+        */
+       if (seen_isa) {
+
+               fprintf(fp, "/*\n");
+               fprintf(fp, " * ISA devices\n");
+               fprintf(fp, " */\n\n");
+               fprintf(fp, "#include \"i386/isa/isa_device.h\"\n");
+               fprintf(fp, "#include \"i386/isa/isa.h\"\n");
+               fprintf(fp, "#include \"i386/isa/icu.h\"\n\n");
+
+               for (dp = dtab; dp != 0; dp = dp->d_next) {
+                       mp = dp->d_conn;
+                       if (mp == 0 || mp == TO_NEXUS ||
+                           !eq(mp->d_name, "isa"))
+                               continue;
+                       fprintf(fp,
+"extern struct isa_driver %sdriver; extern V(%s%d)();\n",
+                           dp->d_name, dp->d_name, dp->d_unit);
+               }
+               fprintf(fp, "\nstruct isa_device isa_devtab_bio[] = {\n");
+               fprintf(fp, "\
+/* driver      iobase  irq   drq     maddr    msiz    intr   unit */\n");
+               for (dp = dtab; dp != 0; dp = dp->d_next) {
+                       mp = dp->d_conn;
+                       if (dp->d_unit == QUES || mp == 0 ||
+                           mp == TO_NEXUS || !eq(mp->d_name, "isa"))
+                               continue;
+                       if (!eq(dp->d_mask, "bio")) continue;
+                       if (dp->d_port)
+                fprintf(fp, "{ &%sdriver,  %8.8s,", dp->d_name, dp->d_port);
+                       else
+        fprintf(fp, "{ &%sdriver,     0x%03x,", dp->d_name, dp->d_portn);
+               fprintf(fp, " %5.5s, %2d,  C 0x%05X, %5d, V(%s%d),  %2d },\n",
+                               sirq(dp->d_irq), dp->d_drq, dp->d_maddr,
+                        dp->d_msize, dp->d_name, dp->d_unit, dp->d_unit);
+               }
+               fprintf(fp, "0\n};\n");
+
+               fprintf(fp, "struct isa_device isa_devtab_tty[] = {\n");
+               fprintf(fp, "\
+/* driver      iobase  irq   drq     maddr    msiz    intr   unit */\n");
+               for (dp = dtab; dp != 0; dp = dp->d_next) {
+                       mp = dp->d_conn;
+                       if (dp->d_unit == QUES || mp == 0 ||
+                           mp == TO_NEXUS || !eq(mp->d_name, "isa"))
+                               continue;
+                       if (!eq(dp->d_mask, "tty")) continue;
+                       if (dp->d_port)
+                fprintf(fp, "{ &%sdriver,  %8.8s,", dp->d_name, dp->d_port);
+                       else
+        fprintf(fp, "{ &%sdriver,     0x%03x,", dp->d_name, dp->d_portn);
+               fprintf(fp, " %5.5s, %2d,  C 0x%05X, %5d, V(%s%d),  %2d },\n",
+                               sirq(dp->d_irq), dp->d_drq, dp->d_maddr,
+                        dp->d_msize, dp->d_name, dp->d_unit, dp->d_unit);
+               }
+               fprintf(fp, "0\n};\n\n");
+
+               fprintf(fp, "struct isa_device isa_devtab_net[] = {\n");
+               fprintf(fp, "\
+/* driver      iobase  irq   drq     maddr    msiz    intr   unit */\n");
+               for (dp = dtab; dp != 0; dp = dp->d_next) {
+                       mp = dp->d_conn;
+                       if (dp->d_unit == QUES || mp == 0 ||
+                           mp == TO_NEXUS || !eq(mp->d_name, "isa"))
+                               continue;
+                       if (!eq(dp->d_mask, "net")) continue;
+                       if (dp->d_port)
+                fprintf(fp, "{ &%sdriver,  %8.8s,", dp->d_name, dp->d_port);
+                       else
+        fprintf(fp, "{ &%sdriver,     0x%03x,", dp->d_name, dp->d_portn);
+               fprintf(fp, " %5.5s, %2d,  C 0x%05X, %5d, V(%s%d),  %2d },\n",
+                               sirq(dp->d_irq), dp->d_drq, dp->d_maddr,
+                        dp->d_msize, dp->d_name, dp->d_unit, dp->d_unit);
+               }
+               fprintf(fp, "0\n};\n\n");
+
+               fprintf(fp, "struct isa_device isa_devtab_null[] = {\n");
+               fprintf(fp, "\
+/* driver      iobase  irq   drq     maddr    msiz    intr   unit */\n");
+               for (dp = dtab; dp != 0; dp = dp->d_next) {
+                       mp = dp->d_conn;
+                       if (dp->d_unit == QUES || mp == 0 ||
+                           mp == TO_NEXUS || !eq(mp->d_name, "isa"))
+                               continue;
+                       if (!eq(dp->d_mask, "null")) continue;
+                       if (dp->d_port)
+                fprintf(fp, "{ &%sdriver,  %8.8s,", dp->d_name, dp->d_port);
+                       else
+        fprintf(fp, "{ &%sdriver,     0x%03x,", dp->d_name, dp->d_portn);
+               fprintf(fp, " %5.5s, %2d,  C 0x%05X, %5d, V(%s%d),  %2d },\n",
+                               sirq(dp->d_irq), dp->d_drq, dp->d_maddr,
+                        dp->d_msize, dp->d_name, dp->d_unit, dp->d_unit);
+               }
+               fprintf(fp, "0\n};\n\n");
+       }
+       (void) fclose(fp);
+}
+
+char *
+sirq(num)
+{
+
+       if (num == -1)
+               return ("0");
+       sprintf(errbuf, "IRQ%d", num);
+       return (errbuf);
+}
+#endif
+
 char *
 intv(dev)
        register struct device *dev;
 char *
 intv(dev)
        register struct device *dev;