e2fsck/unix.c

   1 /*
   2  * unix.c - The unix-specific code for e2fsck
   3  *
   4  * Copyright (C) 1993, 1994, 1995, 1996, 1997 Theodore Ts'o.
   5  *
   6  * %Begin-Header%
   7  * This file may be redistributed under the terms of the GNU Public
   8  * License.
   9  * %End-Header%
  10  */
  11
  12 #define _XOPEN_SOURCE 600 /* for inclusion of sa_handler in Solaris */
  13
  14 #include "config.h"
  15 #include <stdio.h>
  16 #ifdef HAVE_STDLIB_H
  17 #include <stdlib.h>
  18 #endif
  19 #include <string.h>
  20 #include <fcntl.h>
  21 #include <ctype.h>
  22 #include <time.h>
  23 #ifdef HAVE_SIGNAL_H
  24 #include <signal.h>
  25 #endif
  26 #ifdef HAVE_GETOPT_H
  27 #include <getopt.h>
  28 #else
  29 extern char *optarg;
  30 extern int optind;
  31 #endif
  32 #include <unistd.h>
  33 #ifdef HAVE_ERRNO_H
  34 #include <errno.h>
  35 #endif
  36 #ifdef HAVE_SYS_IOCTL_H
  37 #include <sys/ioctl.h>
  38 #endif
  39 #ifdef HAVE_MALLOC_H
  40 #include <malloc.h>
  41 #endif
  42 #ifdef HAVE_SYS_TYPES_H
  43 #include <sys/types.h>
  44 #endif
  45 #ifdef HAVE_DIRENT_H
  46 #include <dirent.h>
  47 #endif
  48 #include <libgen.h>
  49
  50 #include "e2p/e2p.h"
  51 #include "et/com_err.h"
  52 #include "e2p/e2p.h"
  53 #include "uuid/uuid.h"
  54 #include "support/plausible.h"
  55 #include "support/devname.h"
  56 #include "e2fsck.h"
  57 #include "problem.h"
  58 #include "jfs_user.h"
  59 #include "../version.h"
  60
  61 /* Command line options */
  62 static int cflag;               /* check disk */
  63 static int show_version_only;
  64 static int verbose;
  65
  66 static int replace_bad_blocks;
  67 static int keep_bad_blocks;
  68 static char *bad_blocks_file;
  69
  70 e2fsck_t e2fsck_global_ctx;     /* Try your very best not to use this! */
  71
  72 #ifdef CONFIG_JBD_DEBUG         /* Enabled by configure --enable-jbd-debug */
  73 int journal_enable_debug = -1;
  74 #endif
  75
  76 static void usage(e2fsck_t ctx)
  77 {
  78         fprintf(stderr,
  79                 _("Usage: %s [-pamnyrcdfktvDFV] [-b superblock] [-B blocksize]\n"
  80                 "\t\t[-l|-L bad_blocks_file] [-C fd] [-j external_journal]\n"
  81                 "\t\t[-E extended-options] [-z undo_file] device\n"),
  82                 ctx->program_name ? ctx->program_name : "e2fsck");
  83
  84         fprintf(stderr, "%s", _("\nEmergency help:\n"
  85                 " -p                   Automatic repair (no questions)\n"
  86 #ifdef HAVE_PTHREAD
  87                 " -m                   multiple threads to speedup fsck\n"
  88 #endif
  89                 " -n                   Make no changes to the filesystem\n"
  90                 " -y                   Assume \"yes\" to all questions\n"
  91                 " -c                   Check for bad blocks and add them to the badblock list\n"
  92                 " -f                   Force checking even if filesystem is marked clean\n"));
  93         fprintf(stderr, "%s", _(""
  94                 " -v                   Be verbose\n"
  95                 " -b superblock        Use alternative superblock\n"
  96                 " -B blocksize         Force blocksize when looking for superblock\n"
  97                 " -j external_journal  Set location of the external journal\n"
  98                 " -l bad_blocks_file   Add to badblocks list\n"
  99                 " -L bad_blocks_file   Set badblocks list\n"
 100                 " -z undo_file         Create an undo file\n"
 101                 ));
 102
 103         exit(FSCK_USAGE);
 104 }
 105
 106 static void show_stats(e2fsck_t ctx)
 107 {
 108         ext2_filsys fs = ctx->fs;
 109         ext2_ino_t inodes, inodes_used;
 110         blk64_t blocks, blocks_used;
 111         unsigned int dir_links;
 112         unsigned int num_files, num_links;
 113         __u32 *mask, m;
 114         int frag_percent_file = 0, frag_percent_dir = 0, frag_percent_total = 0;
 115         int i, j, printed = 0;
 116
 117         dir_links = 2 * ctx->fs_directory_count - 1;
 118         num_files = ctx->fs_total_count - dir_links;
 119         num_links = ctx->fs_links_count - dir_links;
 120         inodes = fs->super->s_inodes_count;
 121         inodes_used = (fs->super->s_inodes_count -
 122                        fs->super->s_free_inodes_count);
 123         blocks = ext2fs_blocks_count(fs->super);
 124         blocks_used = (ext2fs_blocks_count(fs->super) -
 125                        ext2fs_free_blocks_count(fs->super));
 126
 127         if (inodes_used > 0) {
 128                 frag_percent_file = (10000 * ctx->fs_fragmented) / inodes_used;
 129                 frag_percent_file = (frag_percent_file + 5) / 10;
 130
 131                 frag_percent_dir = (10000 * ctx->fs_fragmented_dir) / inodes_used;
 132                 frag_percent_dir = (frag_percent_dir + 5) / 10;
 133
 134                 frag_percent_total = ((10000 * (ctx->fs_fragmented +
 135                                                 ctx->fs_fragmented_dir))
 136                                       / inodes_used);
 137                 frag_percent_total = (frag_percent_total + 5) / 10;
 138         }
 139
 140         if (!verbose) {
 141                 log_out(ctx, _("%s: %u/%u files (%0d.%d%% non-contiguous), "
 142                                "%llu/%llu blocks\n"),
 143                         ctx->device_name, inodes_used, inodes,
 144                         frag_percent_total / 10, frag_percent_total % 10,
 145                         (unsigned long long) blocks_used,
 146                         (unsigned long long) blocks);
 147                 return;
 148         }
 149         profile_get_boolean(ctx->profile, "options", "report_features", 0, 0,
 150                             &i);
 151         if (verbose && i) {
 152                 log_out(ctx, "\nFilesystem features:");
 153                 mask = &ctx->fs->super->s_feature_compat;
 154                 for (i = 0; i < 3; i++, mask++) {
 155                         for (j = 0, m = 1; j < 32; j++, m <<= 1) {
 156                                 if (*mask & m) {
 157                                         log_out(ctx, " %s",
 158                                                 e2p_feature2string(i, m));
 159                                         printed++;
 160                                 }
 161                         }
 162                 }
 163                 if (printed == 0)
 164                         log_out(ctx, " (none)");
 165                 log_out(ctx, "\n");
 166         }
 167
 168         log_out(ctx, P_("\n%12u inode used (%2.2f%%, out of %u)\n",
 169                         "\n%12u inodes used (%2.2f%%, out of %u)\n",
 170                         inodes_used), inodes_used,
 171                 100.0 * inodes_used / inodes, inodes);
 172         log_out(ctx, P_("%12u non-contiguous file (%0d.%d%%)\n",
 173                         "%12u non-contiguous files (%0d.%d%%)\n",
 174                         ctx->fs_fragmented),
 175                 ctx->fs_fragmented, frag_percent_file / 10,
 176                 frag_percent_file % 10);
 177         log_out(ctx, P_("%12u non-contiguous directory (%0d.%d%%)\n",
 178                         "%12u non-contiguous directories (%0d.%d%%)\n",
 179                         ctx->fs_fragmented_dir),
 180                 ctx->fs_fragmented_dir, frag_percent_dir / 10,
 181                 frag_percent_dir % 10);
 182         log_out(ctx, _("             # of inodes with ind/dind/tind blocks: "
 183                        "%u/%u/%u\n"),
 184                 ctx->fs_ind_count, ctx->fs_dind_count, ctx->fs_tind_count);
 185
 186         for (j=MAX_EXTENT_DEPTH_COUNT-1; j >=0; j--)
 187                 if (ctx->extent_depth_count[j])
 188                         break;
 189         if (++j) {
 190                 log_out(ctx, "%s", _("             Extent depth histogram: "));
 191                 for (i=0; i < j; i++) {
 192                         if (i)
 193                                 fputc('/', stdout);
 194                         log_out(ctx, "%u", ctx->extent_depth_count[i]);
 195                 }
 196                 log_out(ctx, "\n");
 197         }
 198
 199         log_out(ctx, P_("%12llu block used (%2.2f%%, out of %llu)\n",
 200                         "%12llu blocks used (%2.2f%%, out of %llu)\n",
 201                    blocks_used),
 202                 (unsigned long long) blocks_used, 100.0 * blocks_used / blocks,
 203                 (unsigned long long) blocks);
 204         log_out(ctx, P_("%12u bad block\n", "%12u bad blocks\n",
 205                         ctx->fs_badblocks_count), ctx->fs_badblocks_count);
 206         log_out(ctx, P_("%12u large file\n", "%12u large files\n",
 207                         ctx->large_files), ctx->large_files);
 208         log_out(ctx, P_("\n%12u regular file\n", "\n%12u regular files\n",
 209                         ctx->fs_regular_count), ctx->fs_regular_count);
 210         log_out(ctx, P_("%12u directory\n", "%12u directories\n",
 211                         ctx->fs_directory_count), ctx->fs_directory_count);
 212         log_out(ctx, P_("%12u character device file\n",
 213                         "%12u character device files\n", ctx->fs_chardev_count),
 214                 ctx->fs_chardev_count);
 215         log_out(ctx, P_("%12u block device file\n", "%12u block device files\n",
 216                         ctx->fs_blockdev_count), ctx->fs_blockdev_count);
 217         log_out(ctx, P_("%12u fifo\n", "%12u fifos\n", ctx->fs_fifo_count),
 218                 ctx->fs_fifo_count);
 219         log_out(ctx, P_("%12u link\n", "%12u links\n", num_links),
 220                 ctx->fs_links_count - dir_links);
 221         log_out(ctx, P_("%12u symbolic link", "%12u symbolic links",
 222                         ctx->fs_symlinks_count), ctx->fs_symlinks_count);
 223         log_out(ctx, P_(" (%u fast symbolic link)\n",
 224                         " (%u fast symbolic links)\n",
 225                         ctx->fs_fast_symlinks_count),
 226                 ctx->fs_fast_symlinks_count);
 227         log_out(ctx, P_("%12u socket\n", "%12u sockets\n",
 228                         ctx->fs_sockets_count),
 229                 ctx->fs_sockets_count);
 230         log_out(ctx, "------------\n");
 231         log_out(ctx, P_("%12u file\n", "%12u files\n", num_files),
 232                 num_files);
 233 }
 234
 235 static void check_mount(e2fsck_t ctx)
 236 {
 237         errcode_t       retval;
 238         int             cont;
 239
 240         retval = ext2fs_check_if_mounted(ctx->filesystem_name,
 241                                          &ctx->mount_flags);
 242         if (retval) {
 243                 com_err("ext2fs_check_if_mount", retval,
 244                         _("while determining whether %s is mounted."),
 245                         ctx->filesystem_name);
 246                 return;
 247         }
 248
 249         /*
 250          * If the filesystem isn't mounted, or it's the root
 251          * filesystem and it's mounted read-only, and we're not doing
 252          * a read/write check, then everything's fine.
 253          */
 254         if ((!(ctx->mount_flags & (EXT2_MF_MOUNTED | EXT2_MF_BUSY))) ||
 255             ((ctx->mount_flags & EXT2_MF_ISROOT) &&
 256              (ctx->mount_flags & EXT2_MF_READONLY) &&
 257              !(ctx->options & E2F_OPT_WRITECHECK)))
 258                 return;
 259
 260         if (((ctx->options & E2F_OPT_READONLY) ||
 261              ((ctx->options & E2F_OPT_FORCE) &&
 262               (ctx->mount_flags & EXT2_MF_READONLY))) &&
 263             !(ctx->options & E2F_OPT_WRITECHECK)) {
 264                 if (ctx->mount_flags & EXT2_MF_MOUNTED)
 265                         log_out(ctx, _("Warning!  %s is mounted.\n"),
 266                                         ctx->filesystem_name);
 267                 else
 268                         log_out(ctx, _("Warning!  %s is in use.\n"),
 269                                         ctx->filesystem_name);
 270                 return;
 271         }
 272
 273         if (ctx->mount_flags & EXT2_MF_MOUNTED)
 274                 log_out(ctx, _("%s is mounted.\n"), ctx->filesystem_name);
 275         else
 276                 log_out(ctx, _("%s is in use.\n"), ctx->filesystem_name);
 277         if (!ctx->interactive || ctx->mount_flags & EXT2_MF_BUSY)
 278                 fatal_error(ctx, _("Cannot continue, aborting.\n\n"));
 279         puts("\007\007\007\007");
 280         log_out(ctx, "%s", _("\n\nWARNING!!!  "
 281                        "The filesystem is mounted.   "
 282                        "If you continue you ***WILL***\n"
 283                        "cause ***SEVERE*** filesystem damage.\n\n"));
 284         puts("\007\007\007");
 285         cont = ask_yn(ctx, _("Do you really want to continue"), 0);
 286         if (!cont) {
 287                 printf("%s", _("check aborted.\n"));
 288                 exit (0);
 289         }
 290         return;
 291 }
 292
 293 static int is_on_batt(void)
 294 {
 295         FILE    *f;
 296         DIR     *d;
 297         char    tmp[80], tmp2[80], fname[NAME_MAX+30];
 298         unsigned int    acflag;
 299         struct dirent*  de;
 300
 301         f = fopen("/sys/class/power_supply/AC/online", "r");
 302         if (f) {
 303                 if (fscanf(f, "%u\n", &acflag) == 1) {
 304                         fclose(f);
 305                         return (!acflag);
 306                 }
 307                 fclose(f);
 308         }
 309         f = fopen("/proc/apm", "r");
 310         if (f) {
 311                 if (fscanf(f, "%79s %79s %79s %x", tmp, tmp, tmp, &acflag) != 4)
 312                         acflag = 1;
 313                 fclose(f);
 314                 return (acflag != 1);
 315         }
 316         d = opendir("/proc/acpi/ac_adapter");
 317         if (d) {
 318                 while ((de=readdir(d)) != NULL) {
 319                         if (!strncmp(".", de->d_name, 1))
 320                                 continue;
 321                         snprintf(fname, sizeof(fname),
 322                                  "/proc/acpi/ac_adapter/%s/state",
 323                                  de->d_name);
 324                         f = fopen(fname, "r");
 325                         if (!f)
 326                                 continue;
 327                         if (fscanf(f, "%79s %79s", tmp2, tmp) != 2)
 328                                 tmp[0] = 0;
 329                         fclose(f);
 330                         if (strncmp(tmp, "off-line", 8) == 0) {
 331                                 closedir(d);
 332                                 return 1;
 333                         }
 334                 }
 335                 closedir(d);
 336         }
 337         return 0;
 338 }
 339
 340 /*
 341  * This routine checks to see if a filesystem can be skipped; if so,
 342  * it will exit with E2FSCK_OK.  Under some conditions it will print a
 343  * message explaining why a check is being forced.
 344  */
 345 static void check_if_skip(e2fsck_t ctx)
 346 {
 347         ext2_filsys fs = ctx->fs;
 348         struct problem_context pctx;
 349         const char *reason = NULL;
 350         unsigned int reason_arg = 0;
 351         long next_check;
 352         int batt = is_on_batt();
 353         int defer_check_on_battery;
 354         int broken_system_clock;
 355         time_t lastcheck;
 356
 357         if (ctx->flags & E2F_FLAG_PROBLEMS_FIXED)
 358                 return;
 359
 360         profile_get_boolean(ctx->profile, "options", "broken_system_clock",
 361                             0, 0, &broken_system_clock);
 362         if (ctx->flags & E2F_FLAG_TIME_INSANE)
 363                 broken_system_clock = 1;
 364         profile_get_boolean(ctx->profile, "options",
 365                             "defer_check_on_battery", 0, 1,
 366                             &defer_check_on_battery);
 367         if (!defer_check_on_battery)
 368                 batt = 0;
 369
 370         if ((ctx->options & E2F_OPT_FORCE) || bad_blocks_file || cflag)
 371                 return;
 372
 373         if (ctx->options & E2F_OPT_JOURNAL_ONLY)
 374                 goto skip;
 375
 376         lastcheck = fs->super->s_lastcheck;
 377         if (lastcheck > ctx->now)
 378                 lastcheck -= ctx->time_fudge;
 379         if ((fs->super->s_state & EXT2_ERROR_FS) ||
 380             !ext2fs_test_valid(fs))
 381                 reason = _(" contains a file system with errors");
 382         else if ((fs->super->s_state & EXT2_VALID_FS) == 0)
 383                 reason = _(" was not cleanly unmounted");
 384         else if (check_backup_super_block(ctx))
 385                 reason = _(" primary superblock features different from backup");
 386         else if ((fs->super->s_max_mnt_count > 0) &&
 387                  (fs->super->s_mnt_count >=
 388                   (unsigned) fs->super->s_max_mnt_count)) {
 389                 reason = _(" has been mounted %u times without being checked");
 390                 reason_arg = fs->super->s_mnt_count;
 391                 if (batt && (fs->super->s_mnt_count <
 392                              (unsigned) fs->super->s_max_mnt_count*2))
 393                         reason = 0;
 394         } else if (!broken_system_clock && fs->super->s_checkinterval &&
 395                    (ctx->now < lastcheck)) {
 396                 reason = _(" has filesystem last checked time in the future");
 397                 if (batt)
 398                         reason = 0;
 399         } else if (!broken_system_clock && fs->super->s_checkinterval &&
 400                    ((ctx->now - lastcheck) >=
 401                     ((time_t) fs->super->s_checkinterval))) {
 402                 reason = _(" has gone %u days without being checked");
 403                 reason_arg = (ctx->now - fs->super->s_lastcheck)/(3600*24);
 404                 if (batt && ((ctx->now - fs->super->s_lastcheck) <
 405                              fs->super->s_checkinterval*2))
 406                         reason = 0;
 407         } else if (broken_system_clock && fs->super->s_checkinterval) {
 408                 log_out(ctx, "%s: ", ctx->device_name);
 409                 log_out(ctx, "%s",
 410                         _("ignoring check interval, broken_system_clock set\n"));
 411         }
 412
 413         if (reason) {
 414                 log_out(ctx, "%s", ctx->device_name);
 415                 log_out(ctx, reason, reason_arg);
 416                 log_out(ctx, "%s", _(", check forced.\n"));
 417                 return;
 418         }
 419
 420         /*
 421          * Update the global counts from the block group counts.  This
 422          * is needed since modern kernels don't update the global
 423          * counts so as to avoid locking the entire file system.  So
 424          * if the filesystem is not unmounted cleanly, the global
 425          * counts may not be accurate.  Update them here if we can,
 426          * for the benefit of users who might examine the file system
 427          * using dumpe2fs.  (This is for cosmetic reasons only.)
 428          */
 429         clear_problem_context(&pctx);
 430         pctx.ino = fs->super->s_free_inodes_count;
 431         pctx.ino2 = ctx->free_inodes;
 432         if ((pctx.ino != pctx.ino2) &&
 433             !(ctx->options & E2F_OPT_READONLY) &&
 434             fix_problem(ctx, PR_0_FREE_INODE_COUNT, &pctx)) {
 435                 fs->super->s_free_inodes_count = ctx->free_inodes;
 436                 ext2fs_mark_super_dirty(fs);
 437         }
 438         clear_problem_context(&pctx);
 439         pctx.blk = ext2fs_free_blocks_count(fs->super);
 440         pctx.blk2 = ctx->free_blocks;
 441         if ((pctx.blk != pctx.blk2) &&
 442             !(ctx->options & E2F_OPT_READONLY) &&
 443             fix_problem(ctx, PR_0_FREE_BLOCK_COUNT, &pctx)) {
 444                 ext2fs_free_blocks_count_set(fs->super, ctx->free_blocks);
 445                 ext2fs_mark_super_dirty(fs);
 446         }
 447
 448         /* Print the summary message when we're skipping a full check */
 449         log_out(ctx, _("%s: clean, %u/%u files, %llu/%llu blocks"),
 450                 ctx->device_name,
 451                 fs->super->s_inodes_count - fs->super->s_free_inodes_count,
 452                 fs->super->s_inodes_count,
 453                 (unsigned long long) ext2fs_blocks_count(fs->super) -
 454                 ext2fs_free_blocks_count(fs->super),
 455                 (unsigned long long) ext2fs_blocks_count(fs->super));
 456         next_check = 100000;
 457         if (fs->super->s_max_mnt_count > 0) {
 458                 next_check = fs->super->s_max_mnt_count - fs->super->s_mnt_count;
 459                 if (next_check <= 0)
 460                         next_check = 1;
 461         }
 462         if (!broken_system_clock && fs->super->s_checkinterval &&
 463             ((ctx->now - fs->super->s_lastcheck) >= fs->super->s_checkinterval))
 464                 next_check = 1;
 465         if (next_check <= 5) {
 466                 if (next_check == 1) {
 467                         if (batt)
 468                                 log_out(ctx, "%s",
 469                                         _(" (check deferred; on battery)"));
 470                         else
 471                                 log_out(ctx, "%s",
 472                                         _(" (check after next mount)"));
 473                 } else
 474                         log_out(ctx, _(" (check in %ld mounts)"),
 475                                 next_check);
 476         }
 477         log_out(ctx, "\n");
 478 skip:
 479         ext2fs_close_free(&ctx->fs);
 480         e2fsck_free_context(ctx);
 481         exit(FSCK_OK);
 482 }
 483
 484 /*
 485  * For completion notice
 486  */
 487 struct percent_tbl {
 488         int     max_pass;
 489         int     table[32];
 490 };
 491 static struct percent_tbl e2fsck_tbl = {
 492         5, { 0, 70, 90, 92,  95, 100 }
 493 };
 494 static char bar[128], spaces[128];
 495
 496 static float calc_percent(struct percent_tbl *tbl, int pass, int curr,
 497                           int max)
 498 {
 499         float   percent;
 500
 501         if (pass <= 0)
 502                 return 0.0;
 503         if (pass > tbl->max_pass || max == 0)
 504                 return 100.0;
 505         percent = ((float) curr) / ((float) max);
 506         return ((percent * (tbl->table[pass] - tbl->table[pass-1]))
 507                 + tbl->table[pass-1]);
 508 }
 509
 510 void e2fsck_clear_progbar(e2fsck_t ctx)
 511 {
 512         if (!(ctx->flags & E2F_FLAG_PROG_BAR))
 513                 return;
 514
 515         printf("%s%s\r%s", ctx->start_meta, spaces + (sizeof(spaces) - 80),
 516                ctx->stop_meta);
 517         fflush(stdout);
 518         ctx->flags &= ~E2F_FLAG_PROG_BAR;
 519 }
 520
 521 int e2fsck_simple_progress(e2fsck_t ctx, const char *label, float percent,
 522                            unsigned int dpynum)
 523 {
 524         static const char spinner[] = "\\|/-";
 525         int     i;
 526         unsigned int    tick;
 527         struct timeval  tv;
 528         int dpywidth;
 529         int fixed_percent;
 530
 531         if (ctx->flags & E2F_FLAG_PROG_SUPPRESS)
 532                 return 0;
 533
 534         /*
 535          * Calculate the new progress position.  If the
 536          * percentage hasn't changed, then we skip out right
 537          * away.
 538          */
 539         fixed_percent = (int) ((10 * percent) + 0.5);
 540         if (ctx->progress_last_percent == fixed_percent)
 541                 return 0;
 542         ctx->progress_last_percent = fixed_percent;
 543
 544         /*
 545          * If we've already updated the spinner once within
 546          * the last 1/8th of a second, no point doing it
 547          * again.
 548          */
 549         gettimeofday(&tv, NULL);
 550         tick = (tv.tv_sec << 3) + (tv.tv_usec / (1000000 / 8));
 551         if ((tick == ctx->progress_last_time) &&
 552             (fixed_percent != 0) && (fixed_percent != 1000))
 553                 return 0;
 554         ctx->progress_last_time = tick;
 555
 556         /*
 557          * Advance the spinner, and note that the progress bar
 558          * will be on the screen
 559          */
 560         ctx->progress_pos = (ctx->progress_pos+1) & 3;
 561         ctx->flags |= E2F_FLAG_PROG_BAR;
 562
 563         dpywidth = 66 - strlen(label);
 564         dpywidth = 8 * (dpywidth / 8);
 565         if (dpynum)
 566                 dpywidth -= 8;
 567
 568         i = ((percent * dpywidth) + 50) / 100;
 569         printf("%s%s: |%s%s", ctx->start_meta, label,
 570                bar + (sizeof(bar) - (i+1)),
 571                spaces + (sizeof(spaces) - (dpywidth - i + 1)));
 572         if (fixed_percent == 1000)
 573                 fputc('|', stdout);
 574         else
 575                 fputc(spinner[ctx->progress_pos & 3], stdout);
 576         printf(" %4.1f%%  ", percent);
 577         if (dpynum)
 578                 printf("%u\r", dpynum);
 579         else
 580                 fputs(" \r", stdout);
 581         fputs(ctx->stop_meta, stdout);
 582
 583         if (fixed_percent == 1000)
 584                 e2fsck_clear_progbar(ctx);
 585         fflush(stdout);
 586
 587         return 0;
 588 }
 589
 590 static int e2fsck_update_progress(e2fsck_t ctx, int pass,
 591                                   unsigned long cur, unsigned long max)
 592 {
 593         char buf[1024];
 594         float percent;
 595
 596         if (pass == 0)
 597                 return 0;
 598
 599         if (ctx->progress_fd) {
 600                 snprintf(buf, sizeof(buf), "%d %lu %lu %s\n",
 601                          pass, cur, max, ctx->device_name);
 602                 write_all(ctx->progress_fd, buf, strlen(buf));
 603         } else {
 604                 percent = calc_percent(&e2fsck_tbl, pass, cur, max);
 605                 e2fsck_simple_progress(ctx, ctx->device_name,
 606                                        percent, 0);
 607         }
 608         return 0;
 609 }
 610
 611 #define PATH_SET "PATH=/sbin"
 612
 613 /*
 614  * Make sure 0,1,2 file descriptors are open, so that we don't open
 615  * the filesystem using the same file descriptor as stdout or stderr.
 616  */
 617 static void reserve_stdio_fds(void)
 618 {
 619         int     fd = 0;
 620
 621         while (fd <= 2) {
 622                 fd = open("/dev/null", O_RDWR);
 623                 if (fd < 0) {
 624                         fprintf(stderr, _("ERROR: Couldn't open "
 625                                 "/dev/null (%s)\n"),
 626                                 strerror(errno));
 627                         return;
 628                 }
 629         }
 630         (void) close(fd);
 631 }
 632
 633 #ifdef HAVE_SIGNAL_H
 634 static void signal_progress_on(int sig EXT2FS_ATTR((unused)))
 635 {
 636         e2fsck_t ctx = e2fsck_global_ctx;
 637
 638         if (!ctx)
 639                 return;
 640
 641         ctx->progress = e2fsck_update_progress;
 642 }
 643
 644 static void signal_progress_off(int sig EXT2FS_ATTR((unused)))
 645 {
 646         e2fsck_t ctx = e2fsck_global_ctx;
 647
 648         if (!ctx)
 649                 return;
 650
 651         e2fsck_clear_progbar(ctx);
 652         ctx->progress = 0;
 653 }
 654
 655 static void signal_cancel(int sig EXT2FS_ATTR((unused)))
 656 {
 657         e2fsck_t ctx = e2fsck_global_ctx;
 658
 659         if (!ctx)
 660                 exit(FSCK_CANCELED);
 661
 662         ctx->flags |= E2F_FLAG_CANCEL;
 663 }
 664 #endif
 665
 666 static void parse_extended_opts(e2fsck_t ctx, const char *opts)
 667 {
 668         char    *buf, *token, *next, *p, *arg;
 669         int     ea_ver;
 670         int     extended_usage = 0;
 671         unsigned long long reada_kb;
 672
 673         buf = string_copy(ctx, opts, 0);
 674         for (token = buf; token && *token; token = next) {
 675                 p = strchr(token, ',');
 676                 next = 0;
 677                 if (p) {
 678                         *p = 0;
 679                         next = p+1;
 680                 }
 681                 arg = strchr(token, '=');
 682                 if (arg) {
 683                         *arg = 0;
 684                         arg++;
 685                 }
 686                 if (strcmp(token, "ea_ver") == 0) {
 687                         if (!arg) {
 688                                 extended_usage++;
 689                                 continue;
 690                         }
 691                         ea_ver = strtoul(arg, &p, 0);
 692                         if (*p ||
 693                             ((ea_ver != 1) && (ea_ver != 2))) {
 694                                 fprintf(stderr, "%s",
 695                                         _("Invalid EA version.\n"));
 696                                 extended_usage++;
 697                                 continue;
 698                         }
 699                         ctx->ext_attr_ver = ea_ver;
 700                 } else if (strcmp(token, "readahead_kb") == 0) {
 701                         if (!arg) {
 702                                 extended_usage++;
 703                                 continue;
 704                         }
 705                         reada_kb = strtoull(arg, &p, 0);
 706                         if (*p) {
 707                                 fprintf(stderr, "%s",
 708                                         _("Invalid readahead buffer size.\n"));
 709                                 extended_usage++;
 710                                 continue;
 711                         }
 712                         ctx->readahead_kb = reada_kb;
 713                 } else if (strcmp(token, "fragcheck") == 0) {
 714                         ctx->options |= E2F_OPT_FRAGCHECK;
 715                         continue;
 716                 } else if (strcmp(token, "journal_only") == 0) {
 717                         if (arg) {
 718                                 extended_usage++;
 719                                 continue;
 720                         }
 721                         ctx->options |= E2F_OPT_JOURNAL_ONLY;
 722                 } else if (strcmp(token, "discard") == 0) {
 723                         ctx->options |= E2F_OPT_DISCARD;
 724                         continue;
 725                 } else if (strcmp(token, "nodiscard") == 0) {
 726                         ctx->options &= ~E2F_OPT_DISCARD;
 727                         continue;
 728                 } else if (strcmp(token, "optimize_extents") == 0) {
 729                         ctx->options &= ~E2F_OPT_NOOPT_EXTENTS;
 730                         continue;
 731                 } else if (strcmp(token, "no_optimize_extents") == 0) {
 732                         ctx->options |= E2F_OPT_NOOPT_EXTENTS;
 733                         continue;
 734                 } else if (strcmp(token, "inode_count_fullmap") == 0) {
 735                         ctx->options |= E2F_OPT_ICOUNT_FULLMAP;
 736                         continue;
 737                 } else if (strcmp(token, "no_inode_count_fullmap") == 0) {
 738                         ctx->options &= ~E2F_OPT_ICOUNT_FULLMAP;
 739                         continue;
 740                 } else if (strcmp(token, "log_filename") == 0) {
 741                         if (!arg)
 742                                 extended_usage++;
 743                         else
 744                                 ctx->log_fn = string_copy(ctx, arg, 0);
 745                         continue;
 746                 } else if (strcmp(token, "problem_log") == 0) {
 747                         if (!arg)
 748                                 extended_usage++;
 749                         else
 750                                 ctx->problem_log_fn = string_copy(ctx, arg, 0);
 751                         continue;
 752                 } else if (strcmp(token, "bmap2extent") == 0) {
 753                         ctx->options |= E2F_OPT_CONVERT_BMAP;
 754                         continue;
 755                 } else if (strcmp(token, "fixes_only") == 0) {
 756                         ctx->options |= E2F_OPT_FIXES_ONLY;
 757                         continue;
 758                 } else if (strcmp(token, "unshare_blocks") == 0) {
 759                         ctx->options |= E2F_OPT_UNSHARE_BLOCKS;
 760                         ctx->options |= E2F_OPT_FORCE;
 761                         continue;
 762                 } else if (strcmp(token, "check_encoding") == 0) {
 763                         ctx->options |= E2F_OPT_CHECK_ENCODING;
 764                         continue;
 765 #ifdef CONFIG_DEVELOPER_FEATURES
 766                 } else if (strcmp(token, "clear_all_uninit_bits") == 0) {
 767                         ctx->options |= E2F_OPT_CLEAR_UNINIT;
 768                         continue;
 769 #endif
 770                 } else {
 771                         fprintf(stderr, _("Unknown extended option: %s\n"),
 772                                 token);
 773                         extended_usage++;
 774                 }
 775         }
 776         free(buf);
 777
 778         if (extended_usage) {
 779                 fputs(_("\nExtended options are separated by commas, "
 780                        "and may take an argument which\n"
 781                        "is set off by an equals ('=') sign.  "
 782                        "Valid extended options are:\n\n"), stderr);
 783                 fputs(_("\tea_ver=<ea_version (1 or 2)>\n"), stderr);
 784                 fputs("\tfragcheck\n", stderr);
 785                 fputs("\tjournal_only\n", stderr);
 786                 fputs("\tdiscard\n", stderr);
 787                 fputs("\tnodiscard\n", stderr);
 788                 fputs("\toptimize_extents\n", stderr);
 789                 fputs("\tno_optimize_extents\n", stderr);
 790                 fputs("\tinode_count_fullmap\n", stderr);
 791                 fputs("\tno_inode_count_fullmap\n", stderr);
 792                 fputs(_("\treadahead_kb=<buffer size>\n"), stderr);
 793                 fputs("\tbmap2extent\n", stderr);
 794                 fputs("\tunshare_blocks\n", stderr);
 795                 fputs("\tfixes_only\n", stderr);
 796                 fputs("\tcheck_encoding\n", stderr);
 797                 fputc('\n', stderr);
 798                 exit(1);
 799         }
 800 }
 801
 802 static void syntax_err_report(const char *filename, long err, int line_num)
 803 {
 804         fprintf(stderr,
 805                 _("Syntax error in e2fsck config file (%s, line #%d)\n\t%s\n"),
 806                 filename, line_num, error_message(err));
 807         exit(FSCK_ERROR);
 808 }
 809
 810 static const char *config_fn[] = { ROOT_SYSCONFDIR "/e2fsck.conf", 0 };
 811
 812 static errcode_t PRS(int argc, char *argv[], e2fsck_t *ret_ctx)
 813 {
 814         int             flush = 0;
 815         int             c, fd;
 816 #ifdef MTRACE
 817         extern void     *mallwatch;
 818 #endif
 819         e2fsck_t        ctx;
 820         errcode_t       retval;
 821 #ifdef HAVE_SIGNAL_H
 822         struct sigaction        sa;
 823 #endif
 824         char            *extended_opts = 0;
 825         char            *cp;
 826         int             res;            /* result of sscanf */
 827 #ifdef CONFIG_JBD_DEBUG
 828         char            *jbd_debug;
 829 #endif
 830 #ifdef HAVE_PTHREAD
 831         char            *pm;
 832         unsigned long   thread_num;
 833 #endif
 834         unsigned long long phys_mem_kb, blk;
 835
 836         retval = e2fsck_allocate_context(&ctx);
 837         if (retval)
 838                 return retval;
 839
 840         *ret_ctx = ctx;
 841         e2fsck_global_ctx = ctx;
 842
 843         setvbuf(stdout, NULL, _IONBF, BUFSIZ);
 844         setvbuf(stderr, NULL, _IONBF, BUFSIZ);
 845         if (getenv("E2FSCK_FORCE_INTERACTIVE") || (isatty(0) && isatty(1))) {
 846                 ctx->interactive = 1;
 847         } else {
 848                 ctx->start_meta[0] = '\001';
 849                 ctx->stop_meta[0] = '\002';
 850         }
 851         memset(bar, '=', sizeof(bar)-1);
 852         memset(spaces, ' ', sizeof(spaces)-1);
 853         add_error_table(&et_ext2_error_table);
 854         add_error_table(&et_prof_error_table);
 855         blkid_get_cache(&ctx->blkid, NULL);
 856
 857         if (argc && *argv)
 858                 ctx->program_name = *argv;
 859         else
 860                 usage(NULL);
 861
 862         phys_mem_kb = get_memory_size() / 1024;
 863         ctx->readahead_kb = ~0ULL;
 864
 865 #ifdef HAVE_PTHREAD
 866         while ((c = getopt(argc, argv, "pam:nyrcC:B:dE:fvtFVM:b:I:j:P:l:L:N:SsDkz:")) != EOF)
 867 #else
 868         while ((c = getopt(argc, argv, "panyrcC:B:dE:fvtFVM:b:I:j:P:l:L:N:SsDkz:")) != EOF)
 869 #endif
 870                 switch (c) {
 871                 case 'C':
 872                         ctx->progress = e2fsck_update_progress;
 873                         res = sscanf(optarg, "%d", &ctx->progress_fd);
 874                         if (res != 1)
 875                                 goto sscanf_err;
 876
 877                         if (ctx->progress_fd < 0) {
 878                                 ctx->progress = 0;
 879                                 ctx->progress_fd = ctx->progress_fd * -1;
 880                         }
 881                         if (!ctx->progress_fd)
 882                                 break;
 883                         /* Validate the file descriptor to avoid disasters */
 884                         fd = dup(ctx->progress_fd);
 885                         if (fd < 0) {
 886                                 fprintf(stderr,
 887                                 _("Error validating file descriptor %d: %s\n"),
 888                                         ctx->progress_fd,
 889                                         error_message(errno));
 890                                 fatal_error(ctx,
 891                         _("Invalid completion information file descriptor"));
 892                         } else
 893                                 close(fd);
 894                         break;
 895                 case 'D':
 896                         ctx->options |= E2F_OPT_COMPRESS_DIRS;
 897                         break;
 898                 case 'E':
 899                         extended_opts = optarg;
 900                         break;
 901                 case 'p':
 902                 case 'a':
 903                         if (ctx->options & (E2F_OPT_YES|E2F_OPT_NO)) {
 904                         conflict_opt:
 905                                 fatal_error(ctx,
 906         _("Only one of the options -p/-a, -n or -y may be specified."));
 907                         }
 908                         ctx->options |= E2F_OPT_PREEN;
 909                         break;
 910 #ifdef HAVE_PTHREAD
 911                 case 'm':
 912                         thread_num = strtoul(optarg, &pm, 0);
 913                         if (*pm)
 914                                 fatal_error(ctx,
 915                                         _("Invalid multiple thread num.\n"));
 916                         if (thread_num > E2FSCK_MAX_THREADS) {
 917                                 fprintf(stderr,
 918                                         _("threads %lu too large (max %u)\n"),
 919                                         thread_num, E2FSCK_MAX_THREADS);
 920                                 fatal_error(ctx, 0);
 921                         }
 922                         ctx->options |= E2F_OPT_MULTITHREAD;
 923                         ctx->pfs_num_threads = thread_num;
 924                         break;
 925 #endif
 926                 case 'n':
 927                         if (ctx->options & (E2F_OPT_YES|E2F_OPT_PREEN))
 928                                 goto conflict_opt;
 929                         ctx->options |= E2F_OPT_NO;
 930                         break;
 931                 case 'y':
 932                         if (ctx->options & (E2F_OPT_PREEN|E2F_OPT_NO))
 933                                 goto conflict_opt;
 934                         ctx->options |= E2F_OPT_YES;
 935                         break;
 936                 case 't':
 937 #ifdef RESOURCE_TRACK
 938                         if (ctx->options & E2F_OPT_TIME)
 939                                 ctx->options |= E2F_OPT_TIME2;
 940                         else
 941                                 ctx->options |= E2F_OPT_TIME;
 942 #else
 943                         fprintf(stderr, _("The -t option is not "
 944                                 "supported on this version of e2fsck.\n"));
 945 #endif
 946                         break;
 947                 case 'c':
 948                         if (cflag++)
 949                                 ctx->options |= E2F_OPT_WRITECHECK;
 950                         ctx->options |= E2F_OPT_CHECKBLOCKS;
 951                         break;
 952                 case 'r':
 953                         /* What we do by default, anyway! */
 954                         break;
 955                 case 'b':
 956                         res = sscanf(optarg, "%llu", &blk);
 957                         ctx->use_superblock = blk;
 958                         if (res != 1)
 959                                 goto sscanf_err;
 960                         ctx->flags |= E2F_FLAG_SB_SPECIFIED;
 961                         break;
 962                 case 'B':
 963                         ctx->blocksize = atoi(optarg);
 964                         break;
 965                 case 'I':
 966                         res = sscanf(optarg, "%d", &ctx->inode_buffer_blocks);
 967                         if (res != 1)
 968                                 goto sscanf_err;
 969                         break;
 970                 case 'j':
 971                         ctx->journal_name = get_devname(ctx->blkid,
 972                                                         optarg, NULL);
 973                         if (!ctx->journal_name) {
 974                                 com_err(ctx->program_name, 0,
 975                                         _("Unable to resolve '%s'"),
 976                                         optarg);
 977                                 fatal_error(ctx, 0);
 978                         }
 979                         break;
 980                 case 'P':
 981                         res = sscanf(optarg, "%d", &ctx->process_inode_size);
 982                         if (res != 1)
 983                                 goto sscanf_err;
 984                         break;
 985                 case 'L':
 986                         replace_bad_blocks++;
 987                         /* fall through */
 988                 case 'l':
 989                         if (bad_blocks_file)
 990                                 free(bad_blocks_file);
 991                         bad_blocks_file = string_copy(ctx, optarg, 0);
 992                         break;
 993                 case 'd':
 994                         ctx->options |= E2F_OPT_DEBUG;
 995                         break;
 996                 case 'f':
 997                         ctx->options |= E2F_OPT_FORCE;
 998                         break;
 999                 case 'F':
1000                         flush = 1;
1001                         break;
1002                 case 'v':
1003                         verbose = 1;
1004                         break;
1005                 case 'V':
1006                         show_version_only = 1;
1007                         break;
1008 #ifdef MTRACE
1009                 case 'M':
1010                         mallwatch = (void *) strtol(optarg, NULL, 0);
1011                         break;
1012 #endif
1013                 case 'N':
1014                         ctx->device_name = string_copy(ctx, optarg, 0);
1015                         break;
1016                 case 'k':
1017                         keep_bad_blocks++;
1018                         break;
1019                 case 'z':
1020                         ctx->undo_file = optarg;
1021                         break;
1022                 default:
1023                         usage(ctx);
1024                 }
1025         if (show_version_only)
1026                 return 0;
1027         if (optind != argc - 1)
1028                 usage(ctx);
1029         if ((ctx->options & E2F_OPT_NO) &&
1030             (ctx->options & E2F_OPT_COMPRESS_DIRS)) {
1031                 com_err(ctx->program_name, 0, "%s",
1032                         _("The -n and -D options are incompatible."));
1033                 fatal_error(ctx, 0);
1034         }
1035         if ((ctx->options & E2F_OPT_NO) && cflag) {
1036                 com_err(ctx->program_name, 0, "%s",
1037                         _("The -n and -c options are incompatible."));
1038                 fatal_error(ctx, 0);
1039         }
1040         if ((ctx->options & E2F_OPT_NO) && bad_blocks_file) {
1041                 com_err(ctx->program_name, 0, "%s",
1042                         _("The -n and -l/-L options are incompatible."));
1043                 fatal_error(ctx, 0);
1044         }
1045 #ifdef HAVE_PTHREAD
1046         if (ctx->options & E2F_OPT_MULTITHREAD) {
1047                 if ((ctx->options & (E2F_OPT_YES|E2F_OPT_NO|E2F_OPT_PREEN)) == 0) {
1048                         com_err(ctx->program_name, 0, "%s",
1049                                 _("The -m option should be used together with one of -p/-y/-n options."));
1050                         fatal_error(ctx, 0);
1051                 }
1052                 if (ctx->progress) {
1053                         com_err(ctx->program_name, 0, "%s",
1054                                 _("Only one of the options -C or -m may be specified."));
1055                         fatal_error(ctx, 0);
1056                 }
1057         }
1058 #endif
1059         if (ctx->options & E2F_OPT_NO)
1060                 ctx->options |= E2F_OPT_READONLY;
1061
1062         ctx->io_options = strchr(argv[optind], '?');
1063         if (ctx->io_options)
1064                 *ctx->io_options++ = 0;
1065         ctx->filesystem_name = get_devname(ctx->blkid, argv[optind], 0);
1066         if (!ctx->filesystem_name) {
1067                 com_err(ctx->program_name, 0, _("Unable to resolve '%s'"),
1068                         argv[optind]);
1069                 fatal_error(ctx, 0);
1070         }
1071         if (extended_opts)
1072                 parse_extended_opts(ctx, extended_opts);
1073
1074         /* Complain about mutually exclusive rebuilding activities */
1075         if (getenv("E2FSCK_FIXES_ONLY"))
1076                 ctx->options |= E2F_OPT_FIXES_ONLY;
1077         if ((ctx->options & E2F_OPT_COMPRESS_DIRS) &&
1078             (ctx->options & E2F_OPT_FIXES_ONLY)) {
1079                 com_err(ctx->program_name, 0, "%s",
1080                         _("The -D and -E fixes_only options are incompatible."));
1081                 fatal_error(ctx, 0);
1082         }
1083         if ((ctx->options & E2F_OPT_CONVERT_BMAP) &&
1084             (ctx->options & E2F_OPT_FIXES_ONLY)) {
1085                 com_err(ctx->program_name, 0, "%s",
1086                         _("The -E bmap2extent and fixes_only options are incompatible."));
1087                 fatal_error(ctx, 0);
1088         }
1089
1090         if ((cp = getenv("E2FSCK_CONFIG")) != NULL)
1091                 config_fn[0] = cp;
1092         profile_set_syntax_err_cb(syntax_err_report);
1093         profile_init(config_fn, &ctx->profile);
1094
1095         profile_get_boolean(ctx->profile, "options", "report_time", 0, 0,
1096                             &c);
1097         if (c)
1098                 ctx->options |= E2F_OPT_TIME | E2F_OPT_TIME2;
1099         profile_get_boolean(ctx->profile, "options", "report_verbose", 0, 0,
1100                             &c);
1101         if (c)
1102                 verbose = 1;
1103
1104         profile_get_boolean(ctx->profile, "options", "no_optimize_extents",
1105                             0, 0, &c);
1106         if (c)
1107                 ctx->options |= E2F_OPT_NOOPT_EXTENTS;
1108
1109         profile_get_boolean(ctx->profile, "options", "inode_count_fullmap",
1110                             0, 0, &c);
1111         if (c)
1112                 ctx->options |= E2F_OPT_ICOUNT_FULLMAP;
1113
1114         if (ctx->readahead_kb == ~0ULL) {
1115                 profile_get_integer(ctx->profile, "options",
1116                                     "readahead_mem_pct", 0, -1, &c);
1117                 if (c >= 0 && c <= 100)
1118                         ctx->readahead_kb = phys_mem_kb * c / 100;
1119                 profile_get_integer(ctx->profile, "options",
1120                                     "readahead_kb", 0, -1, &c);
1121                 if (c >= 0)
1122                         ctx->readahead_kb = c;
1123                 if (ctx->readahead_kb != ~0ULL &&
1124                     ctx->readahead_kb > phys_mem_kb)
1125                         ctx->readahead_kb = phys_mem_kb;
1126         }
1127
1128         /* Turn off discard in read-only mode */
1129         if ((ctx->options & E2F_OPT_NO) &&
1130             (ctx->options & E2F_OPT_DISCARD))
1131                 ctx->options &= ~E2F_OPT_DISCARD;
1132
1133         if (flush) {
1134                 fd = open(ctx->filesystem_name, O_RDONLY, 0);
1135                 if (fd < 0) {
1136                         com_err("open", errno,
1137                                 _("while opening %s for flushing"),
1138                                 ctx->filesystem_name);
1139                         fatal_error(ctx, 0);
1140                 }
1141                 if ((retval = ext2fs_sync_device(fd, 1))) {
1142                         com_err("ext2fs_sync_device", retval,
1143                                 _("while trying to flush %s"),
1144                                 ctx->filesystem_name);
1145                         fatal_error(ctx, 0);
1146                 }
1147                 close(fd);
1148         }
1149         if (cflag && bad_blocks_file) {
1150                 fprintf(stderr, "%s", _("The -c and the -l/-L options may not "
1151                                         "be both used at the same time.\n"));
1152                 exit(FSCK_USAGE);
1153         }
1154 #ifdef HAVE_SIGNAL_H
1155         /*
1156          * Set up signal action
1157          */
1158         memset(&sa, 0, sizeof(struct sigaction));
1159         sa.sa_handler = signal_cancel;
1160         sigaction(SIGINT, &sa, 0);
1161         sigaction(SIGTERM, &sa, 0);
1162 #ifdef SA_RESTART
1163         sa.sa_flags = SA_RESTART;
1164 #endif
1165         if ((ctx->options & E2F_OPT_MULTITHREAD) == 0) {
1166                 sa.sa_handler = signal_progress_on;
1167                 sigaction(SIGUSR1, &sa, 0);
1168                 sa.sa_handler = signal_progress_off;
1169                 sigaction(SIGUSR2, &sa, 0);
1170         }
1171 #endif
1172
1173         /* Update our PATH to include /sbin if we need to run badblocks  */
1174         if (cflag) {
1175                 char *oldpath = getenv("PATH");
1176                 char *newpath;
1177                 int len = sizeof(PATH_SET) + 1;
1178
1179                 if (oldpath)
1180                         len += strlen(oldpath);
1181
1182                 newpath = malloc(len);
1183                 if (!newpath)
1184                         fatal_error(ctx, "Couldn't malloc() newpath");
1185                 strcpy(newpath, PATH_SET);
1186
1187                 if (oldpath) {
1188                         strcat(newpath, ":");
1189                         strcat(newpath, oldpath);
1190                 }
1191                 putenv(newpath);
1192         }
1193 #ifdef CONFIG_JBD_DEBUG
1194         jbd_debug = getenv("E2FSCK_JBD_DEBUG");
1195         if (jbd_debug) {
1196                 res = sscanf(jbd_debug, "%d", &journal_enable_debug);
1197                 if (res != 1) {
1198                         fprintf(stderr,
1199                                 _("E2FSCK_JBD_DEBUG \"%s\" not an integer\n\n"),
1200                                 jbd_debug);
1201                         exit (1);
1202                 }
1203         }
1204 #endif
1205         return 0;
1206
1207 sscanf_err:
1208         fprintf(stderr, _("\nInvalid non-numeric argument to -%c (\"%s\")\n\n"),
1209                 c, optarg);
1210         exit (1);
1211 }
1212
1213 static errcode_t try_open_fs(e2fsck_t ctx, int flags, io_manager io_ptr,
1214                              ext2_filsys *ret_fs)
1215 {
1216         errcode_t retval;
1217
1218         *ret_fs = NULL;
1219
1220         if (ctx->superblock) {
1221                 unsigned long blocksize = ctx->blocksize;
1222
1223                 if (!blocksize) {
1224                         for (blocksize = EXT2_MIN_BLOCK_SIZE;
1225                              blocksize <= EXT2_MAX_BLOCK_SIZE; blocksize *= 2) {
1226
1227                                 retval = ext2fs_open2(ctx->filesystem_name,
1228                                                       ctx->io_options, flags,
1229                                                       ctx->superblock, blocksize,
1230                                                       unix_io_manager, ret_fs);
1231                                 if (*ret_fs) {
1232                                         ext2fs_free(*ret_fs);
1233                                         *ret_fs = NULL;
1234                                 }
1235                                 if (!retval)
1236                                         break;
1237                         }
1238                         if (retval)
1239                                 return retval;
1240                 }
1241
1242                 retval = ext2fs_open2(ctx->filesystem_name, ctx->io_options,
1243                                       flags, ctx->superblock, blocksize,
1244                                       io_ptr, ret_fs);
1245         } else
1246                 retval = ext2fs_open2(ctx->filesystem_name, ctx->io_options,
1247                                       flags, 0, 0, io_ptr, ret_fs);
1248
1249         if (retval == 0) {
1250                 (*ret_fs)->priv_data = ctx;
1251                 e2fsck_set_bitmap_type(*ret_fs, EXT2FS_BMAP64_RBTREE,
1252                                        "default", NULL);
1253         }
1254         return retval;
1255 }
1256
1257 static const char *my_ver_string = E2FSPROGS_VERSION;
1258 static const char *my_ver_date = E2FSPROGS_DATE;
1259
1260 static errcode_t e2fsck_check_mmp(ext2_filsys fs, e2fsck_t ctx)
1261 {
1262         struct mmp_struct *mmp_s;
1263         unsigned int mmp_check_interval;
1264         errcode_t retval = 0;
1265         struct problem_context pctx;
1266         unsigned int wait_time = 0;
1267
1268         clear_problem_context(&pctx);
1269         if (fs->mmp_buf == NULL) {
1270                 retval = ext2fs_get_mem(fs->blocksize, &fs->mmp_buf);
1271                 if (retval)
1272                         goto check_error;
1273         }
1274
1275         retval = ext2fs_mmp_read(fs, fs->super->s_mmp_block, fs->mmp_buf);
1276         if (retval)
1277                 goto check_error;
1278
1279         mmp_s = fs->mmp_buf;
1280
1281         mmp_check_interval = fs->super->s_mmp_update_interval;
1282         if (mmp_check_interval < EXT4_MMP_MIN_CHECK_INTERVAL)
1283                 mmp_check_interval = EXT4_MMP_MIN_CHECK_INTERVAL;
1284
1285         /*
1286          * If check_interval in MMP block is larger, use that instead of
1287          * check_interval from the superblock.
1288          */
1289         if (mmp_s->mmp_check_interval > mmp_check_interval)
1290                 mmp_check_interval = mmp_s->mmp_check_interval;
1291
1292         wait_time = mmp_check_interval * 2 + 1;
1293
1294         if (mmp_s->mmp_seq == EXT4_MMP_SEQ_CLEAN)
1295                 retval = 0;
1296         else if (mmp_s->mmp_seq == EXT4_MMP_SEQ_FSCK)
1297                 retval = EXT2_ET_MMP_FSCK_ON;
1298         else if (mmp_s->mmp_seq > EXT4_MMP_SEQ_MAX)
1299                 retval = EXT2_ET_MMP_UNKNOWN_SEQ;
1300
1301         if (retval)
1302                 goto check_error;
1303
1304         /* Print warning if e2fsck will wait for more than 20 secs. */
1305         if (verbose || wait_time > EXT4_MMP_MIN_CHECK_INTERVAL * 4) {
1306                 log_out(ctx, _("MMP interval is %u seconds and total wait "
1307                                "time is %u seconds. Please wait...\n"),
1308                         mmp_check_interval, wait_time * 2);
1309         }
1310
1311         return 0;
1312
1313 check_error:
1314
1315         if (retval == EXT2_ET_MMP_BAD_BLOCK) {
1316                 if (fix_problem(ctx, PR_0_MMP_INVALID_BLK, &pctx)) {
1317                         fs->super->s_mmp_block = 0;
1318                         ext2fs_mark_super_dirty(fs);
1319                         retval = 0;
1320                 }
1321         } else if (retval == EXT2_ET_MMP_FAILED) {
1322                 com_err(ctx->program_name, retval, "%s",
1323                         _("while checking MMP block"));
1324                 dump_mmp_msg(fs->mmp_buf, NULL);
1325         } else if (retval == EXT2_ET_MMP_FSCK_ON ||
1326                    retval == EXT2_ET_MMP_UNKNOWN_SEQ) {
1327                 com_err(ctx->program_name, retval, "%s",
1328                         _("while checking MMP block"));
1329                 dump_mmp_msg(fs->mmp_buf,
1330                              _("If you are sure the filesystem is not "
1331                                "in use on any node, run:\n"
1332                                "'tune2fs -f -E clear_mmp %s'\n"),
1333                              ctx->device_name);
1334         } else if (retval == EXT2_ET_MMP_MAGIC_INVALID) {
1335                 if (fix_problem(ctx, PR_0_MMP_INVALID_MAGIC, &pctx)) {
1336                         ext2fs_mmp_clear(fs);
1337                         retval = 0;
1338                 }
1339         } else if (retval == EXT2_ET_MMP_CSUM_INVALID) {
1340                 if (fix_problem(ctx, PR_0_MMP_CSUM_INVALID, &pctx)) {
1341                         ext2fs_mmp_clear(fs);
1342                         retval = 0;
1343                 }
1344         } else
1345                 com_err(ctx->program_name, retval, "%s",
1346                         _("while reading MMP block"));
1347         return retval;
1348 }
1349
1350 static int e2fsck_setup_tdb(e2fsck_t ctx, io_manager *io_ptr)
1351 {
1352         errcode_t retval = ENOMEM;
1353         char *tdb_dir = NULL, *tdb_file = NULL;
1354         char *dev_name, *tmp_name;
1355         int free_tdb_dir = 0;
1356
1357         /* (re)open a specific undo file */
1358         if (ctx->undo_file && ctx->undo_file[0] != 0) {
1359                 retval = set_undo_io_backing_manager(*io_ptr);
1360                 if (retval)
1361                         goto err;
1362                 *io_ptr = undo_io_manager;
1363                 retval = set_undo_io_backup_file(ctx->undo_file);
1364                 if (retval)
1365                         goto err;
1366                 printf(_("Overwriting existing filesystem; this can be undone "
1367                          "using the command:\n"
1368                          "    e2undo %s %s\n\n"),
1369                         ctx->undo_file, ctx->filesystem_name);
1370                 return retval;
1371         }
1372
1373         /*
1374          * Configuration via a conf file would be
1375          * nice
1376          */
1377         tdb_dir = getenv("E2FSPROGS_UNDO_DIR");
1378         if (!tdb_dir) {
1379                 profile_get_string(ctx->profile, "defaults",
1380                                    "undo_dir", 0, "/var/lib/e2fsprogs",
1381                                    &tdb_dir);
1382                 free_tdb_dir = 1;
1383         }
1384
1385         if (!strcmp(tdb_dir, "none") || (tdb_dir[0] == 0) ||
1386             access(tdb_dir, W_OK)) {
1387                 if (free_tdb_dir)
1388                         free(tdb_dir);
1389                 return 0;
1390         }
1391
1392         tmp_name = strdup(ctx->filesystem_name);
1393         if (!tmp_name)
1394                 goto errout;
1395         dev_name = basename(tmp_name);
1396         tdb_file = malloc(strlen(tdb_dir) + 8 + strlen(dev_name) + 7 + 1);
1397         if (!tdb_file) {
1398                 free(tmp_name);
1399                 goto errout;
1400         }
1401         sprintf(tdb_file, "%s/e2fsck-%s.e2undo", tdb_dir, dev_name);
1402         free(tmp_name);
1403
1404         if ((unlink(tdb_file) < 0) && (errno != ENOENT)) {
1405                 retval = errno;
1406                 com_err(ctx->program_name, retval,
1407                         _("while trying to delete %s"), tdb_file);
1408                 goto errout;
1409         }
1410
1411         retval = set_undo_io_backing_manager(*io_ptr);
1412         if (retval)
1413                 goto errout;
1414         *io_ptr = undo_io_manager;
1415         retval = set_undo_io_backup_file(tdb_file);
1416         if (retval)
1417                 goto errout;
1418         printf(_("Overwriting existing filesystem; this can be undone "
1419                  "using the command:\n"
1420                  "    e2undo %s %s\n\n"), tdb_file, ctx->filesystem_name);
1421
1422         if (free_tdb_dir)
1423                 free(tdb_dir);
1424         free(tdb_file);
1425         return 0;
1426
1427 errout:
1428         if (free_tdb_dir)
1429                 free(tdb_dir);
1430         free(tdb_file);
1431 err:
1432         com_err(ctx->program_name, retval, "%s",
1433                 _("while trying to setup undo file\n"));
1434         return retval;
1435 }
1436
1437 int main (int argc, char *argv[])
1438 {
1439         errcode_t       retval = 0, retval2 = 0, orig_retval = 0;
1440         int             exit_value = FSCK_OK;
1441         ext2_filsys     fs = 0;
1442         io_manager      io_ptr;
1443         struct ext2_super_block *sb;
1444         const char      *lib_ver_date;
1445         int             my_ver, lib_ver;
1446         e2fsck_t        ctx;
1447         blk64_t         orig_superblock = ~(blk64_t)0;
1448         struct problem_context pctx;
1449         int flags, run_result, was_changed;
1450         int journal_size;
1451         int sysval, sys_page_size = 4096;
1452         int old_bitmaps;
1453         __u32 features[3];
1454         char *cp;
1455         enum quota_type qtype;
1456         struct ext2fs_journal_params jparams;
1457
1458         clear_problem_context(&pctx);
1459         sigcatcher_setup();
1460 #ifdef MTRACE
1461         mtrace();
1462 #endif
1463 #ifdef MCHECK
1464         mcheck(0);
1465 #endif
1466 #ifdef ENABLE_NLS
1467         setlocale(LC_MESSAGES, "");
1468         setlocale(LC_CTYPE, "");
1469         bindtextdomain(NLS_CAT_NAME, LOCALEDIR);
1470         textdomain(NLS_CAT_NAME);
1471         set_com_err_gettext(gettext);
1472 #endif
1473         my_ver = ext2fs_parse_version_string(my_ver_string);
1474         lib_ver = ext2fs_get_library_version(0, &lib_ver_date);
1475         if (my_ver > lib_ver) {
1476                 fprintf( stderr, "%s",
1477                          _("Error: ext2fs library version out of date!\n"));
1478                 show_version_only++;
1479         }
1480
1481         retval = PRS(argc, argv, &ctx);
1482         if (retval) {
1483                 com_err("e2fsck", retval, "%s",
1484                         _("while trying to initialize program"));
1485                 exit(FSCK_ERROR);
1486         }
1487         reserve_stdio_fds();
1488
1489         ctx->global_ctx = NULL;
1490         set_up_logging(ctx);
1491         if (ctx->logf) {
1492                 int i;
1493
1494                 fputs("E2fsck run: ", ctx->logf);
1495                 for (i = 0; i < argc; i++) {
1496                         if (i)
1497                                 fputc(' ', ctx->logf);
1498                         fputs(argv[i], ctx->logf);
1499                 }
1500                 fputc('\n', ctx->logf);
1501         }
1502         if (ctx->problem_logf) {
1503                 int i;
1504
1505                 fputs("<?xml version=\"1.0\" encoding=\"utf-8\"?>\n",
1506                       ctx->problem_logf);
1507                 fprintf(ctx->problem_logf, "<problem_log time=\"%lu\">\n",
1508                         (unsigned long) ctx->now);
1509                 fprintf(ctx->problem_logf, "<invocation prog=\"%s\"",
1510                         argv[0]);
1511                 for (i = 1; i < argc; i++)
1512                         fprintf(ctx->problem_logf, " arg%d=\"%s\"", i, argv[i]);
1513                 fputs("/>\n", ctx->problem_logf);
1514         }
1515
1516         init_resource_track(&ctx->global_rtrack, NULL);
1517         if (!(ctx->options & E2F_OPT_PREEN) || show_version_only)
1518                 log_err(ctx, "e2fsck %s (%s)\n", my_ver_string,
1519                          my_ver_date);
1520
1521         if (show_version_only) {
1522                 log_err(ctx, _("\tUsing %s, %s\n"),
1523                         error_message(EXT2_ET_BASE), lib_ver_date);
1524                 exit(FSCK_OK);
1525         }
1526
1527         check_mount(ctx);
1528
1529         if (!(ctx->options & E2F_OPT_PREEN) &&
1530             !(ctx->options & E2F_OPT_NO) &&
1531             !(ctx->options & E2F_OPT_YES)) {
1532                 if (!ctx->interactive)
1533                         fatal_error(ctx,
1534                                     _("need terminal for interactive repairs"));
1535         }
1536         ctx->superblock = ctx->use_superblock;
1537
1538         flags = EXT2_FLAG_SKIP_MMP | EXT2_FLAG_THREADS;
1539 restart:
1540 #ifdef CONFIG_TESTIO_DEBUG
1541         if (getenv("TEST_IO_FLAGS") || getenv("TEST_IO_BLOCK")) {
1542                 io_ptr = test_io_manager;
1543                 test_io_backing_manager = unix_io_manager;
1544         } else
1545 #endif
1546                 io_ptr = unix_io_manager;
1547         flags |= EXT2_FLAG_NOFREE_ON_ERROR;
1548         profile_get_boolean(ctx->profile, "options", "old_bitmaps", 0, 0,
1549                             &old_bitmaps);
1550         if (!old_bitmaps)
1551                 flags |= EXT2_FLAG_64BITS;
1552         if ((ctx->options & E2F_OPT_READONLY) == 0) {
1553                 flags |= EXT2_FLAG_RW;
1554                 if (!(ctx->mount_flags & EXT2_MF_ISROOT &&
1555                       ctx->mount_flags & EXT2_MF_READONLY))
1556                         flags |= EXT2_FLAG_EXCLUSIVE;
1557                 if ((ctx->mount_flags & EXT2_MF_READONLY) &&
1558                     (ctx->options & E2F_OPT_FORCE))
1559                         flags &= ~EXT2_FLAG_EXCLUSIVE;
1560         }
1561
1562         if (ctx->undo_file) {
1563                 retval = e2fsck_setup_tdb(ctx, &io_ptr);
1564                 if (retval)
1565                         exit(FSCK_ERROR);
1566         }
1567
1568         ctx->openfs_flags = flags;
1569         ctx->io_manager = io_ptr;
1570         retval = try_open_fs(ctx, flags, io_ptr, &fs);
1571
1572         if (!ctx->superblock && !(ctx->options & E2F_OPT_PREEN) &&
1573             !(ctx->flags & E2F_FLAG_SB_SPECIFIED) &&
1574             ((retval == EXT2_ET_BAD_MAGIC) ||
1575              (retval == EXT2_ET_SB_CSUM_INVALID) ||
1576              (retval == EXT2_ET_CORRUPT_SUPERBLOCK) ||
1577              ((retval == 0) && (retval2 = ext2fs_check_desc(fs))))) {
1578                 if (retval) {
1579                         pctx.errcode = retval;
1580                         fix_problem(ctx, PR_0_OPEN_FAILED, &pctx);
1581                 }
1582                 if (retval2) {
1583                         pctx.errcode = retval2;
1584                         fix_problem(ctx, PR_0_CHECK_DESC_FAILED, &pctx);
1585                 }
1586                 pctx.errcode = 0;
1587                 if (retval2 == ENOMEM || retval2 == EXT2_ET_NO_MEMORY) {
1588                         retval = retval2;
1589                         goto failure;
1590                 }
1591                 if (fs->flags & EXT2_FLAG_NOFREE_ON_ERROR) {
1592                         ext2fs_free(fs);
1593                         fs = NULL;
1594                 }
1595                 if (!fs || (fs->group_desc_count > 1)) {
1596                         log_out(ctx, _("%s: %s trying backup blocks...\n"),
1597                                 ctx->program_name,
1598                                 retval ? _("Superblock invalid,") :
1599                                 _("Group descriptors look bad..."));
1600                         orig_superblock = ctx->superblock;
1601                         get_backup_sb(ctx, fs, ctx->filesystem_name, io_ptr);
1602                         if (fs)
1603                                 ext2fs_close_free(&fs);
1604                         orig_retval = retval;
1605                         retval = try_open_fs(ctx, flags, io_ptr, &fs);
1606                         if ((orig_retval == 0) && retval != 0) {
1607                                 if (fs)
1608                                         ext2fs_close_free(&fs);
1609                                 log_out(ctx, _("%s: %s while using the "
1610                                                "backup blocks"),
1611                                         ctx->program_name,
1612                                         error_message(retval));
1613                                 log_out(ctx, _("%s: going back to original "
1614                                                "superblock\n"),
1615                                         ctx->program_name);
1616                                 ctx->superblock = orig_superblock;
1617                                 retval = try_open_fs(ctx, flags, io_ptr, &fs);
1618                         }
1619                 }
1620         }
1621         if (((retval == EXT2_ET_UNSUPP_FEATURE) ||
1622              (retval == EXT2_ET_RO_UNSUPP_FEATURE)) &&
1623             fs && fs->super) {
1624                 sb = fs->super;
1625                 features[0] = (sb->s_feature_compat &
1626                                ~EXT2_LIB_FEATURE_COMPAT_SUPP);
1627                 features[1] = (sb->s_feature_incompat &
1628                                ~EXT2_LIB_FEATURE_INCOMPAT_SUPP);
1629                 features[2] = (sb->s_feature_ro_compat &
1630                                ~EXT2_LIB_FEATURE_RO_COMPAT_SUPP);
1631                 if (features[0] || features[1] || features[2])
1632                         goto print_unsupp_features;
1633         }
1634 failure:
1635         if (retval) {
1636                 if (orig_retval)
1637                         retval = orig_retval;
1638                 com_err(ctx->program_name, retval, _("while trying to open %s"),
1639                         ctx->filesystem_name);
1640                 if (retval == EXT2_ET_REV_TOO_HIGH) {
1641                         log_out(ctx, "%s",
1642                                 _("The filesystem revision is apparently "
1643                                   "too high for this version of e2fsck.\n"
1644                                   "(Or the filesystem superblock "
1645                                   "is corrupt)\n\n"));
1646                         fix_problem(ctx, PR_0_SB_CORRUPT, &pctx);
1647                 } else if (retval == EXT2_ET_SHORT_READ)
1648                         log_out(ctx, "%s",
1649                                 _("Could this be a zero-length partition?\n"));
1650                 else if ((retval == EPERM) || (retval == EACCES))
1651                         log_out(ctx, _("You must have %s access to the "
1652                                        "filesystem or be root\n"),
1653                                (ctx->options & E2F_OPT_READONLY) ?
1654                                "r/o" : "r/w");
1655                 else if (retval == ENXIO)
1656                         log_out(ctx, "%s",
1657                                 _("Possibly non-existent or swap device?\n"));
1658                 else if (retval == EBUSY)
1659                         log_out(ctx, "%s", _("Filesystem mounted or opened "
1660                                          "exclusively by another program?\n"));
1661                 else if (retval == ENOENT)
1662                         log_out(ctx, "%s",
1663                                 _("Possibly non-existent device?\n"));
1664 #ifdef EROFS
1665                 else if (retval == EROFS)
1666                         log_out(ctx, "%s", _("Disk write-protected; use the "
1667                                              "-n option to do a read-only\n"
1668                                              "check of the device.\n"));
1669 #endif
1670                 else {
1671                         /*
1672                          * Let's try once more will less consistency checking
1673                          * so that we are able to recover from more errors
1674                          * (e.g. some tool messing up some value in the sb).
1675                          */
1676                         if (((retval == EXT2_ET_CORRUPT_SUPERBLOCK) ||
1677                              (retval == EXT2_ET_BAD_DESC_SIZE)) &&
1678                             !(flags & EXT2_FLAG_IGNORE_SB_ERRORS)) {
1679                                 if (fs)
1680                                         ext2fs_close_free(&fs);
1681                                 log_out(ctx, _("%s: Trying to load superblock "
1682                                         "despite errors...\n"),
1683                                         ctx->program_name);
1684                                 flags |= EXT2_FLAG_IGNORE_SB_ERRORS;
1685                                 /*
1686                                  * If we tried backup sb, revert to the
1687                                  * original one now.
1688                                  */
1689                                 if (orig_superblock != ~(blk64_t)0)
1690                                         ctx->superblock = orig_superblock;
1691                                 goto restart;
1692                         }
1693                         fix_problem(ctx, PR_0_SB_CORRUPT, &pctx);
1694                         if (retval == EXT2_ET_BAD_MAGIC)
1695                                 check_plausibility(ctx->filesystem_name,
1696                                                    CHECK_FS_EXIST, NULL);
1697                 }
1698                 fatal_error(ctx, 0);
1699         }
1700         /*
1701          * We only update the master superblock because (a) paranoia;
1702          * we don't want to corrupt the backup superblocks, and (b) we
1703          * don't need to update the mount count and last checked
1704          * fields in the backup superblock (the kernel doesn't update
1705          * the backup superblocks anyway).  With newer versions of the
1706          * library this flag is set by ext2fs_open2(), but we set this
1707          * here just to be sure.  (No, we don't support e2fsck running
1708          * with some other libext2fs than the one that it was shipped
1709          * with, but just in case....)
1710          */
1711         fs->flags |= EXT2_FLAG_MASTER_SB_ONLY;
1712
1713         if (!(ctx->flags & E2F_FLAG_GOT_DEVSIZE)) {
1714                 __u32 blocksize = EXT2_BLOCK_SIZE(fs->super);
1715                 int need_restart = 0;
1716
1717                 pctx.errcode = ext2fs_get_device_size2(ctx->filesystem_name,
1718                                                        blocksize,
1719                                                        &ctx->num_blocks);
1720                 /*
1721                  * The floppy driver refuses to allow anyone else to
1722                  * open the device if has been opened with O_EXCL;
1723                  * this is unlike other block device drivers in Linux.
1724                  * To handle this, we close the filesystem and then
1725                  * reopen the filesystem after we get the device size.
1726                  */
1727                 if (pctx.errcode == EBUSY) {
1728                         ext2fs_close_free(&fs);
1729                         need_restart++;
1730                         pctx.errcode =
1731                                 ext2fs_get_device_size2(ctx->filesystem_name,
1732                                                         blocksize,
1733                                                         &ctx->num_blocks);
1734                 }
1735                 if (pctx.errcode == EXT2_ET_UNIMPLEMENTED)
1736                         ctx->num_blocks = 0;
1737                 else if (pctx.errcode) {
1738                         fix_problem(ctx, PR_0_GETSIZE_ERROR, &pctx);
1739                         ctx->flags |= E2F_FLAG_ABORT;
1740                         fatal_error(ctx, 0);
1741                 }
1742                 ctx->flags |= E2F_FLAG_GOT_DEVSIZE;
1743                 if (need_restart)
1744                         goto restart;
1745         }
1746
1747         ctx->fs = fs;
1748         fs->now = ctx->now;
1749         sb = fs->super;
1750
1751         if (sb->s_rev_level > E2FSCK_CURRENT_REV) {
1752                 com_err(ctx->program_name, EXT2_ET_REV_TOO_HIGH,
1753                         _("while trying to open %s"),
1754                         ctx->filesystem_name);
1755         get_newer:
1756                 fatal_error(ctx, _("Get a newer version of e2fsck!"));
1757         }
1758
1759         /*
1760          * Set the device name, which is used whenever we print error
1761          * or informational messages to the user.
1762          */
1763         if (ctx->device_name == 0 && sb->s_volume_name[0])
1764                 ctx->device_name = string_copy(ctx, (char *) sb->s_volume_name,
1765                                                sizeof(sb->s_volume_name));
1766
1767         if (ctx->device_name == 0)
1768                 ctx->device_name = string_copy(ctx, ctx->filesystem_name, 0);
1769         for (cp = ctx->device_name; *cp; cp++)
1770                 if (isspace(*cp) || *cp == ':')
1771                         *cp = '_';
1772
1773         if (ctx->problem_logf) {
1774
1775                 fprintf(ctx->problem_logf, "<filesystem dev=\"%s\"",
1776                         ctx->filesystem_name);
1777                 if (!uuid_is_null(sb->s_uuid)) {
1778                         char buf[48];
1779
1780                         uuid_unparse(sb->s_uuid, buf);
1781                         fprintf(ctx->problem_logf, " uuid=\"%s\"", buf);
1782                 }
1783                 if (sb->s_volume_name[0])
1784                         fprintf(ctx->problem_logf, " label=\"%.*s\"",
1785                                 EXT2_LEN_STR(sb->s_volume_name));
1786
1787                 fputs("/>\n", ctx->problem_logf);
1788         }
1789
1790         ehandler_init(fs->io);
1791
1792         if (ext2fs_has_feature_mmp(fs->super) &&
1793             (flags & EXT2_FLAG_SKIP_MMP)) {
1794                 if (e2fsck_check_mmp(fs, ctx))
1795                         fatal_error(ctx, 0);
1796
1797                 /*
1798                  * Restart in order to reopen fs but this time start mmp.
1799                  */
1800                 ext2fs_close_free(&ctx->fs);
1801                 flags &= ~EXT2_FLAG_SKIP_MMP;
1802                 goto restart;
1803         }
1804
1805         if (ctx->logf)
1806                 fprintf(ctx->logf, "Filesystem UUID: %s\n",
1807                         e2p_uuid2str(sb->s_uuid));
1808
1809         /*
1810          * Make sure the ext3 superblock fields are consistent.
1811          */
1812         if ((ctx->mount_flags & (EXT2_MF_MOUNTED | EXT2_MF_BUSY)) == 0) {
1813                 retval = e2fsck_check_ext3_journal(ctx);
1814                 if (retval) {
1815                         com_err(ctx->program_name, retval,
1816                                 _("while checking journal for %s"),
1817                                 ctx->device_name);
1818                         fatal_error(ctx,
1819                                 _("Cannot proceed with file system check"));
1820                 }
1821         }
1822
1823         /*
1824          * Check to see if we need to do ext3-style recovery.  If so,
1825          * do it, and then restart the fsck.
1826          */
1827         if (ext2fs_has_feature_journal_needs_recovery(sb)) {
1828                 if (ctx->options & E2F_OPT_READONLY) {
1829                         log_out(ctx, "%s",
1830                                 _("Warning: skipping journal recovery because "
1831                                   "doing a read-only filesystem check.\n"));
1832                         io_channel_flush(ctx->fs->io);
1833                 } else {
1834                         if (ctx->flags & E2F_FLAG_RESTARTED) {
1835                                 /*
1836                                  * Whoops, we attempted to run the
1837                                  * journal twice.  This should never
1838                                  * happen, unless the hardware or
1839                                  * device driver is being bogus.
1840                                  */
1841                                 com_err(ctx->program_name, 0,
1842                                         _("unable to set superblock flags "
1843                                           "on %s\n"), ctx->device_name);
1844                                 fatal_error(ctx, 0);
1845                         }
1846                         retval = e2fsck_run_ext3_journal(ctx);
1847                         if (retval == EFSBADCRC) {
1848                                 log_out(ctx, _("Journal checksum error "
1849                                                "found in %s\n"),
1850                                         ctx->device_name);
1851                         } else if (retval == EFSCORRUPTED) {
1852                                 log_out(ctx, _("Journal corrupted in %s\n"),
1853                                         ctx->device_name);
1854                         } else if (retval) {
1855                                 com_err(ctx->program_name, retval,
1856                                 _("while recovering journal of %s"),
1857                                         ctx->device_name);
1858                         }
1859                         ext2fs_close_free(&ctx->fs);
1860                         ctx->flags |= E2F_FLAG_RESTARTED;
1861                         goto restart;
1862                 }
1863         }
1864
1865         /*
1866          * Check for compatibility with the feature sets.  We need to
1867          * be more stringent than ext2fs_open().
1868          */
1869         features[0] = sb->s_feature_compat & ~EXT2_LIB_FEATURE_COMPAT_SUPP;
1870         features[1] = sb->s_feature_incompat & ~EXT2_LIB_FEATURE_INCOMPAT_SUPP;
1871         features[2] = (sb->s_feature_ro_compat &
1872                        ~EXT2_LIB_FEATURE_RO_COMPAT_SUPP);
1873 print_unsupp_features:
1874         if (features[0] || features[1] || features[2]) {
1875                 int     i, j;
1876                 __u32   *mask = features, m;
1877
1878                 log_err(ctx, _("%s has unsupported feature(s):"),
1879                         ctx->filesystem_name);
1880
1881                 for (i=0; i <3; i++,mask++) {
1882                         for (j=0,m=1; j < 32; j++, m<<=1) {
1883                                 if (*mask & m)
1884                                         log_err(ctx, " %s",
1885                                                 e2p_feature2string(i, m));
1886                         }
1887                 }
1888                 log_err(ctx, "\n");
1889                 goto get_newer;
1890         }
1891
1892         if (ext2fs_has_feature_casefold(sb) && !fs->encoding) {
1893                 log_err(ctx, _("%s has unsupported encoding: %0x\n"),
1894                         ctx->filesystem_name, sb->s_encoding);
1895                 goto get_newer;
1896         }
1897
1898         /*
1899          * If the user specified a specific superblock, presumably the
1900          * master superblock has been trashed.  So we mark the
1901          * superblock as dirty, so it can be written out.
1902          */
1903         if (ctx->superblock &&
1904             !(ctx->options & E2F_OPT_READONLY))
1905                 ext2fs_mark_super_dirty(fs);
1906
1907         /*
1908          * Calculate the number of filesystem blocks per pagesize.  If
1909          * fs->blocksize > page_size, set the number of blocks per
1910          * pagesize to 1 to avoid division by zero errors.
1911          */
1912 #ifdef _SC_PAGESIZE
1913         sysval = sysconf(_SC_PAGESIZE);
1914         if (sysval > 0)
1915                 sys_page_size = sysval;
1916 #endif /* _SC_PAGESIZE */
1917         ctx->blocks_per_page = sys_page_size / fs->blocksize;
1918         if (ctx->blocks_per_page == 0)
1919                 ctx->blocks_per_page = 1;
1920
1921         if (ctx->superblock)
1922                 set_latch_flags(PR_LATCH_RELOC, PRL_LATCHED, 0);
1923         ext2fs_mark_valid(fs);
1924         check_super_block(ctx);
1925         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1926                 fatal_error(ctx, 0);
1927         check_if_skip(ctx);
1928         check_resize_inode(ctx);
1929         if (bad_blocks_file)
1930                 read_bad_blocks_file(ctx, bad_blocks_file, replace_bad_blocks);
1931         else if (cflag)
1932                 read_bad_blocks_file(ctx, 0, !keep_bad_blocks); /* Test disk */
1933         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1934                 fatal_error(ctx, 0);
1935
1936         /*
1937          * Mark the system as valid, 'til proven otherwise
1938          */
1939         ext2fs_mark_valid(fs);
1940
1941         retval = ext2fs_read_bb_inode(fs, &fs->badblocks);
1942         if (retval) {
1943                 log_out(ctx, _("%s: %s while reading bad blocks inode\n"),
1944                         ctx->program_name, error_message(retval));
1945                 preenhalt(ctx);
1946                 log_out(ctx, "%s", _("This doesn't bode well, "
1947                                      "but we'll try to go on...\n"));
1948         }
1949
1950         /*
1951          * Save the journal size in megabytes.
1952          * Try and use the journal size from the backup else let e2fsck
1953          * find the default journal size. If fast commit feature is enabled,
1954          * it is not clear how many of the journal blocks were fast commit
1955          * blocks. So, ignore the size of journal found in backup.
1956          *
1957          * TODO: Add a new backup type that captures fast commit info as
1958          * well.
1959          */
1960         if (sb->s_jnl_backup_type == EXT3_JNL_BACKUP_BLOCKS &&
1961                 !ext2fs_has_feature_fast_commit(sb))
1962                 journal_size = (sb->s_jnl_blocks[15] << (32 - 20)) |
1963                                (sb->s_jnl_blocks[16] >> 20);
1964         else
1965                 journal_size = -1;
1966
1967         if (ext2fs_has_feature_quota(sb)) {
1968                 /* Quotas were enabled. Do quota accounting during fsck. */
1969                 clear_problem_context(&pctx);
1970                 pctx.errcode = quota_init_context(&ctx->qctx, ctx->fs, 0);
1971                 if (pctx.errcode) {
1972                         fix_problem(ctx, PR_0_QUOTA_INIT_CTX, &pctx);
1973                         fatal_error(ctx, 0);
1974                 }
1975         }
1976
1977         run_result = e2fsck_run(ctx);
1978         e2fsck_clear_progbar(ctx);
1979
1980         if (!ctx->invalid_bitmaps &&
1981             (ctx->flags & E2F_FLAG_JOURNAL_INODE)) {
1982                 if (fix_problem(ctx, PR_6_RECREATE_JOURNAL, &pctx)) {
1983                         if (journal_size < 1024) {
1984                                 ext2fs_get_journal_params(&jparams, fs);
1985                         } else {
1986                                 jparams.num_journal_blocks = journal_size;
1987                                 jparams.num_fc_blocks = 0;
1988                         }
1989                         log_out(ctx, _("Creating journal (%d blocks): "),
1990                                jparams.num_journal_blocks);
1991                         fflush(stdout);
1992                         retval = ext2fs_add_journal_inode3(fs, &jparams, ~0ULL, 0);
1993                         if (retval) {
1994                                 log_out(ctx, "%s: while trying to create "
1995                                         "journal\n", error_message(retval));
1996                                 goto no_journal;
1997                         }
1998                         log_out(ctx, "%s", _(" Done.\n"));
1999                         log_out(ctx, "%s",
2000                                 _("\n*** journal has been regenerated ***\n"));
2001                 }
2002         }
2003 no_journal:
2004
2005         if (run_result & E2F_FLAG_ABORT) {
2006                 fatal_error(ctx, _("aborted"));
2007         } else if (run_result & E2F_FLAG_CANCEL) {
2008                 log_out(ctx, _("%s: e2fsck canceled.\n"), ctx->device_name ?
2009                         ctx->device_name : ctx->filesystem_name);
2010                 exit_value |= FSCK_CANCELED;
2011         } else if (ctx->qctx && !ctx->invalid_bitmaps) {
2012                 int needs_writeout;
2013
2014                 for (qtype = 0; qtype < MAXQUOTAS; qtype++) {
2015                         if (*quota_sb_inump(sb, qtype) == 0)
2016                                 continue;
2017                         needs_writeout = 0;
2018                         pctx.num = qtype;
2019                         retval = quota_compare_and_update(ctx->qctx, qtype,
2020                                                           &needs_writeout);
2021                         if ((retval || needs_writeout) &&
2022                             fix_problem(ctx, PR_6_UPDATE_QUOTAS, &pctx)) {
2023                                 pctx.errcode = quota_write_inode(ctx->qctx,
2024                                                                  1 << qtype);
2025                                 if (pctx.errcode)
2026                                         (void) fix_problem(ctx,
2027                                                 PR_6_WRITE_QUOTAS, &pctx);
2028                         }
2029                 }
2030                 quota_release_context(&ctx->qctx);
2031         }
2032
2033         if (run_result == E2F_FLAG_RESTART) {
2034                 log_out(ctx, "%s",
2035                         _("Restarting e2fsck from the beginning...\n"));
2036                 retval = e2fsck_reset_context(ctx);
2037                 if (retval) {
2038                         com_err(ctx->program_name, retval, "%s",
2039                                 _("while resetting context"));
2040                         fatal_error(ctx, 0);
2041                 }
2042                 ext2fs_close_free(&ctx->fs);
2043                 goto restart;
2044         }
2045
2046 #ifdef MTRACE
2047         mtrace_print("Cleanup");
2048 #endif
2049         was_changed = ext2fs_test_changed(fs);
2050         if (!(ctx->flags & E2F_FLAG_RUN_RETURN) &&
2051             !(ctx->options & E2F_OPT_READONLY)) {
2052                 if (ext2fs_test_valid(fs)) {
2053                         if (!(sb->s_state & EXT2_VALID_FS))
2054                                 exit_value |= FSCK_NONDESTRUCT;
2055                         sb->s_state = EXT2_VALID_FS;
2056                         if (check_backup_super_block(ctx))
2057                                 fs->flags &= ~EXT2_FLAG_MASTER_SB_ONLY;
2058                 } else
2059                         sb->s_state &= ~EXT2_VALID_FS;
2060                 if (!(ctx->flags & E2F_FLAG_TIME_INSANE))
2061                         sb->s_lastcheck = ctx->now;
2062                 sb->s_mnt_count = 0;
2063                 memset(((char *) sb) + EXT4_S_ERR_START, 0, EXT4_S_ERR_LEN);
2064                 pctx.errcode = ext2fs_set_gdt_csum(ctx->fs);
2065                 if (pctx.errcode)
2066                         fix_problem(ctx, PR_6_SET_BG_CHECKSUM, &pctx);
2067                 ext2fs_mark_super_dirty(fs);
2068         }
2069
2070         if (ext2fs_has_feature_shared_blocks(ctx->fs->super) &&
2071             (ctx->options & E2F_OPT_UNSHARE_BLOCKS) &&
2072             (ctx->options & E2F_OPT_NO))
2073                 /* Don't try to write or flush I/O, we just wanted to know whether or
2074                  * not there were enough free blocks to undo deduplication.
2075                  */
2076                 goto skip_write;
2077
2078         if (!(ctx->options & E2F_OPT_READONLY)) {
2079                 e2fsck_write_bitmaps(ctx);
2080                 if (fs->flags & EXT2_FLAG_DIRTY) {
2081                         pctx.errcode = ext2fs_flush(ctx->fs);
2082                         if (pctx.errcode)
2083                                 fix_problem(ctx, PR_6_FLUSH_FILESYSTEM, &pctx);
2084                 }
2085                 pctx.errcode = io_channel_flush(ctx->fs->io);
2086                 if (pctx.errcode)
2087                         fix_problem(ctx, PR_6_IO_FLUSH, &pctx);
2088         }
2089
2090         if (was_changed) {
2091                 int fs_fixed = (ctx->flags & E2F_FLAG_PROBLEMS_FIXED);
2092
2093                 if (fs_fixed)
2094                         exit_value |= FSCK_NONDESTRUCT;
2095                 if (!(ctx->options & E2F_OPT_PREEN)) {
2096 #if 0   /* Do this later; it breaks too many tests' golden outputs */
2097                         log_out(ctx, fs_fixed ?
2098                                 _("\n%s: ***** FILE SYSTEM ERRORS "
2099                                   "CORRECTED *****\n") :
2100                                 _("%s: File system was modified.\n"),
2101                                 ctx->device_name);
2102 #else
2103                         log_out(ctx,
2104                                 _("\n%s: ***** FILE SYSTEM WAS MODIFIED *****\n"),
2105                                 ctx->device_name);
2106 #endif
2107                 }
2108                 if (ctx->mount_flags & EXT2_MF_ISROOT) {
2109                         log_out(ctx, _("%s: ***** REBOOT SYSTEM *****\n"),
2110                                 ctx->device_name);
2111                         exit_value |= FSCK_REBOOT;
2112                 }
2113         }
2114
2115 skip_write:
2116         if (!ext2fs_test_valid(fs) ||
2117             ((exit_value & FSCK_CANCELED) &&
2118              (sb->s_state & EXT2_ERROR_FS))) {
2119                 log_out(ctx, _("\n%s: ********** WARNING: Filesystem still has "
2120                                "errors **********\n\n"), ctx->device_name);
2121                 exit_value |= FSCK_UNCORRECTED;
2122                 exit_value &= ~FSCK_NONDESTRUCT;
2123         }
2124         if (exit_value & FSCK_CANCELED) {
2125                 int     allow_cancellation;
2126
2127                 profile_get_boolean(ctx->profile, "options",
2128                                     "allow_cancellation", 0, 0,
2129                                     &allow_cancellation);
2130                 exit_value &= ~FSCK_NONDESTRUCT;
2131                 if (allow_cancellation && ext2fs_test_valid(fs) &&
2132                     (sb->s_state & EXT2_VALID_FS) &&
2133                     !(sb->s_state & EXT2_ERROR_FS))
2134                         exit_value = 0;
2135         } else
2136                 show_stats(ctx);
2137
2138         print_resource_track(ctx, NULL, &ctx->global_rtrack, ctx->fs->io);
2139
2140         ext2fs_close_free(&ctx->fs);
2141         free(ctx->journal_name);
2142
2143         if (ctx->logf)
2144                 fprintf(ctx->logf, "Exit status: %d\n", exit_value);
2145         e2fsck_free_context(ctx);
2146         remove_error_table(&et_ext2_error_table);
2147         remove_error_table(&et_prof_error_table);
2148         return exit_value;
2149 }