e2fsck/util.c

   1 /*
   2  * util.c --- miscellaneous utilities
   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 "config.h"
  13 #include <stdlib.h>
  14 #include <stdio.h>
  15 #include <unistd.h>
  16 #include <string.h>
  17 #include <ctype.h>
  18 #ifdef __linux__
  19 #include <sys/utsname.h>
  20 #endif
  21
  22 #ifdef HAVE_CONIO_H
  23 #undef HAVE_TERMIOS_H
  24 #include <conio.h>
  25 #define read_a_char()   getch()
  26 #else
  27 #ifdef HAVE_TERMIOS_H
  28 #include <termios.h>
  29 #endif
  30 #endif
  31
  32 #ifdef HAVE_MALLOC_H
  33 #include <malloc.h>
  34 #endif
  35
  36 #ifdef HAVE_ERRNO_H
  37 #include <errno.h>
  38 #endif
  39
  40 #ifdef HAVE_SYS_SYSCTL_H
  41 #include <sys/sysctl.h>
  42 #endif
  43
  44 #include "e2fsck.h"
  45
  46 extern e2fsck_t e2fsck_global_ctx;   /* Try your very best not to use this! */
  47
  48 #include <stdarg.h>
  49 #include <time.h>
  50 #include <sys/time.h>
  51 #include <sys/resource.h>
  52
  53 void fatal_error(e2fsck_t ctx, const char *msg)
  54 {
  55         ext2_filsys fs = ctx->fs;
  56         int exit_value = FSCK_ERROR;
  57
  58         if (msg)
  59                 fprintf (stderr, "e2fsck: %s\n", msg);
  60         if (!fs)
  61                 goto out;
  62         if (fs->io && fs->super) {
  63                 ext2fs_mmp_stop(ctx->fs);
  64                 if (ctx->fs->io->magic == EXT2_ET_MAGIC_IO_CHANNEL)
  65                         io_channel_flush(ctx->fs->io);
  66                 else
  67                         log_err(ctx, "e2fsck: io manager magic bad!\n");
  68         }
  69         if (ext2fs_test_changed(fs)) {
  70                 exit_value |= FSCK_NONDESTRUCT;
  71                 log_out(ctx, _("\n%s: ***** FILE SYSTEM WAS MODIFIED *****\n"),
  72                         ctx->device_name);
  73                 if (ctx->mount_flags & EXT2_MF_ISROOT)
  74                         exit_value |= FSCK_REBOOT;
  75         }
  76         if (!ext2fs_test_valid(fs)) {
  77                 log_out(ctx, _("\n%s: ********** WARNING: Filesystem still has "
  78                                "errors **********\n\n"), ctx->device_name);
  79                 exit_value |= FSCK_UNCORRECTED;
  80                 exit_value &= ~FSCK_NONDESTRUCT;
  81         }
  82 out:
  83         ctx->flags |= E2F_FLAG_ABORT;
  84         if (ctx->flags & E2F_FLAG_SETJMP_OK)
  85                 longjmp(ctx->abort_loc, 1);
  86         if (ctx->logf)
  87                 fprintf(ctx->logf, "Exit status: %d\n", exit_value);
  88         exit(exit_value);
  89 }
  90
  91 void log_out(e2fsck_t ctx, const char *fmt, ...)
  92 {
  93         va_list pvar;
  94
  95         va_start(pvar, fmt);
  96         vprintf(fmt, pvar);
  97         va_end(pvar);
  98         if (ctx->logf) {
  99                 va_start(pvar, fmt);
 100                 vfprintf(ctx->logf, fmt, pvar);
 101                 va_end(pvar);
 102         }
 103 }
 104
 105 void log_err(e2fsck_t ctx, const char *fmt, ...)
 106 {
 107         va_list pvar;
 108
 109         va_start(pvar, fmt);
 110         vfprintf(stderr, fmt, pvar);
 111         va_end(pvar);
 112         if (ctx->logf) {
 113                 va_start(pvar, fmt);
 114                 vfprintf(ctx->logf, fmt, pvar);
 115                 va_end(pvar);
 116         }
 117 }
 118
 119 void *e2fsck_allocate_memory(e2fsck_t ctx, unsigned int size,
 120                              const char *description)
 121 {
 122         void *ret;
 123         char buf[256];
 124
 125 #ifdef DEBUG_ALLOCATE_MEMORY
 126         printf("Allocating %u bytes for %s...\n", size, description);
 127 #endif
 128         ret = malloc(size);
 129         if (!ret) {
 130                 sprintf(buf, "Can't allocate %u bytes for %s\n",
 131                         size, description);
 132                 fatal_error(ctx, buf);
 133         }
 134         memset(ret, 0, size);
 135         return ret;
 136 }
 137
 138 char *string_copy(e2fsck_t ctx EXT2FS_ATTR((unused)),
 139                   const char *str, int len)
 140 {
 141         char    *ret;
 142
 143         if (!str)
 144                 return NULL;
 145         if (!len)
 146                 len = strlen(str);
 147         ret = malloc(len+1);
 148         if (ret) {
 149                 strncpy(ret, str, len);
 150                 ret[len] = 0;
 151         }
 152         return ret;
 153 }
 154
 155 #ifndef HAVE_STRNLEN
 156 /*
 157  * Incredibly, libc5 doesn't appear to have strnlen.  So we have to
 158  * provide our own.
 159  */
 160 int e2fsck_strnlen(const char * s, int count)
 161 {
 162         const char *cp = s;
 163
 164         while (count-- && *cp)
 165                 cp++;
 166         return cp - s;
 167 }
 168 #endif
 169
 170 #ifndef HAVE_CONIO_H
 171 static int read_a_char(void)
 172 {
 173         char    c;
 174         int     r;
 175         int     fail = 0;
 176
 177         while(1) {
 178                 if (e2fsck_global_ctx &&
 179                     (e2fsck_global_ctx->flags & E2F_FLAG_CANCEL)) {
 180                         return 3;
 181                 }
 182                 r = read(0, &c, 1);
 183                 if (r == 1)
 184                         return c;
 185                 if (fail++ > 100)
 186                         break;
 187         }
 188         return EOF;
 189 }
 190 #endif
 191
 192 int ask_yn(e2fsck_t ctx, const char * string, int def)
 193 {
 194         int             c;
 195         const char      *defstr;
 196         const char      *short_yes = _("yY");
 197         const char      *short_no = _("nN");
 198         const char      *short_yesall = _("aA");
 199         const char      *english_yes = "yY";
 200         const char      *english_no = "nN";
 201         const char      *english_yesall = "aA";
 202         const char      *yesall_prompt = _(" ('a' enables 'yes' to all) ");
 203         const char      *extra_prompt = "";
 204         static int      yes_answers;
 205
 206 #ifdef HAVE_TERMIOS_H
 207         struct termios  termios, tmp;
 208
 209         if (tcgetattr (0, &termios) < 0)
 210                 memset(&termios, 0, sizeof(termios));
 211         tmp = termios;
 212         tmp.c_lflag &= ~(ICANON | ECHO);
 213         tmp.c_cc[VMIN] = 1;
 214         tmp.c_cc[VTIME] = 0;
 215         tcsetattr (0, TCSANOW, &tmp);
 216 #endif
 217
 218         if (def == 1)
 219                 defstr = _(_("<y>"));
 220         else if (def == 0)
 221                 defstr = _(_("<n>"));
 222         else
 223                 defstr = _(" (y/n)");
 224         /*
 225          * If the user presses 'y' more than 8 (but less than 12) times in
 226          * succession without pressing anything else, display a hint about
 227          * yes-to-all mode.
 228          */
 229         if (yes_answers > 12)
 230                 yes_answers = -1;
 231         else if (yes_answers > 8)
 232                 extra_prompt = yesall_prompt;
 233         log_out(ctx, "%s%s%s? ", string, extra_prompt, defstr);
 234         while (1) {
 235                 fflush (stdout);
 236                 if ((c = read_a_char()) == EOF)
 237                         break;
 238                 if (c == 3) {
 239 #ifdef HAVE_TERMIOS_H
 240                         tcsetattr (0, TCSANOW, &termios);
 241 #endif
 242                         if (ctx->flags & E2F_FLAG_SETJMP_OK) {
 243                                 log_out(ctx, "\n");
 244                                 longjmp(e2fsck_global_ctx->abort_loc, 1);
 245                         }
 246                         log_out(ctx, "%s", _("cancelled!\n"));
 247                         yes_answers = 0;
 248                         return 0;
 249                 }
 250                 if (strchr(short_yes, (char) c)) {
 251                 do_yes:
 252                         def = 1;
 253                         if (yes_answers >= 0)
 254                                 yes_answers++;
 255                         break;
 256                 } else if (strchr(short_no, (char) c)) {
 257                 do_no:
 258                         def = 0;
 259                         yes_answers = -1;
 260                         break;
 261                 } else if (strchr(short_yesall, (char)c)) {
 262                 do_all:
 263                         def = 2;
 264                         yes_answers = -1;
 265                         ctx->options |= E2F_OPT_YES;
 266                         break;
 267                 } else if (strchr(english_yes, (char) c)) {
 268                         goto do_yes;
 269                 } else if (strchr(english_no, (char) c)) {
 270                         goto do_no;
 271                 } else if (strchr(english_yesall, (char) c)) {
 272                         goto do_all;
 273                 } else if ((c == 27 || c == ' ' || c == '\n') && (def != -1)) {
 274                         yes_answers = -1;
 275                         break;
 276                 }
 277         }
 278         if (def == 2)
 279                 log_out(ctx, "%s", _("yes to all\n"));
 280         else if (def)
 281                 log_out(ctx, "%s", _("yes\n"));
 282         else
 283                 log_out(ctx, "%s", _("no\n"));
 284 #ifdef HAVE_TERMIOS_H
 285         tcsetattr (0, TCSANOW, &termios);
 286 #endif
 287         return def;
 288 }
 289
 290 int ask (e2fsck_t ctx, const char * string, int def)
 291 {
 292         if (ctx->options & E2F_OPT_NO) {
 293                 log_out(ctx, _("%s? no\n\n"), string);
 294                 return 0;
 295         }
 296         if (ctx->options & E2F_OPT_YES) {
 297                 log_out(ctx, _("%s? yes\n\n"), string);
 298                 return 1;
 299         }
 300         if (ctx->options & E2F_OPT_PREEN) {
 301                 log_out(ctx, "%s? %s\n\n", string, def ? _("yes") : _("no"));
 302                 return def;
 303         }
 304         return ask_yn(ctx, string, def);
 305 }
 306
 307 void e2fsck_read_bitmaps(e2fsck_t ctx)
 308 {
 309         ext2_filsys fs = ctx->fs;
 310         errcode_t       retval;
 311         const char      *old_op;
 312         unsigned int    save_type;
 313         int             flags;
 314
 315         if (ctx->invalid_bitmaps) {
 316                 com_err(ctx->program_name, 0,
 317                     _("e2fsck_read_bitmaps: illegal bitmap block(s) for %s"),
 318                         ctx->device_name);
 319                 fatal_error(ctx, 0);
 320         }
 321
 322         old_op = ehandler_operation(_("reading inode and block bitmaps"));
 323         e2fsck_set_bitmap_type(fs, EXT2FS_BMAP64_RBTREE, "fs_bitmaps",
 324                                &save_type);
 325         flags = ctx->fs->flags;
 326         ctx->fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
 327         retval = ext2fs_read_bitmaps(fs);
 328         ctx->fs->flags = (flags & EXT2_FLAG_IGNORE_CSUM_ERRORS) |
 329                          (ctx->fs->flags & ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
 330         fs->default_bitmap_type = save_type;
 331         ehandler_operation(old_op);
 332         if (retval) {
 333                 com_err(ctx->program_name, retval,
 334                         _("while retrying to read bitmaps for %s"),
 335                         ctx->device_name);
 336                 fatal_error(ctx, 0);
 337         }
 338 }
 339
 340 void e2fsck_write_bitmaps(e2fsck_t ctx)
 341 {
 342         ext2_filsys fs = ctx->fs;
 343         errcode_t       retval;
 344         const char      *old_op;
 345
 346         old_op = ehandler_operation(_("writing block and inode bitmaps"));
 347         retval = ext2fs_write_bitmaps(fs);
 348         ehandler_operation(old_op);
 349         if (retval) {
 350                 com_err(ctx->program_name, retval,
 351                         _("while rewriting block and inode bitmaps for %s"),
 352                         ctx->device_name);
 353                 fatal_error(ctx, 0);
 354         }
 355 }
 356
 357 void preenhalt(e2fsck_t ctx)
 358 {
 359         ext2_filsys fs = ctx->fs;
 360
 361         if (!(ctx->options & E2F_OPT_PREEN))
 362                 return;
 363         log_err(ctx, _("\n\n%s: UNEXPECTED INCONSISTENCY; "
 364                 "RUN fsck MANUALLY.\n\t(i.e., without -a or -p options)\n"),
 365                ctx->device_name);
 366         ctx->flags |= E2F_FLAG_EXITING;
 367         if (fs != NULL) {
 368                 fs->super->s_state |= EXT2_ERROR_FS;
 369                 ext2fs_mark_super_dirty(fs);
 370                 ext2fs_close_free(&fs);
 371         }
 372         exit(FSCK_UNCORRECTED);
 373 }
 374
 375 #ifdef RESOURCE_TRACK
 376 void init_resource_track(struct resource_track *track, io_channel channel)
 377 {
 378 #ifdef HAVE_GETRUSAGE
 379         struct rusage r;
 380 #endif
 381         io_stats io_start = 0;
 382
 383         track->brk_start = sbrk(0);
 384         gettimeofday(&track->time_start, 0);
 385 #ifdef HAVE_GETRUSAGE
 386 #ifdef sun
 387         memset(&r, 0, sizeof(struct rusage));
 388 #endif
 389         getrusage(RUSAGE_SELF, &r);
 390         track->user_start = r.ru_utime;
 391         track->system_start = r.ru_stime;
 392 #else
 393         track->user_start.tv_sec = track->user_start.tv_usec = 0;
 394         track->system_start.tv_sec = track->system_start.tv_usec = 0;
 395 #endif
 396         track->bytes_read = 0;
 397         track->bytes_written = 0;
 398         if (channel && channel->manager && channel->manager->get_stats)
 399                 channel->manager->get_stats(channel, &io_start);
 400         if (io_start) {
 401                 track->bytes_read = io_start->bytes_read;
 402                 track->bytes_written = io_start->bytes_written;
 403         }
 404 }
 405
 406 #ifdef __GNUC__
 407 #define _INLINE_ __inline__
 408 #else
 409 #define _INLINE_
 410 #endif
 411
 412 static _INLINE_ float timeval_subtract(struct timeval *tv1,
 413                                        struct timeval *tv2)
 414 {
 415         return ((tv1->tv_sec - tv2->tv_sec) +
 416                 ((float) (tv1->tv_usec - tv2->tv_usec)) / 1000000);
 417 }
 418
 419 void print_resource_track(e2fsck_t ctx, const char *desc,
 420                           struct resource_track *track, io_channel channel)
 421 {
 422 #ifdef HAVE_GETRUSAGE
 423         struct rusage r;
 424 #endif
 425 #ifdef HAVE_MALLINFO
 426         struct mallinfo malloc_info;
 427 #endif
 428         struct timeval time_end;
 429
 430         if ((desc && !(ctx->options & E2F_OPT_TIME2)) ||
 431             (!desc && !(ctx->options & E2F_OPT_TIME)))
 432                 return;
 433
 434         e2fsck_clear_progbar(ctx);
 435         gettimeofday(&time_end, 0);
 436
 437         if (desc)
 438                 log_out(ctx, "%s: ", desc);
 439
 440 #ifdef HAVE_MALLINFO
 441 #define kbytes(x)       (((unsigned long)(x) + 1023) / 1024)
 442
 443         malloc_info = mallinfo();
 444         log_out(ctx, _("Memory used: %luk/%luk (%luk/%luk), "),
 445                 kbytes(malloc_info.arena), kbytes(malloc_info.hblkhd),
 446                 kbytes(malloc_info.uordblks), kbytes(malloc_info.fordblks));
 447 #else
 448         log_out(ctx, _("Memory used: %lu, "),
 449                 (unsigned long) (((char *) sbrk(0)) -
 450                                  ((char *) track->brk_start)));
 451 #endif
 452 #ifdef HAVE_GETRUSAGE
 453         getrusage(RUSAGE_SELF, &r);
 454
 455         log_out(ctx, _("time: %5.2f/%5.2f/%5.2f\n"),
 456                 timeval_subtract(&time_end, &track->time_start),
 457                 timeval_subtract(&r.ru_utime, &track->user_start),
 458                 timeval_subtract(&r.ru_stime, &track->system_start));
 459 #else
 460         log_out(ctx, _("elapsed time: %6.3f\n"),
 461                 timeval_subtract(&time_end, &track->time_start));
 462 #endif
 463 #define mbytes(x)       (((x) + 1048575) / 1048576)
 464         if (channel && channel->manager && channel->manager->get_stats) {
 465                 io_stats delta = 0;
 466                 unsigned long long bytes_read = 0;
 467                 unsigned long long bytes_written = 0;
 468
 469                 if (desc)
 470                         log_out(ctx, "%s: ", desc);
 471
 472                 channel->manager->get_stats(channel, &delta);
 473                 if (delta) {
 474                         bytes_read = delta->bytes_read - track->bytes_read;
 475                         bytes_written = delta->bytes_written -
 476                                 track->bytes_written;
 477                 }
 478                 log_out(ctx, "I/O read: %lluMB, write: %lluMB, "
 479                         "rate: %.2fMB/s\n",
 480                         mbytes(bytes_read), mbytes(bytes_written),
 481                         (double)mbytes(bytes_read + bytes_written) /
 482                         timeval_subtract(&time_end, &track->time_start));
 483         }
 484 }
 485 #endif /* RESOURCE_TRACK */
 486
 487 void e2fsck_read_inode(e2fsck_t ctx, unsigned long ino,
 488                               struct ext2_inode * inode, const char *proc)
 489 {
 490         errcode_t retval;
 491
 492         retval = ext2fs_read_inode(ctx->fs, ino, inode);
 493         if (retval) {
 494                 com_err("ext2fs_read_inode", retval,
 495                         _("while reading inode %lu in %s"), ino, proc);
 496                 fatal_error(ctx, 0);
 497         }
 498 }
 499
 500 void e2fsck_read_inode_full(e2fsck_t ctx, unsigned long ino,
 501                             struct ext2_inode *inode, int bufsize,
 502                             const char *proc)
 503 {
 504         errcode_t retval;
 505
 506         retval = ext2fs_read_inode_full(ctx->fs, ino, inode, bufsize);
 507         if (retval) {
 508                 com_err("ext2fs_read_inode_full", retval,
 509                         _("while reading inode %lu in %s"), ino, proc);
 510                 fatal_error(ctx, 0);
 511         }
 512 }
 513
 514 void e2fsck_write_inode_full(e2fsck_t ctx, unsigned long ino,
 515                              struct ext2_inode * inode, int bufsize,
 516                              const char *proc)
 517 {
 518         errcode_t retval;
 519
 520         retval = ext2fs_write_inode_full(ctx->fs, ino, inode, bufsize);
 521         if (retval) {
 522                 com_err("ext2fs_write_inode", retval,
 523                         _("while writing inode %lu in %s"), ino, proc);
 524                 fatal_error(ctx, 0);
 525         }
 526 }
 527
 528 void e2fsck_write_inode(e2fsck_t ctx, unsigned long ino,
 529                         struct ext2_inode * inode, const char *proc)
 530 {
 531         errcode_t retval;
 532
 533         retval = ext2fs_write_inode(ctx->fs, ino, inode);
 534         if (retval) {
 535                 com_err("ext2fs_write_inode", retval,
 536                         _("while writing inode %lu in %s"), ino, proc);
 537                 fatal_error(ctx, 0);
 538         }
 539 }
 540
 541 #ifdef MTRACE
 542 void mtrace_print(char *mesg)
 543 {
 544         FILE    *malloc_get_mallstream();
 545         FILE    *f = malloc_get_mallstream();
 546
 547         if (f)
 548                 fprintf(f, "============= %s\n", mesg);
 549 }
 550 #endif
 551
 552 blk64_t get_backup_sb(e2fsck_t ctx, ext2_filsys fs, const char *name,
 553                       io_manager manager)
 554 {
 555         struct ext2_super_block *sb;
 556         io_channel              io = NULL;
 557         void                    *buf = NULL;
 558         int                     blocksize;
 559         blk64_t                 superblock, ret_sb = 8193;
 560
 561         if (fs && fs->super) {
 562                 ret_sb = (fs->super->s_blocks_per_group +
 563                           fs->super->s_first_data_block);
 564                 if (ctx) {
 565                         ctx->superblock = ret_sb;
 566                         ctx->blocksize = fs->blocksize;
 567                 }
 568                 return ret_sb;
 569         }
 570
 571         if (ctx) {
 572                 if (ctx->blocksize) {
 573                         ret_sb = ctx->blocksize * 8;
 574                         if (ctx->blocksize == 1024)
 575                                 ret_sb++;
 576                         ctx->superblock = ret_sb;
 577                         return ret_sb;
 578                 }
 579                 ctx->superblock = ret_sb;
 580                 ctx->blocksize = 1024;
 581         }
 582
 583         if (!name || !manager)
 584                 goto cleanup;
 585
 586         if (manager->open(name, 0, &io) != 0)
 587                 goto cleanup;
 588
 589         if (ext2fs_get_mem(SUPERBLOCK_SIZE, &buf))
 590                 goto cleanup;
 591         sb = (struct ext2_super_block *) buf;
 592
 593         for (blocksize = EXT2_MIN_BLOCK_SIZE;
 594              blocksize <= EXT2_MAX_BLOCK_SIZE ; blocksize *= 2) {
 595                 superblock = blocksize*8;
 596                 if (blocksize == 1024)
 597                         superblock++;
 598                 io_channel_set_blksize(io, blocksize);
 599                 if (io_channel_read_blk64(io, superblock,
 600                                         -SUPERBLOCK_SIZE, buf))
 601                         continue;
 602 #ifdef WORDS_BIGENDIAN
 603                 if (sb->s_magic == ext2fs_swab16(EXT2_SUPER_MAGIC))
 604                         ext2fs_swap_super(sb);
 605 #endif
 606                 if ((sb->s_magic == EXT2_SUPER_MAGIC) &&
 607                     (EXT2_BLOCK_SIZE(sb) == blocksize)) {
 608                         ret_sb = superblock;
 609                         if (ctx) {
 610                                 ctx->superblock = superblock;
 611                                 ctx->blocksize = blocksize;
 612                         }
 613                         break;
 614                 }
 615         }
 616
 617 cleanup:
 618         if (io)
 619                 io_channel_close(io);
 620         if (buf)
 621                 ext2fs_free_mem(&buf);
 622         return (ret_sb);
 623 }
 624
 625 /*
 626  * Given a mode, return the ext2 file type
 627  */
 628 int ext2_file_type(unsigned int mode)
 629 {
 630         if (LINUX_S_ISREG(mode))
 631                 return EXT2_FT_REG_FILE;
 632
 633         if (LINUX_S_ISDIR(mode))
 634                 return EXT2_FT_DIR;
 635
 636         if (LINUX_S_ISCHR(mode))
 637                 return EXT2_FT_CHRDEV;
 638
 639         if (LINUX_S_ISBLK(mode))
 640                 return EXT2_FT_BLKDEV;
 641
 642         if (LINUX_S_ISLNK(mode))
 643                 return EXT2_FT_SYMLINK;
 644
 645         if (LINUX_S_ISFIFO(mode))
 646                 return EXT2_FT_FIFO;
 647
 648         if (LINUX_S_ISSOCK(mode))
 649                 return EXT2_FT_SOCK;
 650
 651         return 0;
 652 }
 653
 654 /*
 655  * Check to see if a filesystem is in /proc/filesystems.
 656  * Returns 1 if found, 0 if not
 657  */
 658 int fs_proc_check(const char *fs_name)
 659 {
 660         FILE    *f;
 661         char    buf[80], *cp, *t;
 662
 663         f = fopen("/proc/filesystems", "r");
 664         if (!f)
 665                 return (0);
 666         while (!feof(f)) {
 667                 if (!fgets(buf, sizeof(buf), f))
 668                         break;
 669                 cp = buf;
 670                 if (!isspace(*cp)) {
 671                         while (*cp && !isspace(*cp))
 672                                 cp++;
 673                 }
 674                 while (*cp && isspace(*cp))
 675                         cp++;
 676                 if ((t = strchr(cp, '\n')) != NULL)
 677                         *t = 0;
 678                 if ((t = strchr(cp, '\t')) != NULL)
 679                         *t = 0;
 680                 if ((t = strchr(cp, ' ')) != NULL)
 681                         *t = 0;
 682                 if (!strcmp(fs_name, cp)) {
 683                         fclose(f);
 684                         return (1);
 685                 }
 686         }
 687         fclose(f);
 688         return (0);
 689 }
 690
 691 /*
 692  * Check to see if a filesystem is available as a module
 693  * Returns 1 if found, 0 if not
 694  */
 695 int check_for_modules(const char *fs_name)
 696 {
 697 #ifdef __linux__
 698         struct utsname  uts;
 699         FILE            *f;
 700         char            buf[1024], *cp, *t;
 701         int             i;
 702
 703         if (uname(&uts))
 704                 return (0);
 705         snprintf(buf, sizeof(buf), "/lib/modules/%s/modules.dep", uts.release);
 706
 707         f = fopen(buf, "r");
 708         if (!f)
 709                 return (0);
 710         while (!feof(f)) {
 711                 if (!fgets(buf, sizeof(buf), f))
 712                         break;
 713                 if ((cp = strchr(buf, ':')) != NULL)
 714                         *cp = 0;
 715                 else
 716                         continue;
 717                 if ((cp = strrchr(buf, '/')) != NULL)
 718                         cp++;
 719                 else
 720                         cp = buf;
 721                 i = strlen(cp);
 722                 if (i > 3) {
 723                         t = cp + i - 3;
 724                         if (!strcmp(t, ".ko"))
 725                                 *t = 0;
 726                 }
 727                 if (!strcmp(cp, fs_name)) {
 728                         fclose(f);
 729                         return (1);
 730                 }
 731         }
 732         fclose(f);
 733 #endif /* __linux__ */
 734         return (0);
 735 }
 736
 737 /*
 738  * Helper function that does the right thing if write returns a
 739  * partial write, or an EAGAIN/EINTR error.
 740  */
 741 int write_all(int fd, char *buf, size_t count)
 742 {
 743         ssize_t ret;
 744         int c = 0;
 745
 746         while (count > 0) {
 747                 ret = write(fd, buf, count);
 748                 if (ret < 0) {
 749                         if ((errno == EAGAIN) || (errno == EINTR))
 750                                 continue;
 751                         return -1;
 752                 }
 753                 count -= ret;
 754                 buf += ret;
 755                 c += ret;
 756         }
 757         return c;
 758 }
 759
 760 void dump_mmp_msg(struct mmp_struct *mmp, const char *fmt, ...)
 761 {
 762         va_list pvar;
 763
 764         if (fmt) {
 765                 printf("MMP check failed: ");
 766                 va_start(pvar, fmt);
 767                 vprintf(fmt, pvar);
 768                 va_end(pvar);
 769         }
 770         if (mmp) {
 771                 time_t t = mmp->mmp_time;
 772
 773                 printf("MMP_block:\n");
 774                 printf("    mmp_magic: 0x%x\n", mmp->mmp_magic);
 775                 printf("    mmp_check_interval: %d\n",
 776                        mmp->mmp_check_interval);
 777                 printf("    mmp_sequence: %08x\n", mmp->mmp_seq);
 778                 printf("    mmp_update_date: %s", ctime(&t));
 779                 printf("    mmp_update_time: %lld\n", mmp->mmp_time);
 780                 printf("    mmp_node_name: %s\n", mmp->mmp_nodename);
 781                 printf("    mmp_device_name: %s\n", mmp->mmp_bdevname);
 782         }
 783 }
 784
 785 errcode_t e2fsck_mmp_update(ext2_filsys fs)
 786 {
 787         errcode_t retval;
 788
 789         retval = ext2fs_mmp_update(fs);
 790         if (retval == EXT2_ET_MMP_CHANGE_ABORT)
 791                 dump_mmp_msg(fs->mmp_cmp,
 792                              _("UNEXPECTED INCONSISTENCY: the filesystem is "
 793                                "being modified while fsck is running.\n"));
 794
 795         return retval;
 796 }
 797
 798 void e2fsck_set_bitmap_type(ext2_filsys fs, unsigned int default_type,
 799                             const char *profile_name, unsigned int *old_type)
 800 {
 801         unsigned type;
 802         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
 803
 804         if (old_type)
 805                 *old_type = fs->default_bitmap_type;
 806         profile_get_uint(ctx->profile, "bitmaps", profile_name, 0,
 807                          default_type, &type);
 808         profile_get_uint(ctx->profile, "bitmaps", "all", 0, type, &type);
 809         fs->default_bitmap_type = type ? type : default_type;
 810 }
 811
 812 errcode_t e2fsck_allocate_inode_bitmap(ext2_filsys fs, const char *descr,
 813                                        int deftype,
 814                                        const char *name,
 815                                        ext2fs_inode_bitmap *ret)
 816 {
 817         errcode_t       retval;
 818         unsigned int    save_type;
 819
 820         e2fsck_set_bitmap_type(fs, deftype, name, &save_type);
 821         retval = ext2fs_allocate_inode_bitmap(fs, descr, ret);
 822         fs->default_bitmap_type = save_type;
 823         return retval;
 824 }
 825
 826 errcode_t e2fsck_allocate_block_bitmap(ext2_filsys fs, const char *descr,
 827                                        int deftype,
 828                                        const char *name,
 829                                        ext2fs_block_bitmap *ret)
 830 {
 831         errcode_t       retval;
 832         unsigned int    save_type;
 833
 834         e2fsck_set_bitmap_type(fs, deftype, name, &save_type);
 835         retval = ext2fs_allocate_block_bitmap(fs, descr, ret);
 836         fs->default_bitmap_type = save_type;
 837         return retval;
 838 }
 839
 840 errcode_t e2fsck_allocate_subcluster_bitmap(ext2_filsys fs, const char *descr,
 841                                             int deftype,
 842                                             const char *name,
 843                                             ext2fs_block_bitmap *ret)
 844 {
 845         errcode_t       retval;
 846         unsigned int    save_type;
 847
 848         e2fsck_set_bitmap_type(fs, deftype, name, &save_type);
 849         retval = ext2fs_allocate_subcluster_bitmap(fs, descr, ret);
 850         fs->default_bitmap_type = save_type;
 851         return retval;
 852 }
 853
 854 /* Return memory size in bytes */
 855 unsigned long long get_memory_size(void)
 856 {
 857 #if defined(_SC_PHYS_PAGES)
 858 # if defined(_SC_PAGESIZE)
 859         return (unsigned long long)sysconf(_SC_PHYS_PAGES) *
 860                (unsigned long long)sysconf(_SC_PAGESIZE);
 861 # elif defined(_SC_PAGE_SIZE)
 862         return (unsigned long long)sysconf(_SC_PHYS_PAGES) *
 863                (unsigned long long)sysconf(_SC_PAGE_SIZE);
 864 # endif
 865 #elif defined(CTL_HW)
 866 # if (defined(HW_MEMSIZE) || defined(HW_PHYSMEM64))
 867 #  define CTL_HW_INT64
 868 # elif (defined(HW_PHYSMEM) || defined(HW_REALMEM))
 869 #  define CTL_HW_UINT
 870 # endif
 871         int mib[2];
 872
 873         mib[0] = CTL_HW;
 874 # if defined(HW_MEMSIZE)
 875         mib[1] = HW_MEMSIZE;
 876 # elif defined(HW_PHYSMEM64)
 877         mib[1] = HW_PHYSMEM64;
 878 # elif defined(HW_REALMEM)
 879         mib[1] = HW_REALMEM;
 880 # elif defined(HW_PYSMEM)
 881         mib[1] = HW_PHYSMEM;
 882 # endif
 883 # if defined(CTL_HW_INT64)
 884         unsigned long long size = 0;
 885 # elif defined(CTL_HW_UINT)
 886         unsigned int size = 0;
 887 # endif
 888 # if defined(CTL_HW_INT64) || defined(CTL_HW_UINT)
 889         size_t len = sizeof(size);
 890
 891         if (sysctl(mib, 2, &size, &len, NULL, 0) == 0)
 892                 return (unsigned long long)size;
 893 # endif
 894         return 0;
 895 #else
 896 # warning "Don't know how to detect memory on your platform?"
 897         return 0;
 898 #endif
 899 }