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