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