e2fsck/pass2.c

   1 /*
   2  * pass2.c --- check directory structure
   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  * Pass 2 of e2fsck iterates through all active directory inodes, and
  12  * applies to following tests to each directory entry in the directory
  13  * blocks in the inodes:
  14  *
  15  *      - The length of the directory entry (rec_len) should be at
  16  *              least 8 bytes, and no more than the remaining space
  17  *              left in the directory block.
  18  *      - The length of the name in the directory entry (name_len)
  19  *              should be less than (rec_len - 8).
  20  *      - The inode number in the directory entry should be within
  21  *              legal bounds.
  22  *      - The inode number should refer to a in-use inode.
  23  *      - The first entry should be '.', and its inode should be
  24  *              the inode of the directory.
  25  *      - The second entry should be '..'.
  26  *
  27  * To minimize disk seek time, the directory blocks are processed in
  28  * sorted order of block numbers.
  29  *
  30  * Pass 2 also collects the following information:
  31  *      - The inode numbers of the subdirectories for each directory.
  32  *
  33  * Pass 2 relies on the following information from previous passes:
  34  *      - The directory information collected in pass 1.
  35  *      - The inode_used_map bitmap
  36  *      - The inode_bad_map bitmap
  37  *      - The inode_dir_map bitmap
  38  *
  39  * Pass 2 frees the following data structures
  40  *      - The inode_bad_map bitmap
  41  *      - The inode_reg_map bitmap
  42  */
  43
  44 #define _GNU_SOURCE 1 /* get strnlen() */
  45 #include <string.h>
  46
  47 #include "e2fsck.h"
  48 #include "problem.h"
  49 #include "dict.h"
  50
  51 #ifdef NO_INLINE_FUNCS
  52 #define _INLINE_
  53 #else
  54 #define _INLINE_ inline
  55 #endif
  56
  57 /* #define DX_DEBUG */
  58
  59 /*
  60  * Keeps track of how many times an inode is referenced.
  61  */
  62 static void deallocate_inode(e2fsck_t ctx, ext2_ino_t ino, char* block_buf);
  63 static int check_dir_block(ext2_filsys fs,
  64                            struct ext2_db_entry *dir_blocks_info,
  65                            void *priv_data);
  66 static int allocate_dir_block(e2fsck_t ctx,
  67                               struct ext2_db_entry *dir_blocks_info,
  68                               char *buf, struct problem_context *pctx);
  69 static int update_dir_block(ext2_filsys fs,
  70                             blk_t       *block_nr,
  71                             e2_blkcnt_t blockcnt,
  72                             blk_t       ref_block,
  73                             int         ref_offset,
  74                             void        *priv_data);
  75 static void clear_htree(e2fsck_t ctx, ext2_ino_t ino);
  76 static int htree_depth(struct dx_dir_info *dx_dir,
  77                        struct dx_dirblock_info *dx_db);
  78 static EXT2_QSORT_TYPE special_dir_block_cmp(const void *a, const void *b);
  79
  80 struct check_dir_struct {
  81         char *buf;
  82         struct problem_context  pctx;
  83         int     count, max;
  84         e2fsck_t ctx;
  85 };
  86
  87 void e2fsck_pass2(e2fsck_t ctx)
  88 {
  89         struct ext2_super_block *sb = ctx->fs->super;
  90         struct problem_context  pctx;
  91         ext2_filsys             fs = ctx->fs;
  92         char                    *buf;
  93 #ifdef RESOURCE_TRACK
  94         struct resource_track   rtrack;
  95 #endif
  96         struct check_dir_struct cd;
  97         struct dx_dir_info      *dx_dir;
  98         struct dx_dirblock_info *dx_db, *dx_parent;
  99         int                     b;
 100         int                     i, depth;
 101         problem_t               code;
 102         int                     bad_dir;
 103
 104 #ifdef RESOURCE_TRACK
 105         init_resource_track(&rtrack, ctx->fs->io);
 106 #endif
 107
 108         clear_problem_context(&cd.pctx);
 109
 110 #ifdef MTRACE
 111         mtrace_print("Pass 2");
 112 #endif
 113
 114         if (!(ctx->options & E2F_OPT_PREEN))
 115                 fix_problem(ctx, PR_2_PASS_HEADER, &cd.pctx);
 116
 117         e2fsck_setup_tdb_icount(ctx, EXT2_ICOUNT_OPT_INCREMENT,
 118                                 &ctx->inode_count);
 119         if (ctx->inode_count)
 120                 cd.pctx.errcode = 0;
 121         else
 122                 cd.pctx.errcode = ext2fs_create_icount2(fs,
 123                                                 EXT2_ICOUNT_OPT_INCREMENT,
 124                                                 0, ctx->inode_link_info,
 125                                                 &ctx->inode_count);
 126         if (cd.pctx.errcode) {
 127                 fix_problem(ctx, PR_2_ALLOCATE_ICOUNT, &cd.pctx);
 128                 ctx->flags |= E2F_FLAG_ABORT;
 129                 return;
 130         }
 131         buf = (char *) e2fsck_allocate_memory(ctx, 2*fs->blocksize,
 132                                               "directory scan buffer");
 133
 134         /*
 135          * Set up the parent pointer for the root directory, if
 136          * present.  (If the root directory is not present, we will
 137          * create it in pass 3.)
 138          */
 139         (void) e2fsck_dir_info_set_parent(ctx, EXT2_ROOT_INO, EXT2_ROOT_INO);
 140
 141         cd.buf = buf;
 142         cd.ctx = ctx;
 143         cd.count = 1;
 144         cd.max = ext2fs_dblist_count(fs->dblist);
 145
 146         if (ctx->progress)
 147                 (void) (ctx->progress)(ctx, 2, 0, cd.max);
 148
 149         if (fs->super->s_feature_compat & EXT2_FEATURE_COMPAT_DIR_INDEX)
 150                 ext2fs_dblist_sort(fs->dblist, special_dir_block_cmp);
 151
 152         cd.pctx.errcode = ext2fs_dblist_iterate(fs->dblist, check_dir_block,
 153                                                 &cd);
 154         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
 155                 return;
 156         if (cd.pctx.errcode) {
 157                 fix_problem(ctx, PR_2_DBLIST_ITERATE, &cd.pctx);
 158                 ctx->flags |= E2F_FLAG_ABORT;
 159                 return;
 160         }
 161
 162 #ifdef ENABLE_HTREE
 163         for (i=0; (dx_dir = e2fsck_dx_dir_info_iter(ctx, &i)) != 0;) {
 164                 if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
 165                         return;
 166                 if (dx_dir->numblocks == 0)
 167                         continue;
 168                 clear_problem_context(&pctx);
 169                 bad_dir = 0;
 170                 pctx.dir = dx_dir->ino;
 171                 dx_db = dx_dir->dx_block;
 172                 if (dx_db->flags & DX_FLAG_REFERENCED)
 173                         dx_db->flags |= DX_FLAG_DUP_REF;
 174                 else
 175                         dx_db->flags |= DX_FLAG_REFERENCED;
 176                 /*
 177                  * Find all of the first and last leaf blocks, and
 178                  * update their parent's min and max hash values
 179                  */
 180                 for (b=0, dx_db = dx_dir->dx_block;
 181                      b < dx_dir->numblocks;
 182                      b++, dx_db++) {
 183                         if ((dx_db->type != DX_DIRBLOCK_LEAF) ||
 184                             !(dx_db->flags & (DX_FLAG_FIRST | DX_FLAG_LAST)))
 185                                 continue;
 186                         dx_parent = &dx_dir->dx_block[dx_db->parent];
 187                         /*
 188                          * XXX Make sure dx_parent->min_hash > dx_db->min_hash
 189                          */
 190                         if (dx_db->flags & DX_FLAG_FIRST)
 191                                 dx_parent->min_hash = dx_db->min_hash;
 192                         /*
 193                          * XXX Make sure dx_parent->max_hash < dx_db->max_hash
 194                          */
 195                         if (dx_db->flags & DX_FLAG_LAST)
 196                                 dx_parent->max_hash = dx_db->max_hash;
 197                 }
 198
 199                 for (b=0, dx_db = dx_dir->dx_block;
 200                      b < dx_dir->numblocks;
 201                      b++, dx_db++) {
 202                         pctx.blkcount = b;
 203                         pctx.group = dx_db->parent;
 204                         code = 0;
 205                         if (!(dx_db->flags & DX_FLAG_FIRST) &&
 206                             (dx_db->min_hash < dx_db->node_min_hash)) {
 207                                 pctx.blk = dx_db->min_hash;
 208                                 pctx.blk2 = dx_db->node_min_hash;
 209                                 code = PR_2_HTREE_MIN_HASH;
 210                                 fix_problem(ctx, code, &pctx);
 211                                 bad_dir++;
 212                         }
 213                         if (dx_db->type == DX_DIRBLOCK_LEAF) {
 214                                 depth = htree_depth(dx_dir, dx_db);
 215                                 if (depth != dx_dir->depth) {
 216                                         code = PR_2_HTREE_BAD_DEPTH;
 217                                         fix_problem(ctx, code, &pctx);
 218                                         bad_dir++;
 219                                 }
 220                         }
 221                         /*
 222                          * This test doesn't apply for the root block
 223                          * at block #0
 224                          */
 225                         if (b &&
 226                             (dx_db->max_hash > dx_db->node_max_hash)) {
 227                                 pctx.blk = dx_db->max_hash;
 228                                 pctx.blk2 = dx_db->node_max_hash;
 229                                 code = PR_2_HTREE_MAX_HASH;
 230                                 fix_problem(ctx, code, &pctx);
 231                                 bad_dir++;
 232                         }
 233                         if (!(dx_db->flags & DX_FLAG_REFERENCED)) {
 234                                 code = PR_2_HTREE_NOTREF;
 235                                 fix_problem(ctx, code, &pctx);
 236                                 bad_dir++;
 237                         } else if (dx_db->flags & DX_FLAG_DUP_REF) {
 238                                 code = PR_2_HTREE_DUPREF;
 239                                 fix_problem(ctx, code, &pctx);
 240                                 bad_dir++;
 241                         }
 242                         if (code == 0)
 243                                 continue;
 244                 }
 245                 if (bad_dir && fix_problem(ctx, PR_2_HTREE_CLEAR, &pctx)) {
 246                         clear_htree(ctx, dx_dir->ino);
 247                         dx_dir->numblocks = 0;
 248                 }
 249         }
 250 #endif
 251         ext2fs_free_mem(&buf);
 252         ext2fs_free_dblist(fs->dblist);
 253
 254         if (ctx->inode_bad_map) {
 255                 ext2fs_free_inode_bitmap(ctx->inode_bad_map);
 256                 ctx->inode_bad_map = 0;
 257         }
 258         if (ctx->inode_reg_map) {
 259                 ext2fs_free_inode_bitmap(ctx->inode_reg_map);
 260                 ctx->inode_reg_map = 0;
 261         }
 262
 263         clear_problem_context(&pctx);
 264         if (ctx->large_files) {
 265                 if (!(sb->s_feature_ro_compat &
 266                       EXT2_FEATURE_RO_COMPAT_LARGE_FILE) &&
 267                     fix_problem(ctx, PR_2_FEATURE_LARGE_FILES, &pctx)) {
 268                         sb->s_feature_ro_compat |=
 269                                 EXT2_FEATURE_RO_COMPAT_LARGE_FILE;
 270                         fs->flags &= ~EXT2_FLAG_MASTER_SB_ONLY;
 271                         ext2fs_mark_super_dirty(fs);
 272                 }
 273                 if (sb->s_rev_level == EXT2_GOOD_OLD_REV &&
 274                     fix_problem(ctx, PR_1_FS_REV_LEVEL, &pctx)) {
 275                         ext2fs_update_dynamic_rev(fs);
 276                         ext2fs_mark_super_dirty(fs);
 277                 }
 278         }
 279
 280 #ifdef RESOURCE_TRACK
 281         if (ctx->options & E2F_OPT_TIME2) {
 282                 e2fsck_clear_progbar(ctx);
 283                 print_resource_track(_("Pass 2"), &rtrack, fs->io);
 284         }
 285 #endif
 286 }
 287
 288 #define MAX_DEPTH 32000
 289 static int htree_depth(struct dx_dir_info *dx_dir,
 290                        struct dx_dirblock_info *dx_db)
 291 {
 292         int     depth = 0;
 293
 294         while (dx_db->type != DX_DIRBLOCK_ROOT && depth < MAX_DEPTH) {
 295                 dx_db = &dx_dir->dx_block[dx_db->parent];
 296                 depth++;
 297         }
 298         return depth;
 299 }
 300
 301 static int dict_de_cmp(const void *a, const void *b)
 302 {
 303         const struct ext2_dir_entry *de_a, *de_b;
 304         int     a_len, b_len;
 305
 306         de_a = (const struct ext2_dir_entry *) a;
 307         a_len = de_a->name_len & 0xFF;
 308         de_b = (const struct ext2_dir_entry *) b;
 309         b_len = de_b->name_len & 0xFF;
 310
 311         if (a_len != b_len)
 312                 return (a_len - b_len);
 313
 314         return strncmp(de_a->name, de_b->name, a_len);
 315 }
 316
 317 /*
 318  * This is special sort function that makes sure that directory blocks
 319  * with a dirblock of zero are sorted to the beginning of the list.
 320  * This guarantees that the root node of the htree directories are
 321  * processed first, so we know what hash version to use.
 322  */
 323 static EXT2_QSORT_TYPE special_dir_block_cmp(const void *a, const void *b)
 324 {
 325         const struct ext2_db_entry *db_a =
 326                 (const struct ext2_db_entry *) a;
 327         const struct ext2_db_entry *db_b =
 328                 (const struct ext2_db_entry *) b;
 329
 330         if (db_a->blockcnt && !db_b->blockcnt)
 331                 return 1;
 332
 333         if (!db_a->blockcnt && db_b->blockcnt)
 334                 return -1;
 335
 336         if (db_a->blk != db_b->blk)
 337                 return (int) (db_a->blk - db_b->blk);
 338
 339         if (db_a->ino != db_b->ino)
 340                 return (int) (db_a->ino - db_b->ino);
 341
 342         return (int) (db_a->blockcnt - db_b->blockcnt);
 343 }
 344
 345
 346 /*
 347  * Make sure the first entry in the directory is '.', and that the
 348  * directory entry is sane.
 349  */
 350 static int check_dot(e2fsck_t ctx,
 351                      struct ext2_dir_entry *dirent,
 352                      ext2_ino_t ino, struct problem_context *pctx)
 353 {
 354         struct ext2_dir_entry *nextdir;
 355         int     status = 0;
 356         int     created = 0;
 357         int     new_len;
 358         int     problem = 0;
 359
 360         if (!dirent->inode)
 361                 problem = PR_2_MISSING_DOT;
 362         else if (((dirent->name_len & 0xFF) != 1) ||
 363                  (dirent->name[0] != '.'))
 364                 problem = PR_2_1ST_NOT_DOT;
 365         else if (dirent->name[1] != '\0')
 366                 problem = PR_2_DOT_NULL_TERM;
 367
 368         if (problem) {
 369                 if (fix_problem(ctx, problem, pctx)) {
 370                         if (dirent->rec_len < 12)
 371                                 dirent->rec_len = 12;
 372                         dirent->inode = ino;
 373                         dirent->name_len = 1;
 374                         dirent->name[0] = '.';
 375                         dirent->name[1] = '\0';
 376                         status = 1;
 377                         created = 1;
 378                 }
 379         }
 380         if (dirent->inode != ino) {
 381                 if (fix_problem(ctx, PR_2_BAD_INODE_DOT, pctx)) {
 382                         dirent->inode = ino;
 383                         status = 1;
 384                 }
 385         }
 386         if (dirent->rec_len > 12) {
 387                 new_len = dirent->rec_len - 12;
 388                 if (new_len > 12) {
 389                         if (created ||
 390                             fix_problem(ctx, PR_2_SPLIT_DOT, pctx)) {
 391                                 nextdir = (struct ext2_dir_entry *)
 392                                         ((char *) dirent + 12);
 393                                 dirent->rec_len = 12;
 394                                 nextdir->rec_len = new_len;
 395                                 nextdir->inode = 0;
 396                                 nextdir->name_len = 0;
 397                                 status = 1;
 398                         }
 399                 }
 400         }
 401         return status;
 402 }
 403
 404 /*
 405  * Make sure the second entry in the directory is '..', and that the
 406  * directory entry is sane.  We do not check the inode number of '..'
 407  * here; this gets done in pass 3.
 408  */
 409 static int check_dotdot(e2fsck_t ctx,
 410                         struct ext2_dir_entry *dirent,
 411                         ext2_ino_t ino, struct problem_context *pctx)
 412 {
 413         int                     problem = 0;
 414
 415         if (!dirent->inode)
 416                 problem = PR_2_MISSING_DOT_DOT;
 417         else if (((dirent->name_len & 0xFF) != 2) ||
 418                  (dirent->name[0] != '.') ||
 419                  (dirent->name[1] != '.'))
 420                 problem = PR_2_2ND_NOT_DOT_DOT;
 421         else if (dirent->name[2] != '\0')
 422                 problem = PR_2_DOT_DOT_NULL_TERM;
 423
 424         if (problem) {
 425                 if (fix_problem(ctx, problem, pctx)) {
 426                         if (dirent->rec_len < 12)
 427                                 dirent->rec_len = 12;
 428                         /*
 429                          * Note: we don't have the parent inode just
 430                          * yet, so we will fill it in with the root
 431                          * inode.  This will get fixed in pass 3.
 432                          */
 433                         dirent->inode = EXT2_ROOT_INO;
 434                         dirent->name_len = 2;
 435                         dirent->name[0] = '.';
 436                         dirent->name[1] = '.';
 437                         dirent->name[2] = '\0';
 438                         return 1;
 439                 }
 440                 return 0;
 441         }
 442         if (e2fsck_dir_info_set_dotdot(ctx, ino, dirent->inode)) {
 443                 fix_problem(ctx, PR_2_NO_DIRINFO, pctx);
 444                 return -1;
 445         }
 446         return 0;
 447 }
 448
 449 /*
 450  * Check to make sure a directory entry doesn't contain any illegal
 451  * characters.
 452  */
 453 static int check_name(e2fsck_t ctx,
 454                       struct ext2_dir_entry *dirent,
 455                       ext2_ino_t dir_ino EXT2FS_ATTR((unused)),
 456                       struct problem_context *pctx)
 457 {
 458         int     i;
 459         int     fixup = -1;
 460         int     ret = 0;
 461
 462         for ( i = 0; i < (dirent->name_len & 0xFF); i++) {
 463                 if (dirent->name[i] == '/' || dirent->name[i] == '\0') {
 464                         if (fixup < 0) {
 465                                 fixup = fix_problem(ctx, PR_2_BAD_NAME, pctx);
 466                         }
 467                         if (fixup) {
 468                                 dirent->name[i] = '.';
 469                                 ret = 1;
 470                         }
 471                 }
 472         }
 473         return ret;
 474 }
 475
 476 /*
 477  * Check the directory filetype (if present)
 478  */
 479 static _INLINE_ int check_filetype(e2fsck_t ctx,
 480                                    struct ext2_dir_entry *dirent,
 481                                    ext2_ino_t dir_ino EXT2FS_ATTR((unused)),
 482                                    struct problem_context *pctx)
 483 {
 484         int     filetype = dirent->name_len >> 8;
 485         int     should_be = EXT2_FT_UNKNOWN;
 486         struct ext2_inode       inode;
 487
 488         if (!(ctx->fs->super->s_feature_incompat &
 489               EXT2_FEATURE_INCOMPAT_FILETYPE)) {
 490                 if (filetype == 0 ||
 491                     !fix_problem(ctx, PR_2_CLEAR_FILETYPE, pctx))
 492                         return 0;
 493                 dirent->name_len = dirent->name_len & 0xFF;
 494                 return 1;
 495         }
 496
 497         if (ext2fs_test_inode_bitmap(ctx->inode_dir_map, dirent->inode)) {
 498                 should_be = EXT2_FT_DIR;
 499         } else if (ext2fs_test_inode_bitmap(ctx->inode_reg_map,
 500                                             dirent->inode)) {
 501                 should_be = EXT2_FT_REG_FILE;
 502         } else if (ctx->inode_bad_map &&
 503                    ext2fs_test_inode_bitmap(ctx->inode_bad_map,
 504                                             dirent->inode))
 505                 should_be = 0;
 506         else {
 507                 e2fsck_read_inode(ctx, dirent->inode, &inode,
 508                                   "check_filetype");
 509                 should_be = ext2_file_type(inode.i_mode);
 510         }
 511         if (filetype == should_be)
 512                 return 0;
 513         pctx->num = should_be;
 514
 515         if (fix_problem(ctx, filetype ? PR_2_BAD_FILETYPE : PR_2_SET_FILETYPE,
 516                         pctx) == 0)
 517                 return 0;
 518
 519         dirent->name_len = (dirent->name_len & 0xFF) | should_be << 8;
 520         return 1;
 521 }
 522
 523 #ifdef ENABLE_HTREE
 524 static void parse_int_node(ext2_filsys fs,
 525                            struct ext2_db_entry *db,
 526                            struct check_dir_struct *cd,
 527                            struct dx_dir_info   *dx_dir,
 528                            char *block_buf)
 529 {
 530         struct          ext2_dx_root_info  *root;
 531         struct          ext2_dx_entry *ent;
 532         struct          ext2_dx_countlimit *limit;
 533         struct dx_dirblock_info *dx_db;
 534         int             i, expect_limit, count;
 535         blk_t           blk;
 536         ext2_dirhash_t  min_hash = 0xffffffff;
 537         ext2_dirhash_t  max_hash = 0;
 538         ext2_dirhash_t  hash = 0, prev_hash;
 539
 540         if (db->blockcnt == 0) {
 541                 root = (struct ext2_dx_root_info *) (block_buf + 24);
 542
 543 #ifdef DX_DEBUG
 544                 printf("Root node dump:\n");
 545                 printf("\t Reserved zero: %u\n", root->reserved_zero);
 546                 printf("\t Hash Version: %d\n", root->hash_version);
 547                 printf("\t Info length: %d\n", root->info_length);
 548                 printf("\t Indirect levels: %d\n", root->indirect_levels);
 549                 printf("\t Flags: %d\n", root->unused_flags);
 550 #endif
 551
 552                 ent = (struct ext2_dx_entry *) (block_buf + 24 + root->info_length);
 553         } else {
 554                 ent = (struct ext2_dx_entry *) (block_buf+8);
 555         }
 556         limit = (struct ext2_dx_countlimit *) ent;
 557
 558 #ifdef DX_DEBUG
 559         printf("Number of entries (count): %d\n",
 560                ext2fs_le16_to_cpu(limit->count));
 561         printf("Number of entries (limit): %d\n",
 562                ext2fs_le16_to_cpu(limit->limit));
 563 #endif
 564
 565         count = ext2fs_le16_to_cpu(limit->count);
 566         expect_limit = (fs->blocksize - ((char *) ent - block_buf)) /
 567                 sizeof(struct ext2_dx_entry);
 568         if (ext2fs_le16_to_cpu(limit->limit) != expect_limit) {
 569                 cd->pctx.num = ext2fs_le16_to_cpu(limit->limit);
 570                 if (fix_problem(cd->ctx, PR_2_HTREE_BAD_LIMIT, &cd->pctx))
 571                         goto clear_and_exit;
 572         }
 573         if (count > expect_limit) {
 574                 cd->pctx.num = count;
 575                 if (fix_problem(cd->ctx, PR_2_HTREE_BAD_COUNT, &cd->pctx))
 576                         goto clear_and_exit;
 577                 count = expect_limit;
 578         }
 579
 580         for (i=0; i < count; i++) {
 581                 prev_hash = hash;
 582                 hash = i ? (ext2fs_le32_to_cpu(ent[i].hash) & ~1) : 0;
 583 #ifdef DX_DEBUG
 584                 printf("Entry #%d: Hash 0x%08x, block %u\n", i,
 585                        hash, ext2fs_le32_to_cpu(ent[i].block));
 586 #endif
 587                 blk = ext2fs_le32_to_cpu(ent[i].block) & 0x0ffffff;
 588                 /* Check to make sure the block is valid */
 589                 if (blk >= (blk_t) dx_dir->numblocks) {
 590                         cd->pctx.blk = blk;
 591                         if (fix_problem(cd->ctx, PR_2_HTREE_BADBLK,
 592                                         &cd->pctx))
 593                                 goto clear_and_exit;
 594                         continue;
 595                 }
 596                 if (hash < prev_hash &&
 597                     fix_problem(cd->ctx, PR_2_HTREE_HASH_ORDER, &cd->pctx))
 598                         goto clear_and_exit;
 599                 dx_db = &dx_dir->dx_block[blk];
 600                 if (dx_db->flags & DX_FLAG_REFERENCED) {
 601                         dx_db->flags |= DX_FLAG_DUP_REF;
 602                 } else {
 603                         dx_db->flags |= DX_FLAG_REFERENCED;
 604                         dx_db->parent = db->blockcnt;
 605                 }
 606                 if (hash < min_hash)
 607                         min_hash = hash;
 608                 if (hash > max_hash)
 609                         max_hash = hash;
 610                 dx_db->node_min_hash = hash;
 611                 if ((i+1) < count)
 612                         dx_db->node_max_hash =
 613                           ext2fs_le32_to_cpu(ent[i+1].hash) & ~1;
 614                 else {
 615                         dx_db->node_max_hash = 0xfffffffe;
 616                         dx_db->flags |= DX_FLAG_LAST;
 617                 }
 618                 if (i == 0)
 619                         dx_db->flags |= DX_FLAG_FIRST;
 620         }
 621 #ifdef DX_DEBUG
 622         printf("Blockcnt = %d, min hash 0x%08x, max hash 0x%08x\n",
 623                db->blockcnt, min_hash, max_hash);
 624 #endif
 625         dx_db = &dx_dir->dx_block[db->blockcnt];
 626         dx_db->min_hash = min_hash;
 627         dx_db->max_hash = max_hash;
 628         return;
 629
 630 clear_and_exit:
 631         clear_htree(cd->ctx, cd->pctx.ino);
 632         dx_dir->numblocks = 0;
 633 }
 634 #endif /* ENABLE_HTREE */
 635
 636 /*
 637  * Given a busted directory, try to salvage it somehow.
 638  *
 639  */
 640 static void salvage_directory(ext2_filsys fs,
 641                               struct ext2_dir_entry *dirent,
 642                               struct ext2_dir_entry *prev,
 643                               unsigned int *offset)
 644 {
 645         char    *cp = (char *) dirent;
 646         int left = fs->blocksize - *offset - dirent->rec_len;
 647         unsigned int name_len = dirent->name_len & 0xFF;
 648
 649         /*
 650          * Special case of directory entry of size 8: copy what's left
 651          * of the directory block up to cover up the invalid hole.
 652          */
 653         if ((left >= 12) && (dirent->rec_len == 8)) {
 654                 memmove(cp, cp+8, left);
 655                 memset(cp + left, 0, 8);
 656                 return;
 657         }
 658         /*
 659          * If the directory entry overruns the end of the directory
 660          * block, and the name is small enough to fit, then adjust the
 661          * record length.
 662          */
 663         if ((left < 0) &&
 664             (name_len + 8 <= dirent->rec_len + (unsigned) left) &&
 665             dirent->inode <= fs->super->s_inodes_count &&
 666             strnlen(dirent->name, name_len) == name_len) {
 667                 dirent->rec_len += left;
 668                 return;
 669         }
 670         /*
 671          * If the record length of the directory entry is a multiple
 672          * of four, and not too big, such that it is valid, let the
 673          * previous directory entry absorb the invalid one.
 674          */
 675         if (prev && dirent->rec_len && (dirent->rec_len % 4) == 0 &&
 676             (*offset + dirent->rec_len <= fs->blocksize)) {
 677                 prev->rec_len += dirent->rec_len;
 678                 *offset += dirent->rec_len;
 679                 return;
 680         }
 681         /*
 682          * Default salvage method --- kill all of the directory
 683          * entries for the rest of the block.  We will either try to
 684          * absorb it into the previous directory entry, or create a
 685          * new empty directory entry the rest of the directory block.
 686          */
 687         if (prev) {
 688                 prev->rec_len += fs->blocksize - *offset;
 689                 *offset = fs->blocksize;
 690         } else {
 691                 dirent->rec_len = fs->blocksize - *offset;
 692                 dirent->name_len = 0;
 693                 dirent->inode = 0;
 694         }
 695 }
 696
 697 static int check_dir_block(ext2_filsys fs,
 698                            struct ext2_db_entry *db,
 699                            void *priv_data)
 700 {
 701         struct dx_dir_info      *dx_dir;
 702 #ifdef ENABLE_HTREE
 703         struct dx_dirblock_info *dx_db = 0;
 704 #endif /* ENABLE_HTREE */
 705         struct ext2_dir_entry   *dirent, *prev;
 706         ext2_dirhash_t          hash;
 707         unsigned int            offset = 0;
 708         const char *            old_op;
 709         int                     dir_modified = 0;
 710         int                     dot_state;
 711         blk_t                   block_nr = db->blk;
 712         ext2_ino_t              ino = db->ino;
 713         ext2_ino_t              subdir_parent;
 714         __u16                   links;
 715         struct check_dir_struct *cd;
 716         char                    *buf;
 717         e2fsck_t                ctx;
 718         int                     problem;
 719         struct ext2_dx_root_info *root;
 720         struct ext2_dx_countlimit *limit;
 721         static dict_t de_dict;
 722         struct problem_context  pctx;
 723         int     dups_found = 0;
 724         int     ret;
 725
 726         cd = (struct check_dir_struct *) priv_data;
 727         buf = cd->buf;
 728         ctx = cd->ctx;
 729
 730         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
 731                 return DIRENT_ABORT;
 732
 733         if (ctx->progress && (ctx->progress)(ctx, 2, cd->count++, cd->max))
 734                 return DIRENT_ABORT;
 735
 736         /*
 737          * Make sure the inode is still in use (could have been
 738          * deleted in the duplicate/bad blocks pass.
 739          */
 740         if (!(ext2fs_test_inode_bitmap(ctx->inode_used_map, ino)))
 741                 return 0;
 742
 743         cd->pctx.ino = ino;
 744         cd->pctx.blk = block_nr;
 745         cd->pctx.blkcount = db->blockcnt;
 746         cd->pctx.ino2 = 0;
 747         cd->pctx.dirent = 0;
 748         cd->pctx.num = 0;
 749
 750         if (db->blk == 0) {
 751                 if (allocate_dir_block(ctx, db, buf, &cd->pctx))
 752                         return 0;
 753                 block_nr = db->blk;
 754         }
 755
 756         if (db->blockcnt)
 757                 dot_state = 2;
 758         else
 759                 dot_state = 0;
 760
 761         if (ctx->dirs_to_hash &&
 762             ext2fs_u32_list_test(ctx->dirs_to_hash, ino))
 763                 dups_found++;
 764
 765 #if 0
 766         printf("In process_dir_block block %lu, #%d, inode %lu\n", block_nr,
 767                db->blockcnt, ino);
 768 #endif
 769
 770         old_op = ehandler_operation(_("reading directory block"));
 771         cd->pctx.errcode = ext2fs_read_dir_block(fs, block_nr, buf);
 772         ehandler_operation(0);
 773         if (cd->pctx.errcode == EXT2_ET_DIR_CORRUPTED)
 774                 cd->pctx.errcode = 0; /* We'll handle this ourselves */
 775         if (cd->pctx.errcode) {
 776                 if (!fix_problem(ctx, PR_2_READ_DIRBLOCK, &cd->pctx)) {
 777                         ctx->flags |= E2F_FLAG_ABORT;
 778                         return DIRENT_ABORT;
 779                 }
 780                 memset(buf, 0, fs->blocksize);
 781         }
 782 #ifdef ENABLE_HTREE
 783         dx_dir = e2fsck_get_dx_dir_info(ctx, ino);
 784         if (dx_dir && dx_dir->numblocks) {
 785                 if (db->blockcnt >= dx_dir->numblocks) {
 786                         if (fix_problem(ctx, PR_2_UNEXPECTED_HTREE_BLOCK,
 787                                         &pctx)) {
 788                                 clear_htree(ctx, ino);
 789                                 dx_dir->numblocks = 0;
 790                                 dx_db = 0;
 791                                 goto out_htree;
 792                         }
 793                         fatal_error(ctx, _("Can not continue."));
 794                 }
 795                 dx_db = &dx_dir->dx_block[db->blockcnt];
 796                 dx_db->type = DX_DIRBLOCK_LEAF;
 797                 dx_db->phys = block_nr;
 798                 dx_db->min_hash = ~0;
 799                 dx_db->max_hash = 0;
 800
 801                 dirent = (struct ext2_dir_entry *) buf;
 802                 limit = (struct ext2_dx_countlimit *) (buf+8);
 803                 if (db->blockcnt == 0) {
 804                         root = (struct ext2_dx_root_info *) (buf + 24);
 805                         dx_db->type = DX_DIRBLOCK_ROOT;
 806                         dx_db->flags |= DX_FLAG_FIRST | DX_FLAG_LAST;
 807                         if ((root->reserved_zero ||
 808                              root->info_length < 8 ||
 809                              root->indirect_levels > 1) &&
 810                             fix_problem(ctx, PR_2_HTREE_BAD_ROOT, &cd->pctx)) {
 811                                 clear_htree(ctx, ino);
 812                                 dx_dir->numblocks = 0;
 813                                 dx_db = 0;
 814                         }
 815                         dx_dir->hashversion = root->hash_version;
 816                         if ((dx_dir->hashversion <= EXT2_HASH_TEA) &&
 817                             (fs->super->s_flags & EXT2_FLAGS_UNSIGNED_HASH))
 818                                 dx_dir->hashversion += 3;
 819                         dx_dir->depth = root->indirect_levels + 1;
 820                 } else if ((dirent->inode == 0) &&
 821                            (dirent->rec_len == fs->blocksize) &&
 822                            (dirent->name_len == 0) &&
 823                            (ext2fs_le16_to_cpu(limit->limit) ==
 824                             ((fs->blocksize-8) /
 825                              sizeof(struct ext2_dx_entry))))
 826                         dx_db->type = DX_DIRBLOCK_NODE;
 827         }
 828 out_htree:
 829 #endif /* ENABLE_HTREE */
 830
 831         dict_init(&de_dict, DICTCOUNT_T_MAX, dict_de_cmp);
 832         prev = 0;
 833         do {
 834                 problem = 0;
 835                 dirent = (struct ext2_dir_entry *) (buf + offset);
 836                 cd->pctx.dirent = dirent;
 837                 cd->pctx.num = offset;
 838                 if (((offset + dirent->rec_len) > fs->blocksize) ||
 839                     (dirent->rec_len < 12) ||
 840                     ((dirent->rec_len % 4) != 0) ||
 841                     (((dirent->name_len & 0xFF)+8) > dirent->rec_len)) {
 842                         if (fix_problem(ctx, PR_2_DIR_CORRUPTED, &cd->pctx)) {
 843                                 salvage_directory(fs, dirent, prev, &offset);
 844                                 dir_modified++;
 845                                 continue;
 846                         } else
 847                                 goto abort_free_dict;
 848                 }
 849                 if ((dirent->name_len & 0xFF) > EXT2_NAME_LEN) {
 850                         if (fix_problem(ctx, PR_2_FILENAME_LONG, &cd->pctx)) {
 851                                 dirent->name_len = EXT2_NAME_LEN;
 852                                 dir_modified++;
 853                         }
 854                 }
 855
 856                 if (dot_state == 0) {
 857                         if (check_dot(ctx, dirent, ino, &cd->pctx))
 858                                 dir_modified++;
 859                 } else if (dot_state == 1) {
 860                         ret = check_dotdot(ctx, dirent, ino, &cd->pctx);
 861                         if (ret < 0)
 862                                 goto abort_free_dict;
 863                         if (ret)
 864                                 dir_modified++;
 865                 } else if (dirent->inode == ino) {
 866                         problem = PR_2_LINK_DOT;
 867                         if (fix_problem(ctx, PR_2_LINK_DOT, &cd->pctx)) {
 868                                 dirent->inode = 0;
 869                                 dir_modified++;
 870                                 goto next;
 871                         }
 872                 }
 873                 if (!dirent->inode)
 874                         goto next;
 875
 876                 /*
 877                  * Make sure the inode listed is a legal one.
 878                  */
 879                 if (((dirent->inode != EXT2_ROOT_INO) &&
 880                      (dirent->inode < EXT2_FIRST_INODE(fs->super))) ||
 881                     (dirent->inode > fs->super->s_inodes_count)) {
 882                         problem = PR_2_BAD_INO;
 883                 } else if (!(ext2fs_test_inode_bitmap(ctx->inode_used_map,
 884                                                dirent->inode))) {
 885                         /*
 886                          * If the inode is unused, offer to clear it.
 887                          */
 888                         problem = PR_2_UNUSED_INODE;
 889                 } else if (ctx->inode_bb_map &&
 890                            (ext2fs_test_inode_bitmap(ctx->inode_bb_map,
 891                                                      dirent->inode))) {
 892                         /*
 893                          * If the inode is in a bad block, offer to
 894                          * clear it.
 895                          */
 896                         problem = PR_2_BB_INODE;
 897                 } else if ((dot_state > 1) &&
 898                            ((dirent->name_len & 0xFF) == 1) &&
 899                            (dirent->name[0] == '.')) {
 900                         /*
 901                          * If there's a '.' entry in anything other
 902                          * than the first directory entry, it's a
 903                          * duplicate entry that should be removed.
 904                          */
 905                         problem = PR_2_DUP_DOT;
 906                 } else if ((dot_state > 1) &&
 907                            ((dirent->name_len & 0xFF) == 2) &&
 908                            (dirent->name[0] == '.') &&
 909                            (dirent->name[1] == '.')) {
 910                         /*
 911                          * If there's a '..' entry in anything other
 912                          * than the second directory entry, it's a
 913                          * duplicate entry that should be removed.
 914                          */
 915                         problem = PR_2_DUP_DOT_DOT;
 916                 } else if ((dot_state > 1) &&
 917                            (dirent->inode == EXT2_ROOT_INO)) {
 918                         /*
 919                          * Don't allow links to the root directory.
 920                          * We check this specially to make sure we
 921                          * catch this error case even if the root
 922                          * directory hasn't been created yet.
 923                          */
 924                         problem = PR_2_LINK_ROOT;
 925                 } else if ((dot_state > 1) &&
 926                            (dirent->name_len & 0xFF) == 0) {
 927                         /*
 928                          * Don't allow zero-length directory names.
 929                          */
 930                         problem = PR_2_NULL_NAME;
 931                 }
 932
 933                 if (problem) {
 934                         if (fix_problem(ctx, problem, &cd->pctx)) {
 935                                 dirent->inode = 0;
 936                                 dir_modified++;
 937                                 goto next;
 938                         } else {
 939                                 ext2fs_unmark_valid(fs);
 940                                 if (problem == PR_2_BAD_INO)
 941                                         goto next;
 942                         }
 943                 }
 944
 945                 /*
 946                  * If the inode was marked as having bad fields in
 947                  * pass1, process it and offer to fix/clear it.
 948                  * (We wait until now so that we can display the
 949                  * pathname to the user.)
 950                  */
 951                 if (ctx->inode_bad_map &&
 952                     ext2fs_test_inode_bitmap(ctx->inode_bad_map,
 953                                              dirent->inode)) {
 954                         if (e2fsck_process_bad_inode(ctx, ino,
 955                                                      dirent->inode,
 956                                                      buf + fs->blocksize)) {
 957                                 dirent->inode = 0;
 958                                 dir_modified++;
 959                                 goto next;
 960                         }
 961                         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
 962                                 return DIRENT_ABORT;
 963                 }
 964
 965                 if (check_name(ctx, dirent, ino, &cd->pctx))
 966                         dir_modified++;
 967
 968                 if (check_filetype(ctx, dirent, ino, &cd->pctx))
 969                         dir_modified++;
 970
 971 #ifdef ENABLE_HTREE
 972                 if (dx_db) {
 973                         ext2fs_dirhash(dx_dir->hashversion, dirent->name,
 974                                        (dirent->name_len & 0xFF),
 975                                        fs->super->s_hash_seed, &hash, 0);
 976                         if (hash < dx_db->min_hash)
 977                                 dx_db->min_hash = hash;
 978                         if (hash > dx_db->max_hash)
 979                                 dx_db->max_hash = hash;
 980                 }
 981 #endif
 982
 983                 /*
 984                  * If this is a directory, then mark its parent in its
 985                  * dir_info structure.  If the parent field is already
 986                  * filled in, then this directory has more than one
 987                  * hard link.  We assume the first link is correct,
 988                  * and ask the user if he/she wants to clear this one.
 989                  */
 990                 if ((dot_state > 1) &&
 991                     (ext2fs_test_inode_bitmap(ctx->inode_dir_map,
 992                                               dirent->inode))) {
 993                         if (e2fsck_dir_info_get_parent(ctx, dirent->inode,
 994                                                        &subdir_parent)) {
 995                                 cd->pctx.ino = dirent->inode;
 996                                 fix_problem(ctx, PR_2_NO_DIRINFO, &cd->pctx);
 997                                 goto abort_free_dict;
 998                         }
 999                         if (subdir_parent) {
1000                                 cd->pctx.ino2 = subdir_parent;
1001                                 if (fix_problem(ctx, PR_2_LINK_DIR,
1002                                                 &cd->pctx)) {
1003                                         dirent->inode = 0;
1004                                         dir_modified++;
1005                                         goto next;
1006                                 }
1007                                 cd->pctx.ino2 = 0;
1008                         } else {
1009                                 (void) e2fsck_dir_info_set_parent(ctx,
1010                                                   dirent->inode, ino);
1011                         }
1012                 }
1013
1014                 if (dups_found) {
1015                         ;
1016                 } else if (dict_lookup(&de_dict, dirent)) {
1017                         clear_problem_context(&pctx);
1018                         pctx.ino = ino;
1019                         pctx.dirent = dirent;
1020                         fix_problem(ctx, PR_2_REPORT_DUP_DIRENT, &pctx);
1021                         if (!ctx->dirs_to_hash)
1022                                 ext2fs_u32_list_create(&ctx->dirs_to_hash, 50);
1023                         if (ctx->dirs_to_hash)
1024                                 ext2fs_u32_list_add(ctx->dirs_to_hash, ino);
1025                         dups_found++;
1026                 } else
1027                         dict_alloc_insert(&de_dict, dirent, dirent);
1028
1029                 ext2fs_icount_increment(ctx->inode_count, dirent->inode,
1030                                         &links);
1031                 if (links > 1)
1032                         ctx->fs_links_count++;
1033                 ctx->fs_total_count++;
1034         next:
1035                 prev = dirent;
1036                 offset += dirent->rec_len;
1037                 dot_state++;
1038         } while (offset < fs->blocksize);
1039 #if 0
1040         printf("\n");
1041 #endif
1042 #ifdef ENABLE_HTREE
1043         if (dx_db) {
1044 #ifdef DX_DEBUG
1045                 printf("db_block %d, type %d, min_hash 0x%0x, max_hash 0x%0x\n",
1046                        db->blockcnt, dx_db->type,
1047                        dx_db->min_hash, dx_db->max_hash);
1048 #endif
1049                 cd->pctx.dir = cd->pctx.ino;
1050                 if ((dx_db->type == DX_DIRBLOCK_ROOT) ||
1051                     (dx_db->type == DX_DIRBLOCK_NODE))
1052                         parse_int_node(fs, db, cd, dx_dir, buf);
1053         }
1054 #endif /* ENABLE_HTREE */
1055         if (offset != fs->blocksize) {
1056                 cd->pctx.num = dirent->rec_len - fs->blocksize + offset;
1057                 if (fix_problem(ctx, PR_2_FINAL_RECLEN, &cd->pctx)) {
1058                         dirent->rec_len = cd->pctx.num;
1059                         dir_modified++;
1060                 }
1061         }
1062         if (dir_modified) {
1063                 cd->pctx.errcode = ext2fs_write_dir_block(fs, block_nr, buf);
1064                 if (cd->pctx.errcode) {
1065                         if (!fix_problem(ctx, PR_2_WRITE_DIRBLOCK,
1066                                          &cd->pctx))
1067                                 goto abort_free_dict;
1068                 }
1069                 ext2fs_mark_changed(fs);
1070         }
1071         dict_free_nodes(&de_dict);
1072         return 0;
1073 abort_free_dict:
1074         dict_free_nodes(&de_dict);
1075         ctx->flags |= E2F_FLAG_ABORT;
1076         return DIRENT_ABORT;
1077 }
1078
1079 /*
1080  * This function is called to deallocate a block, and is an interator
1081  * functioned called by deallocate inode via ext2fs_iterate_block().
1082  */
1083 static int deallocate_inode_block(ext2_filsys fs,
1084                                   blk_t *block_nr,
1085                                   e2_blkcnt_t blockcnt EXT2FS_ATTR((unused)),
1086                                   blk_t ref_block EXT2FS_ATTR((unused)),
1087                                   int ref_offset EXT2FS_ATTR((unused)),
1088                                   void *priv_data)
1089 {
1090         e2fsck_t        ctx = (e2fsck_t) priv_data;
1091
1092         if (HOLE_BLKADDR(*block_nr))
1093                 return 0;
1094         if ((*block_nr < fs->super->s_first_data_block) ||
1095             (*block_nr >= fs->super->s_blocks_count))
1096                 return 0;
1097         ext2fs_unmark_block_bitmap(ctx->block_found_map, *block_nr);
1098         ext2fs_block_alloc_stats(fs, *block_nr, -1);
1099         return 0;
1100 }
1101
1102 /*
1103  * This fuction deallocates an inode
1104  */
1105 static void deallocate_inode(e2fsck_t ctx, ext2_ino_t ino, char* block_buf)
1106 {
1107         ext2_filsys fs = ctx->fs;
1108         struct ext2_inode       inode;
1109         struct problem_context  pctx;
1110         __u32                   count;
1111
1112         e2fsck_read_inode(ctx, ino, &inode, "deallocate_inode");
1113         e2fsck_clear_inode(ctx, ino, &inode, 0, "deallocate_inode");
1114         clear_problem_context(&pctx);
1115         pctx.ino = ino;
1116
1117         /*
1118          * Fix up the bitmaps...
1119          */
1120         e2fsck_read_bitmaps(ctx);
1121         ext2fs_inode_alloc_stats2(fs, ino, -1, LINUX_S_ISDIR(inode.i_mode));
1122
1123         if (inode.i_file_acl &&
1124             (fs->super->s_feature_compat & EXT2_FEATURE_COMPAT_EXT_ATTR)) {
1125                 pctx.errcode = ext2fs_adjust_ea_refcount(fs, inode.i_file_acl,
1126                                                    block_buf, -1, &count);
1127                 if (pctx.errcode == EXT2_ET_BAD_EA_BLOCK_NUM) {
1128                         pctx.errcode = 0;
1129                         count = 1;
1130                 }
1131                 if (pctx.errcode) {
1132                         pctx.blk = inode.i_file_acl;
1133                         fix_problem(ctx, PR_2_ADJ_EA_REFCOUNT, &pctx);
1134                         ctx->flags |= E2F_FLAG_ABORT;
1135                         return;
1136                 }
1137                 if (count == 0) {
1138                         ext2fs_unmark_block_bitmap(ctx->block_found_map,
1139                                                    inode.i_file_acl);
1140                         ext2fs_block_alloc_stats(fs, inode.i_file_acl, -1);
1141                 }
1142                 inode.i_file_acl = 0;
1143         }
1144
1145         if (!ext2fs_inode_has_valid_blocks(&inode))
1146                 return;
1147
1148         if (LINUX_S_ISREG(inode.i_mode) &&
1149             (inode.i_size_high || inode.i_size & 0x80000000UL))
1150                 ctx->large_files--;
1151
1152         pctx.errcode = ext2fs_block_iterate2(fs, ino, 0, block_buf,
1153                                             deallocate_inode_block, ctx);
1154         if (pctx.errcode) {
1155                 fix_problem(ctx, PR_2_DEALLOC_INODE, &pctx);
1156                 ctx->flags |= E2F_FLAG_ABORT;
1157                 return;
1158         }
1159 }
1160
1161 /*
1162  * This fuction clears the htree flag on an inode
1163  */
1164 static void clear_htree(e2fsck_t ctx, ext2_ino_t ino)
1165 {
1166         struct ext2_inode       inode;
1167
1168         e2fsck_read_inode(ctx, ino, &inode, "clear_htree");
1169         inode.i_flags = inode.i_flags & ~EXT2_INDEX_FL;
1170         e2fsck_write_inode(ctx, ino, &inode, "clear_htree");
1171         if (ctx->dirs_to_hash)
1172                 ext2fs_u32_list_add(ctx->dirs_to_hash, ino);
1173 }
1174
1175
1176 extern int e2fsck_process_bad_inode(e2fsck_t ctx, ext2_ino_t dir,
1177                                     ext2_ino_t ino, char *buf)
1178 {
1179         ext2_filsys fs = ctx->fs;
1180         struct ext2_inode       inode;
1181         int                     inode_modified = 0;
1182         int                     not_fixed = 0;
1183         unsigned char           *frag, *fsize;
1184         struct problem_context  pctx;
1185         int     problem = 0;
1186
1187         e2fsck_read_inode(ctx, ino, &inode, "process_bad_inode");
1188
1189         clear_problem_context(&pctx);
1190         pctx.ino = ino;
1191         pctx.dir = dir;
1192         pctx.inode = &inode;
1193
1194         if (inode.i_file_acl &&
1195             !(fs->super->s_feature_compat & EXT2_FEATURE_COMPAT_EXT_ATTR)) {
1196                 if (fix_problem(ctx, PR_2_FILE_ACL_ZERO, &pctx)) {
1197                         inode.i_file_acl = 0;
1198                         inode_modified++;
1199                 } else
1200                         not_fixed++;
1201         }
1202
1203         if (!LINUX_S_ISDIR(inode.i_mode) && !LINUX_S_ISREG(inode.i_mode) &&
1204             !LINUX_S_ISCHR(inode.i_mode) && !LINUX_S_ISBLK(inode.i_mode) &&
1205             !LINUX_S_ISLNK(inode.i_mode) && !LINUX_S_ISFIFO(inode.i_mode) &&
1206             !(LINUX_S_ISSOCK(inode.i_mode)))
1207                 problem = PR_2_BAD_MODE;
1208         else if (LINUX_S_ISCHR(inode.i_mode)
1209                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1210                 problem = PR_2_BAD_CHAR_DEV;
1211         else if (LINUX_S_ISBLK(inode.i_mode)
1212                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1213                 problem = PR_2_BAD_BLOCK_DEV;
1214         else if (LINUX_S_ISFIFO(inode.i_mode)
1215                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1216                 problem = PR_2_BAD_FIFO;
1217         else if (LINUX_S_ISSOCK(inode.i_mode)
1218                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1219                 problem = PR_2_BAD_SOCKET;
1220         else if (LINUX_S_ISLNK(inode.i_mode)
1221                  && !e2fsck_pass1_check_symlink(fs, ino, &inode, buf)) {
1222                 problem = PR_2_INVALID_SYMLINK;
1223         }
1224
1225         if (problem) {
1226                 if (fix_problem(ctx, problem, &pctx)) {
1227                         deallocate_inode(ctx, ino, 0);
1228                         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1229                                 return 0;
1230                         return 1;
1231                 } else
1232                         not_fixed++;
1233                 problem = 0;
1234         }
1235
1236         if (inode.i_faddr) {
1237                 if (fix_problem(ctx, PR_2_FADDR_ZERO, &pctx)) {
1238                         inode.i_faddr = 0;
1239                         inode_modified++;
1240                 } else
1241                         not_fixed++;
1242         }
1243
1244         switch (fs->super->s_creator_os) {
1245             case EXT2_OS_HURD:
1246                 frag = &inode.osd2.hurd2.h_i_frag;
1247                 fsize = &inode.osd2.hurd2.h_i_fsize;
1248                 break;
1249             default:
1250                 frag = fsize = 0;
1251         }
1252         if (frag && *frag) {
1253                 pctx.num = *frag;
1254                 if (fix_problem(ctx, PR_2_FRAG_ZERO, &pctx)) {
1255                         *frag = 0;
1256                         inode_modified++;
1257                 } else
1258                         not_fixed++;
1259                 pctx.num = 0;
1260         }
1261         if (fsize && *fsize) {
1262                 pctx.num = *fsize;
1263                 if (fix_problem(ctx, PR_2_FSIZE_ZERO, &pctx)) {
1264                         *fsize = 0;
1265                         inode_modified++;
1266                 } else
1267                         not_fixed++;
1268                 pctx.num = 0;
1269         }
1270
1271         if ((fs->super->s_creator_os == EXT2_OS_LINUX) &&
1272             !(fs->super->s_feature_ro_compat &
1273               EXT4_FEATURE_RO_COMPAT_HUGE_FILE) &&
1274             (inode.osd2.linux2.l_i_blocks_hi != 0)) {
1275                 pctx.num = inode.osd2.linux2.l_i_blocks_hi;
1276                 if (fix_problem(ctx, PR_2_BLOCKS_HI_ZERO, &pctx)) {
1277                         inode.osd2.linux2.l_i_blocks_hi = 0;
1278                         inode_modified++;
1279                 }
1280         }
1281
1282         if (inode.i_file_acl &&
1283             ((inode.i_file_acl < fs->super->s_first_data_block) ||
1284              (inode.i_file_acl >= fs->super->s_blocks_count))) {
1285                 if (fix_problem(ctx, PR_2_FILE_ACL_BAD, &pctx)) {
1286                         inode.i_file_acl = 0;
1287                         inode_modified++;
1288                 } else
1289                         not_fixed++;
1290         }
1291         if (inode.i_dir_acl &&
1292             LINUX_S_ISDIR(inode.i_mode)) {
1293                 if (fix_problem(ctx, PR_2_DIR_ACL_ZERO, &pctx)) {
1294                         inode.i_dir_acl = 0;
1295                         inode_modified++;
1296                 } else
1297                         not_fixed++;
1298         }
1299
1300         if (inode_modified)
1301                 e2fsck_write_inode(ctx, ino, &inode, "process_bad_inode");
1302         if (!not_fixed && ctx->inode_bad_map)
1303                 ext2fs_unmark_inode_bitmap(ctx->inode_bad_map, ino);
1304         return 0;
1305 }
1306
1307
1308 /*
1309  * allocate_dir_block --- this function allocates a new directory
1310  *      block for a particular inode; this is done if a directory has
1311  *      a "hole" in it, or if a directory has a illegal block number
1312  *      that was zeroed out and now needs to be replaced.
1313  */
1314 static int allocate_dir_block(e2fsck_t ctx,
1315                               struct ext2_db_entry *db,
1316                               char *buf EXT2FS_ATTR((unused)),
1317                               struct problem_context *pctx)
1318 {
1319         ext2_filsys fs = ctx->fs;
1320         blk_t                   blk;
1321         char                    *block;
1322         struct ext2_inode       inode;
1323
1324         if (fix_problem(ctx, PR_2_DIRECTORY_HOLE, pctx) == 0)
1325                 return 1;
1326
1327         /*
1328          * Read the inode and block bitmaps in; we'll be messing with
1329          * them.
1330          */
1331         e2fsck_read_bitmaps(ctx);
1332
1333         /*
1334          * First, find a free block
1335          */
1336         pctx->errcode = ext2fs_new_block(fs, 0, ctx->block_found_map, &blk);
1337         if (pctx->errcode) {
1338                 pctx->str = "ext2fs_new_block";
1339                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
1340                 return 1;
1341         }
1342         ext2fs_mark_block_bitmap(ctx->block_found_map, blk);
1343         ext2fs_mark_block_bitmap(fs->block_map, blk);
1344         ext2fs_mark_bb_dirty(fs);
1345
1346         /*
1347          * Now let's create the actual data block for the inode
1348          */
1349         if (db->blockcnt)
1350                 pctx->errcode = ext2fs_new_dir_block(fs, 0, 0, &block);
1351         else
1352                 pctx->errcode = ext2fs_new_dir_block(fs, db->ino,
1353                                                      EXT2_ROOT_INO, &block);
1354
1355         if (pctx->errcode) {
1356                 pctx->str = "ext2fs_new_dir_block";
1357                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
1358                 return 1;
1359         }
1360
1361         pctx->errcode = ext2fs_write_dir_block(fs, blk, block);
1362         ext2fs_free_mem(&block);
1363         if (pctx->errcode) {
1364                 pctx->str = "ext2fs_write_dir_block";
1365                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
1366                 return 1;
1367         }
1368
1369         /*
1370          * Update the inode block count
1371          */
1372         e2fsck_read_inode(ctx, db->ino, &inode, "allocate_dir_block");
1373         inode.i_blocks += fs->blocksize / 512;
1374         if (inode.i_size < (db->blockcnt+1) * fs->blocksize)
1375                 inode.i_size = (db->blockcnt+1) * fs->blocksize;
1376         e2fsck_write_inode(ctx, db->ino, &inode, "allocate_dir_block");
1377
1378         /*
1379          * Finally, update the block pointers for the inode
1380          */
1381         db->blk = blk;
1382         pctx->errcode = ext2fs_block_iterate2(fs, db->ino, BLOCK_FLAG_HOLE,
1383                                       0, update_dir_block, db);
1384         if (pctx->errcode) {
1385                 pctx->str = "ext2fs_block_iterate";
1386                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
1387                 return 1;
1388         }
1389
1390         return 0;
1391 }
1392
1393 /*
1394  * This is a helper function for allocate_dir_block().
1395  */
1396 static int update_dir_block(ext2_filsys fs EXT2FS_ATTR((unused)),
1397                             blk_t       *block_nr,
1398                             e2_blkcnt_t blockcnt,
1399                             blk_t ref_block EXT2FS_ATTR((unused)),
1400                             int ref_offset EXT2FS_ATTR((unused)),
1401                             void *priv_data)
1402 {
1403         struct ext2_db_entry *db;
1404
1405         db = (struct ext2_db_entry *) priv_data;
1406         if (db->blockcnt == (int) blockcnt) {
1407                 *block_nr = db->blk;
1408                 return BLOCK_CHANGED;
1409         }
1410         return 0;
1411 }