sbin/fsck/preen.c

   1 /*
   2  * Copyright (c) 1990, 1993
   3  *      The Regents of the University of California.  All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. Neither the name of the University nor the names of its contributors
  14  *    may be used to endorse or promote products derived from this software
  15  *    without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  27  * SUCH DAMAGE.
  28  *
  29  * @(#)preen.c  8.5 (Berkeley) 4/28/95
  30  * $FreeBSD: src/sbin/fsck/preen.c,v 1.16 1999/12/30 16:32:40 peter Exp $
  31  */
  32
  33 #include <sys/param.h>
  34 #include <sys/stat.h>
  35 #include <sys/wait.h>
  36
  37 #include <vfs/ufs/dinode.h>
  38
  39 #include <ctype.h>
  40 #include <errno.h>
  41 #include <fstab.h>
  42 #include <string.h>
  43
  44 #include "fsck.h"
  45
  46 char    preen;                  /* just fix normal inconsistencies */
  47
  48 struct part {
  49         struct  part *next;             /* forward link of partitions on disk */
  50         char    *name;                  /* device name */
  51         char    *fsname;                /* mounted filesystem name */
  52         long    auxdata;                /* auxillary data for application */
  53 } *badlist, **badnext = &badlist;
  54
  55 struct disk {
  56         char    *name;                  /* disk base name */
  57         struct  disk *next;             /* forward link for list of disks */
  58         struct  part *part;             /* head of list of partitions on disk */
  59         int     pid;                    /* If != 0, pid of proc working on */
  60 } *disks;
  61
  62 int     nrun, ndisks;
  63
  64 static void addpart(char *name, char *fsname, long auxdata);
  65 static struct disk *finddisk(char *name);
  66 static int startdisk(struct disk *dk,
  67                 int (*checkit)(char *, char *, long, int));
  68
  69 int
  70 checkfstab(int do_preen, int maxrun, int (*docheck)(struct fstab *),
  71            int (*chkit)(char *, char *, long, int))
  72 {
  73         struct fstab *fsp;
  74         struct disk *dk, *nextdisk;
  75         struct part *pt;
  76         int ret, pid, retcode, passno, sumstatus, status;
  77         long auxdata;
  78         char *name;
  79
  80         sumstatus = 0;
  81         for (passno = 1; passno <= 2; passno++) {
  82                 if (setfsent() == 0) {
  83                         fprintf(stderr, "Can't open checklist file: %s\n",
  84                             _PATH_FSTAB);
  85                         return (8);
  86                 }
  87                 while ((fsp = getfsent()) != NULL) {
  88                         if ((auxdata = (*docheck)(fsp)) == 0)
  89                                 continue;
  90                         if (do_preen == 0 ||
  91                             (passno == 1 && fsp->fs_passno == 1)) {
  92                                 if ((name = blockcheck(fsp->fs_spec)) != NULL) {
  93                                         if ((sumstatus = (*chkit)(name,
  94                                             fsp->fs_file, auxdata, 0)) != 0)
  95                                                 return (sumstatus);
  96                                 } else if (do_preen)
  97                                         return (8);
  98                         } else if (passno == 2 && fsp->fs_passno > 1) {
  99                                 if ((name = blockcheck(fsp->fs_spec)) == NULL) {
 100                                         fprintf(stderr, "BAD DISK NAME %s\n",
 101                                                 fsp->fs_spec);
 102                                         sumstatus |= 8;
 103                                         continue;
 104                                 }
 105                                 addpart(name, fsp->fs_file, auxdata);
 106                         }
 107                 }
 108                 if (do_preen == 0)
 109                         return (0);
 110         }
 111         if (do_preen) {
 112                 if (maxrun == 0)
 113                         maxrun = ndisks;
 114                 if (maxrun > ndisks)
 115                         maxrun = ndisks;
 116                 nextdisk = disks;
 117                 for (passno = 0; passno < maxrun; ++passno) {
 118                         while ((ret = startdisk(nextdisk, chkit)) && nrun > 0)
 119                                 sleep(10);
 120                         if (ret)
 121                                 return (ret);
 122                         nextdisk = nextdisk->next;
 123                 }
 124                 while ((pid = wait(&status)) != -1) {
 125                         for (dk = disks; dk; dk = dk->next)
 126                                 if (dk->pid == pid)
 127                                         break;
 128                         if (dk == NULL) {
 129                                 printf("Unknown pid %d\n", pid);
 130                                 continue;
 131                         }
 132                         if (WIFEXITED(status))
 133                                 retcode = WEXITSTATUS(status);
 134                         else
 135                                 retcode = 0;
 136                         if (WIFSIGNALED(status)) {
 137                                 printf("%s (%s): EXITED WITH SIGNAL %d\n",
 138                                         dk->part->name, dk->part->fsname,
 139                                         WTERMSIG(status));
 140                                 retcode = 8;
 141                         }
 142                         if (retcode != 0) {
 143                                 sumstatus |= retcode;
 144                                 *badnext = dk->part;
 145                                 badnext = &dk->part->next;
 146                                 dk->part = dk->part->next;
 147                                 *badnext = NULL;
 148                         } else
 149                                 dk->part = dk->part->next;
 150                         dk->pid = 0;
 151                         nrun--;
 152                         if (dk->part == NULL)
 153                                 ndisks--;
 154
 155                         if (nextdisk == NULL) {
 156                                 if (dk->part) {
 157                                         while ((ret = startdisk(dk, chkit)) &&
 158                                             nrun > 0)
 159                                                 sleep(10);
 160                                         if (ret)
 161                                                 return (ret);
 162                                 }
 163                         } else if (nrun < maxrun && nrun < ndisks) {
 164                                 for ( ;; ) {
 165                                         if ((nextdisk = nextdisk->next) == NULL)
 166                                                 nextdisk = disks;
 167                                         if (nextdisk->part != NULL &&
 168                                             nextdisk->pid == 0)
 169                                                 break;
 170                                 }
 171                                 while ((ret = startdisk(nextdisk, chkit)) &&
 172                                     nrun > 0)
 173                                         sleep(10);
 174                                 if (ret)
 175                                         return (ret);
 176                         }
 177                 }
 178         }
 179         if (sumstatus) {
 180                 if (badlist == NULL)
 181                         return (sumstatus);
 182                 fprintf(stderr, "THE FOLLOWING FILE SYSTEM%s HAD AN %s\n\t",
 183                         badlist->next ? "S" : "", "UNEXPECTED INCONSISTENCY:");
 184                 for (pt = badlist; pt; pt = pt->next)
 185                         fprintf(stderr, "%s (%s)%s", pt->name, pt->fsname,
 186                             pt->next ? ", " : "\n");
 187                 return (sumstatus);
 188         }
 189         endfsent();
 190         return (0);
 191 }
 192
 193 static struct disk *
 194 finddisk(char *name)
 195 {
 196         struct disk *dk, **dkp;
 197         char *p;
 198         size_t len;
 199
 200         p = strrchr(name, '/');
 201         p = p == NULL ? name : p + 1;
 202         while (*p != '\0' && !isdigit((u_char)*p))
 203                 p++;
 204         while (isdigit((u_char)*p))
 205                 p++;
 206         len = (size_t)(p - name);
 207         for (dk = disks, dkp = &disks; dk; dkp = &dk->next, dk = dk->next) {
 208                 if (strncmp(dk->name, name, len) == 0 &&
 209                     dk->name[len] == 0)
 210                         return (dk);
 211         }
 212         if ((*dkp = (struct disk *)malloc(sizeof(struct disk))) == NULL) {
 213                 fprintf(stderr, "out of memory");
 214                 exit (8);
 215         }
 216         dk = *dkp;
 217         if ((dk->name = malloc(len + 1)) == NULL) {
 218                 fprintf(stderr, "out of memory");
 219                 exit (8);
 220         }
 221         strncpy(dk->name, name, len);
 222         dk->name[len] = '\0';
 223         dk->part = NULL;
 224         dk->next = NULL;
 225         dk->pid = 0;
 226         ndisks++;
 227         return (dk);
 228 }
 229
 230 static void
 231 addpart(char *name, char *fsname, long auxdata)
 232 {
 233         struct disk *dk = finddisk(name);
 234         struct part *pt, **ppt = &dk->part;
 235
 236         for (pt = dk->part; pt; ppt = &pt->next, pt = pt->next)
 237                 if (strcmp(pt->name, name) == 0) {
 238                         printf("%s in fstab more than once!\n", name);
 239                         return;
 240                 }
 241         if ((*ppt = (struct part *)malloc(sizeof(struct part))) == NULL) {
 242                 fprintf(stderr, "out of memory");
 243                 exit (8);
 244         }
 245         pt = *ppt;
 246         if ((pt->name = malloc(strlen(name) + 1)) == NULL) {
 247                 fprintf(stderr, "out of memory");
 248                 exit (8);
 249         }
 250         strcpy(pt->name, name);
 251         if ((pt->fsname = malloc(strlen(fsname) + 1)) == NULL) {
 252                 fprintf(stderr, "out of memory");
 253                 exit (8);
 254         }
 255         strcpy(pt->fsname, fsname);
 256         pt->next = NULL;
 257         pt->auxdata = auxdata;
 258 }
 259
 260 static int
 261 startdisk(struct disk *dk, int (*checkit)(char *, char *, long ,int))
 262 {
 263         struct part *pt = dk->part;
 264
 265         dk->pid = fork();
 266         if (dk->pid < 0) {
 267                 perror("fork");
 268                 return (8);
 269         }
 270         if (dk->pid == 0)
 271                 exit((*checkit)(pt->name, pt->fsname, pt->auxdata, 1));
 272         nrun++;
 273         return (0);
 274 }
 275
 276 char *
 277 blockcheck(char *origname)
 278 {
 279         struct stat stblock;
 280         char *newname;
 281         struct fstab *fsinfo;
 282         int retried = 0, len;
 283
 284         newname = origname;
 285 retry:
 286         if (stat(newname, &stblock) < 0) {
 287                 newname = getdevpath(newname, 0);
 288                 if (stat(newname, &stblock) < 0) {
 289                         printf("Can't stat %s: %s\n", newname, strerror(errno));
 290                         return (origname);
 291                 }
 292         }
 293         switch(stblock.st_mode & S_IFMT) {
 294         case S_IFCHR:
 295         case S_IFBLK:
 296                 return(newname);
 297         case S_IFREG:
 298                 return(newname);
 299         case S_IFDIR:
 300                 if (retried)
 301                         break;
 302
 303                 len = strlen(origname) - 1;
 304                 if (len > 0 && origname[len] == '/')
 305                         /* remove trailing slash */
 306                         origname[len] = '\0';
 307                 if ((fsinfo = getfsfile(origname)) == NULL) {
 308                         printf("Can't resolve %s to character special device",
 309                             origname);
 310                         return (0);
 311                 }
 312                 newname = fsinfo->fs_spec;
 313                 retried++;
 314                 goto retry;
 315         }
 316         /*
 317          * Not a block or character device, just return name and
 318          * let the user decide whether to use it.
 319          */
 320         return (origname);
 321 }