BSD 4_4 release
[unix-history] / usr / src / sbin / fsck / main.c
index 10e48fc..e44a86d 100644 (file)
+/*
+ * 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
+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 version[] = "@(#)main.c    3.2 (Berkeley) %G%";
-#endif
+static char sccsid[] = "@(#)main.c     8.1 (Berkeley) 6/5/93";
+#endif /* not lint */
 
 #include <sys/param.h>
 
 #include <sys/param.h>
-#include <sys/inode.h>
-#include <sys/fs.h>
-#include <sys/stat.h>
-#include <sys/wait.h>
+#include <sys/time.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 <stdio.h>
 #include "fsck.h"
 
 #include "fsck.h"
 
-char   *rawname(), *unrawname(), *blockcheck();
-int    catch();
-int    (*signal())();
+void   catch(), catchquit(), voidquit();
+int    returntosingle;
 
 main(argc, argv)
        int     argc;
        char    *argv[];
 {
 
 main(argc, argv)
        int     argc;
        char    *argv[];
 {
-       struct fstab *fsp;
-       int pid, passno, anygtr, sumstatus;
-       char *name;
+       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;
 
                        printf("Alternate super block location: %d\n", bflag);
                        break;
 
+               case 'c':
+                       cvtlevel = argtoi('c', "conversion level", optarg, 10);
+                       break;
+               
                case 'd':
                        debug++;
                        break;
 
                case 'd':
                        debug++;
                        break;
 
-               case 'n':       /* default no answer flag */
+               case 'l':
+                       maxrun = argtoi('l', "number", optarg, 10);
+                       break;
+
+               case 'm':
+                       lfmode = argtoi('m', "mode", optarg, 8);
+                       if (lfmode &~ 07777)
+                               errexit("bad mode to -m: %o\n", lfmode);
+                       printf("** lost+found creation mode %o\n", lfmode);
+                       break;
+
+               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 (signal(SIGINT, SIG_IGN) != SIG_IGN)
                (void)signal(SIGINT, catch);
+       if (preen)
+               (void)signal(SIGQUIT, catchquit);
        if (argc) {
        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;
-       passno = 1;
-       do {
-               anygtr = 0;
-               if (setfsent() == 0)
-                       errexit("Can't open checklist file: %s\n", 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 == passno) {
-                               name = blockcheck(fsp->fs_spec);
-                               if (name != NULL)
-                                       checkfilesys(name);
-                               else if (preen)
-                                       exit(8);
-                       } else if (fsp->fs_passno > passno) {
-                               anygtr = 1;
-                       } else if (fsp->fs_passno == passno) {
-                               pid = fork();
-                               if (pid < 0) {
-                                       perror("fork");
-                                       exit(8);
-                               }
-                               if (pid == 0) {
-                                       name = blockcheck(fsp->fs_spec);
-                                       if (name == NULL)
-                                               exit(8);
-                                       checkfilesys(name);
-                                       exit(0);
-                               }
-                       }
-               }
-               if (preen) {
-                       union wait status;
-                       while (wait(&status) != -1)
-                               sumstatus |= status.w_retcode;
-               }
-               passno++;
-       } while (anygtr);
-       if (sumstatus)
-               exit(8);
-       (void)endfsent();
-       exit(0);
+       ret = checkfstab(preen, maxrun, docheck, checkfilesys);
+       if (returntosingle)
+               exit(2);
+       exit(ret);
 }
 
 }
 
-checkfilesys(filesys)
-       char *filesys;
+argtoi(flag, req, str, base)
+       int flag;
+       char *req, *str;
+       int base;
 {
 {
+       char *cp;
+       int ret;
+
+       ret = (int)strtol(str, &cp, base);
+       if (cp == str || *cp)
+               errexit("-%c flag requires a %s\n", flag, req);
+       return (ret);
+}
+
+/*
+ * Determine whether a filesystem should be checked.
+ */
+docheck(fsp)
+       register struct fstab *fsp;
+{
+
+       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);
+}
+
+/*
+ * 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;
+       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 (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
+        */
        if (preen == 0) {
                printf("** Last Mounted on %s\n", sblock.fs_fsmnt);
                if (hotroot)
        if (preen == 0) {
                printf("** Last Mounted on %s\n", sblock.fs_fsmnt);
                if (hotroot)
@@ -137,146 +193,126 @@ checkfilesys(filesys)
        }
        pass1();
 
        }
        pass1();
 
-/* 1b: locate first references to duplicates, if any */
-       if (enddup != &duplist[0]) {
+       /*
+        * 1b: locate first references to duplicates, if any
+        */
+       if (duplist) {
                if (preen)
                        pfatal("INTERNAL ERROR: dups with -p");
                printf("** Phase 1b - Rescan For More DUPS\n");
                pass1b();
        }
 
                if (preen)
                        pfatal("INTERNAL ERROR: dups with -p");
                printf("** Phase 1b - Rescan For More DUPS\n");
                pass1b();
        }
 
-/* 2: traverse directories from root to mark all connected directories */
+       /*
+        * 2: traverse directories from root to mark all connected directories
+        */
        if (preen == 0)
                printf("** Phase 2 - Check Pathnames\n");
        pass2();
 
        if (preen == 0)
                printf("** Phase 2 - Check Pathnames\n");
        pass2();
 
-/* 3: scan inodes looking for disconnected directories */
+       /*
+        * 3: scan inodes looking for disconnected directories
+        */
        if (preen == 0)
                printf("** Phase 3 - Check Connectivity\n");
        pass3();
 
        if (preen == 0)
                printf("** Phase 3 - Check Connectivity\n");
        pass3();
 
-/* 4: scan inodes looking for disconnected files; check reference counts */
+       /*
+        * 4: scan inodes looking for disconnected files; check reference counts
+        */
        if (preen == 0)
                printf("** Phase 4 - Check Reference Counts\n");
        pass4();
 
        if (preen == 0)
                printf("** Phase 4 - Check Reference Counts\n");
        pass4();
 
-/* 5: check resource counts in cylinder groups */
+       /*
+        * 5: check and repair resource counts in cylinder groups
+        */
        if (preen == 0)
                printf("** Phase 5 - Check Cyl groups\n");
        pass5();
 
        if (preen == 0)
                printf("** Phase 5 - Check Cyl groups\n");
        pass5();
 
-       if (fixcg) {
-               if (preen == 0)
-                       printf("** Phase 6 - Salvage Cylinder Groups\n");
-               makecg();
-               n_ffree = sblock.fs_cstotal.cs_nffree;
-               n_bfree = sblock.fs_cstotal.cs_nbfree;
+       /*
+        * print out summary statistics
+        */
+       n_ffree = sblock.fs_cstotal.cs_nffree;
+       n_bfree = sblock.fs_cstotal.cs_nbfree;
+       pwarn("%ld files, %ld used, %ld free ",
+           n_files, n_blks, n_ffree + sblock.fs_frag * n_bfree);
+       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 (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)
+                               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(" %lu,", zlnp->zlncnt);
+                       printf("\n");
+               }
        }
        }
-
-       pwarn("%d files, %d used, %d free (%d frags, %d blocks)\n",
-           n_files, n_blks - howmany(sblock.fs_cssize, sblock.fs_fsize),
-           n_ffree + sblock.fs_frag * n_bfree, n_ffree, n_bfree);
-       if (dfile.mod) {
+       zlnhead = (struct zlncnt *)0;
+       duplist = (struct dups *)0;
+       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);
        ckfini();
        free(blockmap);
-       free(freemap);
        free(statemap);
        free((char *)lncntp);
        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);
-       }
-}
+               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;
 
 
-char *
-blockcheck(name)
-       char *name;
-{
-       struct stat stslash, stblock, stchar;
-       char *raw;
-       int looped = 0;
-
-       hotroot = 0;
-       if (stat("/", &stslash) < 0){
-               printf("Can't stat root\n");
-               return (0);
-       }
-retry:
-       if (stat(name, &stblock) < 0){
-               printf("Can't stat %s\n", name);
-               return (0);
-       }
-       if (stblock.st_mode & S_IFBLK) {
-               raw = rawname(name);
-               if (stat(raw, &stchar) < 0){
-                       printf("Can't stat %s\n", raw);
-                       return (0);
-               }
-               if (stchar.st_mode & S_IFCHR) {
-                       if (stslash.st_dev == stblock.st_rdev) {
-                               hotroot++;
-                               raw = unrawname(name);
+                       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);
                        }
                        }
-                       return (raw);
-               } else {
-                       printf("%s is not a character device\n", raw);
-                       return (0);
                }
                }
-       } else if (stblock.st_mode & S_IFCHR) {
-               if (looped) {
-                       printf("Can't make sense out of name %s\n", name);
-                       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);
-}