Whamcloud - gitweb
Miscellaneous gcc -Wall cleanups. Use fixed rather than floating point
[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 #include <stdio.h>
13 #ifdef HAVE_STDLIB_H
14 #include <stdlib.h>
15 #endif
16 #include <string.h>
17 #include <fcntl.h>
18 #include <ctype.h>
19 #include <time.h>
20 #ifdef HAVE_SIGNAL_H
21 #include <signal.h>
22 #endif
23 #ifdef HAVE_GETOPT_H
24 #include <getopt.h>
25 #else
26 extern char *optarg;
27 extern int optind;
28 #endif
29 #include <unistd.h>
30 #ifdef HAVE_ERRNO_H
31 #include <errno.h>
32 #endif
33 #ifdef HAVE_MNTENT_H
34 #include <mntent.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
49 #include "et/com_err.h"
50 #include "e2fsck.h"
51 #include "problem.h"
52 #include "../version.h"
53
54 /* Command line options */
55 static int swapfs;
56 static int normalize_swapfs;
57 static int cflag;               /* check disk */
58 static int show_version_only;
59 static int verbose;
60
61 static int replace_bad_blocks;
62 static int keep_bad_blocks;
63 static char *bad_blocks_file;
64
65 e2fsck_t e2fsck_global_ctx;     /* Try your very best not to use this! */
66
67 #ifdef CONFIG_JBD_DEBUG         /* Enabled by configure --enable-jfs-debug */
68 int journal_enable_debug = -1;
69 #endif
70
71 static void usage(e2fsck_t ctx)
72 {
73         fprintf(stderr,
74                 _("Usage: %s [-panyrcdfvstDFSV] [-b superblock] [-B blocksize]\n"
75                 "\t\t[-I inode_buffer_blocks] [-P process_inode_size]\n"
76                 "\t\t[-l|-L bad_blocks_file] [-C fd] [-j ext-journal]\n"
77                 "\t\t[-E extended-options] device\n"),
78                 ctx->program_name);
79
80         fprintf(stderr, _("\nEmergency help:\n"
81                 " -p                   Automatic repair (no questions)\n"
82                 " -n                   Make no changes to the filesystem\n"
83                 " -y                   Assume \"yes\" to all questions\n"
84                 " -c                   Check for bad blocks and add them to the badblock list\n"
85                 " -f                   Force checking even if filesystem is marked clean\n"));
86         fprintf(stderr, _(""
87                 " -v                   Be verbose\n"
88                 " -b superblock        Use alternative superblock\n"
89                 " -B blocksize         Force blocksize when looking for superblock\n"
90                 " -j external-journal  Set location of the external journal\n"
91                 " -l bad_blocks_file   Add to badblocks list\n"
92                 " -L bad_blocks_file   Set badblocks list\n"
93                 ));
94
95         exit(FSCK_USAGE);
96 }
97
98 static void show_stats(e2fsck_t ctx)
99 {
100         ext2_filsys fs = ctx->fs;
101         int inodes, inodes_used, blocks, blocks_used;
102         int dir_links;
103         int num_files, num_links;
104         int frag_percent;
105
106         dir_links = 2 * ctx->fs_directory_count - 1;
107         num_files = ctx->fs_total_count - dir_links;
108         num_links = ctx->fs_links_count - dir_links;
109         inodes = fs->super->s_inodes_count;
110         inodes_used = (fs->super->s_inodes_count -
111                        fs->super->s_free_inodes_count);
112         blocks = fs->super->s_blocks_count;
113         blocks_used = (fs->super->s_blocks_count -
114                        fs->super->s_free_blocks_count);
115
116         frag_percent = (10000 * ctx->fs_fragmented) / inodes_used;
117         frag_percent = (frag_percent + 5) / 10;
118         
119         if (!verbose) {
120                 printf(_("%s: %d/%d files (%0d.%d%% non-contiguous), %d/%d blocks\n"),
121                        ctx->device_name, inodes_used, inodes,
122                        frag_percent / 10, frag_percent % 10,
123                        blocks_used, blocks);
124                 return;
125         }
126         printf (P_("\n%8d inode used (%d%%)\n", "\n%8d inodes used (%d%%)\n",
127                    inodes_used), inodes_used, 100 * inodes_used / inodes);
128         printf (P_("%8d non-contiguous inode (%0d.%d%%)\n",
129                    "%8d non-contiguous inodes (%0d.%d%%)\n",
130                    ctx->fs_fragmented),
131                 ctx->fs_fragmented, frag_percent / 10, frag_percent % 10);
132         printf (_("         # of inodes with ind/dind/tind blocks: %d/%d/%d\n"),
133                 ctx->fs_ind_count, ctx->fs_dind_count, ctx->fs_tind_count);
134         printf (P_("%8d block used (%d%%)\n", "%8d blocks used (%d%%)\n",
135                    blocks_used),
136                 blocks_used, (int) ((long long) 100 * blocks_used / blocks));
137         printf (P_("%8d bad block\n", "%8d bad blocks\n",
138                    ctx->fs_badblocks_count), ctx->fs_badblocks_count);
139         printf (P_("%8d large file\n", "%8d large files\n",
140                    ctx->large_files), ctx->large_files);
141         printf (P_("\n%8d regular file\n", "\n%8d regular files\n",
142                    ctx->fs_regular_count), ctx->fs_regular_count);
143         printf (P_("%8d directory\n", "%8d directories\n",
144                    ctx->fs_directory_count), ctx->fs_directory_count);
145         printf (P_("%8d character device file\n",
146                    "%8d character device files\n", ctx->fs_chardev_count),
147                 ctx->fs_chardev_count);
148         printf (P_("%8d block device file\n", "%8d block device files\n",
149                    ctx->fs_blockdev_count), ctx->fs_blockdev_count);
150         printf (P_("%8d fifo\n", "%8d fifos\n", ctx->fs_fifo_count),
151                 ctx->fs_fifo_count);
152         printf (P_("%8d link\n", "%8d links\n",
153                    ctx->fs_links_count - dir_links),
154                 ctx->fs_links_count - dir_links);
155         printf (P_("%8d symbolic link", "%8d symbolic links",
156                    ctx->fs_symlinks_count), ctx->fs_symlinks_count);
157         printf (P_(" (%d fast symbolic link)\n", " (%d fast symbolic links)\n",
158                    ctx->fs_fast_symlinks_count), ctx->fs_fast_symlinks_count);
159         printf (P_("%8d socket\n", "%8d sockets\n", ctx->fs_sockets_count),
160                 ctx->fs_sockets_count);
161         printf ("--------\n");
162         printf (P_("%8d file\n", "%8d files\n",
163                    ctx->fs_total_count - dir_links),
164                 ctx->fs_total_count - dir_links);
165 }
166
167 static void check_mount(e2fsck_t ctx)
168 {
169         errcode_t       retval;
170         int             cont;
171
172         retval = ext2fs_check_if_mounted(ctx->filesystem_name,
173                                          &ctx->mount_flags);
174         if (retval) {
175                 com_err("ext2fs_check_if_mount", retval,
176                         _("while determining whether %s is mounted."),
177                         ctx->filesystem_name);
178                 return;
179         }
180
181         /*
182          * If the filesystem isn't mounted, or it's the root filesystem
183          * and it's mounted read-only, then everything's fine.
184          */
185         if ((!(ctx->mount_flags & EXT2_MF_MOUNTED)) ||
186             ((ctx->mount_flags & EXT2_MF_ISROOT) &&
187              (ctx->mount_flags & EXT2_MF_READONLY)))
188                 return;
189
190         if (ctx->options & E2F_OPT_READONLY) {
191                 printf(_("Warning!  %s is mounted.\n"), ctx->filesystem_name);
192                 return;
193         }
194
195         printf(_("%s is mounted.  "), ctx->filesystem_name);
196         if (!ctx->interactive)
197                 fatal_error(ctx, _("Cannot continue, aborting.\n\n"));
198         printf(_("\n\n\007\007\007\007WARNING!!!  "
199                "Running e2fsck on a mounted filesystem may cause\n"
200                "SEVERE filesystem damage.\007\007\007\n\n"));
201         cont = ask_yn(_("Do you really want to continue"), -1);
202         if (!cont) {
203                 printf (_("check aborted.\n"));
204                 exit (0);
205         }
206         return;
207 }
208
209 static int is_on_batt(void)
210 {
211         FILE    *f;
212         DIR     *d;
213         char    tmp[80], tmp2[80], fname[80];
214         unsigned int    acflag;
215         struct dirent*  de;
216
217         f = fopen("/proc/apm", "r");
218         if (f) {
219                 if (fscanf(f, "%s %s %s %x", tmp, tmp, tmp, &acflag) != 4) 
220                         acflag = 1;
221                 fclose(f);
222                 return (acflag != 1);
223         }
224         d = opendir("/proc/acpi/ac_adapter");
225         if (d) {
226                 while ((de=readdir(d)) != NULL) {
227                         if (!strncmp(".", de->d_name, 1))
228                                 continue;
229                         snprintf(fname, 80, "/proc/acpi/ac_adapter/%s/state", 
230                                  de->d_name);
231                         f = fopen(fname, "r");
232                         if (!f)
233                                 continue;
234                         if (fscanf(f, "%s %s", tmp2, tmp) != 2)
235                                 tmp[0] = 0;
236                         fclose(f);
237                         if (strncmp(tmp, "off-line", 8) == 0) {
238                                 closedir(d);
239                                 return 1;
240                         }
241                 }
242                 closedir(d);
243         }
244         return 0;
245 }
246
247 /*
248  * This routine checks to see if a filesystem can be skipped; if so,
249  * it will exit with E2FSCK_OK.  Under some conditions it will print a
250  * message explaining why a check is being forced.
251  */
252 static void check_if_skip(e2fsck_t ctx)
253 {
254         ext2_filsys fs = ctx->fs;
255         const char *reason = NULL;
256         unsigned int reason_arg = 0;
257         long next_check;
258         int batt = is_on_batt();
259         time_t now = time(0);
260         
261         if ((ctx->options & E2F_OPT_FORCE) || bad_blocks_file ||
262             cflag || swapfs)
263                 return;
264         
265         if (fs->super->s_state & EXT2_ERROR_FS)
266                 reason = _(" contains a file system with errors");
267         else if ((fs->super->s_state & EXT2_VALID_FS) == 0)
268                 reason = _(" was not cleanly unmounted");
269         else if ((fs->super->s_max_mnt_count > 0) &&
270                  (fs->super->s_mnt_count >=
271                   (unsigned) fs->super->s_max_mnt_count)) {
272                 reason = _(" has been mounted %u times without being checked");
273                 reason_arg = fs->super->s_mnt_count;
274                 if (batt && (fs->super->s_mnt_count < 
275                              (unsigned) fs->super->s_max_mnt_count*2))
276                         reason = 0;
277         } else if (fs->super->s_checkinterval &&
278                    ((now - fs->super->s_lastcheck) >= 
279                     fs->super->s_checkinterval)) {
280                 reason = _(" has gone %u days without being checked");
281                 reason_arg = (now - fs->super->s_lastcheck)/(3600*24);
282                 if (batt && ((now - fs->super->s_lastcheck) < 
283                              fs->super->s_checkinterval*2))
284                         reason = 0;
285         }
286         if (reason) {
287                 fputs(ctx->device_name, stdout);
288                 printf(reason, reason_arg);
289                 fputs(_(", check forced.\n"), stdout);
290                 return;
291         }
292         printf(_("%s: clean, %d/%d files, %d/%d blocks"), ctx->device_name,
293                fs->super->s_inodes_count - fs->super->s_free_inodes_count,
294                fs->super->s_inodes_count,
295                fs->super->s_blocks_count - fs->super->s_free_blocks_count,
296                fs->super->s_blocks_count);
297         next_check = 100000;
298         if (fs->super->s_max_mnt_count > 0) {
299                 next_check = fs->super->s_max_mnt_count - fs->super->s_mnt_count;
300                 if (next_check <= 0) 
301                         next_check = 1;
302         }
303         if (fs->super->s_checkinterval &&
304             ((now - fs->super->s_lastcheck) >= fs->super->s_checkinterval))
305                 next_check = 1;
306         if (next_check <= 5) {
307                 if (next_check == 1)
308                         fputs(_(" (check after next mount)"), stdout);
309                 else
310                         printf(_(" (check in %ld mounts)"), next_check);
311         }
312         fputc('\n', stdout);
313         ext2fs_close(fs);
314         ctx->fs = NULL;
315         e2fsck_free_context(ctx);
316         exit(FSCK_OK);
317 }
318
319 /*
320  * For completion notice
321  */
322 struct percent_tbl {
323         int     max_pass;
324         int     table[32];
325 };
326 struct percent_tbl e2fsck_tbl = {
327         5, { 0, 70, 90, 92,  95, 100 }
328 };
329 static char bar[128], spaces[128];
330
331 static float calc_percent(struct percent_tbl *tbl, int pass, int curr,
332                           int max)
333 {
334         float   percent;
335         
336         if (pass <= 0)
337                 return 0.0;
338         if (pass > tbl->max_pass || max == 0)
339                 return 100.0;
340         percent = ((float) curr) / ((float) max);
341         return ((percent * (tbl->table[pass] - tbl->table[pass-1]))
342                 + tbl->table[pass-1]);
343 }
344
345 extern void e2fsck_clear_progbar(e2fsck_t ctx)
346 {
347         if (!(ctx->flags & E2F_FLAG_PROG_BAR))
348                 return;
349         
350         printf("%s%s\r%s", ctx->start_meta, spaces + (sizeof(spaces) - 80),
351                ctx->stop_meta);
352         fflush(stdout);
353         ctx->flags &= ~E2F_FLAG_PROG_BAR;
354 }
355
356 int e2fsck_simple_progress(e2fsck_t ctx, const char *label, float percent,
357                            unsigned int dpynum)
358 {
359         static const char spinner[] = "\\|/-";
360         int     i;
361         unsigned int    tick;
362         struct timeval  tv;
363         int dpywidth;
364         int fixed_percent;
365
366         if (ctx->flags & E2F_FLAG_PROG_SUPPRESS)
367                 return 0;
368
369         /*
370          * Calculate the new progress position.  If the
371          * percentage hasn't changed, then we skip out right
372          * away. 
373          */
374         fixed_percent = (int) ((10 * percent) + 0.5);
375         if (ctx->progress_last_percent == fixed_percent)
376                 return 0;
377         ctx->progress_last_percent = fixed_percent;
378
379         /*
380          * If we've already updated the spinner once within
381          * the last 1/8th of a second, no point doing it
382          * again.
383          */
384         gettimeofday(&tv, NULL);
385         tick = (tv.tv_sec << 3) + (tv.tv_usec / (1000000 / 8));
386         if ((tick == ctx->progress_last_time) &&
387             (fixed_percent != 0) && (fixed_percent != 1000))
388                 return 0;
389         ctx->progress_last_time = tick;
390
391         /*
392          * Advance the spinner, and note that the progress bar
393          * will be on the screen
394          */
395         ctx->progress_pos = (ctx->progress_pos+1) & 3;
396         ctx->flags |= E2F_FLAG_PROG_BAR;
397
398         dpywidth = 66 - strlen(label);
399         dpywidth = 8 * (dpywidth / 8);
400         if (dpynum)
401                 dpywidth -= 8;
402
403         i = ((percent * dpywidth) + 50) / 100;
404         printf("%s%s: |%s%s", ctx->start_meta, label,
405                bar + (sizeof(bar) - (i+1)),
406                spaces + (sizeof(spaces) - (dpywidth - i + 1)));
407         if (fixed_percent == 1000)
408                 fputc('|', stdout);
409         else
410                 fputc(spinner[ctx->progress_pos & 3], stdout);
411         printf(" %4.1f%%  ", percent);
412         if (dpynum)
413                 printf("%u\r", dpynum);
414         else
415                 fputs(" \r", stdout);
416         fputs(ctx->stop_meta, stdout);
417         
418         if (fixed_percent == 1000)
419                 e2fsck_clear_progbar(ctx);
420         fflush(stdout);
421
422         return 0;
423 }
424
425 static int e2fsck_update_progress(e2fsck_t ctx, int pass,
426                                   unsigned long cur, unsigned long max)
427 {
428         char buf[80];
429         float percent;
430
431         if (pass == 0)
432                 return 0;
433         
434         if (ctx->progress_fd) {
435                 sprintf(buf, "%d %lu %lu\n", pass, cur, max);
436                 write(ctx->progress_fd, buf, strlen(buf));
437         } else {
438                 percent = calc_percent(&e2fsck_tbl, pass, cur, max);
439                 e2fsck_simple_progress(ctx, ctx->device_name,
440                                        percent, 0);
441         }
442         return 0;
443 }
444
445 #define PATH_SET "PATH=/sbin"
446
447 static void reserve_stdio_fds(void)
448 {
449         int     fd;
450
451         while (1) {
452                 fd = open("/dev/null", O_RDWR);
453                 if (fd > 2)
454                         break;
455                 if (fd < 0) {
456                         fprintf(stderr, _("ERROR: Couldn't open "
457                                 "/dev/null (%s)\n"),
458                                 strerror(errno));
459                         break;
460                 }
461         }
462         close(fd);
463 }
464
465 #ifdef HAVE_SIGNAL_H
466 static void signal_progress_on(int sig EXT2FS_ATTR((unused)))
467 {
468         e2fsck_t ctx = e2fsck_global_ctx;
469
470         if (!ctx)
471                 return;
472
473         ctx->progress = e2fsck_update_progress;
474         ctx->progress_fd = 0;
475 }
476
477 static void signal_progress_off(int sig EXT2FS_ATTR((unused)))
478 {
479         e2fsck_t ctx = e2fsck_global_ctx;
480
481         if (!ctx)
482                 return;
483
484         e2fsck_clear_progbar(ctx);
485         ctx->progress = 0;
486 }
487
488 static void signal_cancel(int sig EXT2FS_ATTR((unused)))
489 {
490         e2fsck_t ctx = e2fsck_global_ctx;
491
492         if (!ctx)
493                 exit(FSCK_CANCELED);
494
495         ctx->flags |= E2F_FLAG_CANCEL;
496 }
497 #endif
498
499 static void parse_extended_opts(e2fsck_t ctx, const char *opts)
500 {
501         char    *buf, *token, *next, *p, *arg;
502         int     ea_ver;
503         int     extended_usage = 0;
504
505         buf = string_copy(ctx, opts, 0);
506         for (token = buf; token && *token; token = next) {
507                 p = strchr(token, ',');
508                 next = 0;
509                 if (p) {
510                         *p = 0;
511                         next = p+1;
512                 } 
513                 arg = strchr(token, '=');
514                 if (arg) {
515                         *arg = 0;
516                         arg++;
517                 }
518                 if (strcmp(token, "ea_ver") == 0) {
519                         if (!arg) {
520                                 extended_usage++;
521                                 continue;
522                         }
523                         ea_ver = strtoul(arg, &p, 0);
524                         if (*p ||
525                             ((ea_ver != 1) && (ea_ver != 2))) {
526                                 fprintf(stderr,
527                                         _("Invalid EA version.\n"));
528                                 extended_usage++;
529                                 continue;
530                         }
531                         ctx->ext_attr_ver = ea_ver;
532                 } else
533                         extended_usage++;
534         }
535         if (extended_usage) {
536                 fprintf(stderr, _("Extended options are separated by commas, "
537                         "and may take an argument which\n"
538                         "is set off by an equals ('=') sign.  "
539                         "Valid raid options are:\n"
540                         "\tea_ver=<ea_version (1 or 2)\n\n"));
541                 exit(1);
542         }
543 }       
544
545
546 static errcode_t PRS(int argc, char *argv[], e2fsck_t *ret_ctx)
547 {
548         int             flush = 0;
549         int             c, fd;
550 #ifdef MTRACE
551         extern void     *mallwatch;
552 #endif
553         e2fsck_t        ctx;
554         errcode_t       retval;
555 #ifdef HAVE_SIGNAL_H
556         struct sigaction        sa;
557 #endif
558         char            *extended_opts = 0;
559
560         retval = e2fsck_allocate_context(&ctx);
561         if (retval)
562                 return retval;
563
564         *ret_ctx = ctx;
565
566         setvbuf(stdout, NULL, _IONBF, BUFSIZ);
567         setvbuf(stderr, NULL, _IONBF, BUFSIZ);
568         if (isatty(0) && isatty(1)) {
569                 ctx->interactive = 1;
570         } else {
571                 ctx->start_meta[0] = '\001';
572                 ctx->stop_meta[0] = '\002';
573         }
574         memset(bar, '=', sizeof(bar)-1);
575         memset(spaces, ' ', sizeof(spaces)-1);
576         initialize_ext2_error_table();
577         blkid_get_cache(&ctx->blkid, NULL);
578         
579         if (argc && *argv)
580                 ctx->program_name = *argv;
581         else
582                 ctx->program_name = "e2fsck";
583         while ((c = getopt (argc, argv, "panyrcC:B:dE:fvtFVM:b:I:j:P:l:L:N:SsDk")) != EOF)
584                 switch (c) {
585                 case 'C':
586                         ctx->progress = e2fsck_update_progress;
587                         ctx->progress_fd = atoi(optarg);
588                         if (!ctx->progress_fd)
589                                 break;
590                         /* Validate the file descriptor to avoid disasters */
591                         fd = dup(ctx->progress_fd);
592                         if (fd < 0) {
593                                 fprintf(stderr,
594                                 _("Error validating file descriptor %d: %s\n"),
595                                         ctx->progress_fd,
596                                         error_message(errno));
597                                 fatal_error(ctx,
598                         _("Invalid completion information file descriptor"));
599                         } else
600                                 close(fd);
601                         break;
602                 case 'D':
603                         ctx->options |= E2F_OPT_COMPRESS_DIRS;
604                         break;
605                 case 'E':
606                         extended_opts = optarg;
607                         break;
608                 case 'p':
609                 case 'a':
610                         if (ctx->options & (E2F_OPT_YES|E2F_OPT_NO)) {
611                         conflict_opt:
612                                 fatal_error(ctx, 
613         _("Only one the options -p/-a, -n or -y may be specified."));
614                         }
615                         ctx->options |= E2F_OPT_PREEN;
616                         break;
617                 case 'n':
618                         if (ctx->options & (E2F_OPT_YES|E2F_OPT_PREEN))
619                                 goto conflict_opt;
620                         ctx->options |= E2F_OPT_NO;
621                         break;
622                 case 'y':
623                         if (ctx->options & (E2F_OPT_PREEN|E2F_OPT_NO))
624                                 goto conflict_opt;
625                         ctx->options |= E2F_OPT_YES;
626                         break;
627                 case 't':
628 #ifdef RESOURCE_TRACK
629                         if (ctx->options & E2F_OPT_TIME)
630                                 ctx->options |= E2F_OPT_TIME2;
631                         else
632                                 ctx->options |= E2F_OPT_TIME;
633 #else
634                         fprintf(stderr, _("The -t option is not "
635                                 "supported on this version of e2fsck.\n"));
636 #endif
637                         break;
638                 case 'c':
639                         if (cflag++)
640                                 ctx->options |= E2F_OPT_WRITECHECK;
641                         ctx->options |= E2F_OPT_CHECKBLOCKS;
642                         break;
643                 case 'r':
644                         /* What we do by default, anyway! */
645                         break;
646                 case 'b':
647                         ctx->use_superblock = atoi(optarg);
648                         ctx->flags |= E2F_FLAG_SB_SPECIFIED;
649                         break;
650                 case 'B':
651                         ctx->blocksize = atoi(optarg);
652                         break;
653                 case 'I':
654                         ctx->inode_buffer_blocks = atoi(optarg);
655                         break;
656                 case 'j':
657                         ctx->journal_name = string_copy(ctx, optarg, 0);
658                         break;
659                 case 'P':
660                         ctx->process_inode_size = atoi(optarg);
661                         break;
662                 case 'L':
663                         replace_bad_blocks++;
664                 case 'l':
665                         bad_blocks_file = string_copy(ctx, optarg, 0);
666                         break;
667                 case 'd':
668                         ctx->options |= E2F_OPT_DEBUG;
669                         break;
670                 case 'f':
671                         ctx->options |= E2F_OPT_FORCE;
672                         break;
673                 case 'F':
674                         flush = 1;
675                         break;
676                 case 'v':
677                         verbose = 1;
678                         break;
679                 case 'V':
680                         show_version_only = 1;
681                         break;
682 #ifdef MTRACE
683                 case 'M':
684                         mallwatch = (void *) strtol(optarg, NULL, 0);
685                         break;
686 #endif
687                 case 'N':
688                         ctx->device_name = optarg;
689                         break;
690 #ifdef ENABLE_SWAPFS
691                 case 's':
692                         normalize_swapfs = 1;
693                 case 'S':
694                         swapfs = 1;
695                         break;
696 #else
697                 case 's':
698                 case 'S':
699                         fprintf(stderr, _("Byte-swapping filesystems "
700                                           "not compiled in this version "
701                                           "of e2fsck\n"));
702                         exit(1);
703 #endif
704                 case 'k':
705                         keep_bad_blocks++;
706                         break;
707                 default:
708                         usage(ctx);
709                 }
710         if (show_version_only)
711                 return 0;
712         if (optind != argc - 1)
713                 usage(ctx);
714         if ((ctx->options & E2F_OPT_NO) && !bad_blocks_file &&
715             !cflag && !swapfs && !(ctx->options & E2F_OPT_COMPRESS_DIRS))
716                 ctx->options |= E2F_OPT_READONLY;
717         ctx->io_options = strchr(argv[optind], '?');
718         if (ctx->io_options) 
719                 *ctx->io_options++ = 0;
720         ctx->filesystem_name = blkid_get_devname(ctx->blkid, argv[optind], 0);
721         if (!ctx->filesystem_name) {
722                 com_err(ctx->program_name, 0, _("Unable to resolve '%s'"), 
723                         argv[optind]);
724                 fatal_error(ctx, 0);
725         }
726         if (extended_opts)
727                 parse_extended_opts(ctx, extended_opts);
728         
729         if (flush) {
730                 fd = open(ctx->filesystem_name, O_RDONLY, 0);
731                 if (fd < 0) {
732                         com_err("open", errno,
733                                 _("while opening %s for flushing"),
734                                 ctx->filesystem_name);
735                         fatal_error(ctx, 0);
736                 }
737                 if ((retval = ext2fs_sync_device(fd, 1))) {
738                         com_err("ext2fs_sync_device", retval,
739                                 _("while trying to flush %s"),
740                                 ctx->filesystem_name);
741                         fatal_error(ctx, 0);
742                 }
743                 close(fd);
744         }
745 #ifdef ENABLE_SWAPFS
746         if (swapfs) {
747                 if (cflag || bad_blocks_file) {
748                         fprintf(stderr, _("Incompatible options not "
749                                           "allowed when byte-swapping.\n"));
750                         exit(FSCK_USAGE);
751                 }
752         }
753 #endif
754         if (cflag && bad_blocks_file) {
755                 fprintf(stderr, _("The -c and the -l/-L options may "
756                                   "not be both used at the same time.\n"));
757                 exit(FSCK_USAGE);
758         }
759 #ifdef HAVE_SIGNAL_H
760         /*
761          * Set up signal action
762          */
763         memset(&sa, 0, sizeof(struct sigaction));
764         sa.sa_handler = signal_cancel;
765         sigaction(SIGINT, &sa, 0);
766         sigaction(SIGTERM, &sa, 0);
767 #ifdef SA_RESTART
768         sa.sa_flags = SA_RESTART;
769 #endif
770         e2fsck_global_ctx = ctx;
771         sa.sa_handler = signal_progress_on;
772         sigaction(SIGUSR1, &sa, 0);
773         sa.sa_handler = signal_progress_off;
774         sigaction(SIGUSR2, &sa, 0);
775 #endif
776
777         /* Update our PATH to include /sbin if we need to run badblocks  */
778         if (cflag) {
779                 char *oldpath = getenv("PATH");
780                 if (oldpath) {
781                         char *newpath;
782
783                         newpath = (char *) malloc(sizeof (PATH_SET) + 1 +
784                                                   strlen (oldpath));
785                         if (!newpath)
786                                 fatal_error(ctx, "Couldn't malloc() newpath");
787                         strcpy (newpath, PATH_SET);
788                         strcat (newpath, ":");
789                         strcat (newpath, oldpath);
790                         putenv (newpath);
791                 } else
792                         putenv (PATH_SET);
793         }
794 #ifdef CONFIG_JBD_DEBUG
795         if (getenv("E2FSCK_JBD_DEBUG"))
796                 journal_enable_debug = atoi(getenv("E2FSCK_JBD_DEBUG"));
797 #endif
798         return 0;
799 }
800
801 static const char *my_ver_string = E2FSPROGS_VERSION;
802 static const char *my_ver_date = E2FSPROGS_DATE;
803                                         
804 int main (int argc, char *argv[])
805 {
806         errcode_t       retval = 0;
807         int             exit_value = FSCK_OK;
808         ext2_filsys     fs = 0;
809         io_manager      io_ptr;
810         struct ext2_super_block *sb;
811         const char      *lib_ver_date;
812         int             my_ver, lib_ver;
813         e2fsck_t        ctx;
814         struct problem_context pctx;
815         int flags, run_result;
816         
817         clear_problem_context(&pctx);
818 #ifdef MTRACE
819         mtrace();
820 #endif
821 #ifdef MCHECK
822         mcheck(0);
823 #endif
824 #ifdef ENABLE_NLS
825         setlocale(LC_MESSAGES, "");
826         setlocale(LC_CTYPE, "");
827         bindtextdomain(NLS_CAT_NAME, LOCALEDIR);
828         textdomain(NLS_CAT_NAME);
829 #endif
830         my_ver = ext2fs_parse_version_string(my_ver_string);
831         lib_ver = ext2fs_get_library_version(0, &lib_ver_date);
832         if (my_ver > lib_ver) {
833                 fprintf( stderr, _("Error: ext2fs library version "
834                         "out of date!\n"));
835                 show_version_only++;
836         }
837         
838         retval = PRS(argc, argv, &ctx);
839         if (retval) {
840                 com_err("e2fsck", retval,
841                         _("while trying to initialize program"));
842                 exit(FSCK_ERROR);
843         }
844         reserve_stdio_fds();
845         
846 #ifdef RESOURCE_TRACK
847         init_resource_track(&ctx->global_rtrack);
848 #endif
849
850         if (!(ctx->options & E2F_OPT_PREEN) || show_version_only)
851                 fprintf(stderr, "e2fsck %s (%s)\n", my_ver_string,
852                          my_ver_date);
853
854         if (show_version_only) {
855                 fprintf(stderr, _("\tUsing %s, %s\n"),
856                         error_message(EXT2_ET_BASE), lib_ver_date);
857                 exit(FSCK_OK);
858         }
859         
860         check_mount(ctx);
861         
862         if (!(ctx->options & E2F_OPT_PREEN) &&
863             !(ctx->options & E2F_OPT_NO) &&
864             !(ctx->options & E2F_OPT_YES)) {
865                 if (!ctx->interactive)
866                         fatal_error(ctx,
867                                     _("need terminal for interactive repairs"));
868         }
869         ctx->superblock = ctx->use_superblock;
870 restart:
871 #ifdef CONFIG_TESTIO_DEBUG
872         io_ptr = test_io_manager;
873         test_io_backing_manager = unix_io_manager;
874 #else
875         io_ptr = unix_io_manager;
876 #endif
877         flags = 0;
878         if ((ctx->options & E2F_OPT_READONLY) == 0)
879                 flags |= EXT2_FLAG_RW;
880
881         if (ctx->superblock && ctx->blocksize) {
882                 retval = ext2fs_open2(ctx->filesystem_name, ctx->io_options, 
883                                       flags, ctx->superblock, ctx->blocksize,
884                                       io_ptr, &fs);
885         } else if (ctx->superblock) {
886                 int blocksize;
887                 for (blocksize = EXT2_MIN_BLOCK_SIZE;
888                      blocksize <= EXT2_MAX_BLOCK_SIZE; blocksize *= 2) {
889                         retval = ext2fs_open2(ctx->filesystem_name, 
890                                               ctx->io_options, flags,
891                                               ctx->superblock, blocksize,
892                                               io_ptr, &fs);
893                         if (!retval)
894                                 break;
895                 }
896         } else 
897                 retval = ext2fs_open2(ctx->filesystem_name, ctx->io_options, 
898                                       flags, 0, 0, io_ptr, &fs);
899         if (!ctx->superblock && !(ctx->options & E2F_OPT_PREEN) &&
900             !(ctx->flags & E2F_FLAG_SB_SPECIFIED) &&
901             ((retval == EXT2_ET_BAD_MAGIC) ||
902              ((retval == 0) && ext2fs_check_desc(fs)))) {
903                 if (!fs || (fs->group_desc_count > 1)) {
904                         printf(_("%s trying backup blocks...\n"),
905                                retval ? _("Couldn't find ext2 superblock,") :
906                                _("Group descriptors look bad..."));
907                         get_backup_sb(ctx, fs, ctx->filesystem_name, io_ptr);
908                         if (fs)
909                                 ext2fs_close(fs);
910                         goto restart;
911                 }
912         }
913         if (retval) {
914                 com_err(ctx->program_name, retval, _("while trying to open %s"),
915                         ctx->filesystem_name);
916                 if (retval == EXT2_ET_REV_TOO_HIGH) {
917                         printf(_("The filesystem revision is apparently "
918                                "too high for this version of e2fsck.\n"
919                                "(Or the filesystem superblock "
920                                "is corrupt)\n\n"));
921                         fix_problem(ctx, PR_0_SB_CORRUPT, &pctx);
922                 } else if (retval == EXT2_ET_SHORT_READ)
923                         printf(_("Could this be a zero-length partition?\n"));
924                 else if ((retval == EPERM) || (retval == EACCES))
925                         printf(_("You must have %s access to the "
926                                "filesystem or be root\n"),
927                                (ctx->options & E2F_OPT_READONLY) ?
928                                "r/o" : "r/w");
929                 else if (retval == ENXIO)
930                         printf(_("Possibly non-existent or swap device?\n"));
931 #ifdef EROFS
932                 else if (retval == EROFS)
933                         printf(_("Disk write-protected; use the -n option "
934                                "to do a read-only\n"
935                                "check of the device.\n"));
936 #endif
937                 else
938                         fix_problem(ctx, PR_0_SB_CORRUPT, &pctx);
939                 fatal_error(ctx, 0);
940         }
941         ctx->fs = fs;
942         fs->priv_data = ctx;
943         sb = fs->super;
944         if (sb->s_rev_level > E2FSCK_CURRENT_REV) {
945                 com_err(ctx->program_name, EXT2_ET_REV_TOO_HIGH,
946                         _("while trying to open %s"),
947                         ctx->filesystem_name);
948         get_newer:
949                 fatal_error(ctx, _("Get a newer version of e2fsck!"));
950         }
951
952         /*
953          * Set the device name, which is used whenever we print error
954          * or informational messages to the user.
955          */
956         if (ctx->device_name == 0 &&
957             (sb->s_volume_name[0] != 0)) {
958                 ctx->device_name = string_copy(ctx, sb->s_volume_name,
959                                                sizeof(sb->s_volume_name));
960         }
961         if (ctx->device_name == 0)
962                 ctx->device_name = ctx->filesystem_name;
963
964         /*
965          * Make sure the ext3 superblock fields are consistent.
966          */
967         retval = e2fsck_check_ext3_journal(ctx);
968         if (retval) {
969                 com_err(ctx->program_name, retval,
970                         _("while checking ext3 journal for %s"),
971                         ctx->device_name);
972                 fatal_error(ctx, 0);
973         }
974
975         /*
976          * Check to see if we need to do ext3-style recovery.  If so,
977          * do it, and then restart the fsck.
978          */
979         if (sb->s_feature_incompat & EXT3_FEATURE_INCOMPAT_RECOVER) {
980                 if (ctx->options & E2F_OPT_READONLY) {
981                         printf(_("Warning: skipping journal recovery "
982                                  "because doing a read-only filesystem "
983                                  "check.\n"));
984                         io_channel_flush(ctx->fs->io);
985                 } else {
986                         if (ctx->flags & E2F_FLAG_RESTARTED) {
987                                 /*
988                                  * Whoops, we attempted to run the
989                                  * journal twice.  This should never
990                                  * happen, unless the hardware or
991                                  * device driver is being bogus.
992                                  */
993                                 com_err(ctx->program_name, 0,
994                                         _("unable to set superblock flags on %s\n"), ctx->device_name);
995                                 fatal_error(ctx, 0);
996                         }
997                         retval = e2fsck_run_ext3_journal(ctx);
998                         if (retval) {
999                                 com_err(ctx->program_name, retval,
1000                                 _("while recovering ext3 journal of %s"),
1001                                         ctx->device_name);
1002                                 fatal_error(ctx, 0);
1003                         }
1004                         ext2fs_close(ctx->fs);
1005                         ctx->fs = 0;
1006                         ctx->flags |= E2F_FLAG_RESTARTED;
1007                         goto restart;
1008                 }
1009         }
1010
1011         /*
1012          * Check for compatibility with the feature sets.  We need to
1013          * be more stringent than ext2fs_open().
1014          */
1015         if ((sb->s_feature_compat & ~EXT2_LIB_FEATURE_COMPAT_SUPP) ||
1016             (sb->s_feature_incompat & ~EXT2_LIB_FEATURE_INCOMPAT_SUPP)) {
1017                 com_err(ctx->program_name, EXT2_ET_UNSUPP_FEATURE,
1018                         "(%s)", ctx->device_name);
1019                 goto get_newer;
1020         }
1021         if (sb->s_feature_ro_compat & ~EXT2_LIB_FEATURE_RO_COMPAT_SUPP) {
1022                 com_err(ctx->program_name, EXT2_ET_RO_UNSUPP_FEATURE,
1023                         "(%s)", ctx->device_name);
1024                 goto get_newer;
1025         }
1026 #ifdef ENABLE_COMPRESSION
1027         if (sb->s_feature_incompat & EXT2_FEATURE_INCOMPAT_COMPRESSION)
1028                 com_err(ctx->program_name, 0,
1029                         _("Warning: compression support is experimental.\n"));
1030 #endif
1031 #ifndef ENABLE_HTREE
1032         if (sb->s_feature_compat & EXT2_FEATURE_COMPAT_DIR_INDEX) {
1033                 com_err(ctx->program_name, 0,
1034                         _("E2fsck not compiled with HTREE support,\n\t"
1035                           "but filesystem %s has HTREE directories.\n"),
1036                         ctx->device_name);
1037                 goto get_newer;
1038         }
1039 #endif
1040
1041         /*
1042          * If the user specified a specific superblock, presumably the
1043          * master superblock has been trashed.  So we mark the
1044          * superblock as dirty, so it can be written out.
1045          */
1046         if (ctx->superblock &&
1047             !(ctx->options & E2F_OPT_READONLY))
1048                 ext2fs_mark_super_dirty(fs);
1049
1050         /*
1051          * We only update the master superblock because (a) paranoia;
1052          * we don't want to corrupt the backup superblocks, and (b) we
1053          * don't need to update the mount count and last checked
1054          * fields in the backup superblock (the kernel doesn't
1055          * update the backup superblocks anyway).
1056          */
1057         fs->flags |= EXT2_FLAG_MASTER_SB_ONLY;
1058
1059         ehandler_init(fs->io);
1060
1061         if (ctx->superblock)
1062                 set_latch_flags(PR_LATCH_RELOC, PRL_LATCHED, 0);
1063         check_super_block(ctx);
1064         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1065                 fatal_error(ctx, 0);
1066         check_if_skip(ctx);
1067         if (bad_blocks_file)
1068                 read_bad_blocks_file(ctx, bad_blocks_file, replace_bad_blocks);
1069         else if (cflag)
1070                 read_bad_blocks_file(ctx, 0, !keep_bad_blocks); /* Test disk */
1071         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1072                 fatal_error(ctx, 0);
1073 #ifdef ENABLE_SWAPFS
1074         if (normalize_swapfs) {
1075                 if ((fs->flags & EXT2_FLAG_SWAP_BYTES) ==
1076                     ext2fs_native_flag()) {
1077                         fprintf(stderr, _("%s: Filesystem byte order "
1078                                 "already normalized.\n"), ctx->device_name);
1079                         fatal_error(ctx, 0);
1080                 }
1081         }
1082         if (swapfs) {
1083                 swap_filesys(ctx);
1084                 if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1085                         fatal_error(ctx, 0);
1086         }
1087 #endif
1088
1089         /*
1090          * Mark the system as valid, 'til proven otherwise
1091          */
1092         ext2fs_mark_valid(fs);
1093
1094         retval = ext2fs_read_bb_inode(fs, &fs->badblocks);
1095         if (retval) {
1096                 com_err(ctx->program_name, retval,
1097                         _("while reading bad blocks inode"));
1098                 preenhalt(ctx);
1099                 printf(_("This doesn't bode well,"
1100                          " but we'll try to go on...\n"));
1101         }
1102
1103         run_result = e2fsck_run(ctx);
1104         e2fsck_clear_progbar(ctx);
1105         if (run_result == E2F_FLAG_RESTART) {
1106                 printf(_("Restarting e2fsck from the beginning...\n"));
1107                 retval = e2fsck_reset_context(ctx);
1108                 if (retval) {
1109                         com_err(ctx->program_name, retval,
1110                                 _("while resetting context"));
1111                         fatal_error(ctx, 0);
1112                 }
1113                 ext2fs_close(fs);
1114                 goto restart;
1115         }
1116         if (run_result & E2F_FLAG_CANCEL) {
1117                 printf(_("%s: e2fsck canceled.\n"), ctx->device_name ?
1118                        ctx->device_name : ctx->filesystem_name);
1119                 exit_value |= FSCK_CANCELED;
1120         }
1121         if (run_result & E2F_FLAG_ABORT)
1122                 fatal_error(ctx, _("aborted"));
1123
1124 #ifdef MTRACE
1125         mtrace_print("Cleanup");
1126 #endif
1127         if (ext2fs_test_changed(fs)) {
1128                 exit_value |= FSCK_NONDESTRUCT;
1129                 if (!(ctx->options & E2F_OPT_PREEN))
1130                     printf(_("\n%s: ***** FILE SYSTEM WAS MODIFIED *****\n"),
1131                                ctx->device_name);
1132                 if (ctx->mount_flags & EXT2_MF_ISROOT) {
1133                         printf(_("%s: ***** REBOOT LINUX *****\n"),
1134                                ctx->device_name);
1135                         exit_value |= FSCK_REBOOT;
1136                 }
1137         }
1138         if (!ext2fs_test_valid(fs)) {
1139                 printf(_("\n%s: ********** WARNING: Filesystem still has "
1140                          "errors **********\n\n"), ctx->device_name);
1141                 exit_value |= FSCK_UNCORRECTED;
1142                 exit_value &= ~FSCK_NONDESTRUCT;
1143         }
1144         if (exit_value & FSCK_CANCELED)
1145                 exit_value &= ~FSCK_NONDESTRUCT;
1146         else {
1147                 show_stats(ctx);
1148                 if (!(ctx->options & E2F_OPT_READONLY)) {
1149                         if (ext2fs_test_valid(fs)) {
1150                                 if (!(sb->s_state & EXT2_VALID_FS))
1151                                         exit_value |= FSCK_NONDESTRUCT;
1152                                 sb->s_state = EXT2_VALID_FS;
1153                         } else
1154                                 sb->s_state &= ~EXT2_VALID_FS;
1155                         sb->s_mnt_count = 0;
1156                         sb->s_lastcheck = time(NULL);
1157                         ext2fs_mark_super_dirty(fs);
1158                 }
1159         }
1160
1161         e2fsck_write_bitmaps(ctx);
1162         
1163         ext2fs_close(fs);
1164         ctx->fs = NULL;
1165         free(ctx->filesystem_name);
1166         free(ctx->journal_name);
1167         e2fsck_free_context(ctx);
1168         
1169 #ifdef RESOURCE_TRACK
1170         if (ctx->options & E2F_OPT_TIME)
1171                 print_resource_track(NULL, &ctx->global_rtrack);
1172 #endif
1173
1174         return exit_value;
1175 }