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. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. 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 34 #ifndef lint 35 #if 0 36 static const char sccsid[] = "@(#)preen.c 8.5 (Berkeley) 4/28/95"; 37 #endif 38 static const char rcsid[] = 39 "$Id$"; 40 #endif /* not lint */ 41 42 #include <sys/param.h> 43 #include <sys/stat.h> 44 #include <sys/wait.h> 45 46 #include <ufs/ufs/dinode.h> 47 48 #include <ctype.h> 49 #include <err.h> 50 #include <fstab.h> 51 #include <string.h> 52 53 #include "fsck.h" 54 55 struct part { 56 struct part *next; /* forward link of partitions on disk */ 57 char *name; /* device name */ 58 char *fsname; /* mounted filesystem name */ 59 long auxdata; /* auxillary data for application */ 60 } *badlist, **badnext = &badlist; 61 62 struct disk { 63 char *name; /* disk base name */ 64 struct disk *next; /* forward link for list of disks */ 65 struct part *part; /* head of list of partitions on disk */ 66 int pid; /* If != 0, pid of proc working on */ 67 } *disks; 68 69 int nrun, ndisks; 70 char hotroot; 71 72 static void addpart __P((char *name, char *fsname, long auxdata)); 73 static struct disk *finddisk __P((char *name)); 74 static char *rawname __P((char *name)); 75 static int startdisk __P((struct disk *dk, 76 int (*checkit)(char *, char *, long, int))); 77 static char *unrawname __P((char *name)); 78 79 int 80 checkfstab(preen, maxrun, docheck, chkit) 81 int preen; 82 int maxrun; 83 int (*docheck)(struct fstab *); 84 int (*chkit)(char *, char *, long, int); 85 { 86 register struct fstab *fsp; 87 register struct disk *dk, *nextdisk; 88 register struct part *pt; 89 int ret, pid, retcode, passno, sumstatus, status; 90 long auxdata; 91 char *name; 92 93 sumstatus = 0; 94 for (passno = 1; passno <= 2; passno++) { 95 if (setfsent() == 0) { 96 warnx("can't open checklist file: %s", _PATH_FSTAB); 97 return (8); 98 } 99 while ((fsp = getfsent()) != 0) { 100 if ((auxdata = (*docheck)(fsp)) == 0) 101 continue; 102 if (preen == 0 || 103 (passno == 1 && fsp->fs_passno == 1)) { 104 if ((name = blockcheck(fsp->fs_spec)) != 0) { 105 if ((sumstatus = (*chkit)(name, 106 fsp->fs_file, auxdata, 0)) != 0) 107 return (sumstatus); 108 } else if (preen) 109 return (8); 110 } else if (passno == 2 && fsp->fs_passno > 1) { 111 if ((name = blockcheck(fsp->fs_spec)) == NULL) { 112 fprintf(stderr, "BAD DISK NAME %s\n", 113 fsp->fs_spec); 114 sumstatus |= 8; 115 continue; 116 } 117 addpart(name, fsp->fs_file, auxdata); 118 } 119 } 120 if (preen == 0) 121 return (0); 122 } 123 if (preen) { 124 if (maxrun == 0) 125 maxrun = ndisks; 126 if (maxrun > ndisks) 127 maxrun = ndisks; 128 nextdisk = disks; 129 for (passno = 0; passno < maxrun; ++passno) { 130 while ((ret = startdisk(nextdisk, chkit)) && nrun > 0) 131 sleep(10); 132 if (ret) 133 return (ret); 134 nextdisk = nextdisk->next; 135 } 136 while ((pid = wait(&status)) != -1) { 137 for (dk = disks; dk; dk = dk->next) 138 if (dk->pid == pid) 139 break; 140 if (dk == 0) { 141 printf("Unknown pid %d\n", pid); 142 continue; 143 } 144 if (WIFEXITED(status)) 145 retcode = WEXITSTATUS(status); 146 else 147 retcode = 0; 148 if (WIFSIGNALED(status)) { 149 printf("%s (%s): EXITED WITH SIGNAL %d\n", 150 dk->part->name, dk->part->fsname, 151 WTERMSIG(status)); 152 retcode = 8; 153 } 154 if (retcode != 0) { 155 sumstatus |= retcode; 156 *badnext = dk->part; 157 badnext = &dk->part->next; 158 dk->part = dk->part->next; 159 *badnext = NULL; 160 } else 161 dk->part = dk->part->next; 162 dk->pid = 0; 163 nrun--; 164 if (dk->part == NULL) 165 ndisks--; 166 167 if (nextdisk == NULL) { 168 if (dk->part) { 169 while ((ret = startdisk(dk, chkit)) && 170 nrun > 0) 171 sleep(10); 172 if (ret) 173 return (ret); 174 } 175 } else if (nrun < maxrun && nrun < ndisks) { 176 for ( ;; ) { 177 if ((nextdisk = nextdisk->next) == NULL) 178 nextdisk = disks; 179 if (nextdisk->part != NULL && 180 nextdisk->pid == 0) 181 break; 182 } 183 while ((ret = startdisk(nextdisk, chkit)) && 184 nrun > 0) 185 sleep(10); 186 if (ret) 187 return (ret); 188 } 189 } 190 } 191 if (sumstatus) { 192 if (badlist == 0) 193 return (sumstatus); 194 fprintf(stderr, "THE FOLLOWING FILE SYSTEM%s HAD AN %s\n\t", 195 badlist->next ? "S" : "", "UNEXPECTED INCONSISTENCY:"); 196 for (pt = badlist; pt; pt = pt->next) 197 fprintf(stderr, "%s (%s)%s", pt->name, pt->fsname, 198 pt->next ? ", " : "\n"); 199 return (sumstatus); 200 } 201 (void)endfsent(); 202 return (0); 203 } 204 205 static struct disk * 206 finddisk(name) 207 char *name; 208 { 209 register struct disk *dk, **dkp; 210 register char *p; 211 size_t len; 212 213 p = strrchr(name, '/'); 214 p = p == NULL ? name : p + 1; 215 while (*p != '\0' && !isdigit((u_char)*p)) 216 p++; 217 while (isdigit((u_char)*p)) 218 p++; 219 len = (size_t)(p - name); 220 for (dk = disks, dkp = &disks; dk; dkp = &dk->next, dk = dk->next) { 221 if (strncmp(dk->name, name, len) == 0 && 222 dk->name[len] == 0) 223 return (dk); 224 } 225 if ((*dkp = (struct disk *)malloc(sizeof(struct disk))) == NULL) 226 errx(8, "out of memory"); 227 dk = *dkp; 228 if ((dk->name = malloc(len + 1)) == NULL) 229 errx(8, "out of memory"); 230 (void)strncpy(dk->name, name, len); 231 dk->name[len] = '\0'; 232 dk->part = NULL; 233 dk->next = NULL; 234 dk->pid = 0; 235 ndisks++; 236 return (dk); 237 } 238 239 static void 240 addpart(name, fsname, auxdata) 241 char *name, *fsname; 242 long auxdata; 243 { 244 struct disk *dk = finddisk(name); 245 register struct part *pt, **ppt = &dk->part; 246 247 for (pt = dk->part; pt; ppt = &pt->next, pt = pt->next) 248 if (strcmp(pt->name, name) == 0) { 249 printf("%s in fstab more than once!\n", name); 250 return; 251 } 252 if ((*ppt = (struct part *)malloc(sizeof(struct part))) == NULL) 253 errx(8, "out of memory"); 254 pt = *ppt; 255 if ((pt->name = malloc(strlen(name) + 1)) == NULL) 256 errx(8, "out of memory"); 257 (void)strcpy(pt->name, name); 258 if ((pt->fsname = malloc(strlen(fsname) + 1)) == NULL) 259 errx(8, "out of memory"); 260 (void)strcpy(pt->fsname, fsname); 261 pt->next = NULL; 262 pt->auxdata = auxdata; 263 } 264 265 static int 266 startdisk(dk, checkit) 267 register struct disk *dk; 268 int (*checkit)(char *, char *, long, int); 269 { 270 register struct part *pt = dk->part; 271 272 dk->pid = fork(); 273 if (dk->pid < 0) { 274 warn("fork"); 275 return (8); 276 } 277 if (dk->pid == 0) 278 exit((*checkit)(pt->name, pt->fsname, pt->auxdata, 1)); 279 nrun++; 280 return (0); 281 } 282 283 char * 284 blockcheck(origname) 285 char *origname; 286 { 287 struct stat stslash, stblock, stchar; 288 char *newname, *raw; 289 struct fstab *fsinfo; 290 int retried = 0, l; 291 292 hotroot = 0; 293 if (stat("/", &stslash) < 0) { 294 warn("/"); 295 printf("Can't stat root\n"); 296 return (origname); 297 } 298 newname = origname; 299 retry: 300 if (stat(newname, &stblock) < 0) { 301 warn("%s", newname); 302 printf("Can't stat %s\n", newname); 303 return (origname); 304 } 305 if ((stblock.st_mode & S_IFMT) == S_IFBLK) { 306 if (stslash.st_dev == stblock.st_rdev) 307 hotroot++; 308 raw = rawname(newname); 309 if (stat(raw, &stchar) < 0) { 310 warn("%s", raw); 311 printf("Can't stat %s\n", raw); 312 return (origname); 313 } 314 if ((stchar.st_mode & S_IFMT) == S_IFCHR) { 315 return (raw); 316 } else { 317 printf("%s is not a character device\n", raw); 318 return (origname); 319 } 320 } else if ((stblock.st_mode & S_IFMT) == S_IFCHR && !retried) { 321 newname = unrawname(origname); 322 retried++; 323 goto retry; 324 } else if ((stblock.st_mode & S_IFMT) == S_IFDIR && !retried) { 325 l = strlen(origname) - 1; 326 if (l > 0 && origname[l] == '/') 327 /* remove trailing slash */ 328 origname[l] = '\0'; 329 if(!(fsinfo=getfsfile(origname))) { 330 printf("Can't resolve %s to character special device", 331 origname); 332 return (0); 333 } 334 newname = fsinfo->fs_spec; 335 retried++; 336 goto retry; 337 } 338 /* 339 * Not a block or character device, just return name and 340 * let the user decide whether to use it. 341 */ 342 return (origname); 343 } 344 345 static char * 346 unrawname(name) 347 char *name; 348 { 349 char *dp; 350 struct stat stb; 351 352 if ((dp = strrchr(name, '/')) == 0) 353 return (name); 354 if (stat(name, &stb) < 0) 355 return (name); 356 if ((stb.st_mode & S_IFMT) != S_IFCHR) 357 return (name); 358 if (dp[1] != 'r') 359 return (name); 360 (void)strcpy(&dp[1], &dp[2]); 361 return (name); 362 } 363 364 static char * 365 rawname(name) 366 char *name; 367 { 368 static char rawbuf[32]; 369 char *dp; 370 371 if ((dp = strrchr(name, '/')) == 0) 372 return (0); 373 *dp = 0; 374 (void)strcpy(rawbuf, name); 375 *dp = '/'; 376 (void)strcat(rawbuf, "/r"); 377 (void)strcat(rawbuf, &dp[1]); 378 return (rawbuf); 379 } 380