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