e2fsck/pass1.c

   1 /*
   2  * pass1.c -- pass #1 of e2fsck: sequential scan of the inode table
   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 1 of e2fsck iterates over all the inodes in the filesystems,
  12  * and applies the following tests to each inode:
  13  *
  14  *      - The mode field of the inode must be legal.
  15  *      - The size and block count fields of the inode are correct.
  16  *      - A data block must not be used by another inode
  17  *
  18  * Pass 1 also gathers the collects the following information:
  19  *
  20  *      - A bitmap of which inodes are in use.          (inode_used_map)
  21  *      - A bitmap of which inodes are directories.     (inode_dir_map)
  22  *      - A bitmap of which inodes are regular files.   (inode_reg_map)
  23  *      - A bitmap of which inodes have bad fields.     (inode_bad_map)
  24  *      - A bitmap of which inodes are in bad blocks.   (inode_bb_map)
  25  *      - A bitmap of which inodes are imagic inodes.   (inode_imagic_map)
  26  *      - A bitmap of which inodes are casefolded.      (inode_casefold_map)
  27  *      - A bitmap of which blocks are in use.          (block_found_map)
  28  *      - A bitmap of which blocks are in use by two inodes     (block_dup_map)
  29  *      - The data blocks of the directory inodes.      (dir_map)
  30  *      - Ref counts for ea_inodes.                     (ea_inode_refs)
  31  *      - The encryption policy ID of each encrypted inode. (encrypted_files)
  32  *
  33  * Pass 1 is designed to stash away enough information so that the
  34  * other passes should not need to read in the inode information
  35  * during the normal course of a filesystem check.  (Although if an
  36  * inconsistency is detected, other passes may need to read in an
  37  * inode to fix it.)
  38  *
  39  * Note that pass 1B will be invoked if there are any duplicate blocks
  40  * found.
  41  */
  42
  43 #define _GNU_SOURCE 1 /* get strnlen() */
  44 #include "config.h"
  45 #include <string.h>
  46 #include <time.h>
  47 #ifdef HAVE_ERRNO_H
  48 #include <errno.h>
  49 #endif
  50 #include <assert.h>
  51 #ifdef HAVE_PTHREAD
  52 #include <pthread.h>
  53 #endif
  54
  55 #include "e2fsck.h"
  56 #include <ext2fs/ext2_ext_attr.h>
  57 /* todo remove this finally */
  58 #include <ext2fs/ext2fsP.h>
  59 #include <e2p/e2p.h>
  60
  61 #include "problem.h"
  62
  63 #ifdef NO_INLINE_FUNCS
  64 #define _INLINE_
  65 #else
  66 #define _INLINE_ inline
  67 #endif
  68
  69 #undef DEBUG
  70
  71 struct ea_quota {
  72         blk64_t blocks;
  73         __u64 inodes;
  74 };
  75
  76 static int process_block(ext2_filsys fs, blk64_t        *blocknr,
  77                          e2_blkcnt_t blockcnt, blk64_t ref_blk,
  78                          int ref_offset, void *priv_data);
  79 static int process_bad_block(ext2_filsys fs, blk64_t *block_nr,
  80                              e2_blkcnt_t blockcnt, blk64_t ref_blk,
  81                              int ref_offset, void *priv_data);
  82 static void check_blocks(e2fsck_t ctx, struct problem_context *pctx,
  83                          char *block_buf,
  84                          const struct ea_quota *ea_ibody_quota);
  85 static void mark_table_blocks(e2fsck_t ctx);
  86 static void alloc_bb_map(e2fsck_t ctx);
  87 static void alloc_imagic_map(e2fsck_t ctx);
  88 static void mark_inode_bad(e2fsck_t ctx, ino_t ino);
  89 static void add_casefolded_dir(e2fsck_t ctx, ino_t ino);
  90 static void handle_fs_bad_blocks(e2fsck_t ctx);
  91 static EXT2_QSORT_TYPE process_inode_cmp(const void *a, const void *b);
  92 static errcode_t scan_callback(ext2_filsys fs, ext2_inode_scan scan,
  93                                   dgrp_t group, void * priv_data);
  94 static void adjust_extattr_refcount(e2fsck_t ctx, ext2_refcount_t refcount,
  95                                     char *block_buf, int adjust_sign);
  96 /* static char *describe_illegal_block(ext2_filsys fs, blk64_t block); */
  97
  98 struct process_block_struct {
  99         ext2_ino_t      ino;
 100         unsigned        is_dir:1, is_reg:1, clear:1, suppress:1,
 101                                 fragmented:1, compressed:1, bbcheck:1,
 102                                 inode_modified:1;
 103         blk64_t         num_blocks;
 104         blk64_t         max_blocks;
 105         blk64_t         last_block;
 106         e2_blkcnt_t     last_init_lblock;
 107         e2_blkcnt_t     last_db_block;
 108         int             num_illegal_blocks;
 109         blk64_t         previous_block;
 110         struct ext2_inode *inode;
 111         struct problem_context *pctx;
 112         ext2fs_block_bitmap fs_meta_blocks;
 113         e2fsck_t        ctx;
 114         blk64_t         next_lblock;
 115         struct extent_tree_info eti;
 116 };
 117
 118 struct process_inode_block {
 119         ext2_ino_t ino;
 120         struct ea_quota ea_ibody_quota;
 121         struct ext2_inode_large inode;
 122 };
 123
 124 struct scan_callback_struct {
 125         e2fsck_t                         ctx;
 126         char                            *block_buf;
 127         struct process_inode_block      *inodes_to_process;
 128         int                             *process_inode_count;
 129 };
 130
 131 static void process_inodes(e2fsck_t ctx, char *block_buf,
 132                            struct process_inode_block *inodes_to_process,
 133                            int *process_inode_count);
 134
 135 static __u64 ext2_max_sizes[EXT2_MAX_BLOCK_LOG_SIZE -
 136                             EXT2_MIN_BLOCK_LOG_SIZE + 1];
 137
 138 /*
 139  * Check to make sure a device inode is real.  Returns 1 if the device
 140  * checks out, 0 if not.
 141  *
 142  * Note: this routine is now also used to check FIFO's and Sockets,
 143  * since they have the same requirement; the i_block fields should be
 144  * zero.
 145  */
 146 int e2fsck_pass1_check_device_inode(ext2_filsys fs EXT2FS_ATTR((unused)),
 147                                     struct ext2_inode *inode)
 148 {
 149         int     i;
 150
 151         /*
 152          * If the index or extents flag is set, then this is a bogus
 153          * device/fifo/socket
 154          */
 155         if (inode->i_flags & (EXT2_INDEX_FL | EXT4_EXTENTS_FL))
 156                 return 0;
 157
 158         /*
 159          * We should be able to do the test below all the time, but
 160          * because the kernel doesn't forcibly clear the device
 161          * inode's additional i_block fields, there are some rare
 162          * occasions when a legitimate device inode will have non-zero
 163          * additional i_block fields.  So for now, we only complain
 164          * when the immutable flag is set, which should never happen
 165          * for devices.  (And that's when the problem is caused, since
 166          * you can't set or clear immutable flags for devices.)  Once
 167          * the kernel has been fixed we can change this...
 168          */
 169         if (inode->i_flags & (EXT2_IMMUTABLE_FL | EXT2_APPEND_FL)) {
 170                 for (i=4; i < EXT2_N_BLOCKS; i++)
 171                         if (inode->i_block[i])
 172                                 return 0;
 173         }
 174         return 1;
 175 }
 176
 177 /*
 178  * Check to make sure a symlink inode is real.  Returns 1 if the symlink
 179  * checks out, 0 if not.
 180  */
 181 int e2fsck_pass1_check_symlink(ext2_filsys fs, ext2_ino_t ino,
 182                                struct ext2_inode *inode, char *buf)
 183 {
 184         unsigned int buflen;
 185         unsigned int len;
 186
 187         if ((inode->i_size_high || inode->i_size == 0) ||
 188             (inode->i_flags & EXT2_INDEX_FL))
 189                 return 0;
 190
 191         if (inode->i_flags & EXT4_INLINE_DATA_FL) {
 192                 size_t inline_size;
 193
 194                 if (inode->i_flags & EXT4_EXTENTS_FL)
 195                         return 0;
 196                 if (ext2fs_inline_data_size(fs, ino, &inline_size))
 197                         return 0;
 198                 if (inode->i_size != inline_size)
 199                         return 0;
 200
 201                 return 1;
 202         }
 203
 204         if (ext2fs_is_fast_symlink(inode)) {
 205                 if (inode->i_flags & EXT4_EXTENTS_FL)
 206                         return 0;
 207                 buf = (char *)inode->i_block;
 208                 buflen = sizeof(inode->i_block);
 209         } else {
 210                 ext2_extent_handle_t    handle;
 211                 struct ext2_extent_info info;
 212                 struct ext2fs_extent    extent;
 213                 blk64_t blk;
 214                 int i;
 215
 216                 if (inode->i_flags & EXT4_EXTENTS_FL) {
 217                         if (ext2fs_extent_open2(fs, ino, inode, &handle))
 218                                 return 0;
 219                         if (ext2fs_extent_get_info(handle, &info) ||
 220                             (info.num_entries != 1) ||
 221                             (info.max_depth != 0)) {
 222                                 ext2fs_extent_free(handle);
 223                                 return 0;
 224                         }
 225                         if (ext2fs_extent_get(handle, EXT2_EXTENT_ROOT,
 226                                               &extent) ||
 227                             (extent.e_lblk != 0) ||
 228                             (extent.e_len != 1)) {
 229                                 ext2fs_extent_free(handle);
 230                                 return 0;
 231                         }
 232                         blk = extent.e_pblk;
 233                         ext2fs_extent_free(handle);
 234                 } else {
 235                         blk = inode->i_block[0];
 236
 237                         for (i = 1; i < EXT2_N_BLOCKS; i++)
 238                                 if (inode->i_block[i])
 239                                         return 0;
 240                 }
 241
 242                 if (blk < fs->super->s_first_data_block ||
 243                     blk >= ext2fs_blocks_count(fs->super))
 244                         return 0;
 245
 246                 if (io_channel_read_blk64(fs->io, blk, 1, buf))
 247                         return 0;
 248
 249                 buflen = fs->blocksize;
 250         }
 251
 252         if (inode->i_flags & EXT4_ENCRYPT_FL)
 253                 len = ext2fs_le16_to_cpu(*(__u16 *)buf) + 2;
 254         else
 255                 len = strnlen(buf, buflen);
 256
 257         if (len >= buflen)
 258                 return 0;
 259
 260         if (len != inode->i_size)
 261                 return 0;
 262         return 1;
 263 }
 264
 265 /*
 266  * If the extents or inlinedata flags are set on the inode, offer to clear 'em.
 267  */
 268 #define BAD_SPECIAL_FLAGS (EXT4_EXTENTS_FL | EXT4_INLINE_DATA_FL)
 269 static void check_extents_inlinedata(e2fsck_t ctx,
 270                                      struct problem_context *pctx)
 271 {
 272         if (!(pctx->inode->i_flags & BAD_SPECIAL_FLAGS))
 273                 return;
 274
 275         if (!fix_problem(ctx, PR_1_SPECIAL_EXTENTS_IDATA, pctx))
 276                 return;
 277
 278         pctx->inode->i_flags &= ~BAD_SPECIAL_FLAGS;
 279         e2fsck_write_inode(ctx, pctx->ino, pctx->inode, "pass1");
 280 }
 281 #undef BAD_SPECIAL_FLAGS
 282
 283 /*
 284  * If the immutable (or append-only) flag is set on the inode, offer
 285  * to clear it.
 286  */
 287 #define BAD_SPECIAL_FLAGS (EXT2_IMMUTABLE_FL | EXT2_APPEND_FL)
 288 static void check_immutable(e2fsck_t ctx, struct problem_context *pctx)
 289 {
 290         if (!(pctx->inode->i_flags & BAD_SPECIAL_FLAGS))
 291                 return;
 292
 293         if (!fix_problem(ctx, PR_1_SET_IMMUTABLE, pctx))
 294                 return;
 295
 296         pctx->inode->i_flags &= ~BAD_SPECIAL_FLAGS;
 297         e2fsck_write_inode(ctx, pctx->ino, pctx->inode, "pass1");
 298 }
 299
 300 /*
 301  * If device, fifo or socket, check size is zero -- if not offer to
 302  * clear it
 303  */
 304 static void check_size(e2fsck_t ctx, struct problem_context *pctx)
 305 {
 306         struct ext2_inode *inode = pctx->inode;
 307
 308         if (EXT2_I_SIZE(inode) == 0)
 309                 return;
 310
 311         if (!fix_problem(ctx, PR_1_SET_NONZSIZE, pctx))
 312                 return;
 313
 314         ext2fs_inode_size_set(ctx->fs, inode, 0);
 315         e2fsck_write_inode(ctx, pctx->ino, pctx->inode, "pass1");
 316 }
 317
 318 /*
 319  * For a given size, calculate how many blocks would be charged towards quota.
 320  */
 321 static blk64_t size_to_quota_blocks(ext2_filsys fs, size_t size)
 322 {
 323         blk64_t clusters;
 324
 325         clusters = DIV_ROUND_UP(size, fs->blocksize << fs->cluster_ratio_bits);
 326         return EXT2FS_C2B(fs, clusters);
 327 }
 328
 329 /*
 330  * Check validity of EA inode. Return 0 if EA inode is valid, otherwise return
 331  * the problem code.
 332  */
 333 static problem_t check_large_ea_inode(e2fsck_t ctx,
 334                                       struct ext2_ext_attr_entry *entry,
 335                                       struct problem_context *pctx,
 336                                       blk64_t *quota_blocks)
 337 {
 338         struct ext2_inode inode;
 339         __u32 hash;
 340         errcode_t retval;
 341
 342         /* Check if inode is within valid range */
 343         if ((entry->e_value_inum < EXT2_FIRST_INODE(ctx->fs->super)) ||
 344             (entry->e_value_inum > ctx->fs->super->s_inodes_count)) {
 345                 pctx->num = entry->e_value_inum;
 346                 return PR_1_ATTR_VALUE_EA_INODE;
 347         }
 348
 349         e2fsck_read_inode(ctx, entry->e_value_inum, &inode, "pass1");
 350
 351         retval = ext2fs_ext_attr_hash_entry2(ctx->fs, entry, NULL, &hash);
 352         if (retval) {
 353                 com_err("check_large_ea_inode", retval,
 354                         _("while hashing entry with e_value_inum = %u"),
 355                         entry->e_value_inum);
 356                 fatal_error(ctx, 0);
 357         }
 358
 359         if (hash == entry->e_hash) {
 360                 *quota_blocks = size_to_quota_blocks(ctx->fs,
 361                                                      entry->e_value_size);
 362         } else {
 363                 /* This might be an old Lustre-style ea_inode reference. */
 364                 if (inode.i_mtime == pctx->ino &&
 365                     inode.i_generation == pctx->inode->i_generation) {
 366                         *quota_blocks = 0;
 367                 } else {
 368                         /* If target inode is also missing EA_INODE flag,
 369                          * this is likely to be a bad reference.
 370                          */
 371                         if (!(inode.i_flags & EXT4_EA_INODE_FL)) {
 372                                 pctx->num = entry->e_value_inum;
 373                                 return PR_1_ATTR_VALUE_EA_INODE;
 374                         } else {
 375                                 pctx->num = entry->e_hash;
 376                                 return PR_1_ATTR_HASH;
 377                         }
 378                 }
 379         }
 380
 381         if (!(inode.i_flags & EXT4_EA_INODE_FL)) {
 382                 pctx->num = entry->e_value_inum;
 383                 if (fix_problem(ctx, PR_1_ATTR_SET_EA_INODE_FL, pctx)) {
 384                         inode.i_flags |= EXT4_EA_INODE_FL;
 385                         ext2fs_write_inode(ctx->fs, entry->e_value_inum,
 386                                            &inode);
 387                 } else {
 388                         return PR_1_ATTR_NO_EA_INODE_FL;
 389                 }
 390         }
 391         return 0;
 392 }
 393
 394 static void inc_ea_inode_refs(e2fsck_t ctx, struct problem_context *pctx,
 395                               struct ext2_ext_attr_entry *first, void *end)
 396 {
 397         struct ext2_ext_attr_entry *entry;
 398
 399         for (entry = first;
 400              (void *)entry < end && !EXT2_EXT_IS_LAST_ENTRY(entry);
 401              entry = EXT2_EXT_ATTR_NEXT(entry)) {
 402                 if (!entry->e_value_inum)
 403                         continue;
 404                 if (!ctx->ea_inode_refs) {
 405                         pctx->errcode = ea_refcount_create(0,
 406                                                            &ctx->ea_inode_refs);
 407                         if (pctx->errcode) {
 408                                 pctx->num = 4;
 409                                 fix_problem(ctx, PR_1_ALLOCATE_REFCOUNT, pctx);
 410                                 ctx->flags |= E2F_FLAG_ABORT;
 411                                 return;
 412                         }
 413                 }
 414                 ea_refcount_increment(ctx->ea_inode_refs, entry->e_value_inum,
 415                                       0);
 416         }
 417 }
 418
 419 static void check_ea_in_inode(e2fsck_t ctx, struct problem_context *pctx,
 420                               struct ea_quota *ea_ibody_quota)
 421 {
 422         struct ext2_super_block *sb = ctx->fs->super;
 423         struct ext2_inode_large *inode;
 424         struct ext2_ext_attr_entry *entry;
 425         char *start, *header, *end;
 426         unsigned int storage_size, remain;
 427         problem_t problem = 0;
 428         region_t region = 0;
 429
 430         ea_ibody_quota->blocks = 0;
 431         ea_ibody_quota->inodes = 0;
 432
 433         inode = (struct ext2_inode_large *) pctx->inode;
 434         storage_size = EXT2_INODE_SIZE(ctx->fs->super) - EXT2_GOOD_OLD_INODE_SIZE -
 435                 inode->i_extra_isize;
 436         header = ((char *) inode) + EXT2_GOOD_OLD_INODE_SIZE +
 437                  inode->i_extra_isize;
 438         end = header + storage_size;
 439         start = header + sizeof(__u32);
 440         entry = (struct ext2_ext_attr_entry *) start;
 441
 442         /* scan all entry's headers first */
 443
 444         /* take finish entry 0UL into account */
 445         remain = storage_size - sizeof(__u32);
 446
 447         region = region_create(0, storage_size);
 448         if (!region) {
 449                 fix_problem(ctx, PR_1_EA_ALLOC_REGION_ABORT, pctx);
 450                 problem = 0;
 451                 ctx->flags |= E2F_FLAG_ABORT;
 452                 return;
 453         }
 454         if (region_allocate(region, 0, sizeof(__u32))) {
 455                 problem = PR_1_INODE_EA_ALLOC_COLLISION;
 456                 goto fix;
 457         }
 458
 459         while (remain >= sizeof(struct ext2_ext_attr_entry) &&
 460                !EXT2_EXT_IS_LAST_ENTRY(entry)) {
 461                 __u32 hash;
 462
 463                 if (region_allocate(region, (char *)entry - (char *)header,
 464                                     EXT2_EXT_ATTR_LEN(entry->e_name_len))) {
 465                         problem = PR_1_INODE_EA_ALLOC_COLLISION;
 466                         goto fix;
 467                 }
 468
 469                 /* header eats this space */
 470                 remain -= sizeof(struct ext2_ext_attr_entry);
 471
 472                 /* is attribute name valid? */
 473                 if (EXT2_EXT_ATTR_SIZE(entry->e_name_len) > remain) {
 474                         pctx->num = entry->e_name_len;
 475                         problem = PR_1_ATTR_NAME_LEN;
 476                         goto fix;
 477                 }
 478
 479                 /* attribute len eats this space */
 480                 remain -= EXT2_EXT_ATTR_SIZE(entry->e_name_len);
 481
 482                 if (entry->e_value_inum == 0) {
 483                         /* check value size */
 484                         if (entry->e_value_size > remain) {
 485                                 pctx->num = entry->e_value_size;
 486                                 problem = PR_1_ATTR_VALUE_SIZE;
 487                                 goto fix;
 488                         }
 489
 490                         if (entry->e_value_size &&
 491                             region_allocate(region,
 492                                             sizeof(__u32) + entry->e_value_offs,
 493                                             EXT2_EXT_ATTR_SIZE(
 494                                                 entry->e_value_size))) {
 495                                 problem = PR_1_INODE_EA_ALLOC_COLLISION;
 496                                 goto fix;
 497                         }
 498
 499                         hash = ext2fs_ext_attr_hash_entry(entry,
 500                                                           start + entry->e_value_offs);
 501
 502                         /* e_hash may be 0 in older inode's ea */
 503                         if (entry->e_hash != 0 && entry->e_hash != hash) {
 504                                 pctx->num = entry->e_hash;
 505                                 problem = PR_1_ATTR_HASH;
 506                                 goto fix;
 507                         }
 508                 } else {
 509                         blk64_t quota_blocks;
 510
 511                         problem = check_large_ea_inode(ctx, entry, pctx,
 512                                                        &quota_blocks);
 513                         if (problem != 0)
 514                                 goto fix;
 515
 516                         ea_ibody_quota->blocks += quota_blocks;
 517                         ea_ibody_quota->inodes++;
 518                 }
 519
 520                 /* If EA value is stored in external inode then it does not
 521                  * consume space here */
 522                 if (entry->e_value_inum == 0)
 523                         remain -= entry->e_value_size;
 524
 525                 entry = EXT2_EXT_ATTR_NEXT(entry);
 526         }
 527
 528         if (region_allocate(region, (char *)entry - (char *)header,
 529                             sizeof(__u32))) {
 530                 problem = PR_1_INODE_EA_ALLOC_COLLISION;
 531                 goto fix;
 532         }
 533 fix:
 534         if (region)
 535                 region_free(region);
 536         /*
 537          * it seems like a corruption. it's very unlikely we could repair
 538          * EA(s) in automatic fashion -bzzz
 539          */
 540         if (problem == 0 || !fix_problem(ctx, problem, pctx)) {
 541                 inc_ea_inode_refs(ctx, pctx,
 542                                   (struct ext2_ext_attr_entry *)start, end);
 543                 return;
 544         }
 545
 546         /* simply remove all possible EA(s) */
 547         *((__u32 *)header) = 0UL;
 548         e2fsck_write_inode_full(ctx, pctx->ino, pctx->inode,
 549                                 EXT2_INODE_SIZE(sb), "pass1");
 550         ea_ibody_quota->blocks = 0;
 551         ea_ibody_quota->inodes = 0;
 552 }
 553
 554 static int check_inode_extra_negative_epoch(__u32 xtime, __u32 extra) {
 555         return (xtime & (1U << 31)) != 0 &&
 556                 (extra & EXT4_EPOCH_MASK) == EXT4_EPOCH_MASK;
 557 }
 558
 559 #define CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, xtime) \
 560         check_inode_extra_negative_epoch(inode->i_##xtime, \
 561                                          inode->i_##xtime##_extra)
 562
 563 /* When today's date is earlier than 2242, we assume that atimes,
 564  * ctimes, crtimes, and mtimes with years in the range 2310..2378 are
 565  * actually pre-1970 dates mis-encoded.
 566  */
 567 #define EXT4_EXTRA_NEGATIVE_DATE_CUTOFF 2 * (1LL << 32)
 568
 569 static void check_inode_extra_space(e2fsck_t ctx, struct problem_context *pctx,
 570                                     struct ea_quota *ea_ibody_quota)
 571 {
 572         struct ext2_super_block *sb = ctx->fs->super;
 573         struct ext2_inode_large *inode;
 574         __u32 *eamagic;
 575         int min, max;
 576
 577         ea_ibody_quota->blocks = 0;
 578         ea_ibody_quota->inodes = 0;
 579
 580         inode = (struct ext2_inode_large *) pctx->inode;
 581         if (EXT2_INODE_SIZE(sb) == EXT2_GOOD_OLD_INODE_SIZE) {
 582                 /* this isn't large inode. so, nothing to check */
 583                 return;
 584         }
 585
 586 #if 0
 587         printf("inode #%u, i_extra_size %d\n", pctx->ino,
 588                         inode->i_extra_isize);
 589 #endif
 590         /* i_extra_isize must cover i_extra_isize + i_checksum_hi at least */
 591         min = sizeof(inode->i_extra_isize) + sizeof(inode->i_checksum_hi);
 592         max = EXT2_INODE_SIZE(sb) - EXT2_GOOD_OLD_INODE_SIZE;
 593         /*
 594          * For now we will allow i_extra_isize to be 0, but really
 595          * implementations should never allow i_extra_isize to be 0
 596          */
 597         if (inode->i_extra_isize &&
 598             (inode->i_extra_isize < min || inode->i_extra_isize > max ||
 599              inode->i_extra_isize & 3)) {
 600                 if (!fix_problem(ctx, PR_1_EXTRA_ISIZE, pctx))
 601                         return;
 602                 if (inode->i_extra_isize < min || inode->i_extra_isize > max)
 603                         inode->i_extra_isize = sb->s_want_extra_isize;
 604                 else
 605                         inode->i_extra_isize = (inode->i_extra_isize + 3) & ~3;
 606                 e2fsck_write_inode_full(ctx, pctx->ino, pctx->inode,
 607                                         EXT2_INODE_SIZE(sb), "pass1");
 608         }
 609
 610         /* check if there is no place for an EA header */
 611         if (inode->i_extra_isize >= max - sizeof(__u32))
 612                 return;
 613
 614         eamagic = (__u32 *) (((char *) inode) + EXT2_GOOD_OLD_INODE_SIZE +
 615                         inode->i_extra_isize);
 616         if (*eamagic == EXT2_EXT_ATTR_MAGIC) {
 617                 /* it seems inode has an extended attribute(s) in body */
 618                 check_ea_in_inode(ctx, pctx, ea_ibody_quota);
 619         }
 620
 621         /*
 622          * If the inode's extended atime (ctime, crtime, mtime) is stored in
 623          * the old, invalid format, repair it.
 624          */
 625         if (((sizeof(time_t) <= 4) ||
 626              (((sizeof(time_t) > 4) &&
 627                ctx->now < EXT4_EXTRA_NEGATIVE_DATE_CUTOFF))) &&
 628             (CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, atime) ||
 629              CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, ctime) ||
 630              CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, crtime) ||
 631              CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, mtime))) {
 632
 633                 if (!fix_problem(ctx, PR_1_EA_TIME_OUT_OF_RANGE, pctx))
 634                         return;
 635
 636                 if (CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, atime))
 637                         inode->i_atime_extra &= ~EXT4_EPOCH_MASK;
 638                 if (CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, ctime))
 639                         inode->i_ctime_extra &= ~EXT4_EPOCH_MASK;
 640                 if (CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, crtime))
 641                         inode->i_crtime_extra &= ~EXT4_EPOCH_MASK;
 642                 if (CHECK_INODE_EXTRA_NEGATIVE_EPOCH(inode, mtime))
 643                         inode->i_mtime_extra &= ~EXT4_EPOCH_MASK;
 644                 e2fsck_write_inode_full(ctx, pctx->ino, pctx->inode,
 645                                         EXT2_INODE_SIZE(sb), "pass1");
 646         }
 647
 648 }
 649
 650 /*
 651  * Check to see if the inode might really be a directory, despite i_mode
 652  *
 653  * This is a lot of complexity for something for which I'm not really
 654  * convinced happens frequently in the wild.  If for any reason this
 655  * causes any problems, take this code out.
 656  * [tytso:20070331.0827EDT]
 657  */
 658 static void check_is_really_dir(e2fsck_t ctx, struct problem_context *pctx,
 659                                 char *buf)
 660 {
 661         struct ext2_inode *inode = pctx->inode;
 662         struct ext2_dir_entry   *dirent;
 663         errcode_t               retval;
 664         blk64_t                 blk;
 665         unsigned int            i, rec_len, not_device = 0;
 666         int                     extent_fs;
 667         int                     inlinedata_fs;
 668
 669         /*
 670          * If the mode looks OK, we believe it.  If the first block in
 671          * the i_block array is 0, this cannot be a directory. If the
 672          * inode is extent-mapped, it is still the case that the latter
 673          * cannot be 0 - the magic number in the extent header would make
 674          * it nonzero.
 675          */
 676         if (LINUX_S_ISDIR(inode->i_mode) || LINUX_S_ISREG(inode->i_mode) ||
 677             LINUX_S_ISLNK(inode->i_mode) || inode->i_block[0] == 0)
 678                 return;
 679
 680         /*
 681          * Check the block numbers in the i_block array for validity:
 682          * zero blocks are skipped (but the first one cannot be zero -
 683          * see above), other blocks are checked against the first and
 684          * max data blocks (from the the superblock) and against the
 685          * block bitmap. Any invalid block found means this cannot be
 686          * a directory.
 687          *
 688          * If there are non-zero blocks past the fourth entry, then
 689          * this cannot be a device file: we remember that for the next
 690          * check.
 691          *
 692          * For extent mapped files, we don't do any sanity checking:
 693          * just try to get the phys block of logical block 0 and run
 694          * with it.
 695          *
 696          * For inline data files, we just try to get the size of inline
 697          * data.  If it's true, we will treat it as a directory.
 698          */
 699
 700         extent_fs = ext2fs_has_feature_extents(ctx->fs->super);
 701         inlinedata_fs = ext2fs_has_feature_inline_data(ctx->fs->super);
 702         if (inlinedata_fs && (inode->i_flags & EXT4_INLINE_DATA_FL)) {
 703                 size_t size;
 704                 __u32 dotdot;
 705                 unsigned int rec_len2;
 706                 struct ext2_dir_entry de;
 707
 708                 if (ext2fs_inline_data_size(ctx->fs, pctx->ino, &size))
 709                         return;
 710                 /*
 711                  * If the size isn't a multiple of 4, it's probably not a
 712                  * directory??
 713                  */
 714                 if (size & 3)
 715                         return;
 716                 /*
 717                  * If the first 10 bytes don't look like a directory entry,
 718                  * it's probably not a directory.
 719                  */
 720                 memcpy(&dotdot, inode->i_block, sizeof(dotdot));
 721                 memcpy(&de, ((char *)inode->i_block) + EXT4_INLINE_DATA_DOTDOT_SIZE,
 722                        EXT2_DIR_REC_LEN(0));
 723                 dotdot = ext2fs_le32_to_cpu(dotdot);
 724                 de.inode = ext2fs_le32_to_cpu(de.inode);
 725                 de.rec_len = ext2fs_le16_to_cpu(de.rec_len);
 726                 ext2fs_get_rec_len(ctx->fs, &de, &rec_len2);
 727                 if (dotdot >= ctx->fs->super->s_inodes_count ||
 728                     (dotdot < EXT2_FIRST_INO(ctx->fs->super) &&
 729                      dotdot != EXT2_ROOT_INO) ||
 730                     de.inode >= ctx->fs->super->s_inodes_count ||
 731                     (de.inode < EXT2_FIRST_INO(ctx->fs->super) &&
 732                      de.inode != 0) ||
 733                     rec_len2 > EXT4_MIN_INLINE_DATA_SIZE -
 734                               EXT4_INLINE_DATA_DOTDOT_SIZE)
 735                         return;
 736                 /* device files never have a "system.data" entry */
 737                 goto isdir;
 738         } else if (extent_fs && (inode->i_flags & EXT4_EXTENTS_FL)) {
 739                 /* extent mapped */
 740                 if  (ext2fs_bmap2(ctx->fs, pctx->ino, inode, 0, 0, 0, 0,
 741                                  &blk))
 742                         return;
 743                 /* device files are never extent mapped */
 744                 not_device++;
 745         } else {
 746                 for (i=0; i < EXT2_N_BLOCKS; i++) {
 747                         blk = inode->i_block[i];
 748                         if (!blk)
 749                                 continue;
 750                         if (i >= 4)
 751                                 not_device++;
 752
 753                         if (blk < ctx->fs->super->s_first_data_block ||
 754                             blk >= ext2fs_blocks_count(ctx->fs->super) ||
 755                             ext2fs_fast_test_block_bitmap2(ctx->block_found_map,
 756                                                            blk))
 757                                 return; /* Invalid block, can't be dir */
 758                 }
 759                 blk = inode->i_block[0];
 760         }
 761
 762         /*
 763          * If the mode says this is a device file and the i_links_count field
 764          * is sane and we have not ruled it out as a device file previously,
 765          * we declare it a device file, not a directory.
 766          */
 767         if ((LINUX_S_ISCHR(inode->i_mode) || LINUX_S_ISBLK(inode->i_mode)) &&
 768             (inode->i_links_count == 1) && !not_device)
 769                 return;
 770
 771         /* read the first block */
 772         ehandler_operation(_("reading directory block"));
 773         retval = ext2fs_read_dir_block4(ctx->fs, blk, buf, 0, pctx->ino);
 774         ehandler_operation(0);
 775         if (retval)
 776                 return;
 777
 778         dirent = (struct ext2_dir_entry *) buf;
 779         retval = ext2fs_get_rec_len(ctx->fs, dirent, &rec_len);
 780         if (retval)
 781                 return;
 782         if ((ext2fs_dirent_name_len(dirent) != 1) ||
 783             (dirent->name[0] != '.') ||
 784             (dirent->inode != pctx->ino) ||
 785             (rec_len < 12) ||
 786             (rec_len % 4) ||
 787             (rec_len >= ctx->fs->blocksize - 12))
 788                 return;
 789
 790         dirent = (struct ext2_dir_entry *) (buf + rec_len);
 791         retval = ext2fs_get_rec_len(ctx->fs, dirent, &rec_len);
 792         if (retval)
 793                 return;
 794         if ((ext2fs_dirent_name_len(dirent) != 2) ||
 795             (dirent->name[0] != '.') ||
 796             (dirent->name[1] != '.') ||
 797             (rec_len < 12) ||
 798             (rec_len % 4))
 799                 return;
 800
 801 isdir:
 802         if (fix_problem(ctx, PR_1_TREAT_AS_DIRECTORY, pctx)) {
 803                 inode->i_mode = (inode->i_mode & 07777) | LINUX_S_IFDIR;
 804                 e2fsck_write_inode_full(ctx, pctx->ino, inode,
 805                                         EXT2_INODE_SIZE(ctx->fs->super),
 806                                         "check_is_really_dir");
 807         }
 808 }
 809
 810 extern errcode_t e2fsck_setup_icount(e2fsck_t ctx, const char *icount_name,
 811                                      int flags, ext2_icount_t hint,
 812                                      ext2_icount_t *ret)
 813 {
 814         unsigned int            threshold;
 815         unsigned int            save_type;
 816         ext2_ino_t              num_dirs;
 817         errcode_t               retval;
 818         char                    *tdb_dir;
 819         int                     enable;
 820
 821         *ret = 0;
 822
 823         profile_get_string(ctx->profile, "scratch_files", "directory", 0, 0,
 824                            &tdb_dir);
 825         profile_get_uint(ctx->profile, "scratch_files",
 826                          "numdirs_threshold", 0, 0, &threshold);
 827         profile_get_boolean(ctx->profile, "scratch_files",
 828                             "icount", 0, 1, &enable);
 829
 830         retval = ext2fs_get_num_dirs(ctx->fs, &num_dirs);
 831         if (retval)
 832                 num_dirs = 1024;        /* Guess */
 833
 834         if (enable && tdb_dir && !access(tdb_dir, W_OK) &&
 835             (!threshold || num_dirs > threshold)) {
 836                 retval = ext2fs_create_icount_tdb(ctx->fs, tdb_dir,
 837                                                   flags, ret);
 838                 if (retval == 0)
 839                         return 0;
 840         }
 841         e2fsck_set_bitmap_type(ctx->fs, EXT2FS_BMAP64_RBTREE, icount_name,
 842                                &save_type);
 843         if (ctx->options & E2F_OPT_ICOUNT_FULLMAP)
 844                 flags |= EXT2_ICOUNT_OPT_FULLMAP;
 845         retval = ext2fs_create_icount2(ctx->fs, flags, 0, hint, ret);
 846         ctx->fs->default_bitmap_type = save_type;
 847         return retval;
 848 }
 849
 850 static errcode_t recheck_bad_inode_checksum(ext2_filsys fs, ext2_ino_t ino,
 851                                             e2fsck_t ctx,
 852                                             struct problem_context *pctx)
 853 {
 854         errcode_t retval;
 855         struct ext2_inode_large inode;
 856
 857         /*
 858          * Reread inode.  If we don't see checksum error, then this inode
 859          * has been fixed elsewhere.
 860          */
 861         ctx->stashed_ino = 0;
 862         retval = ext2fs_read_inode_full(fs, ino, (struct ext2_inode *)&inode,
 863                                         sizeof(inode));
 864         if (retval && retval != EXT2_ET_INODE_CSUM_INVALID)
 865                 return retval;
 866         if (!retval)
 867                 return 0;
 868
 869         /*
 870          * Checksum still doesn't match.  That implies that the inode passes
 871          * all the sanity checks, so maybe the checksum is simply corrupt.
 872          * See if the user will go for fixing that.
 873          */
 874         if (!fix_problem(ctx, PR_1_INODE_ONLY_CSUM_INVALID, pctx))
 875                 return 0;
 876
 877         retval = ext2fs_write_inode_full(fs, ino, (struct ext2_inode *)&inode,
 878                                          sizeof(inode));
 879         return retval;
 880 }
 881
 882 static void reserve_block_for_root_repair(e2fsck_t ctx)
 883 {
 884         blk64_t         blk = 0;
 885         errcode_t       err;
 886         ext2_filsys     fs = ctx->fs;
 887
 888         ctx->root_repair_block = 0;
 889         if (ext2fs_test_inode_bitmap2(ctx->inode_used_map, EXT2_ROOT_INO))
 890                 return;
 891
 892         err = ext2fs_new_block2(fs, 0, ctx->block_found_map, &blk);
 893         if (err)
 894                 return;
 895         ext2fs_mark_block_bitmap2(ctx->block_found_map, blk);
 896         ctx->root_repair_block = blk;
 897 }
 898
 899 static void reserve_block_for_lnf_repair(e2fsck_t ctx)
 900 {
 901         blk64_t         blk = 0;
 902         errcode_t       err;
 903         ext2_filsys     fs = ctx->fs;
 904         static const char name[] = "lost+found";
 905         ext2_ino_t      ino;
 906
 907         ctx->lnf_repair_block = 0;
 908         if (!ext2fs_lookup(fs, EXT2_ROOT_INO, name, sizeof(name)-1, 0, &ino))
 909                 return;
 910
 911         err = ext2fs_new_block2(fs, 0, ctx->block_found_map, &blk);
 912         if (err)
 913                 return;
 914         ext2fs_mark_block_bitmap2(ctx->block_found_map, blk);
 915         ctx->lnf_repair_block = blk;
 916 }
 917
 918 static errcode_t get_inline_data_ea_size(ext2_filsys fs, ext2_ino_t ino,
 919                                          size_t *sz)
 920 {
 921         void *p;
 922         struct ext2_xattr_handle *handle;
 923         errcode_t retval;
 924
 925         retval = ext2fs_xattrs_open(fs, ino, &handle);
 926         if (retval)
 927                 return retval;
 928
 929         retval = ext2fs_xattrs_read(handle);
 930         if (retval)
 931                 goto err;
 932
 933         retval = ext2fs_xattr_get(handle, "system.data", &p, sz);
 934         if (retval)
 935                 goto err;
 936         ext2fs_free_mem(&p);
 937 err:
 938         (void) ext2fs_xattrs_close(&handle);
 939         return retval;
 940 }
 941
 942 static void finish_processing_inode(e2fsck_t ctx, ext2_ino_t ino,
 943                                     struct problem_context *pctx,
 944                                     int failed_csum)
 945 {
 946         if (!failed_csum)
 947                 return;
 948
 949         /*
 950          * If the inode failed the checksum and the user didn't
 951          * clear the inode, test the checksum again -- if it still
 952          * fails, ask the user if the checksum should be corrected.
 953          */
 954         pctx->errcode = recheck_bad_inode_checksum(ctx->fs, ino, ctx, pctx);
 955         if (pctx->errcode)
 956                 ctx->flags |= E2F_FLAG_ABORT;
 957 }
 958 #define FINISH_INODE_LOOP(ctx, ino, pctx, failed_csum) \
 959         do { \
 960                 finish_processing_inode((ctx), (ino), (pctx), (failed_csum)); \
 961                 if ((ctx)->flags & E2F_FLAG_ABORT) \
 962                         return; \
 963         } while (0)
 964
 965 static int could_be_block_map(ext2_filsys fs, struct ext2_inode *inode)
 966 {
 967         __u32 x;
 968         int i;
 969
 970         for (i = 0; i < EXT2_N_BLOCKS; i++) {
 971                 x = inode->i_block[i];
 972 #ifdef WORDS_BIGENDIAN
 973                 x = ext2fs_swab32(x);
 974 #endif
 975                 if (x >= ext2fs_blocks_count(fs->super))
 976                         return 0;
 977         }
 978
 979         return 1;
 980 }
 981
 982 /*
 983  * Figure out what to do with an inode that has both extents and inline data
 984  * inode flags set.  Returns -1 if we decide to erase the inode, 0 otherwise.
 985  */
 986 static int fix_inline_data_extents_file(e2fsck_t ctx,
 987                                         ext2_ino_t ino,
 988                                         struct ext2_inode *inode,
 989                                         int inode_size,
 990                                         struct problem_context *pctx)
 991 {
 992         size_t max_inline_ea_size;
 993         ext2_filsys fs = ctx->fs;
 994         int dirty = 0;
 995
 996         /* Both feature flags not set?  Just run the regular checks */
 997         if (!ext2fs_has_feature_extents(fs->super) &&
 998             !ext2fs_has_feature_inline_data(fs->super))
 999                 return 0;
1000
1001         /* Clear both flags if it's a special file */
1002         if (LINUX_S_ISCHR(inode->i_mode) ||
1003             LINUX_S_ISBLK(inode->i_mode) ||
1004             LINUX_S_ISFIFO(inode->i_mode) ||
1005             LINUX_S_ISSOCK(inode->i_mode)) {
1006                 check_extents_inlinedata(ctx, pctx);
1007                 return 0;
1008         }
1009
1010         /* If it looks like an extent tree, try to clear inlinedata */
1011         if (ext2fs_extent_header_verify(inode->i_block,
1012                                  sizeof(inode->i_block)) == 0 &&
1013             fix_problem(ctx, PR_1_CLEAR_INLINE_DATA_FOR_EXTENT, pctx)) {
1014                 inode->i_flags &= ~EXT4_INLINE_DATA_FL;
1015                 dirty = 1;
1016                 goto out;
1017         }
1018
1019         /* If it looks short enough to be inline data, try to clear extents */
1020         if (inode_size > EXT2_GOOD_OLD_INODE_SIZE)
1021                 max_inline_ea_size = inode_size -
1022                                      (EXT2_GOOD_OLD_INODE_SIZE +
1023                                       ((struct ext2_inode_large *)inode)->i_extra_isize);
1024         else
1025                 max_inline_ea_size = 0;
1026         if (EXT2_I_SIZE(inode) <
1027             EXT4_MIN_INLINE_DATA_SIZE + max_inline_ea_size &&
1028             fix_problem(ctx, PR_1_CLEAR_EXTENT_FOR_INLINE_DATA, pctx)) {
1029                 inode->i_flags &= ~EXT4_EXTENTS_FL;
1030                 dirty = 1;
1031                 goto out;
1032         }
1033
1034         /*
1035          * Too big for inline data, but no evidence of extent tree -
1036          * maybe it's a block map file?  If the mappings all look valid?
1037          */
1038         if (could_be_block_map(fs, inode) &&
1039             fix_problem(ctx, PR_1_CLEAR_EXTENT_INLINE_DATA_FLAGS, pctx)) {
1040 #ifdef WORDS_BIGENDIAN
1041                 int i;
1042
1043                 for (i = 0; i < EXT2_N_BLOCKS; i++)
1044                         inode->i_block[i] = ext2fs_swab32(inode->i_block[i]);
1045 #endif
1046
1047                 inode->i_flags &= ~(EXT4_EXTENTS_FL | EXT4_INLINE_DATA_FL);
1048                 dirty = 1;
1049                 goto out;
1050         }
1051
1052         /* Oh well, just clear the busted inode. */
1053         if (fix_problem(ctx, PR_1_CLEAR_EXTENT_INLINE_DATA_INODE, pctx)) {
1054                 e2fsck_clear_inode(ctx, ino, inode, 0, "pass1");
1055                 return -1;
1056         }
1057
1058 out:
1059         if (dirty)
1060                 e2fsck_write_inode(ctx, ino, inode, "pass1");
1061
1062         return 0;
1063 }
1064
1065 static void pass1_readahead(e2fsck_t ctx, dgrp_t *group, ext2_ino_t *next_ino)
1066 {
1067         ext2_ino_t inodes_in_group = 0, inodes_per_block, inodes_per_buffer;
1068         dgrp_t start = *group, grp;
1069         blk64_t blocks_to_read = 0;
1070         errcode_t err = EXT2_ET_INVALID_ARGUMENT;
1071
1072         if (ctx->readahead_kb == 0)
1073                 goto out;
1074
1075         /* Keep iterating groups until we have enough to readahead */
1076         inodes_per_block = EXT2_INODES_PER_BLOCK(ctx->fs->super);
1077         for (grp = start; grp < ctx->fs->group_desc_count; grp++) {
1078                 if (ext2fs_bg_flags_test(ctx->fs, grp, EXT2_BG_INODE_UNINIT))
1079                         continue;
1080                 inodes_in_group = ctx->fs->super->s_inodes_per_group -
1081                                         ext2fs_bg_itable_unused(ctx->fs, grp);
1082                 blocks_to_read += (inodes_in_group + inodes_per_block - 1) /
1083                                         inodes_per_block;
1084                 if (blocks_to_read * ctx->fs->blocksize >
1085                     ctx->readahead_kb * 1024)
1086                         break;
1087         }
1088
1089         err = e2fsck_readahead(ctx->fs, E2FSCK_READA_ITABLE, start,
1090                                grp - start + 1);
1091         if (err == EAGAIN) {
1092                 ctx->readahead_kb /= 2;
1093                 err = 0;
1094         }
1095
1096 out:
1097         if (err) {
1098                 /* Error; disable itable readahead */
1099                 *group = ctx->fs->group_desc_count;
1100                 *next_ino = ctx->fs->super->s_inodes_count;
1101         } else {
1102                 /*
1103                  * Don't do more readahead until we've reached the first inode
1104                  * of the last inode scan buffer block for the last group.
1105                  */
1106                 *group = grp + 1;
1107                 inodes_per_buffer = (ctx->inode_buffer_blocks ?
1108                                      ctx->inode_buffer_blocks :
1109                                      EXT2_INODE_SCAN_DEFAULT_BUFFER_BLOCKS) *
1110                                     ctx->fs->blocksize /
1111                                     EXT2_INODE_SIZE(ctx->fs->super);
1112                 inodes_in_group--;
1113                 *next_ino = inodes_in_group -
1114                             (inodes_in_group % inodes_per_buffer) + 1 +
1115                             (grp * ctx->fs->super->s_inodes_per_group);
1116         }
1117 }
1118
1119 /*
1120  * Check if the passed ino is one of the used superblock quota inodes.
1121  *
1122  * Before the quota inodes were journaled, older superblock quota inodes
1123  * were just regular files in the filesystem and not reserved inodes.  This
1124  * checks if the passed ino is one of the s_*_quota_inum superblock fields,
1125  * which may not always be the same as the EXT4_*_QUOTA_INO fields.
1126  */
1127 static int quota_inum_is_super(struct ext2_super_block *sb, ext2_ino_t ino)
1128 {
1129         enum quota_type qtype;
1130
1131         for (qtype = 0; qtype < MAXQUOTAS; qtype++)
1132                 if (*quota_sb_inump(sb, qtype) == ino)
1133                         return 1;
1134
1135         return 0;
1136 }
1137
1138 /*
1139  * Check if the passed ino is one of the reserved quota inodes.
1140  * This checks if the inode number is one of the reserved EXT4_*_QUOTA_INO
1141  * inodes.  These inodes may or may not be in use by the quota feature.
1142  */
1143 static int quota_inum_is_reserved(ext2_filsys fs, ext2_ino_t ino)
1144 {
1145         enum quota_type qtype;
1146
1147         for (qtype = 0; qtype < MAXQUOTAS; qtype++)
1148                 if (quota_type2inum(qtype, fs->super) == ino)
1149                         return 1;
1150
1151         return 0;
1152 }
1153
1154 static int e2fsck_should_abort(e2fsck_t ctx)
1155 {
1156         e2fsck_t global_ctx;
1157
1158         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1159                 return 1;
1160
1161         if (ctx->global_ctx) {
1162                 global_ctx = ctx->global_ctx;
1163                 if (global_ctx->flags & E2F_FLAG_SIGNAL_MASK)
1164                         return 1;
1165         }
1166         return 0;
1167 }
1168
1169 void e2fsck_pass1_run(e2fsck_t ctx)
1170 {
1171         int     i;
1172         ext2_filsys fs = ctx->fs;
1173         ext2_ino_t      ino = 0;
1174         struct ext2_inode *inode = NULL;
1175         ext2_inode_scan scan = NULL;
1176         char            *block_buf = NULL;
1177 #ifdef RESOURCE_TRACK
1178         struct resource_track   rtrack;
1179 #endif
1180         unsigned char   frag, fsize;
1181         struct          problem_context pctx;
1182         struct          scan_callback_struct scan_struct;
1183         struct ext2_super_block *sb = ctx->fs->super;
1184         const char      *old_op;
1185         const char      *eop_next_inode = _("getting next inode from scan");
1186         int             imagic_fs, extent_fs, inlinedata_fs, casefold_fs;
1187         int             low_dtime_check = 1;
1188         unsigned int    inode_size = EXT2_INODE_SIZE(fs->super);
1189         unsigned int    bufsize;
1190         int             failed_csum = 0;
1191         ext2_ino_t      ino_threshold = 0;
1192         dgrp_t          ra_group = 0;
1193         struct ea_quota ea_ibody_quota;
1194         struct process_inode_block *inodes_to_process;
1195         int             process_inode_count;
1196
1197         init_resource_track(&rtrack, ctx->fs->io);
1198         clear_problem_context(&pctx);
1199
1200         /* If we can do readahead, figure out how many groups to pull in. */
1201         if (!e2fsck_can_readahead(ctx->fs))
1202                 ctx->readahead_kb = 0;
1203         else if (ctx->readahead_kb == ~0ULL)
1204                 ctx->readahead_kb = e2fsck_guess_readahead(ctx->fs);
1205         pass1_readahead(ctx, &ra_group, &ino_threshold);
1206
1207         if (!(ctx->options & E2F_OPT_PREEN))
1208                 fix_problem(ctx, PR_1_PASS_HEADER, &pctx);
1209
1210         if (ext2fs_has_feature_dir_index(fs->super) &&
1211             !(ctx->options & E2F_OPT_NO)) {
1212                 if (ext2fs_u32_list_create(&ctx->dirs_to_hash, 50))
1213                         ctx->dirs_to_hash = 0;
1214         }
1215
1216 #ifdef MTRACE
1217         mtrace_print("Pass 1");
1218 #endif
1219
1220         imagic_fs = ext2fs_has_feature_imagic_inodes(sb);
1221         extent_fs = ext2fs_has_feature_extents(sb);
1222         inlinedata_fs = ext2fs_has_feature_inline_data(sb);
1223         casefold_fs = ext2fs_has_feature_casefold(sb);
1224
1225         /*
1226          * Allocate bitmaps structures
1227          */
1228         pctx.errcode = e2fsck_allocate_inode_bitmap(fs, _("in-use inode map"),
1229                                                     EXT2FS_BMAP64_RBTREE,
1230                                                     "inode_used_map",
1231                                                     &ctx->inode_used_map);
1232         if (pctx.errcode) {
1233                 pctx.num = 1;
1234                 fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
1235                 ctx->flags |= E2F_FLAG_ABORT;
1236                 return;
1237         }
1238         pctx.errcode = e2fsck_allocate_inode_bitmap(fs,
1239                         _("directory inode map"),
1240                         ctx->global_ctx ? EXT2FS_BMAP64_RBTREE :
1241                         EXT2FS_BMAP64_AUTODIR,
1242                         "inode_dir_map", &ctx->inode_dir_map);
1243         if (pctx.errcode) {
1244                 pctx.num = 2;
1245                 fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
1246                 ctx->flags |= E2F_FLAG_ABORT;
1247                 return;
1248         }
1249         pctx.errcode = e2fsck_allocate_inode_bitmap(fs,
1250                         _("regular file inode map"), EXT2FS_BMAP64_RBTREE,
1251                         "inode_reg_map", &ctx->inode_reg_map);
1252         if (pctx.errcode) {
1253                 pctx.num = 6;
1254                 fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
1255                 ctx->flags |= E2F_FLAG_ABORT;
1256                 return;
1257         }
1258         pctx.errcode = e2fsck_allocate_subcluster_bitmap(fs,
1259                         _("in-use block map"), EXT2FS_BMAP64_RBTREE,
1260                         "block_found_map", &ctx->block_found_map);
1261         if (pctx.errcode) {
1262                 pctx.num = 1;
1263                 fix_problem(ctx, PR_1_ALLOCATE_BBITMAP_ERROR, &pctx);
1264                 ctx->flags |= E2F_FLAG_ABORT;
1265                 return;
1266         }
1267         pctx.errcode = e2fsck_allocate_block_bitmap(fs,
1268                         _("metadata block map"), EXT2FS_BMAP64_RBTREE,
1269                         "block_metadata_map", &ctx->block_metadata_map);
1270         if (pctx.errcode) {
1271                 pctx.num = 1;
1272                 fix_problem(ctx, PR_1_ALLOCATE_BBITMAP_ERROR, &pctx);
1273                 ctx->flags |= E2F_FLAG_ABORT;
1274                 return;
1275         }
1276         if (casefold_fs) {
1277                 pctx.errcode =
1278                         e2fsck_allocate_inode_bitmap(fs,
1279                                                      _("inode casefold map"),
1280                                                      EXT2FS_BMAP64_RBTREE,
1281                                                      "inode_casefold_map",
1282                                                      &ctx->inode_casefold_map);
1283                 if (pctx.errcode) {
1284                         pctx.num = 1;
1285                         fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
1286                         ctx->flags |= E2F_FLAG_ABORT;
1287                         return;
1288                 }
1289         }
1290         pctx.errcode = e2fsck_setup_icount(ctx, "inode_link_info", 0, NULL,
1291                                            &ctx->inode_link_info);
1292         if (pctx.errcode) {
1293                 fix_problem(ctx, PR_1_ALLOCATE_ICOUNT, &pctx);
1294                 ctx->flags |= E2F_FLAG_ABORT;
1295                 return;
1296         }
1297         bufsize = inode_size;
1298         if (bufsize < sizeof(struct ext2_inode_large))
1299                 bufsize = sizeof(struct ext2_inode_large);
1300         inode = (struct ext2_inode *)
1301                 e2fsck_allocate_memory(ctx, bufsize, "scratch inode");
1302
1303         inodes_to_process = (struct process_inode_block *)
1304                 e2fsck_allocate_memory(ctx,
1305                                        (ctx->process_inode_size *
1306                                         sizeof(struct process_inode_block)),
1307                                        "array of inodes to process");
1308         process_inode_count = 0;
1309
1310         pctx.errcode = ext2fs_init_dblist(fs, 0);
1311         if (pctx.errcode) {
1312                 fix_problem(ctx, PR_1_ALLOCATE_DBCOUNT, &pctx);
1313                 ctx->flags |= E2F_FLAG_ABORT;
1314                 goto endit;
1315         }
1316
1317         /*
1318          * If the last orphan field is set, clear it, since the pass1
1319          * processing will automatically find and clear the orphans.
1320          * In the future, we may want to try using the last_orphan
1321          * linked list ourselves, but for now, we clear it so that the
1322          * ext3 mount code won't get confused.
1323          */
1324         if (!(ctx->options & E2F_OPT_READONLY)) {
1325                 if (fs->super->s_last_orphan) {
1326                         fs->super->s_last_orphan = 0;
1327                         ext2fs_mark_super_dirty(fs);
1328                 }
1329         }
1330
1331         mark_table_blocks(ctx);
1332         pctx.errcode = ext2fs_convert_subcluster_bitmap(fs,
1333                                                 &ctx->block_found_map);
1334         if (pctx.errcode) {
1335                 fix_problem(ctx, PR_1_CONVERT_SUBCLUSTER, &pctx);
1336                 ctx->flags |= E2F_FLAG_ABORT;
1337                 goto endit;
1338         }
1339         block_buf = (char *) e2fsck_allocate_memory(ctx, fs->blocksize * 3,
1340                                                     "block interate buffer");
1341         if (EXT2_INODE_SIZE(fs->super) == EXT2_GOOD_OLD_INODE_SIZE)
1342                 e2fsck_use_inode_shortcuts(ctx, 1);
1343         e2fsck_intercept_block_allocations(ctx);
1344         old_op = ehandler_operation(_("opening inode scan"));
1345         pctx.errcode = ext2fs_open_inode_scan(fs, ctx->inode_buffer_blocks,
1346                                               &scan);
1347         ehandler_operation(old_op);
1348         if (pctx.errcode) {
1349                 fix_problem(ctx, PR_1_ISCAN_ERROR, &pctx);
1350                 ctx->flags |= E2F_FLAG_ABORT;
1351                 goto endit;
1352         }
1353         ext2fs_inode_scan_flags(scan, EXT2_SF_SKIP_MISSING_ITABLE |
1354                                       EXT2_SF_WARN_GARBAGE_INODES, 0);
1355         ctx->stashed_inode = inode;
1356         scan_struct.ctx = ctx;
1357         scan_struct.block_buf = block_buf;
1358         scan_struct.inodes_to_process = inodes_to_process;
1359         scan_struct.process_inode_count = &process_inode_count;
1360         ext2fs_set_inode_callback(scan, scan_callback, &scan_struct);
1361         if (ctx->progress && ((ctx->progress)(ctx, 1, 0,
1362                                               ctx->fs->group_desc_count)))
1363                 goto endit;
1364         if ((fs->super->s_wtime &&
1365              fs->super->s_wtime < fs->super->s_inodes_count) ||
1366             (fs->super->s_mtime &&
1367              fs->super->s_mtime < fs->super->s_inodes_count) ||
1368             (fs->super->s_mkfs_time &&
1369              fs->super->s_mkfs_time < fs->super->s_inodes_count))
1370                 low_dtime_check = 0;
1371
1372         if (ext2fs_has_feature_mmp(fs->super) &&
1373             fs->super->s_mmp_block > fs->super->s_first_data_block &&
1374             fs->super->s_mmp_block < ext2fs_blocks_count(fs->super))
1375                 ext2fs_mark_block_bitmap2(ctx->block_found_map,
1376                                           fs->super->s_mmp_block);
1377
1378         /* Set up ctx->lost_and_found if possible */
1379         (void) e2fsck_get_lost_and_found(ctx, 0);
1380
1381 #ifdef HAVE_PTHREAD
1382         if (ctx->global_ctx) {
1383                 if (ctx->options & E2F_OPT_DEBUG &&
1384                     ctx->options & E2F_OPT_MULTITHREAD)
1385                         fprintf(stderr, "thread %d jumping to group %d\n",
1386                                         ctx->thread_info.et_thread_index,
1387                                         ctx->thread_info.et_group_start);
1388                 pctx.errcode = ext2fs_inode_scan_goto_blockgroup(scan,
1389                                         ctx->thread_info.et_group_start);
1390                 if (pctx.errcode) {
1391                         fix_problem(ctx, PR_1_PASS_HEADER, &pctx);
1392                         ctx->flags |= E2F_FLAG_ABORT;
1393                         goto endit;
1394                 }
1395         }
1396 #endif
1397
1398         while (1) {
1399                 if (ino % (fs->super->s_inodes_per_group * 4) == 1) {
1400                         if (e2fsck_mmp_update(fs))
1401                                 fatal_error(ctx, 0);
1402                 }
1403                 old_op = ehandler_operation(eop_next_inode);
1404                 pctx.errcode = ext2fs_get_next_inode_full(scan, &ino,
1405                                                           inode, inode_size);
1406                 if (ino > ino_threshold)
1407                         pass1_readahead(ctx, &ra_group, &ino_threshold);
1408                 ehandler_operation(old_op);
1409                 if (e2fsck_should_abort(ctx))
1410                         goto endit;
1411                 if (pctx.errcode == EXT2_ET_BAD_BLOCK_IN_INODE_TABLE) {
1412                         /*
1413                          * If badblocks says badblocks is bad, offer to clear
1414                          * the list, update the in-core bb list, and restart
1415                          * the inode scan.
1416                          */
1417                         if (ino == EXT2_BAD_INO &&
1418                             fix_problem(ctx, PR_1_BADBLOCKS_IN_BADBLOCKS,
1419                                         &pctx)) {
1420                                 errcode_t err;
1421
1422                                 e2fsck_clear_inode(ctx, ino, inode, 0, "pass1");
1423                                 ext2fs_badblocks_list_free(ctx->fs->badblocks);
1424                                 ctx->fs->badblocks = NULL;
1425                                 err = ext2fs_read_bb_inode(ctx->fs,
1426                                                         &ctx->fs->badblocks);
1427                                 if (err) {
1428                                         fix_problem(ctx, PR_1_ISCAN_ERROR,
1429                                                     &pctx);
1430                                         ctx->flags |= E2F_FLAG_ABORT;
1431                                 } else
1432                                         ctx->flags |= E2F_FLAG_RESTART;
1433                                 goto endit;
1434                         }
1435                         if (!ctx->inode_bb_map)
1436                                 alloc_bb_map(ctx);
1437                         ext2fs_mark_inode_bitmap2(ctx->inode_bb_map, ino);
1438                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1439                         continue;
1440                 }
1441                 if (pctx.errcode == EXT2_ET_SCAN_FINISHED)
1442                         break;
1443                 if (pctx.errcode &&
1444                     pctx.errcode != EXT2_ET_INODE_CSUM_INVALID &&
1445                     pctx.errcode != EXT2_ET_INODE_IS_GARBAGE) {
1446                         fix_problem(ctx, PR_1_ISCAN_ERROR, &pctx);
1447                         ctx->flags |= E2F_FLAG_ABORT;
1448                         goto endit;
1449                 }
1450                 if (!ino)
1451                         break;
1452 #ifdef HAVE_PTHREAD
1453                 if (ctx->global_ctx)
1454                         ctx->thread_info.et_inode_number++;
1455 #endif
1456                 pctx.ino = ino;
1457                 pctx.inode = inode;
1458                 ctx->stashed_ino = ino;
1459
1460                 /* Clear trashed inode? */
1461                 if (pctx.errcode == EXT2_ET_INODE_IS_GARBAGE &&
1462                     inode->i_links_count > 0 &&
1463                     fix_problem(ctx, PR_1_INODE_IS_GARBAGE, &pctx)) {
1464                         pctx.errcode = 0;
1465                         e2fsck_clear_inode(ctx, ino, inode, 0, "pass1");
1466                 }
1467                 failed_csum = pctx.errcode != 0;
1468
1469                 /*
1470                  * Check for inodes who might have been part of the
1471                  * orphaned list linked list.  They should have gotten
1472                  * dealt with by now, unless the list had somehow been
1473                  * corrupted.
1474                  *
1475                  * FIXME: In the future, inodes which are still in use
1476                  * (and which are therefore) pending truncation should
1477                  * be handled specially.  Right now we just clear the
1478                  * dtime field, and the normal e2fsck handling of
1479                  * inodes where i_size and the inode blocks are
1480                  * inconsistent is to fix i_size, instead of releasing
1481                  * the extra blocks.  This won't catch the inodes that
1482                  * was at the end of the orphan list, but it's better
1483                  * than nothing.  The right answer is that there
1484                  * shouldn't be any bugs in the orphan list handling.  :-)
1485                  */
1486                 if (inode->i_dtime && low_dtime_check &&
1487                     inode->i_dtime < ctx->fs->super->s_inodes_count) {
1488                         if (fix_problem(ctx, PR_1_LOW_DTIME, &pctx)) {
1489                                 inode->i_dtime = inode->i_links_count ?
1490                                         0 : ctx->now;
1491                                 e2fsck_write_inode(ctx, ino, inode,
1492                                                    "pass1");
1493                                 failed_csum = 0;
1494                         }
1495                 }
1496
1497                 if (inode->i_links_count) {
1498                         pctx.errcode = ext2fs_icount_store(ctx->inode_link_info,
1499                                            ino, inode->i_links_count);
1500                         if (pctx.errcode) {
1501                                 pctx.num = inode->i_links_count;
1502                                 fix_problem(ctx, PR_1_ICOUNT_STORE, &pctx);
1503                                 ctx->flags |= E2F_FLAG_ABORT;
1504                                 goto endit;
1505                         }
1506                 } else if ((ino >= EXT2_FIRST_INODE(fs->super)) &&
1507                            !quota_inum_is_reserved(fs, ino)) {
1508                         if (!inode->i_dtime && inode->i_mode) {
1509                                 if (fix_problem(ctx,
1510                                             PR_1_ZERO_DTIME, &pctx)) {
1511                                         inode->i_dtime = ctx->now;
1512                                         e2fsck_write_inode(ctx, ino, inode,
1513                                                            "pass1");
1514                                         failed_csum = 0;
1515                                 }
1516                         }
1517                         FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1518                         continue;
1519                 }
1520
1521                 if ((inode->i_flags & EXT4_CASEFOLD_FL) &&
1522                     ((!LINUX_S_ISDIR(inode->i_mode) &&
1523                       fix_problem(ctx, PR_1_CASEFOLD_NONDIR, &pctx)) ||
1524                      (!casefold_fs &&
1525                       fix_problem(ctx, PR_1_CASEFOLD_FEATURE, &pctx)))) {
1526                         inode->i_flags &= ~EXT4_CASEFOLD_FL;
1527                         e2fsck_write_inode(ctx, ino, inode, "pass1");
1528                 }
1529
1530                 /* Conflicting inlinedata/extents inode flags? */
1531                 if ((inode->i_flags & EXT4_INLINE_DATA_FL) &&
1532                     (inode->i_flags & EXT4_EXTENTS_FL)) {
1533                         int res = fix_inline_data_extents_file(ctx, ino, inode,
1534                                                                inode_size,
1535                                                                &pctx);
1536                         if (res < 0) {
1537                                 /* skip FINISH_INODE_LOOP */
1538                                 continue;
1539                         }
1540                 }
1541
1542                 /* Test for incorrect inline_data flags settings. */
1543                 if ((inode->i_flags & EXT4_INLINE_DATA_FL) && !inlinedata_fs &&
1544                     (ino >= EXT2_FIRST_INODE(fs->super))) {
1545                         size_t size = 0;
1546
1547                         pctx.errcode = get_inline_data_ea_size(fs, ino, &size);
1548                         if (!pctx.errcode &&
1549                             fix_problem(ctx, PR_1_INLINE_DATA_FEATURE, &pctx)) {
1550                                 ext2fs_set_feature_inline_data(sb);
1551                                 ext2fs_mark_super_dirty(fs);
1552                                 inlinedata_fs = 1;
1553                         } else if (fix_problem(ctx, PR_1_INLINE_DATA_SET, &pctx)) {
1554                                 e2fsck_clear_inode(ctx, ino, inode, 0, "pass1");
1555                                 /* skip FINISH_INODE_LOOP */
1556                                 continue;
1557                         }
1558                 }
1559
1560                 /* Test for inline data flag but no attr */
1561                 if ((inode->i_flags & EXT4_INLINE_DATA_FL) && inlinedata_fs &&
1562                     (ino >= EXT2_FIRST_INODE(fs->super))) {
1563                         size_t size = 0;
1564                         errcode_t err;
1565                         int flags;
1566
1567                         flags = fs->flags;
1568                         if (failed_csum)
1569                                 fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
1570                         err = get_inline_data_ea_size(fs, ino, &size);
1571                         fs->flags = (flags & EXT2_FLAG_IGNORE_CSUM_ERRORS) |
1572                                     (fs->flags & ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
1573
1574                         switch (err) {
1575                         case 0:
1576                                 /* Everything is awesome... */
1577                                 break;
1578                         case EXT2_ET_BAD_EA_BLOCK_NUM:
1579                         case EXT2_ET_BAD_EA_HASH:
1580                         case EXT2_ET_BAD_EA_HEADER:
1581                         case EXT2_ET_EA_BAD_NAME_LEN:
1582                         case EXT2_ET_EA_BAD_VALUE_SIZE:
1583                         case EXT2_ET_EA_KEY_NOT_FOUND:
1584                         case EXT2_ET_EA_NO_SPACE:
1585                         case EXT2_ET_MISSING_EA_FEATURE:
1586                         case EXT2_ET_INLINE_DATA_CANT_ITERATE:
1587                         case EXT2_ET_INLINE_DATA_NO_BLOCK:
1588                         case EXT2_ET_INLINE_DATA_NO_SPACE:
1589                         case EXT2_ET_NO_INLINE_DATA:
1590                         case EXT2_ET_EXT_ATTR_CSUM_INVALID:
1591                         case EXT2_ET_EA_BAD_VALUE_OFFSET:
1592                         case EXT2_ET_EA_INODE_CORRUPTED:
1593                                 /* broken EA or no system.data EA; truncate */
1594                                 if (fix_problem(ctx, PR_1_INLINE_DATA_NO_ATTR,
1595                                                 &pctx)) {
1596                                         err = ext2fs_inode_size_set(fs, inode, 0);
1597                                         if (err) {
1598                                                 pctx.errcode = err;
1599                                                 ctx->flags |= E2F_FLAG_ABORT;
1600                                                 goto endit;
1601                                         }
1602                                         inode->i_flags &= ~EXT4_INLINE_DATA_FL;
1603                                         memset(&inode->i_block, 0,
1604                                                sizeof(inode->i_block));
1605                                         e2fsck_write_inode(ctx, ino, inode,
1606                                                            "pass1");
1607                                         failed_csum = 0;
1608                                 }
1609                                 break;
1610                         default:
1611                                 /* Some other kind of non-xattr error? */
1612                                 pctx.errcode = err;
1613                                 ctx->flags |= E2F_FLAG_ABORT;
1614                                 goto endit;
1615                         }
1616                 }
1617
1618                 /*
1619                  * Test for incorrect extent flag settings.
1620                  *
1621                  * On big-endian machines we must be careful:
1622                  * When the inode is read, the i_block array is not swapped
1623                  * if the extent flag is set.  Therefore if we are testing
1624                  * for or fixing a wrongly-set flag, we must potentially
1625                  * (un)swap before testing, or after fixing.
1626                  */
1627
1628                 /*
1629                  * In this case the extents flag was set when read, so
1630                  * extent_header_verify is ok.  If the inode is cleared,
1631                  * no need to swap... so no extra swapping here.
1632                  */
1633                 if ((inode->i_flags & EXT4_EXTENTS_FL) && !extent_fs &&
1634                     (inode->i_links_count || (ino == EXT2_BAD_INO) ||
1635                      (ino == EXT2_ROOT_INO) || (ino == EXT2_JOURNAL_INO))) {
1636                         if ((ext2fs_extent_header_verify(inode->i_block,
1637                                                  sizeof(inode->i_block)) == 0) &&
1638                             fix_problem(ctx, PR_1_EXTENT_FEATURE, &pctx)) {
1639                                 ext2fs_set_feature_extents(sb);
1640                                 ext2fs_mark_super_dirty(fs);
1641                                 extent_fs = 1;
1642                         } else if (fix_problem(ctx, PR_1_EXTENTS_SET, &pctx)) {
1643                         clear_inode:
1644                                 e2fsck_clear_inode(ctx, ino, inode, 0, "pass1");
1645                                 if (ino == EXT2_BAD_INO)
1646                                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map,
1647                                                                  ino);
1648                                 /* skip FINISH_INODE_LOOP */
1649                                 continue;
1650                         }
1651                 }
1652
1653                 /*
1654                  * For big-endian machines:
1655                  * If the inode didn't have the extents flag set when it
1656                  * was read, then the i_blocks array was swapped.  To test
1657                  * as an extents header, we must swap it back first.
1658                  * IF we then set the extents flag, the entire i_block
1659                  * array must be un/re-swapped to make it proper extents data.
1660                  */
1661                 if (extent_fs && !(inode->i_flags & EXT4_EXTENTS_FL) &&
1662                     (inode->i_links_count || (ino == EXT2_BAD_INO) ||
1663                      (ino == EXT2_ROOT_INO) || (ino == EXT2_JOURNAL_INO)) &&
1664                     (LINUX_S_ISREG(inode->i_mode) ||
1665                      LINUX_S_ISDIR(inode->i_mode))) {
1666                         void *ehp;
1667 #ifdef WORDS_BIGENDIAN
1668                         __u32 tmp_block[EXT2_N_BLOCKS];
1669
1670                         for (i = 0; i < EXT2_N_BLOCKS; i++)
1671                                 tmp_block[i] = ext2fs_swab32(inode->i_block[i]);
1672                         ehp = tmp_block;
1673 #else
1674                         ehp = inode->i_block;
1675 #endif
1676                         if ((ext2fs_extent_header_verify(ehp,
1677                                          sizeof(inode->i_block)) == 0) &&
1678                             (fix_problem(ctx, PR_1_UNSET_EXTENT_FL, &pctx))) {
1679                                 inode->i_flags |= EXT4_EXTENTS_FL;
1680 #ifdef WORDS_BIGENDIAN
1681                                 memcpy(inode->i_block, tmp_block,
1682                                        sizeof(inode->i_block));
1683 #endif
1684                                 e2fsck_write_inode(ctx, ino, inode, "pass1");
1685                                 failed_csum = 0;
1686                         }
1687                 }
1688
1689                 if (ino == EXT2_BAD_INO) {
1690                         struct process_block_struct pb;
1691
1692                         if ((failed_csum || inode->i_mode || inode->i_uid ||
1693                              inode->i_gid || inode->i_links_count ||
1694                              (inode->i_flags & EXT4_INLINE_DATA_FL) ||
1695                              inode->i_file_acl) &&
1696                             fix_problem(ctx, PR_1_INVALID_BAD_INODE, &pctx)) {
1697                                 memset(inode, 0, sizeof(struct ext2_inode));
1698                                 e2fsck_write_inode(ctx, ino, inode,
1699                                                    "clear bad inode");
1700                                 failed_csum = 0;
1701                         }
1702
1703                         pctx.errcode = ext2fs_copy_bitmap(ctx->block_found_map,
1704                                                           &pb.fs_meta_blocks);
1705                         if (pctx.errcode) {
1706                                 pctx.num = 4;
1707                                 fix_problem(ctx, PR_1_ALLOCATE_BBITMAP_ERROR, &pctx);
1708                                 ctx->flags |= E2F_FLAG_ABORT;
1709                                 goto endit;
1710                         }
1711                         pb.ino = EXT2_BAD_INO;
1712                         pb.num_blocks = pb.last_block = 0;
1713                         pb.last_db_block = -1;
1714                         pb.num_illegal_blocks = 0;
1715                         pb.suppress = 0; pb.clear = 0; pb.is_dir = 0;
1716                         pb.is_reg = 0; pb.fragmented = 0; pb.bbcheck = 0;
1717                         pb.inode = inode;
1718                         pb.pctx = &pctx;
1719                         pb.ctx = ctx;
1720                         pctx.errcode = ext2fs_block_iterate3(fs, ino, 0,
1721                                      block_buf, process_bad_block, &pb);
1722                         ext2fs_free_block_bitmap(pb.fs_meta_blocks);
1723                         if (pctx.errcode) {
1724                                 fix_problem(ctx, PR_1_BLOCK_ITERATE, &pctx);
1725                                 ctx->flags |= E2F_FLAG_ABORT;
1726                                 goto endit;
1727                         }
1728                         if (pb.bbcheck)
1729                                 if (!fix_problem(ctx, PR_1_BBINODE_BAD_METABLOCK_PROMPT, &pctx)) {
1730                                 ctx->flags |= E2F_FLAG_ABORT;
1731                                 goto endit;
1732                         }
1733                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1734                         clear_problem_context(&pctx);
1735                         FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1736                         continue;
1737                 } else if (ino == EXT2_ROOT_INO) {
1738                         /*
1739                          * Make sure the root inode is a directory; if
1740                          * not, offer to clear it.  It will be
1741                          * regenerated in pass #3.
1742                          */
1743                         if (!LINUX_S_ISDIR(inode->i_mode)) {
1744                                 if (fix_problem(ctx, PR_1_ROOT_NO_DIR, &pctx))
1745                                         goto clear_inode;
1746                         }
1747                         /*
1748                          * If dtime is set, offer to clear it.  mke2fs
1749                          * version 0.2b created filesystems with the
1750                          * dtime field set for the root and lost+found
1751                          * directories.  We won't worry about
1752                          * /lost+found, since that can be regenerated
1753                          * easily.  But we will fix the root directory
1754                          * as a special case.
1755                          */
1756                         if (inode->i_dtime && inode->i_links_count) {
1757                                 if (fix_problem(ctx, PR_1_ROOT_DTIME, &pctx)) {
1758                                         inode->i_dtime = 0;
1759                                         e2fsck_write_inode(ctx, ino, inode,
1760                                                            "pass1");
1761                                         failed_csum = 0;
1762                                 }
1763                         }
1764                 } else if (ino == EXT2_JOURNAL_INO) {
1765                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1766                         if (fs->super->s_journal_inum == EXT2_JOURNAL_INO) {
1767                                 if (!LINUX_S_ISREG(inode->i_mode) &&
1768                                     fix_problem(ctx, PR_1_JOURNAL_BAD_MODE,
1769                                                 &pctx)) {
1770                                         inode->i_mode = LINUX_S_IFREG;
1771                                         e2fsck_write_inode(ctx, ino, inode,
1772                                                            "pass1");
1773                                         failed_csum = 0;
1774                                 }
1775                                 check_blocks(ctx, &pctx, block_buf, NULL);
1776                                 FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1777                                 continue;
1778                         }
1779                         if ((inode->i_links_count ||
1780                              inode->i_blocks || inode->i_block[0]) &&
1781                             fix_problem(ctx, PR_1_JOURNAL_INODE_NOT_CLEAR,
1782                                         &pctx)) {
1783                                 memset(inode, 0, inode_size);
1784                                 ext2fs_icount_store(ctx->inode_link_info,
1785                                                     ino, 0);
1786                                 e2fsck_write_inode_full(ctx, ino, inode,
1787                                                         inode_size, "pass1");
1788                                 failed_csum = 0;
1789                         }
1790                 } else if (quota_inum_is_reserved(fs, ino)) {
1791                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1792                         if (ext2fs_has_feature_quota(fs->super) &&
1793                             quota_inum_is_super(fs->super, ino)) {
1794                                 if (!LINUX_S_ISREG(inode->i_mode) &&
1795                                     fix_problem(ctx, PR_1_QUOTA_BAD_MODE,
1796                                                         &pctx)) {
1797                                         inode->i_mode = LINUX_S_IFREG;
1798                                         e2fsck_write_inode(ctx, ino, inode,
1799                                                         "pass1");
1800                                         failed_csum = 0;
1801                                 }
1802                                 check_blocks(ctx, &pctx, block_buf, NULL);
1803                                 FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1804                                 continue;
1805                         }
1806                         if ((inode->i_links_count ||
1807                              inode->i_blocks || inode->i_block[0]) &&
1808                             fix_problem(ctx, PR_1_QUOTA_INODE_NOT_CLEAR,
1809                                         &pctx)) {
1810                                 memset(inode, 0, inode_size);
1811                                 ext2fs_icount_store(ctx->inode_link_info,
1812                                                     ino, 0);
1813                                 e2fsck_write_inode_full(ctx, ino, inode,
1814                                                         inode_size, "pass1");
1815                                 failed_csum = 0;
1816                         }
1817                 } else if (ino < EXT2_FIRST_INODE(fs->super)) {
1818                         problem_t problem = 0;
1819
1820                         ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1821                         if (ino == EXT2_BOOT_LOADER_INO) {
1822                                 if (LINUX_S_ISDIR(inode->i_mode))
1823                                         problem = PR_1_RESERVED_BAD_MODE;
1824                         } else if (ino == EXT2_RESIZE_INO) {
1825                                 if (inode->i_mode &&
1826                                     !LINUX_S_ISREG(inode->i_mode))
1827                                         problem = PR_1_RESERVED_BAD_MODE;
1828                         } else {
1829                                 if (inode->i_mode != 0)
1830                                         problem = PR_1_RESERVED_BAD_MODE;
1831                         }
1832                         if (problem) {
1833                                 if (fix_problem(ctx, problem, &pctx)) {
1834                                         inode->i_mode = 0;
1835                                         e2fsck_write_inode(ctx, ino, inode,
1836                                                            "pass1");
1837                                         failed_csum = 0;
1838                                 }
1839                         }
1840                         check_blocks(ctx, &pctx, block_buf, NULL);
1841                         FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1842                         continue;
1843                 }
1844
1845                 if (!inode->i_links_count) {
1846                         FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1847                         continue;
1848                 }
1849                 /*
1850                  * n.b.  0.3c ext2fs code didn't clear i_links_count for
1851                  * deleted files.  Oops.
1852                  *
1853                  * Since all new ext2 implementations get this right,
1854                  * we now assume that the case of non-zero
1855                  * i_links_count and non-zero dtime means that we
1856                  * should keep the file, not delete it.
1857                  *
1858                  */
1859                 if (inode->i_dtime) {
1860                         if (fix_problem(ctx, PR_1_SET_DTIME, &pctx)) {
1861                                 inode->i_dtime = 0;
1862                                 e2fsck_write_inode(ctx, ino, inode, "pass1");
1863                                 failed_csum = 0;
1864                         }
1865                 }
1866
1867                 ext2fs_mark_inode_bitmap2(ctx->inode_used_map, ino);
1868                 switch (fs->super->s_creator_os) {
1869                     case EXT2_OS_HURD:
1870                         frag = inode->osd2.hurd2.h_i_frag;
1871                         fsize = inode->osd2.hurd2.h_i_fsize;
1872                         break;
1873                     default:
1874                         frag = fsize = 0;
1875                 }
1876
1877                 if (inode->i_faddr || frag || fsize ||
1878                     (!ext2fs_has_feature_largedir(fs->super) &&
1879                     (LINUX_S_ISDIR(inode->i_mode) && inode->i_size_high)))
1880                         mark_inode_bad(ctx, ino);
1881                 if ((fs->super->s_creator_os != EXT2_OS_HURD) &&
1882                     !ext2fs_has_feature_64bit(fs->super) &&
1883                     inode->osd2.linux2.l_i_file_acl_high != 0)
1884                         mark_inode_bad(ctx, ino);
1885                 if ((fs->super->s_creator_os != EXT2_OS_HURD) &&
1886                     !ext2fs_has_feature_huge_file(fs->super) &&
1887                     (inode->osd2.linux2.l_i_blocks_hi != 0))
1888                         mark_inode_bad(ctx, ino);
1889                 if (inode->i_flags & EXT2_IMAGIC_FL) {
1890                         if (imagic_fs) {
1891                                 if (!ctx->inode_imagic_map)
1892                                         alloc_imagic_map(ctx);
1893                                 ext2fs_mark_inode_bitmap2(ctx->inode_imagic_map,
1894                                                          ino);
1895                         } else {
1896                                 if (fix_problem(ctx, PR_1_SET_IMAGIC, &pctx)) {
1897                                         inode->i_flags &= ~EXT2_IMAGIC_FL;
1898                                         e2fsck_write_inode(ctx, ino,
1899                                                            inode, "pass1");
1900                                         failed_csum = 0;
1901                                 }
1902                         }
1903                 }
1904
1905                 check_inode_extra_space(ctx, &pctx, &ea_ibody_quota);
1906                 check_is_really_dir(ctx, &pctx, block_buf);
1907
1908                 /*
1909                  * ext2fs_inode_has_valid_blocks2 does not actually look
1910                  * at i_block[] values, so not endian-sensitive here.
1911                  */
1912                 if (extent_fs && (inode->i_flags & EXT4_EXTENTS_FL) &&
1913                     LINUX_S_ISLNK(inode->i_mode) &&
1914                     !ext2fs_inode_has_valid_blocks2(fs, inode) &&
1915                     fix_problem(ctx, PR_1_FAST_SYMLINK_EXTENT_FL, &pctx)) {
1916                         inode->i_flags &= ~EXT4_EXTENTS_FL;
1917                         e2fsck_write_inode(ctx, ino, inode, "pass1");
1918                         failed_csum = 0;
1919                 }
1920
1921                 if ((inode->i_flags & EXT4_ENCRYPT_FL) &&
1922                     add_encrypted_file(ctx, &pctx) < 0)
1923                         goto clear_inode;
1924
1925                 if (casefold_fs && inode->i_flags & EXT4_CASEFOLD_FL)
1926                         ext2fs_mark_inode_bitmap2(ctx->inode_casefold_map, ino);
1927
1928                 if (LINUX_S_ISDIR(inode->i_mode)) {
1929                         ext2fs_mark_inode_bitmap2(ctx->inode_dir_map, ino);
1930                         e2fsck_add_dir_info(ctx, ino, 0);
1931                         ctx->fs_directory_count++;
1932                         if (inode->i_flags & EXT4_CASEFOLD_FL)
1933                                 add_casefolded_dir(ctx, ino);
1934                 } else if (LINUX_S_ISREG (inode->i_mode)) {
1935                         ext2fs_mark_inode_bitmap2(ctx->inode_reg_map, ino);
1936                         ctx->fs_regular_count++;
1937                 } else if (LINUX_S_ISCHR (inode->i_mode) &&
1938                            e2fsck_pass1_check_device_inode(fs, inode)) {
1939                         check_extents_inlinedata(ctx, &pctx);
1940                         check_immutable(ctx, &pctx);
1941                         check_size(ctx, &pctx);
1942                         ctx->fs_chardev_count++;
1943                 } else if (LINUX_S_ISBLK (inode->i_mode) &&
1944                            e2fsck_pass1_check_device_inode(fs, inode)) {
1945                         check_extents_inlinedata(ctx, &pctx);
1946                         check_immutable(ctx, &pctx);
1947                         check_size(ctx, &pctx);
1948                         ctx->fs_blockdev_count++;
1949                 } else if (LINUX_S_ISLNK (inode->i_mode) &&
1950                            e2fsck_pass1_check_symlink(fs, ino, inode,
1951                                                       block_buf)) {
1952                         check_immutable(ctx, &pctx);
1953                         ctx->fs_symlinks_count++;
1954                         if (inode->i_flags & EXT4_INLINE_DATA_FL) {
1955                                 FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1956                                 continue;
1957                         } else if (ext2fs_is_fast_symlink(inode)) {
1958                                 ctx->fs_fast_symlinks_count++;
1959                                 check_blocks(ctx, &pctx, block_buf,
1960                                              &ea_ibody_quota);
1961                                 FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
1962                                 continue;
1963                         }
1964                 }
1965                 else if (LINUX_S_ISFIFO (inode->i_mode) &&
1966                          e2fsck_pass1_check_device_inode(fs, inode)) {
1967                         check_extents_inlinedata(ctx, &pctx);
1968                         check_immutable(ctx, &pctx);
1969                         check_size(ctx, &pctx);
1970                         ctx->fs_fifo_count++;
1971                 } else if ((LINUX_S_ISSOCK (inode->i_mode)) &&
1972                            e2fsck_pass1_check_device_inode(fs, inode)) {
1973                         check_extents_inlinedata(ctx, &pctx);
1974                         check_immutable(ctx, &pctx);
1975                         check_size(ctx, &pctx);
1976                         ctx->fs_sockets_count++;
1977                 } else
1978                         mark_inode_bad(ctx, ino);
1979                 if (!(inode->i_flags & EXT4_EXTENTS_FL) &&
1980                     !(inode->i_flags & EXT4_INLINE_DATA_FL)) {
1981                         if (inode->i_block[EXT2_IND_BLOCK])
1982                                 ctx->fs_ind_count++;
1983                         if (inode->i_block[EXT2_DIND_BLOCK])
1984                                 ctx->fs_dind_count++;
1985                         if (inode->i_block[EXT2_TIND_BLOCK])
1986                                 ctx->fs_tind_count++;
1987                 }
1988                 if (!(inode->i_flags & EXT4_EXTENTS_FL) &&
1989                     !(inode->i_flags & EXT4_INLINE_DATA_FL) &&
1990                     (inode->i_block[EXT2_IND_BLOCK] ||
1991                      inode->i_block[EXT2_DIND_BLOCK] ||
1992                      inode->i_block[EXT2_TIND_BLOCK] ||
1993                      ext2fs_file_acl_block(fs, inode))) {
1994                         struct process_inode_block *itp;
1995
1996                         itp = &inodes_to_process[process_inode_count];
1997                         itp->ino = ino;
1998                         itp->ea_ibody_quota = ea_ibody_quota;
1999                         if (inode_size < sizeof(struct ext2_inode_large))
2000                                 memcpy(&itp->inode, inode, inode_size);
2001                         else
2002                                 memcpy(&itp->inode, inode, sizeof(itp->inode));
2003                         process_inode_count++;
2004                 } else
2005                         check_blocks(ctx, &pctx, block_buf, &ea_ibody_quota);
2006
2007                 FINISH_INODE_LOOP(ctx, ino, &pctx, failed_csum);
2008
2009                 if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
2010                         goto endit;
2011
2012                 if (process_inode_count >= ctx->process_inode_size) {
2013                         process_inodes(ctx, block_buf, inodes_to_process,
2014                                        &process_inode_count);
2015
2016                         if (e2fsck_should_abort(ctx))
2017                                 goto endit;
2018                 }
2019         }
2020         process_inodes(ctx, block_buf, inodes_to_process,
2021                        &process_inode_count);
2022         ext2fs_close_inode_scan(scan);
2023         scan = NULL;
2024
2025         reserve_block_for_root_repair(ctx);
2026         reserve_block_for_lnf_repair(ctx);
2027
2028         /*
2029          * If any extended attribute blocks' reference counts need to
2030          * be adjusted, either up (ctx->refcount_extra), or down
2031          * (ctx->refcount), then fix them.
2032          */
2033         if (ctx->refcount) {
2034                 adjust_extattr_refcount(ctx, ctx->refcount, block_buf, -1);
2035                 ea_refcount_free(ctx->refcount);
2036                 ctx->refcount = 0;
2037         }
2038         if (ctx->refcount_extra) {
2039                 adjust_extattr_refcount(ctx, ctx->refcount_extra,
2040                                         block_buf, +1);
2041                 ea_refcount_free(ctx->refcount_extra);
2042                 ctx->refcount_extra = 0;
2043         }
2044
2045         if (ctx->ea_block_quota_blocks) {
2046                 ea_refcount_free(ctx->ea_block_quota_blocks);
2047                 ctx->ea_block_quota_blocks = 0;
2048         }
2049
2050         if (ctx->ea_block_quota_inodes) {
2051                 ea_refcount_free(ctx->ea_block_quota_inodes);
2052                 ctx->ea_block_quota_inodes = 0;
2053         }
2054
2055         if (ctx->invalid_bitmaps)
2056                 handle_fs_bad_blocks(ctx);
2057
2058         /* We don't need the block_ea_map any more */
2059         if (ctx->block_ea_map) {
2060                 ext2fs_free_block_bitmap(ctx->block_ea_map);
2061                 ctx->block_ea_map = 0;
2062         }
2063
2064         /* We don't need the encryption policy => ID map any more */
2065         destroy_encryption_policy_map(ctx);
2066
2067         if (ctx->flags & E2F_FLAG_RESIZE_INODE) {
2068                 clear_problem_context(&pctx);
2069                 pctx.errcode = ext2fs_create_resize_inode(fs);
2070                 if (pctx.errcode) {
2071                         if (!fix_problem(ctx, PR_1_RESIZE_INODE_CREATE,
2072                                          &pctx)) {
2073                                 ctx->flags |= E2F_FLAG_ABORT;
2074                                 goto endit;
2075                         }
2076                         pctx.errcode = 0;
2077                 }
2078                 if (!pctx.errcode) {
2079                         e2fsck_read_inode(ctx, EXT2_RESIZE_INO, inode,
2080                                           "recreate inode");
2081                         inode->i_mtime = ctx->now;
2082                         e2fsck_write_inode(ctx, EXT2_RESIZE_INO, inode,
2083                                            "recreate inode");
2084                 }
2085                 ctx->flags &= ~E2F_FLAG_RESIZE_INODE;
2086         }
2087
2088         if (ctx->flags & E2F_FLAG_RESTART) {
2089                 /*
2090                  * Only the master copy of the superblock and block
2091                  * group descriptors are going to be written during a
2092                  * restart, so set the superblock to be used to be the
2093                  * master superblock.
2094                  */
2095                 ctx->use_superblock = 0;
2096                 goto endit;
2097         }
2098
2099         if (ctx->large_dirs && !ext2fs_has_feature_largedir(ctx->fs->super)) {
2100                 ext2_filsys fs = ctx->fs;
2101
2102                 if (fix_problem(ctx, PR_2_FEATURE_LARGE_DIRS, &pctx)) {
2103                         ext2fs_set_feature_largedir(fs->super);
2104                         fs->flags &= ~EXT2_FLAG_MASTER_SB_ONLY;
2105                         ext2fs_mark_super_dirty(fs);
2106                 }
2107                 if (fs->super->s_rev_level == EXT2_GOOD_OLD_REV &&
2108                     fix_problem(ctx, PR_1_FS_REV_LEVEL, &pctx)) {
2109                         ext2fs_update_dynamic_rev(fs);
2110                         ext2fs_mark_super_dirty(fs);
2111                 }
2112         }
2113
2114         if (ctx->block_dup_map) {
2115                 if (ctx->options & E2F_OPT_PREEN) {
2116                         clear_problem_context(&pctx);
2117                         fix_problem(ctx, PR_1_DUP_BLOCKS_PREENSTOP, &pctx);
2118                 }
2119                 e2fsck_pass1_dupblocks(ctx, block_buf);
2120         }
2121         ctx->flags |= E2F_FLAG_ALLOC_OK;
2122 endit:
2123         e2fsck_use_inode_shortcuts(ctx, 0);
2124         ext2fs_free_mem(&inodes_to_process);
2125         inodes_to_process = 0;
2126
2127         if (scan)
2128                 ext2fs_close_inode_scan(scan);
2129         if (block_buf)
2130                 ext2fs_free_mem(&block_buf);
2131         if (inode)
2132                 ext2fs_free_mem(&inode);
2133
2134         /*
2135          * The l+f inode may have been cleared, so zap it now and
2136          * later passes will recalculate it if necessary
2137          */
2138         ctx->lost_and_found = 0;
2139
2140         if ((ctx->flags & E2F_FLAG_SIGNAL_MASK) == 0)
2141                 print_resource_track(ctx, _("Pass 1"), &rtrack, ctx->fs->io);
2142         else
2143                 ctx->invalid_bitmaps++;
2144 }
2145
2146 static void init_ext2_max_sizes()
2147 {
2148         int     i;
2149         __u64   max_sizes;
2150
2151         /*
2152          * Init ext2_max_sizes which will be immutable and shared between
2153          * threads
2154          */
2155 #define EXT2_BPP(bits) (1ULL << ((bits) - 2))
2156
2157         for (i = EXT2_MIN_BLOCK_LOG_SIZE; i <= EXT2_MAX_BLOCK_LOG_SIZE; i++) {
2158                 max_sizes = EXT2_NDIR_BLOCKS + EXT2_BPP(i);
2159                 max_sizes = max_sizes + EXT2_BPP(i) * EXT2_BPP(i);
2160                 max_sizes = max_sizes + EXT2_BPP(i) * EXT2_BPP(i) * EXT2_BPP(i);
2161                 max_sizes = (max_sizes * (1UL << i));
2162                 ext2_max_sizes[i - EXT2_MIN_BLOCK_LOG_SIZE] = max_sizes;
2163         }
2164 #undef EXT2_BPP
2165 }
2166
2167 #ifdef HAVE_PTHREAD
2168 static errcode_t e2fsck_pass1_copy_bitmap(ext2_filsys fs, ext2fs_generic_bitmap *src,
2169                                           ext2fs_generic_bitmap *dest)
2170 {
2171         errcode_t ret;
2172
2173         ret = ext2fs_copy_bitmap(*src, dest);
2174         if (ret)
2175                 return ret;
2176
2177         (*dest)->fs = fs;
2178
2179         return 0;
2180 }
2181
2182 static void e2fsck_pass1_free_bitmap(ext2fs_generic_bitmap *bitmap)
2183 {
2184         if (*bitmap) {
2185                 ext2fs_free_generic_bmap(*bitmap);
2186                 *bitmap = NULL;
2187         }
2188
2189 }
2190
2191 static errcode_t e2fsck_pass1_merge_bitmap(ext2_filsys fs, ext2fs_generic_bitmap *src,
2192                                           ext2fs_generic_bitmap *dest)
2193 {
2194         errcode_t ret = 0;
2195
2196         if (*src) {
2197                 if (*dest == NULL) {
2198                         *dest = *src;
2199                         *src = NULL;
2200                 } else {
2201                         ret = ext2fs_merge_bitmap(*src, *dest, NULL, NULL);
2202                         if (ret)
2203                                 return ret;
2204                 }
2205                 (*dest)->fs = fs;
2206         }
2207
2208         return 0;
2209 }
2210
2211 static errcode_t e2fsck_pass1_copy_fs(ext2_filsys dest, e2fsck_t src_context,
2212                                       ext2_filsys src)
2213 {
2214         errcode_t       retval;
2215
2216         memcpy(dest, src, sizeof(struct struct_ext2_filsys));
2217         dest->inode_map = NULL;
2218         dest->block_map = NULL;
2219         dest->badblocks = NULL;
2220         if (dest->dblist)
2221                 dest->dblist->fs = dest;
2222         if (src->block_map) {
2223                 retval = e2fsck_pass1_copy_bitmap(dest, &src->block_map,
2224                                                   &dest->block_map);
2225                 if (retval)
2226                         return retval;
2227         }
2228         if (src->inode_map) {
2229                 retval = e2fsck_pass1_copy_bitmap(dest, &src->inode_map,
2230                                                   &dest->inode_map);
2231                 if (retval)
2232                         return retval;
2233         }
2234
2235         if (src->badblocks) {
2236                 retval = ext2fs_badblocks_copy(src->badblocks,
2237                                                &dest->badblocks);
2238                 if (retval)
2239                         return retval;
2240         }
2241
2242         /* disable it for now */
2243         src_context->openfs_flags &= ~EXT2_FLAG_EXCLUSIVE;
2244         retval = ext2fs_open_channel(dest, src_context->io_options,
2245                                      src_context->io_manager,
2246                                      src_context->openfs_flags,
2247                                      src->io->block_size);
2248         if (retval)
2249                 return retval;
2250
2251         /* Block size might not be default */
2252         io_channel_set_blksize(dest->io, src->io->block_size);
2253         ehandler_init(dest->io);
2254
2255         assert(dest->io->magic == src->io->magic);
2256         assert(dest->io->manager == src->io->manager);
2257         assert(strcmp(dest->io->name, src->io->name) == 0);
2258         assert(dest->io->block_size == src->io->block_size);
2259         assert(dest->io->read_error == src->io->read_error);
2260         assert(dest->io->write_error == src->io->write_error);
2261         assert(dest->io->refcount == src->io->refcount);
2262         assert(dest->io->flags == src->io->flags);
2263         assert(dest->io->app_data == dest);
2264         assert(src->io->app_data == src);
2265         assert(dest->io->align == src->io->align);
2266
2267         /* The data should be written to disk immediately */
2268         dest->io->flags |= CHANNEL_FLAGS_WRITETHROUGH;
2269         /* icache will be rebuilt if needed, so do not copy from @src */
2270         src->icache = NULL;
2271         return 0;
2272 }
2273
2274 static int e2fsck_pass1_merge_fs(ext2_filsys dest, ext2_filsys src)
2275 {
2276         struct ext2_inode_cache *icache = dest->icache;
2277         errcode_t retval = 0;
2278         io_channel dest_io;
2279         io_channel dest_image_io;
2280         ext2fs_inode_bitmap inode_map;
2281         ext2fs_block_bitmap block_map;
2282         ext2_badblocks_list badblocks;
2283         ext2_dblist dblist;
2284
2285         dest_io = dest->io;
2286         dest_image_io = dest->image_io;
2287         inode_map = dest->inode_map;
2288         block_map = dest->block_map;
2289         badblocks = dest->badblocks;
2290         dblist = dest->dblist;
2291
2292         memcpy(dest, src, sizeof(struct struct_ext2_filsys));
2293         dest->io = dest_io;
2294         dest->image_io = dest_image_io;
2295         dest->icache = icache;
2296         dest->inode_map = inode_map;
2297         dest->block_map = block_map;
2298         dest->badblocks = badblocks;
2299         dest->dblist = dblist;
2300         if (dest->dblist)
2301                 dest->dblist->fs = dest;
2302
2303         if (src->icache) {
2304                 ext2fs_free_inode_cache(src->icache);
2305                 src->icache = NULL;
2306         }
2307
2308         retval = e2fsck_pass1_merge_bitmap(dest, &src->inode_map,
2309                                            &dest->inode_map);
2310         if (retval)
2311                 goto out;
2312
2313         retval = e2fsck_pass1_merge_bitmap(dest, &src->block_map,
2314                                           &dest->block_map);
2315         if (retval)
2316                 goto out;
2317
2318         if (src->dblist) {
2319                 if (dest->dblist) {
2320                         retval = ext2fs_merge_dblist(src->dblist,
2321                                                      dest->dblist);
2322                         if (retval)
2323                                 goto out;
2324                 } else {
2325                         dest->dblist = src->dblist;
2326                         dest->dblist->fs = dest;
2327                         src->dblist = NULL;
2328                 }
2329         }
2330
2331         if (src->badblocks) {
2332                 if (dest->badblocks == NULL)
2333                         retval = ext2fs_badblocks_copy(src->badblocks,
2334                                                        &dest->badblocks);
2335                 else
2336                         retval = ext2fs_badblocks_merge(src->badblocks,
2337                                                         dest->badblocks);
2338         }
2339 out:
2340         io_channel_close(src->io);
2341         if (src->inode_map)
2342                 ext2fs_free_generic_bmap(src->inode_map);
2343         if (src->block_map)
2344                 ext2fs_free_generic_bmap(src->block_map);
2345         if (src->badblocks)
2346                 ext2fs_badblocks_list_free(src->badblocks);
2347         if (src->dblist)
2348                 ext2fs_free_dblist(src->dblist);
2349
2350         return retval;
2351 }
2352
2353 static errcode_t e2fsck_pass1_thread_prepare(e2fsck_t global_ctx, e2fsck_t *thread_ctx,
2354                                              int thread_index, int num_threads)
2355 {
2356         errcode_t               retval;
2357         e2fsck_t                thread_context;
2358         ext2_filsys             thread_fs;
2359         ext2_filsys             global_fs = global_ctx->fs;
2360         struct e2fsck_thread    *tinfo;
2361         dgrp_t                  average_group;
2362
2363         assert(global_ctx->inode_used_map == NULL);
2364         assert(global_ctx->inode_dir_map == NULL);
2365         assert(global_ctx->inode_bb_map == NULL);
2366         assert(global_ctx->inode_imagic_map == NULL);
2367         assert(global_ctx->inode_reg_map == NULL);
2368         assert(global_ctx->inodes_to_rebuild == NULL);
2369
2370         assert(global_ctx->block_found_map == NULL);
2371         assert(global_ctx->block_dup_map == NULL);
2372         assert(global_ctx->block_ea_map == NULL);
2373         assert(global_ctx->block_metadata_map == NULL);
2374         assert(global_ctx->fs->dblist == NULL);
2375
2376         retval = ext2fs_get_mem(sizeof(struct e2fsck_struct), &thread_context);
2377         if (retval) {
2378                 com_err(global_ctx->program_name, retval, "while allocating memory");
2379                 return retval;
2380         }
2381         memcpy(thread_context, global_ctx, sizeof(struct e2fsck_struct));
2382         thread_context->global_ctx = global_ctx;
2383
2384         retval = ext2fs_get_mem(sizeof(struct struct_ext2_filsys), &thread_fs);
2385         if (retval) {
2386                 com_err(global_ctx->program_name, retval, "while allocating memory");
2387                 goto out_context;
2388         }
2389
2390         io_channel_flush_cleanup(global_fs->io);
2391         retval = e2fsck_pass1_copy_fs(thread_fs, global_ctx, global_fs);
2392         if (retval) {
2393                 com_err(global_ctx->program_name, retval, "while copying fs");
2394                 goto out_fs;
2395         }
2396         thread_fs->priv_data = thread_context;
2397
2398         thread_context->thread_info.et_thread_index = thread_index;
2399         set_up_logging(thread_context);
2400
2401         /*
2402          * Distribute work to multiple threads:
2403          * Each thread work on fs->group_desc_count / nthread groups.
2404          */
2405         tinfo = &thread_context->thread_info;
2406         average_group = thread_fs->group_desc_count / num_threads;
2407         if (average_group == 0)
2408                 average_group = 1;
2409         tinfo->et_group_start = average_group * thread_index;
2410         if (thread_index == num_threads - 1)
2411                 tinfo->et_group_end = thread_fs->group_desc_count;
2412         else
2413                 tinfo->et_group_end = average_group * (thread_index + 1);
2414         tinfo->et_group_next = tinfo->et_group_start;
2415         tinfo->et_inode_number = 0;
2416         tinfo->et_log_buf[0] = '\0';
2417         tinfo->et_log_length = 0;
2418         if (thread_context->options & E2F_OPT_MULTITHREAD)
2419                 log_out(thread_context, _("Scan group range [%d, %d)\n"),
2420                         tinfo->et_group_start, tinfo->et_group_end);
2421         thread_context->fs = thread_fs;
2422         *thread_ctx = thread_context;
2423         return 0;
2424 out_fs:
2425         ext2fs_free_mem(&thread_fs);
2426 out_context:
2427         ext2fs_free_mem(&thread_context);
2428         return retval;
2429 }
2430
2431 static void e2fsck_pass1_merge_dir_info(e2fsck_t global_ctx, e2fsck_t thread_ctx)
2432 {
2433         if (thread_ctx->dir_info == NULL)
2434                 return;
2435
2436         if (global_ctx->dir_info == NULL) {
2437                 global_ctx->dir_info = thread_ctx->dir_info;
2438                 thread_ctx->dir_info = NULL;
2439                 return;
2440         }
2441
2442         e2fsck_merge_dir_info(global_ctx, thread_ctx->dir_info,
2443                               global_ctx->dir_info);
2444 }
2445
2446 static inline errcode_t
2447 e2fsck_pass1_merge_icount(ext2_icount_t *dest_icount,
2448                           ext2_icount_t *src_icount)
2449 {
2450         if (*src_icount) {
2451                 if (*dest_icount == NULL) {
2452                         *dest_icount = *src_icount;
2453                         *src_icount = NULL;
2454                 } else {
2455                         errcode_t ret;
2456
2457                         ret = ext2fs_icount_merge(*src_icount,
2458                                                   *dest_icount);
2459                         if (ret)
2460                                 return ret;
2461                 }
2462         }
2463
2464         return 0;
2465 }
2466
2467 static errcode_t e2fsck_pass1_merge_icounts(e2fsck_t global_ctx, e2fsck_t thread_ctx)
2468 {
2469         errcode_t ret;
2470
2471         ret = e2fsck_pass1_merge_icount(&global_ctx->inode_count,
2472                                         &thread_ctx->inode_count);
2473         if (ret)
2474                 return ret;
2475         ret = e2fsck_pass1_merge_icount(&global_ctx->inode_link_info,
2476                                         &thread_ctx->inode_link_info);
2477
2478         return ret;
2479 }
2480
2481 static int e2fsck_pass1_thread_join_one(e2fsck_t global_ctx, e2fsck_t thread_ctx)
2482 {
2483         errcode_t        retval;
2484         int              flags = global_ctx->flags;
2485         ext2_filsys      thread_fs = thread_ctx->fs;
2486         ext2_filsys      global_fs = global_ctx->fs;
2487         FILE            *global_logf = global_ctx->logf;
2488         FILE            *global_problem_logf = global_ctx->problem_logf;
2489         ext2fs_inode_bitmap inode_bad_map = global_ctx->inode_bad_map;
2490         struct dir_info_db *dir_info = global_ctx->dir_info;
2491         ext2fs_inode_bitmap inode_used_map = global_ctx->inode_used_map;
2492         ext2fs_inode_bitmap inode_dir_map = global_ctx->inode_dir_map;
2493         ext2fs_inode_bitmap inode_bb_map = global_ctx->inode_bb_map;
2494         ext2fs_inode_bitmap inode_imagic_map = global_ctx->inode_imagic_map;
2495         ext2fs_inode_bitmap inode_reg_map = global_ctx->inode_reg_map;
2496         ext2fs_block_bitmap block_found_map = global_ctx->block_found_map;
2497         ext2fs_block_bitmap block_dup_map = global_ctx->block_dup_map;
2498         ext2fs_block_bitmap block_ea_map = global_ctx->block_ea_map;
2499         ext2fs_block_bitmap block_metadata_map = global_ctx->block_metadata_map;
2500         ext2fs_block_bitmap inodes_to_rebuild = global_ctx->inodes_to_rebuild;
2501         ext2_icount_t inode_count = global_ctx->inode_count;
2502         ext2_icount_t inode_link_info = global_ctx->inode_link_info;
2503
2504 #ifdef HAVE_SETJMP_H
2505         jmp_buf          old_jmp;
2506
2507         memcpy(old_jmp, global_ctx->abort_loc, sizeof(jmp_buf));
2508 #endif
2509         memcpy(global_ctx, thread_ctx, sizeof(struct e2fsck_struct));
2510 #ifdef HAVE_SETJMP_H
2511         memcpy(global_ctx->abort_loc, old_jmp, sizeof(jmp_buf));
2512 #endif
2513
2514         global_ctx->inode_used_map = inode_used_map;
2515         global_ctx->inode_bad_map = inode_bad_map;
2516         global_ctx->inode_dir_map = inode_dir_map;
2517         global_ctx->inode_bb_map = inode_bb_map;
2518         global_ctx->inode_imagic_map = inode_imagic_map;
2519         global_ctx->inodes_to_rebuild = inodes_to_rebuild;
2520         global_ctx->inode_reg_map = inode_reg_map;
2521         global_ctx->block_found_map = block_found_map;
2522         global_ctx->block_dup_map = block_dup_map;
2523         global_ctx->block_ea_map = block_ea_map;
2524         global_ctx->block_metadata_map = block_metadata_map;
2525         global_ctx->dir_info = dir_info;
2526         e2fsck_pass1_merge_dir_info(global_ctx, thread_ctx);
2527         global_ctx->inode_count = inode_count;
2528         global_ctx->inode_link_info = inode_link_info;
2529
2530         /* Keep the global singal flags*/
2531         global_ctx->flags |= (flags & E2F_FLAG_SIGNAL_MASK) |
2532                              (global_ctx->flags & E2F_FLAG_SIGNAL_MASK);
2533
2534         retval = e2fsck_pass1_merge_fs(global_fs, thread_fs);
2535         if (retval) {
2536                 com_err(global_ctx->program_name, 0, _("while merging fs\n"));
2537                 return retval;
2538         }
2539         global_fs->priv_data = global_ctx;
2540         global_ctx->fs = global_fs;
2541         global_ctx->logf = global_logf;
2542         global_ctx->problem_logf = global_problem_logf;
2543         global_ctx->global_ctx = NULL;
2544         retval = e2fsck_pass1_merge_icounts(global_ctx, thread_ctx);
2545         if (retval) {
2546                 com_err(global_ctx->program_name, 0,
2547                         _("while merging icounts\n"));
2548                 return retval;
2549         }
2550
2551         retval = e2fsck_pass1_merge_bitmap(global_fs,
2552                                 &thread_ctx->inode_used_map,
2553                                 &global_ctx->inode_used_map);
2554         if (retval)
2555                 return retval;
2556
2557         retval = e2fsck_pass1_merge_bitmap(global_fs,
2558                                 &thread_ctx->inode_bad_map,
2559                                 &global_ctx->inode_bad_map);
2560         if (retval)
2561                 return retval;
2562         retval = e2fsck_pass1_merge_bitmap(global_fs,
2563                                         &thread_ctx->inode_dir_map,
2564                                         &global_ctx->inode_dir_map);
2565         if (retval)
2566                 return retval;
2567         retval = e2fsck_pass1_merge_bitmap(global_fs,
2568                                 &thread_ctx->inode_bb_map,
2569                                 &global_ctx->inode_bb_map);
2570         if (retval)
2571                 return retval;
2572         retval = e2fsck_pass1_merge_bitmap(global_fs,
2573                                 &thread_ctx->inode_imagic_map,
2574                                 &global_ctx->inode_imagic_map);
2575         if (retval)
2576                 return retval;
2577         retval = e2fsck_pass1_merge_bitmap(global_fs,
2578                                 &thread_ctx->inode_reg_map,
2579                                 &global_ctx->inode_reg_map);
2580         if (retval)
2581                 return retval;
2582         retval = e2fsck_pass1_merge_bitmap(global_fs,
2583                                 &thread_ctx->inodes_to_rebuild,
2584                                 &global_ctx->inodes_to_rebuild);
2585         if (retval)
2586                 return retval;
2587         retval = e2fsck_pass1_merge_bitmap(global_fs,
2588                                 &thread_ctx->block_found_map,
2589                                 &global_ctx->block_found_map);
2590         if (retval)
2591                 return retval;
2592         retval = e2fsck_pass1_merge_bitmap(global_fs,
2593                                 &thread_ctx->block_dup_map,
2594                                 &global_ctx->block_dup_map);
2595         if (retval)
2596                 return retval;
2597         retval = e2fsck_pass1_merge_bitmap(global_fs,
2598                                 &thread_ctx->block_ea_map,
2599                                 &global_ctx->block_ea_map);
2600         if (retval)
2601                 return retval;
2602         retval = e2fsck_pass1_merge_bitmap(global_fs,
2603                                 &thread_ctx->block_metadata_map,
2604                                 &global_ctx->block_metadata_map);
2605         if (retval)
2606                 return retval;
2607
2608         return 0;
2609 }
2610
2611 static int e2fsck_pass1_thread_join(e2fsck_t global_ctx, e2fsck_t thread_ctx)
2612 {
2613         errcode_t       retval;
2614
2615         retval = e2fsck_pass1_thread_join_one(global_ctx, thread_ctx);
2616         ext2fs_free_mem(&thread_ctx->fs);
2617         if (thread_ctx->logf)
2618                 fclose(thread_ctx->logf);
2619         if (thread_ctx->problem_logf) {
2620                 fputs("</problem_log>\n", thread_ctx->problem_logf);
2621                 fclose(thread_ctx->problem_logf);
2622         }
2623         e2fsck_pass1_free_bitmap(&thread_ctx->inode_used_map);
2624         e2fsck_pass1_free_bitmap(&thread_ctx->inode_bad_map);
2625         e2fsck_pass1_free_bitmap(&thread_ctx->inode_dir_map);
2626         e2fsck_pass1_free_bitmap(&thread_ctx->inode_bb_map);
2627         e2fsck_pass1_free_bitmap(&thread_ctx->inode_imagic_map);
2628         e2fsck_pass1_free_bitmap(&thread_ctx->inode_reg_map);
2629         e2fsck_pass1_free_bitmap(&thread_ctx->inodes_to_rebuild);
2630         e2fsck_pass1_free_bitmap(&thread_ctx->block_found_map);
2631         e2fsck_pass1_free_bitmap(&thread_ctx->block_dup_map);
2632         e2fsck_pass1_free_bitmap(&thread_ctx->block_ea_map);
2633         e2fsck_pass1_free_bitmap(&thread_ctx->block_metadata_map);
2634         e2fsck_free_dir_info(thread_ctx);
2635         ext2fs_free_icount(thread_ctx->inode_count);
2636         ext2fs_free_icount(thread_ctx->inode_link_info);
2637         ext2fs_free_mem(&thread_ctx);
2638
2639         return retval;
2640 }
2641
2642 static int e2fsck_pass1_threads_join(struct e2fsck_thread_info *infos,
2643                                       int num_threads, e2fsck_t global_ctx)
2644 {
2645         errcode_t                        rc;
2646         errcode_t                        ret = 0;
2647         int                              i;
2648         struct e2fsck_thread_info       *pinfo;
2649
2650         for (i = 0; i < num_threads; i++) {
2651                 pinfo = &infos[i];
2652
2653                 if (!pinfo->eti_started)
2654                         continue;
2655
2656                 rc = pthread_join(pinfo->eti_thread_id, NULL);
2657                 if (rc) {
2658                         com_err(global_ctx->program_name, rc,
2659                                 _("while joining thread\n"));
2660                         if (ret == 0)
2661                                 ret = rc;
2662                 }
2663                 rc = e2fsck_pass1_thread_join(global_ctx, infos[i].eti_thread_ctx);
2664                 if (rc) {
2665                         com_err(global_ctx->program_name, rc,
2666                                 _("while joining pass1 thread\n"));
2667                         if (ret == 0)
2668                                 ret = rc;
2669                 }
2670         }
2671         free(infos);
2672
2673         return ret;
2674 }
2675
2676 static void *e2fsck_pass1_thread(void *arg)
2677 {
2678         struct e2fsck_thread_info       *info = arg;
2679         e2fsck_t                         thread_ctx = info->eti_thread_ctx;
2680 #ifdef DEBUG_THREADS
2681         struct e2fsck_thread_debug      *thread_debug = info->eti_debug;
2682 #endif
2683
2684 #ifdef DEBUG_THREADS
2685         pthread_mutex_lock(&thread_debug->etd_mutex);
2686         while (info->eti_thread_index > thread_debug->etd_finished_threads) {
2687                 pthread_cond_wait(&thread_debug->etd_cond,
2688                                   &thread_debug->etd_mutex);
2689         }
2690         pthread_mutex_unlock(&thread_debug->etd_mutex);
2691 #endif
2692
2693 #ifdef HAVE_SETJMP_H
2694         /*
2695          * When fatal_error() happens, jump to here. The thread
2696          * context's flags will be saved, but its abort_loc will
2697          * be overwritten by original jump buffer for the later
2698          * tests.
2699          */
2700         if (setjmp(thread_ctx->abort_loc)) {
2701                 thread_ctx->flags &= ~E2F_FLAG_SETJMP_OK;
2702                 goto out;
2703         }
2704         thread_ctx->flags |= E2F_FLAG_SETJMP_OK;
2705 #endif
2706
2707         e2fsck_pass1_run(thread_ctx);
2708
2709 out:
2710         if (thread_ctx->options & E2F_OPT_MULTITHREAD)
2711                 log_out(thread_ctx,
2712                         _("Scanned group range [%lu, %lu), inodes %lu\n"),
2713                         thread_ctx->thread_info.et_group_start,
2714                         thread_ctx->thread_info.et_group_end,
2715                         thread_ctx->thread_info.et_inode_number);
2716
2717 #ifdef DEBUG_THREADS
2718         pthread_mutex_lock(&thread_debug->etd_mutex);
2719         thread_debug->etd_finished_threads++;
2720         pthread_cond_broadcast(&thread_debug->etd_cond);
2721         pthread_mutex_unlock(&thread_debug->etd_mutex);
2722 #endif
2723
2724         return NULL;
2725 }
2726
2727 static int e2fsck_pass1_threads_start(struct e2fsck_thread_info **pinfo,
2728                                       int num_threads, e2fsck_t global_ctx)
2729 {
2730         struct e2fsck_thread_info       *infos;
2731         pthread_attr_t                   attr;
2732         errcode_t                        retval;
2733         errcode_t                        ret;
2734         struct e2fsck_thread_info       *tmp_pinfo;
2735         int                              i;
2736         e2fsck_t                         thread_ctx;
2737 #ifdef DEBUG_THREADS
2738         struct e2fsck_thread_debug       thread_debug =
2739                 {PTHREAD_MUTEX_INITIALIZER, PTHREAD_COND_INITIALIZER, 0};
2740
2741         thread_debug.etd_finished_threads = 0;
2742 #endif
2743
2744         retval = pthread_attr_init(&attr);
2745         if (retval) {
2746                 com_err(global_ctx->program_name, retval,
2747                         _("while setting pthread attribute\n"));
2748                 return retval;
2749         }
2750
2751         infos = calloc(num_threads, sizeof(struct e2fsck_thread_info));
2752         if (infos == NULL) {
2753                 retval = -ENOMEM;
2754                 com_err(global_ctx->program_name, retval,
2755                         _("while allocating memory for threads\n"));
2756                 pthread_attr_destroy(&attr);
2757                 return retval;
2758         }
2759
2760         for (i = 0; i < num_threads; i++) {
2761                 tmp_pinfo = &infos[i];
2762                 tmp_pinfo->eti_thread_index = i;
2763 #ifdef DEBUG_THREADS
2764                 tmp_pinfo->eti_debug = &thread_debug;
2765 #endif
2766                 retval = e2fsck_pass1_thread_prepare(global_ctx, &thread_ctx,
2767                                                      i, num_threads);
2768                 if (retval) {
2769                         com_err(global_ctx->program_name, retval,
2770                                 _("while preparing pass1 thread\n"));
2771                         break;
2772                 }
2773                 tmp_pinfo->eti_thread_ctx = thread_ctx;
2774
2775                 retval = pthread_create(&tmp_pinfo->eti_thread_id, &attr,
2776                                         &e2fsck_pass1_thread, tmp_pinfo);
2777                 if (retval) {
2778                         com_err(global_ctx->program_name, retval,
2779                                 _("while creating thread\n"));
2780                         e2fsck_pass1_thread_join(global_ctx, thread_ctx);
2781                         break;
2782                 }
2783
2784                 tmp_pinfo->eti_started = 1;
2785         }
2786
2787         /* destroy the thread attribute object, since it is no longer needed */
2788         ret = pthread_attr_destroy(&attr);
2789         if (ret) {
2790                 com_err(global_ctx->program_name, ret,
2791                         _("while destroying thread attribute\n"));
2792                 if (retval == 0)
2793                         retval = ret;
2794         }
2795
2796         if (retval) {
2797                 e2fsck_pass1_threads_join(infos, num_threads, global_ctx);
2798                 return retval;
2799         }
2800         *pinfo = infos;
2801         return 0;
2802 }
2803
2804 static void e2fsck_pass1_multithread(e2fsck_t global_ctx)
2805 {
2806         struct e2fsck_thread_info       *infos = NULL;
2807         int                              num_threads = 1;
2808         errcode_t                        retval;
2809
2810         retval = e2fsck_pass1_threads_start(&infos, num_threads, global_ctx);
2811         if (retval) {
2812                 com_err(global_ctx->program_name, retval,
2813                         _("while starting pass1 threads\n"));
2814                 goto out_abort;
2815         }
2816
2817         retval = e2fsck_pass1_threads_join(infos, num_threads, global_ctx);
2818         if (retval) {
2819                 com_err(global_ctx->program_name, retval,
2820                         _("while joining pass1 threads\n"));
2821                 goto out_abort;
2822         }
2823         return;
2824 out_abort:
2825         global_ctx->flags |= E2F_FLAG_ABORT;
2826         return;
2827 }
2828 #endif
2829
2830 /* TODO: tdb needs to be handled properly for multiple threads*/
2831 static int multiple_threads_supported(e2fsck_t ctx)
2832 {
2833 #ifdef  CONFIG_TDB
2834         unsigned int            threshold;
2835         ext2_ino_t              num_dirs;
2836         errcode_t               retval;
2837         char                    *tdb_dir;
2838         int                     enable;
2839
2840         profile_get_string(ctx->profile, "scratch_files", "directory", 0, 0,
2841                            &tdb_dir);
2842         profile_get_uint(ctx->profile, "scratch_files",
2843                          "numdirs_threshold", 0, 0, &threshold);
2844         profile_get_boolean(ctx->profile, "scratch_files",
2845                             "icount", 0, 1, &enable);
2846
2847         retval = ext2fs_get_num_dirs(ctx->fs, &num_dirs);
2848         if (retval)
2849                 num_dirs = 1024;        /* Guess */
2850
2851         /* tdb is unsupported now */
2852         if (enable && tdb_dir && !access(tdb_dir, W_OK) &&
2853             (!threshold || num_dirs > threshold))
2854                 return 0;
2855  #endif
2856         return 1;
2857 }
2858
2859 void e2fsck_pass1(e2fsck_t ctx)
2860 {
2861
2862         init_ext2_max_sizes();
2863 #ifdef HAVE_PTHREAD
2864         if (multiple_threads_supported(ctx)) {
2865                 e2fsck_pass1_multithread(ctx);
2866                 return;
2867         }
2868         fprintf(stderr, "Fall through single thread for pass1 "
2869                         "because tdb could not handle properly\n");
2870 #endif
2871         e2fsck_pass1_run(ctx);
2872 }
2873
2874 #undef FINISH_INODE_LOOP
2875
2876 /*
2877  * When the inode_scan routines call this callback at the end of the
2878  * glock group, call process_inodes.
2879  */
2880 static errcode_t scan_callback(ext2_filsys fs,
2881                                ext2_inode_scan scan EXT2FS_ATTR((unused)),
2882                                dgrp_t group, void * priv_data)
2883 {
2884         struct scan_callback_struct *scan_struct;
2885         e2fsck_t ctx;
2886         struct e2fsck_thread *tinfo;
2887
2888         scan_struct = (struct scan_callback_struct *) priv_data;
2889         ctx = scan_struct->ctx;
2890
2891         process_inodes((e2fsck_t) fs->priv_data, scan_struct->block_buf,
2892                        scan_struct->inodes_to_process,
2893                        scan_struct->process_inode_count);
2894
2895         if (ctx->progress)
2896                 if ((ctx->progress)(ctx, 1, group+1,
2897                                     ctx->fs->group_desc_count))
2898                         return EXT2_ET_CANCEL_REQUESTED;
2899
2900 #ifdef HAVE_PTHREAD
2901         if (ctx->global_ctx) {
2902                 tinfo = &ctx->thread_info;
2903                 tinfo->et_group_next++;
2904                 if (ctx->options & E2F_OPT_DEBUG &&
2905                     ctx->options & E2F_OPT_MULTITHREAD)
2906                         log_out(ctx, _("group %d finished\n"),
2907                                 tinfo->et_group_next);
2908                 if (tinfo->et_group_next >= tinfo->et_group_end)
2909                         return EXT2_ET_SCAN_FINISHED;
2910         }
2911 #endif
2912
2913         return 0;
2914 }
2915
2916 /*
2917  * Process the inodes in the "inodes to process" list.
2918  */
2919 static void process_inodes(e2fsck_t ctx, char *block_buf,
2920                            struct process_inode_block *inodes_to_process,
2921                            int *process_inode_count)
2922 {
2923         int                     i;
2924         struct ext2_inode       *old_stashed_inode;
2925         ext2_ino_t              old_stashed_ino;
2926         const char              *old_operation;
2927         char                    buf[80];
2928         struct problem_context  pctx;
2929
2930 #if 0
2931         printf("begin process_inodes: ");
2932 #endif
2933         if (*process_inode_count == 0)
2934                 return;
2935         old_operation = ehandler_operation(0);
2936         old_stashed_inode = ctx->stashed_inode;
2937         old_stashed_ino = ctx->stashed_ino;
2938         qsort(inodes_to_process, *process_inode_count,
2939                       sizeof(struct process_inode_block), process_inode_cmp);
2940         clear_problem_context(&pctx);
2941         for (i=0; i < *process_inode_count; i++) {
2942                 pctx.inode = ctx->stashed_inode =
2943                         (struct ext2_inode *) &inodes_to_process[i].inode;
2944                 pctx.ino = ctx->stashed_ino = inodes_to_process[i].ino;
2945
2946 #if 0
2947                 printf("%u ", pctx.ino);
2948 #endif
2949                 sprintf(buf, _("reading indirect blocks of inode %u"),
2950                         pctx.ino);
2951                 ehandler_operation(buf);
2952                 check_blocks(ctx, &pctx, block_buf,
2953                              &inodes_to_process[i].ea_ibody_quota);
2954                 if (e2fsck_should_abort(ctx))
2955                         break;
2956         }
2957         ctx->stashed_inode = old_stashed_inode;
2958         ctx->stashed_ino = old_stashed_ino;
2959         *process_inode_count = 0;
2960 #if 0
2961         printf("end process inodes\n");
2962 #endif
2963         ehandler_operation(old_operation);
2964 }
2965
2966 static EXT2_QSORT_TYPE process_inode_cmp(const void *a, const void *b)
2967 {
2968         const struct process_inode_block *ib_a =
2969                 (const struct process_inode_block *) a;
2970         const struct process_inode_block *ib_b =
2971                 (const struct process_inode_block *) b;
2972         int     ret;
2973
2974         ret = (ib_a->inode.i_block[EXT2_IND_BLOCK] -
2975                ib_b->inode.i_block[EXT2_IND_BLOCK]);
2976         if (ret == 0)
2977                 /*
2978                  * We only call process_inodes() for non-extent
2979                  * inodes, so it's OK to pass NULL to
2980                  * ext2fs_file_acl_block() here.
2981                  */
2982                 ret = ext2fs_file_acl_block(0, ext2fs_const_inode(&ib_a->inode)) -
2983                         ext2fs_file_acl_block(0, ext2fs_const_inode(&ib_b->inode));
2984         if (ret == 0)
2985                 ret = ib_a->ino - ib_b->ino;
2986         return ret;
2987 }
2988
2989 /*
2990  * Mark an inode as being bad in some what
2991  */
2992 static void mark_inode_bad(e2fsck_t ctx, ino_t ino)
2993 {
2994         struct          problem_context pctx;
2995
2996         if (!ctx->inode_bad_map) {
2997                 clear_problem_context(&pctx);
2998
2999                 pctx.errcode = e2fsck_allocate_inode_bitmap(ctx->fs,
3000                                 _("bad inode map"), EXT2FS_BMAP64_RBTREE,
3001                                 "inode_bad_map", &ctx->inode_bad_map);
3002                 if (pctx.errcode) {
3003                         pctx.num = 3;
3004                         fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
3005                         /* Should never get here */
3006                         ctx->flags |= E2F_FLAG_ABORT;
3007                         return;
3008                 }
3009         }
3010         ext2fs_mark_inode_bitmap2(ctx->inode_bad_map, ino);
3011 }
3012
3013 static void add_casefolded_dir(e2fsck_t ctx, ino_t ino)
3014 {
3015         struct          problem_context pctx;
3016
3017         if (!ctx->casefolded_dirs) {
3018                 pctx.errcode = ext2fs_u32_list_create(&ctx->casefolded_dirs, 0);
3019                 if (pctx.errcode)
3020                         goto error;
3021         }
3022         pctx.errcode = ext2fs_u32_list_add(ctx->casefolded_dirs, ino);
3023         if (pctx.errcode == 0)
3024                 return;
3025 error:
3026         fix_problem(ctx, PR_1_ALLOCATE_CASEFOLDED_DIRLIST, &pctx);
3027         /* Should never get here */
3028         ctx->flags |= E2F_FLAG_ABORT;
3029 }
3030
3031 /*
3032  * This procedure will allocate the inode "bb" (badblock) map table
3033  */
3034 static void alloc_bb_map(e2fsck_t ctx)
3035 {
3036         struct          problem_context pctx;
3037
3038         clear_problem_context(&pctx);
3039         pctx.errcode = e2fsck_allocate_inode_bitmap(ctx->fs,
3040                         _("inode in bad block map"), EXT2FS_BMAP64_RBTREE,
3041                         "inode_bb_map", &ctx->inode_bb_map);
3042         if (pctx.errcode) {
3043                 pctx.num = 4;
3044                 fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
3045                 /* Should never get here */
3046                 ctx->flags |= E2F_FLAG_ABORT;
3047                 return;
3048         }
3049 }
3050
3051 /*
3052  * This procedure will allocate the inode imagic table
3053  */
3054 static void alloc_imagic_map(e2fsck_t ctx)
3055 {
3056         struct          problem_context pctx;
3057
3058         clear_problem_context(&pctx);
3059         pctx.errcode = e2fsck_allocate_inode_bitmap(ctx->fs,
3060                         _("imagic inode map"), EXT2FS_BMAP64_RBTREE,
3061                         "inode_imagic_map", &ctx->inode_imagic_map);
3062         if (pctx.errcode) {
3063                 pctx.num = 5;
3064                 fix_problem(ctx, PR_1_ALLOCATE_IBITMAP_ERROR, &pctx);
3065                 /* Should never get here */
3066                 ctx->flags |= E2F_FLAG_ABORT;
3067                 return;
3068         }
3069 }
3070
3071 /*
3072  * Marks a block as in use, setting the dup_map if it's been set
3073  * already.  Called by process_block and process_bad_block.
3074  *
3075  * WARNING: Assumes checks have already been done to make sure block
3076  * is valid.  This is true in both process_block and process_bad_block.
3077  */
3078 static _INLINE_ void mark_block_used(e2fsck_t ctx, blk64_t block)
3079 {
3080         struct          problem_context pctx;
3081
3082         clear_problem_context(&pctx);
3083
3084         if (ext2fs_fast_test_block_bitmap2(ctx->block_found_map, block)) {
3085                 if (ext2fs_has_feature_shared_blocks(ctx->fs->super) &&
3086                     !(ctx->options & E2F_OPT_UNSHARE_BLOCKS)) {
3087                         return;
3088                 }
3089                 if (!ctx->block_dup_map) {
3090                         pctx.errcode = e2fsck_allocate_block_bitmap(ctx->fs,
3091                                         _("multiply claimed block map"),
3092                                         EXT2FS_BMAP64_RBTREE, "block_dup_map",
3093                                         &ctx->block_dup_map);
3094                         if (pctx.errcode) {
3095                                 pctx.num = 3;
3096                                 fix_problem(ctx, PR_1_ALLOCATE_BBITMAP_ERROR,
3097                                             &pctx);
3098                                 /* Should never get here */
3099                                 ctx->flags |= E2F_FLAG_ABORT;
3100                                 return;
3101                         }
3102                 }
3103                 ext2fs_fast_mark_block_bitmap2(ctx->block_dup_map, block);
3104         } else {
3105                 ext2fs_fast_mark_block_bitmap2(ctx->block_found_map, block);
3106         }
3107 }
3108
3109 /*
3110  * When cluster size is greater than one block, it is caller's responsibility
3111  * to make sure block parameter starts at a cluster boundary.
3112  */
3113 static _INLINE_ void mark_blocks_used(e2fsck_t ctx, blk64_t block,
3114                                       unsigned int num)
3115 {
3116         if (ext2fs_test_block_bitmap_range2(ctx->block_found_map, block, num))
3117                 ext2fs_mark_block_bitmap_range2(ctx->block_found_map, block, num);
3118         else {
3119                 unsigned int i;
3120
3121                 for (i = 0; i < num; i += EXT2FS_CLUSTER_RATIO(ctx->fs))
3122                         mark_block_used(ctx, block + i);
3123         }
3124 }
3125
3126 /*
3127  * Adjust the extended attribute block's reference counts at the end
3128  * of pass 1, either by subtracting out references for EA blocks that
3129  * are still referenced in ctx->refcount, or by adding references for
3130  * EA blocks that had extra references as accounted for in
3131  * ctx->refcount_extra.
3132  */
3133 static void adjust_extattr_refcount(e2fsck_t ctx, ext2_refcount_t refcount,
3134                                     char *block_buf, int adjust_sign)
3135 {
3136         struct ext2_ext_attr_header     *header;
3137         struct problem_context          pctx;
3138         ext2_filsys                     fs = ctx->fs;
3139         blk64_t                         blk;
3140         __u32                           should_be;
3141         ea_value_t                      count;
3142
3143         clear_problem_context(&pctx);
3144
3145         ea_refcount_intr_begin(refcount);
3146         while (1) {
3147                 if ((blk = ea_refcount_intr_next(refcount, &count)) == 0)
3148                         break;
3149                 pctx.blk = blk;
3150                 pctx.errcode = ext2fs_read_ext_attr3(fs, blk, block_buf,
3151                                                      pctx.ino);
3152                 if (pctx.errcode) {
3153                         fix_problem(ctx, PR_1_EXTATTR_READ_ABORT, &pctx);
3154                         return;
3155                 }
3156                 header = (struct ext2_ext_attr_header *) block_buf;
3157                 pctx.blkcount = header->h_refcount;
3158                 should_be = header->h_refcount + adjust_sign * (int)count;
3159                 pctx.num = should_be;
3160                 if (fix_problem(ctx, PR_1_EXTATTR_REFCOUNT, &pctx)) {
3161                         header->h_refcount = should_be;
3162                         pctx.errcode = ext2fs_write_ext_attr3(fs, blk,
3163                                                              block_buf,
3164                                                              pctx.ino);
3165                         if (pctx.errcode) {
3166                                 fix_problem(ctx, PR_1_EXTATTR_WRITE_ABORT,
3167                                             &pctx);
3168                                 continue;
3169                         }
3170                 }
3171         }
3172 }
3173
3174 /*
3175  * Handle processing the extended attribute blocks
3176  */
3177 static int check_ext_attr(e2fsck_t ctx, struct problem_context *pctx,
3178                            char *block_buf, struct ea_quota *ea_block_quota)
3179 {
3180         ext2_filsys fs = ctx->fs;
3181         ext2_ino_t      ino = pctx->ino;
3182         struct ext2_inode *inode = pctx->inode;
3183         blk64_t         blk;
3184         char *          end;
3185         struct ext2_ext_attr_header *header;
3186         struct ext2_ext_attr_entry *first, *entry;
3187         blk64_t         quota_blocks = EXT2FS_C2B(fs, 1);
3188         __u64           quota_inodes = 0;
3189         region_t        region = 0;
3190         int             failed_csum = 0;
3191
3192         ea_block_quota->blocks = 0;
3193         ea_block_quota->inodes = 0;
3194
3195         blk = ext2fs_file_acl_block(fs, inode);
3196         if (blk == 0)
3197                 return 0;
3198
3199         /*
3200          * If the Extended attribute flag isn't set, then a non-zero
3201          * file acl means that the inode is corrupted.
3202          *
3203          * Or if the extended attribute block is an invalid block,
3204          * then the inode is also corrupted.
3205          */
3206         if (!ext2fs_has_feature_xattr(fs->super) ||
3207             (blk < fs->super->s_first_data_block) ||
3208             (blk >= ext2fs_blocks_count(fs->super))) {
3209                 mark_inode_bad(ctx, ino);
3210                 return 0;
3211         }
3212
3213         /* If ea bitmap hasn't been allocated, create it */
3214         if (!ctx->block_ea_map) {
3215                 pctx->errcode = e2fsck_allocate_block_bitmap(fs,
3216                                         _("ext attr block map"),
3217                                         EXT2FS_BMAP64_RBTREE, "block_ea_map",
3218                                         &ctx->block_ea_map);
3219                 if (pctx->errcode) {
3220                         pctx->num = 2;
3221                         fix_problem(ctx, PR_1_ALLOCATE_BBITMAP_ERROR, pctx);
3222                         ctx->flags |= E2F_FLAG_ABORT;
3223                         return 0;
3224                 }
3225         }
3226
3227         /* Create the EA refcount structure if necessary */
3228         if (!ctx->refcount) {
3229                 pctx->errcode = ea_refcount_create(0, &ctx->refcount);
3230                 if (pctx->errcode) {
3231                         pctx->num = 1;
3232                         fix_problem(ctx, PR_1_ALLOCATE_REFCOUNT, pctx);
3233                         ctx->flags |= E2F_FLAG_ABORT;
3234                         return 0;
3235                 }
3236         }
3237
3238 #if 0
3239         /* Debugging text */
3240         printf("Inode %u has EA block %u\n", ino, blk);
3241 #endif
3242
3243         /* Have we seen this EA block before? */
3244         if (ext2fs_fast_test_block_bitmap2(ctx->block_ea_map, blk)) {
3245                 ea_block_quota->blocks = EXT2FS_C2B(fs, 1);
3246                 ea_block_quota->inodes = 0;
3247
3248                 if (ctx->ea_block_quota_blocks) {
3249                         ea_refcount_fetch(ctx->ea_block_quota_blocks, blk,
3250                                           &quota_blocks);
3251                         if (quota_blocks)
3252                                 ea_block_quota->blocks = quota_blocks;
3253                 }
3254
3255                 if (ctx->ea_block_quota_inodes)
3256                         ea_refcount_fetch(ctx->ea_block_quota_inodes, blk,
3257                                           &ea_block_quota->inodes);
3258
3259                 if (ea_refcount_decrement(ctx->refcount, blk, 0) == 0)
3260                         return 1;
3261                 /* Ooops, this EA was referenced more than it stated */
3262                 if (!ctx->refcount_extra) {
3263                         pctx->errcode = ea_refcount_create(0,
3264                                            &ctx->refcount_extra);
3265                         if (pctx->errcode) {
3266                                 pctx->num = 2;
3267                                 fix_problem(ctx, PR_1_ALLOCATE_REFCOUNT, pctx);
3268                                 ctx->flags |= E2F_FLAG_ABORT;
3269                                 return 0;
3270                         }
3271                 }
3272                 ea_refcount_increment(ctx->refcount_extra, blk, 0);
3273                 return 1;
3274         }
3275
3276         /*
3277          * OK, we haven't seen this EA block yet.  So we need to
3278          * validate it
3279          */
3280         pctx->blk = blk;
3281         pctx->errcode = ext2fs_read_ext_attr3(fs, blk, block_buf, pctx->ino);
3282         if (pctx->errcode == EXT2_ET_EXT_ATTR_CSUM_INVALID) {
3283                 pctx->errcode = 0;
3284                 failed_csum = 1;
3285         } else if (pctx->errcode == EXT2_ET_BAD_EA_HEADER)
3286                 pctx->errcode = 0;
3287
3288         if (pctx->errcode &&
3289             fix_problem(ctx, PR_1_READ_EA_BLOCK, pctx)) {
3290                 pctx->errcode = 0;
3291                 goto clear_extattr;
3292         }
3293         header = (struct ext2_ext_attr_header *) block_buf;
3294         pctx->blk = ext2fs_file_acl_block(fs, inode);
3295         if (((ctx->ext_attr_ver == 1) &&
3296              (header->h_magic != EXT2_EXT_ATTR_MAGIC_v1)) ||
3297             ((ctx->ext_attr_ver == 2) &&
3298              (header->h_magic != EXT2_EXT_ATTR_MAGIC))) {
3299                 if (fix_problem(ctx, PR_1_BAD_EA_BLOCK, pctx))
3300                         goto clear_extattr;
3301         }
3302
3303         if (header->h_blocks != 1) {
3304                 if (fix_problem(ctx, PR_1_EA_MULTI_BLOCK, pctx))
3305                         goto clear_extattr;
3306         }
3307
3308         if (pctx->errcode && fix_problem(ctx, PR_1_READ_EA_BLOCK, pctx))
3309                 goto clear_extattr;
3310
3311         region = region_create(0, fs->blocksize);
3312         if (!region) {
3313                 fix_problem(ctx, PR_1_EA_ALLOC_REGION_ABORT, pctx);
3314                 ctx->flags |= E2F_FLAG_ABORT;
3315                 return 0;
3316         }
3317         if (region_allocate(region, 0, sizeof(struct ext2_ext_attr_header))) {
3318                 if (fix_problem(ctx, PR_1_EA_ALLOC_COLLISION, pctx))
3319                         goto clear_extattr;
3320         }
3321
3322         first = (struct ext2_ext_attr_entry *)(header+1);
3323         end = block_buf + fs->blocksize;
3324         entry = first;
3325         while ((char *)entry < end && *(__u32 *)entry) {
3326                 __u32 hash;
3327
3328                 if (region_allocate(region, (char *)entry - (char *)header,
3329                                    EXT2_EXT_ATTR_LEN(entry->e_name_len))) {
3330                         if (fix_problem(ctx, PR_1_EA_ALLOC_COLLISION, pctx))
3331                                 goto clear_extattr;
3332                         break;
3333                 }
3334                 if ((ctx->ext_attr_ver == 1 &&
3335                      (entry->e_name_len == 0 || entry->e_name_index != 0)) ||
3336                     (ctx->ext_attr_ver == 2 &&
3337                      entry->e_name_index == 0)) {
3338                         if (fix_problem(ctx, PR_1_EA_BAD_NAME, pctx))
3339                                 goto clear_extattr;
3340                         break;
3341                 }
3342                 if (entry->e_value_inum == 0) {
3343                         if (entry->e_value_offs + entry->e_value_size >
3344                             fs->blocksize) {
3345                                 if (fix_problem(ctx, PR_1_EA_BAD_VALUE, pctx))
3346                                         goto clear_extattr;
3347                                 break;
3348                         }
3349                         if (entry->e_value_size &&
3350                             region_allocate(region, entry->e_value_offs,
3351                                             EXT2_EXT_ATTR_SIZE(entry->e_value_size))) {
3352                                 if (fix_problem(ctx, PR_1_EA_ALLOC_COLLISION,
3353                                                 pctx))
3354                                         goto clear_extattr;
3355                         }
3356
3357                         hash = ext2fs_ext_attr_hash_entry(entry, block_buf +
3358                                                           entry->e_value_offs);
3359
3360                         if (entry->e_hash != hash) {
3361                                 pctx->num = entry->e_hash;
3362                                 if (fix_problem(ctx, PR_1_ATTR_HASH, pctx))
3363                                         goto clear_extattr;
3364                                 entry->e_hash = hash;
3365                         }
3366                 } else {
3367                         problem_t problem;
3368                         blk64_t entry_quota_blocks;
3369
3370                         problem = check_large_ea_inode(ctx, entry, pctx,
3371                                                        &entry_quota_blocks);
3372                         if (problem && fix_problem(ctx, problem, pctx))
3373                                 goto clear_extattr;
3374
3375                         quota_blocks += entry_quota_blocks;
3376                         quota_inodes++;
3377                 }
3378
3379                 entry = EXT2_EXT_ATTR_NEXT(entry);
3380         }
3381         if (region_allocate(region, (char *)entry - (char *)header, 4)) {
3382                 if (fix_problem(ctx, PR_1_EA_ALLOC_COLLISION, pctx))
3383                         goto clear_extattr;
3384         }
3385         region_free(region);
3386
3387         /*
3388          * We only get here if there was no other errors that were fixed.
3389          * If there was a checksum fail, ask to correct it.
3390          */
3391         if (failed_csum &&
3392             fix_problem(ctx, PR_1_EA_BLOCK_ONLY_CSUM_INVALID, pctx)) {
3393                 pctx->errcode = ext2fs_write_ext_attr3(fs, blk, block_buf,
3394                                                        pctx->ino);
3395                 if (pctx->errcode)
3396                         return 0;
3397         }
3398
3399         if (quota_blocks != EXT2FS_C2B(fs, 1U)) {
3400                 if (!ctx->ea_block_quota_blocks) {
3401                         pctx->errcode = ea_refcount_create(0,
3402                                                 &ctx->ea_block_quota_blocks);
3403                         if (pctx->errcode) {
3404                                 pctx->num = 3;
3405                                 goto refcount_fail;
3406                         }
3407                 }
3408                 ea_refcount_store(ctx->ea_block_quota_blocks, blk,
3409                                   quota_blocks);
3410         }
3411
3412         if (quota_inodes) {
3413                 if (!ctx->ea_block_quota_inodes) {
3414                         pctx->errcode = ea_refcount_create(0,
3415                                                 &ctx->ea_block_quota_inodes);
3416                         if (pctx->errcode) {
3417                                 pctx->num = 4;
3418 refcount_fail:
3419                                 fix_problem(ctx, PR_1_ALLOCATE_REFCOUNT, pctx);
3420                                 ctx->flags |= E2F_FLAG_ABORT;
3421                                 return 0;
3422                         }
3423                 }
3424
3425                 ea_refcount_store(ctx->ea_block_quota_inodes, blk,
3426                                   quota_inodes);
3427         }
3428         ea_block_quota->blocks = quota_blocks;
3429         ea_block_quota->inodes = quota_inodes;
3430
3431         inc_ea_inode_refs(ctx, pctx, first, end);
3432         ea_refcount_store(ctx->refcount, blk, header->h_refcount - 1);
3433         mark_block_used(ctx, blk);
3434         ext2fs_fast_mark_block_bitmap2(ctx->block_ea_map, blk);
3435         return 1;
3436
3437 clear_extattr:
3438         if (region)
3439                 region_free(region);
3440         ext2fs_file_acl_block_set(fs, inode, 0);
3441         e2fsck_write_inode(ctx, ino, inode, "check_ext_attr");
3442         return 0;
3443 }
3444
3445 /* Returns 1 if bad htree, 0 if OK */
3446 static int handle_htree(e2fsck_t ctx, struct problem_context *pctx,
3447                         ext2_ino_t ino, struct ext2_inode *inode,
3448                         char *block_buf)
3449 {
3450         struct ext2_dx_root_info        *root;
3451         ext2_filsys                     fs = ctx->fs;
3452         errcode_t                       retval;
3453         blk64_t                         blk;
3454
3455         if ((!LINUX_S_ISDIR(inode->i_mode) &&
3456              fix_problem(ctx, PR_1_HTREE_NODIR, pctx)) ||
3457             (!ext2fs_has_feature_dir_index(fs->super) &&
3458              fix_problem(ctx, PR_1_HTREE_SET, pctx)))
3459                 return 1;
3460
3461         pctx->errcode = ext2fs_bmap2(fs, ino, inode, 0, 0, 0, 0, &blk);
3462
3463         if ((pctx->errcode) ||
3464             (blk == 0) ||
3465             (blk < fs->super->s_first_data_block) ||
3466             (blk >= ext2fs_blocks_count(fs->super))) {
3467                 if (fix_problem(ctx, PR_1_HTREE_BADROOT, pctx))
3468                         return 1;
3469                 else
3470                         return 0;
3471         }
3472
3473         retval = io_channel_read_blk64(fs->io, blk, 1, block_buf);
3474         if (retval && fix_problem(ctx, PR_1_HTREE_BADROOT, pctx))
3475                 return 1;
3476
3477         /* XXX should check that beginning matches a directory */
3478         root = (struct ext2_dx_root_info *) (block_buf + 24);
3479
3480         if ((root->reserved_zero || root->info_length < 8) &&
3481             fix_problem(ctx, PR_1_HTREE_BADROOT, pctx))
3482                 return 1;
3483
3484         pctx->num = root->hash_version;
3485         if ((root->hash_version != EXT2_HASH_LEGACY) &&
3486             (root->hash_version != EXT2_HASH_HALF_MD4) &&
3487             (root->hash_version != EXT2_HASH_TEA) &&
3488             (root->hash_version != EXT2_HASH_SIPHASH) &&
3489             fix_problem(ctx, PR_1_HTREE_HASHV, pctx))
3490                 return 1;
3491
3492         if (ext4_hash_in_dirent(inode)) {
3493                 if (root->hash_version != EXT2_HASH_SIPHASH &&
3494                     fix_problem(ctx, PR_1_HTREE_NEEDS_SIPHASH, pctx))
3495                         return 1;
3496         } else {
3497                 if (root->hash_version == EXT2_HASH_SIPHASH &&
3498                    fix_problem(ctx, PR_1_HTREE_CANNOT_SIPHASH, pctx))
3499                         return 1;
3500         }
3501
3502         if ((root->unused_flags & EXT2_HASH_FLAG_INCOMPAT) &&
3503             fix_problem(ctx, PR_1_HTREE_INCOMPAT, pctx))
3504                 return 1;
3505
3506         pctx->num = root->indirect_levels;
3507         /* if htree level is clearly too high, consider it to be broken */
3508         if (root->indirect_levels > EXT4_HTREE_LEVEL &&
3509             fix_problem(ctx, PR_1_HTREE_DEPTH, pctx))
3510                 return 1;
3511
3512         /* if level is only maybe too high, LARGE_DIR feature could be unset */
3513         if (root->indirect_levels > ext2_dir_htree_level(fs) &&
3514             !ext2fs_has_feature_largedir(fs->super)) {
3515                 int blockbits = EXT2_BLOCK_SIZE_BITS(fs->super) + 10;
3516                 int idx_pb = 1 << (blockbits - 3);
3517
3518                 /* compare inode size/blocks vs. max-sized 2-level htree */
3519                 if (EXT2_I_SIZE(pctx->inode) <
3520                     (idx_pb - 1) * (idx_pb - 2) << blockbits &&
3521                     pctx->inode->i_blocks <
3522                     (idx_pb - 1) * (idx_pb - 2) << (blockbits - 9) &&
3523                     fix_problem(ctx, PR_1_HTREE_DEPTH, pctx))
3524                         return 1;
3525         }
3526
3527         if (root->indirect_levels > EXT4_HTREE_LEVEL_COMPAT ||
3528             ext2fs_needs_large_file_feature(EXT2_I_SIZE(inode)))
3529                 ctx->large_dirs++;
3530
3531         return 0;
3532 }
3533
3534 void e2fsck_clear_inode(e2fsck_t ctx, ext2_ino_t ino,
3535                         struct ext2_inode *inode, int restart_flag,
3536                         const char *source)
3537 {
3538         inode->i_flags = 0;
3539         inode->i_links_count = 0;
3540         ext2fs_icount_store(ctx->inode_link_info, ino, 0);
3541         inode->i_dtime = ctx->now;
3542
3543         /*
3544          * If a special inode has such rotten block mappings that we
3545          * want to clear the whole inode, be sure to actually zap
3546          * the block maps because i_links_count isn't checked for
3547          * special inodes, and we'll end up right back here the next
3548          * time we run fsck.
3549          */
3550         if (ino < EXT2_FIRST_INODE(ctx->fs->super))
3551                 memset(inode->i_block, 0, sizeof(inode->i_block));
3552
3553         ext2fs_unmark_inode_bitmap2(ctx->inode_dir_map, ino);
3554         ext2fs_unmark_inode_bitmap2(ctx->inode_used_map, ino);
3555         if (ctx->inode_reg_map)
3556                 ext2fs_unmark_inode_bitmap2(ctx->inode_reg_map, ino);
3557         if (ctx->inode_bad_map)
3558                 ext2fs_unmark_inode_bitmap2(ctx->inode_bad_map, ino);
3559
3560         /*
3561          * If the inode was partially accounted for before processing
3562          * was aborted, we need to restart the pass 1 scan.
3563          */
3564         ctx->flags |= restart_flag;
3565
3566         if (ino == EXT2_BAD_INO)
3567                 memset(inode, 0, sizeof(struct ext2_inode));
3568
3569         e2fsck_write_inode(ctx, ino, inode, source);
3570 }
3571
3572 /*
3573  * Use the multiple-blocks reclamation code to fix alignment problems in
3574  * a bigalloc filesystem.  We want a logical cluster to map to *only* one
3575  * physical cluster, and we want the block offsets within that cluster to
3576  * line up.
3577  */
3578 static int has_unaligned_cluster_map(e2fsck_t ctx,
3579                                      blk64_t last_pblk, blk64_t last_lblk,
3580                                      blk64_t pblk, blk64_t lblk)
3581 {
3582         blk64_t cluster_mask;
3583
3584         if (!ctx->fs->cluster_ratio_bits)
3585                 return 0;
3586         cluster_mask = EXT2FS_CLUSTER_MASK(ctx->fs);
3587
3588         /*
3589          * If the block in the logical cluster doesn't align with the block in
3590          * the physical cluster...
3591          */
3592         if ((lblk & cluster_mask) != (pblk & cluster_mask))
3593                 return 1;
3594
3595         /*
3596          * If we cross a physical cluster boundary within a logical cluster...
3597          */
3598         if (last_pblk && (lblk & cluster_mask) != 0 &&
3599             EXT2FS_B2C(ctx->fs, lblk) == EXT2FS_B2C(ctx->fs, last_lblk) &&
3600             EXT2FS_B2C(ctx->fs, pblk) != EXT2FS_B2C(ctx->fs, last_pblk))
3601                 return 1;
3602
3603         return 0;
3604 }
3605
3606 static void scan_extent_node(e2fsck_t ctx, struct problem_context *pctx,
3607                              struct process_block_struct *pb,
3608                              blk64_t start_block, blk64_t end_block,
3609                              blk64_t eof_block,
3610                              ext2_extent_handle_t ehandle,
3611                              int try_repairs)
3612 {
3613         struct ext2fs_extent    extent;
3614         blk64_t                 blk, last_lblk;
3615         unsigned int            i, n;
3616         int                     is_dir, is_leaf;
3617         problem_t               problem;
3618         struct ext2_extent_info info;
3619         int                     failed_csum = 0;
3620
3621         if (pctx->errcode == EXT2_ET_EXTENT_CSUM_INVALID)
3622                 failed_csum = 1;
3623
3624         pctx->errcode = ext2fs_extent_get_info(ehandle, &info);
3625         if (pctx->errcode)
3626                 return;
3627         if (!(ctx->options & E2F_OPT_FIXES_ONLY) &&
3628             !pb->eti.force_rebuild) {
3629                 struct extent_tree_level *etl;
3630
3631                 etl = pb->eti.ext_info + info.curr_level;
3632                 etl->num_extents += info.num_entries;
3633                 etl->max_extents += info.max_entries;
3634                 /*
3635                  * Implementation wart: Splitting extent blocks when appending
3636                  * will leave the old block with one free entry.  Therefore
3637                  * unless the node is totally full, pretend that a non-root
3638                  * extent block can hold one fewer entry than it actually does,
3639                  * so that we don't repeatedly rebuild the extent tree.
3640                  */
3641                 if (info.curr_level && info.num_entries < info.max_entries)
3642                         etl->max_extents--;
3643         }
3644
3645         pctx->errcode = ext2fs_extent_get(ehandle, EXT2_EXTENT_FIRST_SIB,
3646                                           &extent);
3647         while ((pctx->errcode == 0 ||
3648                 pctx->errcode == EXT2_ET_EXTENT_CSUM_INVALID) &&
3649                info.num_entries-- > 0) {
3650                 is_leaf = extent.e_flags & EXT2_EXTENT_FLAGS_LEAF;
3651                 is_dir = LINUX_S_ISDIR(pctx->inode->i_mode);
3652                 last_lblk = extent.e_lblk + extent.e_len - 1;
3653
3654                 problem = 0;
3655                 pctx->blk = extent.e_pblk;
3656                 pctx->blk2 = extent.e_lblk;
3657                 pctx->num = extent.e_len;
3658                 pctx->blkcount = extent.e_lblk + extent.e_len;
3659
3660                 if (extent.e_pblk == 0 ||
3661                     extent.e_pblk < ctx->fs->super->s_first_data_block ||
3662                     extent.e_pblk >= ext2fs_blocks_count(ctx->fs->super))
3663                         problem = PR_1_EXTENT_BAD_START_BLK;
3664                 else if (extent.e_lblk < start_block)
3665                         problem = PR_1_OUT_OF_ORDER_EXTENTS;
3666                 else if ((end_block && last_lblk > end_block) &&
3667                          !(last_lblk > eof_block &&
3668                            ((extent.e_flags & EXT2_EXTENT_FLAGS_UNINIT) ||
3669                             (pctx->inode->i_flags & EXT4_VERITY_FL))))
3670                         problem = PR_1_EXTENT_END_OUT_OF_BOUNDS;
3671                 else if (is_leaf && extent.e_len == 0)
3672                         problem = PR_1_EXTENT_LENGTH_ZERO;
3673                 else if (is_leaf &&
3674                          (extent.e_pblk + extent.e_len) >
3675                          ext2fs_blocks_count(ctx->fs->super))
3676                         problem = PR_1_EXTENT_ENDS_BEYOND;
3677                 else if (is_leaf && is_dir && !pctx->inode->i_size_high &&
3678                          !ext2fs_has_feature_largedir(ctx->fs->super) &&
3679                          ((extent.e_lblk + extent.e_len) >
3680                           (1U << (21 - ctx->fs->super->s_log_block_size))))
3681                         problem = PR_1_TOOBIG_DIR;
3682
3683                 if (is_leaf && problem == 0 && extent.e_len > 0) {
3684 #if 0
3685                         printf("extent_region(ino=%u, expect=%llu, "
3686                                "lblk=%llu, len=%u)\n", pb->ino,
3687                                (unsigned long long) pb->next_lblock,
3688                                (unsigned long long) extent.e_lblk,
3689                                extent.e_len);
3690 #endif
3691                         if (extent.e_lblk < pb->next_lblock)
3692                                 problem = PR_1_EXTENT_COLLISION;
3693                         else if (extent.e_lblk + extent.e_len > pb->next_lblock)
3694                                 pb->next_lblock = extent.e_lblk + extent.e_len;
3695                 }
3696
3697                 /*
3698                  * Uninitialized blocks in a directory?  Clear the flag and
3699                  * we'll interpret the blocks later.
3700                  */
3701                 if (try_repairs && is_dir && problem == 0 &&
3702                     (extent.e_flags & EXT2_EXTENT_FLAGS_UNINIT) &&
3703                     fix_problem(ctx, PR_1_UNINIT_DBLOCK, pctx)) {
3704                         extent.e_flags &= ~EXT2_EXTENT_FLAGS_UNINIT;
3705                         pb->inode_modified = 1;
3706                         pctx->errcode = ext2fs_extent_replace(ehandle, 0,
3707                                                               &extent);
3708                         if (pctx->errcode)
3709                                 return;
3710                         failed_csum = 0;
3711                 }
3712 #ifdef CONFIG_DEVELOPER_FEATURES
3713                 if (try_repairs && !is_dir && problem == 0 &&
3714                     (ctx->options & E2F_OPT_CLEAR_UNINIT) &&
3715                     (extent.e_flags & EXT2_EXTENT_FLAGS_UNINIT) &&
3716                     fix_problem(ctx, PR_1_CLEAR_UNINIT_EXTENT, pctx)) {
3717                         extent.e_flags &= ~EXT2_EXTENT_FLAGS_UNINIT;
3718                         pb->inode_modified = 1;
3719                         pctx->errcode = ext2fs_extent_replace(ehandle, 0,
3720                                                               &extent);
3721                         if (pctx->errcode)
3722                                 return;
3723                         failed_csum = 0;
3724                 }
3725 #endif
3726                 if (try_repairs && problem) {
3727 report_problem:
3728                         if (fix_problem(ctx, problem, pctx)) {
3729                                 if (ctx->invalid_bitmaps) {
3730                                         /*
3731                                          * If fsck knows the bitmaps are bad,
3732                                          * skip to the next extent and
3733                                          * try to clear this extent again
3734                                          * after fixing the bitmaps, by
3735                                          * restarting fsck.
3736                                          */
3737                                         pctx->errcode = ext2fs_extent_get(
3738                                                           ehandle,
3739                                                           EXT2_EXTENT_NEXT_SIB,
3740                                                           &extent);
3741                                         ctx->flags |= E2F_FLAG_RESTART_LATER;
3742                                         if (pctx->errcode ==
3743                                                     EXT2_ET_NO_CURRENT_NODE) {
3744                                                 pctx->errcode = 0;
3745                                                 break;
3746                                         }
3747                                         continue;
3748                                 }
3749                                 e2fsck_read_bitmaps(ctx);
3750                                 pb->inode_modified = 1;
3751                                 pctx->errcode =
3752                                         ext2fs_extent_delete(ehandle, 0);
3753                                 if (pctx->errcode) {
3754                                         pctx->str = "ext2fs_extent_delete";
3755                                         return;
3756                                 }
3757                                 pctx->errcode = ext2fs_extent_fix_parents(ehandle);
3758                                 if (pctx->errcode &&
3759                                     pctx->errcode != EXT2_ET_NO_CURRENT_NODE) {
3760                                         pctx->str = "ext2fs_extent_fix_parents";
3761                                         return;
3762                                 }
3763                                 pctx->errcode = ext2fs_extent_get(ehandle,
3764                                                                   EXT2_EXTENT_CURRENT,
3765                                                                   &extent);
3766                                 if (pctx->errcode == EXT2_ET_NO_CURRENT_NODE) {
3767                                         pctx->errcode = 0;
3768                                         break;
3769                                 }
3770                                 failed_csum = 0;
3771                                 continue;
3772                         }
3773                         goto next;
3774                 }
3775
3776                 if (!is_leaf) {
3777                         blk64_t lblk = extent.e_lblk;
3778                         int next_try_repairs = 1;
3779
3780                         blk = extent.e_pblk;
3781
3782                         /*
3783                          * If this lower extent block collides with critical
3784                          * metadata, don't try to repair the damage.  Pass 1b
3785                          * will reallocate the block; then we can try again.
3786                          */
3787                         if (pb->ino != EXT2_RESIZE_INO &&
3788                             extent.e_pblk < ctx->fs->super->s_blocks_count &&
3789                             ext2fs_test_block_bitmap2(ctx->block_metadata_map,
3790                                                       extent.e_pblk)) {
3791                                 next_try_repairs = 0;
3792                                 pctx->blk = blk;
3793                                 fix_problem(ctx,
3794                                             PR_1_CRITICAL_METADATA_COLLISION,
3795                                             pctx);
3796                                 if ((ctx->options & E2F_OPT_NO) == 0)
3797                                         ctx->flags |= E2F_FLAG_RESTART_LATER;
3798                         }
3799                         pctx->errcode = ext2fs_extent_get(ehandle,
3800                                                   EXT2_EXTENT_DOWN, &extent);
3801                         if (pctx->errcode &&
3802                             pctx->errcode != EXT2_ET_EXTENT_CSUM_INVALID) {
3803                                 pctx->str = "EXT2_EXTENT_DOWN";
3804                                 problem = PR_1_EXTENT_HEADER_INVALID;
3805                                 if (!next_try_repairs)
3806                                         return;
3807                                 if (pctx->errcode == EXT2_ET_EXTENT_HEADER_BAD)
3808                                         goto report_problem;
3809                                 return;
3810                         }
3811                         /* The next extent should match this index's logical start */
3812                         if (extent.e_lblk != lblk) {
3813                                 struct ext2_extent_info e_info;
3814
3815                                 pctx->errcode = ext2fs_extent_get_info(ehandle,
3816                                                                        &e_info);
3817                                 if (pctx->errcode) {
3818                                         pctx->str = "ext2fs_extent_get_info";
3819                                         return;
3820                                 }
3821                                 pctx->blk = lblk;
3822                                 pctx->blk2 = extent.e_lblk;
3823                                 pctx->num = e_info.curr_level - 1;
3824                                 problem = PR_1_EXTENT_INDEX_START_INVALID;
3825                                 if (fix_problem(ctx, problem, pctx)) {
3826                                         pb->inode_modified = 1;
3827                                         pctx->errcode =
3828                                                 ext2fs_extent_fix_parents(ehandle);
3829                                         if (pctx->errcode) {
3830                                                 pctx->str = "ext2fs_extent_fix_parents";
3831                                                 return;
3832                                         }
3833                                 }
3834                         }
3835                         scan_extent_node(ctx, pctx, pb, extent.e_lblk,
3836                                          last_lblk, eof_block, ehandle,
3837                                          next_try_repairs);
3838                         if (pctx->errcode)
3839                                 return;
3840                         pctx->errcode = ext2fs_extent_get(ehandle,
3841                                                   EXT2_EXTENT_UP, &extent);
3842                         if (pctx->errcode) {
3843                                 pctx->str = "EXT2_EXTENT_UP";
3844                                 return;
3845                         }
3846                         mark_block_used(ctx, blk);
3847                         pb->num_blocks++;
3848                         goto next;
3849                 }
3850
3851                 if ((pb->previous_block != 0) &&
3852                     (pb->previous_block+1 != extent.e_pblk)) {
3853                         if (ctx->options & E2F_OPT_FRAGCHECK) {
3854                                 char type = '?';
3855
3856                                 if (pb->is_dir)
3857                                         type = 'd';
3858                                 else if (pb->is_reg)
3859                                         type = 'f';
3860
3861                                 printf(("%6lu(%c): expecting %6lu "
3862                                         "actual extent "
3863                                         "phys %6lu log %lu len %lu\n"),
3864                                        (unsigned long) pctx->ino, type,
3865                                        (unsigned long) pb->previous_block+1,
3866                                        (unsigned long) extent.e_pblk,
3867                                        (unsigned long) extent.e_lblk,
3868                                        (unsigned long) extent.e_len);
3869                         }
3870                         pb->fragmented = 1;
3871                 }
3872                 /*
3873                  * If we notice a gap in the logical block mappings of an
3874                  * extent-mapped directory, offer to close the hole by
3875                  * moving the logical block down, otherwise we'll go mad in
3876                  * pass 3 allocating empty directory blocks to fill the hole.
3877                  */
3878                 if (try_repairs && is_dir &&
3879                     pb->last_block + 1 < extent.e_lblk) {
3880                         blk64_t new_lblk;
3881
3882                         new_lblk = pb->last_block + 1;
3883                         if (EXT2FS_CLUSTER_RATIO(ctx->fs) > 1)
3884                                 new_lblk = ((new_lblk +
3885                                              EXT2FS_CLUSTER_RATIO(ctx->fs) - 1) &
3886                                             ~EXT2FS_CLUSTER_MASK(ctx->fs)) |
3887                                            (extent.e_pblk &
3888                                             EXT2FS_CLUSTER_MASK(ctx->fs));
3889                         pctx->blk = extent.e_lblk;
3890                         pctx->blk2 = new_lblk;
3891                         if (fix_problem(ctx, PR_1_COLLAPSE_DBLOCK, pctx)) {
3892                                 extent.e_lblk = new_lblk;
3893                                 pb->inode_modified = 1;
3894                                 pctx->errcode = ext2fs_extent_replace(ehandle,
3895                                                                 0, &extent);
3896                                 if (pctx->errcode) {
3897                                         pctx->errcode = 0;
3898                                         goto alloc_later;
3899                                 }
3900                                 pctx->errcode = ext2fs_extent_fix_parents(ehandle);
3901                                 if (pctx->errcode)
3902                                         goto failed_add_dir_block;
3903                                 pctx->errcode = ext2fs_extent_goto(ehandle,
3904                                                                 extent.e_lblk);
3905                                 if (pctx->errcode)
3906                                         goto failed_add_dir_block;
3907                                 last_lblk = extent.e_lblk + extent.e_len - 1;
3908                                 failed_csum = 0;
3909                         }
3910                 }
3911 alloc_later:
3912                 if (is_dir) {
3913                         while (++pb->last_db_block <
3914                                (e2_blkcnt_t) extent.e_lblk) {
3915                                 pctx->errcode = ext2fs_add_dir_block2(
3916                                                         ctx->fs->dblist,
3917                                                         pb->ino, 0,
3918                                                         pb->last_db_block);
3919                                 if (pctx->errcode) {
3920                                         pctx->blk = 0;
3921                                         pctx->num = pb->last_db_block;
3922                                         goto failed_add_dir_block;
3923                                 }
3924                         }
3925
3926                         for (i = 0; i < extent.e_len; i++) {
3927                                 pctx->errcode = ext2fs_add_dir_block2(
3928                                                         ctx->fs->dblist,
3929                                                         pctx->ino,
3930                                                         extent.e_pblk + i,
3931                                                         extent.e_lblk + i);
3932                                 if (pctx->errcode) {
3933                                         pctx->blk = extent.e_pblk + i;
3934                                         pctx->num = extent.e_lblk + i;
3935                                 failed_add_dir_block:
3936                                         fix_problem(ctx, PR_1_ADD_DBLOCK, pctx);
3937                                         /* Should never get here */
3938                                         ctx->flags |= E2F_FLAG_ABORT;
3939                                         return;
3940                                 }
3941                         }
3942                         if (extent.e_len > 0)
3943                                 pb->last_db_block = extent.e_lblk + extent.e_len - 1;
3944                 }
3945                 if (has_unaligned_cluster_map(ctx, pb->previous_block,
3946                                               pb->last_block,
3947                                               extent.e_pblk,
3948                                               extent.e_lblk)) {
3949                         for (i = 0; i < extent.e_len; i++) {
3950                                 pctx->blk = extent.e_lblk + i;
3951                                 pctx->blk2 = extent.e_pblk + i;
3952                                 fix_problem(ctx, PR_1_MISALIGNED_CLUSTER, pctx);
3953                                 mark_block_used(ctx, extent.e_pblk + i);
3954                                 mark_block_used(ctx, extent.e_pblk + i);
3955                         }
3956                 }
3957
3958                 /*
3959                  * Check whether first cluster got marked in previous iteration.
3960                  */
3961                 if (ctx->fs->cluster_ratio_bits &&
3962                     pb->previous_block &&
3963                     (EXT2FS_B2C(ctx->fs, extent.e_pblk) ==
3964                      EXT2FS_B2C(ctx->fs, pb->previous_block)))
3965                         /* Set blk to the beginning of next cluster. */
3966                         blk = EXT2FS_C2B(
3967                                 ctx->fs,
3968                                 EXT2FS_B2C(ctx->fs, extent.e_pblk) + 1);
3969                 else
3970                         /* Set blk to the beginning of current cluster. */
3971                         blk = EXT2FS_C2B(ctx->fs,
3972                                          EXT2FS_B2C(ctx->fs, extent.e_pblk));
3973
3974                 if (blk < extent.e_pblk + extent.e_len) {
3975                         mark_blocks_used(ctx, blk,
3976                                          extent.e_pblk + extent.e_len - blk);
3977                         n = DIV_ROUND_UP(extent.e_pblk + extent.e_len - blk,
3978                                          EXT2FS_CLUSTER_RATIO(ctx->fs));
3979                         pb->num_blocks += n;
3980                 }
3981                 pb->last_block = extent.e_lblk + extent.e_len - 1;
3982                 pb->previous_block = extent.e_pblk + extent.e_len - 1;
3983                 start_block = pb->last_block = last_lblk;
3984                 if (is_leaf && !is_dir &&
3985                     !(extent.e_flags & EXT2_EXTENT_FLAGS_UNINIT))
3986                         pb->last_init_lblock = last_lblk;
3987         next:
3988                 pctx->errcode = ext2fs_extent_get(ehandle,
3989                                                   EXT2_EXTENT_NEXT_SIB,
3990                                                   &extent);
3991         }
3992
3993         /* Failed csum but passes checks?  Ask to fix checksum. */
3994         if (failed_csum &&
3995             fix_problem(ctx, PR_1_EXTENT_ONLY_CSUM_INVALID, pctx)) {
3996                 pb->inode_modified = 1;
3997                 pctx->errcode = ext2fs_extent_replace(ehandle, 0, &extent);
3998                 if (pctx->errcode)
3999                         return;
4000         }
4001
4002         if (pctx->errcode == EXT2_ET_EXTENT_NO_NEXT)
4003                 pctx->errcode = 0;
4004 }
4005
4006 static void check_blocks_extents(e2fsck_t ctx, struct problem_context *pctx,
4007                                  struct process_block_struct *pb)
4008 {
4009         struct ext2_extent_info info;
4010         struct ext2_inode       *inode = pctx->inode;
4011         ext2_extent_handle_t    ehandle;
4012         ext2_filsys             fs = ctx->fs;
4013         ext2_ino_t              ino = pctx->ino;
4014         errcode_t               retval;
4015         blk64_t                 eof_lblk;
4016         struct ext3_extent_header       *eh;
4017
4018         /* Check for a proper extent header... */
4019         eh = (struct ext3_extent_header *) &inode->i_block[0];
4020         retval = ext2fs_extent_header_verify(eh, sizeof(inode->i_block));
4021         if (retval) {
4022                 if (fix_problem(ctx, PR_1_MISSING_EXTENT_HEADER, pctx))
4023                         e2fsck_clear_inode(ctx, ino, inode, 0,
4024                                            "check_blocks_extents");
4025                 pctx->errcode = 0;
4026                 return;
4027         }
4028
4029         /* ...since this function doesn't fail if i_block is zeroed. */
4030         pctx->errcode = ext2fs_extent_open2(fs, ino, inode, &ehandle);
4031         if (pctx->errcode) {
4032                 if (fix_problem(ctx, PR_1_READ_EXTENT, pctx))
4033                         e2fsck_clear_inode(ctx, ino, inode, 0,
4034                                            "check_blocks_extents");
4035                 pctx->errcode = 0;
4036                 return;
4037         }
4038
4039         retval = ext2fs_extent_get_info(ehandle, &info);
4040         if (retval == 0) {
4041                 int max_depth = info.max_depth;
4042
4043                 if (max_depth >= MAX_EXTENT_DEPTH_COUNT)
4044                         max_depth = MAX_EXTENT_DEPTH_COUNT-1;
4045                 ctx->extent_depth_count[max_depth]++;
4046         }
4047
4048         /* Check maximum extent depth */
4049         pctx->blk = info.max_depth;
4050         pctx->blk2 = ext2fs_max_extent_depth(ehandle);
4051         if (pctx->blk2 < pctx->blk &&
4052             fix_problem(ctx, PR_1_EXTENT_BAD_MAX_DEPTH, pctx))
4053                 pb->eti.force_rebuild = 1;
4054
4055         /* Can we collect extent tree level stats? */
4056         pctx->blk = MAX_EXTENT_DEPTH_COUNT;
4057         if (pctx->blk2 > pctx->blk)
4058                 fix_problem(ctx, PR_1E_MAX_EXTENT_TREE_DEPTH, pctx);
4059         memset(pb->eti.ext_info, 0, sizeof(pb->eti.ext_info));
4060         pb->eti.ino = pb->ino;
4061
4062         pb->next_lblock = 0;
4063
4064         eof_lblk = ((EXT2_I_SIZE(inode) + fs->blocksize - 1) >>
4065                 EXT2_BLOCK_SIZE_BITS(fs->super)) - 1;
4066         scan_extent_node(ctx, pctx, pb, 0, 0, eof_lblk, ehandle, 1);
4067         if (pctx->errcode &&
4068             fix_problem(ctx, PR_1_EXTENT_ITERATE_FAILURE, pctx)) {
4069                 pb->num_blocks = 0;
4070                 inode->i_blocks = 0;
4071                 e2fsck_clear_inode(ctx, ino, inode, E2F_FLAG_RESTART,
4072                                    "check_blocks_extents");
4073                 pctx->errcode = 0;
4074         }
4075         ext2fs_extent_free(ehandle);
4076
4077         /* Rebuild unless it's a dir and we're rehashing it */
4078         if (LINUX_S_ISDIR(inode->i_mode) &&
4079             e2fsck_dir_will_be_rehashed(ctx, ino))
4080                 return;
4081
4082         if (ctx->options & E2F_OPT_CONVERT_BMAP)
4083                 e2fsck_rebuild_extents_later(ctx, ino);
4084         else
4085                 e2fsck_should_rebuild_extents(ctx, pctx, &pb->eti, &info);
4086 }
4087
4088 /*
4089  * In fact we don't need to check blocks for an inode with inline data
4090  * because this inode doesn't have any blocks.  In this function all
4091  * we need to do is add this inode into dblist when it is a directory.
4092  */
4093 static void check_blocks_inline_data(e2fsck_t ctx, struct problem_context *pctx,
4094                                      struct process_block_struct *pb)
4095 {
4096         int     flags;
4097         size_t  inline_data_size = 0;
4098
4099         if (!pb->is_dir) {
4100                 pctx->errcode = 0;
4101                 return;
4102         }
4103
4104         /* Process the dirents in i_block[] as the "first" block. */
4105         pctx->errcode = ext2fs_add_dir_block2(ctx->fs->dblist, pb->ino, 0, 0);
4106         if (pctx->errcode)
4107                 goto err;
4108
4109         /* Process the dirents in the EA as a "second" block. */
4110         flags = ctx->fs->flags;
4111         ctx->fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
4112         pctx->errcode = ext2fs_inline_data_size(ctx->fs, pb->ino,
4113                                                 &inline_data_size);
4114         ctx->fs->flags = (flags & EXT2_FLAG_IGNORE_CSUM_ERRORS) |
4115                          (ctx->fs->flags & ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
4116         if (pctx->errcode) {
4117                 pctx->errcode = 0;
4118                 return;
4119         }
4120
4121         if (inline_data_size <= EXT4_MIN_INLINE_DATA_SIZE)
4122                 return;
4123
4124         pctx->errcode = ext2fs_add_dir_block2(ctx->fs->dblist, pb->ino, 0, 1);
4125         if (pctx->errcode)
4126                 goto err;
4127
4128         return;
4129 err:
4130         pctx->blk = 0;
4131         pctx->num = 0;
4132         fix_problem(ctx, PR_1_ADD_DBLOCK, pctx);
4133         ctx->flags |= E2F_FLAG_ABORT;
4134 }
4135
4136 /*
4137  * This subroutine is called on each inode to account for all of the
4138  * blocks used by that inode.
4139  */
4140 static void check_blocks(e2fsck_t ctx, struct problem_context *pctx,
4141                          char *block_buf, const struct ea_quota *ea_ibody_quota)
4142 {
4143         ext2_filsys fs = ctx->fs;
4144         struct process_block_struct pb;
4145         ext2_ino_t      ino = pctx->ino;
4146         struct ext2_inode *inode = pctx->inode;
4147         unsigned        bad_size = 0;
4148         int             dirty_inode = 0;
4149         int             extent_fs;
4150         int             inlinedata_fs;
4151         __u64           size;
4152         struct ea_quota ea_block_quota;
4153
4154         pb.ino = ino;
4155         pb.num_blocks = EXT2FS_B2C(ctx->fs,
4156                                    ea_ibody_quota ? ea_ibody_quota->blocks : 0);
4157         pb.last_block = ~0;
4158         pb.last_init_lblock = -1;
4159         pb.last_db_block = -1;
4160         pb.num_illegal_blocks = 0;
4161         pb.suppress = 0; pb.clear = 0;
4162         pb.fragmented = 0;
4163         pb.compressed = 0;
4164         pb.previous_block = 0;
4165         pb.is_dir = LINUX_S_ISDIR(inode->i_mode);
4166         pb.is_reg = LINUX_S_ISREG(inode->i_mode);
4167         pb.max_blocks = 1U << (31 - fs->super->s_log_block_size);
4168         pb.inode = inode;
4169         pb.pctx = pctx;
4170         pb.ctx = ctx;
4171         pb.inode_modified = 0;
4172         pb.eti.force_rebuild = 0;
4173         pctx->ino = ino;
4174         pctx->errcode = 0;
4175
4176         extent_fs = ext2fs_has_feature_extents(ctx->fs->super);
4177         inlinedata_fs = ext2fs_has_feature_inline_data(ctx->fs->super);
4178
4179         if (check_ext_attr(ctx, pctx, block_buf, &ea_block_quota)) {
4180                 if (e2fsck_should_abort(ctx))
4181                         goto out;
4182                 pb.num_blocks += EXT2FS_B2C(ctx->fs, ea_block_quota.blocks);
4183         }
4184
4185         if (inlinedata_fs && (inode->i_flags & EXT4_INLINE_DATA_FL))
4186                 check_blocks_inline_data(ctx, pctx, &pb);
4187         else if (ext2fs_inode_has_valid_blocks2(fs, inode)) {
4188                 if (extent_fs && (inode->i_flags & EXT4_EXTENTS_FL))
4189                         check_blocks_extents(ctx, pctx, &pb);
4190                 else {
4191                         int flags;
4192                         /*
4193                          * If we've modified the inode, write it out before
4194                          * iterate() tries to use it.
4195                          */
4196                         if (dirty_inode) {
4197                                 e2fsck_write_inode(ctx, ino, inode,
4198                                                    "check_blocks");
4199                                 dirty_inode = 0;
4200                         }
4201                         flags = fs->flags;
4202                         fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
4203                         pctx->errcode = ext2fs_block_iterate3(fs, ino,
4204                                                 pb.is_dir ? BLOCK_FLAG_HOLE : 0,
4205                                                 block_buf, process_block, &pb);
4206                         /*
4207                          * We do not have uninitialized extents in non extent
4208                          * files.
4209                          */
4210                         pb.last_init_lblock = pb.last_block;
4211                         /*
4212                          * If iterate() changed a block mapping, we have to
4213                          * re-read the inode.  If we decide to clear the
4214                          * inode after clearing some stuff, we'll re-write the
4215                          * bad mappings into the inode!
4216                          */
4217                         if (pb.inode_modified)
4218                                 e2fsck_read_inode(ctx, ino, inode,
4219                                                   "check_blocks");
4220                         fs->flags = (flags & EXT2_FLAG_IGNORE_CSUM_ERRORS) |
4221                                     (fs->flags & ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
4222
4223                         if (ctx->options & E2F_OPT_CONVERT_BMAP) {
4224 #ifdef DEBUG
4225                                 printf("bmap rebuild ino=%d\n", ino);
4226 #endif
4227                                 if (!LINUX_S_ISDIR(inode->i_mode) ||
4228                                     !e2fsck_dir_will_be_rehashed(ctx, ino))
4229                                         e2fsck_rebuild_extents_later(ctx, ino);
4230                         }
4231                 }
4232         }
4233         end_problem_latch(ctx, PR_LATCH_BLOCK);
4234         end_problem_latch(ctx, PR_LATCH_TOOBIG);
4235         if (e2fsck_should_abort(ctx))
4236                 goto out;
4237         if (pctx->errcode)
4238                 fix_problem(ctx, PR_1_BLOCK_ITERATE, pctx);
4239
4240         if (pb.fragmented && pb.num_blocks < fs->super->s_blocks_per_group) {
4241                 if (LINUX_S_ISDIR(inode->i_mode))
4242                         ctx->fs_fragmented_dir++;
4243                 else
4244                         ctx->fs_fragmented++;
4245         }
4246
4247         if (pb.clear) {
4248                 e2fsck_clear_inode(ctx, ino, inode, E2F_FLAG_RESTART,
4249                                    "check_blocks");
4250                 return;
4251         }
4252
4253         if (inode->i_flags & EXT2_INDEX_FL) {
4254                 if (handle_htree(ctx, pctx, ino, inode, block_buf)) {
4255                         inode->i_flags &= ~EXT2_INDEX_FL;
4256                         dirty_inode++;
4257                 } else {
4258                         e2fsck_add_dx_dir(ctx, ino, inode, pb.last_block+1);
4259                 }
4260         }
4261
4262         if (!pb.num_blocks && pb.is_dir &&
4263             !(inode->i_flags & EXT4_INLINE_DATA_FL)) {
4264                 if (fix_problem(ctx, PR_1_ZERO_LENGTH_DIR, pctx)) {
4265                         e2fsck_clear_inode(ctx, ino, inode, 0, "check_blocks");
4266                         ctx->fs_directory_count--;
4267                         return;
4268                 }
4269         }
4270
4271         if (ino != quota_type2inum(PRJQUOTA, fs->super) &&
4272             (ino == EXT2_ROOT_INO || ino >= EXT2_FIRST_INODE(ctx->fs->super)) &&
4273             !(inode->i_flags & EXT4_EA_INODE_FL)) {
4274                 quota_data_add(ctx->qctx, (struct ext2_inode_large *) inode,
4275                                ino,
4276                                pb.num_blocks * EXT2_CLUSTER_SIZE(fs->super));
4277                 quota_data_inodes(ctx->qctx, (struct ext2_inode_large *) inode,
4278                                   ino, (ea_ibody_quota ?
4279                                         ea_ibody_quota->inodes : 0) +
4280                                                 ea_block_quota.inodes + 1);
4281         }
4282
4283         if (!ext2fs_has_feature_huge_file(fs->super) ||
4284             !(inode->i_flags & EXT4_HUGE_FILE_FL))
4285                 pb.num_blocks *= (fs->blocksize / 512);
4286         pb.num_blocks *= EXT2FS_CLUSTER_RATIO(fs);
4287 #if 0
4288         printf("inode %u, i_size = %u, last_block = %llu, i_blocks=%llu, num_blocks = %llu\n",
4289                ino, inode->i_size, (unsigned long long) pb.last_block,
4290                (unsigned long long) ext2fs_inode_i_blocks(fs, inode),
4291                (unsigned long long) pb.num_blocks);
4292 #endif
4293         size = EXT2_I_SIZE(inode);
4294         if (pb.is_dir) {
4295                 unsigned nblock = size >> EXT2_BLOCK_SIZE_BITS(fs->super);
4296                 if (inode->i_flags & EXT4_INLINE_DATA_FL) {
4297                         int flags;
4298                         size_t sz = 0;
4299                         errcode_t err;
4300
4301                         flags = ctx->fs->flags;
4302                         ctx->fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
4303                         err = ext2fs_inline_data_size(ctx->fs, pctx->ino,
4304                                                       &sz);
4305                         ctx->fs->flags = (flags &
4306                                           EXT2_FLAG_IGNORE_CSUM_ERRORS) |
4307                                          (ctx->fs->flags &
4308                                           ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
4309                         if (err || sz != size) {
4310                                 bad_size = 7;
4311                                 pctx->num = sz;
4312                         }
4313                 } else if (size & (fs->blocksize - 1))
4314                         bad_size = 5;
4315                 else if (nblock > (pb.last_block + 1))
4316                         bad_size = 1;
4317                 else if (nblock < (pb.last_block + 1)) {
4318                         if (((pb.last_block + 1) - nblock) >
4319                             fs->super->s_prealloc_dir_blocks)
4320                                 bad_size = 2;
4321                 }
4322         } else {
4323                 if ((pb.last_init_lblock >= 0) &&
4324                     /* Do not allow initialized allocated blocks past i_size*/
4325                     (size < (__u64)pb.last_init_lblock * fs->blocksize) &&
4326                     !(inode->i_flags & EXT4_VERITY_FL))
4327                         bad_size = 3;
4328                 else if (!(extent_fs && (inode->i_flags & EXT4_EXTENTS_FL)) &&
4329                          size > ext2_max_sizes[fs->super->s_log_block_size])
4330                         /* too big for a direct/indirect-mapped file */
4331                         bad_size = 4;
4332                 else if ((extent_fs && (inode->i_flags & EXT4_EXTENTS_FL)) &&
4333                          size >
4334                          ((1ULL << (32 + EXT2_BLOCK_SIZE_BITS(fs->super))) - 1))
4335                         /* too big for an extent-based file - 32bit ee_block */
4336                         bad_size = 6;
4337         }
4338         /* i_size for symlinks is checked elsewhere */
4339         if (bad_size && !LINUX_S_ISLNK(inode->i_mode)) {
4340                 /* Did inline_data set pctx->num earlier? */
4341                 if (bad_size != 7)
4342                         pctx->num = (pb.last_block + 1) * fs->blocksize;
4343                 pctx->group = bad_size;
4344                 if (fix_problem(ctx, PR_1_BAD_I_SIZE, pctx)) {
4345                         ext2fs_inode_size_set(fs, inode, pctx->num);
4346                         if (EXT2_I_SIZE(inode) == 0 &&
4347                             (inode->i_flags & EXT4_INLINE_DATA_FL)) {
4348                                 memset(inode->i_block, 0,
4349                                        sizeof(inode->i_block));
4350                                 inode->i_flags &= ~EXT4_INLINE_DATA_FL;
4351                         }
4352                         dirty_inode++;
4353                 }
4354                 pctx->num = 0;
4355         }
4356         if (LINUX_S_ISREG(inode->i_mode) &&
4357             ext2fs_needs_large_file_feature(EXT2_I_SIZE(inode)))
4358                 ctx->large_files++;
4359         if ((fs->super->s_creator_os != EXT2_OS_HURD) &&
4360             ((pb.num_blocks != ext2fs_inode_i_blocks(fs, inode)) ||
4361              (ext2fs_has_feature_huge_file(fs->super) &&
4362               (inode->i_flags & EXT4_HUGE_FILE_FL) &&
4363               (inode->osd2.linux2.l_i_blocks_hi != 0)))) {
4364                 pctx->num = pb.num_blocks;
4365                 if (fix_problem(ctx, PR_1_BAD_I_BLOCKS, pctx)) {
4366                         inode->i_blocks = pb.num_blocks;
4367                         inode->osd2.linux2.l_i_blocks_hi = pb.num_blocks >> 32;
4368                         dirty_inode++;
4369                 }
4370                 pctx->num = 0;
4371         }
4372
4373         /*
4374          * The kernel gets mad if we ask it to allocate bigalloc clusters to
4375          * a block mapped file, so rebuild it as an extent file.  We can skip
4376          * symlinks because they're never rewritten.
4377          */
4378         if (ext2fs_has_feature_bigalloc(fs->super) &&
4379             (LINUX_S_ISREG(inode->i_mode) || LINUX_S_ISDIR(inode->i_mode)) &&
4380             ext2fs_inode_data_blocks2(fs, inode) > 0 &&
4381             (ino == EXT2_ROOT_INO || ino >= EXT2_FIRST_INO(fs->super)) &&
4382             !(inode->i_flags & (EXT4_EXTENTS_FL | EXT4_INLINE_DATA_FL)) &&
4383             fix_problem(ctx, PR_1_NO_BIGALLOC_BLOCKMAP_FILES, pctx)) {
4384                 pctx->errcode = e2fsck_rebuild_extents_later(ctx, ino);
4385                 if (pctx->errcode)
4386                         goto out;
4387         }
4388
4389         if (ctx->dirs_to_hash && pb.is_dir &&
4390             !(ctx->lost_and_found && ctx->lost_and_found == ino) &&
4391             !(inode->i_flags & EXT2_INDEX_FL) &&
4392             ((inode->i_size / fs->blocksize) >= 3))
4393                 e2fsck_rehash_dir_later(ctx, ino);
4394
4395 out:
4396         if (dirty_inode)
4397                 e2fsck_write_inode(ctx, ino, inode, "check_blocks");
4398 }
4399
4400 #if 0
4401 /*
4402  * Helper function called by process block when an illegal block is
4403  * found.  It returns a description about why the block is illegal
4404  */
4405 static char *describe_illegal_block(ext2_filsys fs, blk64_t block)
4406 {
4407         blk64_t super;
4408         int     i;
4409         static char     problem[80];
4410
4411         super = fs->super->s_first_data_block;
4412         strcpy(problem, "PROGRAMMING ERROR: Unknown reason for illegal block");
4413         if (block < super) {
4414                 sprintf(problem, "< FIRSTBLOCK (%u)", super);
4415                 return(problem);
4416         } else if (block >= ext2fs_blocks_count(fs->super)) {
4417                 sprintf(problem, "> BLOCKS (%u)", ext2fs_blocks_count(fs->super));
4418                 return(problem);
4419         }
4420         for (i = 0; i < fs->group_desc_count; i++) {
4421                 if (block == super) {
4422                         sprintf(problem, "is the superblock in group %d", i);
4423                         break;
4424                 }
4425                 if (block > super &&
4426                     block <= (super + fs->desc_blocks)) {
4427                         sprintf(problem, "is in the group descriptors "
4428                                 "of group %d", i);
4429                         break;
4430                 }
4431                 if (block == ext2fs_block_bitmap_loc(fs, i)) {
4432                         sprintf(problem, "is the block bitmap of group %d", i);
4433                         break;
4434                 }
4435                 if (block == ext2fs_inode_bitmap_loc(fs, i)) {
4436                         sprintf(problem, "is the inode bitmap of group %d", i);
4437                         break;
4438                 }
4439                 if (block >= ext2fs_inode_table_loc(fs, i) &&
4440                     (block < ext2fs_inode_table_loc(fs, i)
4441                      + fs->inode_blocks_per_group)) {
4442                         sprintf(problem, "is in the inode table of group %d",
4443                                 i);
4444                         break;
4445                 }
4446                 super += fs->super->s_blocks_per_group;
4447         }
4448         return(problem);
4449 }
4450 #endif
4451
4452 /*
4453  * This is a helper function for check_blocks().
4454  */
4455 static int process_block(ext2_filsys fs,
4456                   blk64_t       *block_nr,
4457                   e2_blkcnt_t blockcnt,
4458                   blk64_t ref_block EXT2FS_ATTR((unused)),
4459                   int ref_offset EXT2FS_ATTR((unused)),
4460                   void *priv_data)
4461 {
4462         struct process_block_struct *p;
4463         struct problem_context *pctx;
4464         blk64_t blk = *block_nr;
4465         int     ret_code = 0;
4466         problem_t       problem = 0;
4467         e2fsck_t        ctx;
4468
4469         p = (struct process_block_struct *) priv_data;
4470         pctx = p->pctx;
4471         ctx = p->ctx;
4472
4473         /*
4474          * For a directory, add logical block zero for processing even if it's
4475          * not mapped or we'll be perennially stuck with broken "." and ".."
4476          * entries.
4477          */
4478         if (p->is_dir && blockcnt == 0 && blk == 0) {
4479                 pctx->errcode = ext2fs_add_dir_block2(fs->dblist, p->ino, 0, 0);
4480                 if (pctx->errcode) {
4481                         pctx->blk = blk;
4482                         pctx->num = blockcnt;
4483                         goto failed_add_dir_block;
4484                 }
4485                 p->last_db_block++;
4486         }
4487
4488         if (blk == 0)
4489                 return 0;
4490
4491 #if 0
4492         printf("Process_block, inode %lu, block %u, #%d\n", p->ino, blk,
4493                blockcnt);
4494 #endif
4495
4496         /*
4497          * Simplistic fragmentation check.  We merely require that the
4498          * file be contiguous.  (Which can never be true for really
4499          * big files that are greater than a block group.)
4500          */
4501         if (p->previous_block && p->ino != EXT2_RESIZE_INO) {
4502                 if (p->previous_block+1 != blk) {
4503                         if (ctx->options & E2F_OPT_FRAGCHECK) {
4504                                 char type = '?';
4505
4506                                 if (p->is_dir)
4507                                         type = 'd';
4508                                 else if (p->is_reg)
4509                                         type = 'f';
4510
4511                                 printf(_("%6lu(%c): expecting %6lu "
4512                                          "got phys %6lu (blkcnt %lld)\n"),
4513                                        (unsigned long) pctx->ino, type,
4514                                        (unsigned long) p->previous_block+1,
4515                                        (unsigned long) blk,
4516                                        (long long) blockcnt);
4517                         }
4518                         p->fragmented = 1;
4519                 }
4520         }
4521
4522         if (p->is_dir && !ext2fs_has_feature_largedir(fs->super) &&
4523             !pctx->inode->i_size_high &&
4524             blockcnt > (1 << (21 - fs->super->s_log_block_size)))
4525                 problem = PR_1_TOOBIG_DIR;
4526         if (p->is_dir && p->num_blocks + 1 >= p->max_blocks)
4527                 problem = PR_1_TOOBIG_DIR;
4528         if (p->is_reg && p->num_blocks + 1 >= p->max_blocks)
4529                 problem = PR_1_TOOBIG_REG;
4530         if (!p->is_dir && !p->is_reg && blockcnt > 0)
4531                 problem = PR_1_TOOBIG_SYMLINK;
4532
4533         if (blk < fs->super->s_first_data_block ||
4534             blk >= ext2fs_blocks_count(fs->super))
4535                 problem = PR_1_ILLEGAL_BLOCK_NUM;
4536
4537         /*
4538          * If this IND/DIND/TIND block is squatting atop some critical metadata
4539          * (group descriptors, superblock, bitmap, inode table), any write to
4540          * "fix" mapping problems will destroy the metadata.  We'll let pass 1b
4541          * fix that and restart fsck.
4542          */
4543         if (blockcnt < 0 &&
4544             p->ino != EXT2_RESIZE_INO &&
4545             blk < ctx->fs->super->s_blocks_count &&
4546             ext2fs_test_block_bitmap2(ctx->block_metadata_map, blk)) {
4547                 pctx->blk = blk;
4548                 fix_problem(ctx, PR_1_CRITICAL_METADATA_COLLISION, pctx);
4549                 if ((ctx->options & E2F_OPT_NO) == 0)
4550                         ctx->flags |= E2F_FLAG_RESTART_LATER;
4551         }
4552
4553         if (problem) {
4554                 p->num_illegal_blocks++;
4555                 /*
4556                  * A bit of subterfuge here -- we're trying to fix a block
4557                  * mapping, but the IND/DIND/TIND block could have collided
4558                  * with some critical metadata.  So, fix the in-core mapping so
4559                  * iterate won't go insane, but return 0 instead of
4560                  * BLOCK_CHANGED so that it won't write the remapping out to
4561                  * our multiply linked block.
4562                  *
4563                  * Even if we previously determined that an *IND block
4564                  * conflicts with critical metadata, we must still try to
4565                  * iterate the *IND block as if it is an *IND block to find and
4566                  * mark the blocks it points to.  Better to be overly cautious
4567                  * with the used_blocks map so that we don't move the *IND
4568                  * block to a block that's really in use!
4569                  */
4570                 if (p->ino != EXT2_RESIZE_INO &&
4571                     ref_block != 0 &&
4572                     ext2fs_test_block_bitmap2(ctx->block_metadata_map,
4573                                               ref_block)) {
4574                         *block_nr = 0;
4575                         return 0;
4576                 }
4577                 if (!p->suppress && (p->num_illegal_blocks % 12) == 0) {
4578                         if (fix_problem(ctx, PR_1_TOO_MANY_BAD_BLOCKS, pctx)) {
4579                                 p->clear = 1;
4580                                 return BLOCK_ABORT;
4581                         }
4582                         if (fix_problem(ctx, PR_1_SUPPRESS_MESSAGES, pctx)) {
4583                                 p->suppress = 1;
4584                                 set_latch_flags(PR_LATCH_BLOCK,
4585                                                 PRL_SUPPRESS, 0);
4586                         }
4587                 }
4588                 pctx->blk = blk;
4589                 pctx->blkcount = blockcnt;
4590                 if (fix_problem(ctx, problem, pctx)) {
4591                         blk = *block_nr = 0;
4592                         ret_code = BLOCK_CHANGED;
4593                         p->inode_modified = 1;
4594                         /*
4595                          * If the directory block is too big and is beyond the
4596                          * end of the FS, don't bother trying to add it for
4597                          * processing -- the kernel would never have created a
4598                          * directory this large, and we risk an ENOMEM abort.
4599                          * In any case, the toobig handler for extent-based
4600                          * directories also doesn't feed toobig blocks to
4601                          * pass 2.
4602                          */
4603                         if (problem == PR_1_TOOBIG_DIR)
4604                                 return ret_code;
4605                         goto mark_dir;
4606                 } else
4607                         return 0;
4608         }
4609
4610         if (p->ino == EXT2_RESIZE_INO) {
4611                 /*
4612                  * The resize inode has already be sanity checked
4613                  * during pass #0 (the superblock checks).  All we
4614                  * have to do is mark the double indirect block as
4615                  * being in use; all of the other blocks are handled
4616                  * by mark_table_blocks()).
4617                  */
4618                 if (blockcnt == BLOCK_COUNT_DIND)
4619                         mark_block_used(ctx, blk);
4620                 p->num_blocks++;
4621         } else if (!(ctx->fs->cluster_ratio_bits &&
4622                      p->previous_block &&
4623                      (EXT2FS_B2C(ctx->fs, blk) ==
4624                       EXT2FS_B2C(ctx->fs, p->previous_block)) &&
4625                      (blk & EXT2FS_CLUSTER_MASK(ctx->fs)) ==
4626                      ((unsigned) blockcnt & EXT2FS_CLUSTER_MASK(ctx->fs)))) {
4627                 mark_block_used(ctx, blk);
4628                 p->num_blocks++;
4629         } else if (has_unaligned_cluster_map(ctx, p->previous_block,
4630                                              p->last_block, blk, blockcnt)) {
4631                 pctx->blk = blockcnt;
4632                 pctx->blk2 = blk;
4633                 fix_problem(ctx, PR_1_MISALIGNED_CLUSTER, pctx);
4634                 mark_block_used(ctx, blk);
4635                 mark_block_used(ctx, blk);
4636         }
4637         if (blockcnt >= 0)
4638                 p->last_block = blockcnt;
4639         p->previous_block = blk;
4640 mark_dir:
4641         if (p->is_dir && (blockcnt >= 0)) {
4642                 while (++p->last_db_block < blockcnt) {
4643                         pctx->errcode = ext2fs_add_dir_block2(fs->dblist,
4644                                                               p->ino, 0,
4645                                                               p->last_db_block);
4646                         if (pctx->errcode) {
4647                                 pctx->blk = 0;
4648                                 pctx->num = p->last_db_block;
4649                                 goto failed_add_dir_block;
4650                         }
4651                 }
4652                 pctx->errcode = ext2fs_add_dir_block2(fs->dblist, p->ino,
4653                                                       blk, blockcnt);
4654                 if (pctx->errcode) {
4655                         pctx->blk = blk;
4656                         pctx->num = blockcnt;
4657                 failed_add_dir_block:
4658                         fix_problem(ctx, PR_1_ADD_DBLOCK, pctx);
4659                         /* Should never get here */
4660                         ctx->flags |= E2F_FLAG_ABORT;
4661                         return BLOCK_ABORT;
4662                 }
4663         }
4664         return ret_code;
4665 }
4666
4667 static int process_bad_block(ext2_filsys fs,
4668                       blk64_t *block_nr,
4669                       e2_blkcnt_t blockcnt,
4670                       blk64_t ref_block EXT2FS_ATTR((unused)),
4671                       int ref_offset EXT2FS_ATTR((unused)),
4672                       void *priv_data)
4673 {
4674         struct process_block_struct *p;
4675         blk64_t         blk = *block_nr;
4676         blk64_t         first_block;
4677         dgrp_t          i;
4678         struct problem_context *pctx;
4679         e2fsck_t        ctx;
4680
4681         if (!blk)
4682                 return 0;
4683
4684         p = (struct process_block_struct *) priv_data;
4685         ctx = p->ctx;
4686         pctx = p->pctx;
4687
4688         pctx->ino = EXT2_BAD_INO;
4689         pctx->blk = blk;
4690         pctx->blkcount = blockcnt;
4691
4692         if ((blk < fs->super->s_first_data_block) ||
4693             (blk >= ext2fs_blocks_count(fs->super))) {
4694                 if (fix_problem(ctx, PR_1_BB_ILLEGAL_BLOCK_NUM, pctx)) {
4695                         *block_nr = 0;
4696                         return BLOCK_CHANGED;
4697                 } else
4698                         return 0;
4699         }
4700
4701         if (blockcnt < 0) {
4702                 if (ext2fs_test_block_bitmap2(p->fs_meta_blocks, blk)) {
4703                         p->bbcheck = 1;
4704                         if (fix_problem(ctx, PR_1_BB_FS_BLOCK, pctx)) {
4705                                 *block_nr = 0;
4706                                 return BLOCK_CHANGED;
4707                         }
4708                 } else if (ext2fs_test_block_bitmap2(ctx->block_found_map,
4709                                                     blk)) {
4710                         p->bbcheck = 1;
4711                         if (fix_problem(ctx, PR_1_BBINODE_BAD_METABLOCK,
4712                                         pctx)) {
4713                                 *block_nr = 0;
4714                                 return BLOCK_CHANGED;
4715                         }
4716                         if (e2fsck_should_abort(ctx))
4717                                 return BLOCK_ABORT;
4718                 } else
4719                         mark_block_used(ctx, blk);
4720                 return 0;
4721         }
4722 #if 0
4723         printf ("DEBUG: Marking %u as bad.\n", blk);
4724 #endif
4725         ctx->fs_badblocks_count++;
4726         /*
4727          * If the block is not used, then mark it as used and return.
4728          * If it is already marked as found, this must mean that
4729          * there's an overlap between the filesystem table blocks
4730          * (bitmaps and inode table) and the bad block list.
4731          */
4732         if (!ext2fs_test_block_bitmap2(ctx->block_found_map, blk)) {
4733                 ext2fs_mark_block_bitmap2(ctx->block_found_map, blk);
4734                 return 0;
4735         }
4736         /*
4737          * Try to find the where the filesystem block was used...
4738          */
4739         first_block = fs->super->s_first_data_block;
4740
4741         for (i = 0; i < fs->group_desc_count; i++ ) {
4742                 pctx->group = i;
4743                 pctx->blk = blk;
4744                 if (!ext2fs_bg_has_super(fs, i))
4745                         goto skip_super;
4746                 if (blk == first_block) {
4747                         if (i == 0) {
4748                                 if (fix_problem(ctx,
4749                                                 PR_1_BAD_PRIMARY_SUPERBLOCK,
4750                                                 pctx)) {
4751                                         *block_nr = 0;
4752                                         return BLOCK_CHANGED;
4753                                 }
4754                                 return 0;
4755                         }
4756                         fix_problem(ctx, PR_1_BAD_SUPERBLOCK, pctx);
4757                         return 0;
4758                 }
4759                 if ((blk > first_block) &&
4760                     (blk <= first_block + fs->desc_blocks)) {
4761                         if (i == 0) {
4762                                 pctx->blk = *block_nr;
4763                                 if (fix_problem(ctx,
4764                         PR_1_BAD_PRIMARY_GROUP_DESCRIPTOR, pctx)) {
4765                                         *block_nr = 0;
4766                                         return BLOCK_CHANGED;
4767                                 }
4768                                 return 0;
4769                         }
4770                         fix_problem(ctx, PR_1_BAD_GROUP_DESCRIPTORS, pctx);
4771                         return 0;
4772                 }
4773         skip_super:
4774                 if (blk == ext2fs_block_bitmap_loc(fs, i)) {
4775                         if (fix_problem(ctx, PR_1_BB_BAD_BLOCK, pctx)) {
4776                                 ctx->invalid_block_bitmap_flag[i]++;
4777                                 ctx->invalid_bitmaps++;
4778                         }
4779                         return 0;
4780                 }
4781                 if (blk == ext2fs_inode_bitmap_loc(fs, i)) {
4782                         if (fix_problem(ctx, PR_1_IB_BAD_BLOCK, pctx)) {
4783                                 ctx->invalid_inode_bitmap_flag[i]++;
4784                                 ctx->invalid_bitmaps++;
4785                         }
4786                         return 0;
4787                 }
4788                 if ((blk >= ext2fs_inode_table_loc(fs, i)) &&
4789                     (blk < (ext2fs_inode_table_loc(fs, i) +
4790                             fs->inode_blocks_per_group))) {
4791                         /*
4792                          * If there are bad blocks in the inode table,
4793                          * the inode scan code will try to do
4794                          * something reasonable automatically.
4795                          */
4796                         return 0;
4797                 }
4798                 first_block += fs->super->s_blocks_per_group;
4799         }
4800         /*
4801          * If we've gotten to this point, then the only
4802          * possibility is that the bad block inode meta data
4803          * is using a bad block.
4804          */
4805         if ((blk == p->inode->i_block[EXT2_IND_BLOCK]) ||
4806             (blk == p->inode->i_block[EXT2_DIND_BLOCK]) ||
4807             (blk == p->inode->i_block[EXT2_TIND_BLOCK])) {
4808                 p->bbcheck = 1;
4809                 if (fix_problem(ctx, PR_1_BBINODE_BAD_METABLOCK, pctx)) {
4810                         *block_nr = 0;
4811                         return BLOCK_CHANGED;
4812                 }
4813                 if (e2fsck_should_abort(ctx))
4814                         return BLOCK_ABORT;
4815                 return 0;
4816         }
4817
4818         pctx->group = -1;
4819
4820         /* Warn user that the block wasn't claimed */
4821         fix_problem(ctx, PR_1_PROGERR_CLAIMED_BLOCK, pctx);
4822
4823         return 0;
4824 }
4825
4826 static void new_table_block(e2fsck_t ctx, blk64_t first_block, dgrp_t group,
4827                             const char *name, int num, blk64_t *new_block)
4828 {
4829         ext2_filsys fs = ctx->fs;
4830         dgrp_t          last_grp;
4831         blk64_t         old_block = *new_block;
4832         blk64_t         last_block;
4833         dgrp_t          flexbg;
4834         unsigned        flexbg_size;
4835         int             i, is_flexbg;
4836         char            *buf;
4837         struct problem_context  pctx;
4838
4839         clear_problem_context(&pctx);
4840
4841         pctx.group = group;
4842         pctx.blk = old_block;
4843         pctx.str = name;
4844
4845         /*
4846          * For flex_bg filesystems, first try to allocate the metadata
4847          * within the flex_bg, and if that fails then try finding the
4848          * space anywhere in the filesystem.
4849          */
4850         is_flexbg = ext2fs_has_feature_flex_bg(fs->super);
4851         if (is_flexbg) {
4852                 flexbg_size = 1 << fs->super->s_log_groups_per_flex;
4853                 flexbg = group / flexbg_size;
4854                 first_block = ext2fs_group_first_block2(fs,
4855                                                         flexbg_size * flexbg);
4856                 last_grp = group | (flexbg_size - 1);
4857                 if (last_grp >= fs->group_desc_count)
4858                         last_grp = fs->group_desc_count - 1;
4859                 last_block = ext2fs_group_last_block2(fs, last_grp);
4860         } else
4861                 last_block = ext2fs_group_last_block2(fs, group);
4862         pctx.errcode = ext2fs_get_free_blocks2(fs, first_block, last_block,
4863                                                num, ctx->block_found_map,
4864                                                new_block);
4865         if (is_flexbg && (pctx.errcode == EXT2_ET_BLOCK_ALLOC_FAIL))
4866                 pctx.errcode = ext2fs_get_free_blocks2(fs,
4867                                 fs->super->s_first_data_block,
4868                                 ext2fs_blocks_count(fs->super),
4869                                 num, ctx->block_found_map, new_block);
4870         if (pctx.errcode) {
4871                 pctx.num = num;
4872                 fix_problem(ctx, PR_1_RELOC_BLOCK_ALLOCATE, &pctx);
4873                 ext2fs_unmark_valid(fs);
4874                 ctx->flags |= E2F_FLAG_ABORT;
4875                 return;
4876         }
4877         pctx.errcode = ext2fs_get_mem(fs->blocksize, &buf);
4878         if (pctx.errcode) {
4879                 fix_problem(ctx, PR_1_RELOC_MEMORY_ALLOCATE, &pctx);
4880                 ext2fs_unmark_valid(fs);
4881                 ctx->flags |= E2F_FLAG_ABORT;
4882                 return;
4883         }
4884         ext2fs_mark_super_dirty(fs);
4885         fs->flags &= ~EXT2_FLAG_MASTER_SB_ONLY;
4886         pctx.blk2 = *new_block;
4887         fix_problem(ctx, (old_block ? PR_1_RELOC_FROM_TO :
4888                           PR_1_RELOC_TO), &pctx);
4889         pctx.blk2 = 0;
4890         for (i = 0; i < num; i++) {
4891                 pctx.blk = i;
4892                 ext2fs_mark_block_bitmap2(ctx->block_found_map, (*new_block)+i);
4893                 if (old_block) {
4894                         pctx.errcode = io_channel_read_blk64(fs->io,
4895                                    old_block + i, 1, buf);
4896                         if (pctx.errcode)
4897                                 fix_problem(ctx, PR_1_RELOC_READ_ERR, &pctx);
4898                         pctx.blk = (*new_block) + i;
4899                         pctx.errcode = io_channel_write_blk64(fs->io, pctx.blk,
4900                                                               1, buf);
4901                 } else {
4902                         pctx.blk = (*new_block) + i;
4903                         pctx.errcode = ext2fs_zero_blocks2(fs, pctx.blk, 1,
4904                                                            NULL, NULL);
4905                 }
4906
4907                 if (pctx.errcode)
4908                         fix_problem(ctx, PR_1_RELOC_WRITE_ERR, &pctx);
4909         }
4910         ext2fs_free_mem(&buf);
4911 }
4912
4913 /*
4914  * This routine gets called at the end of pass 1 if bad blocks are
4915  * detected in the superblock, group descriptors, inode_bitmaps, or
4916  * block bitmaps.  At this point, all of the blocks have been mapped
4917  * out, so we can try to allocate new block(s) to replace the bad
4918  * blocks.
4919  */
4920 static void handle_fs_bad_blocks(e2fsck_t ctx)
4921 {
4922         ext2_filsys fs = ctx->fs;
4923         dgrp_t          i;
4924         blk64_t         first_block;
4925         blk64_t         new_blk;
4926
4927         for (i = 0; i < fs->group_desc_count; i++) {
4928                 first_block = ext2fs_group_first_block2(fs, i);
4929
4930                 if (ctx->invalid_block_bitmap_flag[i]) {
4931                         new_blk = ext2fs_block_bitmap_loc(fs, i);
4932                         new_table_block(ctx, first_block, i, _("block bitmap"),
4933                                         1, &new_blk);
4934                         ext2fs_block_bitmap_loc_set(fs, i, new_blk);
4935                 }
4936                 if (ctx->invalid_inode_bitmap_flag[i]) {
4937                         new_blk = ext2fs_inode_bitmap_loc(fs, i);
4938                         new_table_block(ctx, first_block, i, _("inode bitmap"),
4939                                         1, &new_blk);
4940                         ext2fs_inode_bitmap_loc_set(fs, i, new_blk);
4941                 }
4942                 if (ctx->invalid_inode_table_flag[i]) {
4943                         new_blk = ext2fs_inode_table_loc(fs, i);
4944                         new_table_block(ctx, first_block, i, _("inode table"),
4945                                         fs->inode_blocks_per_group,
4946                                         &new_blk);
4947                         ext2fs_inode_table_loc_set(fs, i, new_blk);
4948                         ctx->flags |= E2F_FLAG_RESTART;
4949                 }
4950         }
4951         ctx->invalid_bitmaps = 0;
4952 }
4953
4954 /*
4955  * This routine marks all blocks which are used by the superblock,
4956  * group descriptors, inode bitmaps, and block bitmaps.
4957  */
4958 static void mark_table_blocks(e2fsck_t ctx)
4959 {
4960         ext2_filsys fs = ctx->fs;
4961         blk64_t b;
4962         dgrp_t  i;
4963         unsigned int    j;
4964         struct problem_context pctx;
4965
4966         clear_problem_context(&pctx);
4967
4968         for (i = 0; i < fs->group_desc_count; i++) {
4969                 pctx.group = i;
4970
4971                 ext2fs_reserve_super_and_bgd(fs, i, ctx->block_found_map);
4972                 ext2fs_reserve_super_and_bgd(fs, i, ctx->block_metadata_map);
4973
4974                 /*
4975                  * Mark the blocks used for the inode table
4976                  */
4977                 if (ext2fs_inode_table_loc(fs, i)) {
4978                         for (j = 0, b = ext2fs_inode_table_loc(fs, i);
4979                              j < fs->inode_blocks_per_group;
4980                              j++, b++) {
4981                                 if (ext2fs_test_block_bitmap2(ctx->block_found_map,
4982                                                              b)) {
4983                                         pctx.blk = b;
4984                                         if (!ctx->invalid_inode_table_flag[i] &&
4985                                             fix_problem(ctx,
4986                                                 PR_1_ITABLE_CONFLICT, &pctx)) {
4987                                                 ctx->invalid_inode_table_flag[i]++;
4988                                                 ctx->invalid_bitmaps++;
4989                                         }
4990                                 } else {
4991                                     ext2fs_mark_block_bitmap2(
4992                                                 ctx->block_found_map, b);
4993                                     ext2fs_mark_block_bitmap2(
4994                                                 ctx->block_metadata_map, b);
4995                                 }
4996                         }
4997                 }
4998
4999                 /*
5000                  * Mark block used for the block bitmap
5001                  */
5002                 if (ext2fs_block_bitmap_loc(fs, i)) {
5003                         if (ext2fs_test_block_bitmap2(ctx->block_found_map,
5004                                      ext2fs_block_bitmap_loc(fs, i))) {
5005                                 pctx.blk = ext2fs_block_bitmap_loc(fs, i);
5006                                 if (fix_problem(ctx, PR_1_BB_CONFLICT, &pctx)) {
5007                                         ctx->invalid_block_bitmap_flag[i]++;
5008                                         ctx->invalid_bitmaps++;
5009                                 }
5010                         } else {
5011                             ext2fs_mark_block_bitmap2(ctx->block_found_map,
5012                                      ext2fs_block_bitmap_loc(fs, i));
5013                             ext2fs_mark_block_bitmap2(ctx->block_metadata_map,
5014                                      ext2fs_block_bitmap_loc(fs, i));
5015                         }
5016                 }
5017                 /*
5018                  * Mark block used for the inode bitmap
5019                  */
5020                 if (ext2fs_inode_bitmap_loc(fs, i)) {
5021                         if (ext2fs_test_block_bitmap2(ctx->block_found_map,
5022                                      ext2fs_inode_bitmap_loc(fs, i))) {
5023                                 pctx.blk = ext2fs_inode_bitmap_loc(fs, i);
5024                                 if (fix_problem(ctx, PR_1_IB_CONFLICT, &pctx)) {
5025                                         ctx->invalid_inode_bitmap_flag[i]++;
5026                                         ctx->invalid_bitmaps++;
5027                                 }
5028                         } else {
5029                             ext2fs_mark_block_bitmap2(ctx->block_metadata_map,
5030                                      ext2fs_inode_bitmap_loc(fs, i));
5031                             ext2fs_mark_block_bitmap2(ctx->block_found_map,
5032                                      ext2fs_inode_bitmap_loc(fs, i));
5033                         }
5034                 }
5035         }
5036 }
5037
5038 /*
5039  * These subroutines short circuits ext2fs_get_blocks and
5040  * ext2fs_check_directory; we use them since we already have the inode
5041  * structure, so there's no point in letting the ext2fs library read
5042  * the inode again.
5043  */
5044 static errcode_t pass1_get_blocks(ext2_filsys fs, ext2_ino_t ino,
5045                                   blk_t *blocks)
5046 {
5047         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5048         int     i;
5049
5050         if ((ino != ctx->stashed_ino) || !ctx->stashed_inode)
5051                 return EXT2_ET_CALLBACK_NOTHANDLED;
5052
5053         for (i=0; i < EXT2_N_BLOCKS; i++)
5054                 blocks[i] = ctx->stashed_inode->i_block[i];
5055         return 0;
5056 }
5057
5058 static errcode_t pass1_read_inode(ext2_filsys fs, ext2_ino_t ino,
5059                                   struct ext2_inode *inode)
5060 {
5061         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5062
5063         if ((ino != ctx->stashed_ino) || !ctx->stashed_inode)
5064                 return EXT2_ET_CALLBACK_NOTHANDLED;
5065         *inode = *ctx->stashed_inode;
5066         return 0;
5067 }
5068
5069 static errcode_t pass1_write_inode(ext2_filsys fs, ext2_ino_t ino,
5070                             struct ext2_inode *inode)
5071 {
5072         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5073
5074         if ((ino == ctx->stashed_ino) && ctx->stashed_inode &&
5075                 (inode != ctx->stashed_inode))
5076                 *ctx->stashed_inode = *inode;
5077         return EXT2_ET_CALLBACK_NOTHANDLED;
5078 }
5079
5080 static errcode_t pass1_check_directory(ext2_filsys fs, ext2_ino_t ino)
5081 {
5082         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5083
5084         if ((ino != ctx->stashed_ino) || !ctx->stashed_inode)
5085                 return EXT2_ET_CALLBACK_NOTHANDLED;
5086
5087         if (!LINUX_S_ISDIR(ctx->stashed_inode->i_mode))
5088                 return EXT2_ET_NO_DIRECTORY;
5089         return 0;
5090 }
5091
5092 static errcode_t e2fsck_get_alloc_block(ext2_filsys fs, blk64_t goal,
5093                                         blk64_t *ret)
5094 {
5095         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5096         errcode_t       retval;
5097         blk64_t         new_block;
5098
5099         if (ctx->block_found_map) {
5100                 retval = ext2fs_new_block2(fs, goal, ctx->block_found_map,
5101                                            &new_block);
5102                 if (retval)
5103                         return retval;
5104                 if (fs->block_map) {
5105                         ext2fs_mark_block_bitmap2(fs->block_map, new_block);
5106                         ext2fs_mark_bb_dirty(fs);
5107                 }
5108         } else {
5109                 if (!fs->block_map) {
5110                         retval = ext2fs_read_block_bitmap(fs);
5111                         if (retval)
5112                                 return retval;
5113                 }
5114
5115                 retval = ext2fs_new_block2(fs, goal, fs->block_map, &new_block);
5116                 if (retval)
5117                         return retval;
5118         }
5119
5120         *ret = new_block;
5121         return (0);
5122 }
5123
5124 static errcode_t e2fsck_new_range(ext2_filsys fs, int flags, blk64_t goal,
5125                                   blk64_t len, blk64_t *pblk, blk64_t *plen)
5126 {
5127         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5128         errcode_t       retval;
5129
5130         if (ctx->block_found_map)
5131                 return ext2fs_new_range(fs, flags, goal, len,
5132                                         ctx->block_found_map, pblk, plen);
5133
5134         if (!fs->block_map) {
5135                 retval = ext2fs_read_block_bitmap(fs);
5136                 if (retval)
5137                         return retval;
5138         }
5139
5140         return ext2fs_new_range(fs, flags, goal, len, fs->block_map,
5141                                 pblk, plen);
5142 }
5143
5144 static void e2fsck_block_alloc_stats(ext2_filsys fs, blk64_t blk, int inuse)
5145 {
5146         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5147
5148         /* Never free a critical metadata block */
5149         if (ctx->block_found_map &&
5150             ctx->block_metadata_map &&
5151             inuse < 0 &&
5152             ext2fs_test_block_bitmap2(ctx->block_metadata_map, blk))
5153                 return;
5154
5155         if (ctx->block_found_map) {
5156                 if (inuse > 0)
5157                         ext2fs_mark_block_bitmap2(ctx->block_found_map, blk);
5158                 else
5159                         ext2fs_unmark_block_bitmap2(ctx->block_found_map, blk);
5160         }
5161 }
5162
5163 static void e2fsck_block_alloc_stats_range(ext2_filsys fs, blk64_t blk,
5164                                            blk_t num, int inuse)
5165 {
5166         e2fsck_t ctx = (e2fsck_t) fs->priv_data;
5167
5168         /* Never free a critical metadata block */
5169         if (ctx->block_found_map &&
5170             ctx->block_metadata_map &&
5171             inuse < 0 &&
5172             ext2fs_test_block_bitmap_range2(ctx->block_metadata_map, blk, num))
5173                 return;
5174
5175         if (ctx->block_found_map) {
5176                 if (inuse > 0)
5177                         ext2fs_mark_block_bitmap_range2(ctx->block_found_map,
5178                                                         blk, num);
5179                 else
5180                         ext2fs_unmark_block_bitmap_range2(ctx->block_found_map,
5181                                                         blk, num);
5182         }
5183 }
5184
5185 void e2fsck_use_inode_shortcuts(e2fsck_t ctx, int use_shortcuts)
5186 {
5187         ext2_filsys fs = ctx->fs;
5188
5189         if (use_shortcuts) {
5190                 fs->get_blocks = pass1_get_blocks;
5191                 fs->check_directory = pass1_check_directory;
5192                 fs->read_inode = pass1_read_inode;
5193                 fs->write_inode = pass1_write_inode;
5194                 ctx->stashed_ino = 0;
5195         } else {
5196                 fs->get_blocks = 0;
5197                 fs->check_directory = 0;
5198                 fs->read_inode = 0;
5199                 fs->write_inode = 0;
5200         }
5201 }
5202
5203 void e2fsck_intercept_block_allocations(e2fsck_t ctx)
5204 {
5205         ext2fs_set_alloc_block_callback(ctx->fs, e2fsck_get_alloc_block, 0);
5206         ext2fs_set_block_alloc_stats_callback(ctx->fs,
5207                                                 e2fsck_block_alloc_stats, 0);
5208         ext2fs_set_new_range_callback(ctx->fs, e2fsck_new_range, NULL);
5209         ext2fs_set_block_alloc_stats_range_callback(ctx->fs,
5210                                         e2fsck_block_alloc_stats_range, NULL);
5211 }