util-linux/fsck_minix.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * fsck.c - a file system consistency checker for Linux.
   4  *
   5  * (C) 1991, 1992 Linus Torvalds. This file may be redistributed
   6  * as per the GNU copyleft.
   7  */
   8
   9 /*
  10  * 09.11.91  -  made the first rudimetary functions
  11  *
  12  * 10.11.91  -  updated, does checking, no repairs yet.
  13  *              Sent out to the mailing-list for testing.
  14  *
  15  * 14.11.91  -  Testing seems to have gone well. Added some
  16  *              correction-code, and changed some functions.
  17  *
  18  * 15.11.91  -  More correction code. Hopefully it notices most
  19  *              cases now, and tries to do something about them.
  20  *
  21  * 16.11.91  -  More corrections (thanks to Mika Jalava). Most
  22  *              things seem to work now. Yeah, sure.
  23  *
  24  *
  25  * 19.04.92  -  Had to start over again from this old version, as a
  26  *              kernel bug ate my enhanced fsck in february.
  27  *
  28  * 28.02.93  -  added support for different directory entry sizes..
  29  *
  30  * Sat Mar  6 18:59:42 1993, faith@cs.unc.edu: Output namelen with
  31  *                           super-block information
  32  *
  33  * Sat Oct  9 11:17:11 1993, faith@cs.unc.edu: make exit status conform
  34  *                           to that required by fsutil
  35  *
  36  * Mon Jan  3 11:06:52 1994 - Dr. Wettstein (greg%wind.uucp@plains.nodak.edu)
  37  *                            Added support for file system valid flag.  Also
  38  *                            added program_version variable and output of
  39  *                            program name and version number when program
  40  *                            is executed.
  41  *
  42  * 30.10.94 - added support for v2 filesystem
  43  *            (Andreas Schwab, schwab@issan.informatik.uni-dortmund.de)
  44  *
  45  * 10.12.94  -  added test to prevent checking of mounted fs adapted
  46  *              from Theodore Ts'o's (tytso@athena.mit.edu) e2fsck
  47  *              program.  (Daniel Quinlan, quinlan@yggdrasil.com)
  48  *
  49  * 01.07.96  - Fixed the v2 fs stuff to use the right #defines and such
  50  *             for modern libcs (janl@math.uio.no, Nicolai Langfeldt)
  51  *
  52  * 02.07.96  - Added C bit fiddling routines from rmk@ecs.soton.ac.uk
  53  *             (Russell King).  He made them for ARM.  It would seem
  54  *             that the ARM is powerful enough to do this in C whereas
  55  *             i386 and m64k must use assembly to get it fast >:-)
  56  *             This should make minix fsck systemindependent.
  57  *             (janl@math.uio.no, Nicolai Langfeldt)
  58  *
  59  * 04.11.96  - Added minor fixes from Andreas Schwab to avoid compiler
  60  *             warnings.  Added mc68k bitops from
  61  *             Joerg Dorchain <dorchain@mpi-sb.mpg.de>.
  62  *
  63  * 06.11.96  - Added v2 code submitted by Joerg Dorchain, but written by
  64  *             Andreas Schwab.
  65  *
  66  * 1999-02-22 Arkadiusz Mi¶kiewicz <misiek@misiek.eu.org>
  67  * - added Native Language Support
  68  *
  69  *
  70  * I've had no time to add comments - hopefully the function names
  71  * are comments enough. As with all file system checkers, this assumes
  72  * the file system is quiescent - don't use it on a mounted device
  73  * unless you can be sure nobody is writing to it (and remember that the
  74  * kernel can write to it when it searches for files).
  75  *
  76  * Usuage: fsck [-larvsm] device
  77  *      -l for a listing of all the filenames
  78  *      -a for automatic repairs (not implemented)
  79  *      -r for repairs (interactive) (not implemented)
  80  *      -v for verbose (tells how many files)
  81  *      -s for super-block info
  82  *      -m for minix-like "mode not cleared" warnings
  83  *      -f force filesystem check even if filesystem marked as valid
  84  *
  85  * The device may be a block device or a image of one, but this isn't
  86  * enforced (but it's not much fun on a character device :-).
  87  */
  88
  89 #include "internal.h"
  90 #include <stdio.h>
  91 #include <errno.h>
  92 #include <unistd.h>
  93 #include <string.h>
  94 #include <fcntl.h>
  95 #include <ctype.h>
  96 #include <stdlib.h>
  97 #include <termios.h>
  98 #include <mntent.h>
  99 #include <sys/stat.h>
 100 #include <sys/param.h>                  /* for PATH_MAX */
 101
 102 #include <linux/fs.h>
 103 #include <linux/minix_fs.h>
 104
 105 #ifdef MINIX2_SUPER_MAGIC2
 106 #define HAVE_MINIX2 1
 107 #endif
 108
 109 #ifndef __linux__
 110 #define volatile
 111 #endif
 112
 113 #define ROOT_INO 1
 114
 115 #define UPPER(size,n) ((size+((n)-1))/(n))
 116 #define INODE_SIZE (sizeof(struct minix_inode))
 117 #ifdef HAVE_MINIX2
 118 #define INODE_SIZE2 (sizeof(struct minix2_inode))
 119 #define INODE_BLOCKS UPPER(INODES, (version2 ? MINIX2_INODES_PER_BLOCK \
 120                                     : MINIX_INODES_PER_BLOCK))
 121 #else
 122 #define INODE_BLOCKS UPPER(INODES, (MINIX_INODES_PER_BLOCK))
 123 #endif
 124 #define INODE_BUFFER_SIZE (INODE_BLOCKS * BLOCK_SIZE)
 125
 126 #define BITS_PER_BLOCK (BLOCK_SIZE<<3)
 127
 128 static char *program_name = "fsck.minix";
 129 static char *program_version = "1.2 - 11/11/96";
 130 static char *device_name = NULL;
 131 static int IN;
 132 static int repair = 0, automatic = 0, verbose = 0, list = 0, show =
 133         0, warn_mode = 0, force = 0;
 134 static int directory = 0, regular = 0, blockdev = 0, chardev = 0, links =
 135         0, symlinks = 0, total = 0;
 136
 137 static int changed = 0;                 /* flags if the filesystem has been changed */
 138 static int errors_uncorrected = 0;      /* flag if some error was not corrected */
 139 static int dirsize = 16;
 140 static int namelen = 14;
 141 static int version2 = 0;
 142 static struct termios termios;
 143 static int termios_set = 0;
 144
 145 /* File-name data */
 146 #define MAX_DEPTH 32
 147 static int name_depth = 0;
 148 // static char name_list[MAX_DEPTH][PATH_MAX + 1];
 149 static char **name_list = NULL;
 150
 151 static char *inode_buffer = NULL;
 152
 153 #define Inode (((struct minix_inode *) inode_buffer)-1)
 154 #define Inode2 (((struct minix2_inode *) inode_buffer)-1)
 155 static char super_block_buffer[BLOCK_SIZE];
 156
 157 #define Super (*(struct minix_super_block *)super_block_buffer)
 158 #define INODES ((unsigned long)Super.s_ninodes)
 159 #ifdef HAVE_MINIX2
 160 #define ZONES ((unsigned long)(version2 ? Super.s_zones : Super.s_nzones))
 161 #else
 162 #define ZONES ((unsigned long)(Super.s_nzones))
 163 #endif
 164 #define IMAPS ((unsigned long)Super.s_imap_blocks)
 165 #define ZMAPS ((unsigned long)Super.s_zmap_blocks)
 166 #define FIRSTZONE ((unsigned long)Super.s_firstdatazone)
 167 #define ZONESIZE ((unsigned long)Super.s_log_zone_size)
 168 #define MAXSIZE ((unsigned long)Super.s_max_size)
 169 #define MAGIC (Super.s_magic)
 170 #define NORM_FIRSTZONE (2+IMAPS+ZMAPS+INODE_BLOCKS)
 171
 172 static char *inode_map;
 173 static char *zone_map;
 174
 175 static unsigned char *inode_count = NULL;
 176 static unsigned char *zone_count = NULL;
 177
 178 static void recursive_check(unsigned int ino);
 179 static void recursive_check2(unsigned int ino);
 180
 181 #define inode_in_use(x) (bit(inode_map,(x)))
 182 #define zone_in_use(x) (bit(zone_map,(x)-FIRSTZONE+1))
 183
 184 #define mark_inode(x) (setbit(inode_map,(x)),changed=1)
 185 #define unmark_inode(x) (clrbit(inode_map,(x)),changed=1)
 186
 187 #define mark_zone(x) (setbit(zone_map,(x)-FIRSTZONE+1),changed=1)
 188 #define unmark_zone(x) (clrbit(zone_map,(x)-FIRSTZONE+1),changed=1)
 189
 190 static void leave(int) __attribute__ ((noreturn));
 191 static void leave(int status)
 192 {
 193         if (termios_set)
 194                 tcsetattr(0, TCSANOW, &termios);
 195         exit(status);
 196 }
 197
 198 static void show_usage(void)
 199 {
 200         fprintf(stderr, "BusyBox v%s (%s) multi-call binary -- GPL2\n\n",
 201                         BB_VER, BB_BT);
 202         fprintf(stderr, "Usage: %s [-larvsmf] /dev/name\n\n", program_name);
 203         fprintf(stderr,
 204                         "Performs a consistency check for MINIX filesystems.\n\n");
 205         fprintf(stderr, "OPTIONS:\n");
 206         fprintf(stderr, "\t-l\tLists all filenames\n");
 207         fprintf(stderr, "\t-r\tPerform interactive repairs\n");
 208         fprintf(stderr, "\t-a\tPerform automatic repairs\n");
 209         fprintf(stderr, "\t-v\tverbose\n");
 210         fprintf(stderr, "\t-s\tOutputs super-block information\n");
 211         fprintf(stderr,
 212                         "\t-m\tActivates MINIX-like \"mode not cleared\" warnings\n");
 213         fprintf(stderr, "\t-f\tForce file system check.\n\n");
 214         leave(16);
 215 }
 216
 217 static void die(const char *str)
 218 {
 219         fprintf(stderr, "%s: %s\n", program_name, str);
 220         leave(8);
 221 }
 222
 223 /*
 224  * This simply goes through the file-name data and prints out the
 225  * current file.
 226  */
 227 static void print_current_name(void)
 228 {
 229         int i = 0;
 230
 231         while (i < name_depth)
 232                 printf("/%.*s", namelen, name_list[i++]);
 233         if (i == 0)
 234                 printf("/");
 235 }
 236
 237 static int ask(const char *string, int def)
 238 {
 239         int c;
 240
 241         if (!repair) {
 242                 printf("\n");
 243                 errors_uncorrected = 1;
 244                 return 0;
 245         }
 246         if (automatic) {
 247                 printf("\n");
 248                 if (!def)
 249                         errors_uncorrected = 1;
 250                 return def;
 251         }
 252         printf(def ? "%s (y/n)? " : "%s (n/y)? ", string);
 253         for (;;) {
 254                 fflush(stdout);
 255                 if ((c = getchar()) == EOF) {
 256                         if (!def)
 257                                 errors_uncorrected = 1;
 258                         return def;
 259                 }
 260                 c = toupper(c);
 261                 if (c == 'Y') {
 262                         def = 1;
 263                         break;
 264                 } else if (c == 'N') {
 265                         def = 0;
 266                         break;
 267                 } else if (c == ' ' || c == '\n')
 268                         break;
 269         }
 270         if (def)
 271                 printf("y\n");
 272         else {
 273                 printf("n\n");
 274                 errors_uncorrected = 1;
 275         }
 276         return def;
 277 }
 278
 279 /*
 280  * Make certain that we aren't checking a filesystem that is on a
 281  * mounted partition.  Code adapted from e2fsck, Copyright (C) 1993,
 282  * 1994 Theodore Ts'o.  Also licensed under GPL.
 283  */
 284 static void check_mount(void)
 285 {
 286         FILE *f;
 287         struct mntent *mnt;
 288         int cont;
 289         int fd;
 290
 291         if ((f = setmntent(MOUNTED, "r")) == NULL)
 292                 return;
 293         while ((mnt = getmntent(f)) != NULL)
 294                 if (strcmp(device_name, mnt->mnt_fsname) == 0)
 295                         break;
 296         endmntent(f);
 297         if (!mnt)
 298                 return;
 299
 300         /*
 301          * If the root is mounted read-only, then /etc/mtab is
 302          * probably not correct; so we won't issue a warning based on
 303          * it.
 304          */
 305         fd = open(MOUNTED, O_RDWR);
 306         if (fd < 0 && errno == EROFS)
 307                 return;
 308         else
 309                 close(fd);
 310
 311         printf("%s is mounted.   ", device_name);
 312         if (isatty(0) && isatty(1))
 313                 cont = ask("Do you really want to continue", 0);
 314         else
 315                 cont = 0;
 316         if (!cont) {
 317                 printf("check aborted.\n");
 318                 exit(0);
 319         }
 320         return;
 321 }
 322
 323 /*
 324  * check_zone_nr checks to see that *nr is a valid zone nr. If it
 325  * isn't, it will possibly be repaired. Check_zone_nr sets *corrected
 326  * if an error was corrected, and returns the zone (0 for no zone
 327  * or a bad zone-number).
 328  */
 329 static int check_zone_nr(unsigned short *nr, int *corrected)
 330 {
 331         if (!*nr)
 332                 return 0;
 333         if (*nr < FIRSTZONE)
 334                 printf("Zone nr < FIRSTZONE in file `");
 335         else if (*nr >= ZONES)
 336                 printf("Zone nr >= ZONES in file `");
 337         else
 338                 return *nr;
 339         print_current_name();
 340         printf("'.");
 341         if (ask("Remove block", 1)) {
 342                 *nr = 0;
 343                 *corrected = 1;
 344         }
 345         return 0;
 346 }
 347
 348 #ifdef HAVE_MINIX2
 349 static int check_zone_nr2(unsigned int *nr, int *corrected)
 350 {
 351         if (!*nr)
 352                 return 0;
 353         if (*nr < FIRSTZONE)
 354                 printf("Zone nr < FIRSTZONE in file `");
 355         else if (*nr >= ZONES)
 356                 printf("Zone nr >= ZONES in file `");
 357         else
 358                 return *nr;
 359         print_current_name();
 360         printf("'.");
 361         if (ask("Remove block", 1)) {
 362                 *nr = 0;
 363                 *corrected = 1;
 364         }
 365         return 0;
 366 }
 367 #endif
 368
 369 /*
 370  * read-block reads block nr into the buffer at addr.
 371  */
 372 static void read_block(unsigned int nr, char *addr)
 373 {
 374         if (!nr) {
 375                 memset(addr, 0, BLOCK_SIZE);
 376                 return;
 377         }
 378         if (BLOCK_SIZE * nr != lseek(IN, BLOCK_SIZE * nr, SEEK_SET)) {
 379                 printf("Read error: unable to seek to block in file '");
 380                 print_current_name();
 381                 printf("'\n");
 382                 memset(addr, 0, BLOCK_SIZE);
 383                 errors_uncorrected = 1;
 384         } else if (BLOCK_SIZE != read(IN, addr, BLOCK_SIZE)) {
 385                 printf("Read error: bad block in file '");
 386                 print_current_name();
 387                 printf("'\n");
 388                 memset(addr, 0, BLOCK_SIZE);
 389                 errors_uncorrected = 1;
 390         }
 391 }
 392
 393 /*
 394  * write_block writes block nr to disk.
 395  */
 396 static void write_block(unsigned int nr, char *addr)
 397 {
 398         if (!nr)
 399                 return;
 400         if (nr < FIRSTZONE || nr >= ZONES) {
 401                 printf("Internal error: trying to write bad block\n"
 402                            "Write request ignored\n");
 403                 errors_uncorrected = 1;
 404                 return;
 405         }
 406         if (BLOCK_SIZE * nr != lseek(IN, BLOCK_SIZE * nr, SEEK_SET))
 407                 die("seek failed in write_block");
 408         if (BLOCK_SIZE != write(IN, addr, BLOCK_SIZE)) {
 409                 printf("Write error: bad block in file '");
 410                 print_current_name();
 411                 printf("'\n");
 412                 errors_uncorrected = 1;
 413         }
 414 }
 415
 416 /*
 417  * map-block calculates the absolute block nr of a block in a file.
 418  * It sets 'changed' if the inode has needed changing, and re-writes
 419  * any indirect blocks with errors.
 420  */
 421 static int map_block(struct minix_inode *inode, unsigned int blknr)
 422 {
 423         unsigned short ind[BLOCK_SIZE >> 1];
 424         unsigned short dind[BLOCK_SIZE >> 1];
 425         int blk_chg, block, result;
 426
 427         if (blknr < 7)
 428                 return check_zone_nr(inode->i_zone + blknr, &changed);
 429         blknr -= 7;
 430         if (blknr < 512) {
 431                 block = check_zone_nr(inode->i_zone + 7, &changed);
 432                 read_block(block, (char *) ind);
 433                 blk_chg = 0;
 434                 result = check_zone_nr(blknr + ind, &blk_chg);
 435                 if (blk_chg)
 436                         write_block(block, (char *) ind);
 437                 return result;
 438         }
 439         blknr -= 512;
 440         block = check_zone_nr(inode->i_zone + 8, &changed);
 441         read_block(block, (char *) dind);
 442         blk_chg = 0;
 443         result = check_zone_nr(dind + (blknr / 512), &blk_chg);
 444         if (blk_chg)
 445                 write_block(block, (char *) dind);
 446         block = result;
 447         read_block(block, (char *) ind);
 448         blk_chg = 0;
 449         result = check_zone_nr(ind + (blknr % 512), &blk_chg);
 450         if (blk_chg)
 451                 write_block(block, (char *) ind);
 452         return result;
 453 }
 454
 455 #ifdef HAVE_MINIX2
 456 static int map_block2(struct minix2_inode *inode, unsigned int blknr)
 457 {
 458         unsigned int ind[BLOCK_SIZE >> 2];
 459         unsigned int dind[BLOCK_SIZE >> 2];
 460         unsigned int tind[BLOCK_SIZE >> 2];
 461         int blk_chg, block, result;
 462
 463         if (blknr < 7)
 464                 return check_zone_nr2(inode->i_zone + blknr, &changed);
 465         blknr -= 7;
 466         if (blknr < 256) {
 467                 block = check_zone_nr2(inode->i_zone + 7, &changed);
 468                 read_block(block, (char *) ind);
 469                 blk_chg = 0;
 470                 result = check_zone_nr2(blknr + ind, &blk_chg);
 471                 if (blk_chg)
 472                         write_block(block, (char *) ind);
 473                 return result;
 474         }
 475         blknr -= 256;
 476         if (blknr >= 256 * 256) {
 477                 block = check_zone_nr2(inode->i_zone + 8, &changed);
 478                 read_block(block, (char *) dind);
 479                 blk_chg = 0;
 480                 result = check_zone_nr2(dind + blknr / 256, &blk_chg);
 481                 if (blk_chg)
 482                         write_block(block, (char *) dind);
 483                 block = result;
 484                 read_block(block, (char *) ind);
 485                 blk_chg = 0;
 486                 result = check_zone_nr2(ind + blknr % 256, &blk_chg);
 487                 if (blk_chg)
 488                         write_block(block, (char *) ind);
 489                 return result;
 490         }
 491         blknr -= 256 * 256;
 492         block = check_zone_nr2(inode->i_zone + 9, &changed);
 493         read_block(block, (char *) tind);
 494         blk_chg = 0;
 495         result = check_zone_nr2(tind + blknr / (256 * 256), &blk_chg);
 496         if (blk_chg)
 497                 write_block(block, (char *) tind);
 498         block = result;
 499         read_block(block, (char *) dind);
 500         blk_chg = 0;
 501         result = check_zone_nr2(dind + (blknr / 256) % 256, &blk_chg);
 502         if (blk_chg)
 503                 write_block(block, (char *) dind);
 504         block = result;
 505         read_block(block, (char *) ind);
 506         blk_chg = 0;
 507         result = check_zone_nr2(ind + blknr % 256, &blk_chg);
 508         if (blk_chg)
 509                 write_block(block, (char *) ind);
 510         return result;
 511 }
 512 #endif
 513
 514 static void write_super_block(void)
 515 {
 516         /*
 517          * Set the state of the filesystem based on whether or not there
 518          * are uncorrected errors.  The filesystem valid flag is
 519          * unconditionally set if we get this far.
 520          */
 521         Super.s_state |= MINIX_VALID_FS;
 522         if (errors_uncorrected)
 523                 Super.s_state |= MINIX_ERROR_FS;
 524         else
 525                 Super.s_state &= ~MINIX_ERROR_FS;
 526
 527         if (BLOCK_SIZE != lseek(IN, BLOCK_SIZE, SEEK_SET))
 528                 die("seek failed in write_super_block");
 529         if (BLOCK_SIZE != write(IN, super_block_buffer, BLOCK_SIZE))
 530                 die("unable to write super-block");
 531
 532         return;
 533 }
 534
 535 static void write_tables(void)
 536 {
 537         write_super_block();
 538
 539         if (IMAPS * BLOCK_SIZE != write(IN, inode_map, IMAPS * BLOCK_SIZE))
 540                 die("Unable to write inode map");
 541         if (ZMAPS * BLOCK_SIZE != write(IN, zone_map, ZMAPS * BLOCK_SIZE))
 542                 die("Unable to write zone map");
 543         if (INODE_BUFFER_SIZE != write(IN, inode_buffer, INODE_BUFFER_SIZE))
 544                 die("Unable to write inodes");
 545 }
 546
 547 static void get_dirsize(void)
 548 {
 549         int block;
 550         char blk[BLOCK_SIZE];
 551         int size;
 552
 553 #if HAVE_MINIX2
 554         if (version2)
 555                 block = Inode2[ROOT_INO].i_zone[0];
 556         else
 557 #endif
 558                 block = Inode[ROOT_INO].i_zone[0];
 559         read_block(block, blk);
 560         for (size = 16; size < BLOCK_SIZE; size <<= 1) {
 561                 if (strcmp(blk + size + 2, "..") == 0) {
 562                         dirsize = size;
 563                         namelen = size - 2;
 564                         return;
 565                 }
 566         }
 567         /* use defaults */
 568 }
 569
 570 static void read_superblock(void)
 571 {
 572         if (BLOCK_SIZE != lseek(IN, BLOCK_SIZE, SEEK_SET))
 573                 die("seek failed");
 574         if (BLOCK_SIZE != read(IN, super_block_buffer, BLOCK_SIZE))
 575                 die("unable to read super block");
 576         if (MAGIC == MINIX_SUPER_MAGIC) {
 577                 namelen = 14;
 578                 dirsize = 16;
 579                 version2 = 0;
 580         } else if (MAGIC == MINIX_SUPER_MAGIC2) {
 581                 namelen = 30;
 582                 dirsize = 32;
 583                 version2 = 0;
 584 #ifdef HAVE_MINIX2
 585         } else if (MAGIC == MINIX2_SUPER_MAGIC) {
 586                 namelen = 14;
 587                 dirsize = 16;
 588                 version2 = 1;
 589         } else if (MAGIC == MINIX2_SUPER_MAGIC2) {
 590                 namelen = 30;
 591                 dirsize = 32;
 592                 version2 = 1;
 593 #endif
 594         } else
 595                 die("bad magic number in super-block");
 596         if (ZONESIZE != 0 || BLOCK_SIZE != 1024)
 597                 die("Only 1k blocks/zones supported");
 598         if (IMAPS * BLOCK_SIZE * 8 < INODES + 1)
 599                 die("bad s_imap_blocks field in super-block");
 600         if (ZMAPS * BLOCK_SIZE * 8 < ZONES - FIRSTZONE + 1)
 601                 die("bad s_zmap_blocks field in super-block");
 602 }
 603
 604 static void read_tables(void)
 605 {
 606         inode_map = malloc(IMAPS * BLOCK_SIZE);
 607         if (!inode_map)
 608                 die("Unable to allocate buffer for inode map");
 609         zone_map = malloc(ZMAPS * BLOCK_SIZE);
 610         if (!inode_map)
 611                 die("Unable to allocate buffer for zone map");
 612         memset(inode_map, 0, sizeof(inode_map));
 613         memset(zone_map, 0, sizeof(zone_map));
 614         inode_buffer = malloc(INODE_BUFFER_SIZE);
 615         if (!inode_buffer)
 616                 die("Unable to allocate buffer for inodes");
 617         inode_count = malloc(INODES + 1);
 618         if (!inode_count)
 619                 die("Unable to allocate buffer for inode count");
 620         zone_count = malloc(ZONES);
 621         if (!zone_count)
 622                 die("Unable to allocate buffer for zone count");
 623         if (IMAPS * BLOCK_SIZE != read(IN, inode_map, IMAPS * BLOCK_SIZE))
 624                 die("Unable to read inode map");
 625         if (ZMAPS * BLOCK_SIZE != read(IN, zone_map, ZMAPS * BLOCK_SIZE))
 626                 die("Unable to read zone map");
 627         if (INODE_BUFFER_SIZE != read(IN, inode_buffer, INODE_BUFFER_SIZE))
 628                 die("Unable to read inodes");
 629         if (NORM_FIRSTZONE != FIRSTZONE) {
 630                 printf("Warning: Firstzone != Norm_firstzone\n");
 631                 errors_uncorrected = 1;
 632         }
 633         get_dirsize();
 634         if (show) {
 635                 printf("%ld inodes\n", INODES);
 636                 printf("%ld blocks\n", ZONES);
 637                 printf("Firstdatazone=%ld (%ld)\n", FIRSTZONE, NORM_FIRSTZONE);
 638                 printf("Zonesize=%d\n", BLOCK_SIZE << ZONESIZE);
 639                 printf("Maxsize=%ld\n", MAXSIZE);
 640                 printf("Filesystem state=%d\n", Super.s_state);
 641                 printf("namelen=%d\n\n", namelen);
 642         }
 643 }
 644
 645 struct minix_inode *get_inode(unsigned int nr)
 646 {
 647         struct minix_inode *inode;
 648
 649         if (!nr || nr > INODES)
 650                 return NULL;
 651         total++;
 652         inode = Inode + nr;
 653         if (!inode_count[nr]) {
 654                 if (!inode_in_use(nr)) {
 655                         printf("Inode %d marked not used, but used for file '", nr);
 656                         print_current_name();
 657                         printf("'\n");
 658                         if (repair) {
 659                                 if (ask("Mark in use", 1))
 660                                         mark_inode(nr);
 661                         } else {
 662                                 errors_uncorrected = 1;
 663                         }
 664                 }
 665                 if (S_ISDIR(inode->i_mode))
 666                         directory++;
 667                 else if (S_ISREG(inode->i_mode))
 668                         regular++;
 669                 else if (S_ISCHR(inode->i_mode))
 670                         chardev++;
 671                 else if (S_ISBLK(inode->i_mode))
 672                         blockdev++;
 673                 else if (S_ISLNK(inode->i_mode))
 674                         symlinks++;
 675                 else if (S_ISSOCK(inode->i_mode));
 676                 else if (S_ISFIFO(inode->i_mode));
 677                 else {
 678                         print_current_name();
 679                         printf(" has mode %05o\n", inode->i_mode);
 680                 }
 681
 682         } else
 683                 links++;
 684         if (!++inode_count[nr]) {
 685                 printf("Warning: inode count too big.\n");
 686                 inode_count[nr]--;
 687                 errors_uncorrected = 1;
 688         }
 689         return inode;
 690 }
 691
 692 #ifdef HAVE_MINIX2
 693 struct minix2_inode *get_inode2(unsigned int nr)
 694 {
 695         struct minix2_inode *inode;
 696
 697         if (!nr || nr > INODES)
 698                 return NULL;
 699         total++;
 700         inode = Inode2 + nr;
 701         if (!inode_count[nr]) {
 702                 if (!inode_in_use(nr)) {
 703                         printf("Inode %d marked not used, but used for file '", nr);
 704                         print_current_name();
 705                         printf("'\n");
 706                         if (repair) {
 707                                 if (ask("Mark in use", 1))
 708                                         mark_inode(nr);
 709                                 else
 710                                         errors_uncorrected = 1;
 711                         }
 712                 }
 713                 if (S_ISDIR(inode->i_mode))
 714                         directory++;
 715                 else if (S_ISREG(inode->i_mode))
 716                         regular++;
 717                 else if (S_ISCHR(inode->i_mode))
 718                         chardev++;
 719                 else if (S_ISBLK(inode->i_mode))
 720                         blockdev++;
 721                 else if (S_ISLNK(inode->i_mode))
 722                         symlinks++;
 723                 else if (S_ISSOCK(inode->i_mode));
 724                 else if (S_ISFIFO(inode->i_mode));
 725                 else {
 726                         print_current_name();
 727                         printf(" has mode %05o\n", inode->i_mode);
 728                 }
 729         } else
 730                 links++;
 731         if (!++inode_count[nr]) {
 732                 printf("Warning: inode count too big.\n");
 733                 inode_count[nr]--;
 734                 errors_uncorrected = 1;
 735         }
 736         return inode;
 737 }
 738 #endif
 739
 740 static void check_root(void)
 741 {
 742         struct minix_inode *inode = Inode + ROOT_INO;
 743
 744         if (!inode || !S_ISDIR(inode->i_mode))
 745                 die("root inode isn't a directory");
 746 }
 747
 748 #ifdef HAVE_MINIX2
 749 static void check_root2(void)
 750 {
 751         struct minix2_inode *inode = Inode2 + ROOT_INO;
 752
 753         if (!inode || !S_ISDIR(inode->i_mode))
 754                 die("root inode isn't a directory");
 755 }
 756 #endif
 757
 758 static int add_zone(unsigned short *znr, int *corrected)
 759 {
 760         int result;
 761         int block;
 762
 763         result = 0;
 764         block = check_zone_nr(znr, corrected);
 765         if (!block)
 766                 return 0;
 767         if (zone_count[block]) {
 768                 printf("Block has been used before. Now in file `");
 769                 print_current_name();
 770                 printf("'.");
 771                 if (ask("Clear", 1)) {
 772                         *znr = 0;
 773                         block = 0;
 774                         *corrected = 1;
 775                 }
 776         }
 777         if (!block)
 778                 return 0;
 779         if (!zone_in_use(block)) {
 780                 printf("Block %d in file `", block);
 781                 print_current_name();
 782                 printf("' is marked not in use.");
 783                 if (ask("Correct", 1))
 784                         mark_zone(block);
 785         }
 786         if (!++zone_count[block])
 787                 zone_count[block]--;
 788         return block;
 789 }
 790
 791 #ifdef HAVE_MINIX2
 792 static int add_zone2(unsigned int *znr, int *corrected)
 793 {
 794         int result;
 795         int block;
 796
 797         result = 0;
 798         block = check_zone_nr2(znr, corrected);
 799         if (!block)
 800                 return 0;
 801         if (zone_count[block]) {
 802                 printf("Block has been used before. Now in file `");
 803                 print_current_name();
 804                 printf("'.");
 805                 if (ask("Clear", 1)) {
 806                         *znr = 0;
 807                         block = 0;
 808                         *corrected = 1;
 809                 }
 810         }
 811         if (!block)
 812                 return 0;
 813         if (!zone_in_use(block)) {
 814                 printf("Block %d in file `", block);
 815                 print_current_name();
 816                 printf("' is marked not in use.");
 817                 if (ask("Correct", 1))
 818                         mark_zone(block);
 819         }
 820         if (!++zone_count[block])
 821                 zone_count[block]--;
 822         return block;
 823 }
 824 #endif
 825
 826 static void add_zone_ind(unsigned short *znr, int *corrected)
 827 {
 828         static char blk[BLOCK_SIZE];
 829         int i, chg_blk = 0;
 830         int block;
 831
 832         block = add_zone(znr, corrected);
 833         if (!block)
 834                 return;
 835         read_block(block, blk);
 836         for (i = 0; i < (BLOCK_SIZE >> 1); i++)
 837                 add_zone(i + (unsigned short *) blk, &chg_blk);
 838         if (chg_blk)
 839                 write_block(block, blk);
 840 }
 841
 842 #ifdef HAVE_MINIX2
 843 static void add_zone_ind2(unsigned int *znr, int *corrected)
 844 {
 845         static char blk[BLOCK_SIZE];
 846         int i, chg_blk = 0;
 847         int block;
 848
 849         block = add_zone2(znr, corrected);
 850         if (!block)
 851                 return;
 852         read_block(block, blk);
 853         for (i = 0; i < BLOCK_SIZE >> 2; i++)
 854                 add_zone2(i + (unsigned int *) blk, &chg_blk);
 855         if (chg_blk)
 856                 write_block(block, blk);
 857 }
 858 #endif
 859
 860 static void add_zone_dind(unsigned short *znr, int *corrected)
 861 {
 862         static char blk[BLOCK_SIZE];
 863         int i, blk_chg = 0;
 864         int block;
 865
 866         block = add_zone(znr, corrected);
 867         if (!block)
 868                 return;
 869         read_block(block, blk);
 870         for (i = 0; i < (BLOCK_SIZE >> 1); i++)
 871                 add_zone_ind(i + (unsigned short *) blk, &blk_chg);
 872         if (blk_chg)
 873                 write_block(block, blk);
 874 }
 875
 876 #ifdef HAVE_MINIX2
 877 static void add_zone_dind2(unsigned int *znr, int *corrected)
 878 {
 879         static char blk[BLOCK_SIZE];
 880         int i, blk_chg = 0;
 881         int block;
 882
 883         block = add_zone2(znr, corrected);
 884         if (!block)
 885                 return;
 886         read_block(block, blk);
 887         for (i = 0; i < BLOCK_SIZE >> 2; i++)
 888                 add_zone_ind2(i + (unsigned int *) blk, &blk_chg);
 889         if (blk_chg)
 890                 write_block(block, blk);
 891 }
 892
 893 static void add_zone_tind2(unsigned int *znr, int *corrected)
 894 {
 895         static char blk[BLOCK_SIZE];
 896         int i, blk_chg = 0;
 897         int block;
 898
 899         block = add_zone2(znr, corrected);
 900         if (!block)
 901                 return;
 902         read_block(block, blk);
 903         for (i = 0; i < BLOCK_SIZE >> 2; i++)
 904                 add_zone_dind2(i + (unsigned int *) blk, &blk_chg);
 905         if (blk_chg)
 906                 write_block(block, blk);
 907 }
 908 #endif
 909
 910 static void check_zones(unsigned int i)
 911 {
 912         struct minix_inode *inode;
 913
 914         if (!i || i > INODES)
 915                 return;
 916         if (inode_count[i] > 1)         /* have we counted this file already? */
 917                 return;
 918         inode = Inode + i;
 919         if (!S_ISDIR(inode->i_mode) && !S_ISREG(inode->i_mode) &&
 920                 !S_ISLNK(inode->i_mode)) return;
 921         for (i = 0; i < 7; i++)
 922                 add_zone(i + inode->i_zone, &changed);
 923         add_zone_ind(7 + inode->i_zone, &changed);
 924         add_zone_dind(8 + inode->i_zone, &changed);
 925 }
 926
 927 #ifdef HAVE_MINIX2
 928 static void check_zones2(unsigned int i)
 929 {
 930         struct minix2_inode *inode;
 931
 932         if (!i || i > INODES)
 933                 return;
 934         if (inode_count[i] > 1)         /* have we counted this file already? */
 935                 return;
 936         inode = Inode2 + i;
 937         if (!S_ISDIR(inode->i_mode) && !S_ISREG(inode->i_mode)
 938                 && !S_ISLNK(inode->i_mode))
 939                 return;
 940         for (i = 0; i < 7; i++)
 941                 add_zone2(i + inode->i_zone, &changed);
 942         add_zone_ind2(7 + inode->i_zone, &changed);
 943         add_zone_dind2(8 + inode->i_zone, &changed);
 944         add_zone_tind2(9 + inode->i_zone, &changed);
 945 }
 946 #endif
 947
 948 static void check_file(struct minix_inode *dir, unsigned int offset)
 949 {
 950         static char blk[BLOCK_SIZE];
 951         struct minix_inode *inode;
 952         int ino;
 953         char *name;
 954         int block;
 955
 956         block = map_block(dir, offset / BLOCK_SIZE);
 957         read_block(block, blk);
 958         name = blk + (offset % BLOCK_SIZE) + 2;
 959         ino = *(unsigned short *) (name - 2);
 960         if (ino > INODES) {
 961                 print_current_name();
 962                 printf(" contains a bad inode number for file '");
 963                 printf("%.*s'.", namelen, name);
 964                 if (ask(" Remove", 1)) {
 965                         *(unsigned short *) (name - 2) = 0;
 966                         write_block(block, blk);
 967                 }
 968                 ino = 0;
 969         }
 970         if (name_depth < MAX_DEPTH)
 971                 strncpy(name_list[name_depth], name, namelen);
 972         name_depth++;
 973         inode = get_inode(ino);
 974         name_depth--;
 975         if (!offset) {
 976                 if (!inode || strcmp(".", name)) {
 977                         print_current_name();
 978                         printf(": bad directory: '.' isn't first\n");
 979                         errors_uncorrected = 1;
 980                 } else
 981                         return;
 982         }
 983         if (offset == dirsize) {
 984                 if (!inode || strcmp("..", name)) {
 985                         print_current_name();
 986                         printf(": bad directory: '..' isn't second\n");
 987                         errors_uncorrected = 1;
 988                 } else
 989                         return;
 990         }
 991         if (!inode)
 992                 return;
 993         if (name_depth < MAX_DEPTH)
 994                 strncpy(name_list[name_depth], name, namelen);
 995         name_depth++;
 996         if (list) {
 997                 if (verbose)
 998                         printf("%6d %07o %3d ", ino, inode->i_mode, inode->i_nlinks);
 999                 print_current_name();
1000                 if (S_ISDIR(inode->i_mode))
1001                         printf(":\n");
1002                 else
1003                         printf("\n");
1004         }
1005         check_zones(ino);
1006         if (inode && S_ISDIR(inode->i_mode))
1007                 recursive_check(ino);
1008         name_depth--;
1009         return;
1010 }
1011
1012 #ifdef HAVE_MINIX2
1013 static void check_file2(struct minix2_inode *dir, unsigned int offset)
1014 {
1015         static char blk[BLOCK_SIZE];
1016         struct minix2_inode *inode;
1017         int ino;
1018         char *name;
1019         int block;
1020
1021         block = map_block2(dir, offset / BLOCK_SIZE);
1022         read_block(block, blk);
1023         name = blk + (offset % BLOCK_SIZE) + 2;
1024         ino = *(unsigned short *) (name - 2);
1025         if (ino > INODES) {
1026                 print_current_name();
1027                 printf(" contains a bad inode number for file '");
1028                 printf("%.*s'.", namelen, name);
1029                 if (ask(" Remove", 1)) {
1030                         *(unsigned short *) (name - 2) = 0;
1031                         write_block(block, blk);
1032                 }
1033                 ino = 0;
1034         }
1035         if (name_depth < MAX_DEPTH)
1036                 strncpy(name_list[name_depth], name, namelen);
1037         name_depth++;
1038         inode = get_inode2(ino);
1039         name_depth--;
1040         if (!offset) {
1041                 if (!inode || strcmp(".", name)) {
1042                         print_current_name();
1043                         printf(": bad directory: '.' isn't first\n");
1044                         errors_uncorrected = 1;
1045                 } else
1046                         return;
1047         }
1048         if (offset == dirsize) {
1049                 if (!inode || strcmp("..", name)) {
1050                         print_current_name();
1051                         printf(": bad directory: '..' isn't second\n");
1052                         errors_uncorrected = 1;
1053                 } else
1054                         return;
1055         }
1056         if (!inode)
1057                 return;
1058         name_depth++;
1059         if (list) {
1060                 if (verbose)
1061                         printf("%6d %07o %3d ", ino, inode->i_mode, inode->i_nlinks);
1062                 print_current_name();
1063                 if (S_ISDIR(inode->i_mode))
1064                         printf(":\n");
1065                 else
1066                         printf("\n");
1067         }
1068         check_zones2(ino);
1069         if (inode && S_ISDIR(inode->i_mode))
1070                 recursive_check2(ino);
1071         name_depth--;
1072         return;
1073 }
1074 #endif
1075
1076 static void recursive_check(unsigned int ino)
1077 {
1078         struct minix_inode *dir;
1079         unsigned int offset;
1080
1081         dir = Inode + ino;
1082         if (!S_ISDIR(dir->i_mode))
1083                 die("internal error");
1084         if (dir->i_size < 2 * dirsize) {
1085                 print_current_name();
1086                 printf(": bad directory: size<32");
1087                 errors_uncorrected = 1;
1088         }
1089         for (offset = 0; offset < dir->i_size; offset += dirsize)
1090                 check_file(dir, offset);
1091 }
1092
1093 #ifdef HAVE_MINIX2
1094 static void recursive_check2(unsigned int ino)
1095 {
1096         struct minix2_inode *dir;
1097         unsigned int offset;
1098
1099         dir = Inode2 + ino;
1100         if (!S_ISDIR(dir->i_mode))
1101                 die("internal error");
1102         if (dir->i_size < 2 * dirsize) {
1103                 print_current_name();
1104                 printf(": bad directory: size < 32");
1105                 errors_uncorrected = 1;
1106         }
1107         for (offset = 0; offset < dir->i_size; offset += dirsize)
1108                 check_file2(dir, offset);
1109 }
1110 #endif
1111
1112 static int bad_zone(int i)
1113 {
1114         char buffer[1024];
1115
1116         if (BLOCK_SIZE * i != lseek(IN, BLOCK_SIZE * i, SEEK_SET))
1117                 die("seek failed in bad_zone");
1118         return (BLOCK_SIZE != read(IN, buffer, BLOCK_SIZE));
1119 }
1120
1121 static void check_counts(void)
1122 {
1123         int i;
1124
1125         for (i = 1; i <= INODES; i++) {
1126                 if (!inode_in_use(i) && Inode[i].i_mode && warn_mode) {
1127                         printf("Inode %d mode not cleared.", i);
1128                         if (ask("Clear", 1)) {
1129                                 Inode[i].i_mode = 0;
1130                                 changed = 1;
1131                         }
1132                 }
1133                 if (!inode_count[i]) {
1134                         if (!inode_in_use(i))
1135                                 continue;
1136                         printf("Inode %d not used, marked used in the bitmap.", i);
1137                         if (ask("Clear", 1))
1138                                 unmark_inode(i);
1139                         continue;
1140                 }
1141                 if (!inode_in_use(i)) {
1142                         printf("Inode %d used, marked unused in the bitmap.", i);
1143                         if (ask("Set", 1))
1144                                 mark_inode(i);
1145                 }
1146                 if (Inode[i].i_nlinks != inode_count[i]) {
1147                         printf("Inode %d (mode = %07o), i_nlinks=%d, counted=%d.",
1148                                    i, Inode[i].i_mode, Inode[i].i_nlinks, inode_count[i]);
1149                         if (ask("Set i_nlinks to count", 1)) {
1150                                 Inode[i].i_nlinks = inode_count[i];
1151                                 changed = 1;
1152                         }
1153                 }
1154         }
1155         for (i = FIRSTZONE; i < ZONES; i++) {
1156                 if (zone_in_use(i) == zone_count[i])
1157                         continue;
1158                 if (!zone_count[i]) {
1159                         if (bad_zone(i))
1160                                 continue;
1161                         printf("Zone %d: marked in use, no file uses it.", i);
1162                         if (ask("Unmark", 1))
1163                                 unmark_zone(i);
1164                         continue;
1165                 }
1166                 printf("Zone %d: %sin use, counted=%d\n",
1167                            i, zone_in_use(i) ? "" : "not ", zone_count[i]);
1168         }
1169 }
1170
1171 #ifdef HAVE_MINIX2
1172 static void check_counts2(void)
1173 {
1174         int i;
1175
1176         for (i = 1; i <= INODES; i++) {
1177                 if (!inode_in_use(i) && Inode2[i].i_mode && warn_mode) {
1178                         printf("Inode %d mode not cleared.", i);
1179                         if (ask("Clear", 1)) {
1180                                 Inode2[i].i_mode = 0;
1181                                 changed = 1;
1182                         }
1183                 }
1184                 if (!inode_count[i]) {
1185                         if (!inode_in_use(i))
1186                                 continue;
1187                         printf("Inode %d not used, marked used in the bitmap.", i);
1188                         if (ask("Clear", 1))
1189                                 unmark_inode(i);
1190                         continue;
1191                 }
1192                 if (!inode_in_use(i)) {
1193                         printf("Inode %d used, marked unused in the bitmap.", i);
1194                         if (ask("Set", 1))
1195                                 mark_inode(i);
1196                 }
1197                 if (Inode2[i].i_nlinks != inode_count[i]) {
1198                         printf("Inode %d (mode = %07o), i_nlinks=%d, counted=%d.",
1199                                    i, Inode2[i].i_mode, Inode2[i].i_nlinks,
1200                                    inode_count[i]);
1201                         if (ask("Set i_nlinks to count", 1)) {
1202                                 Inode2[i].i_nlinks = inode_count[i];
1203                                 changed = 1;
1204                         }
1205                 }
1206         }
1207         for (i = FIRSTZONE; i < ZONES; i++) {
1208                 if (zone_in_use(i) == zone_count[i])
1209                         continue;
1210                 if (!zone_count[i]) {
1211                         if (bad_zone(i))
1212                                 continue;
1213                         printf("Zone %d: marked in use, no file uses it.", i);
1214                         if (ask("Unmark", 1))
1215                                 unmark_zone(i);
1216                         continue;
1217                 }
1218                 printf("Zone %d: %sin use, counted=%d\n",
1219                            i, zone_in_use(i) ? "" : "not ", zone_count[i]);
1220         }
1221 }
1222 #endif
1223
1224 static void check(void)
1225 {
1226         memset(inode_count, 0, (INODES + 1) * sizeof(*inode_count));
1227         memset(zone_count, 0, ZONES * sizeof(*zone_count));
1228         check_zones(ROOT_INO);
1229         recursive_check(ROOT_INO);
1230         check_counts();
1231 }
1232
1233 #ifdef HAVE_MINIX2
1234 static void check2(void)
1235 {
1236         memset(inode_count, 0, (INODES + 1) * sizeof(*inode_count));
1237         memset(zone_count, 0, ZONES * sizeof(*zone_count));
1238         check_zones2(ROOT_INO);
1239         recursive_check2(ROOT_INO);
1240         check_counts2();
1241 }
1242 #endif
1243
1244 /* Wed Feb  9 15:17:06 MST 2000 */
1245 /* dynamically allocate name_list (instead of making it static) */
1246 static void alloc_name_list(void)
1247 {
1248         int i;
1249
1250         name_list = malloc(sizeof(char *) * MAX_DEPTH);
1251         if (!name_list) {
1252                 fprintf(stderr,"fsck_minix: name_list: %s\n", strerror(errno));
1253                 exit(1);
1254         }
1255         for (i = 0; i < MAX_DEPTH; i++) {
1256                 name_list[i] = malloc(sizeof(char) * PATH_MAX + 1);
1257                 if (!name_list[i]) {
1258                         fprintf(stderr,"fsck_minix: name_list: %s\n", strerror(errno));
1259                         exit(1);
1260                 }
1261         }
1262 }
1263
1264 /* execute this atexit() to deallocate name_list[] */
1265 /* piptigger was here */
1266 static void free_name_list(void)
1267 {
1268         int i;
1269
1270         if (name_list) {
1271                 for (i = 0; i < MAX_DEPTH; i++) {
1272                         if (name_list[i]) {
1273                                 free(name_list[i]);
1274                         }
1275                 }
1276                 free(name_list);
1277         }
1278 }
1279
1280 extern int fsck_minix_main(int argc, char **argv)
1281 {
1282         struct termios tmp;
1283         int count;
1284         int retcode = 0;
1285
1286         alloc_name_list();
1287         atexit(free_name_list);
1288
1289         if (argc && *argv)
1290                 program_name = *argv;
1291         if (INODE_SIZE * MINIX_INODES_PER_BLOCK != BLOCK_SIZE)
1292                 die("bad inode size");
1293 #ifdef HAVE_MINIX2
1294         if (INODE_SIZE2 * MINIX2_INODES_PER_BLOCK != BLOCK_SIZE)
1295                 die("bad v2 inode size");
1296 #endif
1297         while (argc-- > 1) {
1298                 argv++;
1299                 if (argv[0][0] != '-') {
1300                         if (device_name)
1301                                 show_usage();
1302                         else
1303                                 device_name = argv[0];
1304                 } else
1305                         while (*++argv[0])
1306                                 switch (argv[0][0]) {
1307                                 case 'l':
1308                                         list = 1;
1309                                         break;
1310                                 case 'a':
1311                                         automatic = 1;
1312                                         repair = 1;
1313                                         break;
1314                                 case 'r':
1315                                         automatic = 0;
1316                                         repair = 1;
1317                                         break;
1318                                 case 'v':
1319                                         verbose = 1;
1320                                         break;
1321                                 case 's':
1322                                         show = 1;
1323                                         break;
1324                                 case 'm':
1325                                         warn_mode = 1;
1326                                         break;
1327                                 case 'f':
1328                                         force = 1;
1329                                         break;
1330                                 default:
1331                                         show_usage();
1332                                 }
1333         }
1334         if (!device_name)
1335                 show_usage();
1336         check_mount();                          /* trying to check a mounted filesystem? */
1337         if (repair && !automatic) {
1338                 if (!isatty(0) || !isatty(1))
1339                         die("need terminal for interactive repairs");
1340         }
1341         IN = open(device_name, repair ? O_RDWR : O_RDONLY);
1342         if (IN < 0)
1343                 die("unable to open '%s'");
1344         for (count = 0; count < 3; count++)
1345                 sync();
1346         read_superblock();
1347
1348         /*
1349          * Determine whether or not we should continue with the checking.
1350          * This is based on the status of the filesystem valid and error
1351          * flags and whether or not the -f switch was specified on the
1352          * command line.
1353          */
1354         printf("%s, %s\n", program_name, program_version);
1355         if (!(Super.s_state & MINIX_ERROR_FS) &&
1356                 (Super.s_state & MINIX_VALID_FS) && !force) {
1357                 if (repair)
1358                         printf("%s is clean, no check.\n", device_name);
1359                 return retcode;
1360         } else if (force)
1361                 printf("Forcing filesystem check on %s.\n", device_name);
1362         else if (repair)
1363                 printf("Filesystem on %s is dirty, needs checking.\n",
1364                            device_name);
1365
1366         read_tables();
1367
1368         if (repair && !automatic) {
1369                 tcgetattr(0, &termios);
1370                 tmp = termios;
1371                 tmp.c_lflag &= ~(ICANON | ECHO);
1372                 tcsetattr(0, TCSANOW, &tmp);
1373                 termios_set = 1;
1374         }
1375 #if HAVE_MINIX2
1376         if (version2) {
1377                 check_root2();
1378                 check2();
1379         } else
1380 #endif
1381         {
1382                 check_root();
1383                 check();
1384         }
1385         if (verbose) {
1386                 int i, free;
1387
1388                 for (i = 1, free = 0; i <= INODES; i++)
1389                         if (!inode_in_use(i))
1390                                 free++;
1391                 printf("\n%6ld inodes used (%ld%%)\n", (INODES - free),
1392                            100 * (INODES - free) / INODES);
1393                 for (i = FIRSTZONE, free = 0; i < ZONES; i++)
1394                         if (!zone_in_use(i))
1395                                 free++;
1396                 printf("%6ld zones used (%ld%%)\n", (ZONES - free),
1397                            100 * (ZONES - free) / ZONES);
1398                 printf("\n%6d regular files\n"
1399                            "%6d directories\n"
1400                            "%6d character device files\n"
1401                            "%6d block device files\n"
1402                            "%6d links\n"
1403                            "%6d symbolic links\n"
1404                            "------\n"
1405                            "%6d files\n",
1406                            regular, directory, chardev, blockdev,
1407                            links - 2 * directory + 1, symlinks,
1408                            total - 2 * directory + 1);
1409         }
1410         if (changed) {
1411                 write_tables();
1412                 printf("----------------------------\n"
1413                            "FILE SYSTEM HAS BEEN CHANGED\n"
1414                            "----------------------------\n");
1415                 for (count = 0; count < 3; count++)
1416                         sync();
1417         } else if (repair)
1418                 write_super_block();
1419
1420         if (repair && !automatic)
1421                 tcsetattr(0, TCSANOW, &termios);
1422
1423         if (changed)
1424                 retcode += 3;
1425         if (errors_uncorrected)
1426                 retcode += 4;
1427         return retcode;
1428 }