sbin/fsck/preen.c

   1 /*      $NetBSD: preen.c,v 1.18 1998/07/26 20:02:36 mycroft Exp $       */
   2
   3 /*-
   4  * SPDX-License-Identifier: BSD-3-Clause
   5  *
   6  * Copyright (c) 1990, 1993
   7  *      The Regents of the University of California.  All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 3. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  *
  33  * $FreeBSD$
  34  */
  35
  36 #include <sys/cdefs.h>
  37 #ifndef lint
  38 #if 0
  39 static char sccsid[] = "@(#)preen.c     8.5 (Berkeley) 4/28/95";
  40 #else
  41 __RCSID("$NetBSD: preen.c,v 1.18 1998/07/26 20:02:36 mycroft Exp $");
  42 #endif
  43 #endif /* not lint */
  44
  45 #include <sys/param.h>
  46 #include <sys/stat.h>
  47 #include <sys/wait.h>
  48 #include <sys/queue.h>
  49
  50 #include <err.h>
  51 #include <ctype.h>
  52 #include <fstab.h>
  53 #include <string.h>
  54 #include <stdio.h>
  55 #include <stdlib.h>
  56 #include <unistd.h>
  57
  58 #include "fsutil.h"
  59
  60 struct partentry {
  61         TAILQ_ENTRY(partentry)   p_entries;
  62         char                    *p_devname;     /* device name */
  63         char                    *p_mntpt;       /* mount point */
  64         char                    *p_type;        /* file system type */
  65         int                      p_failok;      /* failok option set */
  66 };
  67
  68 static TAILQ_HEAD(part, partentry) badh;
  69
  70 struct diskentry {
  71         TAILQ_ENTRY(diskentry)      d_entries;
  72         char                       *d_name;     /* disk base name */
  73         TAILQ_HEAD(prt, partentry)  d_part;     /* list of partitions on disk */
  74         int                         d_pid;      /* 0 or pid of fsck proc */
  75 };
  76
  77 static TAILQ_HEAD(disk, diskentry) diskh;
  78
  79 static int nrun = 0, ndisks = 0;
  80
  81 static struct diskentry *finddisk(const char *);
  82 static void addpart(const char *, const char *, const char *, const int);
  83 static int startdisk(struct diskentry *,
  84     int (*)(const char *, const char *, const char *, const char *, pid_t *));
  85 static void printpart(void);
  86
  87 int
  88 checkfstab(int flags, int (*docheck)(struct fstab *),
  89     int (*checkit)(const char *, const char *, const char *, const char *, pid_t *))
  90 {
  91         struct fstab *fs;
  92         struct diskentry *d, *nextdisk;
  93         struct partentry *p;
  94         int ret, pid, retcode, passno, sumstatus, status, nextpass;
  95         const char *name;
  96
  97         TAILQ_INIT(&badh);
  98         TAILQ_INIT(&diskh);
  99
 100         sumstatus = 0;
 101
 102         nextpass = 0;
 103         for (passno = 1; nextpass != INT_MAX; passno = nextpass) {
 104                 if (flags & CHECK_DEBUG)
 105                         printf("pass %d\n", passno);
 106
 107                 nextpass = INT_MAX;
 108                 if (setfsent() == 0) {
 109                         warnx("Can't open checklist file: %s\n", _PATH_FSTAB);
 110                         return (8);
 111                 }
 112                 while ((fs = getfsent()) != NULL) {
 113                         name = fs->fs_spec;
 114                         if (fs->fs_passno > passno && fs->fs_passno < nextpass)
 115                                 nextpass = fs->fs_passno;
 116
 117                         if (passno != fs->fs_passno)
 118                                 continue;
 119
 120                         if ((*docheck)(fs) == 0)
 121                                 continue;
 122
 123                         if (flags & CHECK_DEBUG)
 124                                 printf("pass %d, name %s\n", passno, name);
 125
 126                         if ((flags & CHECK_PREEN) == 0 || passno == 1 ||
 127                             (flags & DO_BACKGRD) != 0) {
 128                                 if (name == NULL) {
 129                                         if (flags & CHECK_PREEN)
 130                                                 return 8;
 131                                         else
 132                                                 continue;
 133                                 }
 134                                 sumstatus = (*checkit)(fs->fs_vfstype,
 135                                     name, fs->fs_file, NULL, NULL);
 136                                 if (sumstatus)
 137                                         return (sumstatus);
 138                                 continue;
 139                         }
 140                         if (name == NULL) {
 141                                 (void) fprintf(stderr,
 142                                     "BAD DISK NAME %s\n", fs->fs_spec);
 143                                 sumstatus |= 8;
 144                                 continue;
 145                         }
 146                         addpart(fs->fs_vfstype, name, fs->fs_file,
 147                             getfsopt(fs, "failok"));
 148                 }
 149
 150                 if ((flags & CHECK_PREEN) == 0 || passno == 1 ||
 151                     (flags & DO_BACKGRD) != 0)
 152                         continue;
 153
 154                 if (flags & CHECK_DEBUG) {
 155                         printf("Parallel start\n");
 156                         printpart();
 157                 }
 158
 159                 TAILQ_FOREACH(nextdisk, &diskh, d_entries) {
 160                         if ((ret = startdisk(nextdisk, checkit)) != 0)
 161                                 return ret;
 162                 }
 163
 164                 if (flags & CHECK_DEBUG)
 165                         printf("Parallel wait\n");
 166                 while ((pid = wait(&status)) != -1) {
 167                         TAILQ_FOREACH(d, &diskh, d_entries)
 168                                 if (d->d_pid == pid)
 169                                         break;
 170
 171                         if (d == NULL) {
 172                                 warnx("Unknown pid %d\n", pid);
 173                                 continue;
 174                         }
 175
 176                         p = TAILQ_FIRST(&d->d_part);
 177
 178                         if (WIFEXITED(status) == 0) {
 179                                 retcode = 0;
 180                         } else if (p->p_failok == 0) {
 181                                 retcode = WEXITSTATUS(status);
 182                         } else {
 183                                 retcode = 0;
 184                                 fprintf(stderr, "%s: failok SPECIFIED, FSCK "
 185                                     "ERROR(S) IGNORED\n", p->p_devname);
 186                         }
 187
 188                         if (flags & (CHECK_DEBUG|CHECK_VERBOSE))
 189                                 (void) printf("done %s: %s (%s) = 0x%x\n",
 190                                     p->p_type, p->p_devname, p->p_mntpt,
 191                                     status);
 192
 193                         if (WIFSIGNALED(status)) {
 194                                 (void) fprintf(stderr,
 195                                     "%s: %s (%s): EXITED WITH SIGNAL %d\n",
 196                                     p->p_type, p->p_devname, p->p_mntpt,
 197                                     WTERMSIG(status));
 198                                 retcode = 8;
 199                         }
 200
 201                         TAILQ_REMOVE(&d->d_part, p, p_entries);
 202
 203                         if (retcode != 0) {
 204                                 TAILQ_INSERT_TAIL(&badh, p, p_entries);
 205                                 sumstatus |= retcode;
 206                         } else {
 207                                 free(p->p_type);
 208                                 free(p->p_devname);
 209                                 free(p);
 210                         }
 211                         d->d_pid = 0;
 212                         nrun--;
 213
 214                         if (TAILQ_EMPTY(&d->d_part)) {
 215                                 TAILQ_REMOVE(&diskh, d, d_entries);
 216                                 ndisks--;
 217                         } else {
 218                                 if ((ret = startdisk(d, checkit)) != 0)
 219                                         return ret;
 220                         }
 221                 }
 222                 if (flags & CHECK_DEBUG) {
 223                         printf("Parallel end\n");
 224                         printpart();
 225                 }
 226         }
 227
 228         if (!(flags & CHECK_PREEN))
 229                         return 0;
 230
 231         if (sumstatus) {
 232                 p = TAILQ_FIRST(&badh);
 233                 if (p == NULL)
 234                         return (sumstatus);
 235
 236                 (void) fprintf(stderr,
 237                         "THE FOLLOWING FILE SYSTEM%s HAD AN %s\n\t",
 238                         TAILQ_NEXT(p, p_entries) ? "S" : "",
 239                         "UNEXPECTED INCONSISTENCY:");
 240
 241                 for (; p; p = TAILQ_NEXT(p, p_entries))
 242                         (void) fprintf(stderr,
 243                             "%s: %s (%s)%s", p->p_type, p->p_devname,
 244                             p->p_mntpt, TAILQ_NEXT(p, p_entries) ? ", " : "\n");
 245
 246                 return sumstatus;
 247         }
 248         (void) endfsent();
 249         return (0);
 250 }
 251
 252 static struct diskentry *
 253 finddisk(const char *name)
 254 {
 255         const char *p;
 256         size_t len = 0;
 257         struct diskentry *d;
 258
 259         p = strrchr(name, '/');
 260         if (p == NULL)
 261                 p = name;
 262         else
 263                 p++;
 264         for (; *p && !isdigit(*p); p++)
 265                 continue;
 266         for (; *p && isdigit(*p); p++)
 267                 continue;
 268         len = p - name;
 269         if (len == 0)
 270                 len = strlen(name);
 271
 272         TAILQ_FOREACH(d, &diskh, d_entries)
 273                 if (strncmp(d->d_name, name, len) == 0 && d->d_name[len] == 0)
 274                         return d;
 275
 276         d = emalloc(sizeof(*d));
 277         d->d_name = estrdup(name);
 278         d->d_name[len] = '\0';
 279         TAILQ_INIT(&d->d_part);
 280         d->d_pid = 0;
 281
 282         TAILQ_INSERT_TAIL(&diskh, d, d_entries);
 283         ndisks++;
 284
 285         return d;
 286 }
 287
 288
 289 static void
 290 printpart(void)
 291 {
 292         struct diskentry *d;
 293         struct partentry *p;
 294
 295         TAILQ_FOREACH(d, &diskh, d_entries) {
 296                 (void) printf("disk %s: ", d->d_name);
 297                 TAILQ_FOREACH(p, &d->d_part, p_entries)
 298                         (void) printf("%s ", p->p_devname);
 299                 (void) printf("\n");
 300         }
 301 }
 302
 303
 304 static void
 305 addpart(const char *type, const char *dev, const char *mntpt, const int failok)
 306 {
 307         struct diskentry *d = finddisk(dev);
 308         struct partentry *p;
 309
 310         TAILQ_FOREACH(p, &d->d_part, p_entries)
 311                 if (strcmp(p->p_devname, dev) == 0) {
 312                         warnx("%s in fstab more than once!\n", dev);
 313                         return;
 314                 }
 315
 316         p = emalloc(sizeof(*p));
 317         p->p_devname = estrdup(dev);
 318         p->p_mntpt = estrdup(mntpt);
 319         p->p_type = estrdup(type);
 320         p->p_failok = failok;
 321
 322         TAILQ_INSERT_TAIL(&d->d_part, p, p_entries);
 323 }
 324
 325
 326 static int
 327 startdisk(struct diskentry *d, int (*checkit)(const char *, const char *,
 328     const char *, const char *, pid_t *))
 329 {
 330         struct partentry *p = TAILQ_FIRST(&d->d_part);
 331         int rv;
 332
 333         while ((rv = (*checkit)(p->p_type, p->p_devname, p->p_mntpt,
 334             NULL, &d->d_pid)) != 0 && nrun > 0)
 335                 sleep(10);
 336
 337         if (rv == 0)
 338                 nrun++;
 339
 340         return rv;
 341 }