BSD 4_4 release

[unix-history] / usr / src / sbin / fsck / main.c

diff --git a/usr/src/sbin/fsck/main.c b/usr/src/sbin/fsck/main.c
index f62d766..e44a86d 100644 (file)
--- a/usr/src/sbin/fsck/main.c
+++ b/usr/src/sbin/fsck/main.c
@@ -1,321 +1,186 @@
 /*
 /*

- * Copyright (c) 1980, 1989 Regents of the University of California.
- * All rights reserved.  The Berkeley software License Agreement
- * specifies the terms and conditions for redistribution.
+ * Copyright (c) 1980, 1986, 1993
+ *     The Regents of the University of California.  All rights reserved.
+ *
+ * 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

-char copyright[] =
-"@(#) Copyright (c) 1980, 1989 Regents of the University of California.\n\
- All rights reserved.\n";
-#endif not lint
+static char copyright[] =
+"@(#) Copyright (c) 1980, 1986, 1993\n\
+       The Regents of the University of California.  All rights reserved.\n";
+#endif /* not lint */

 
 #ifndef lint
 
 #ifndef lint

-static char sccsid[] = "@(#)main.c     5.12 (Berkeley) %G%";
-#endif not lint
+static char sccsid[] = "@(#)main.c     8.1 (Berkeley) 6/5/93";
+#endif /* not lint */

 
 #include <sys/param.h>
 #include <sys/time.h>
 
 #include <sys/param.h>
 #include <sys/time.h>

-#include <sys/vnode.h>
-#include <ufs/inode.h>
-#include <ufs/fs.h>
-#include <sys/stat.h>
-#include <sys/wait.h>
+#include <sys/mount.h>
+#include <ufs/ufs/dinode.h>
+#include <ufs/ffs/fs.h>

 #include <fstab.h>
 #include <fstab.h>

-#include <strings.h>
+#include <stdlib.h>
+#include <string.h>

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

+#include <stdio.h>

 #include "fsck.h"
 
 #include "fsck.h"
 

-char   *rawname(), *unrawname(), *blockcheck(), *malloc();
-int    catch(), catchquit(), voidquit();
+void   catch(), catchquit(), voidquit();

 int    returntosingle;
 int    returntosingle;

-int    (*signal())();
-
-struct part {
-       char    *name;                  /* device name */
-       char    *fsname;                /* mounted filesystem name */
-       struct  part *next;             /* forward link of partitions on disk */
-} *badlist, **badnext = &badlist;
-
-struct disk {
-       char    *name;                  /* disk base name */
-       struct  disk *next;             /* forward link for list of disks */
-       struct  part *part;             /* head of list of partitions on disk */
-       int     pid;                    /* If != 0, pid of proc working on */
-} *disks;
-
-int    nrun, ndisks, maxrun;

 
 main(argc, argv)
        int     argc;
        char    *argv[];
 {
 
 main(argc, argv)
        int     argc;
        char    *argv[];
 {

-       struct fstab *fsp;
-       int pid, passno, sumstatus;
-       char *name;
-       register struct disk *dk, *nextdisk;
-       register struct part *pt;
+       int ch;
+       int ret, maxrun = 0;
+       extern int docheck(), checkfilesys();
+       extern char *optarg, *blockcheck();
+       extern int optind;

 
        sync();
 
        sync();

-       while (--argc > 0 && **++argv == '-') {
-               switch (*++*argv) {
-
+       while ((ch = getopt(argc, argv, "dpnNyYb:c:l:m:")) != EOF) {
+               switch (ch) {

                case 'p':
                        preen++;
                        break;
 
                case 'b':
                case 'p':
                        preen++;
                        break;
 
                case 'b':

-                       if (argv[0][1] != '\0') {
-                               bflag = atoi(argv[0]+1);
-                       } else {
-                               bflag = atoi(*++argv);
-                               argc--;
-                       }
+                       bflag = argtoi('b', "number", optarg, 10);

                        printf("Alternate super block location: %d\n", bflag);
                        break;
 
                case 'c':
                        printf("Alternate super block location: %d\n", bflag);
                        break;
 
                case 'c':

-                       cvtflag++;
+                       cvtlevel = argtoi('c', "conversion level", optarg, 10);

                        break;
                        break;

-
+               

                case 'd':
                        debug++;
                        break;
 
                case 'l':
                case 'd':
                        debug++;
                        break;
 
                case 'l':

-                       if (!isdigit(argv[1][0]))
-                               errexit("-l flag requires a number\n");
-                       maxrun = atoi(*++argv);
-                       argc--;
+                       maxrun = argtoi('l', "number", optarg, 10);

                        break;
 
                case 'm':
                        break;
 
                case 'm':

-                       if (!isdigit(argv[1][0]))
-                               errexit("-m flag requires a mode\n");
-                       sscanf(*++argv, "%o", &lfmode);
+                       lfmode = argtoi('m', "mode", optarg, 8);

                        if (lfmode &~ 07777)
                                errexit("bad mode to -m: %o\n", lfmode);
                        if (lfmode &~ 07777)
                                errexit("bad mode to -m: %o\n", lfmode);

-                       argc--;

                        printf("** lost+found creation mode %o\n", lfmode);
                        break;
 
                        printf("** lost+found creation mode %o\n", lfmode);
                        break;
 

-               case 'n':       /* default no answer flag */
+               case 'n':

                case 'N':
                        nflag++;
                        yflag = 0;
                        break;
 
                case 'N':
                        nflag++;
                        yflag = 0;
                        break;
 

-               case 'y':       /* default yes answer flag */
+               case 'y':

                case 'Y':
                        yflag++;
                        nflag = 0;
                        break;
 
                default:
                case 'Y':
                        yflag++;
                        nflag = 0;
                        break;
 
                default:

-                       errexit("%c option?\n", **argv);
+                       errexit("%c option?\n", ch);

                }
        }
                }
        }

+       argc -= optind;
+       argv += optind;

        if (signal(SIGINT, SIG_IGN) != SIG_IGN)
                (void)signal(SIGINT, catch);
        if (preen)
                (void)signal(SIGQUIT, catchquit);
        if (argc) {
        if (signal(SIGINT, SIG_IGN) != SIG_IGN)
                (void)signal(SIGINT, catch);
        if (preen)
                (void)signal(SIGQUIT, catchquit);
        if (argc) {

-               while (argc-- > 0) {
-                       hotroot = 0;
-                       checkfilesys(*argv++);
-               }
+               while (argc-- > 0)
+                       (void)checkfilesys(blockcheck(*argv++), 0, 0L, 0);

                exit(0);
        }
                exit(0);
        }

-       sumstatus = 0;
-       for (passno = 1; passno <= 2; passno++) {
-               if (setfsent() == 0)
-                       errexit("Can't open checklist file: %s\n", _PATH_FSTAB);
-               while ((fsp = getfsent()) != 0) {
-                       if (strcmp(fsp->fs_type, FSTAB_RW) &&
-                           strcmp(fsp->fs_type, FSTAB_RO) &&
-                           strcmp(fsp->fs_type, FSTAB_RQ))
-                               continue;
-                       if (preen == 0 ||
-                           passno == 1 && fsp->fs_passno == 1) {
-                               name = blockcheck(fsp->fs_spec);
-                               if (name != NULL)
-                                       checkfilesys(name);
-                               else if (preen)
-                                       exit(8);
-                       } else if (passno == 2 && fsp->fs_passno > 1) {
-                               name = blockcheck(fsp->fs_spec);
-                               if (name == NULL) {
-                                       pwarn("BAD DISK NAME %s\n",
-                                               fsp->fs_spec);
-                                       sumstatus |= 8;
-                                       continue;
-                               }
-                               addpart(name, fsp->fs_file);
-                       }
-               }
-       }
-       if (preen) {
-               union wait status;
-
-               if (maxrun == 0)
-                       maxrun = ndisks;
-               if (maxrun > ndisks)
-                       maxrun = ndisks;
-               nextdisk = disks;
-               for (passno = 0; passno < maxrun; ++passno) {
-                       startdisk(nextdisk);
-                       nextdisk = nextdisk->next;
-               }
-               while ((pid = wait(&status)) != -1) {
-                       if (status.w_termsig)
-                               sumstatus |= 8;
-                       else
-                               sumstatus |= status.w_retcode;
-                       for (dk = disks; dk; dk = dk->next)
-                               if (dk->pid == pid)
-                                       break;
-                       if (dk == 0) {
-                               printf("Unknown pid %d\n", pid);
-                               continue;
-                       }
-                       if (status.w_termsig) {
-                               printf("%s (%s): EXITED WITH SIGNAL %d\n",
-                                       dk->part->name, dk->part->fsname,
-                                       status.w_termsig);
-                               status.w_retcode = 8;
-                       }
-                       if (status.w_retcode != 0) {
-                               *badnext = dk->part;
-                               badnext = &dk->part->next;
-                               dk->part = dk->part->next;
-                               *badnext = NULL;
-                       } else
-                               dk->part = dk->part->next;
-                       dk->pid = 0;
-                       nrun--;
-                       if (dk->part == NULL)
-                               ndisks--;
-
-                       if (nextdisk == NULL) {
-                               if (dk->part)
-                                       startdisk(dk);
-                       } else if (nrun < maxrun && nrun < ndisks) {
-                               for ( ;; ) {
-                                       if ((nextdisk = nextdisk->next) == NULL)
-                                               nextdisk = disks;
-                                       if (nextdisk->part != NULL &&
-                                           nextdisk->pid == 0)
-                                               break;
-                               }
-                               startdisk(nextdisk);
-                       }
-               }
-       }
-       if (sumstatus) {
-               if (badlist == 0)
-                       exit(8);
-               printf("THE FOLLOWING FILE SYSTEM%s HAD AN %s\n\t",
-                       badlist->next ? "S" : "", "UNEXPECTED INCONSISTENCY:");
-               for (pt = badlist; pt; pt = pt->next)
-                       printf("%s (%s)%s", pt->name, pt->fsname,
-                           pt->next ? ", " : "\n");
-               exit(8);
-       }
-       (void)endfsent();
+       ret = checkfstab(preen, maxrun, docheck, checkfilesys);

        if (returntosingle)
                exit(2);
        if (returntosingle)
                exit(2);

-       exit(0);
-}
-
-struct disk *
-finddisk(name)
-       char *name;
-{
-       register struct disk *dk, **dkp;
-       register char *p;
-       int len;
-
-       for (p = name + strlen(name) - 1; p >= name; --p)
-               if (isdigit(*p)) {
-                       len = p - name + 1;
-                       break;
-               }
-       if (p < name)
-               len = strlen(name);
-
-       for (dk = disks, dkp = &disks; dk; dkp = &dk->next, dk = dk->next) {
-               if (strncmp(dk->name, name, len) == 0 &&
-                   dk->name[len] == 0)
-                       return (dk);
-       }
-       if ((*dkp = (struct disk *)malloc(sizeof(struct disk))) == NULL)
-               errexit("out of memory");
-       dk = *dkp;
-       if ((dk->name = malloc(len + 1)) == NULL)
-               errexit("out of memory");
-       strncpy(dk->name, name, len);
-       dk->name[len] = '\0';
-       dk->part = NULL;
-       dk->next = NULL;
-       dk->pid = 0;
-       ndisks++;
-       return (dk);
+       exit(ret);

 }
 
 }
 

-addpart(name, fsname)
-       char *name, *fsname;
+argtoi(flag, req, str, base)
+       int flag;
+       char *req, *str;
+       int base;

 {
 {

-       struct disk *dk = finddisk(name);
-       register struct part *pt, **ppt = &dk->part;
+       char *cp;
+       int ret;

 
 

-       for (pt = dk->part; pt; ppt = &pt->next, pt = pt->next)
-               if (strcmp(pt->name, name) == 0) {
-                       printf("%s in fstab more than once!\n", name);
-                       return;
-               }
-       if ((*ppt = (struct part *)malloc(sizeof(struct part))) == NULL)
-               errexit("out of memory");
-       pt = *ppt;
-       if ((pt->name = malloc(strlen(name) + 1)) == NULL)
-               errexit("out of memory");
-       strcpy(pt->name, name);
-       if ((pt->fsname = malloc(strlen(fsname) + 1)) == NULL)
-               errexit("out of memory");
-       strcpy(pt->fsname, fsname);
-       pt->next = NULL;
+       ret = (int)strtol(str, &cp, base);
+       if (cp == str || *cp)
+               errexit("-%c flag requires a %s\n", flag, req);
+       return (ret);

 }
 
 }
 

-startdisk(dk)
-       register struct disk *dk;
+/*
+ * Determine whether a filesystem should be checked.
+ */
+docheck(fsp)
+       register struct fstab *fsp;

 {
 
 {
 

-       nrun++;
-       dk->pid = fork();
-       if (dk->pid < 0) {
-               perror("fork");
-               exit(8);
-       }
-       if (dk->pid == 0) {
-               (void)signal(SIGQUIT, voidquit);
-               checkfilesys(dk->part->name);
-               exit(0);
-       }
+       if (strcmp(fsp->fs_vfstype, "ufs") ||
+           (strcmp(fsp->fs_type, FSTAB_RW) &&
+            strcmp(fsp->fs_type, FSTAB_RO)) ||
+           fsp->fs_passno == 0)
+               return (0);
+       return (1);

 }
 
 }
 

-checkfilesys(filesys)
-       char *filesys;
+/*
+ * Check the specified filesystem.
+ */
+/* ARGSUSED */
+checkfilesys(filesys, mntpt, auxdata, child)
+       char *filesys, *mntpt;
+       long auxdata;

 {
        daddr_t n_ffree, n_bfree;
        struct dups *dp;
        struct zlncnt *zlnp;
 {
        daddr_t n_ffree, n_bfree;
        struct dups *dp;
        struct zlncnt *zlnp;

+       int cylno;

 
 

-       devname = filesys;
+       if (preen && child)
+               (void)signal(SIGQUIT, voidquit);
+       cdevname = filesys;

        if (debug && preen)
                pwarn("starting\n");
        if (setup(filesys) == 0) {
                if (preen)
                        pfatal("CAN'T CHECK FILE SYSTEM.");
        if (debug && preen)
                pwarn("starting\n");
        if (setup(filesys) == 0) {
                if (preen)
                        pfatal("CAN'T CHECK FILE SYSTEM.");

-               return;
+               return (0);

        }
        /*
         * 1: scan inodes tallying blocks used
        }
        /*
         * 1: scan inodes tallying blocks used


@@ -371,137 +236,83 @@ checkfilesys(filesys)
         */
        n_ffree = sblock.fs_cstotal.cs_nffree;
        n_bfree = sblock.fs_cstotal.cs_nbfree;
         */
        n_ffree = sblock.fs_cstotal.cs_nffree;
        n_bfree = sblock.fs_cstotal.cs_nbfree;

-       pwarn("%d files, %d used, %d free ",
+       pwarn("%ld files, %ld used, %ld free ",

            n_files, n_blks, n_ffree + sblock.fs_frag * n_bfree);
            n_files, n_blks, n_ffree + sblock.fs_frag * n_bfree);

-       printf("(%d frags, %d blocks, %.1f%% fragmentation)\n",
-           n_ffree, n_bfree, (float)(n_ffree * 100) / sblock.fs_dsize);
-       if (debug && (n_files -= imax - ROOTINO - sblock.fs_cstotal.cs_nifree))
-               printf("%d files missing\n", n_files);
+       printf("(%ld frags, %ld blocks, %d.%d%% fragmentation)\n",
+           n_ffree, n_bfree, (n_ffree * 100) / sblock.fs_dsize,
+           ((n_ffree * 1000 + sblock.fs_dsize / 2) / sblock.fs_dsize) % 10);
+       if (debug &&
+           (n_files -= maxino - ROOTINO - sblock.fs_cstotal.cs_nifree))
+               printf("%ld files missing\n", n_files);

        if (debug) {
                n_blks += sblock.fs_ncg *
                        (cgdmin(&sblock, 0) - cgsblock(&sblock, 0));
                n_blks += cgsblock(&sblock, 0) - cgbase(&sblock, 0);
                n_blks += howmany(sblock.fs_cssize, sblock.fs_fsize);
        if (debug) {
                n_blks += sblock.fs_ncg *
                        (cgdmin(&sblock, 0) - cgsblock(&sblock, 0));
                n_blks += cgsblock(&sblock, 0) - cgbase(&sblock, 0);
                n_blks += howmany(sblock.fs_cssize, sblock.fs_fsize);

-               if (n_blks -= fmax - (n_ffree + sblock.fs_frag * n_bfree))
-                       printf("%d blocks missing\n", n_blks);
+               if (n_blks -= maxfsblock - (n_ffree + sblock.fs_frag * n_bfree))
+                       printf("%ld blocks missing\n", n_blks);

                if (duplist != NULL) {
                        printf("The following duplicate blocks remain:");
                        for (dp = duplist; dp; dp = dp->next)
                if (duplist != NULL) {
                        printf("The following duplicate blocks remain:");
                        for (dp = duplist; dp; dp = dp->next)

-                               printf(" %d,", dp->dup);
+                               printf(" %ld,", dp->dup);

                        printf("\n");
                }
                if (zlnhead != NULL) {
                        printf("The following zero link count inodes remain:");
                        for (zlnp = zlnhead; zlnp; zlnp = zlnp->next)
                        printf("\n");
                }
                if (zlnhead != NULL) {
                        printf("The following zero link count inodes remain:");
                        for (zlnp = zlnhead; zlnp; zlnp = zlnp->next)

-                               printf(" %d,", zlnp->zlncnt);
+                               printf(" %lu,", zlnp->zlncnt);

                        printf("\n");
                }
        }
        zlnhead = (struct zlncnt *)0;
        duplist = (struct dups *)0;
                        printf("\n");
                }
        }
        zlnhead = (struct zlncnt *)0;
        duplist = (struct dups *)0;

-       if (dfile.mod) {
+       muldup = (struct dups *)0;
+       inocleanup();
+       if (fsmodified) {

                (void)time(&sblock.fs_time);
                sbdirty();
        }
                (void)time(&sblock.fs_time);
                sbdirty();
        }

+       if (cvtlevel && sblk.b_dirty) {
+               /* 
+                * Write out the duplicate super blocks
+                */
+               for (cylno = 0; cylno < sblock.fs_ncg; cylno++)
+                       bwrite(fswritefd, (char *)&sblock,
+                           fsbtodb(&sblock, cgsblock(&sblock, cylno)), SBSIZE);
+       }

        ckfini();
        free(blockmap);
        free(statemap);
        free((char *)lncntp);
        ckfini();
        free(blockmap);
        free(statemap);
        free((char *)lncntp);

-       if (!dfile.mod)
-               return;
-       if (!preen) {
+       if (!fsmodified)
+               return (0);
+       if (!preen)

                printf("\n***** FILE SYSTEM WAS MODIFIED *****\n");
                printf("\n***** FILE SYSTEM WAS MODIFIED *****\n");

-               if (hotroot)
-                       printf("\n***** REBOOT UNIX *****\n");
-       }

        if (hotroot) {
        if (hotroot) {

-               sync();
-               exit(4);
-       }
-}
-
-char *
-blockcheck(name)
-       char *name;
-{
-       struct stat stslash, stblock, stchar;
-       char *raw;
-       int looped = 0;
-
-       hotroot = 0;
-       if (stat("/", &stslash) < 0){
-               perror("/");
-               printf("Can't stat root\n");
-               return (0);
-       }
-retry:
-       if (stat(name, &stblock) < 0){
-               perror(name);
-               printf("Can't stat %s\n", name);
-               return (0);
-       }
-       if ((stblock.st_mode & S_IFMT) == S_IFBLK) {
-               if (stslash.st_dev == stblock.st_rdev) {
-                       hotroot++;
-                       return (name);
-               }
-               raw = rawname(name);
-               if (stat(raw, &stchar) < 0){
-                       perror(raw);
-                       printf("Can't stat %s\n", raw);
-                       return (name);
-               }
-               if ((stchar.st_mode & S_IFMT) == S_IFCHR)
-                       return (raw);
-               else {
-                       printf("%s is not a character device\n", raw);
-                       return (name);
-               }
-       } else if ((stblock.st_mode & S_IFMT) == S_IFCHR) {
-               if (looped) {
-                       printf("Can't make sense out of name %s\n", name);
-                       return (0);
+               struct statfs stfs_buf;
+               /*
+                * We modified the root.  Do a mount update on
+                * it, unless it is read-write, so we can continue.
+                */
+               if (statfs("/", &stfs_buf) == 0) {
+                       long flags = stfs_buf.f_flags;
+                       struct ufs_args args;
+                       int ret;
+
+                       if (flags & MNT_RDONLY) {
+                               args.fspec = 0;
+                               args.exflags = 0;
+                               args.exroot = 0;
+                               flags |= MNT_UPDATE | MNT_RELOAD;
+                               ret = mount(MOUNT_UFS, "/", flags, &args);
+                               if (ret == 0)
+                                       return(0);
+                       }

                }
                }

-               name = unrawname(name);
-               looped++;
-               goto retry;
+               if (!preen)
+                       printf("\n***** REBOOT NOW *****\n");
+               sync();
+               return (4);

        }
        }

-       printf("Can't make sense out of name %s\n", name);

        return (0);
 }
        return (0);
 }

-
-char *
-unrawname(cp)
-       char *cp;
-{
-       char *dp = rindex(cp, '/');
-       struct stat stb;
-
-       if (dp == 0)
-               return (cp);
-       if (stat(cp, &stb) < 0)
-               return (cp);
-       if ((stb.st_mode&S_IFMT) != S_IFCHR)
-               return (cp);
-       if (*(dp+1) != 'r')
-               return (cp);
-       (void)strcpy(dp+1, dp+2);
-       return (cp);
-}
-
-char *
-rawname(cp)
-       char *cp;
-{
-       static char rawbuf[32];
-       char *dp = rindex(cp, '/');
-
-       if (dp == 0)
-               return (0);
-       *dp = 0;
-       (void)strcpy(rawbuf, cp);
-       *dp = '/';
-       (void)strcat(rawbuf, "/r");
-       (void)strcat(rawbuf, dp+1);
-       return (rawbuf);
-}