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