added RXIOC_MASK

[unix-history] / usr / src / usr.sbin / config / mkmakefile.c

diff --git a/usr/src/usr.sbin/config/mkmakefile.c b/usr/src/usr.sbin/config/mkmakefile.c
index 902606a..74cc2ba 100644 (file)
--- a/usr/src/usr.sbin/config/mkmakefile.c
+++ b/usr/src/usr.sbin/config/mkmakefile.c
@@ -1,7 +1,9 @@
+/*     mkmakefile.c    1.26    83/02/21        */
+

 /*
 /*

- * mkmakefile.c        1.7     81/03/31
- *     Functions in this file build the makefile from the files list
- *     and the information in the config table
+ * Build the makefile for the system, from
+ * the information in the files files and the
+ * additional files for the machine being compiled to.

  */
 
 #include <stdio.h>
  */
 
 #include <stdio.h>


@@ -9,361 +11,512 @@
 #include "y.tab.h"
 #include "config.h"
 
 #include "y.tab.h"
 #include "config.h"
 

-#define next_word(fp, wd)\
-    { register char *word = get_word(fp);\
-       if (word == EOF) return EOF; \
-       else wd = word; }
+#define next_word(fp, wd) \
+       { register char *word = get_word(fp); \
+         if (word == (char *)EOF) \
+               return; \
+         else \
+               wd = word; \
+       }

 
 

-static struct file_list *fcur;
+static struct file_list *fcur;

 
 /*
 
 /*

- * fl_lookup
- *     look up a file name
+ * Lookup a file, by make.

  */
  */

-
-struct file_list *fl_lookup(file)
-register char *file;
+struct file_list *
+fl_lookup(file)
+       register char *file;

 {
 {

-    register struct file_list *fp;
-
-    for (fp = ftab ; fp != NULL; fp = fp->f_next)
-    {
-       if (eq(fp->f_fn, file))
-           return fp;
-    }
-    return NULL;
+       register struct file_list *fp;
+
+       for (fp = ftab ; fp != 0; fp = fp->f_next) {
+               if (eq(fp->f_fn, file))
+                       return (fp);
+       }
+       return (0);

 }
 
 /*
 }
 
 /*

- * new_fent
- *     Make a new file list entry
+ * Make a new file list entry

  */
  */

-
-struct file_list *new_fent()
+struct file_list *
+new_fent()

 {
 {

-    register struct file_list *fp;
-
-    fp = (struct file_list *) malloc(sizeof *fp);
-    fp->f_needs = fp->f_next = NULL;
-    if (fcur == NULL)
-       fcur = ftab = fp;
-    else
-       fcur->f_next = fp;
-    fcur = fp;
-    return fp;
+       register struct file_list *fp;
+
+       fp = (struct file_list *) malloc(sizeof *fp);
+       fp->f_needs = 0;
+       fp->f_next = 0;
+       if (fcur == 0)
+               fcur = ftab = fp;
+       else
+               fcur->f_next = fp;
+       fcur = fp;
+       return (fp);

 }
 
 }
 

+char   *COPTS;
+

 /*
 /*

- * makefile:
- *     Build the makefile from the skeleton
+ * Build the makefile from the skeleton

  */
  */

-

 makefile()
 {
 makefile()
 {

-    FILE *ifp, *ofp;
-    char line[BUFSIZ];
-    struct cputype *cp;
-    struct opt *op;
-
-    read_files();                      /* Read in the "files" file */
-    ifp = fopen("../conf/makefile", "r");
-    if (ifp == NULL) {
-       perror("../conf/makefile");
-       exit(1);
-    }
-    ofp = fopen(path("makefile"), "w");
-    if (ofp == NULL) {
-       perror(path("makefile"));
-       exit(1);
-    }
-    fprintf(ofp, "IDENT=-D%s", raise(ident));
-    if (cputype == NULL) {
-       printf("cpu type must be specified\n");
-       exit(1);
-    }
-    for (cp = cputype; cp; cp = cp->cpu_next)
-       fprintf(ofp, " -D%s", cp->cpu_name);
-    for (op = opt; op; op = op->op_next)
-         fprintf(ofp, " -D%s", op->op_name);
-    fprintf(ofp, "\n");
-    if (hz == 0) {
-       printf("hz not specified; 50hz assumed\n");
-       hz = 50;
-    }
-    if (hadtz == 0)
-       printf("timezone not specified; gmt assumed\n");
-    if (maxusers == 0) {
-       printf("maxusers not specified; 24 assumed\n");
-       maxusers = 24;
-    } else if (maxusers < 8) {
-       printf("minimum of 8 maxusers assumed\n");
-       maxusers = 8;
-    } else if (maxusers > 128) {
-       printf("maxusers truncated to 128\n");
-       maxusers = 128;
-    }
-    fprintf(ofp, "PARAM=-DHZ=%d -DTIMEZONE=%d -DDST=%d -DMAXUSERS=%d\n",
-       hz, timezone, dst, maxusers);
-    while(fgets(line, BUFSIZ, ifp) != NULL)
-    {
-       if (*line != '%')
-       {
-           fprintf(ofp, "%s", line);
-           continue;
+       FILE *ifp, *ofp;
+       char line[BUFSIZ];
+       struct opt *op;
+
+       read_files();
+       strcpy(line, "../conf/makefile.");
+       (void) strcat(line, machinename);
+       ifp = fopen(line, "r");
+       if (ifp == 0) {
+               perror(line);
+               exit(1);

        }
        }

-       else if (eq(line, "%OBJS\n"))
-           do_objs(ofp);
-       else if (eq(line, "%CFILES\n"))
-           do_cfiles(ofp);
-       else if (eq(line, "%RULES\n"))
-           do_rules(ofp);
-       else if (eq(line, "%LOAD\n"))
-           do_load(ofp);
-       else
-           fprintf(stderr, "Unknown %% construct in generic makefile: %s", line);
-    }
-    fclose(ifp);
-    fclose(ofp);
+       ofp = fopen(path("makefile"), "w");
+       if (ofp == 0) {
+               perror(path("makefile"));
+               exit(1);
+       }
+       fprintf(ofp, "IDENT=-D%s", raise(ident));
+       if (profiling)
+               fprintf(ofp, " -DGPROF");
+       if (cputype == 0) {
+               printf("cpu type must be specified\n");
+               exit(1);
+       }
+       { struct cputype *cp;
+         for (cp = cputype; cp; cp = cp->cpu_next)
+               fprintf(ofp, " -D%s", cp->cpu_name);
+       }
+       for (op = opt; op; op = op->op_next)
+               if (op->op_value)
+                       fprintf(ofp, " -D%s=\"%s\"", op->op_name, op->op_value);
+               else
+                       fprintf(ofp, " -D%s", op->op_name);
+       fprintf(ofp, "\n");
+       if (hadtz == 0)
+               printf("timezone not specified; gmt assumed\n");
+#ifdef vax
+       if (maxusers == 0) {
+               printf("maxusers not specified; 24 assumed\n");
+               maxusers = 24;
+       } else if (maxusers < 8) {
+               printf("minimum of 8 maxusers assumed\n");
+               maxusers = 8;
+       } else if (maxusers > 128) {
+               printf("maxusers truncated to 128\n");
+               maxusers = 128;
+       }
+#endif
+#ifdef sun
+       if (maxusers == 0) {
+               printf("maxusers not specified; 8 assumed\n");
+               maxusers = 8;
+       } else if (maxusers < 2) {
+               printf("minimum of 2 maxusers assumed\n");
+               maxusers = 2;
+       } else if (maxusers > 32) {
+               printf("maxusers truncated to 32\n");
+               maxusers = 32;
+       }
+#endif
+       fprintf(ofp, "PARAM=-DTIMEZONE=%d -DDST=%d -DMAXUSERS=%d\n",
+           timezone, dst, maxusers);
+       while (fgets(line, BUFSIZ, ifp) != 0) {
+               if (*line == '%')
+                       goto percent;
+               if (profiling && strncmp(line, "COPTS=", 6) == 0) {
+                       register char *cp;
+
+                       fprintf(ofp, "GPROF.EX=/usr/src/lib/libc/csu/gmon.ex\n");
+                       cp = index(line, '\n');
+                       if (cp)
+                               *cp = 0;
+                       cp = line + 6;
+                       while (*cp && (*cp == ' ' || *cp == '\t'))
+                               cp++;
+                       COPTS = malloc((unsigned)(strlen(cp) + 1));
+                       if (COPTS == 0) {
+                               printf("config: out of memory\n");
+                               exit(1);
+                       }
+                       strcpy(COPTS, cp);
+                       fprintf(ofp, "%s -pg\n", line);
+                       continue;
+               }
+               fprintf(ofp, "%s", line);
+               continue;
+       percent:
+               if (eq(line, "%OBJS\n"))
+                       do_objs(ofp);
+               else if (eq(line, "%CFILES\n"))
+                       do_cfiles(ofp);
+               else if (eq(line, "%RULES\n"))
+                       do_rules(ofp);
+               else if (eq(line, "%LOAD\n"))
+                       do_load(ofp);
+               else
+                       fprintf(stderr,
+                           "Unknown %% construct in generic makefile: %s",
+                           line);
+       }
+       (void) fclose(ifp);
+       (void) fclose(ofp);

 }
 
 /*
 }
 
 /*

- * files:
- *     Read in the "files" file.
- *     Store it in the ftab linked list
+ * Read in the information about files used in making the system.
+ * Store it in the ftab linked list.

  */
  */

-

 read_files()
 {
 read_files()
 {

-    FILE *fp;
-    register struct file_list *tp;
-    register struct device *dp;
-    register char *wd, *this;
-    int type;
-
-    fp = fopen("../conf/files", "r");
-    if (fp == NULL) {
-       perror("../conf/files");
-       exit(1);
-    }
-    ftab = NULL;
-    while((wd = get_word(fp)) != EOF)
-    {
-       if (wd == NULL)
-           continue;
+       FILE *fp;
+       register struct file_list *tp;
+       register struct device *dp;
+       char *wd, *this, *needs, *devorprof;
+       char fname[32];
+       int nreqs;
+       int first = 1;
+
+       ftab = 0;
+       (void) strcpy(fname, "files");
+openit:
+       fp = fopen(fname, "r");
+       if (fp == 0) {
+               perror(fname);
+               exit(1);
+       }
+next:
+       /* filename     [ standard | optional dev* ] [ device-driver ] */
+       wd = get_word(fp);
+       if (wd == (char *)EOF) {
+               (void) fclose(fp);
+               if (first) {
+                       (void) sprintf(fname, "files.%s", machinename);
+                       first = 0;
+                       goto openit;
+               }
+               return;
+       }
+       if (wd == 0)
+               goto next;

        this = ns(wd);
        this = ns(wd);

-       /*
-        * Readad standard/optional
-        */

        next_word(fp, wd);
        next_word(fp, wd);

-       if (wd == NULL)
-       {
-           fprintf(stderr, "Huh, no type for %s in files.\n", this);
-           exit(10);
+       if (wd == 0) {
+               printf("%s: No type for %s.\n",
+                   fname, this);
+               exit(1);

        }
        }

-       if ((tp = fl_lookup(wd)) == NULL)
-           tp = new_fent();
-       else
-           free(tp->f_fn);
-       tp->f_fn = this;
-       type = 0;
-       if (eq(wd, "optional"))
-       {
-           next_word(fp, wd);
-           if (wd == NULL)
-           {
-               fprintf(stderr, "Needed a dev for optional(%s)\n", this);
-               exit(11);
-           }
-           tp->f_needs = ns(wd);
-           for (dp = dtab ; dp != NULL; dp = dp->d_next)
-           {
-               if (eq(dp->d_name, wd))
-                   break;
-           }
-           if (dp == NULL)
-               type = INVISIBLE;
+       if (fl_lookup(this)) {
+               printf("%s: Duplicate file %s.\n",
+                   fname, this);
+               exit(1);

        }
        }

+       nreqs = 0;
+       devorprof = "";
+       needs = 0;
+       if (eq(wd, "standard"))
+               goto checkdev;
+       if (!eq(wd, "optional")) {
+               printf("%s: %s must be optional or standard\n",
+                   fname, this);
+               exit(1);
+       }
+nextopt:

        next_word(fp, wd);
        next_word(fp, wd);

-       if (type == 0 && wd != NULL)
-           type = DEVICE;
-       else if (type == 0)
-           type = NORMAL;
-       tp->f_type = type;
-    }
-    fclose(fp);
+       if (wd == 0)
+               goto doneopt;
+       devorprof = wd;
+       if (eq(wd, "device-driver") || eq(wd, "profiling-routine")) {
+               next_word(fp, wd);
+               goto save;
+       }
+       nreqs++;
+       if (needs == 0)
+               needs = ns(wd);
+       for (dp = dtab; dp != 0; dp = dp->d_next)
+               if (eq(dp->d_name, wd))
+                       goto nextopt;
+       while ((wd = get_word(fp)) != 0)
+               ;
+       tp = new_fent();
+       tp->f_fn = this;
+       tp->f_type = INVISIBLE;
+       tp->f_needs = needs;
+       goto next;
+doneopt:
+       if (nreqs == 0) {
+               printf("%s: what is %s optional on?\n",
+                   fname, this);
+               exit(1);
+       }
+checkdev:
+       if (wd) {
+               next_word(fp, wd);
+               if (wd != 0) {
+                       devorprof = wd;
+                       next_word(fp, wd);
+               }
+       }
+save:
+       if (wd != 0) {
+               printf("%s: syntax error describing %s\n",
+                   fname, this);
+               exit(1);
+       }
+       if (eq(devorprof, "profiling-routine") && profiling == 0)
+               goto next;
+       tp = new_fent();
+       tp->f_fn = this;
+       if (eq(devorprof, "device-driver"))
+               tp->f_type = DEVICE;
+       else if (eq(devorprof, "profiling-routine"))
+               tp->f_type = PROFILING;
+       else
+               tp->f_type = NORMAL;
+       tp->f_needs = needs;
+       goto next;

 }
 
 }
 

-/*
- * do_objs
- *     Spew forth the OBJS definition
- */
-

 do_objs(fp)
 do_objs(fp)

-FILE *fp;
+       FILE *fp;

 {
 {

-    register struct file_list *tp;
-    register int lpos, len;
-    register char *cp, och, *sp;
-    char *tail();
-
-    fprintf(fp, "OBJS=");
-    lpos = 6;
-    for (tp = ftab; tp != NULL; tp = tp->f_next)
-    {
-       if (tp->f_type == INVISIBLE)
-           continue;
-       sp = tail(tp->f_fn);
-       cp = sp + (len = strlen(sp)) - 1;
-       och = *cp;
-       *cp = 'o';
-       if (len + lpos > 72)
-       {
-           lpos = 8;
-           fprintf(fp, "\\\n\t");
+       register struct file_list *tp;
+       register int lpos, len;
+       register char *cp, och, *sp;
+       char *tail();
+
+       fprintf(fp, "OBJS=");
+       lpos = 6;
+       for (tp = ftab; tp != 0; tp = tp->f_next) {
+               if (tp->f_type == INVISIBLE)
+                       continue;
+               sp = tail(tp->f_fn);
+               cp = sp + (len = strlen(sp)) - 1;
+               och = *cp;
+               *cp = 'o';
+               if (len + lpos > 72) {
+                       lpos = 8;
+                       fprintf(fp, "\\\n\t");
+               }
+               fprintf(fp, "%s ", sp);
+               lpos += len + 1;
+               *cp = och;

        }
        }

-       fprintf(fp, "%s ", sp);
-       lpos += len + 1;
-       *cp = och;
-    }
-    if (lpos != 8)
-       putc('\n', fp);
+       if (lpos != 8)
+               putc('\n', fp);

 }
 
 }
 

-/*
- * do_cfiles
- *     Spew forth the CFILES definition
- */
-

 do_cfiles(fp)
 do_cfiles(fp)

-FILE *fp;
+       FILE *fp;

 {
 {

-    register struct file_list *tp;
-    register int lpos, len;
-
-    fprintf(fp, "CFILES=");
-    lpos = 8;
-    for (tp = ftab; tp != NULL; tp = tp->f_next)
-    {
-       if (tp->f_type == INVISIBLE)
-           continue;
-       if (tp->f_fn[strlen(tp->f_fn)-1] != 'c')
-           continue;
-       if ((len = 3 + strlen(tp->f_fn)) + lpos > 72)
-       {
-           lpos = 8;
-           fprintf(fp, "\\\n\t");
+       register struct file_list *tp;
+       register int lpos, len;
+
+       fprintf(fp, "CFILES=");
+       lpos = 8;
+       for (tp = ftab; tp != 0; tp = tp->f_next) {
+               if (tp->f_type == INVISIBLE)
+                       continue;
+               if (tp->f_fn[strlen(tp->f_fn)-1] != 'c')
+                       continue;
+               if ((len = 3 + strlen(tp->f_fn)) + lpos > 72) {
+                       lpos = 8;
+                       fprintf(fp, "\\\n\t");
+               }
+               fprintf(fp, "../%s ", tp->f_fn);
+               lpos += len + 1;

        }
        }

-       fprintf(fp, "../%s ", tp->f_fn);
-       lpos += len + 1;
-    }
-    if (lpos != 8)
-       putc('\n', fp);
+       if (lpos != 8)
+               putc('\n', fp);

 }
 
 }
 

-/*
- * tail:
- *     Return tail end of a filename
- */
-
-char *tail(fn)
-char *fn;
+char *
+tail(fn)
+       char *fn;

 {
 {

-    register char *cp;
+       register char *cp;

 
 

-    cp = rindex(fn, '/');
-    return cp+1;
+       cp = rindex(fn, '/');
+       return (cp+1);

 }
 
 /*
 }
 
 /*

- * do_rules:
- *     Spit out the rules for making each file
+ * Create the makerules for each file
+ * which is part of the system.
+ * Devices are processed with the special c2 option -i
+ * which avoids any problem areas with i/o addressing
+ * (e.g. for the VAX); assembler files are processed by as.

  */
  */

-

 do_rules(f)
 do_rules(f)

-FILE *f;
+       FILE *f;

 {
 {

-    register char *cp, *np, och, *tp;
-    register struct file_list *ftp;
+       register char *cp, *np, och, *tp;
+       register struct file_list *ftp;

 
 

-    for (ftp = ftab; ftp != NULL; ftp = ftp->f_next)
-    {
+for (ftp = ftab; ftp != 0; ftp = ftp->f_next) {

        if (ftp->f_type == INVISIBLE)
        if (ftp->f_type == INVISIBLE)

-           continue;
+               continue;

        cp = (np = ftp->f_fn) + strlen(ftp->f_fn) - 1;
        och = *cp;
        *cp = '\0';
        fprintf(f, "%so: ../%s%c\n", tail(np), np, och);
        tp = tail(np);
        cp = (np = ftp->f_fn) + strlen(ftp->f_fn) - 1;
        och = *cp;
        *cp = '\0';
        fprintf(f, "%so: ../%s%c\n", tail(np), np, och);
        tp = tail(np);

-       if (och == 's')
-           fprintf(f, "\t${AS} -o %so ../%ss\n\n", tp, np);
-       else if (ftp->f_type == NORMAL)
-       {
-           fprintf(f, "\t${CC} -I. -c -S ${COPTS} ../%sc\n", np);
-           fprintf(f, "\t${C2} %ss | sed -f ../sys/asm.sed | ${AS} -o %so\n",
-                   tp, tp);
-           fprintf(f, "\trm -f %ss\n\n", tp);
+       if (och == 's') {
+               fprintf(f, "\t${AS} -o %so ../%ss\n\n", tp, np);
+               continue;

        }
        }

-       else if (ftp->f_type == DEVICE)
-       {
-           fprintf(f, "\t${CC} -I. -c -S ${COPTS} ../%sc\n", np);
-           fprintf(f,"\t${C2} -i %ss | sed -f ../sys/asm.sed | ${AS} -o %so\n",
-                   tp, tp);
-           fprintf(f, "\trm -f %ss\n\n", tp);
+       switch (ftp->f_type) {
+
+       case NORMAL:
+               switch (machine) {
+
+               case MACHINE_VAX:
+                       fprintf(f, "\t${CC} -I. -c -S ${COPTS} ../%sc\n", np);
+                       fprintf(f, "\t${C2} %ss | sed -f ../%s/asm.sed |",
+                           tp, machinename);
+                       fprintf(f, " ${AS} -o %so\n", tp);
+                       fprintf(f, "\trm -f %ss\n\n", tp);
+                       break;
+
+               case MACHINE_SUN:
+                       fprintf(f, "\t${CC} -I. -c -O ${COPTS} ../%sc\n\n", np);
+                       break;
+               }
+               break;
+
+       case DEVICE:
+               switch (machine) {
+
+               case MACHINE_VAX:
+                       fprintf(f, "\t${CC} -I. -c -S ${COPTS} ../%sc\n", np);
+                       fprintf(f,"\t${C2} -i %ss | sed -f ../%s/asm.sed |",
+                           tp, machinename);
+                       fprintf(f, " ${AS} -o %so\n", tp);
+                       fprintf(f, "\trm -f %ss\n\n", tp);
+                       break;
+
+               case MACHINE_SUN:
+                       fprintf(f, "\t${CC} -I. -c -O ${COPTS} ../%sc\n\n", np);
+               }
+               break;
+
+       case PROFILING:
+               if (!profiling)
+                       continue;
+               if (COPTS == 0) {
+                       fprintf(stderr,
+                           "config: COPTS undefined in generic makefile");
+                       COPTS = "";
+               }
+               switch (machine) {
+
+               case MACHINE_VAX:
+                       fprintf(f, "\t${CC} -I. -c -S %s ../%sc\n", COPTS, np);
+                       fprintf(f, "\tex - %ss < ${GPROF.EX}\n", tp);
+                       fprintf(f,
+                           "\tsed -f ../vax/asm.sed %ss | ${AS} -o %so\n",
+                           tp, tp);
+                       fprintf(f, "\trm -f %ss\n\n", tp);
+                       break;
+
+               case MACHINE_SUN:
+                       fprintf(stderr,
+                           "config: don't know how to profile kernel on sun\n");
+                       break;
+               }
+               break;
+
+       default:
+               printf("Don't know rules for %s", np);
+               break;

        }
        }

-       else
-           fprintf(stderr, "Don't know rules for %s", np);

        *cp = och;
        *cp = och;

-    }
+}

 }
 
 /*
  * Create the load strings
  */
 }
 
 /*
  * Create the load strings
  */

-

 do_load(f)
 do_load(f)

-register FILE *f;
+       register FILE *f;

 {
 {

-    register struct file_list *fl;
-
-    for (fl = conf_list; fl != NULL; fl = fl->f_next)
-    {
-       fprintf(f, "%s: makefile locore.o ${OBJS} ioconf.o param.o swap%s.o\n",
-               fl->f_needs, fl->f_fn);
-       fprintf(f, "\t@echo loading %s\n\t@rm -f %s\n\t",
-               fl->f_needs, fl->f_needs);
-       fprintf(f,
-           "@ld -n -o %s -e start -x -T 80000000 locore.o ${OBJS} ioconf.o param.o swap%s.o\n",
-           fl->f_needs, fl->f_fn);
-       fprintf(f, "\t@echo rearranging symbols\n");
-       fprintf(f, "\t@-symorder ../sys/symbols.sort %s\n", fl->f_needs);
-       fprintf(f, "\t@size %s\n", fl->f_needs);
-       fprintf(f, "\t@chmod 755 %s\n\n", fl->f_needs);
-    }
-    for (fl = conf_list; fl != NULL; fl = fl->f_next)
-    {
-       fprintf(f, "swap%s.o: ../dev/swap%s.c\n", fl->f_fn, fl->f_fn);
-       fprintf(f, "\t${CC} -I. -c -S ${COPTS} ../dev/swap%s.c\n", fl->f_fn);
-       fprintf(f,
-           "\t${C2} swap%s.s | sed -f ../sys/asm.sed | ${AS} -o swap%s.o\n",
-           fl->f_fn, fl->f_fn);
-       fprintf(f, "\trm -f swap%s.s\n\n", fl->f_fn);
-    }
-    fprintf(f, "all:");
-    for (fl = conf_list; fl != NULL; fl = fl->f_next)
-       fprintf(f, " %s", fl->f_needs);
-    putc('\n', f);
+       register struct file_list *fl;
+       int first = 1;
+
+       for (fl = conf_list; fl != 0; fl = fl->f_next) {
+               fprintf(f, "%s: makefile locore.o ${OBJS} param.o",
+                   fl->f_needs);
+               fprintf(f, " ioconf.o swap%s.o\n", fl->f_fn);
+               fprintf(f, "\t@echo loading %s\n\t@rm -f %s\n",
+                   fl->f_needs, fl->f_needs);
+               if (first) {
+                       first = 0;
+                       fprintf(f, "\t@sh ../conf/newvers.sh\n");
+                       fprintf(f, "\t@${CC} $(CFLAGS) -c vers.c\n");
+               }
+               switch (machine) {
+
+               case MACHINE_VAX:
+                       fprintf(f, "\t@${LD} -n -o %s -e start -x -T 80000000 ",
+                               fl->f_needs);
+                       fprintf(f, "locore.o ${OBJS} vers.o ioconf.o param.o ");
+                       fprintf(f, "swap%s.o\n", fl->f_fn);
+                       break;
+
+               case MACHINE_SUN:
+                       fprintf(f, "\t@${LD} -o %s -e start -x -T 4000 ",
+                               fl->f_needs);
+                       fprintf(f, "locore.o ${OBJS} vers.o ioconf.o param.o ");
+                       fprintf(f, "swap%s.o\n", fl->f_fn);
+                       break;
+               }
+               fprintf(f, "\t@echo rearranging symbols\n");
+               fprintf(f, "\t@-symorder ../%s/symbols.sort %s\n",
+                   machinename, fl->f_needs);
+               fprintf(f, "\t@size %s\n", fl->f_needs);
+               fprintf(f, "\t@chmod 755 %s\n\n", fl->f_needs);
+       }
+       for (fl = conf_list; fl != 0; fl = fl->f_next) {
+               fprintf(f, "swap%s.o: ../%s/swap%s.c\n",
+                   fl->f_fn, machinename, fl->f_fn);
+               switch (machine) {
+
+               case MACHINE_VAX:
+                       fprintf(f, "\t${CC} -I. -c -S ${COPTS}");
+                       fprintf(f, " ../%s/swap%s.c\n", machinename, fl->f_fn);
+                       fprintf(f, "\t${C2} swap%s.s | sed -f ../%s/asm.sed",
+                           fl->f_fn, machinename);
+                       fprintf(f, " | ${AS} -o swap%s.o\n",
+                           fl->f_fn);
+                       fprintf(f, "\trm -f swap%s.s\n\n", fl->f_fn);
+                       break;
+
+               case MACHINE_SUN:
+                       fprintf(f, "\t${CC} -I. -c -O ${COPTS} ");
+                       fprintf(f, "../%s/swap%s.c\n\n", machinename, fl->f_fn);
+                       break;
+               }
+       }
+       fprintf(f, "all:");
+       for (fl = conf_list; fl != 0; fl = fl->f_next)
+               fprintf(f, " %s", fl->f_needs);
+       fprintf(f, "\n");

 }
 
 }
 

+char *

 raise(str)
 raise(str)

-register char *str;
+       register char *str;

 {
 {

-    register char *cp = str;
-
-    while(*str)
-    {
-       if (islower(*str))
-           *str = toupper(*str);
-       str++;
-    }
-    return cp;
+       register char *cp = str;
+
+       while (*str) {
+               if (islower(*str))
+                       *str = toupper(*str);
+               str++;
+       }
+       return (cp);

 }
 }