BSD 4_3_Net_2 release

[unix-history] / usr / src / usr.sbin / kvm_mkdb / kvm_mkdb.c

diff --git a/usr/src/usr.sbin/kvm_mkdb/kvm_mkdb.c b/usr/src/usr.sbin/kvm_mkdb/kvm_mkdb.c
index d003350..ff6fa1c 100644 (file)
--- a/usr/src/usr.sbin/kvm_mkdb/kvm_mkdb.c
+++ b/usr/src/usr.sbin/kvm_mkdb/kvm_mkdb.c
@@ -2,19 +2,33 @@
  * Copyright (c) 1990 The Regents of the University of California.
  * All rights reserved.
  *
  * Copyright (c) 1990 The 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.
+ * 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


@@ -24,266 +38,77 @@ char copyright[] =
 #endif /* not lint */
 
 #ifndef lint
 #endif /* not lint */
 
 #ifndef lint

-static char sccsid[] = "@(#)kvm_mkdb.c 5.5 (Berkeley) 6/25/90";
+static char sccsid[] = "@(#)kvm_mkdb.c 5.11 (Berkeley) 4/27/91";

 #endif /* not lint */
 
 #include <sys/param.h>
 #endif /* not lint */
 
 #include <sys/param.h>

-#include <sys/file.h>
-#include <ndbm.h>
-#include <a.out.h>
-#include <kvm.h>
-#include <paths.h>
-#include <limits.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <db.h>

 #include <errno.h>
 #include <errno.h>

-#include <string.h>

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

+#include <string.h>
+#include <paths.h>

 
 char *tmp;
 #define basename(cp)   ((tmp=rindex((cp), '/')) ? tmp+1 : (cp))
 
 char *tmp;
 #define basename(cp)   ((tmp=rindex((cp), '/')) ? tmp+1 : (cp))

-#define USAGE  "kvm_mkdb"
-
-char *progname;

 
 main(argc, argv)
 
 main(argc, argv)

-       char *argv[];
+       int argc;
+       char **argv;

 {
 {

-       DBM *db;
-       char *nlistpath, *nlistname;
-       char dbtemp[MAXPATHLEN];
-       char dbname[MAXPATHLEN];
-       extern char *optarg;

        extern int optind;
        extern int optind;

+       DB *db;

        int ch;
        int ch;

+       char *nlistpath, *nlistname, dbtemp[MAXPATHLEN], dbname[MAXPATHLEN];

 
 

-       progname = argv[0];

        while ((ch = getopt(argc, argv, "")) != EOF)
                switch((char)ch) {
                case '?':
                default:
        while ((ch = getopt(argc, argv, "")) != EOF)
                switch((char)ch) {
                case '?':
                default:

-                       fprintf(stderr, "usage: %s", progname, USAGE);
-                       exit(1);
+                       usage();

                }
        argc -= optind;
        argv += optind;
 
        nlistpath = argc > 1 ? argv[0] : _PATH_UNIX;
        nlistname = basename(nlistpath);
                }
        argc -= optind;
        argv += optind;
 
        nlistpath = argc > 1 ? argv[0] : _PATH_UNIX;
        nlistname = basename(nlistpath);

-       sprintf(dbtemp, "%s/kvm_tmp%s", KVMDBDIR, nlistname);
-       sprintf(dbname, "%s/kvm_%s", KVMDBDIR, nlistname);
-       rmdb(dbtemp);
-       umask(0);
-       if ((db = dbm_open(dbtemp, O_CREAT|O_WRONLY|O_EXCL, 0644)) == NULL)
-               syserrexit("error opening dbmfile");
-       if (create_knlist(nlistpath, db) == -1)
-               errexit("error creating kernel namelist");
-       if (create_devnames(db) == -1)
-               errexit("error creating devnames");
-       rmdb(dbname);
-       mvdb(dbtemp, dbname);
-
-       exit(0);
-}
-
-rmdb(file)
-       char *file;
-{
-       int len = strlen(file);
-
-       if (len > (MAXPATHLEN - 5))
-               errexit("pathname too long: %s", file);
-       strcpy(file+len, ".dir");
-       if (unlink(file) < 0 && errno != ENOENT)
-               syserrexit("can't unlink %s", file);
-       strcpy(file+len, ".pag");
-       if (unlink(file) < 0 && errno != ENOENT)
-               syserrexit("can't unlink %s", file);
-       *(file+len) = '\0';
-}
-
-mvdb(from, to)
-       char *from;
-       char *to;
-{
-       int flen = strlen(from);
-       int tlen = strlen(to);

 
 

-       if (flen > (MAXPATHLEN - 5) || tlen > (MAXPATHLEN - 5))
-               errexit("pathname too long: %s or %s", from, to);
-       strcpy(from+flen, ".dir");
-       strcpy(to+tlen, ".dir");
-       if (rename(from, to) == -1)
-               syserrexit("rename %s to %s", from, to);
-       strcpy(from+flen, ".pag");
-       strcpy(to+tlen, ".pag");
-       if (rename(from, to) == -1)
-               syserrexit("rename %s to %s", from, to);
-       *(from+flen) = *(to+tlen) = '\0';
-}
-
-/* from libc/nlist.c */
-#include <unistd.h>
-
-typedef struct nlist NLIST;
-#define        _strx   n_un.n_strx
-#define        _name   n_un.n_name
-#define        ISVALID(p)      (p->_name && p->_name[0])
-#define MAXSYMSIZE     256
-
-create_knlist(name, db)
-       char *name;
-       DBM *db;
-{
-       register NLIST *p, *s;
-       struct exec ebuf;
-       FILE *fstr, *fsym;
-       NLIST nbuf;
-       off_t strings_offset, symbol_offset, symbol_size, lseek();
-       char sbuf[MAXSYMSIZE+1];
-       register char *bp;
-       register int c, len;
-       datum key, data;
-
-       if (!(fsym = fopen(name, "r")))
-               syserrexit("can't open %s", name);
-       if (fread((char *)&ebuf, sizeof(struct exec), 1, fsym) != 1 ||
-           N_BADMAG(ebuf))
-               syserrexit("can't read exec");
-
-       symbol_offset = N_SYMOFF(ebuf);
-       symbol_size = ebuf.a_syms;
-       strings_offset = symbol_offset + symbol_size;
-
-       if (fseek(fsym, symbol_offset, SEEK_SET) == -1)
-               syserrexit("can't seek symbol table: %x", symbol_offset);
-       if ((fstr = fopen(name, "r")) == NULL)
-               syserrexit("can't open %s", name);
-
-       sbuf[0] = KVMDB_NLIST;
-       key.dptr = sbuf;
-       data.dptr = (char *)&nbuf;
-       data.dsize = sizeof (NLIST);
-
-       for (s = &nbuf; symbol_size; symbol_size -= sizeof (NLIST)) {
-               if (fread((char *)s, sizeof (NLIST), 1, fsym) != 1)
-                       syserrexit("can't read nlist entry");
-               if (!s->_strx || s->n_type&N_STAB)
-                       continue;
-               if (fseek(fstr, strings_offset + s->_strx, SEEK_SET) == -1)
-                       syserrexit("can't seek string: %x", 
-                               strings_offset + s->_strx);
-               /*
-                * read string
-                */
-               bp = sbuf + 1;
-               len = 0;
-               while ((c = fgetc(fstr)) != EOF && c != '\0') {
-                       if (++len == MAXSYMSIZE)
-                               errexit("string too long");
-                       *bp++ = c;
-               }
-               *bp = '\0';
-               /*
-                * and store it
-                */
-               key.dsize = bp - sbuf;
-               if (dbm_store(db, key, data, DBM_INSERT) < 0)
-                       syserrexit("dbm_store");
-               if (strcmp(sbuf+1, "_version") == 0) {
-                       /* 
-                        * store the value of version in VERSION
-                        */
-                       datum vers;
-                       char versbuf[_BSD_LINE_MAX];
-                       long versoff;
-                       long reloffset;
-
-                       /* offset relative to start of text image in VM. */
-#ifdef hp300
-                       reloffset = s->n_value;
-#endif
-#ifdef tahoe
-                       /*
-                        * on tahoe, first 0x800 is reserved for communication
-                        * with the console processor.
-                        */
-                       reloffset = ((s->n_value & ~KERNBASE) - 0x800);
-#endif
-#ifdef vax
-                       reloffset = (s->n_value & ~KERNBASE);
-#endif
-                       /*
-                        * When loaded, data is rounded
-                        * to next page cluster after text, but not in file.
-                        */
-                       reloffset -= CLBYTES - (ebuf.a_text % CLBYTES);
-                       versoff = N_TXTOFF(ebuf) + reloffset;
-                       if (fseek(fstr, versoff, SEEK_SET) == -1)
-                               syserrexit("seek (version): %x", s->n_value);
-                       /*
-                        * Just read version string up to, and
-                        * including newline.
-                        */
-                       if (fgets(versbuf, _BSD_LINE_MAX, fstr) == NULL)
-                               syserrexit("can't read version");
-                       strcpy(sbuf+1, "VERSION");
-                       key.dsize = (sizeof ("VERSION") - 1) + 1;
-                       vers.dptr = versbuf;
-                       vers.dsize = strlen(versbuf);
-                       if (dbm_store(db, key, vers, DBM_INSERT) < 0)
-                               syserrexit("dbm_store: can't store VERSION");
-               }
+       (void)sprintf(dbtemp, "%s/kvm_%s.tmp", _PATH_VARRUN, nlistname);
+       (void)sprintf(dbname, "%s/kvm_%s.db", _PATH_VARRUN, nlistname);
+       (void)umask(0);
+       db = hash_open(dbtemp, O_CREAT|O_WRONLY|O_EXCL,
+           S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH, NULL);
+       if (!db) {
+               (void)fprintf(stderr,
+                   "kvm_mkdb: %s: %s\n", dbtemp, strerror(errno));
+               exit(1);

        }
        }

-       (void)fclose(fstr);
-       (void)fclose(fsym);
-       return (0);
-}
-
-create_devnames() {}
-
-#include <varargs.h>
-
-warning(va_alist)
-       va_dcl
-{
-       char *fmt;
-       va_list ap;
-
-       fprintf(stderr, "%s: warning: ", progname);
-       va_start(ap);
-       fmt = va_arg(ap, char *);
-       (void) vfprintf(stderr, fmt, ap);
-       va_end(ap);
-       fprintf(stderr, "\n");
+       create_knlist(nlistpath, db);
+       (void)(db->close)(db);
+       if (rename(dbtemp, dbname)) {
+               (void)fprintf(stderr, "kvm_mkdb: %s to %s: %s.\n",
+                   dbtemp, dbname, strerror(errno));
+               exit(1);
+       }
+       exit(0);

 }
 
 }
 

-
-errexit(va_alist)
-       va_dcl
+error(n)
+       char *n;

 {
 {

-       char *fmt;
-       va_list ap;
+       int sverr;

 
 

-       fprintf(stderr, "%s: ", progname);
-       va_start(ap);
-       fmt = va_arg(ap, char *);
-       (void) vfprintf(stderr, fmt, ap);
-       va_end(ap);
-       fprintf(stderr, "\n");
+       sverr = errno;
+       (void)fprintf(stderr, "kvm_mkdb: ");
+       if (n)
+               (void)fprintf(stderr, "%s: ", n);
+       (void)fprintf(stderr, "%s\n", strerror(sverr));

        exit(1);
 }
 
        exit(1);
 }
 

-
-syserrexit(va_alist)
-       va_dcl
+usage()

 {
 {

-       char *fmt;
-       va_list ap;
-
-       fprintf(stderr, "%s: ", progname);
-       va_start(ap);
-       fmt = va_arg(ap, char *);
-       (void) vfprintf(stderr, fmt, ap);
-       va_end(ap);
-       fprintf(stderr, ": %s\n", strerror(errno));
+       (void)fprintf(stderr, "usage: kvm_mkdb [file]\n");

        exit(1);
 }
        exit(1);
 }