BSD 4_3_Reno release

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

/*
* Copyright (c) 1980 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted provided
* that: (1) source distributions retain this entire copyright notice and
* comment, and (2) distributions including binaries display the following
* acknowledgement:  ``This product includes software developed by the
* University of California, Berkeley and its contributors'' in the
* documentation or other materials provided with the distribution and in
* all advertising materials mentioning features or use of this software.
* 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 ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
* WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*/

#ifndef lint
static char sccsid[] = "@(#)mkswapconf.c        5.8 (Berkeley) 6/1/90";
#endif /* not lint */

/*
* Build a swap configuration file.
*/
#include "config.h"

#include <stdio.h>
#include <ctype.h>

swapconf()
{
       register struct file_list *fl;
       struct file_list *do_swap();

       fl = conf_list;
       while (fl) {
               if (fl->f_type != SYSTEMSPEC) {
                       fl = fl->f_next;
                       continue;
               }
               fl = do_swap(fl);
       }
}

struct file_list *
do_swap(fl)
       register struct file_list *fl;
{
       FILE *fp;
       char  swapname[80];
       register struct file_list *swap;
       dev_t dev;

       if (eq(fl->f_fn, "generic")) {
               fl = fl->f_next;
               return (fl->f_next);
       }
       (void) sprintf(swapname, "swap%s.c", fl->f_fn);
       fp = fopen(path(swapname), "w");
       if (fp == 0) {
               perror(path(swapname));
               exit(1);
       }
       fprintf(fp, "#include \"../sys/param.h\"\n");
       fprintf(fp, "#include \"../sys/conf.h\"\n");
       fprintf(fp, "\n");
       /*
        * If there aren't any swap devices
        * specified, just return, the error
        * has already been noted.
        */
       swap = fl->f_next;
       if (swap == 0 || swap->f_type != SWAPSPEC) {
               (void) unlink(path(swapname));
               fclose(fp);
               return (swap);
       }
       fprintf(fp, "dev_t\trootdev = makedev(%d, %d);\n",
               major(fl->f_rootdev), minor(fl->f_rootdev));
       fprintf(fp, "dev_t\targdev  = makedev(%d, %d);\n",
               major(fl->f_argdev), minor(fl->f_argdev));
       fprintf(fp, "dev_t\tdumpdev = makedev(%d, %d);\n",
               major(fl->f_dumpdev), minor(fl->f_dumpdev));
       fprintf(fp, "\n");
       fprintf(fp, "struct\tswdevt swdevt[] = {\n");
       do {
               dev = swap->f_swapdev;
               fprintf(fp, "\t{ makedev(%d, %d),\t0,\t%d },\t/* %s */\n",
                   major(dev), minor(dev), swap->f_swapsize, swap->f_fn);
               swap = swap->f_next;
       } while (swap && swap->f_type == SWAPSPEC);
       fprintf(fp, "\t{ 0, 0, 0 }\n");
       fprintf(fp, "};\n");
       fclose(fp);
       return (swap);
}

static  int devtablenotread = 1;
static  struct devdescription {
       char    *dev_name;
       int     dev_major;
       struct  devdescription *dev_next;
} *devtable;

/*
* Given a device name specification figure out:
*      major device number
*      partition
*      device name
*      unit number
* This is a hack, but the system still thinks in
* terms of major/minor instead of string names.
*/
dev_t
nametodev(name, defunit, defpartition)
       char *name;
       int defunit;
       char defpartition;
{
       char *cp, partition;
       int unit;
       register struct devdescription *dp;

       cp = name;
       if (cp == 0) {
               fprintf(stderr, "config: internal error, nametodev\n");
               exit(1);
       }
       while (*cp && !isdigit(*cp))
               cp++;
       unit = *cp ? atoi(cp) : defunit;
       if (unit < 0 || unit > 31) {
               fprintf(stderr,
"config: %s: invalid device specification, unit out of range\n", name);
               unit = defunit;                 /* carry on more checking */
       }
       if (*cp) {
               *cp++ = '\0';
               while (*cp && isdigit(*cp))
                       cp++;
       }
       partition = *cp ? *cp : defpartition;
       if (partition < 'a' || partition > 'h') {
               fprintf(stderr,
"config: %c: invalid device specification, bad partition\n", *cp);
               partition = defpartition;       /* carry on */
       }
       if (devtablenotread)
               initdevtable();
       for (dp = devtable; dp; dp = dp->dev_next)
               if (eq(name, dp->dev_name))
                       break;
       if (dp == 0) {
               fprintf(stderr, "config: %s: unknown device\n", name);
               return (NODEV);
       }
       return (makedev(dp->dev_major, (unit << 3) + (partition - 'a')));
}

char *
devtoname(dev)
       dev_t dev;
{
       char buf[80]; 
       register struct devdescription *dp;

       if (devtablenotread)
               initdevtable();
       for (dp = devtable; dp; dp = dp->dev_next)
               if (major(dev) == dp->dev_major)
                       break;
       if (dp == 0)
               dp = devtable;
       (void) sprintf(buf, "%s%d%c", dp->dev_name,
               minor(dev) >> 3, (minor(dev) & 07) + 'a');
       return (ns(buf));
}

initdevtable()
{
       char buf[BUFSIZ];
       int maj;
       register struct devdescription **dp = &devtable;
       FILE *fp;

       (void) sprintf(buf, "../conf/devices.%s", machinename);
       fp = fopen(buf, "r");
       if (fp == NULL) {
               fprintf(stderr, "config: can't open %s\n", buf);
               exit(1);
       }
       while (fscanf(fp, "%s\t%d\n", buf, &maj) == 2) {
               *dp = (struct devdescription *)malloc(sizeof (**dp));
               (*dp)->dev_name = ns(buf);
               (*dp)->dev_major = maj;
               dp = &(*dp)->dev_next;
       }
       *dp = 0;
       fclose(fp);
       devtablenotread = 0;
}