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