Whamcloud - gitweb
Merge branch 'maint' into next
[tools/e2fsprogs.git] / e2fsck / pass2.c
1 /*
2  * pass2.c --- check directory structure
3  *
4  * Copyright (C) 1993, 1994, 1995, 1996, 1997 Theodore Ts'o
5  *
6  * %Begin-Header%
7  * This file may be redistributed under the terms of the GNU Public
8  * License.
9  * %End-Header%
10  *
11  * Pass 2 of e2fsck iterates through all active directory inodes, and
12  * applies to following tests to each directory entry in the directory
13  * blocks in the inodes:
14  *
15  *      - The length of the directory entry (rec_len) should be at
16  *              least 8 bytes, and no more than the remaining space
17  *              left in the directory block.
18  *      - The length of the name in the directory entry (name_len)
19  *              should be less than (rec_len - 8).
20  *      - The inode number in the directory entry should be within
21  *              legal bounds.
22  *      - The inode number should refer to a in-use inode.
23  *      - The first entry should be '.', and its inode should be
24  *              the inode of the directory.
25  *      - The second entry should be '..'.
26  *
27  * To minimize disk seek time, the directory blocks are processed in
28  * sorted order of block numbers.
29  *
30  * Pass 2 also collects the following information:
31  *      - The inode numbers of the subdirectories for each directory.
32  *
33  * Pass 2 relies on the following information from previous passes:
34  *      - The directory information collected in pass 1.
35  *      - The inode_used_map bitmap
36  *      - The inode_bad_map bitmap
37  *      - The inode_dir_map bitmap
38  *      - The encrypted_file_info
39  *      - The inode_casefold_map bitmap
40  *
41  * Pass 2 frees the following data structures
42  *      - The inode_bad_map bitmap
43  *      - The inode_reg_map bitmap
44  *      - The encrypted_file_info
45  *      - The inode_casefold_map bitmap
46  */
47
48 #define _GNU_SOURCE 1 /* get strnlen() */
49 #include "config.h"
50 #include <string.h>
51
52 #include "e2fsck.h"
53 #include "problem.h"
54 #include "support/dict.h"
55
56 #ifdef NO_INLINE_FUNCS
57 #define _INLINE_
58 #else
59 #define _INLINE_ inline
60 #endif
61
62 /* #define DX_DEBUG */
63
64 /*
65  * Keeps track of how many times an inode is referenced.
66  */
67 static void deallocate_inode(e2fsck_t ctx, ext2_ino_t ino, char* block_buf);
68 static int check_dir_block2(ext2_filsys fs,
69                            struct ext2_db_entry2 *dir_blocks_info,
70                            void *priv_data);
71 static int check_dir_block(ext2_filsys fs,
72                            struct ext2_db_entry2 *dir_blocks_info,
73                            void *priv_data);
74 static int allocate_dir_block(e2fsck_t ctx,
75                               struct ext2_db_entry2 *dir_blocks_info,
76                               char *buf, struct problem_context *pctx);
77 static void clear_htree(e2fsck_t ctx, ext2_ino_t ino);
78 static short htree_depth(struct dx_dir_info *dx_dir,
79                          struct dx_dirblock_info *dx_db);
80 static EXT2_QSORT_TYPE special_dir_block_cmp(const void *a, const void *b);
81
82 struct check_dir_struct {
83         char *buf;
84         struct problem_context  pctx;
85         int     count, max;
86         e2fsck_t ctx;
87         unsigned long long list_offset;
88         unsigned long long ra_entries;
89         unsigned long long next_ra_off;
90 };
91
92 static void update_parents(struct dx_dir_info *dx_dir, int type)
93 {
94         struct dx_dirblock_info *dx_db, *dx_parent, *dx_previous;
95         blk_t b;
96
97         for (b = 0, dx_db = dx_dir->dx_block;
98              b < dx_dir->numblocks;
99              b++, dx_db++) {
100                 dx_parent = &dx_dir->dx_block[dx_db->parent];
101                 if (dx_db->type != type)
102                         continue;
103
104                 /*
105                  * XXX Make sure dx_parent->min_hash > dx_db->min_hash
106                 */
107                 if (dx_db->flags & DX_FLAG_FIRST) {
108                         dx_parent->min_hash = dx_db->min_hash;
109                         if (dx_parent->previous) {
110                                 dx_previous =
111                                         &dx_dir->dx_block[dx_parent->previous];
112                                 dx_previous->node_max_hash =
113                                         dx_parent->min_hash;
114                         }
115                 }
116                 /*
117                  * XXX Make sure dx_parent->max_hash < dx_db->max_hash
118                  */
119                 if (dx_db->flags & DX_FLAG_LAST) {
120                         dx_parent->max_hash = dx_db->max_hash;
121                 }
122         }
123 }
124
125 void e2fsck_pass2(e2fsck_t ctx)
126 {
127         struct ext2_super_block *sb = ctx->fs->super;
128         struct problem_context  pctx;
129         ext2_filsys             fs = ctx->fs;
130         char                    *buf = NULL;
131 #ifdef RESOURCE_TRACK
132         struct resource_track   rtrack;
133 #endif
134         struct check_dir_struct cd;
135         struct dx_dir_info      *dx_dir;
136         struct dx_dirblock_info *dx_db;
137         blk_t                   b;
138         ext2_ino_t              i;
139         short                   depth;
140         problem_t               code;
141         int                     bad_dir;
142         int (*check_dir_func)(ext2_filsys fs,
143                               struct ext2_db_entry2 *dir_blocks_info,
144                               void *priv_data);
145
146         init_resource_track(&rtrack, ctx->fs->io);
147         clear_problem_context(&cd.pctx);
148
149 #ifdef MTRACE
150         mtrace_print("Pass 2");
151 #endif
152
153         if (!(ctx->options & E2F_OPT_PREEN))
154                 fix_problem(ctx, PR_2_PASS_HEADER, &cd.pctx);
155
156         cd.pctx.errcode = e2fsck_setup_icount(ctx, "inode_count",
157                                 EXT2_ICOUNT_OPT_INCREMENT,
158                                 ctx->inode_link_info, &ctx->inode_count);
159         if (cd.pctx.errcode) {
160                 fix_problem(ctx, PR_2_ALLOCATE_ICOUNT, &cd.pctx);
161                 ctx->flags |= E2F_FLAG_ABORT;
162                 goto cleanup;
163         }
164         buf = (char *) e2fsck_allocate_memory(ctx, 2*fs->blocksize,
165                                               "directory scan buffer");
166
167         /*
168          * Set up the parent pointer for the root directory, if
169          * present.  (If the root directory is not present, we will
170          * create it in pass 3.)
171          */
172         (void) e2fsck_dir_info_set_parent(ctx, EXT2_ROOT_INO, EXT2_ROOT_INO);
173
174         cd.buf = buf;
175         cd.ctx = ctx;
176         cd.count = 1;
177         cd.max = ext2fs_dblist_count2(fs->dblist);
178         cd.list_offset = 0;
179         cd.ra_entries = ctx->readahead_kb * 1024 / ctx->fs->blocksize;
180         cd.next_ra_off = 0;
181
182         if (ctx->progress)
183                 (void) (ctx->progress)(ctx, 2, 0, cd.max);
184
185         if (ext2fs_has_feature_dir_index(fs->super))
186                 ext2fs_dblist_sort2(fs->dblist, special_dir_block_cmp);
187
188         check_dir_func = cd.ra_entries ? check_dir_block2 : check_dir_block;
189         cd.pctx.errcode = ext2fs_dblist_iterate2(fs->dblist, check_dir_func,
190                                                  &cd);
191         if (ctx->flags & E2F_FLAG_RESTART_LATER) {
192                 ctx->flags |= E2F_FLAG_RESTART;
193                 ctx->flags &= ~E2F_FLAG_RESTART_LATER;
194         }
195
196         if (ctx->flags & E2F_FLAG_RUN_RETURN)
197                 goto cleanup;
198
199         if (cd.pctx.errcode) {
200                 fix_problem(ctx, PR_2_DBLIST_ITERATE, &cd.pctx);
201                 ctx->flags |= E2F_FLAG_ABORT;
202                 goto cleanup;
203         }
204
205         for (i=0; (dx_dir = e2fsck_dx_dir_info_iter(ctx, &i)) != 0;) {
206                 if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
207                         goto cleanup;
208                 if (e2fsck_dir_will_be_rehashed(ctx, dx_dir->ino) ||
209                     dx_dir->numblocks == 0)
210                         continue;
211                 clear_problem_context(&pctx);
212                 bad_dir = 0;
213                 pctx.dir = dx_dir->ino;
214                 dx_db = dx_dir->dx_block;
215                 if (dx_db->flags & DX_FLAG_REFERENCED)
216                         dx_db->flags |= DX_FLAG_DUP_REF;
217                 else
218                         dx_db->flags |= DX_FLAG_REFERENCED;
219                 /*
220                  * Find all of the first and last leaf blocks, and
221                  * update their parent's min and max hash values
222                  */
223                 update_parents(dx_dir, DX_DIRBLOCK_LEAF);
224
225                 /* for 3 level htree: update 2 level parent's min
226                  * and max hash values */
227                 update_parents(dx_dir, DX_DIRBLOCK_NODE);
228
229                 for (b=0, dx_db = dx_dir->dx_block;
230                      b < dx_dir->numblocks;
231                      b++, dx_db++) {
232                         pctx.blkcount = b;
233                         pctx.group = dx_db->parent;
234                         code = 0;
235                         if (!(dx_db->flags & DX_FLAG_FIRST) &&
236                             (dx_db->min_hash < dx_db->node_min_hash)) {
237                                 pctx.blk = dx_db->min_hash;
238                                 pctx.blk2 = dx_db->node_min_hash;
239                                 code = PR_2_HTREE_MIN_HASH;
240                                 fix_problem(ctx, code, &pctx);
241                                 bad_dir++;
242                         }
243                         if (dx_db->type == DX_DIRBLOCK_LEAF) {
244                                 depth = htree_depth(dx_dir, dx_db);
245                                 if (depth != dx_dir->depth) {
246                                         pctx.num = dx_dir->depth;
247                                         code = PR_2_HTREE_BAD_DEPTH;
248                                         fix_problem(ctx, code, &pctx);
249                                         bad_dir++;
250                                 }
251                         }
252                         /*
253                          * This test doesn't apply for the root block
254                          * at block #0
255                          */
256                         if (b &&
257                             (dx_db->max_hash > dx_db->node_max_hash)) {
258                                 pctx.blk = dx_db->max_hash;
259                                 pctx.blk2 = dx_db->node_max_hash;
260                                 code = PR_2_HTREE_MAX_HASH;
261                                 fix_problem(ctx, code, &pctx);
262                                 bad_dir++;
263                         }
264                         if (!(dx_db->flags & DX_FLAG_REFERENCED)) {
265                                 code = PR_2_HTREE_NOTREF;
266                                 fix_problem(ctx, code, &pctx);
267                                 bad_dir++;
268                         } else if (dx_db->flags & DX_FLAG_DUP_REF) {
269                                 code = PR_2_HTREE_DUPREF;
270                                 fix_problem(ctx, code, &pctx);
271                                 bad_dir++;
272                         }
273                 }
274                 if (bad_dir && fix_problem(ctx, PR_2_HTREE_CLEAR, &pctx)) {
275                         clear_htree(ctx, dx_dir->ino);
276                         dx_dir->numblocks = 0;
277                 }
278         }
279         e2fsck_free_dx_dir_info(ctx);
280
281         ext2fs_free_mem(&buf);
282         ext2fs_free_dblist(fs->dblist);
283
284         if (ctx->inode_bad_map) {
285                 ext2fs_free_inode_bitmap(ctx->inode_bad_map);
286                 ctx->inode_bad_map = 0;
287         }
288         if (ctx->inode_reg_map) {
289                 ext2fs_free_inode_bitmap(ctx->inode_reg_map);
290                 ctx->inode_reg_map = 0;
291         }
292         if (ctx->inode_casefold_map) {
293                 ext2fs_free_inode_bitmap(ctx->inode_casefold_map);
294                 ctx->inode_casefold_map = 0;
295         }
296         destroy_encrypted_file_info(ctx);
297         if (ctx->casefolded_dirs) {
298                 ext2fs_u32_list_free(ctx->casefolded_dirs);
299                 ctx->casefolded_dirs = 0;
300         }
301
302         clear_problem_context(&pctx);
303         if (ctx->large_files) {
304                 if (!ext2fs_has_feature_large_file(sb) &&
305                     fix_problem(ctx, PR_2_FEATURE_LARGE_FILES, &pctx)) {
306                         ext2fs_set_feature_large_file(sb);
307                         fs->flags &= ~EXT2_FLAG_MASTER_SB_ONLY;
308                         ext2fs_mark_super_dirty(fs);
309                 }
310                 if (sb->s_rev_level == EXT2_GOOD_OLD_REV &&
311                     fix_problem(ctx, PR_1_FS_REV_LEVEL, &pctx)) {
312                         ext2fs_update_dynamic_rev(fs);
313                         ext2fs_mark_super_dirty(fs);
314                 }
315         }
316
317         print_resource_track(ctx, _("Pass 2"), &rtrack, fs->io);
318 cleanup:
319         ext2fs_free_mem(&buf);
320 }
321
322 #define MAX_DEPTH 32000
323 static short htree_depth(struct dx_dir_info *dx_dir,
324                          struct dx_dirblock_info *dx_db)
325 {
326         short depth = 0;
327
328         while (dx_db->type != DX_DIRBLOCK_ROOT && depth < MAX_DEPTH) {
329                 dx_db = &dx_dir->dx_block[dx_db->parent];
330                 depth++;
331         }
332         return depth;
333 }
334
335 static int dict_de_cmp(const void *cmp_ctx EXT2FS_ATTR((unused)),
336                        const void *a, const void *b)
337 {
338         const struct ext2_dir_entry *de_a, *de_b;
339         int     a_len, b_len;
340
341         de_a = (const struct ext2_dir_entry *) a;
342         a_len = ext2fs_dirent_name_len(de_a);
343         de_b = (const struct ext2_dir_entry *) b;
344         b_len = ext2fs_dirent_name_len(de_b);
345
346         if (a_len != b_len)
347                 return (a_len - b_len);
348
349         return memcmp(de_a->name, de_b->name, a_len);
350 }
351
352 static int dict_de_cf_cmp(const void *cmp_ctx, const void *a, const void *b)
353 {
354         const struct ext2fs_nls_table *tbl = cmp_ctx;
355         const struct ext2_dir_entry *de_a, *de_b;
356         int     a_len, b_len;
357
358         de_a = (const struct ext2_dir_entry *) a;
359         a_len = ext2fs_dirent_name_len(de_a);
360         de_b = (const struct ext2_dir_entry *) b;
361         b_len = ext2fs_dirent_name_len(de_b);
362
363         return ext2fs_casefold_cmp(tbl,
364                                    (const unsigned char *) de_a->name, a_len,
365                                    (const unsigned char *) de_b->name, b_len);
366 }
367
368 /*
369  * This is special sort function that makes sure that directory blocks
370  * with a dirblock of zero are sorted to the beginning of the list.
371  * This guarantees that the root node of the htree directories are
372  * processed first, so we know what hash version to use.
373  */
374 static EXT2_QSORT_TYPE special_dir_block_cmp(const void *a, const void *b)
375 {
376         const struct ext2_db_entry2 *db_a =
377                 (const struct ext2_db_entry2 *) a;
378         const struct ext2_db_entry2 *db_b =
379                 (const struct ext2_db_entry2 *) b;
380
381         if (db_a->blockcnt && !db_b->blockcnt)
382                 return 1;
383
384         if (!db_a->blockcnt && db_b->blockcnt)
385                 return -1;
386
387         if (db_a->blk != db_b->blk)
388                 return (int) (db_a->blk - db_b->blk);
389
390         if (db_a->ino != db_b->ino)
391                 return (int) (db_a->ino - db_b->ino);
392
393         return (int) (db_a->blockcnt - db_b->blockcnt);
394 }
395
396
397 /*
398  * Make sure the first entry in the directory is '.', and that the
399  * directory entry is sane.
400  */
401 static int check_dot(e2fsck_t ctx,
402                      struct ext2_dir_entry *dirent,
403                      ext2_ino_t ino, struct problem_context *pctx)
404 {
405         struct ext2_dir_entry *nextdir;
406         unsigned int    rec_len, new_len;
407         int             status = 0;
408         int             created = 0;
409         problem_t       problem = 0;
410         int             ftype = EXT2_FT_DIR;
411
412         if (!dirent->inode)
413                 problem = PR_2_MISSING_DOT;
414         else if ((ext2fs_dirent_name_len(dirent) != 1) ||
415                  (dirent->name[0] != '.'))
416                 problem = PR_2_1ST_NOT_DOT;
417         else if (dirent->name[1] != '\0')
418                 problem = PR_2_DOT_NULL_TERM;
419
420         (void) ext2fs_get_rec_len(ctx->fs, dirent, &rec_len);
421         if (problem) {
422                 if (!ext2fs_has_feature_filetype(ctx->fs->super))
423                         ftype = EXT2_FT_UNKNOWN;
424                 if (fix_problem(ctx, problem, pctx)) {
425                         if (rec_len < 12)
426                                 rec_len = dirent->rec_len = 12;
427                         dirent->inode = ino;
428                         ext2fs_dirent_set_name_len(dirent, 1);
429                         ext2fs_dirent_set_file_type(dirent, ftype);
430                         dirent->name[0] = '.';
431                         dirent->name[1] = '\0';
432                         status = 1;
433                         created = 1;
434                 }
435         }
436         if (dirent->inode != ino) {
437                 if (fix_problem(ctx, PR_2_BAD_INODE_DOT, pctx)) {
438                         dirent->inode = ino;
439                         status = 1;
440                 }
441         }
442         if (rec_len > 12) {
443                 new_len = rec_len - 12;
444                 if (new_len > 12) {
445                         if (created ||
446                             fix_problem(ctx, PR_2_SPLIT_DOT, pctx)) {
447                                 nextdir = (struct ext2_dir_entry *)
448                                         ((char *) dirent + 12);
449                                 dirent->rec_len = 12;
450                                 /* if the next entry looks like "..", leave it
451                                  * and let check_dotdot() verify the dirent,
452                                  * otherwise zap the following entry. */
453                                 if (strncmp(nextdir->name, "..", 3) != 0) {
454                                         (void)ext2fs_set_rec_len(ctx->fs,
455                                                                  new_len,
456                                                                  nextdir);
457                                         nextdir->inode = 0;
458                                         ext2fs_dirent_set_name_len(nextdir, 0);
459                                         ext2fs_dirent_set_file_type(nextdir,
460                                                                     ftype);
461 #ifdef WORDS_BIGENDIAN
462                                 } else {
463                                         (void) ext2fs_dirent_swab_in2(ctx->fs,
464                                                 (char *) nextdir,
465                                                 ctx->fs->blocksize - 12, 0);
466 #endif
467                                 }
468                                 status = 1;
469                         }
470                 }
471         }
472         return status;
473 }
474
475 /*
476  * Make sure the second entry in the directory is '..', and that the
477  * directory entry is sane.  We do not check the inode number of '..'
478  * here; this gets done in pass 3.
479  */
480 static int check_dotdot(e2fsck_t ctx,
481                         struct ext2_dir_entry *dirent,
482                         ext2_ino_t ino, struct problem_context *pctx)
483 {
484         problem_t       problem = 0;
485         unsigned int    rec_len;
486         int             ftype = EXT2_FT_DIR;
487
488         if (!dirent->inode)
489                 problem = PR_2_MISSING_DOT_DOT;
490         else if ((ext2fs_dirent_name_len(dirent) != 2) ||
491                  (dirent->name[0] != '.') ||
492                  (dirent->name[1] != '.'))
493                 problem = PR_2_2ND_NOT_DOT_DOT;
494         else if (dirent->name[2] != '\0')
495                 problem = PR_2_DOT_DOT_NULL_TERM;
496
497         (void) ext2fs_get_rec_len(ctx->fs, dirent, &rec_len);
498         if (problem) {
499                 if (!ext2fs_has_feature_filetype(ctx->fs->super))
500                         ftype = EXT2_FT_UNKNOWN;
501                 if (fix_problem(ctx, problem, pctx)) {
502                         if (rec_len < 12)
503                                 dirent->rec_len = 12;
504                         /*
505                          * Note: we don't have the parent inode just
506                          * yet, so we will fill it in with the root
507                          * inode.  This will get fixed in pass 3.
508                          */
509                         dirent->inode = EXT2_ROOT_INO;
510                         ext2fs_dirent_set_name_len(dirent, 2);
511                         ext2fs_dirent_set_file_type(dirent, ftype);
512                         dirent->name[0] = '.';
513                         dirent->name[1] = '.';
514                         dirent->name[2] = '\0';
515                         return 1;
516                 }
517                 return 0;
518         }
519         if (e2fsck_dir_info_set_dotdot(ctx, ino, dirent->inode)) {
520                 fix_problem(ctx, PR_2_NO_DIRINFO, pctx);
521                 return -1;
522         }
523         return 0;
524 }
525
526 /*
527  * Check to make sure a directory entry doesn't contain any illegal
528  * characters.
529  */
530 static int check_name(e2fsck_t ctx,
531                       struct ext2_dir_entry *dirent,
532                       struct problem_context *pctx)
533 {
534         int     i;
535         int     fixup = -1;
536         int     ret = 0;
537
538         for ( i = 0; i < ext2fs_dirent_name_len(dirent); i++) {
539                 if (dirent->name[i] != '/' && dirent->name[i] != '\0')
540                         continue;
541                 if (fixup < 0)
542                         fixup = fix_problem(ctx, PR_2_BAD_NAME, pctx);
543                 if (fixup == 0)
544                         return 0;
545                 dirent->name[i] = '.';
546                 ret = 1;
547         }
548         return ret;
549 }
550
551 static int encrypted_check_name(e2fsck_t ctx,
552                                 const struct ext2_dir_entry *dirent,
553                                 struct problem_context *pctx)
554 {
555         if (ext2fs_dirent_name_len(dirent) < EXT4_CRYPTO_BLOCK_SIZE) {
556                 if (fix_problem(ctx, PR_2_BAD_ENCRYPTED_NAME, pctx))
557                         return 1;
558                 ext2fs_unmark_valid(ctx->fs);
559         }
560         return 0;
561 }
562
563 static int encoded_check_name(e2fsck_t ctx,
564                               struct ext2_dir_entry *dirent,
565                               struct problem_context *pctx)
566 {
567         const struct ext2fs_nls_table *tbl = ctx->fs->encoding;
568         int ret;
569         int len = ext2fs_dirent_name_len(dirent);
570         char *pos, *end;
571
572         ret = ext2fs_check_encoded_name(tbl, dirent->name, len, &pos);
573         if (ret < 0) {
574                 fatal_error(ctx, _("NLS is broken."));
575         } else if(ret > 0) {
576                 ret = fix_problem(ctx, PR_2_BAD_ENCODED_NAME, pctx);
577                 if (ret) {
578                         end = &dirent->name[len];
579                         for (; *pos && pos != end; pos++)
580                                 *pos = '.';
581                 }
582         }
583
584         return (ret || check_name(ctx, dirent, pctx));
585 }
586
587 /*
588  * Check the directory filetype (if present)
589  */
590 static _INLINE_ int check_filetype(e2fsck_t ctx,
591                                    struct ext2_dir_entry *dirent,
592                                    ext2_ino_t dir_ino EXT2FS_ATTR((unused)),
593                                    struct problem_context *pctx)
594 {
595         int     filetype = ext2fs_dirent_file_type(dirent);
596         int     should_be = EXT2_FT_UNKNOWN;
597         struct ext2_inode       inode;
598
599         if (!ext2fs_has_feature_filetype(ctx->fs->super)) {
600                 if (filetype == 0 ||
601                     !fix_problem(ctx, PR_2_CLEAR_FILETYPE, pctx))
602                         return 0;
603                 ext2fs_dirent_set_file_type(dirent, EXT2_FT_UNKNOWN);
604                 return 1;
605         }
606
607         if (ext2fs_test_inode_bitmap2(ctx->inode_dir_map, dirent->inode)) {
608                 should_be = EXT2_FT_DIR;
609         } else if (ext2fs_test_inode_bitmap2(ctx->inode_reg_map,
610                                             dirent->inode)) {
611                 should_be = EXT2_FT_REG_FILE;
612         } else if (ctx->inode_bad_map &&
613                    ext2fs_test_inode_bitmap2(ctx->inode_bad_map,
614                                             dirent->inode))
615                 should_be = 0;
616         else {
617                 e2fsck_read_inode(ctx, dirent->inode, &inode,
618                                   "check_filetype");
619                 should_be = ext2_file_type(inode.i_mode);
620         }
621         if (filetype == should_be)
622                 return 0;
623         pctx->num = should_be;
624
625         if (fix_problem(ctx, filetype ? PR_2_BAD_FILETYPE : PR_2_SET_FILETYPE,
626                         pctx) == 0)
627                 return 0;
628
629         ext2fs_dirent_set_file_type(dirent, should_be);
630         return 1;
631 }
632
633 static void parse_int_node(ext2_filsys fs,
634                            struct ext2_db_entry2 *db,
635                            struct check_dir_struct *cd,
636                            struct dx_dir_info   *dx_dir,
637                            char *block_buf, int failed_csum)
638 {
639         struct          ext2_dx_root_info  *root;
640         struct          ext2_dx_entry *ent;
641         struct          ext2_dx_countlimit *limit;
642         struct dx_dirblock_info *dx_db;
643         int             i, expect_limit, count;
644         blk_t           blk;
645         ext2_dirhash_t  min_hash = 0xffffffff;
646         ext2_dirhash_t  max_hash = 0;
647         ext2_dirhash_t  hash = 0, prev_hash;
648         int             csum_size = 0;
649
650         if (db->blockcnt == 0) {
651                 root = (struct ext2_dx_root_info *) (block_buf + 24);
652
653 #ifdef DX_DEBUG
654                 printf("Root node dump:\n");
655                 printf("\t Reserved zero: %u\n", root->reserved_zero);
656                 printf("\t Hash Version: %u\n", root->hash_version);
657                 printf("\t Info length: %u\n", root->info_length);
658                 printf("\t Indirect levels: %u\n", root->indirect_levels);
659                 printf("\t Flags: %x\n", root->unused_flags);
660 #endif
661
662                 ent = (struct ext2_dx_entry *) (block_buf + 24 + root->info_length);
663
664                 if (failed_csum &&
665                     (e2fsck_dir_will_be_rehashed(cd->ctx, cd->pctx.ino) ||
666                      fix_problem(cd->ctx, PR_2_HTREE_ROOT_CSUM_INVALID,
667                                 &cd->pctx)))
668                         goto clear_and_exit;
669         } else {
670                 ent = (struct ext2_dx_entry *) (block_buf+8);
671
672                 if (failed_csum &&
673                     (e2fsck_dir_will_be_rehashed(cd->ctx, cd->pctx.ino) ||
674                      fix_problem(cd->ctx, PR_2_HTREE_NODE_CSUM_INVALID,
675                                 &cd->pctx)))
676                         goto clear_and_exit;
677         }
678
679         limit = (struct ext2_dx_countlimit *) ent;
680
681 #ifdef DX_DEBUG
682         printf("Number of entries (count): %d\n",
683                ext2fs_le16_to_cpu(limit->count));
684         printf("Number of entries (limit): %d\n",
685                ext2fs_le16_to_cpu(limit->limit));
686 #endif
687
688         count = ext2fs_le16_to_cpu(limit->count);
689         if (ext2fs_has_feature_metadata_csum(fs->super))
690                 csum_size = sizeof(struct ext2_dx_tail);
691         expect_limit = (fs->blocksize -
692                         (csum_size + ((char *) ent - block_buf))) /
693                        sizeof(struct ext2_dx_entry);
694         if (ext2fs_le16_to_cpu(limit->limit) != expect_limit) {
695                 cd->pctx.num = ext2fs_le16_to_cpu(limit->limit);
696                 if (fix_problem(cd->ctx, PR_2_HTREE_BAD_LIMIT, &cd->pctx))
697                         goto clear_and_exit;
698         }
699         if (count > expect_limit) {
700                 cd->pctx.num = count;
701                 if (fix_problem(cd->ctx, PR_2_HTREE_BAD_COUNT, &cd->pctx))
702                         goto clear_and_exit;
703                 count = expect_limit;
704         }
705
706         for (i=0; i < count; i++) {
707                 prev_hash = hash;
708                 hash = i ? (ext2fs_le32_to_cpu(ent[i].hash) & ~1) : 0;
709 #ifdef DX_DEBUG
710                 printf("Entry #%d: Hash 0x%08x, block %u\n", i,
711                        hash, ext2fs_le32_to_cpu(ent[i].block));
712 #endif
713                 blk = ext2fs_le32_to_cpu(ent[i].block) & EXT4_DX_BLOCK_MASK;
714                 /* Check to make sure the block is valid */
715                 if (blk >= dx_dir->numblocks) {
716                         cd->pctx.blk = blk;
717                         if (fix_problem(cd->ctx, PR_2_HTREE_BADBLK,
718                                         &cd->pctx))
719                                 goto clear_and_exit;
720                         continue;
721                 }
722                 if (hash < prev_hash &&
723                     fix_problem(cd->ctx, PR_2_HTREE_HASH_ORDER, &cd->pctx))
724                         goto clear_and_exit;
725                 dx_db = &dx_dir->dx_block[blk];
726                 if (dx_db->flags & DX_FLAG_REFERENCED) {
727                         dx_db->flags |= DX_FLAG_DUP_REF;
728                 } else {
729                         dx_db->flags |= DX_FLAG_REFERENCED;
730                         dx_db->parent = db->blockcnt;
731                 }
732
733                 dx_db->previous =
734                         i ? (ext2fs_le32_to_cpu(ent[i-1].block) &
735                              EXT4_DX_BLOCK_MASK) : 0;
736
737                 if (hash < min_hash)
738                         min_hash = hash;
739                 if (hash > max_hash)
740                         max_hash = hash;
741                 dx_db->node_min_hash = hash;
742                 if ((i+1) < count)
743                         dx_db->node_max_hash =
744                           ext2fs_le32_to_cpu(ent[i+1].hash) & ~1;
745                 else {
746                         dx_db->node_max_hash = 0xfffffffe;
747                         dx_db->flags |= DX_FLAG_LAST;
748                 }
749                 if (i == 0)
750                         dx_db->flags |= DX_FLAG_FIRST;
751         }
752 #ifdef DX_DEBUG
753         printf("Blockcnt = %d, min hash 0x%08x, max hash 0x%08x\n",
754                db->blockcnt, min_hash, max_hash);
755 #endif
756         dx_db = &dx_dir->dx_block[db->blockcnt];
757         dx_db->min_hash = min_hash;
758         dx_db->max_hash = max_hash;
759         return;
760
761 clear_and_exit:
762         clear_htree(cd->ctx, cd->pctx.ino);
763         dx_dir->numblocks = 0;
764         e2fsck_rehash_dir_later(cd->ctx, cd->pctx.ino);
765 }
766
767 /*
768  * Given a busted directory, try to salvage it somehow.
769  *
770  */
771 static void salvage_directory(ext2_filsys fs,
772                               struct ext2_dir_entry *dirent,
773                               struct ext2_dir_entry *prev,
774                               unsigned int *offset,
775                               unsigned int block_len,
776                               int hash_in_dirent)
777 {
778         char    *cp = (char *) dirent;
779         int left;
780         unsigned int rec_len, prev_rec_len;
781         unsigned int name_len;
782
783         /*
784          * If the space left for the entry is too small to be an entry,
785          * we can't access dirent's fields, so plumb in the values needed
786          * so that the previous entry absorbs this one.
787          */
788         if (block_len - *offset < EXT2_DIR_ENTRY_HEADER_LEN) {
789                 name_len = 0;
790                 rec_len = block_len - *offset;
791         } else {
792                 name_len = ext2fs_dirent_name_len(dirent);
793                 (void) ext2fs_get_rec_len(fs, dirent, &rec_len);
794         }
795         left = block_len - *offset - rec_len;
796
797         /*
798          * Special case of directory entry of size 8: copy what's left
799          * of the directory block up to cover up the invalid hole.
800          */
801         if ((left >= (int) ext2fs_dir_rec_len(1, hash_in_dirent)) &&
802              (rec_len == EXT2_DIR_ENTRY_HEADER_LEN)) {
803                 memmove(cp, cp+EXT2_DIR_ENTRY_HEADER_LEN, left);
804                 memset(cp + left, 0, EXT2_DIR_ENTRY_HEADER_LEN);
805                 return;
806         }
807         /*
808          * If the directory entry overruns the end of the directory
809          * block, and the name is small enough to fit, then adjust the
810          * record length.
811          */
812         if ((left < 0) &&
813             ((int) rec_len + left > EXT2_DIR_ENTRY_HEADER_LEN) &&
814             ((int) ext2fs_dir_rec_len(name_len, hash_in_dirent) <= (int) rec_len + left) &&
815             dirent->inode <= fs->super->s_inodes_count &&
816             strnlen(dirent->name, name_len) == name_len) {
817                 (void) ext2fs_set_rec_len(fs, (int) rec_len + left, dirent);
818                 return;
819         }
820         /*
821          * If the record length of the directory entry is a multiple
822          * of four, and not too big, such that it is valid, let the
823          * previous directory entry absorb the invalid one.
824          */
825         if (prev && rec_len && (rec_len % 4) == 0 &&
826             (*offset + rec_len <= block_len)) {
827                 (void) ext2fs_get_rec_len(fs, prev, &prev_rec_len);
828                 prev_rec_len += rec_len;
829                 (void) ext2fs_set_rec_len(fs, prev_rec_len, prev);
830                 *offset += rec_len;
831                 return;
832         }
833         /*
834          * Default salvage method --- kill all of the directory
835          * entries for the rest of the block.  We will either try to
836          * absorb it into the previous directory entry, or create a
837          * new empty directory entry the rest of the directory block.
838          */
839         if (prev) {
840                 (void) ext2fs_get_rec_len(fs, prev, &prev_rec_len);
841                 prev_rec_len += block_len - *offset;
842                 (void) ext2fs_set_rec_len(fs, prev_rec_len, prev);
843                 *offset = fs->blocksize;
844         } else {
845                 rec_len = block_len - *offset;
846                 (void) ext2fs_set_rec_len(fs, rec_len, dirent);
847                 ext2fs_dirent_set_name_len(dirent, 0);
848                 ext2fs_dirent_set_file_type(dirent, EXT2_FT_UNKNOWN);
849                 dirent->inode = 0;
850         }
851 }
852
853 #define NEXT_DIRENT(d)  ((void *)((char *)(d) + (d)->rec_len))
854 static errcode_t insert_dirent_tail(ext2_filsys fs, void *dirbuf)
855 {
856         struct ext2_dir_entry *d;
857         void *top;
858         struct ext2_dir_entry_tail *t;
859
860         d = dirbuf;
861         top = EXT2_DIRENT_TAIL(dirbuf, fs->blocksize);
862
863         while (d->rec_len && !(d->rec_len & 0x3) && NEXT_DIRENT(d) <= top)
864                 d = NEXT_DIRENT(d);
865
866         if (d != top) {
867                 unsigned int min_size = EXT2_DIR_REC_LEN(
868                                 ext2fs_dirent_name_len(dirbuf));
869                 if (min_size > (char *)top - (char *)d)
870                         return EXT2_ET_DIR_NO_SPACE_FOR_CSUM;
871                 d->rec_len = (char *)top - (char *)d;
872         }
873
874         t = (struct ext2_dir_entry_tail *)top;
875         if (t->det_reserved_zero1 ||
876             t->det_rec_len != sizeof(struct ext2_dir_entry_tail) ||
877             t->det_reserved_name_len != EXT2_DIR_NAME_LEN_CSUM)
878                 ext2fs_initialize_dirent_tail(fs, t);
879
880         return 0;
881 }
882 #undef NEXT_DIRENT
883
884 static errcode_t fix_inline_dir_size(e2fsck_t ctx, ext2_ino_t ino,
885                                      size_t *inline_data_size,
886                                      struct problem_context *pctx,
887                                      char *buf)
888 {
889         ext2_filsys fs = ctx->fs;
890         struct ext2_inode inode;
891         size_t new_size, old_size;
892         errcode_t retval;
893
894         old_size = *inline_data_size;
895         /*
896          * If there's not enough bytes to start the "second" dir block
897          * (in the EA space) then truncate everything to the first block.
898          */
899         if (old_size > EXT4_MIN_INLINE_DATA_SIZE &&
900             old_size < EXT4_MIN_INLINE_DATA_SIZE +
901                        EXT2_DIR_REC_LEN(1)) {
902                 old_size = EXT4_MIN_INLINE_DATA_SIZE;
903                 new_size = old_size;
904         } else
905                 /* Increase to the next four-byte boundary for salvaging */
906                 new_size = old_size + (4 - (old_size & 3));
907         memset(buf + old_size, 0, new_size - old_size);
908         retval = ext2fs_inline_data_set(fs, ino, 0, buf, new_size);
909         if (retval == EXT2_ET_INLINE_DATA_NO_SPACE) {
910                 /* Or we can't, so truncate. */
911                 new_size -= 4;
912                 retval = ext2fs_inline_data_set(fs, ino, 0, buf, new_size);
913                 if (retval) {
914                         if (fix_problem(ctx, PR_2_FIX_INLINE_DIR_FAILED,
915                                         pctx)) {
916                                 new_size = 0;
917                                 goto write_inode;
918                         }
919                         goto err;
920                 }
921         } else if (retval) {
922                 if (fix_problem(ctx, PR_2_FIX_INLINE_DIR_FAILED,
923                                 pctx)) {
924                         new_size = 0;
925                         goto write_inode;
926                 }
927                 goto err;
928         }
929
930 write_inode:
931         retval = ext2fs_read_inode(fs, ino, &inode);
932         if (retval)
933                 goto err;
934
935         retval = ext2fs_inode_size_set(fs, &inode, new_size);
936         if (retval)
937                 goto err;
938         if (new_size == 0)
939                 inode.i_flags &= ~EXT4_INLINE_DATA_FL;
940         retval = ext2fs_write_inode(fs, ino, &inode);
941         if (retval)
942                 goto err;
943         *inline_data_size = new_size;
944
945 err:
946         return retval;
947 }
948
949 /* Return true if this type of file needs encryption */
950 static int needs_encryption(e2fsck_t ctx, const struct ext2_dir_entry *dirent)
951 {
952         int filetype = ext2fs_dirent_file_type(dirent);
953         ext2_ino_t ino = dirent->inode;
954         struct ext2_inode inode;
955
956         if (filetype != EXT2_FT_UNKNOWN)
957                 return filetype == EXT2_FT_REG_FILE ||
958                        filetype == EXT2_FT_DIR ||
959                        filetype == EXT2_FT_SYMLINK;
960
961         if (ext2fs_test_inode_bitmap2(ctx->inode_reg_map, ino) ||
962             ext2fs_test_inode_bitmap2(ctx->inode_dir_map, ino))
963                 return 1;
964
965         e2fsck_read_inode(ctx, ino, &inode, "check_encryption_policy");
966         return LINUX_S_ISREG(inode.i_mode) ||
967                LINUX_S_ISDIR(inode.i_mode) ||
968                LINUX_S_ISLNK(inode.i_mode);
969 }
970
971 /*
972  * All regular files, directories, and symlinks in encrypted directories must be
973  * encrypted using the same encryption policy as their directory.
974  *
975  * Returns 1 if the dirent should be cleared, otherwise 0.
976  */
977 static int check_encryption_policy(e2fsck_t ctx,
978                                    const struct ext2_dir_entry *dirent,
979                                    __u32 dir_encpolicy_id,
980                                    struct problem_context *pctx)
981 {
982         __u32 file_encpolicy_id = find_encryption_policy(ctx, dirent->inode);
983
984         /* Same policy or both UNRECOGNIZED_ENCRYPTION_POLICY? */
985         if (file_encpolicy_id == dir_encpolicy_id)
986                 return 0;
987
988         if (file_encpolicy_id == NO_ENCRYPTION_POLICY) {
989                 if (!needs_encryption(ctx, dirent))
990                         return 0;
991                 return fix_problem(ctx, PR_2_UNENCRYPTED_FILE, pctx);
992         }
993
994         return fix_problem(ctx, PR_2_INCONSISTENT_ENCRYPTION_POLICY, pctx);
995 }
996
997 /*
998  * Check an encrypted directory entry.
999  *
1000  * Returns 1 if the dirent should be cleared, otherwise 0.
1001  */
1002 static int check_encrypted_dirent(e2fsck_t ctx,
1003                                   const struct ext2_dir_entry *dirent,
1004                                   __u32 dir_encpolicy_id,
1005                                   struct problem_context *pctx)
1006 {
1007         if (encrypted_check_name(ctx, dirent, pctx))
1008                 return 1;
1009         if (check_encryption_policy(ctx, dirent, dir_encpolicy_id, pctx))
1010                 return 1;
1011         return 0;
1012 }
1013
1014 static int check_dir_block2(ext2_filsys fs,
1015                            struct ext2_db_entry2 *db,
1016                            void *priv_data)
1017 {
1018         int err;
1019         struct check_dir_struct *cd = priv_data;
1020
1021         if (cd->ra_entries && cd->list_offset >= cd->next_ra_off) {
1022                 err = e2fsck_readahead_dblist(fs,
1023                                         E2FSCK_RA_DBLIST_IGNORE_BLOCKCNT,
1024                                         fs->dblist,
1025                                         cd->list_offset + cd->ra_entries / 8,
1026                                         cd->ra_entries);
1027                 if (err)
1028                         cd->ra_entries = 0;
1029                 cd->next_ra_off = cd->list_offset + (cd->ra_entries * 7 / 8);
1030         }
1031
1032         err = check_dir_block(fs, db, priv_data);
1033         cd->list_offset++;
1034         return err;
1035 }
1036
1037 static int check_dir_block(ext2_filsys fs,
1038                            struct ext2_db_entry2 *db,
1039                            void *priv_data)
1040 {
1041         struct dx_dir_info      *dx_dir;
1042         struct dx_dirblock_info *dx_db = 0;
1043         struct ext2_dir_entry   *dirent, *prev, dot, dotdot;
1044         ext2_dirhash_t          hash;
1045         unsigned int            offset = 0;
1046         int                     dir_modified = 0;
1047         int                     dot_state;
1048         unsigned int            rec_len;
1049         blk64_t                 block_nr = db->blk;
1050         ext2_ino_t              ino = db->ino;
1051         ext2_ino_t              subdir_parent;
1052         __u16                   links;
1053         struct check_dir_struct *cd;
1054         char                    *buf, *ibuf;
1055         e2fsck_t                ctx;
1056         problem_t               problem;
1057         struct ext2_dx_root_info *root;
1058         struct ext2_dx_countlimit *limit;
1059         static dict_t de_dict;
1060         struct problem_context  pctx;
1061         int     dups_found = 0;
1062         int     ret;
1063         int     dx_csum_size = 0, de_csum_size = 0;
1064         int     failed_csum = 0;
1065         int     is_leaf = 1;
1066         size_t  inline_data_size = 0;
1067         int     filetype = 0;
1068         __u32   dir_encpolicy_id = NO_ENCRYPTION_POLICY;
1069         int     hash_in_dirent = 0;
1070         int     casefolded = 0;
1071         size_t  max_block_size;
1072         int     hash_flags = 0;
1073         static char *eop_read_dirblock = NULL;
1074         int cf_dir = 0;
1075
1076         cd = (struct check_dir_struct *) priv_data;
1077         ibuf = buf = cd->buf;
1078         ctx = cd->ctx;
1079
1080         /* We only want filename encoding verification on strict
1081          * mode or if explicitly requested by user. */
1082         if (ext2fs_test_inode_bitmap2(ctx->inode_casefold_map, ino) &&
1083             ((ctx->fs->super->s_encoding_flags & EXT4_ENC_STRICT_MODE_FL) ||
1084              (ctx->options & E2F_OPT_CHECK_ENCODING)))
1085                 cf_dir = 1;
1086
1087         if (ctx->flags & E2F_FLAG_RUN_RETURN)
1088                 return DIRENT_ABORT;
1089
1090         if (ctx->progress && (ctx->progress)(ctx, 2, cd->count++, cd->max))
1091                 return DIRENT_ABORT;
1092
1093         if (ext2fs_has_feature_metadata_csum(fs->super)) {
1094                 dx_csum_size = sizeof(struct ext2_dx_tail);
1095                 de_csum_size = sizeof(struct ext2_dir_entry_tail);
1096         }
1097
1098         if (ext2fs_has_feature_filetype(fs->super))
1099                 filetype = EXT2_FT_DIR << 8;
1100
1101         /*
1102          * Make sure the inode is still in use (could have been
1103          * deleted in the duplicate/bad blocks pass.
1104          */
1105         if (!(ext2fs_test_inode_bitmap2(ctx->inode_used_map, ino)))
1106                 return 0;
1107
1108         cd->pctx.ino = ino;
1109         cd->pctx.blk = block_nr;
1110         cd->pctx.blkcount = db->blockcnt;
1111         cd->pctx.ino2 = 0;
1112         cd->pctx.dirent = 0;
1113         cd->pctx.num = 0;
1114
1115         if (ext2fs_has_feature_inline_data(fs->super)) {
1116                 errcode_t ec;
1117
1118                 ec = ext2fs_inline_data_size(fs, ino, &inline_data_size);
1119                 if (ec && ec != EXT2_ET_NO_INLINE_DATA)
1120                         return DIRENT_ABORT;
1121         }
1122
1123         /* This will allow (at some point in the future) to punch out empty
1124          * directory blocks and reduce the space used by a directory that grows
1125          * very large and then the files are deleted. For now, all that is
1126          * needed is to avoid e2fsck filling in these holes as part of
1127          * feature flag. */
1128         if (db->blk == 0 && ext2fs_has_feature_largedir(fs->super) &&
1129             !ext2fs_has_feature_inline_data(fs->super))
1130                 return 0;
1131
1132         if (db->blk == 0 && !inline_data_size) {
1133                 if (allocate_dir_block(ctx, db, buf, &cd->pctx))
1134                         return 0;
1135                 block_nr = db->blk;
1136         }
1137
1138         if (db->blockcnt)
1139                 dot_state = 2;
1140         else
1141                 dot_state = 0;
1142
1143         if (ctx->dirs_to_hash &&
1144             ext2fs_u32_list_test(ctx->dirs_to_hash, ino))
1145                 dups_found++;
1146
1147 #if 0
1148         printf("In process_dir_block block %lu, #%d, inode %lu\n", block_nr,
1149                db->blockcnt, ino);
1150 #endif
1151
1152         if (!eop_read_dirblock)
1153                 eop_read_dirblock = (char *) _("reading directory block");
1154         ehandler_operation(eop_read_dirblock);
1155         if (inline_data_size) {
1156                 memset(buf, 0, fs->blocksize - inline_data_size);
1157                 cd->pctx.errcode = ext2fs_inline_data_get(fs, ino, 0, buf, 0);
1158                 if (cd->pctx.errcode)
1159                         goto inline_read_fail;
1160 #ifdef WORDS_BIGENDIAN
1161                 if (db->blockcnt)
1162                         goto skip_first_read_swab;
1163                 *((__u32 *)buf) = ext2fs_le32_to_cpu(*((__u32 *)buf));
1164                 cd->pctx.errcode = ext2fs_dirent_swab_in2(fs,
1165                                 buf + EXT4_INLINE_DATA_DOTDOT_SIZE,
1166                                 EXT4_MIN_INLINE_DATA_SIZE - EXT4_INLINE_DATA_DOTDOT_SIZE,
1167                                 0);
1168                 if (cd->pctx.errcode)
1169                         goto inline_read_fail;
1170 skip_first_read_swab:
1171                 if (inline_data_size <= EXT4_MIN_INLINE_DATA_SIZE ||
1172                     !db->blockcnt)
1173                         goto inline_read_fail;
1174                 cd->pctx.errcode = ext2fs_dirent_swab_in2(fs,
1175                                 buf + EXT4_MIN_INLINE_DATA_SIZE,
1176                                 inline_data_size - EXT4_MIN_INLINE_DATA_SIZE,
1177                                 0);
1178 #endif
1179         } else
1180                 cd->pctx.errcode = ext2fs_read_dir_block4(fs, block_nr,
1181                                                           buf, 0, ino);
1182 inline_read_fail:
1183         pctx.ino = ino;
1184         pctx.num = inline_data_size;
1185         if (((inline_data_size & 3) ||
1186              (inline_data_size > EXT4_MIN_INLINE_DATA_SIZE &&
1187               inline_data_size < EXT4_MIN_INLINE_DATA_SIZE +
1188                                  EXT2_DIR_REC_LEN(1))) &&
1189             fix_problem(ctx, PR_2_BAD_INLINE_DIR_SIZE, &pctx)) {
1190                 errcode_t err = fix_inline_dir_size(ctx, ino,
1191                                                     &inline_data_size, &pctx,
1192                                                     buf);
1193                 if (err)
1194                         return DIRENT_ABORT;
1195
1196         }
1197         ehandler_operation(0);
1198         if (cd->pctx.errcode == EXT2_ET_DIR_CORRUPTED)
1199                 cd->pctx.errcode = 0; /* We'll handle this ourselves */
1200         else if (cd->pctx.errcode == EXT2_ET_DIR_CSUM_INVALID) {
1201                 cd->pctx.errcode = 0; /* We'll handle this ourselves */
1202                 failed_csum = 1;
1203         }
1204         if (cd->pctx.errcode) {
1205                 char *buf2;
1206                 if (!fix_problem(ctx, PR_2_READ_DIRBLOCK, &cd->pctx)) {
1207                         ctx->flags |= E2F_FLAG_ABORT;
1208                         return DIRENT_ABORT;
1209                 }
1210                 ext2fs_new_dir_block(fs, db->blockcnt == 0 ? ino : 0,
1211                                      EXT2_ROOT_INO, &buf2);
1212                 memcpy(buf, buf2, fs->blocksize);
1213                 ext2fs_free_mem(&buf2);
1214         }
1215         dx_dir = e2fsck_get_dx_dir_info(ctx, ino);
1216         if (dx_dir && dx_dir->numblocks) {
1217                 if (db->blockcnt >= dx_dir->numblocks) {
1218                         pctx.dir = ino;
1219                         if (fix_problem(ctx, PR_2_UNEXPECTED_HTREE_BLOCK,
1220                                         &pctx)) {
1221                                 clear_htree(ctx, ino);
1222                                 dx_dir->numblocks = 0;
1223                                 dx_db = 0;
1224                                 goto out_htree;
1225                         }
1226                         fatal_error(ctx, _("Can not continue."));
1227                 }
1228                 dx_db = &dx_dir->dx_block[db->blockcnt];
1229                 dx_db->type = DX_DIRBLOCK_LEAF;
1230                 dx_db->phys = block_nr;
1231                 dx_db->min_hash = ~0;
1232                 dx_db->max_hash = 0;
1233
1234                 dirent = (struct ext2_dir_entry *) buf;
1235                 (void) ext2fs_get_rec_len(fs, dirent, &rec_len);
1236                 limit = (struct ext2_dx_countlimit *) (buf+8);
1237                 if (db->blockcnt == 0) {
1238                         root = (struct ext2_dx_root_info *) (buf + 24);
1239                         dx_db->type = DX_DIRBLOCK_ROOT;
1240                         dx_db->flags |= DX_FLAG_FIRST | DX_FLAG_LAST;
1241
1242                         /* large_dir was set in pass1 if large dirs were found,
1243                          * so ext2_dir_htree_level() should now be correct */
1244                         if ((root->reserved_zero ||
1245                              root->info_length < 8 ||
1246                              root->indirect_levels >=
1247                              ext2_dir_htree_level(fs)) &&
1248                             fix_problem(ctx, PR_2_HTREE_BAD_ROOT, &cd->pctx)) {
1249                                 clear_htree(ctx, ino);
1250                                 dx_dir->numblocks = 0;
1251                                 dx_db = NULL;
1252                         }
1253                         dx_dir->hashversion = root->hash_version;
1254                         if ((dx_dir->hashversion <= EXT2_HASH_TEA) &&
1255                             (fs->super->s_flags & EXT2_FLAGS_UNSIGNED_HASH))
1256                                 dx_dir->hashversion += 3;
1257                         dx_dir->depth = root->indirect_levels + 1;
1258                 } else if ((dirent->inode == 0) &&
1259                            (rec_len == fs->blocksize) &&
1260                            (ext2fs_dirent_name_len(dirent) == 0) &&
1261                            (ext2fs_le16_to_cpu(limit->limit) ==
1262                             ((fs->blocksize - (8 + dx_csum_size)) /
1263                              sizeof(struct ext2_dx_entry)))) {
1264                         dx_db->type = DX_DIRBLOCK_NODE;
1265                 }
1266                 is_leaf = dx_db ? (dx_db->type == DX_DIRBLOCK_LEAF) : 0;
1267         }
1268 out_htree:
1269
1270         /* Leaf node with no space for csum?  Rebuild dirs in pass 3A. */
1271         if (is_leaf && !inline_data_size && failed_csum &&
1272             !ext2fs_dirent_has_tail(fs, (struct ext2_dir_entry *)buf)) {
1273                 de_csum_size = 0;
1274                 if (e2fsck_dir_will_be_rehashed(ctx, ino)) {
1275                         failed_csum = 0;
1276                         goto skip_checksum;
1277                 }
1278                 if (!fix_problem(cd->ctx, PR_2_LEAF_NODE_MISSING_CSUM,
1279                                  &cd->pctx))
1280                         goto skip_checksum;
1281                 e2fsck_rehash_dir_later(ctx, ino);
1282                 failed_csum = 0;
1283                 goto skip_checksum;
1284         }
1285         /* htree nodes don't use fake dirents to store checksums */
1286         if (!is_leaf)
1287                 de_csum_size = 0;
1288
1289 skip_checksum:
1290         if (inline_data_size) {
1291                 if (db->blockcnt) {
1292                         buf += EXT4_MIN_INLINE_DATA_SIZE;
1293                         max_block_size = inline_data_size - EXT4_MIN_INLINE_DATA_SIZE;
1294                         /* Zero-length second block, just exit */
1295                         if (max_block_size == 0)
1296                                 return 0;
1297                 } else {
1298                         max_block_size = EXT4_MIN_INLINE_DATA_SIZE;
1299                 }
1300         } else
1301                 max_block_size = fs->blocksize - de_csum_size;
1302
1303         dir_encpolicy_id = find_encryption_policy(ctx, ino);
1304
1305         if (cf_dir) {
1306                 dict_init(&de_dict, DICTCOUNT_T_MAX, dict_de_cf_cmp);
1307                 dict_set_cmp_context(&de_dict, (const void *)ctx->fs->encoding);
1308         } else {
1309                 dict_init(&de_dict, DICTCOUNT_T_MAX, dict_de_cmp);
1310         }
1311         if (ctx->casefolded_dirs)
1312                 casefolded = ext2fs_u32_list_test(ctx->casefolded_dirs, ino);
1313         hash_in_dirent = (casefolded &&
1314                           (dir_encpolicy_id != NO_ENCRYPTION_POLICY));
1315
1316         prev = 0;
1317         do {
1318                 dgrp_t group;
1319                 ext2_ino_t first_unused_inode;
1320                 unsigned int name_len;
1321                 /* csum entry is not checked here, so don't worry about it */
1322                 int extended = (dot_state > 1) && hash_in_dirent;
1323                 unsigned int min_dir_len = ext2fs_dir_rec_len(1, extended);
1324
1325                 problem = 0;
1326                 if (!inline_data_size || dot_state > 1) {
1327                         dirent = (struct ext2_dir_entry *) (buf + offset);
1328                         /*
1329                          * If there's not even space for the entry header,
1330                          * force salvaging this dir.
1331                          */
1332                         if (max_block_size - offset < EXT2_DIR_ENTRY_HEADER_LEN)
1333                                 rec_len = ext2fs_dir_rec_len(1, extended);
1334                         else
1335                                 (void) ext2fs_get_rec_len(fs, dirent, &rec_len);
1336                         cd->pctx.dirent = dirent;
1337                         cd->pctx.num = offset;
1338                         if ((offset + rec_len > max_block_size) ||
1339                             (rec_len < min_dir_len) ||
1340                             ((rec_len % 4) != 0) ||
1341                             ((ext2fs_dir_rec_len(ext2fs_dirent_name_len(dirent),
1342                                                  extended)) > rec_len)) {
1343                                 if (fix_problem(ctx, PR_2_DIR_CORRUPTED,
1344                                                 &cd->pctx)) {
1345 #ifdef WORDS_BIGENDIAN
1346                                         /*
1347                                          * On big-endian systems, if the dirent
1348                                          * swap routine finds a rec_len that it
1349                                          * doesn't like, it continues
1350                                          * processing the block as if rec_len
1351                                          * == EXT2_DIR_ENTRY_HEADER_LEN.  This means that the name
1352                                          * field gets byte swapped, which means
1353                                          * that salvage will not detect the
1354                                          * correct name length (unless the name
1355                                          * has a length that's an exact
1356                                          * multiple of four bytes), and it'll
1357                                          * discard the entry (unnecessarily)
1358                                          * and the rest of the dirent block.
1359                                          * Therefore, swap the rest of the
1360                                          * block back to disk order, run
1361                                          * salvage, and re-swap anything after
1362                                          * the salvaged dirent.
1363                                          */
1364                                         int need_reswab = 0;
1365                                         if (rec_len < EXT2_DIR_ENTRY_HEADER_LEN || rec_len % 4) {
1366                                                 need_reswab = 1;
1367                                                 ext2fs_dirent_swab_in2(fs,
1368                                                         ((char *)dirent) + EXT2_DIR_ENTRY_HEADER_LEN,
1369                                                         max_block_size - offset - EXT2_DIR_ENTRY_HEADER_LEN,
1370                                                         0);
1371                                         }
1372 #endif
1373                                         salvage_directory(fs, dirent, prev,
1374                                                           &offset,
1375                                                           max_block_size,
1376                                                           hash_in_dirent);
1377 #ifdef WORDS_BIGENDIAN
1378                                         if (need_reswab) {
1379                                                 unsigned int len;
1380
1381                                                 (void) ext2fs_get_rec_len(fs,
1382                                                         dirent, &len);
1383                                                 len += offset;
1384                                                 if (max_block_size > len)
1385                                                         ext2fs_dirent_swab_in2(fs,
1386                                 ((char *)dirent) + len, max_block_size - len, 0);
1387                                         }
1388 #endif
1389                                         dir_modified++;
1390                                         continue;
1391                                 } else
1392                                         goto abort_free_dict;
1393                         }
1394                 } else {
1395                         if (dot_state == 0) {
1396                                 memset(&dot, 0, sizeof(dot));
1397                                 dirent = &dot;
1398                                 dirent->inode = ino;
1399                                 dirent->rec_len = EXT2_DIR_REC_LEN(1);
1400                                 dirent->name_len = 1 | filetype;
1401                                 dirent->name[0] = '.';
1402                         } else if (dot_state == 1) {
1403                                 memset(&dotdot, 0, sizeof(dotdot));
1404                                 dirent = &dotdot;
1405                                 dirent->inode =
1406                                         ((struct ext2_dir_entry *)buf)->inode;
1407                                 dirent->rec_len = EXT2_DIR_REC_LEN(2);
1408                                 dirent->name_len = 2 | filetype;
1409                                 dirent->name[0] = '.';
1410                                 dirent->name[1] = '.';
1411                         } else {
1412                                 fatal_error(ctx, _("Can not continue."));
1413                         }
1414                         cd->pctx.dirent = dirent;
1415                         cd->pctx.num = offset;
1416                 }
1417
1418                 if (dot_state == 0) {
1419                         if (check_dot(ctx, dirent, ino, &cd->pctx))
1420                                 dir_modified++;
1421                 } else if (dot_state == 1) {
1422                         ret = check_dotdot(ctx, dirent, ino, &cd->pctx);
1423                         if (ret < 0)
1424                                 goto abort_free_dict;
1425                         if (ret)
1426                                 dir_modified++;
1427                 } else if (dirent->inode == ino) {
1428                         problem = PR_2_LINK_DOT;
1429                         if (fix_problem(ctx, PR_2_LINK_DOT, &cd->pctx)) {
1430                                 dirent->inode = 0;
1431                                 dir_modified++;
1432                                 goto next;
1433                         }
1434                 }
1435                 if (!dirent->inode)
1436                         goto next;
1437
1438                 /*
1439                  * Make sure the inode listed is a legal one.
1440                  */
1441                 name_len = ext2fs_dirent_name_len(dirent);
1442                 if (((dirent->inode != EXT2_ROOT_INO) &&
1443                      (dirent->inode < EXT2_FIRST_INODE(fs->super))) ||
1444                     (dirent->inode > fs->super->s_inodes_count) ||
1445                     (dirent->inode == fs->super->s_usr_quota_inum) ||
1446                     (dirent->inode == fs->super->s_grp_quota_inum) ||
1447                     (dirent->inode == fs->super->s_prj_quota_inum) ||
1448                     (dirent->inode == fs->super->s_orphan_file_inum)) {
1449                         problem = PR_2_BAD_INO;
1450                 } else if (ctx->inode_bb_map &&
1451                            (ext2fs_test_inode_bitmap2(ctx->inode_bb_map,
1452                                                      dirent->inode))) {
1453                         /*
1454                          * If the inode is in a bad block, offer to
1455                          * clear it.
1456                          */
1457                         problem = PR_2_BB_INODE;
1458                 } else if ((dot_state > 1) && (name_len == 1) &&
1459                            (dirent->name[0] == '.')) {
1460                         /*
1461                          * If there's a '.' entry in anything other
1462                          * than the first directory entry, it's a
1463                          * duplicate entry that should be removed.
1464                          */
1465                         problem = PR_2_DUP_DOT;
1466                 } else if ((dot_state > 1) && (name_len == 2) &&
1467                            (dirent->name[0] == '.') &&
1468                            (dirent->name[1] == '.')) {
1469                         /*
1470                          * If there's a '..' entry in anything other
1471                          * than the second directory entry, it's a
1472                          * duplicate entry that should be removed.
1473                          */
1474                         problem = PR_2_DUP_DOT_DOT;
1475                 } else if ((dot_state > 1) &&
1476                            (dirent->inode == EXT2_ROOT_INO)) {
1477                         /*
1478                          * Don't allow links to the root directory.
1479                          * We check this specially to make sure we
1480                          * catch this error case even if the root
1481                          * directory hasn't been created yet.
1482                          */
1483                         problem = PR_2_LINK_ROOT;
1484                 } else if ((dot_state > 1) && (name_len == 0)) {
1485                         /*
1486                          * Don't allow zero-length directory names.
1487                          */
1488                         problem = PR_2_NULL_NAME;
1489                 }
1490
1491                 if (problem) {
1492                         if (fix_problem(ctx, problem, &cd->pctx)) {
1493                                 dirent->inode = 0;
1494                                 dir_modified++;
1495                                 goto next;
1496                         } else {
1497                                 ext2fs_unmark_valid(fs);
1498                                 if (problem == PR_2_BAD_INO)
1499                                         goto next;
1500                         }
1501                 }
1502
1503                 /*
1504                  * If the inode was marked as having bad fields in
1505                  * pass1, process it and offer to fix/clear it.
1506                  * (We wait until now so that we can display the
1507                  * pathname to the user.)
1508                  */
1509                 if (ctx->inode_bad_map &&
1510                     ext2fs_test_inode_bitmap2(ctx->inode_bad_map,
1511                                              dirent->inode)) {
1512                         if (e2fsck_process_bad_inode(ctx, ino,
1513                                                      dirent->inode,
1514                                                      buf + fs->blocksize)) {
1515                                 dirent->inode = 0;
1516                                 dir_modified++;
1517                                 goto next;
1518                         }
1519                         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1520                                 return DIRENT_ABORT;
1521                 }
1522
1523                 group = ext2fs_group_of_ino(fs, dirent->inode);
1524                 first_unused_inode = group * fs->super->s_inodes_per_group +
1525                                         1 + fs->super->s_inodes_per_group -
1526                                         ext2fs_bg_itable_unused(fs, group);
1527                 cd->pctx.group = group;
1528
1529                 /*
1530                  * Check if the inode was missed out because
1531                  * _INODE_UNINIT flag was set or bg_itable_unused was
1532                  * incorrect.  If so, clear the _INODE_UNINIT flag and
1533                  * restart e2fsck.  In the future it would be nice if
1534                  * we could call a function in pass1.c that checks the
1535                  * newly visible inodes.
1536                  */
1537                 if (ext2fs_bg_flags_test(fs, group, EXT2_BG_INODE_UNINIT)) {
1538                         pctx.num = dirent->inode;
1539                         if (fix_problem(ctx, PR_2_INOREF_BG_INO_UNINIT,
1540                                         &cd->pctx)){
1541                                 ext2fs_bg_flags_clear(fs, group,
1542                                                       EXT2_BG_INODE_UNINIT);
1543                                 ext2fs_group_desc_csum_set(fs, group);
1544                                 ext2fs_mark_super_dirty(fs);
1545                                 ctx->flags |= E2F_FLAG_RESTART_LATER;
1546                         } else {
1547                                 ext2fs_unmark_valid(fs);
1548                                 if (problem == PR_2_BAD_INO)
1549                                         goto next;
1550                         }
1551                 } else if (dirent->inode >= first_unused_inode) {
1552                         pctx.num = dirent->inode;
1553                         if (fix_problem(ctx, PR_2_INOREF_IN_UNUSED, &cd->pctx)){
1554                                 ext2fs_bg_itable_unused_set(fs, group, 0);
1555                                 ext2fs_group_desc_csum_set(fs, group);
1556                                 ext2fs_mark_super_dirty(fs);
1557                                 ctx->flags |= E2F_FLAG_RESTART_LATER;
1558                         } else {
1559                                 ext2fs_unmark_valid(fs);
1560                                 if (problem == PR_2_BAD_INO)
1561                                         goto next;
1562                         }
1563                 }
1564
1565                 /* 
1566                  * Offer to clear unused inodes; if we are going to be
1567                  * restarting the scan due to bg_itable_unused being
1568                  * wrong, then don't clear any inodes to avoid zapping
1569                  * inodes that were skipped during pass1 due to an
1570                  * incorrect bg_itable_unused; we'll get any real
1571                  * problems after we restart.
1572                  */
1573                 if (!(ctx->flags & E2F_FLAG_RESTART_LATER) &&
1574                     !(ext2fs_test_inode_bitmap2(ctx->inode_used_map,
1575                                                 dirent->inode)))
1576                         problem = PR_2_UNUSED_INODE;
1577
1578                 if (problem) {
1579                         if (fix_problem(ctx, problem, &cd->pctx)) {
1580                                 dirent->inode = 0;
1581                                 dir_modified++;
1582                                 goto next;
1583                         } else {
1584                                 ext2fs_unmark_valid(fs);
1585                                 if (problem == PR_2_BAD_INO)
1586                                         goto next;
1587                         }
1588                 }
1589
1590                 if (check_filetype(ctx, dirent, ino, &cd->pctx))
1591                         dir_modified++;
1592
1593                 if (dir_encpolicy_id != NO_ENCRYPTION_POLICY) {
1594                         /* Encrypted directory */
1595                         if (dot_state > 1 &&
1596                             check_encrypted_dirent(ctx, dirent,
1597                                                    dir_encpolicy_id,
1598                                                    &cd->pctx)) {
1599                                 dirent->inode = 0;
1600                                 dir_modified++;
1601                                 goto next;
1602                         }
1603                 } else if (cf_dir) {
1604                         /* Casefolded directory */
1605                         if (encoded_check_name(ctx, dirent, &cd->pctx))
1606                                 dir_modified++;
1607                 } else {
1608                         /* Unencrypted and uncasefolded directory */
1609                         if (check_name(ctx, dirent, &cd->pctx))
1610                                 dir_modified++;
1611                 }
1612
1613                 if (dx_db) {
1614                         if (dx_dir->casefolded_hash)
1615                                 hash_flags = EXT4_CASEFOLD_FL;
1616
1617                         if (dx_dir->hashversion == EXT2_HASH_SIPHASH) {
1618                                 if (dot_state > 1)
1619                                         hash = EXT2_DIRENT_HASH(dirent);
1620                         } else {
1621                                 ext2fs_dirhash2(dx_dir->hashversion,
1622                                                 dirent->name,
1623                                                 ext2fs_dirent_name_len(dirent),
1624                                                 fs->encoding, hash_flags,
1625                                                 fs->super->s_hash_seed,
1626                                                 &hash, 0);
1627                         }
1628                         if (hash < dx_db->min_hash)
1629                                 dx_db->min_hash = hash;
1630                         if (hash > dx_db->max_hash)
1631                                 dx_db->max_hash = hash;
1632                 }
1633
1634                 /*
1635                  * If this is a directory, then mark its parent in its
1636                  * dir_info structure.  If the parent field is already
1637                  * filled in, then this directory has more than one
1638                  * hard link.  We assume the first link is correct,
1639                  * and ask the user if he/she wants to clear this one.
1640                  */
1641                 if ((dot_state > 1) &&
1642                     (ext2fs_test_inode_bitmap2(ctx->inode_dir_map,
1643                                               dirent->inode))) {
1644                         if (e2fsck_dir_info_get_parent(ctx, dirent->inode,
1645                                                        &subdir_parent)) {
1646                                 cd->pctx.ino = dirent->inode;
1647                                 fix_problem(ctx, PR_2_NO_DIRINFO, &cd->pctx);
1648                                 goto abort_free_dict;
1649                         }
1650                         if (subdir_parent) {
1651                                 cd->pctx.ino2 = subdir_parent;
1652                                 if (fix_problem(ctx, PR_2_LINK_DIR,
1653                                                 &cd->pctx)) {
1654                                         dirent->inode = 0;
1655                                         dir_modified++;
1656                                         goto next;
1657                                 }
1658                                 cd->pctx.ino2 = 0;
1659                         } else {
1660                                 (void) e2fsck_dir_info_set_parent(ctx,
1661                                                   dirent->inode, ino);
1662                         }
1663                 }
1664
1665                 if (dups_found) {
1666                         ;
1667                 } else if (dict_lookup(&de_dict, dirent)) {
1668                         clear_problem_context(&pctx);
1669                         pctx.ino = ino;
1670                         pctx.dirent = dirent;
1671                         fix_problem(ctx, PR_2_REPORT_DUP_DIRENT, &pctx);
1672                         e2fsck_rehash_dir_later(ctx, ino);
1673                         dups_found++;
1674                 } else
1675                         dict_alloc_insert(&de_dict, dirent, dirent);
1676
1677                 ext2fs_icount_increment(ctx->inode_count, dirent->inode,
1678                                         &links);
1679                 if (links > 1)
1680                         ctx->fs_links_count++;
1681                 ctx->fs_total_count++;
1682         next:
1683                 prev = dirent;
1684                 if (dir_modified)
1685                         (void) ext2fs_get_rec_len(fs, dirent, &rec_len);
1686                 if (!inline_data_size || dot_state > 1) {
1687                         offset += rec_len;
1688                 } else {
1689                         if (dot_state == 1) {
1690                                 offset = 4;
1691                                 /*
1692                                  * If we get here, we're checking an inline
1693                                  * directory and we've just checked a (fake)
1694                                  * dotdot entry that we created on the stack.
1695                                  * Therefore set 'prev' to NULL so that if we
1696                                  * call salvage_directory on the next entry,
1697                                  * it won't try to absorb the next entry into
1698                                  * the on-stack dotdot entry.
1699                                  */
1700                                 prev = NULL;
1701                         }
1702                 }
1703                 dot_state++;
1704         } while (offset < max_block_size);
1705 #if 0
1706         printf("\n");
1707 #endif
1708         if (dx_db) {
1709 #ifdef DX_DEBUG
1710                 printf("db_block %d, type %d, min_hash 0x%0x, max_hash 0x%0x\n",
1711                        db->blockcnt, dx_db->type,
1712                        dx_db->min_hash, dx_db->max_hash);
1713 #endif
1714                 cd->pctx.dir = cd->pctx.ino;
1715                 if ((dx_db->type == DX_DIRBLOCK_ROOT) ||
1716                     (dx_db->type == DX_DIRBLOCK_NODE))
1717                         parse_int_node(fs, db, cd, dx_dir, buf, failed_csum);
1718         }
1719
1720         if (offset != max_block_size) {
1721                 cd->pctx.num = rec_len + offset - max_block_size;
1722                 if (fix_problem(ctx, PR_2_FINAL_RECLEN, &cd->pctx)) {
1723                         dirent->rec_len = cd->pctx.num;
1724                         dir_modified++;
1725                 }
1726         }
1727         if (dir_modified) {
1728                 int     flags, will_rehash;
1729                 /* leaf block with no tail?  Rehash dirs later. */
1730                 if (ext2fs_has_feature_metadata_csum(fs->super) &&
1731                     is_leaf &&
1732                     !inline_data_size &&
1733                     !ext2fs_dirent_has_tail(fs, (struct ext2_dir_entry *)buf)) {
1734                         if (insert_dirent_tail(fs, buf) == 0)
1735                                 goto write_and_fix;
1736                         e2fsck_rehash_dir_later(ctx, ino);
1737                 }
1738
1739 write_and_fix:
1740                 will_rehash = e2fsck_dir_will_be_rehashed(ctx, ino);
1741                 if (will_rehash) {
1742                         flags = ctx->fs->flags;
1743                         ctx->fs->flags |= EXT2_FLAG_IGNORE_CSUM_ERRORS;
1744                 }
1745                 if (inline_data_size) {
1746                         buf = ibuf;
1747 #ifdef WORDS_BIGENDIAN
1748                         if (db->blockcnt)
1749                                 goto skip_first_write_swab;
1750                         *((__u32 *)buf) = ext2fs_le32_to_cpu(*((__u32 *)buf));
1751                         cd->pctx.errcode = ext2fs_dirent_swab_out2(fs,
1752                                         buf + EXT4_INLINE_DATA_DOTDOT_SIZE,
1753                                         EXT4_MIN_INLINE_DATA_SIZE -
1754                                         EXT4_INLINE_DATA_DOTDOT_SIZE,
1755                                         0);
1756                         if (cd->pctx.errcode)
1757                                 goto skip_second_write_swab;
1758 skip_first_write_swab:
1759                         if (inline_data_size <= EXT4_MIN_INLINE_DATA_SIZE ||
1760                             !db->blockcnt)
1761                                 goto skip_second_write_swab;
1762                         cd->pctx.errcode = ext2fs_dirent_swab_out2(fs,
1763                                         buf + EXT4_MIN_INLINE_DATA_SIZE,
1764                                         inline_data_size -
1765                                         EXT4_MIN_INLINE_DATA_SIZE,
1766                                         0);
1767 skip_second_write_swab:
1768                         if (cd->pctx.errcode &&
1769                             !fix_problem(ctx, PR_2_WRITE_DIRBLOCK, &cd->pctx))
1770                                 goto abort_free_dict;
1771 #endif
1772                         cd->pctx.errcode =
1773                                 ext2fs_inline_data_set(fs, ino, 0, buf,
1774                                                        inline_data_size);
1775                 } else
1776                         cd->pctx.errcode = ext2fs_write_dir_block4(fs, block_nr,
1777                                                                    buf, 0, ino);
1778                 if (will_rehash)
1779                         ctx->fs->flags = (flags &
1780                                           EXT2_FLAG_IGNORE_CSUM_ERRORS) |
1781                                          (ctx->fs->flags &
1782                                           ~EXT2_FLAG_IGNORE_CSUM_ERRORS);
1783                 if (cd->pctx.errcode) {
1784                         if (!fix_problem(ctx, PR_2_WRITE_DIRBLOCK,
1785                                          &cd->pctx))
1786                                 goto abort_free_dict;
1787                 }
1788                 ext2fs_mark_changed(fs);
1789         } else if (is_leaf && failed_csum && !dir_modified) {
1790                 /*
1791                  * If a leaf node that fails csum makes it this far without
1792                  * alteration, ask the user if the checksum should be fixed.
1793                  */
1794                 if (fix_problem(ctx, PR_2_LEAF_NODE_ONLY_CSUM_INVALID,
1795                                 &cd->pctx))
1796                         goto write_and_fix;
1797         }
1798         dict_free_nodes(&de_dict);
1799         return 0;
1800 abort_free_dict:
1801         ctx->flags |= E2F_FLAG_ABORT;
1802         dict_free_nodes(&de_dict);
1803         return DIRENT_ABORT;
1804 }
1805
1806 struct del_block {
1807         e2fsck_t        ctx;
1808         e2_blkcnt_t     num;
1809         blk64_t last_cluster;
1810 };
1811
1812 /*
1813  * This function is called to deallocate a block, and is an interator
1814  * functioned called by deallocate inode via ext2fs_iterate_block().
1815  */
1816 static int deallocate_inode_block(ext2_filsys fs,
1817                                   blk64_t       *block_nr,
1818                                   e2_blkcnt_t blockcnt EXT2FS_ATTR((unused)),
1819                                   blk64_t ref_block EXT2FS_ATTR((unused)),
1820                                   int ref_offset EXT2FS_ATTR((unused)),
1821                                   void *priv_data)
1822 {
1823         struct del_block *p = priv_data;
1824         blk64_t cluster = EXT2FS_B2C(fs, *block_nr);
1825
1826         if (*block_nr == 0)
1827                 return 0;
1828
1829         if (cluster == p->last_cluster)
1830                 return 0;
1831
1832         p->last_cluster = cluster;
1833         if ((*block_nr < fs->super->s_first_data_block) ||
1834             (*block_nr >= ext2fs_blocks_count(fs->super)))
1835                 return 0;
1836
1837         ext2fs_block_alloc_stats2(fs, *block_nr, -1);
1838         p->num++;
1839         return 0;
1840 }
1841
1842 /*
1843  * This function deallocates an inode
1844  */
1845 static void deallocate_inode(e2fsck_t ctx, ext2_ino_t ino, char* block_buf)
1846 {
1847         ext2_filsys fs = ctx->fs;
1848         struct ext2_inode       inode;
1849         struct problem_context  pctx;
1850         __u32                   count;
1851         struct del_block        del_block;
1852
1853         e2fsck_read_inode(ctx, ino, &inode, "deallocate_inode");
1854         clear_problem_context(&pctx);
1855         pctx.ino = ino;
1856
1857         /*
1858          * Fix up the bitmaps...
1859          */
1860         e2fsck_read_bitmaps(ctx);
1861         ext2fs_inode_alloc_stats2(fs, ino, -1, LINUX_S_ISDIR(inode.i_mode));
1862
1863         if (ext2fs_file_acl_block(fs, &inode) &&
1864             ext2fs_has_feature_xattr(fs->super)) {
1865                 pctx.errcode = ext2fs_adjust_ea_refcount3(fs,
1866                                 ext2fs_file_acl_block(fs, &inode),
1867                                 block_buf, -1, &count, ino);
1868                 if (pctx.errcode == EXT2_ET_BAD_EA_BLOCK_NUM) {
1869                         pctx.errcode = 0;
1870                         count = 1;
1871                 }
1872                 if (pctx.errcode) {
1873                         pctx.blk = ext2fs_file_acl_block(fs, &inode);
1874                         fix_problem(ctx, PR_2_ADJ_EA_REFCOUNT, &pctx);
1875                         ctx->flags |= E2F_FLAG_ABORT;
1876                         return;
1877                 }
1878                 if (count == 0) {
1879                         ext2fs_block_alloc_stats2(fs,
1880                                   ext2fs_file_acl_block(fs, &inode), -1);
1881                 }
1882                 ext2fs_file_acl_block_set(fs, &inode, 0);
1883         }
1884
1885         if (!ext2fs_inode_has_valid_blocks2(fs, &inode))
1886                 goto clear_inode;
1887
1888         /* Inline data inodes don't have blocks to iterate */
1889         if (inode.i_flags & EXT4_INLINE_DATA_FL)
1890                 goto clear_inode;
1891
1892         if (ext2fs_needs_large_file_feature(EXT2_I_SIZE(&inode))) {
1893                 if (LINUX_S_ISREG(inode.i_mode))
1894                     ctx->large_files--;
1895                 else if (LINUX_S_ISDIR(inode.i_mode))
1896                     ctx->large_dirs--;
1897         }
1898
1899         del_block.ctx = ctx;
1900         del_block.num = 0;
1901         del_block.last_cluster = 0;
1902         pctx.errcode = ext2fs_block_iterate3(fs, ino, 0, block_buf,
1903                                              deallocate_inode_block,
1904                                              &del_block);
1905         if (pctx.errcode) {
1906                 fix_problem(ctx, PR_2_DEALLOC_INODE, &pctx);
1907                 ctx->flags |= E2F_FLAG_ABORT;
1908                 return;
1909         }
1910 clear_inode:
1911         /* Inode may have changed by block_iterate, so reread it */
1912         e2fsck_read_inode(ctx, ino, &inode, "deallocate_inode");
1913         e2fsck_clear_inode(ctx, ino, &inode, 0, "deallocate_inode");
1914 }
1915
1916 /*
1917  * This function clears the htree flag on an inode
1918  */
1919 static void clear_htree(e2fsck_t ctx, ext2_ino_t ino)
1920 {
1921         struct ext2_inode       inode;
1922
1923         e2fsck_read_inode(ctx, ino, &inode, "clear_htree");
1924         inode.i_flags = inode.i_flags & ~EXT2_INDEX_FL;
1925         e2fsck_write_inode(ctx, ino, &inode, "clear_htree");
1926         if (ctx->dirs_to_hash)
1927                 ext2fs_u32_list_add(ctx->dirs_to_hash, ino);
1928 }
1929
1930
1931 int e2fsck_process_bad_inode(e2fsck_t ctx, ext2_ino_t dir,
1932                              ext2_ino_t ino, char *buf)
1933 {
1934         ext2_filsys fs = ctx->fs;
1935         struct ext2_inode       inode;
1936         int                     inode_modified = 0;
1937         int                     not_fixed = 0;
1938         unsigned char           *frag, *fsize;
1939         struct problem_context  pctx;
1940         problem_t               problem = 0;
1941
1942         e2fsck_read_inode(ctx, ino, &inode, "process_bad_inode");
1943
1944         clear_problem_context(&pctx);
1945         pctx.ino = ino;
1946         pctx.dir = dir;
1947         pctx.inode = &inode;
1948
1949         if (ext2fs_file_acl_block(fs, &inode) &&
1950             !ext2fs_has_feature_xattr(fs->super)) {
1951                 if (fix_problem(ctx, PR_2_FILE_ACL_ZERO, &pctx)) {
1952                         ext2fs_file_acl_block_set(fs, &inode, 0);
1953                         inode_modified++;
1954                 } else
1955                         not_fixed++;
1956         }
1957
1958         if (!LINUX_S_ISDIR(inode.i_mode) && !LINUX_S_ISREG(inode.i_mode) &&
1959             !LINUX_S_ISCHR(inode.i_mode) && !LINUX_S_ISBLK(inode.i_mode) &&
1960             !LINUX_S_ISLNK(inode.i_mode) && !LINUX_S_ISFIFO(inode.i_mode) &&
1961             !(LINUX_S_ISSOCK(inode.i_mode)))
1962                 problem = PR_2_BAD_MODE;
1963         else if (LINUX_S_ISCHR(inode.i_mode)
1964                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1965                 problem = PR_2_BAD_CHAR_DEV;
1966         else if (LINUX_S_ISBLK(inode.i_mode)
1967                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1968                 problem = PR_2_BAD_BLOCK_DEV;
1969         else if (LINUX_S_ISFIFO(inode.i_mode)
1970                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1971                 problem = PR_2_BAD_FIFO;
1972         else if (LINUX_S_ISSOCK(inode.i_mode)
1973                  && !e2fsck_pass1_check_device_inode(fs, &inode))
1974                 problem = PR_2_BAD_SOCKET;
1975         else if (LINUX_S_ISLNK(inode.i_mode)
1976                  && !e2fsck_pass1_check_symlink(fs, ino, &inode, buf)) {
1977                 problem = PR_2_INVALID_SYMLINK;
1978         }
1979
1980         if (problem) {
1981                 if (fix_problem(ctx, problem, &pctx)) {
1982                         deallocate_inode(ctx, ino, 0);
1983                         if (ctx->flags & E2F_FLAG_SIGNAL_MASK)
1984                                 return 0;
1985                         return 1;
1986                 } else
1987                         not_fixed++;
1988                 problem = 0;
1989         }
1990
1991         if (inode.i_faddr) {
1992                 if (fix_problem(ctx, PR_2_FADDR_ZERO, &pctx)) {
1993                         inode.i_faddr = 0;
1994                         inode_modified++;
1995                 } else
1996                         not_fixed++;
1997         }
1998
1999         switch (fs->super->s_creator_os) {
2000             case EXT2_OS_HURD:
2001                 frag = &inode.osd2.hurd2.h_i_frag;
2002                 fsize = &inode.osd2.hurd2.h_i_fsize;
2003                 break;
2004             default:
2005                 frag = fsize = 0;
2006         }
2007         if (frag && *frag) {
2008                 pctx.num = *frag;
2009                 if (fix_problem(ctx, PR_2_FRAG_ZERO, &pctx)) {
2010                         *frag = 0;
2011                         inode_modified++;
2012                 } else
2013                         not_fixed++;
2014                 pctx.num = 0;
2015         }
2016         if (fsize && *fsize) {
2017                 pctx.num = *fsize;
2018                 if (fix_problem(ctx, PR_2_FSIZE_ZERO, &pctx)) {
2019                         *fsize = 0;
2020                         inode_modified++;
2021                 } else
2022                         not_fixed++;
2023                 pctx.num = 0;
2024         }
2025
2026         if ((fs->super->s_creator_os == EXT2_OS_LINUX) &&
2027             !ext2fs_has_feature_huge_file(fs->super) &&
2028             (inode.osd2.linux2.l_i_blocks_hi != 0)) {
2029                 pctx.num = inode.osd2.linux2.l_i_blocks_hi;
2030                 if (fix_problem(ctx, PR_2_BLOCKS_HI_ZERO, &pctx)) {
2031                         inode.osd2.linux2.l_i_blocks_hi = 0;
2032                         inode_modified++;
2033                 }
2034         }
2035
2036         if ((fs->super->s_creator_os == EXT2_OS_LINUX) &&
2037             !ext2fs_has_feature_64bit(fs->super) &&
2038             inode.osd2.linux2.l_i_file_acl_high != 0) {
2039                 pctx.num = inode.osd2.linux2.l_i_file_acl_high;
2040                 if (fix_problem(ctx, PR_2_I_FILE_ACL_HI_ZERO, &pctx)) {
2041                         inode.osd2.linux2.l_i_file_acl_high = 0;
2042                         inode_modified++;
2043                 } else
2044                         not_fixed++;
2045         }
2046
2047         if (ext2fs_file_acl_block(fs, &inode) &&
2048             ((ext2fs_file_acl_block(fs, &inode) < fs->super->s_first_data_block) ||
2049              (ext2fs_file_acl_block(fs, &inode) >= ext2fs_blocks_count(fs->super)))) {
2050                 if (fix_problem(ctx, PR_2_FILE_ACL_BAD, &pctx)) {
2051                         ext2fs_file_acl_block_set(fs, &inode, 0);
2052                         inode_modified++;
2053                 } else
2054                         not_fixed++;
2055         }
2056         if (inode.i_size_high && !ext2fs_has_feature_largedir(fs->super) &&
2057             inode.i_blocks < 1ULL << (29 - EXT2_BLOCK_SIZE_BITS(fs->super)) &&
2058             LINUX_S_ISDIR(inode.i_mode)) {
2059                 if (fix_problem(ctx, PR_2_DIR_SIZE_HIGH_ZERO, &pctx)) {
2060                         inode.i_size_high = 0;
2061                         inode_modified++;
2062                 } else
2063                         not_fixed++;
2064         }
2065
2066         if (inode_modified)
2067                 e2fsck_write_inode(ctx, ino, &inode, "process_bad_inode");
2068         if (!not_fixed && ctx->inode_bad_map)
2069                 ext2fs_unmark_inode_bitmap2(ctx->inode_bad_map, ino);
2070         return 0;
2071 }
2072
2073 /*
2074  * allocate_dir_block --- this function allocates a new directory
2075  *      block for a particular inode; this is done if a directory has
2076  *      a "hole" in it, or if a directory has a illegal block number
2077  *      that was zeroed out and now needs to be replaced.
2078  */
2079 static int allocate_dir_block(e2fsck_t ctx,
2080                               struct ext2_db_entry2 *db,
2081                               char *buf EXT2FS_ATTR((unused)),
2082                               struct problem_context *pctx)
2083 {
2084         ext2_filsys fs = ctx->fs;
2085         blk64_t                 blk = 0;
2086         char                    *block;
2087         struct ext2_inode       inode;
2088
2089         if (fix_problem(ctx, PR_2_DIRECTORY_HOLE, pctx) == 0)
2090                 return 1;
2091
2092         /*
2093          * Read the inode and block bitmaps in; we'll be messing with
2094          * them.
2095          */
2096         e2fsck_read_bitmaps(ctx);
2097
2098         /*
2099          * First, find a free block
2100          */
2101         e2fsck_read_inode(ctx, db->ino, &inode, "allocate_dir_block");
2102         pctx->errcode = ext2fs_map_cluster_block(fs, db->ino, &inode,
2103                                                  db->blockcnt, &blk);
2104         if (pctx->errcode || blk == 0) {
2105                 blk = ext2fs_find_inode_goal(fs, db->ino, &inode, db->blockcnt);
2106                 pctx->errcode = ext2fs_new_block2(fs, blk,
2107                                                   ctx->block_found_map, &blk);
2108                 if (pctx->errcode) {
2109                         pctx->str = "ext2fs_new_block";
2110                         fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
2111                         return 1;
2112                 }
2113         }
2114         ext2fs_mark_block_bitmap2(ctx->block_found_map, blk);
2115         ext2fs_mark_block_bitmap2(fs->block_map, blk);
2116         ext2fs_mark_bb_dirty(fs);
2117
2118         /*
2119          * Now let's create the actual data block for the inode
2120          */
2121         if (db->blockcnt)
2122                 pctx->errcode = ext2fs_new_dir_block(fs, 0, 0, &block);
2123         else
2124                 pctx->errcode = ext2fs_new_dir_block(fs, db->ino,
2125                                                      EXT2_ROOT_INO, &block);
2126
2127         if (pctx->errcode) {
2128                 pctx->str = "ext2fs_new_dir_block";
2129                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
2130                 return 1;
2131         }
2132
2133         pctx->errcode = ext2fs_write_dir_block4(fs, blk, block, 0, db->ino);
2134         ext2fs_free_mem(&block);
2135         if (pctx->errcode) {
2136                 pctx->str = "ext2fs_write_dir_block";
2137                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
2138                 return 1;
2139         }
2140
2141         /*
2142          * Update the inode block count
2143          */
2144         ext2fs_iblk_add_blocks(fs, &inode, 1);
2145         if (EXT2_I_SIZE(&inode) < ((__u64) db->blockcnt+1) * fs->blocksize) {
2146                 pctx->errcode = ext2fs_inode_size_set(fs, &inode,
2147                                         (db->blockcnt+1) * fs->blocksize);
2148                 if (pctx->errcode) {
2149                         pctx->str = "ext2fs_inode_size_set";
2150                         fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
2151                         return 1;
2152                 }
2153         }
2154         e2fsck_write_inode(ctx, db->ino, &inode, "allocate_dir_block");
2155
2156         /*
2157          * Finally, update the block pointers for the inode
2158          */
2159         db->blk = blk;
2160         pctx->errcode = ext2fs_bmap2(fs, db->ino, &inode, 0, BMAP_SET,
2161                                      db->blockcnt, 0, &blk);
2162         if (pctx->errcode) {
2163                 pctx->str = "ext2fs_block_iterate";
2164                 fix_problem(ctx, PR_2_ALLOC_DIRBOCK, pctx);
2165                 return 1;
2166         }
2167
2168         return 0;
2169 }