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