src/vfsck/setup.c

   1 /*
   2  * Copyright (c) 1980, 1986 The Regents of the University of California.
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms are permitted
   6  * provided that the above copyright notice and this paragraph are
   7  * duplicated in all such forms and that any documentation,
   8  * advertising materials, and other materials related to such
   9  * distribution and use acknowledge that the software was developed
  10  * by the University of California, Berkeley.  The name of the
  11  * University may not be used to endorse or promote products derived
  12  * from this software without specific prior written permission.
  13  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
  14  * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  15  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  16  */
  17
  18 #include <afsconfig.h>
  19 #include <afs/param.h>
  20
  21 RCSID
  22     ("$Header$");
  23
  24 #include <stdio.h>
  25 #define VICE
  26
  27 #if     defined(AFS_SUN_ENV) || defined(AFS_OSF_ENV)
  28 #define AFS_NEWCG_ENV
  29 #else
  30 #undef AFS_NEWCG_ENV
  31 #endif
  32
  33 #ifdef VICE
  34 #define msgprintf vfscklogprintf
  35 extern vfscklogprintf();
  36 #endif
  37
  38 #define DKTYPENAMES
  39 #include <sys/param.h>
  40 #include <sys/time.h>
  41
  42 #ifdef  AFS_OSF_ENV
  43 #include <sys/vnode.h>
  44 #include <sys/mount.h>
  45 #include <ufs/inode.h>
  46 #include <ufs/fs.h>
  47 #define _BSD
  48 #define _KERNEL
  49 #include <ufs/dir.h>
  50 #undef  _KERNEL
  51 #undef  _BSD
  52 #include <stdio.h>
  53 #else /* AFS_OSF_ENV */
  54 #ifdef AFS_VFSINCL_ENV
  55 #include <sys/vnode.h>
  56 #ifdef    AFS_SUN5_ENV
  57 #include <stdio.h>
  58 #include <unistd.h>
  59 #include <sys/fs/ufs_inode.h>
  60 #include <sys/fs/ufs_fs.h>
  61 #define _KERNEL
  62 #include <sys/fs/ufs_fsdir.h>
  63 #undef _KERNEL
  64 #include <sys/fs/ufs_mount.h>
  65 #else
  66 #include <ufs/inode.h>
  67 #include <ufs/fs.h>
  68 #endif
  69 #else /* AFS_VFSINCL_ENV */
  70 #include <sys/inode.h>
  71 #ifdef  AFS_HPUX_ENV
  72 #include <ctype.h>
  73 #define LONGFILENAMES   1
  74 #include <sys/sysmacros.h>
  75 #include <sys/ino.h>
  76 #endif
  77 #include <sys/fs.h>
  78 #endif /* AFS_VFSINCL_ENV */
  79 #endif /* AFS_OSF_ENV */
  80
  81 #include <sys/stat.h>
  82 #include <sys/ioctl.h>
  83 #include <sys/file.h>
  84 #include <ctype.h>
  85 #ifdef  AFS_SUN5_ENV
  86 #include <sys/mntent.h>
  87 #include <sys/vfstab.h>
  88 #endif
  89
  90 #include <afs/osi_inode.h>
  91 #include "fsck.h"
  92
  93 struct bufarea asblk;
  94 struct bufarea *pbp;
  95
  96 #define altsblock (*asblk.b_un.b_fs)
  97 #define POWEROF2(num)   (((num) & ((num) - 1)) == 0)
  98
  99 /*
 100  * The size of a cylinder group is calculated by CGSIZE. The maximum size
 101  * is limited by the fact that cylinder groups are at most one block.
 102  * Its size is derived from the size of the maps maintained in the
 103  * cylinder group and the (struct cg) size.
 104  */
 105 #define CGSIZE(fs) \
 106     /* base cg */       (sizeof(struct cg) + \
 107     /* blktot size */   (fs)->fs_cpg * sizeof(afs_int32) + \
 108     /* blks size */     (fs)->fs_cpg * (fs)->fs_nrpos * sizeof(short) + \
 109     /* inode map */     howmany((fs)->fs_ipg, NBBY) + \
 110     /* block map */     howmany((fs)->fs_cpg * (fs)->fs_spc / NSPF(fs), NBBY))
 111
 112 char *malloc(), *calloc();
 113 struct disklabel *getdisklabel();
 114
 115 setup(dev)
 116      char *dev;
 117 {
 118     dev_t rootdev;
 119     long cg, size, asked, i, j;
 120     long bmapsize;
 121     struct disklabel *lp;
 122     struct stat statb;
 123     struct fs proto;
 124 #if     defined(AFS_SUN5_ENV)
 125     static char sname[MAXPATHLEN];
 126 #endif
 127
 128     /* reset static variables that may have been damaged by parent fork */
 129     mlk_pbp = 0;
 130     pbp = 0;
 131     mlk_startinum = 0;
 132 #ifdef  AFS_DEC_ENV
 133     iscorrupt = 0;
 134 #endif
 135 #if defined(ACLS) && defined(AFS_HPUX_ENV)
 136     n_cont = 0;
 137 #endif
 138     havesb = 0;
 139     if (stat("/", &statb) < 0)
 140         errexit("Can't stat root\n");
 141     rootdev = statb.st_dev;
 142 #if     defined(AFS_SUN5_ENV)
 143     strncpy(sname, dev, sizeof(sname));
 144   restat:
 145     if (stat(sname, &statb) < 0) {
 146         perror(sname);
 147         msgprintf("Can't stat %s\n", sname);
 148 #else
 149     if (stat(dev, &statb) < 0) {
 150         perror(dev);
 151         printf("Can't stat %s\n", dev);
 152 #endif
 153         return (0);
 154     }
 155 #ifdef  AFS_SUN5_ENV
 156     if ((statb.st_mode & S_IFMT) == S_IFDIR) {
 157         FILE *fp;
 158         struct vfstab vtab;
 159
 160         if ((fp = fopen(VFSTAB, "r")) == NULL) {
 161             pfatal("Can't open %s file\n", VFSTAB);
 162             exit(1);
 163         }
 164         while (!getvfsent(fp, &vtab)) {
 165             if (vtab.vfs_mountp && !strcmp(vtab.vfs_mountp, sname)) {
 166                 strcpy(sname, vtab.vfs_special);
 167                 if (rflag) {
 168                     char *s = vtab.vfs_fsckdev;
 169                     strcpy(sname, s);
 170                 }
 171                 goto restat;
 172             }
 173         }
 174         fclose(fp);
 175     }
 176 #endif
 177     if ((statb.st_mode & S_IFMT) != S_IFBLK
 178         && (statb.st_mode & S_IFMT) != S_IFCHR) {
 179         pfatal("device is not a block or character device");
 180         if (reply("file is not a block or character device; OK") == 0)
 181             return (0);
 182     }
 183 #ifdef  AFS_SUN5_ENV
 184     if (mounted(sname))
 185         if (rflag)
 186             mountedfs++;
 187         else {
 188             printf("%s is mounted, fsck on BLOCK device ignored\n", sname);
 189             exit(33);
 190         }
 191     if (rflag) {
 192         char bname[MAXPATHLEN], *tname;
 193
 194         strcpy(bname, sname);
 195         tname = unrawname(bname);
 196         if (stat(tname, &statb) < 0) {
 197             pfatal("Can't stat %s\n", tname);
 198             return (0);
 199         }
 200         dev = sname;
 201     }
 202 #endif
 203     hotroot = is_hotroot(dev);
 204
 205     /*
 206      * The following code is added to improve usability of fsck.
 207      * we need to give user a warning if the device being checked is
 208      * a hotroot, a mounted file system, or a swap device.
 209      * The rules are:
 210      *      1) if nflag is set, it's pretty safe to fsck the target dev
 211      *      2) if the target device is a swap, exit
 212      *      3) if hotroot is set, and "-F" is not specified prompt the
 213      *              user and wait for reply
 214      *      4) if the target is a mounted file system, and "-F" is not
 215      *              specified, prompt the user and wait for reply
 216      *      5) if the "-m" is specifed, do no prompting since only a sanity
 217      *              check is being done. important during booting
 218      *
 219      * Caveat: There is no way to tell the current run level, so we cannot
 220      * tell whether or not we are in single user mode.
 221      */
 222     if (!nflag) {
 223         int mounted, swap;
 224         struct stat st_mounted;
 225
 226         mounted = swap = 0;
 227         if (!hotroot) {
 228             mounted = is_mounted(dev, &st_mounted);
 229 #ifdef  AFS_HPUX_ENV
 230             swap = is_swap(st_mounted.st_rdev);
 231 #endif
 232         }
 233         if (!fflag
 234 #ifdef  AFS_HPUX_ENV
 235             && !mflag
 236 #endif
 237             ) {
 238             if (hotroot) {
 239                 msgprintf("fsck: %s: root file system", dev);
 240                 if (preen)
 241                     msgprintf(" (CONTINUING)\n");
 242                 else {
 243                     if (!freply("continue (y/n)"))
 244                         return (0);
 245                 }
 246             } else if (mounted) {
 247                 msgprintf("fsck: %s: mounted file system", dev);
 248                 if (preen)
 249                     msgprintf(" (CONTINUING)\n");
 250                 else {
 251                     if (!freply("continue (y/n)"))
 252                         return (0);
 253                 }
 254             } else if (swap) {
 255                 msgprintf("fsck: %s: swap device\n", dev);
 256                 if (preen)
 257                     msgprintf(" (CONTINUING)\n");
 258                 else {
 259                     if (!freply("continue (y/n)"))
 260                         return (0);
 261                 }
 262             }
 263         }
 264     }
 265     if (rootdev == statb.st_rdev)
 266         hotroot++;
 267     if ((fsreadfd = open(dev, O_RDONLY)) < 0) {
 268         perror(dev);
 269         msgprintf("Can't open %s\n", dev);
 270         return (0);
 271     }
 272     if (preen == 0)
 273         msgprintf("** %s", dev);
 274     if (nflag || (fswritefd = open(dev, O_WRONLY)) < 0) {
 275         fswritefd = -1;
 276         msgprintf(" (NO WRITE)");
 277 #ifdef  notdef
 278         if (preen) {
 279             pfatal("NO WRITE ACCESS");
 280         }
 281 #endif
 282     }
 283     if (preen == 0)
 284         msgprintf("\n");
 285 #if     defined(AFS_HPUX101_ENV)
 286     setup_all_block_seek();
 287 #endif
 288 #ifdef  AFS_SUN5_ENV
 289     if (!preen && debug)
 290         printf(" pid %d\n", getpid());
 291     if (debug && (hotroot || mountedfs)) {
 292         printf("** %s", sname);
 293         if (hotroot) {
 294             printf(" is root fs");
 295             if (mountedfs)
 296                 printf(" and");
 297         }
 298         if (mountedfs)
 299             printf(" is mounted");
 300         printf(".\n");
 301     }
 302 #endif
 303     fsmodified = 0;
 304     lfdir = 0;
 305     initbarea(&sblk);
 306     initbarea(&asblk);
 307 #ifdef __alpha
 308     sblk.b_un.b_buf = malloc(SBSIZE + ALPHA_EXT);
 309     asblk.b_un.b_buf = malloc(SBSIZE + ALPHA_EXT);
 310 #else /* __alpha */
 311     sblk.b_un.b_buf = malloc(SBSIZE);
 312     asblk.b_un.b_buf = malloc(SBSIZE);
 313 #endif
 314     if (sblk.b_un.b_buf == NULL || asblk.b_un.b_buf == NULL)
 315         errexit("cannot allocate space for superblock\n");
 316     dev_bsize = secsize = DEV_BSIZE;
 317
 318     /*
 319      * Read in the superblock, looking for alternates if necessary
 320      */
 321     if (readsb(1) == 0) {
 322         if (bflag || preen || calcsb(dev, fsreadfd, &proto) == 0)
 323             return (0);
 324         if (reply("LOOK FOR ALTERNATE SUPERBLOCKS") == 0)
 325             return (0);
 326         for (cg = 0; cg < proto.fs_ncg; cg++) {
 327             bflag = fsbtodb(&proto, cgsblock(&proto, cg));
 328             if (readsb(0) != 0)
 329                 break;
 330         }
 331         if (cg >= proto.fs_ncg) {
 332             msgprintf("%s %s\n%s %s\n%s %s\n",
 333                       "SEARCH FOR ALTERNATE SUPER-BLOCK",
 334                       "FAILED. YOU MUST USE THE",
 335                       "-b OPTION TO FSCK TO SPECIFY THE",
 336                       "LOCATION OF AN ALTERNATE",
 337                       "SUPER-BLOCK TO SUPPLY NEEDED",
 338                       "INFORMATION; SEE fsck(8).");
 339             return (0);
 340         }
 341         pwarn("USING ALTERNATE SUPERBLOCK AT %d\n", bflag);
 342     }
 343     maxfsblock = sblock.fs_size;
 344     maxino = sblock.fs_ncg * sblock.fs_ipg;
 345     /*
 346      * Check and potentially fix certain fields in the super block.
 347      */
 348     if (sblock.fs_optim != FS_OPTTIME && sblock.fs_optim != FS_OPTSPACE) {
 349         pfatal("UNDEFINED OPTIMIZATION IN SUPERBLOCK");
 350         if (reply("SET TO DEFAULT") == 1) {
 351             sblock.fs_optim = FS_OPTTIME;
 352             sbdirty();
 353         }
 354     }
 355     if ((sblock.fs_minfree < 0 || sblock.fs_minfree > 99)) {
 356         pfatal("IMPOSSIBLE MINFREE=%d IN SUPERBLOCK", sblock.fs_minfree);
 357         if (reply("SET TO DEFAULT") == 1) {
 358             sblock.fs_minfree = 10;
 359             sbdirty();
 360         }
 361     }
 362 #ifdef  AFS_DEC_ENV
 363     /*
 364      * If '-p' is used and the partition was cleanly unmounted last time then skip the
 365      * fscking process
 366      */
 367     if (only_when_needed && (sblock.fs_clean == FS_CLEAN)
 368         && clean_byte_valid(sblock.fs_lastfsck)) {
 369         msgprintf("%s: umounted cleanly\n", dev);
 370         return (FS_CLEAN);
 371     }
 372 #endif
 373 #ifdef  AFS_HPUX_ENV
 374     /*
 375      * Do we need to continue ?
 376      */
 377     if (pclean && sblock.fs_clean == FS_CLEAN)
 378         return (-1);
 379     if (pclean && hotroot && sblock.fs_clean == FS_OK)
 380         return (-1);
 381 #endif
 382 #ifdef AFS_NEWCG_ENV
 383 # ifndef AFS_SUN59_ENV
 384     if (sblock.fs_interleave < 1) {
 385         pwarn("IMPOSSIBLE INTERLEAVE=%d IN SUPERBLOCK", sblock.fs_interleave);
 386         sblock.fs_interleave = 1;
 387         if (preen)
 388             msgprintf(" (FIXED)\n");
 389         if (preen || reply("SET TO DEFAULT") == 1) {
 390             sbdirty();
 391             dirty(&asblk);
 392         }
 393     }
 394 # endif /* AFS_SUN59_ENV */
 395 #endif /* AFS_NEWCG_ENV */
 396 #ifdef AFS_NEWCG_ENV
 397     if (sblock.fs_npsect < sblock.fs_nsect) {
 398         pwarn("IMPOSSIBLE NPSECT=%d IN SUPERBLOCK", sblock.fs_npsect);
 399         sblock.fs_npsect = sblock.fs_nsect;
 400         if (preen)
 401             msgprintf(" (FIXED)\n");
 402         if (preen || reply("SET TO DEFAULT") == 1) {
 403             sbdirty();
 404             dirty(&asblk);
 405         }
 406     }
 407 #endif /* AFS_NEWCG_ENV */
 408 #ifdef AFS_NEWCG_ENV
 409     if (cvtflag) {
 410         if (sblock.fs_postblformat == FS_42POSTBLFMT) {
 411             /*
 412              * Requested to convert from old format to new format
 413              */
 414             if (preen)
 415                 pwarn("CONVERTING TO NEW FILE SYSTEM FORMAT\n");
 416             else if (!reply("CONVERT TO NEW FILE SYSTEM FORMAT"))
 417                 return (0);
 418             isconvert = 1;
 419             sblock.fs_postblformat = FS_DYNAMICPOSTBLFMT;
 420             sblock.fs_nrpos = 8;
 421             sblock.fs_postbloff =
 422                 (char *)(&sblock.fs_opostbl[0][0]) -
 423                 (char *)(&sblock.fs_link);
 424             sblock.fs_rotbloff =
 425                 &sblock.fs_space[0] - (u_char *) (&sblock.fs_link);
 426             sblock.fs_cgsize = fragroundup(&sblock, CGSIZE(&sblock));
 427             /*
 428              * Planning now for future expansion.
 429              */
 430 #                       if (BYTE_ORDER == BIG_ENDIAN)
 431             sblock.fs_qbmask.val[0] = 0;
 432             sblock.fs_qbmask.val[1] = ~sblock.fs_bmask;
 433             sblock.fs_qfmask.val[0] = 0;
 434             sblock.fs_qfmask.val[1] = ~sblock.fs_fmask;
 435 #                       endif /* BIG_ENDIAN */
 436 #                       if (BYTE_ORDER == LITTLE_ENDIAN)
 437             sblock.fs_qbmask.val[0] = ~sblock.fs_bmask;
 438             sblock.fs_qbmask.val[1] = 0;
 439             sblock.fs_qfmask.val[0] = ~sblock.fs_fmask;
 440             sblock.fs_qfmask.val[1] = 0;
 441 #                       endif /* LITTLE_ENDIAN */
 442 #if     defined(AFS_SUN_ENV) && !defined(AFS_SUN3_ENV)
 443 #ifdef  AFS_SUN5_ENV
 444             sblock.fs_state = FSOKAY - sblock.fs_time;  /* make mountable */
 445 #else
 446             fs_set_state(&sblock, FSOKAY - sblock.fs_time);
 447 #endif
 448             sblock.fs_clean = FSCLEAN;
 449 #endif
 450             sbdirty();
 451             dirty(&asblk);
 452         } else if (sblock.fs_postblformat == FS_DYNAMICPOSTBLFMT) {
 453             /*
 454              * Requested to convert from new format to old format
 455              */
 456             if (sblock.fs_nrpos != 8 || sblock.fs_ipg > 2048
 457                 || sblock.fs_cpg > 32 || sblock.fs_cpc > 16) {
 458                 msgprintf("PARAMETERS OF CURRENT FILE SYSTEM DO NOT\n\t");
 459                 msgprintf("ALLOW CONVERSION TO OLD FILE SYSTEM FORMAT\n");
 460                 errexit("");
 461
 462             }
 463             if (preen)
 464                 pwarn("CONVERTING TO OLD FILE SYSTEM FORMAT\n");
 465             else if (!reply("CONVERT TO OLD FILE SYSTEM FORMAT"))
 466                 return (0);
 467             isconvert = 1;
 468             sblock.fs_postblformat = FS_42POSTBLFMT;
 469             sblock.fs_cgsize =
 470                 fragroundup(&sblock,
 471                             sizeof(struct ocg) + howmany(sblock.fs_fpg,
 472                                                          NBBY));
 473 #if     defined(AFS_SUN_ENV) && !defined(AFS_SUN3_ENV)
 474 #ifdef  AFS_SUN5_ENV
 475             sblock.fs_npsect = 0;
 476 # ifndef AFS_SUN59_ENV
 477             sblock.fs_interleave = 0;
 478 # endif
 479             sblock.fs_state = FSOKAY - sblock.fs_time;  /* make mountable */
 480 #else
 481             fs_set_state(&sblock, FSOKAY - sblock.fs_time);
 482 #endif
 483             sblock.fs_clean = FSCLEAN;
 484 #endif
 485             sbdirty();
 486             dirty(&asblk);
 487         } else {
 488             errexit("UNKNOWN FILE SYSTEM FORMAT\n");
 489         }
 490     }
 491 #endif /* AFS_NEWCG_ENV */
 492     if (asblk.b_dirty) {
 493         memcpy((char *)&altsblock, (char *)&sblock, (int)sblock.fs_sbsize);
 494         flush(fswritefd, &asblk);
 495     }
 496     /*
 497      * read in the summary info.
 498      */
 499     asked = 0;
 500 #if     defined(AFS_SUN56_ENV)
 501     {
 502         caddr_t sip;
 503         sip = calloc(1, sblock.fs_cssize);
 504         sblock.fs_u.fs_csp = (struct csum *)sip;
 505         for (i = 0, j = 0; i < sblock.fs_cssize; i += sblock.fs_bsize, j++) {
 506             size =
 507                 sblock.fs_cssize - i <
 508                 sblock.fs_bsize ? sblock.fs_cssize - i : sblock.fs_bsize;
 509             if (bread
 510                 (fsreadfd, sip,
 511                  fsbtodb(&sblock, sblock.fs_csaddr + j * sblock.fs_frag),
 512                  size) != 0 && !asked) {
 513                 pfatal("BAD SUMMARY INFORMATION");
 514                 if (reply("CONTINUE") == 0)
 515                     errexit("");
 516                 return (0);
 517             }
 518             sip += size;
 519         }
 520     }
 521 #else /* AFS_SUN56_ENV */
 522 #if     defined(AFS_HPUX110_ENV)
 523     size = fragroundup(&sblock, sblock.fs_cssize);
 524     sblock.fs_csp = (struct csum *)calloc(1, (unsigned)size);
 525     if ((bread
 526          (fsreadfd, (char *)sblock.fs_csp, fsbtodb(&sblock, sblock.fs_csaddr),
 527           size) != 0) && !asked) {
 528         pfatal("BAD SUMMARY INFORMATION");
 529         if (reply("CONTINUE") == 0)
 530             errexit("");
 531         asked++;
 532     }
 533 #else /* AFS_HPUX110_ENV */
 534 #if     defined(AFS_HPUX101_ENV)
 535     {
 536         j = 0;
 537         size = fragroundup(&sblock, sblock.fs_cssize);
 538 #else
 539     for (i = 0, j = 0; i < sblock.fs_cssize; i += sblock.fs_bsize, j++) {
 540         size =
 541             sblock.fs_cssize - i <
 542             sblock.fs_bsize ? sblock.fs_cssize - i : sblock.fs_bsize;
 543 #endif /* AFS_HPUX101_ENV */
 544         sblock.fs_csp[j] = (struct csum *)calloc(1, (unsigned)size);
 545         if (bread
 546             (fsreadfd, (char *)sblock.fs_csp[j],
 547              fsbtodb(&sblock, sblock.fs_csaddr + j * sblock.fs_frag),
 548              size) != 0 && !asked) {
 549             pfatal("BAD SUMMARY INFORMATION");
 550             if (reply("CONTINUE") == 0)
 551                 errexit("");
 552 #ifdef  AFS_SUN_ENV
 553             return (0);
 554 #else
 555             asked++;
 556 #endif
 557         }
 558     }
 559 #endif /* else AFS_HPUX110_ENV */
 560 #endif /* else AFS_SUN56_ENV */
 561
 562 #if     defined(AFS_SUN_ENV) && !defined(AFS_SUN3_ENV)
 563     /*
 564      * if not forced, preening, not converting, and is clean; stop checking
 565      */
 566 #ifdef  AFS_SUN5_ENV
 567     if ((fflag == 0) && preen && (isconvert == 0)
 568         && (FSOKAY == (sblock.fs_state + sblock.fs_time)) &&
 569 #else
 570     if (preen && (isconvert == 0)
 571         && (FSOKAY == (fs_get_state(&sblock) + sblock.fs_time)) &&
 572 #endif
 573         ((sblock.fs_clean == FSCLEAN) || (sblock.fs_clean == FSSTABLE))) {
 574         iscorrupt = 0;
 575         printclean();
 576         return (0);
 577     }
 578 #endif
 579 #ifdef  AFS_OSF_ENV
 580     if (!fflag && !bflag && !nflag && !hotroot && sblock.fs_clean == FS_CLEAN
 581         && !sblk.b_dirty) {
 582         pwarn("Clean file system - skipping fsck\n");
 583         return (FS_CLEAN);
 584     }
 585 #endif /* AFS_OSF_ENV */
 586
 587     /*
 588      * allocate and initialize the necessary maps
 589      */
 590     bmapsize = roundup(howmany(maxfsblock, NBBY), sizeof(short));
 591     blockmap = calloc((unsigned)bmapsize, sizeof(char));
 592     if (blockmap == NULL) {
 593         msgprintf("cannot alloc %d bytes for blockmap\n", bmapsize);
 594         goto badsb;
 595     }
 596     statemap = calloc((unsigned)(maxino + 1), sizeof(char));
 597     if (statemap == NULL) {
 598         msgprintf("cannot alloc %d bytes for statemap\n", maxino + 1);
 599         goto badsb;
 600     }
 601     lncntp = (short *)calloc((unsigned)(maxino + 1), sizeof(short));
 602     if (lncntp == NULL) {
 603         msgprintf("cannot alloc %d bytes for lncntp\n",
 604                   (maxino + 1) * sizeof(short));
 605         goto badsb;
 606     }
 607
 608     bufinit();
 609     return (1);
 610
 611   badsb:
 612     ckfini();
 613     return (0);
 614 }
 615
 616 /*
 617  * Read in the super block and its summary info.
 618  */
 619 readsb(listerr)
 620      int listerr;
 621 {
 622 #ifdef AFS_NEWCG_ENV
 623     daddr_t super = bflag ? bflag : SBOFF / dev_bsize;
 624 #else /* AFS_NEWCG_ENV */
 625     daddr_t super = bflag ? bflag : SBLOCK;
 626
 627 #endif /* AFS_NEWCG_ENV */
 628     if (bread(fsreadfd, (char *)&sblock, super, (long)SBSIZE) != 0)
 629         return (0);
 630     sblk.b_bno = super;
 631     sblk.b_size = SBSIZE;
 632     /*
 633      * run a few consistency checks of the super block
 634      */
 635 #ifdef  AFS_HPUX_ENV
 636 #if defined(FD_FSMAGIC)
 637     if ((sblock.fs_magic != FS_MAGIC) && (sblock.fs_magic != FS_MAGIC_LFN)
 638         && (sblock.fs_magic != FD_FSMAGIC)
 639 #if     defined(AFS_HPUX101_ENV)
 640         && (sblock.fs_magic != FD_FSMAGIC_2)
 641 #endif
 642         )
 643 #else /* not new magic number */
 644     if ((sblock.fs_magic != FS_MAGIC) && (sblock.fs_magic != FS_MAGIC_LFN))
 645 #endif /* new magic number */
 646 #else
 647     if (sblock.fs_magic != FS_MAGIC)
 648 #endif
 649     {
 650         badsb(listerr, "MAGIC NUMBER WRONG");
 651         return (0);
 652     }
 653     if (sblock.fs_ncg < 1) {
 654         badsb(listerr, "NCG OUT OF RANGE");
 655         return (0);
 656     }
 657     if (sblock.fs_cpg < 1) {
 658         printf("fs_cpg= %d\n", sblock.fs_cpg);
 659         badsb(listerr, "CPG OUT OF RANGE");
 660         return (0);
 661     }
 662     if (sblock.fs_ncg * sblock.fs_cpg < sblock.fs_ncyl
 663         || (sblock.fs_ncg - 1) * sblock.fs_cpg >= sblock.fs_ncyl) {
 664         badsb(listerr, "NCYL LESS THAN NCG*CPG");
 665         return (0);
 666     }
 667     if (sblock.fs_sbsize > SBSIZE) {
 668         badsb(listerr, "SIZE PREPOSTEROUSLY LARGE");
 669         return (0);
 670     }
 671     /*
 672      * Compute block size that the filesystem is based on,
 673      * according to fsbtodb, and adjust superblock block number
 674      * so we can tell if this is an alternate later.
 675      */
 676     super *= dev_bsize;
 677     dev_bsize = sblock.fs_fsize / fsbtodb(&sblock, 1);
 678     sblk.b_bno = super / dev_bsize;
 679     /*
 680      * Set all possible fields that could differ, then do check
 681      * of whole super block against an alternate super block.
 682      * When an alternate super-block is specified this check is skipped.
 683      */
 684     getblk(&asblk, cgsblock(&sblock, sblock.fs_ncg - 1), sblock.fs_sbsize);
 685     if (asblk.b_errs)
 686         return (0);
 687     if (bflag) {
 688         havesb = 1;
 689         return (1);
 690     }
 691     altsblock.fs_link = sblock.fs_link;
 692 #ifdef STRUCT_FS_HAS_FS_ROLLED
 693     altsblock.fs_rolled = sblock.fs_rolled;
 694 #else
 695     altsblock.fs_rlink = sblock.fs_rlink;
 696 #endif
 697     altsblock.fs_time = sblock.fs_time;
 698     altsblock.fs_cstotal = sblock.fs_cstotal;
 699     altsblock.fs_cgrotor = sblock.fs_cgrotor;
 700     altsblock.fs_fmod = sblock.fs_fmod;
 701
 702     altsblock.fs_clean = sblock.fs_clean;
 703 #if     defined(AFS_SUN_ENV) && !defined(AFS_SUN3_ENV)
 704 #ifdef  AFS_SUN5_ENV
 705     altsblock.fs_state = sblock.fs_state;
 706 #else
 707     fs_set_state(&altsblock, fs_get_state(&sblock));
 708 #endif
 709 #endif
 710     altsblock.fs_ronly = sblock.fs_ronly;
 711     altsblock.fs_flags = sblock.fs_flags;
 712     altsblock.fs_maxcontig = sblock.fs_maxcontig;
 713     altsblock.fs_minfree = sblock.fs_minfree;
 714     altsblock.fs_optim = sblock.fs_optim;
 715     altsblock.fs_rotdelay = sblock.fs_rotdelay;
 716     altsblock.fs_maxbpg = sblock.fs_maxbpg;
 717 #if     !defined(__alpha) && !defined(AFS_SUN56_ENV)
 718 #if !defined(AFS_HPUX110_ENV)
 719     /* HPUX110 will use UpdateAlternateSuper() below */
 720     memcpy((char *)altsblock.fs_csp, (char *)sblock.fs_csp,
 721            sizeof sblock.fs_csp);
 722 #endif /* ! AFS_HPUX110_ENV */
 723 #endif /* ! __alpha */
 724 #if     defined(AFS_SUN56_ENV)
 725     memcpy((char *)altsblock.fs_u.fs_csp_pad, (char *)sblock.fs_u.fs_csp_pad,
 726            sizeof(sblock.fs_u.fs_csp_pad));
 727 #endif
 728     memcpy((char *)altsblock.fs_fsmnt, (char *)sblock.fs_fsmnt,
 729            sizeof sblock.fs_fsmnt);
 730 #ifndef AFS_HPUX_ENV
 731     memcpy((char *)altsblock.fs_sparecon, (char *)sblock.fs_sparecon,
 732            sizeof sblock.fs_sparecon);
 733 #endif
 734 #if defined(AFS_DEC_ENV)
 735     memcpy((char *)altsblock.fs_extra, (char *)sblock.fs_extra,
 736            sizeof sblock.fs_extra);
 737     altsblock.fs_deftimer = sblock.fs_deftimer;
 738     altsblock.fs_lastfsck = sblock.fs_lastfsck;
 739     altsblock.fs_gennum = sblock.fs_gennum;
 740 #endif
 741     /*
 742      * The following should not have to be copied.
 743      */
 744     altsblock.fs_fsbtodb = sblock.fs_fsbtodb;
 745 #ifdef AFS_NEWCG_ENV
 746 # if defined(AFS_SUN59_ENV) && defined(FS_SI_OK)
 747     /* fs_interleave replaced with fs_si and FS_SI_OK defined in */
 748     /* ufs_fs.h version 2.63 don't need to compare either */
 749     altsblock.fs_si = sblock.fs_si;
 750 # else
 751     altsblock.fs_interleave = sblock.fs_interleave;
 752 # endif
 753     altsblock.fs_npsect = sblock.fs_npsect;
 754     altsblock.fs_nrpos = sblock.fs_nrpos;
 755 #endif /* AFS_NEWCG_ENV */
 756 #if     defined(AFS_HPUX110_ENV)
 757     UpdateAlternateSuper(&sblock, &altsblock);
 758 #endif /* AFS_HPUX110_ENV */
 759     if (memcmp((char *)&sblock, (char *)&altsblock, (int)sblock.fs_sbsize)) {
 760 #ifdef  __alpha
 761         if (memcmp
 762             ((char *)&sblock.fs_blank[0], (char *)&altsblock.fs_blank[0],
 763              MAXCSBUFS * sizeof(int))) {
 764             memset((char *)sblock.fs_blank, 0, sizeof(sblock.fs_blank));
 765         } else {
 766 #endif /* __alpha */
 767             badsb(listerr,
 768                   "VALUES IN SUPER BLOCK DISAGREE WITH THOSE IN FIRST ALTERNATE");
 769             return (0);
 770 #ifdef  __alpha
 771         }
 772 #endif /* __alpha */
 773     }
 774     havesb = 1;
 775     return (1);
 776 }
 777
 778 badsb(listerr, s)
 779      int listerr;
 780      char *s;
 781 {
 782
 783     if (!listerr)
 784         return;
 785     if (preen)
 786         msgprintf("%s: ", devname);
 787     pfatal("BAD SUPER BLOCK: %s\n", s);
 788 #ifdef  AFS_SUN5_ENV
 789     pwarn("USE AN ALTERNATE SUPER-BLOCK TO SUPPLY NEEDED INFORMATION;\n");
 790     pwarn("eg. fsck [-F ufs] -o b=# [special ...] \n");
 791     pfatal("where # is the alternate super block. SEE fsck_ufs(1M). \n");
 792 #endif
 793 }
 794
 795 /* dummy function that fails if ever called */
 796 calcsb(dev, devfd, fs)
 797      char *dev;
 798      int devfd;
 799      register struct fs *fs;
 800 {
 801     return 0;
 802 }
 803
 804 #ifdef  AFS_DEC_ENV
 805 clean_byte_valid(lastfsck)
 806      time_t lastfsck;
 807 {
 808     time_t now;
 809     int delta;
 810
 811     time(&now);
 812     if ((!sblock.fs_deftimer) || (!sblock.fs_lastfsck) || (lastfsck > now)) {
 813         sblock.fs_deftimer = 0;
 814         return (0);
 815     }
 816     if (!sblock.fs_cleantimer)
 817         return (0);
 818     delta = (now - lastfsck) / 86400;
 819     if (delta > 60)
 820         return (0);
 821     return (1);
 822 }
 823 #endif
 824
 825 #include <sys/ustat.h>
 826 #ifdef  AFS_HPUX_ENV
 827 #include <sys/pstat.h>
 828 #endif
 829 #include <sys/errno.h>
 830
 831 extern int errno;
 832
 833 is_mounted(device, dev_st)
 834      char *device;
 835      struct stat *dev_st;
 836 {
 837     char blockdev[BUFSIZ];
 838     struct ustat ust;
 839     char *dp;
 840
 841     strcpy(blockdev, device);
 842     if (stat(blockdev, dev_st) < 0)
 843         return (0);
 844
 845     if (is_pre_init(dev_st->st_rdev))
 846         return (0);
 847
 848     if ((dev_st->st_mode & S_IFMT) == S_IFCHR) {
 849         dp = strrchr(blockdev, '/');
 850         if (strncmp(dp, "/r", 2) != 0)
 851             while (dp >= blockdev && *--dp != '/');
 852         if (*(dp + 1) == 'r')
 853             (void)strcpy(dp + 1, dp + 2);
 854         if (stat(blockdev, dev_st) < 0)
 855             return (0);
 856     }
 857     if (ustat(dev_st->st_rdev, &ust) >= 0) {
 858         /* make sure we are not in pre_init_rc. If we are 0 should be returned in here. */
 859         if ((is_root(dev_st->st_rdev)) && is_roroot())
 860             return (0);
 861         return (1);
 862     }
 863     return (0);
 864 }
 865
 866 #ifdef  AFS_HPUX_ENV
 867
 868 #define PS_BURST 1
 869 #ifdef AFS_HPUX102_ENV
 870 #define PSTAT(P, N, I) pstat_getswap(P, sizeof(*P), (size_t)N, I)
 871 #else
 872 #define PSTAT(P, N, I) pstat(PSTAT_SWAPINFO, P, sizeof(*P), (size_t)N, I)
 873 #endif
 874 is_swap(devno)
 875      dev_t devno;
 876 {
 877     struct pst_swapinfo pst[PS_BURST];
 878     register struct pst_swapinfo *psp = &pst[0];
 879     int idx = 0, count, match = 0;
 880
 881     while ((count = PSTAT(psp, PS_BURST, idx) != 0)) {
 882         idx = pst[count - 1].pss_idx + 1;
 883         if ((psp->pss_flags & SW_BLOCK) && (psp->pss_major == major(devno))
 884             && (psp->pss_minor == minor(devno))) {
 885             match = 1;
 886             break;
 887         }
 888     }
 889     return (match);
 890 }
 891
 892 #endif /* AFS_HPUX_ENV */
 893
 894
 895 is_pre_init(rdevnum)
 896      dev_t rdevnum;
 897 {
 898     if (rdevnum == -1)
 899         return (1);
 900     return (0);
 901 }
 902
 903 is_roroot()
 904 {
 905 #ifndef UID_NO_CHANGE
 906     struct stat stslash;
 907
 908     if (stat("/", &stslash) < 0)
 909         return (0);
 910     if (chown("/", stslash.st_uid, stslash.st_gid) == 0)
 911         return (0);
 912 #else
 913     if (chown("/", UID_NO_CHANGE, GID_NO_CHANGE) == 0)
 914         return (0);
 915 #endif
 916     else if (errno != EROFS) {
 917         printf("fsck: chown failed: %d\n", errno);
 918         return (0);
 919     }
 920     return (1);
 921 }
 922
 923 is_hotroot(fs_device)
 924      char *fs_device;
 925 {
 926     struct stat stslash, stblock, stchar;
 927     char blockdev[BUFSIZ];
 928
 929     strcpy(blockdev, fs_device);
 930     if (stat("/", &stslash) < 0) {
 931         pfatal("Can't stat root\n");
 932         return (0);
 933     }
 934
 935     if (stat(blockdev, &stblock) < 0) {
 936         pfatal("Can't stat %s\n", blockdev);
 937         return (0);
 938     }
 939
 940     if (is_pre_init(stblock.st_rdev))
 941         return (0);
 942
 943     /* convert the device name to be block device name */
 944     if ((stblock.st_mode & S_IFMT) == S_IFCHR) {
 945         unrawname(blockdev);
 946         if (stat(blockdev, &stblock) < 0)
 947             return (0);
 948     }
 949     if ((stblock.st_mode & S_IFMT) != S_IFBLK)
 950         return (0);
 951     if (stslash.st_dev != stblock.st_rdev)
 952         return (0);
 953     /* is root file system mounted read only? */
 954     if (is_roroot())
 955         return (0);
 956     return (1);
 957 }
 958
 959 is_root(rdev_num)
 960      dev_t rdev_num;
 961 {
 962     struct stat stslash;
 963
 964     if (stat("/", &stslash) < 0)
 965         return (0);
 966     if (stslash.st_dev != rdev_num)
 967         return (0);
 968     return (1);
 969 }
 970
 971 getline(fp, loc, maxlen)
 972      FILE *fp;
 973      char *loc;
 974 {
 975     register n;
 976     register char *p, *lastloc;
 977
 978     p = loc;
 979     lastloc = &p[maxlen - 1];
 980     while ((n = getc(fp)) != '\n') {
 981         if (n == EOF)
 982             return (EOF);
 983         if (!isspace(n) && p < lastloc)
 984             *p++ = n;
 985     }
 986     *p = 0;
 987     return (p - loc);
 988 }
 989
 990 /*
 991  * freply - prints the string, s, gets a reply fromterminal and returns
 992  * 0 - no (don't continue), and 1 - yes (continue)
 993  */
 994 freply(s)
 995      char *s;
 996 {
 997     char line[80];
 998
 999     if (!isatty(0))
1000         errexit("exiting\n");
1001     printf("\n%s? ", s);
1002     if (getline(stdin, line, sizeof(line)) == EOF)
1003         errexit("\n");
1004     if (line[0] == 'y' || line[0] == 'Y')
1005         return (1);
1006     return (0);
1007 }
1008
1009
1010 #if   defined(AFS_HPUX110_ENV)
1011 /*
1012  *  Refer to function compare_sblocks() in HP's fsck.c
1013  *
1014  *  DESCRIPTION:
1015  *     This routine will compare the primary superblock (PRIM_SBLOCK) to the
1016  *     alternate superblock (ALT_SBLOCK).  This routine will take into account
1017  *     that certain fields in the alternate superblock could be different than
1018  *     in the primary superblock.  This routine checks the "static" fields
1019  *     and ignores the "dynamic" fields.  Superblocks with the same "static"
1020  *     fields are considered equivalent.
1021  *
1022  */
1023 UpdateAlternateSuper(prim_sblock, alt_sblock)
1024      struct fs *prim_sblock;
1025      struct fs *alt_sblock;     /* will be modified */
1026 {
1027     /*
1028      * Set all possible fields that could differ, then do check
1029      * of whole super block against an alternate super block.
1030      *
1031      * Copy dynamic fields of prim_sblock into alt_sblock
1032      */
1033     alt_sblock->fs_time = prim_sblock->fs_time;
1034     alt_sblock->fs_minfree = prim_sblock->fs_minfree;
1035     alt_sblock->fs_rotdelay = prim_sblock->fs_rotdelay;
1036     alt_sblock->fs_maxcontig = prim_sblock->fs_maxcontig;
1037     alt_sblock->fs_maxbpg = prim_sblock->fs_maxbpg;
1038     alt_sblock->fs_mirror = prim_sblock->fs_mirror;
1039     alt_sblock->fs_cstotal = prim_sblock->fs_cstotal;
1040     alt_sblock->fs_fmod = prim_sblock->fs_fmod;
1041     alt_sblock->fs_clean = prim_sblock->fs_clean;
1042     alt_sblock->fs_ronly = prim_sblock->fs_ronly;
1043     alt_sblock->fs_flags = prim_sblock->fs_flags;
1044     alt_sblock->fs_cgrotor = prim_sblock->fs_cgrotor;
1045 #ifdef __LP64__
1046     alt_sblock->fs_csp = prim_sblock->fs_csp;
1047 #else /* not __LP64__ */
1048     alt_sblock->fs_csp = prim_sblock->fs_csp;
1049     alt_sblock->fs_csp_pad = prim_sblock->fs_csp_pad;
1050 #endif /* not __LP64__ */
1051     memcpy((char *)alt_sblock->fs_fsmnt, (char *)prim_sblock->fs_fsmnt,
1052            sizeof prim_sblock->fs_fsmnt);
1053     memcpy((char *)alt_sblock->fs_fname, (char *)prim_sblock->fs_fname,
1054            sizeof prim_sblock->fs_fname);
1055     memcpy((char *)alt_sblock->fs_fpack, (char *)prim_sblock->fs_fpack,
1056            sizeof prim_sblock->fs_fpack);
1057     if (prim_sblock->fs_featurebits & FSF_LARGEUIDS)
1058         alt_sblock->fs_featurebits |= FSF_LARGEUIDS;
1059     else
1060         alt_sblock->fs_featurebits &= ~FSF_LARGEUIDS;
1061 }
1062 #endif /* AFS_HPUX110_ENV */