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