Merge tag 'drm-next-2019-07-19' of git://anongit.freedesktop.org/drm/drm
[linux-2.6-microblaze.git] / fs / btrfs / tree-checker.c
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Copyright (C) Qu Wenruo 2017.  All rights reserved.
4  */
5
6 /*
7  * The module is used to catch unexpected/corrupted tree block data.
8  * Such behavior can be caused either by a fuzzed image or bugs.
9  *
10  * The objective is to do leaf/node validation checks when tree block is read
11  * from disk, and check *every* possible member, so other code won't
12  * need to checking them again.
13  *
14  * Due to the potential and unwanted damage, every checker needs to be
15  * carefully reviewed otherwise so it does not prevent mount of valid images.
16  */
17
18 #include <linux/types.h>
19 #include <linux/stddef.h>
20 #include <linux/error-injection.h>
21 #include "ctree.h"
22 #include "tree-checker.h"
23 #include "disk-io.h"
24 #include "compression.h"
25 #include "volumes.h"
26
27 /*
28  * Error message should follow the following format:
29  * corrupt <type>: <identifier>, <reason>[, <bad_value>]
30  *
31  * @type:       leaf or node
32  * @identifier: the necessary info to locate the leaf/node.
33  *              It's recommended to decode key.objecitd/offset if it's
34  *              meaningful.
35  * @reason:     describe the error
36  * @bad_value:  optional, it's recommended to output bad value and its
37  *              expected value (range).
38  *
39  * Since comma is used to separate the components, only space is allowed
40  * inside each component.
41  */
42
43 /*
44  * Append generic "corrupt leaf/node root=%llu block=%llu slot=%d: " to @fmt.
45  * Allows callers to customize the output.
46  */
47 __printf(3, 4)
48 __cold
49 static void generic_err(const struct extent_buffer *eb, int slot,
50                         const char *fmt, ...)
51 {
52         const struct btrfs_fs_info *fs_info = eb->fs_info;
53         struct va_format vaf;
54         va_list args;
55
56         va_start(args, fmt);
57
58         vaf.fmt = fmt;
59         vaf.va = &args;
60
61         btrfs_crit(fs_info,
62                 "corrupt %s: root=%llu block=%llu slot=%d, %pV",
63                 btrfs_header_level(eb) == 0 ? "leaf" : "node",
64                 btrfs_header_owner(eb), btrfs_header_bytenr(eb), slot, &vaf);
65         va_end(args);
66 }
67
68 /*
69  * Customized reporter for extent data item, since its key objectid and
70  * offset has its own meaning.
71  */
72 __printf(3, 4)
73 __cold
74 static void file_extent_err(const struct extent_buffer *eb, int slot,
75                             const char *fmt, ...)
76 {
77         const struct btrfs_fs_info *fs_info = eb->fs_info;
78         struct btrfs_key key;
79         struct va_format vaf;
80         va_list args;
81
82         btrfs_item_key_to_cpu(eb, &key, slot);
83         va_start(args, fmt);
84
85         vaf.fmt = fmt;
86         vaf.va = &args;
87
88         btrfs_crit(fs_info,
89         "corrupt %s: root=%llu block=%llu slot=%d ino=%llu file_offset=%llu, %pV",
90                 btrfs_header_level(eb) == 0 ? "leaf" : "node",
91                 btrfs_header_owner(eb), btrfs_header_bytenr(eb), slot,
92                 key.objectid, key.offset, &vaf);
93         va_end(args);
94 }
95
96 /*
97  * Return 0 if the btrfs_file_extent_##name is aligned to @alignment
98  * Else return 1
99  */
100 #define CHECK_FE_ALIGNED(leaf, slot, fi, name, alignment)                     \
101 ({                                                                            \
102         if (!IS_ALIGNED(btrfs_file_extent_##name((leaf), (fi)), (alignment))) \
103                 file_extent_err((leaf), (slot),                               \
104         "invalid %s for file extent, have %llu, should be aligned to %u",     \
105                         (#name), btrfs_file_extent_##name((leaf), (fi)),      \
106                         (alignment));                                         \
107         (!IS_ALIGNED(btrfs_file_extent_##name((leaf), (fi)), (alignment)));   \
108 })
109
110 static u64 file_extent_end(struct extent_buffer *leaf,
111                            struct btrfs_key *key,
112                            struct btrfs_file_extent_item *extent)
113 {
114         u64 end;
115         u64 len;
116
117         if (btrfs_file_extent_type(leaf, extent) == BTRFS_FILE_EXTENT_INLINE) {
118                 len = btrfs_file_extent_ram_bytes(leaf, extent);
119                 end = ALIGN(key->offset + len, leaf->fs_info->sectorsize);
120         } else {
121                 len = btrfs_file_extent_num_bytes(leaf, extent);
122                 end = key->offset + len;
123         }
124         return end;
125 }
126
127 static int check_extent_data_item(struct extent_buffer *leaf,
128                                   struct btrfs_key *key, int slot,
129                                   struct btrfs_key *prev_key)
130 {
131         struct btrfs_fs_info *fs_info = leaf->fs_info;
132         struct btrfs_file_extent_item *fi;
133         u32 sectorsize = fs_info->sectorsize;
134         u32 item_size = btrfs_item_size_nr(leaf, slot);
135         u64 extent_end;
136
137         if (!IS_ALIGNED(key->offset, sectorsize)) {
138                 file_extent_err(leaf, slot,
139 "unaligned file_offset for file extent, have %llu should be aligned to %u",
140                         key->offset, sectorsize);
141                 return -EUCLEAN;
142         }
143
144         fi = btrfs_item_ptr(leaf, slot, struct btrfs_file_extent_item);
145
146         if (btrfs_file_extent_type(leaf, fi) > BTRFS_FILE_EXTENT_TYPES) {
147                 file_extent_err(leaf, slot,
148                 "invalid type for file extent, have %u expect range [0, %u]",
149                         btrfs_file_extent_type(leaf, fi),
150                         BTRFS_FILE_EXTENT_TYPES);
151                 return -EUCLEAN;
152         }
153
154         /*
155          * Support for new compression/encryption must introduce incompat flag,
156          * and must be caught in open_ctree().
157          */
158         if (btrfs_file_extent_compression(leaf, fi) > BTRFS_COMPRESS_TYPES) {
159                 file_extent_err(leaf, slot,
160         "invalid compression for file extent, have %u expect range [0, %u]",
161                         btrfs_file_extent_compression(leaf, fi),
162                         BTRFS_COMPRESS_TYPES);
163                 return -EUCLEAN;
164         }
165         if (btrfs_file_extent_encryption(leaf, fi)) {
166                 file_extent_err(leaf, slot,
167                         "invalid encryption for file extent, have %u expect 0",
168                         btrfs_file_extent_encryption(leaf, fi));
169                 return -EUCLEAN;
170         }
171         if (btrfs_file_extent_type(leaf, fi) == BTRFS_FILE_EXTENT_INLINE) {
172                 /* Inline extent must have 0 as key offset */
173                 if (key->offset) {
174                         file_extent_err(leaf, slot,
175                 "invalid file_offset for inline file extent, have %llu expect 0",
176                                 key->offset);
177                         return -EUCLEAN;
178                 }
179
180                 /* Compressed inline extent has no on-disk size, skip it */
181                 if (btrfs_file_extent_compression(leaf, fi) !=
182                     BTRFS_COMPRESS_NONE)
183                         return 0;
184
185                 /* Uncompressed inline extent size must match item size */
186                 if (item_size != BTRFS_FILE_EXTENT_INLINE_DATA_START +
187                     btrfs_file_extent_ram_bytes(leaf, fi)) {
188                         file_extent_err(leaf, slot,
189         "invalid ram_bytes for uncompressed inline extent, have %u expect %llu",
190                                 item_size, BTRFS_FILE_EXTENT_INLINE_DATA_START +
191                                 btrfs_file_extent_ram_bytes(leaf, fi));
192                         return -EUCLEAN;
193                 }
194                 return 0;
195         }
196
197         /* Regular or preallocated extent has fixed item size */
198         if (item_size != sizeof(*fi)) {
199                 file_extent_err(leaf, slot,
200         "invalid item size for reg/prealloc file extent, have %u expect %zu",
201                         item_size, sizeof(*fi));
202                 return -EUCLEAN;
203         }
204         if (CHECK_FE_ALIGNED(leaf, slot, fi, ram_bytes, sectorsize) ||
205             CHECK_FE_ALIGNED(leaf, slot, fi, disk_bytenr, sectorsize) ||
206             CHECK_FE_ALIGNED(leaf, slot, fi, disk_num_bytes, sectorsize) ||
207             CHECK_FE_ALIGNED(leaf, slot, fi, offset, sectorsize) ||
208             CHECK_FE_ALIGNED(leaf, slot, fi, num_bytes, sectorsize))
209                 return -EUCLEAN;
210
211         /* Catch extent end overflow */
212         if (check_add_overflow(btrfs_file_extent_num_bytes(leaf, fi),
213                                key->offset, &extent_end)) {
214                 file_extent_err(leaf, slot,
215         "extent end overflow, have file offset %llu extent num bytes %llu",
216                                 key->offset,
217                                 btrfs_file_extent_num_bytes(leaf, fi));
218                 return -EUCLEAN;
219         }
220
221         /*
222          * Check that no two consecutive file extent items, in the same leaf,
223          * present ranges that overlap each other.
224          */
225         if (slot > 0 &&
226             prev_key->objectid == key->objectid &&
227             prev_key->type == BTRFS_EXTENT_DATA_KEY) {
228                 struct btrfs_file_extent_item *prev_fi;
229                 u64 prev_end;
230
231                 prev_fi = btrfs_item_ptr(leaf, slot - 1,
232                                          struct btrfs_file_extent_item);
233                 prev_end = file_extent_end(leaf, prev_key, prev_fi);
234                 if (prev_end > key->offset) {
235                         file_extent_err(leaf, slot - 1,
236 "file extent end range (%llu) goes beyond start offset (%llu) of the next file extent",
237                                         prev_end, key->offset);
238                         return -EUCLEAN;
239                 }
240         }
241
242         return 0;
243 }
244
245 static int check_csum_item(struct extent_buffer *leaf, struct btrfs_key *key,
246                            int slot)
247 {
248         struct btrfs_fs_info *fs_info = leaf->fs_info;
249         u32 sectorsize = fs_info->sectorsize;
250         u32 csumsize = btrfs_super_csum_size(fs_info->super_copy);
251
252         if (key->objectid != BTRFS_EXTENT_CSUM_OBJECTID) {
253                 generic_err(leaf, slot,
254                 "invalid key objectid for csum item, have %llu expect %llu",
255                         key->objectid, BTRFS_EXTENT_CSUM_OBJECTID);
256                 return -EUCLEAN;
257         }
258         if (!IS_ALIGNED(key->offset, sectorsize)) {
259                 generic_err(leaf, slot,
260         "unaligned key offset for csum item, have %llu should be aligned to %u",
261                         key->offset, sectorsize);
262                 return -EUCLEAN;
263         }
264         if (!IS_ALIGNED(btrfs_item_size_nr(leaf, slot), csumsize)) {
265                 generic_err(leaf, slot,
266         "unaligned item size for csum item, have %u should be aligned to %u",
267                         btrfs_item_size_nr(leaf, slot), csumsize);
268                 return -EUCLEAN;
269         }
270         return 0;
271 }
272
273 /*
274  * Customized reported for dir_item, only important new info is key->objectid,
275  * which represents inode number
276  */
277 __printf(3, 4)
278 __cold
279 static void dir_item_err(const struct extent_buffer *eb, int slot,
280                          const char *fmt, ...)
281 {
282         const struct btrfs_fs_info *fs_info = eb->fs_info;
283         struct btrfs_key key;
284         struct va_format vaf;
285         va_list args;
286
287         btrfs_item_key_to_cpu(eb, &key, slot);
288         va_start(args, fmt);
289
290         vaf.fmt = fmt;
291         vaf.va = &args;
292
293         btrfs_crit(fs_info,
294         "corrupt %s: root=%llu block=%llu slot=%d ino=%llu, %pV",
295                 btrfs_header_level(eb) == 0 ? "leaf" : "node",
296                 btrfs_header_owner(eb), btrfs_header_bytenr(eb), slot,
297                 key.objectid, &vaf);
298         va_end(args);
299 }
300
301 static int check_dir_item(struct extent_buffer *leaf,
302                           struct btrfs_key *key, int slot)
303 {
304         struct btrfs_fs_info *fs_info = leaf->fs_info;
305         struct btrfs_dir_item *di;
306         u32 item_size = btrfs_item_size_nr(leaf, slot);
307         u32 cur = 0;
308
309         di = btrfs_item_ptr(leaf, slot, struct btrfs_dir_item);
310         while (cur < item_size) {
311                 u32 name_len;
312                 u32 data_len;
313                 u32 max_name_len;
314                 u32 total_size;
315                 u32 name_hash;
316                 u8 dir_type;
317
318                 /* header itself should not cross item boundary */
319                 if (cur + sizeof(*di) > item_size) {
320                         dir_item_err(leaf, slot,
321                 "dir item header crosses item boundary, have %zu boundary %u",
322                                 cur + sizeof(*di), item_size);
323                         return -EUCLEAN;
324                 }
325
326                 /* dir type check */
327                 dir_type = btrfs_dir_type(leaf, di);
328                 if (dir_type >= BTRFS_FT_MAX) {
329                         dir_item_err(leaf, slot,
330                         "invalid dir item type, have %u expect [0, %u)",
331                                 dir_type, BTRFS_FT_MAX);
332                         return -EUCLEAN;
333                 }
334
335                 if (key->type == BTRFS_XATTR_ITEM_KEY &&
336                     dir_type != BTRFS_FT_XATTR) {
337                         dir_item_err(leaf, slot,
338                 "invalid dir item type for XATTR key, have %u expect %u",
339                                 dir_type, BTRFS_FT_XATTR);
340                         return -EUCLEAN;
341                 }
342                 if (dir_type == BTRFS_FT_XATTR &&
343                     key->type != BTRFS_XATTR_ITEM_KEY) {
344                         dir_item_err(leaf, slot,
345                         "xattr dir type found for non-XATTR key");
346                         return -EUCLEAN;
347                 }
348                 if (dir_type == BTRFS_FT_XATTR)
349                         max_name_len = XATTR_NAME_MAX;
350                 else
351                         max_name_len = BTRFS_NAME_LEN;
352
353                 /* Name/data length check */
354                 name_len = btrfs_dir_name_len(leaf, di);
355                 data_len = btrfs_dir_data_len(leaf, di);
356                 if (name_len > max_name_len) {
357                         dir_item_err(leaf, slot,
358                         "dir item name len too long, have %u max %u",
359                                 name_len, max_name_len);
360                         return -EUCLEAN;
361                 }
362                 if (name_len + data_len > BTRFS_MAX_XATTR_SIZE(fs_info)) {
363                         dir_item_err(leaf, slot,
364                         "dir item name and data len too long, have %u max %u",
365                                 name_len + data_len,
366                                 BTRFS_MAX_XATTR_SIZE(fs_info));
367                         return -EUCLEAN;
368                 }
369
370                 if (data_len && dir_type != BTRFS_FT_XATTR) {
371                         dir_item_err(leaf, slot,
372                         "dir item with invalid data len, have %u expect 0",
373                                 data_len);
374                         return -EUCLEAN;
375                 }
376
377                 total_size = sizeof(*di) + name_len + data_len;
378
379                 /* header and name/data should not cross item boundary */
380                 if (cur + total_size > item_size) {
381                         dir_item_err(leaf, slot,
382                 "dir item data crosses item boundary, have %u boundary %u",
383                                 cur + total_size, item_size);
384                         return -EUCLEAN;
385                 }
386
387                 /*
388                  * Special check for XATTR/DIR_ITEM, as key->offset is name
389                  * hash, should match its name
390                  */
391                 if (key->type == BTRFS_DIR_ITEM_KEY ||
392                     key->type == BTRFS_XATTR_ITEM_KEY) {
393                         char namebuf[max(BTRFS_NAME_LEN, XATTR_NAME_MAX)];
394
395                         read_extent_buffer(leaf, namebuf,
396                                         (unsigned long)(di + 1), name_len);
397                         name_hash = btrfs_name_hash(namebuf, name_len);
398                         if (key->offset != name_hash) {
399                                 dir_item_err(leaf, slot,
400                 "name hash mismatch with key, have 0x%016x expect 0x%016llx",
401                                         name_hash, key->offset);
402                                 return -EUCLEAN;
403                         }
404                 }
405                 cur += total_size;
406                 di = (struct btrfs_dir_item *)((void *)di + total_size);
407         }
408         return 0;
409 }
410
411 __printf(3, 4)
412 __cold
413 static void block_group_err(const struct extent_buffer *eb, int slot,
414                             const char *fmt, ...)
415 {
416         const struct btrfs_fs_info *fs_info = eb->fs_info;
417         struct btrfs_key key;
418         struct va_format vaf;
419         va_list args;
420
421         btrfs_item_key_to_cpu(eb, &key, slot);
422         va_start(args, fmt);
423
424         vaf.fmt = fmt;
425         vaf.va = &args;
426
427         btrfs_crit(fs_info,
428         "corrupt %s: root=%llu block=%llu slot=%d bg_start=%llu bg_len=%llu, %pV",
429                 btrfs_header_level(eb) == 0 ? "leaf" : "node",
430                 btrfs_header_owner(eb), btrfs_header_bytenr(eb), slot,
431                 key.objectid, key.offset, &vaf);
432         va_end(args);
433 }
434
435 static int check_block_group_item(struct extent_buffer *leaf,
436                                   struct btrfs_key *key, int slot)
437 {
438         struct btrfs_block_group_item bgi;
439         u32 item_size = btrfs_item_size_nr(leaf, slot);
440         u64 flags;
441         u64 type;
442
443         /*
444          * Here we don't really care about alignment since extent allocator can
445          * handle it.  We care more about the size.
446          */
447         if (key->offset == 0) {
448                 block_group_err(leaf, slot,
449                                 "invalid block group size 0");
450                 return -EUCLEAN;
451         }
452
453         if (item_size != sizeof(bgi)) {
454                 block_group_err(leaf, slot,
455                         "invalid item size, have %u expect %zu",
456                                 item_size, sizeof(bgi));
457                 return -EUCLEAN;
458         }
459
460         read_extent_buffer(leaf, &bgi, btrfs_item_ptr_offset(leaf, slot),
461                            sizeof(bgi));
462         if (btrfs_block_group_chunk_objectid(&bgi) !=
463             BTRFS_FIRST_CHUNK_TREE_OBJECTID) {
464                 block_group_err(leaf, slot,
465                 "invalid block group chunk objectid, have %llu expect %llu",
466                                 btrfs_block_group_chunk_objectid(&bgi),
467                                 BTRFS_FIRST_CHUNK_TREE_OBJECTID);
468                 return -EUCLEAN;
469         }
470
471         if (btrfs_block_group_used(&bgi) > key->offset) {
472                 block_group_err(leaf, slot,
473                         "invalid block group used, have %llu expect [0, %llu)",
474                                 btrfs_block_group_used(&bgi), key->offset);
475                 return -EUCLEAN;
476         }
477
478         flags = btrfs_block_group_flags(&bgi);
479         if (hweight64(flags & BTRFS_BLOCK_GROUP_PROFILE_MASK) > 1) {
480                 block_group_err(leaf, slot,
481 "invalid profile flags, have 0x%llx (%lu bits set) expect no more than 1 bit set",
482                         flags & BTRFS_BLOCK_GROUP_PROFILE_MASK,
483                         hweight64(flags & BTRFS_BLOCK_GROUP_PROFILE_MASK));
484                 return -EUCLEAN;
485         }
486
487         type = flags & BTRFS_BLOCK_GROUP_TYPE_MASK;
488         if (type != BTRFS_BLOCK_GROUP_DATA &&
489             type != BTRFS_BLOCK_GROUP_METADATA &&
490             type != BTRFS_BLOCK_GROUP_SYSTEM &&
491             type != (BTRFS_BLOCK_GROUP_METADATA |
492                            BTRFS_BLOCK_GROUP_DATA)) {
493                 block_group_err(leaf, slot,
494 "invalid type, have 0x%llx (%lu bits set) expect either 0x%llx, 0x%llx, 0x%llx or 0x%llx",
495                         type, hweight64(type),
496                         BTRFS_BLOCK_GROUP_DATA, BTRFS_BLOCK_GROUP_METADATA,
497                         BTRFS_BLOCK_GROUP_SYSTEM,
498                         BTRFS_BLOCK_GROUP_METADATA | BTRFS_BLOCK_GROUP_DATA);
499                 return -EUCLEAN;
500         }
501         return 0;
502 }
503
504 __printf(4, 5)
505 __cold
506 static void chunk_err(const struct extent_buffer *leaf,
507                       const struct btrfs_chunk *chunk, u64 logical,
508                       const char *fmt, ...)
509 {
510         const struct btrfs_fs_info *fs_info = leaf->fs_info;
511         bool is_sb;
512         struct va_format vaf;
513         va_list args;
514         int i;
515         int slot = -1;
516
517         /* Only superblock eb is able to have such small offset */
518         is_sb = (leaf->start == BTRFS_SUPER_INFO_OFFSET);
519
520         if (!is_sb) {
521                 /*
522                  * Get the slot number by iterating through all slots, this
523                  * would provide better readability.
524                  */
525                 for (i = 0; i < btrfs_header_nritems(leaf); i++) {
526                         if (btrfs_item_ptr_offset(leaf, i) ==
527                                         (unsigned long)chunk) {
528                                 slot = i;
529                                 break;
530                         }
531                 }
532         }
533         va_start(args, fmt);
534         vaf.fmt = fmt;
535         vaf.va = &args;
536
537         if (is_sb)
538                 btrfs_crit(fs_info,
539                 "corrupt superblock syschunk array: chunk_start=%llu, %pV",
540                            logical, &vaf);
541         else
542                 btrfs_crit(fs_info,
543         "corrupt leaf: root=%llu block=%llu slot=%d chunk_start=%llu, %pV",
544                            BTRFS_CHUNK_TREE_OBJECTID, leaf->start, slot,
545                            logical, &vaf);
546         va_end(args);
547 }
548
549 /*
550  * The common chunk check which could also work on super block sys chunk array.
551  *
552  * Return -EUCLEAN if anything is corrupted.
553  * Return 0 if everything is OK.
554  */
555 int btrfs_check_chunk_valid(struct extent_buffer *leaf,
556                             struct btrfs_chunk *chunk, u64 logical)
557 {
558         struct btrfs_fs_info *fs_info = leaf->fs_info;
559         u64 length;
560         u64 stripe_len;
561         u16 num_stripes;
562         u16 sub_stripes;
563         u64 type;
564         u64 features;
565         bool mixed = false;
566
567         length = btrfs_chunk_length(leaf, chunk);
568         stripe_len = btrfs_chunk_stripe_len(leaf, chunk);
569         num_stripes = btrfs_chunk_num_stripes(leaf, chunk);
570         sub_stripes = btrfs_chunk_sub_stripes(leaf, chunk);
571         type = btrfs_chunk_type(leaf, chunk);
572
573         if (!num_stripes) {
574                 chunk_err(leaf, chunk, logical,
575                           "invalid chunk num_stripes, have %u", num_stripes);
576                 return -EUCLEAN;
577         }
578         if (!IS_ALIGNED(logical, fs_info->sectorsize)) {
579                 chunk_err(leaf, chunk, logical,
580                 "invalid chunk logical, have %llu should aligned to %u",
581                           logical, fs_info->sectorsize);
582                 return -EUCLEAN;
583         }
584         if (btrfs_chunk_sector_size(leaf, chunk) != fs_info->sectorsize) {
585                 chunk_err(leaf, chunk, logical,
586                           "invalid chunk sectorsize, have %u expect %u",
587                           btrfs_chunk_sector_size(leaf, chunk),
588                           fs_info->sectorsize);
589                 return -EUCLEAN;
590         }
591         if (!length || !IS_ALIGNED(length, fs_info->sectorsize)) {
592                 chunk_err(leaf, chunk, logical,
593                           "invalid chunk length, have %llu", length);
594                 return -EUCLEAN;
595         }
596         if (!is_power_of_2(stripe_len) || stripe_len != BTRFS_STRIPE_LEN) {
597                 chunk_err(leaf, chunk, logical,
598                           "invalid chunk stripe length: %llu",
599                           stripe_len);
600                 return -EUCLEAN;
601         }
602         if (~(BTRFS_BLOCK_GROUP_TYPE_MASK | BTRFS_BLOCK_GROUP_PROFILE_MASK) &
603             type) {
604                 chunk_err(leaf, chunk, logical,
605                           "unrecognized chunk type: 0x%llx",
606                           ~(BTRFS_BLOCK_GROUP_TYPE_MASK |
607                             BTRFS_BLOCK_GROUP_PROFILE_MASK) &
608                           btrfs_chunk_type(leaf, chunk));
609                 return -EUCLEAN;
610         }
611
612         if (!is_power_of_2(type & BTRFS_BLOCK_GROUP_PROFILE_MASK) &&
613             (type & BTRFS_BLOCK_GROUP_PROFILE_MASK) != 0) {
614                 chunk_err(leaf, chunk, logical,
615                 "invalid chunk profile flag: 0x%llx, expect 0 or 1 bit set",
616                           type & BTRFS_BLOCK_GROUP_PROFILE_MASK);
617                 return -EUCLEAN;
618         }
619         if ((type & BTRFS_BLOCK_GROUP_TYPE_MASK) == 0) {
620                 chunk_err(leaf, chunk, logical,
621         "missing chunk type flag, have 0x%llx one bit must be set in 0x%llx",
622                           type, BTRFS_BLOCK_GROUP_TYPE_MASK);
623                 return -EUCLEAN;
624         }
625
626         if ((type & BTRFS_BLOCK_GROUP_SYSTEM) &&
627             (type & (BTRFS_BLOCK_GROUP_METADATA | BTRFS_BLOCK_GROUP_DATA))) {
628                 chunk_err(leaf, chunk, logical,
629                           "system chunk with data or metadata type: 0x%llx",
630                           type);
631                 return -EUCLEAN;
632         }
633
634         features = btrfs_super_incompat_flags(fs_info->super_copy);
635         if (features & BTRFS_FEATURE_INCOMPAT_MIXED_GROUPS)
636                 mixed = true;
637
638         if (!mixed) {
639                 if ((type & BTRFS_BLOCK_GROUP_METADATA) &&
640                     (type & BTRFS_BLOCK_GROUP_DATA)) {
641                         chunk_err(leaf, chunk, logical,
642                         "mixed chunk type in non-mixed mode: 0x%llx", type);
643                         return -EUCLEAN;
644                 }
645         }
646
647         if ((type & BTRFS_BLOCK_GROUP_RAID10 && sub_stripes != 2) ||
648             (type & BTRFS_BLOCK_GROUP_RAID1 && num_stripes != 2) ||
649             (type & BTRFS_BLOCK_GROUP_RAID5 && num_stripes < 2) ||
650             (type & BTRFS_BLOCK_GROUP_RAID6 && num_stripes < 3) ||
651             (type & BTRFS_BLOCK_GROUP_DUP && num_stripes != 2) ||
652             ((type & BTRFS_BLOCK_GROUP_PROFILE_MASK) == 0 && num_stripes != 1)) {
653                 chunk_err(leaf, chunk, logical,
654                         "invalid num_stripes:sub_stripes %u:%u for profile %llu",
655                         num_stripes, sub_stripes,
656                         type & BTRFS_BLOCK_GROUP_PROFILE_MASK);
657                 return -EUCLEAN;
658         }
659
660         return 0;
661 }
662
663 __printf(3, 4)
664 __cold
665 static void dev_item_err(const struct extent_buffer *eb, int slot,
666                          const char *fmt, ...)
667 {
668         struct btrfs_key key;
669         struct va_format vaf;
670         va_list args;
671
672         btrfs_item_key_to_cpu(eb, &key, slot);
673         va_start(args, fmt);
674
675         vaf.fmt = fmt;
676         vaf.va = &args;
677
678         btrfs_crit(eb->fs_info,
679         "corrupt %s: root=%llu block=%llu slot=%d devid=%llu %pV",
680                 btrfs_header_level(eb) == 0 ? "leaf" : "node",
681                 btrfs_header_owner(eb), btrfs_header_bytenr(eb), slot,
682                 key.objectid, &vaf);
683         va_end(args);
684 }
685
686 static int check_dev_item(struct extent_buffer *leaf,
687                           struct btrfs_key *key, int slot)
688 {
689         struct btrfs_fs_info *fs_info = leaf->fs_info;
690         struct btrfs_dev_item *ditem;
691         u64 max_devid = max(BTRFS_MAX_DEVS(fs_info), BTRFS_MAX_DEVS_SYS_CHUNK);
692
693         if (key->objectid != BTRFS_DEV_ITEMS_OBJECTID) {
694                 dev_item_err(leaf, slot,
695                              "invalid objectid: has=%llu expect=%llu",
696                              key->objectid, BTRFS_DEV_ITEMS_OBJECTID);
697                 return -EUCLEAN;
698         }
699         if (key->offset > max_devid) {
700                 dev_item_err(leaf, slot,
701                              "invalid devid: has=%llu expect=[0, %llu]",
702                              key->offset, max_devid);
703                 return -EUCLEAN;
704         }
705         ditem = btrfs_item_ptr(leaf, slot, struct btrfs_dev_item);
706         if (btrfs_device_id(leaf, ditem) != key->offset) {
707                 dev_item_err(leaf, slot,
708                              "devid mismatch: key has=%llu item has=%llu",
709                              key->offset, btrfs_device_id(leaf, ditem));
710                 return -EUCLEAN;
711         }
712
713         /*
714          * For device total_bytes, we don't have reliable way to check it, as
715          * it can be 0 for device removal. Device size check can only be done
716          * by dev extents check.
717          */
718         if (btrfs_device_bytes_used(leaf, ditem) >
719             btrfs_device_total_bytes(leaf, ditem)) {
720                 dev_item_err(leaf, slot,
721                              "invalid bytes used: have %llu expect [0, %llu]",
722                              btrfs_device_bytes_used(leaf, ditem),
723                              btrfs_device_total_bytes(leaf, ditem));
724                 return -EUCLEAN;
725         }
726         /*
727          * Remaining members like io_align/type/gen/dev_group aren't really
728          * utilized.  Skip them to make later usage of them easier.
729          */
730         return 0;
731 }
732
733 /* Inode item error output has the same format as dir_item_err() */
734 #define inode_item_err(fs_info, eb, slot, fmt, ...)                     \
735         dir_item_err(eb, slot, fmt, __VA_ARGS__)
736
737 static int check_inode_item(struct extent_buffer *leaf,
738                             struct btrfs_key *key, int slot)
739 {
740         struct btrfs_fs_info *fs_info = leaf->fs_info;
741         struct btrfs_inode_item *iitem;
742         u64 super_gen = btrfs_super_generation(fs_info->super_copy);
743         u32 valid_mask = (S_IFMT | S_ISUID | S_ISGID | S_ISVTX | 0777);
744         u32 mode;
745
746         if ((key->objectid < BTRFS_FIRST_FREE_OBJECTID ||
747              key->objectid > BTRFS_LAST_FREE_OBJECTID) &&
748             key->objectid != BTRFS_ROOT_TREE_DIR_OBJECTID &&
749             key->objectid != BTRFS_FREE_INO_OBJECTID) {
750                 generic_err(leaf, slot,
751         "invalid key objectid: has %llu expect %llu or [%llu, %llu] or %llu",
752                             key->objectid, BTRFS_ROOT_TREE_DIR_OBJECTID,
753                             BTRFS_FIRST_FREE_OBJECTID,
754                             BTRFS_LAST_FREE_OBJECTID,
755                             BTRFS_FREE_INO_OBJECTID);
756                 return -EUCLEAN;
757         }
758         if (key->offset != 0) {
759                 inode_item_err(fs_info, leaf, slot,
760                         "invalid key offset: has %llu expect 0",
761                         key->offset);
762                 return -EUCLEAN;
763         }
764         iitem = btrfs_item_ptr(leaf, slot, struct btrfs_inode_item);
765
766         /* Here we use super block generation + 1 to handle log tree */
767         if (btrfs_inode_generation(leaf, iitem) > super_gen + 1) {
768                 inode_item_err(fs_info, leaf, slot,
769                         "invalid inode generation: has %llu expect (0, %llu]",
770                                btrfs_inode_generation(leaf, iitem),
771                                super_gen + 1);
772                 return -EUCLEAN;
773         }
774         /* Note for ROOT_TREE_DIR_ITEM, mkfs could set its transid 0 */
775         if (btrfs_inode_transid(leaf, iitem) > super_gen + 1) {
776                 inode_item_err(fs_info, leaf, slot,
777                         "invalid inode generation: has %llu expect [0, %llu]",
778                                btrfs_inode_transid(leaf, iitem), super_gen + 1);
779                 return -EUCLEAN;
780         }
781
782         /*
783          * For size and nbytes it's better not to be too strict, as for dir
784          * item its size/nbytes can easily get wrong, but doesn't affect
785          * anything in the fs. So here we skip the check.
786          */
787         mode = btrfs_inode_mode(leaf, iitem);
788         if (mode & ~valid_mask) {
789                 inode_item_err(fs_info, leaf, slot,
790                                "unknown mode bit detected: 0x%x",
791                                mode & ~valid_mask);
792                 return -EUCLEAN;
793         }
794
795         /*
796          * S_IFMT is not bit mapped so we can't completely rely on is_power_of_2,
797          * but is_power_of_2() can save us from checking FIFO/CHR/DIR/REG.
798          * Only needs to check BLK, LNK and SOCKS
799          */
800         if (!is_power_of_2(mode & S_IFMT)) {
801                 if (!S_ISLNK(mode) && !S_ISBLK(mode) && !S_ISSOCK(mode)) {
802                         inode_item_err(fs_info, leaf, slot,
803                         "invalid mode: has 0%o expect valid S_IF* bit(s)",
804                                        mode & S_IFMT);
805                         return -EUCLEAN;
806                 }
807         }
808         if (S_ISDIR(mode) && btrfs_inode_nlink(leaf, iitem) > 1) {
809                 inode_item_err(fs_info, leaf, slot,
810                        "invalid nlink: has %u expect no more than 1 for dir",
811                         btrfs_inode_nlink(leaf, iitem));
812                 return -EUCLEAN;
813         }
814         if (btrfs_inode_flags(leaf, iitem) & ~BTRFS_INODE_FLAG_MASK) {
815                 inode_item_err(fs_info, leaf, slot,
816                                "unknown flags detected: 0x%llx",
817                                btrfs_inode_flags(leaf, iitem) &
818                                ~BTRFS_INODE_FLAG_MASK);
819                 return -EUCLEAN;
820         }
821         return 0;
822 }
823
824 /*
825  * Common point to switch the item-specific validation.
826  */
827 static int check_leaf_item(struct extent_buffer *leaf,
828                            struct btrfs_key *key, int slot,
829                            struct btrfs_key *prev_key)
830 {
831         int ret = 0;
832         struct btrfs_chunk *chunk;
833
834         switch (key->type) {
835         case BTRFS_EXTENT_DATA_KEY:
836                 ret = check_extent_data_item(leaf, key, slot, prev_key);
837                 break;
838         case BTRFS_EXTENT_CSUM_KEY:
839                 ret = check_csum_item(leaf, key, slot);
840                 break;
841         case BTRFS_DIR_ITEM_KEY:
842         case BTRFS_DIR_INDEX_KEY:
843         case BTRFS_XATTR_ITEM_KEY:
844                 ret = check_dir_item(leaf, key, slot);
845                 break;
846         case BTRFS_BLOCK_GROUP_ITEM_KEY:
847                 ret = check_block_group_item(leaf, key, slot);
848                 break;
849         case BTRFS_CHUNK_ITEM_KEY:
850                 chunk = btrfs_item_ptr(leaf, slot, struct btrfs_chunk);
851                 ret = btrfs_check_chunk_valid(leaf, chunk, key->offset);
852                 break;
853         case BTRFS_DEV_ITEM_KEY:
854                 ret = check_dev_item(leaf, key, slot);
855                 break;
856         case BTRFS_INODE_ITEM_KEY:
857                 ret = check_inode_item(leaf, key, slot);
858                 break;
859         }
860         return ret;
861 }
862
863 static int check_leaf(struct extent_buffer *leaf, bool check_item_data)
864 {
865         struct btrfs_fs_info *fs_info = leaf->fs_info;
866         /* No valid key type is 0, so all key should be larger than this key */
867         struct btrfs_key prev_key = {0, 0, 0};
868         struct btrfs_key key;
869         u32 nritems = btrfs_header_nritems(leaf);
870         int slot;
871
872         if (btrfs_header_level(leaf) != 0) {
873                 generic_err(leaf, 0,
874                         "invalid level for leaf, have %d expect 0",
875                         btrfs_header_level(leaf));
876                 return -EUCLEAN;
877         }
878
879         /*
880          * Extent buffers from a relocation tree have a owner field that
881          * corresponds to the subvolume tree they are based on. So just from an
882          * extent buffer alone we can not find out what is the id of the
883          * corresponding subvolume tree, so we can not figure out if the extent
884          * buffer corresponds to the root of the relocation tree or not. So
885          * skip this check for relocation trees.
886          */
887         if (nritems == 0 && !btrfs_header_flag(leaf, BTRFS_HEADER_FLAG_RELOC)) {
888                 u64 owner = btrfs_header_owner(leaf);
889
890                 /* These trees must never be empty */
891                 if (owner == BTRFS_ROOT_TREE_OBJECTID ||
892                     owner == BTRFS_CHUNK_TREE_OBJECTID ||
893                     owner == BTRFS_EXTENT_TREE_OBJECTID ||
894                     owner == BTRFS_DEV_TREE_OBJECTID ||
895                     owner == BTRFS_FS_TREE_OBJECTID ||
896                     owner == BTRFS_DATA_RELOC_TREE_OBJECTID) {
897                         generic_err(leaf, 0,
898                         "invalid root, root %llu must never be empty",
899                                     owner);
900                         return -EUCLEAN;
901                 }
902                 return 0;
903         }
904
905         if (nritems == 0)
906                 return 0;
907
908         /*
909          * Check the following things to make sure this is a good leaf, and
910          * leaf users won't need to bother with similar sanity checks:
911          *
912          * 1) key ordering
913          * 2) item offset and size
914          *    No overlap, no hole, all inside the leaf.
915          * 3) item content
916          *    If possible, do comprehensive sanity check.
917          *    NOTE: All checks must only rely on the item data itself.
918          */
919         for (slot = 0; slot < nritems; slot++) {
920                 u32 item_end_expected;
921                 int ret;
922
923                 btrfs_item_key_to_cpu(leaf, &key, slot);
924
925                 /* Make sure the keys are in the right order */
926                 if (btrfs_comp_cpu_keys(&prev_key, &key) >= 0) {
927                         generic_err(leaf, slot,
928         "bad key order, prev (%llu %u %llu) current (%llu %u %llu)",
929                                 prev_key.objectid, prev_key.type,
930                                 prev_key.offset, key.objectid, key.type,
931                                 key.offset);
932                         return -EUCLEAN;
933                 }
934
935                 /*
936                  * Make sure the offset and ends are right, remember that the
937                  * item data starts at the end of the leaf and grows towards the
938                  * front.
939                  */
940                 if (slot == 0)
941                         item_end_expected = BTRFS_LEAF_DATA_SIZE(fs_info);
942                 else
943                         item_end_expected = btrfs_item_offset_nr(leaf,
944                                                                  slot - 1);
945                 if (btrfs_item_end_nr(leaf, slot) != item_end_expected) {
946                         generic_err(leaf, slot,
947                                 "unexpected item end, have %u expect %u",
948                                 btrfs_item_end_nr(leaf, slot),
949                                 item_end_expected);
950                         return -EUCLEAN;
951                 }
952
953                 /*
954                  * Check to make sure that we don't point outside of the leaf,
955                  * just in case all the items are consistent to each other, but
956                  * all point outside of the leaf.
957                  */
958                 if (btrfs_item_end_nr(leaf, slot) >
959                     BTRFS_LEAF_DATA_SIZE(fs_info)) {
960                         generic_err(leaf, slot,
961                         "slot end outside of leaf, have %u expect range [0, %u]",
962                                 btrfs_item_end_nr(leaf, slot),
963                                 BTRFS_LEAF_DATA_SIZE(fs_info));
964                         return -EUCLEAN;
965                 }
966
967                 /* Also check if the item pointer overlaps with btrfs item. */
968                 if (btrfs_item_nr_offset(slot) + sizeof(struct btrfs_item) >
969                     btrfs_item_ptr_offset(leaf, slot)) {
970                         generic_err(leaf, slot,
971                 "slot overlaps with its data, item end %lu data start %lu",
972                                 btrfs_item_nr_offset(slot) +
973                                 sizeof(struct btrfs_item),
974                                 btrfs_item_ptr_offset(leaf, slot));
975                         return -EUCLEAN;
976                 }
977
978                 if (check_item_data) {
979                         /*
980                          * Check if the item size and content meet other
981                          * criteria
982                          */
983                         ret = check_leaf_item(leaf, &key, slot, &prev_key);
984                         if (ret < 0)
985                                 return ret;
986                 }
987
988                 prev_key.objectid = key.objectid;
989                 prev_key.type = key.type;
990                 prev_key.offset = key.offset;
991         }
992
993         return 0;
994 }
995
996 int btrfs_check_leaf_full(struct extent_buffer *leaf)
997 {
998         return check_leaf(leaf, true);
999 }
1000 ALLOW_ERROR_INJECTION(btrfs_check_leaf_full, ERRNO);
1001
1002 int btrfs_check_leaf_relaxed(struct extent_buffer *leaf)
1003 {
1004         return check_leaf(leaf, false);
1005 }
1006
1007 int btrfs_check_node(struct extent_buffer *node)
1008 {
1009         struct btrfs_fs_info *fs_info = node->fs_info;
1010         unsigned long nr = btrfs_header_nritems(node);
1011         struct btrfs_key key, next_key;
1012         int slot;
1013         int level = btrfs_header_level(node);
1014         u64 bytenr;
1015         int ret = 0;
1016
1017         if (level <= 0 || level >= BTRFS_MAX_LEVEL) {
1018                 generic_err(node, 0,
1019                         "invalid level for node, have %d expect [1, %d]",
1020                         level, BTRFS_MAX_LEVEL - 1);
1021                 return -EUCLEAN;
1022         }
1023         if (nr == 0 || nr > BTRFS_NODEPTRS_PER_BLOCK(fs_info)) {
1024                 btrfs_crit(fs_info,
1025 "corrupt node: root=%llu block=%llu, nritems too %s, have %lu expect range [1,%u]",
1026                            btrfs_header_owner(node), node->start,
1027                            nr == 0 ? "small" : "large", nr,
1028                            BTRFS_NODEPTRS_PER_BLOCK(fs_info));
1029                 return -EUCLEAN;
1030         }
1031
1032         for (slot = 0; slot < nr - 1; slot++) {
1033                 bytenr = btrfs_node_blockptr(node, slot);
1034                 btrfs_node_key_to_cpu(node, &key, slot);
1035                 btrfs_node_key_to_cpu(node, &next_key, slot + 1);
1036
1037                 if (!bytenr) {
1038                         generic_err(node, slot,
1039                                 "invalid NULL node pointer");
1040                         ret = -EUCLEAN;
1041                         goto out;
1042                 }
1043                 if (!IS_ALIGNED(bytenr, fs_info->sectorsize)) {
1044                         generic_err(node, slot,
1045                         "unaligned pointer, have %llu should be aligned to %u",
1046                                 bytenr, fs_info->sectorsize);
1047                         ret = -EUCLEAN;
1048                         goto out;
1049                 }
1050
1051                 if (btrfs_comp_cpu_keys(&key, &next_key) >= 0) {
1052                         generic_err(node, slot,
1053         "bad key order, current (%llu %u %llu) next (%llu %u %llu)",
1054                                 key.objectid, key.type, key.offset,
1055                                 next_key.objectid, next_key.type,
1056                                 next_key.offset);
1057                         ret = -EUCLEAN;
1058                         goto out;
1059                 }
1060         }
1061 out:
1062         return ret;
1063 }
1064 ALLOW_ERROR_INJECTION(btrfs_check_node, ERRNO);