2 * Copyright 2000 by Hans Reiser, licensing governed by reiserfs/README
5 #include <linux/time.h>
7 #include <linux/reiserfs_fs.h>
8 #include <linux/string.h>
9 #include <linux/buffer_head.h>
13 static char error_buf
[1024];
14 static char fmt_buf
[1024];
15 static char off_buf
[80];
17 static char *reiserfs_cpu_offset(struct cpu_key
*key
)
19 if (cpu_key_k_type(key
) == TYPE_DIRENTRY
)
20 sprintf(off_buf
, "%Lu(%Lu)",
22 GET_HASH_VALUE(cpu_key_k_offset(key
)),
24 GET_GENERATION_NUMBER(cpu_key_k_offset(key
)));
26 sprintf(off_buf
, "0x%Lx",
27 (unsigned long long)cpu_key_k_offset(key
));
31 static char *le_offset(struct reiserfs_key
*key
)
35 version
= le_key_version(key
);
36 if (le_key_k_type(version
, key
) == TYPE_DIRENTRY
)
37 sprintf(off_buf
, "%Lu(%Lu)",
39 GET_HASH_VALUE(le_key_k_offset(version
, key
)),
41 GET_GENERATION_NUMBER(le_key_k_offset(version
, key
)));
43 sprintf(off_buf
, "0x%Lx",
44 (unsigned long long)le_key_k_offset(version
, key
));
48 static char *cpu_type(struct cpu_key
*key
)
50 if (cpu_key_k_type(key
) == TYPE_STAT_DATA
)
52 if (cpu_key_k_type(key
) == TYPE_DIRENTRY
)
54 if (cpu_key_k_type(key
) == TYPE_DIRECT
)
56 if (cpu_key_k_type(key
) == TYPE_INDIRECT
)
61 static char *le_type(struct reiserfs_key
*key
)
65 version
= le_key_version(key
);
67 if (le_key_k_type(version
, key
) == TYPE_STAT_DATA
)
69 if (le_key_k_type(version
, key
) == TYPE_DIRENTRY
)
71 if (le_key_k_type(version
, key
) == TYPE_DIRECT
)
73 if (le_key_k_type(version
, key
) == TYPE_INDIRECT
)
79 static void sprintf_le_key(char *buf
, struct reiserfs_key
*key
)
82 sprintf(buf
, "[%d %d %s %s]", le32_to_cpu(key
->k_dir_id
),
83 le32_to_cpu(key
->k_objectid
), le_offset(key
),
86 sprintf(buf
, "[NULL]");
90 static void sprintf_cpu_key(char *buf
, struct cpu_key
*key
)
93 sprintf(buf
, "[%d %d %s %s]", key
->on_disk_key
.k_dir_id
,
94 key
->on_disk_key
.k_objectid
, reiserfs_cpu_offset(key
),
97 sprintf(buf
, "[NULL]");
100 static void sprintf_de_head(char *buf
, struct reiserfs_de_head
*deh
)
104 "[offset=%d dir_id=%d objectid=%d location=%d state=%04x]",
105 deh_offset(deh
), deh_dir_id(deh
), deh_objectid(deh
),
106 deh_location(deh
), deh_state(deh
));
108 sprintf(buf
, "[NULL]");
112 static void sprintf_item_head(char *buf
, struct item_head
*ih
)
116 (ih_version(ih
) == KEY_FORMAT_3_6
) ? "*3.6* " : "*3.5*");
117 sprintf_le_key(buf
+ strlen(buf
), &(ih
->ih_key
));
118 sprintf(buf
+ strlen(buf
), ", item_len %d, item_location %d, "
119 "free_space(entry_count) %d",
120 ih_item_len(ih
), ih_location(ih
), ih_free_space(ih
));
122 sprintf(buf
, "[NULL]");
125 static void sprintf_direntry(char *buf
, struct reiserfs_dir_entry
*de
)
129 memcpy(name
, de
->de_name
, de
->de_namelen
> 19 ? 19 : de
->de_namelen
);
130 name
[de
->de_namelen
> 19 ? 19 : de
->de_namelen
] = 0;
131 sprintf(buf
, "\"%s\"==>[%d %d]", name
, de
->de_dir_id
, de
->de_objectid
);
134 static void sprintf_block_head(char *buf
, struct buffer_head
*bh
)
136 sprintf(buf
, "level=%d, nr_items=%d, free_space=%d rdkey ",
137 B_LEVEL(bh
), B_NR_ITEMS(bh
), B_FREE_SPACE(bh
));
140 static void sprintf_buffer_head(char *buf
, struct buffer_head
*bh
)
142 char b
[BDEVNAME_SIZE
];
145 "dev %s, size %zd, blocknr %llu, count %d, state 0x%lx, page %p, (%s, %s, %s)",
146 bdevname(bh
->b_bdev
, b
), bh
->b_size
,
147 (unsigned long long)bh
->b_blocknr
, atomic_read(&(bh
->b_count
)),
148 bh
->b_state
, bh
->b_page
,
149 buffer_uptodate(bh
) ? "UPTODATE" : "!UPTODATE",
150 buffer_dirty(bh
) ? "DIRTY" : "CLEAN",
151 buffer_locked(bh
) ? "LOCKED" : "UNLOCKED");
154 static void sprintf_disk_child(char *buf
, struct disk_child
*dc
)
156 sprintf(buf
, "[dc_number=%d, dc_size=%u]", dc_block_number(dc
),
160 static char *is_there_reiserfs_struct(char *fmt
, int *what
, int *skip
)
166 while ((k
= strchr(k
, '%')) != NULL
) {
167 if (k
[1] == 'k' || k
[1] == 'K' || k
[1] == 'h' || k
[1] == 't' ||
168 k
[1] == 'z' || k
[1] == 'b' || k
[1] == 'y' || k
[1] == 'a') {
178 /* debugging reiserfs we used to print out a lot of different
179 variables, like keys, item headers, buffer heads etc. Values of
180 most fields matter. So it took a long time just to write
181 appropriative printk. With this reiserfs_warning you can use format
182 specification for complex structures like you used to do with
183 printfs for integers, doubles and pointers. For instance, to print
184 out key structure you have to write just:
185 reiserfs_warning ("bad key %k", key);
187 printk ("bad key %lu %lu %lu %lu", key->k_dir_id, key->k_objectid,
188 key->k_offset, key->k_uniqueness);
191 static void prepare_error_buf(const char *fmt
, va_list args
)
193 char *fmt1
= fmt_buf
;
196 int i
, j
, what
, skip
;
200 while ((k
= is_there_reiserfs_struct(fmt1
, &what
, &skip
)) != NULL
) {
203 p
+= vsprintf(p
, fmt1
, args
);
205 for (i
= 0; i
< skip
; i
++)
206 j
= va_arg(args
, int);
210 sprintf_le_key(p
, va_arg(args
, struct reiserfs_key
*));
213 sprintf_cpu_key(p
, va_arg(args
, struct cpu_key
*));
216 sprintf_item_head(p
, va_arg(args
, struct item_head
*));
221 struct reiserfs_dir_entry
*));
224 sprintf_disk_child(p
,
225 va_arg(args
, struct disk_child
*));
228 sprintf_block_head(p
,
229 va_arg(args
, struct buffer_head
*));
232 sprintf_buffer_head(p
,
233 va_arg(args
, struct buffer_head
*));
238 struct reiserfs_de_head
*));
245 vsprintf(p
, fmt1
, args
);
249 /* in addition to usual conversion specifiers this accepts reiserfs
250 specific conversion specifiers:
251 %k to print little endian key,
253 %h to print item_head,
254 %t to print directory entry
255 %z to print block head (arg must be struct buffer_head *
256 %b to print buffer_head
259 #define do_reiserfs_warning(fmt)\
262 va_start( args, fmt );\
263 prepare_error_buf( fmt, args );\
267 void reiserfs_warning(struct super_block
*sb
, const char *fmt
, ...)
269 do_reiserfs_warning(fmt
);
271 printk(KERN_WARNING
"ReiserFS: %s: warning: %s\n",
272 reiserfs_bdevname(sb
), error_buf
);
274 printk(KERN_WARNING
"ReiserFS: warning: %s\n", error_buf
);
277 /* No newline.. reiserfs_info calls can be followed by printk's */
278 void reiserfs_info(struct super_block
*sb
, const char *fmt
, ...)
280 do_reiserfs_warning(fmt
);
282 printk(KERN_NOTICE
"ReiserFS: %s: %s",
283 reiserfs_bdevname(sb
), error_buf
);
285 printk(KERN_NOTICE
"ReiserFS: %s", error_buf
);
288 /* No newline.. reiserfs_printk calls can be followed by printk's */
289 static void reiserfs_printk(const char *fmt
, ...)
291 do_reiserfs_warning(fmt
);
295 void reiserfs_debug(struct super_block
*s
, int level
, const char *fmt
, ...)
297 #ifdef CONFIG_REISERFS_CHECK
298 do_reiserfs_warning(fmt
);
300 printk(KERN_DEBUG
"ReiserFS: %s: %s\n",
301 reiserfs_bdevname(s
), error_buf
);
303 printk(KERN_DEBUG
"ReiserFS: %s\n", error_buf
);
309 maintainer-errorid: [function-name:] message
311 where errorid is unique to the maintainer and function-name is
312 optional, is recommended, so that anyone can easily find the bug
313 with a simple grep for the short to type string
314 maintainer-errorid. Don't bother with reusing errorids, there are
315 lots of numbers out there.
320 p_sb, "reiser-29: reiserfs_new_blocknrs: "
321 "one of search_start or rn(%d) is equal to MAX_B_NUM,"
322 "which means that we are optimizing location based on the bogus location of a temp buffer (%p).",
326 Regular panic()s sometimes clear the screen before the message can
327 be read, thus the need for the while loop.
329 Numbering scheme for panic used by Vladimir and Anatoly( Hans completely ignores this scheme, and considers it
330 pointless complexity):
332 panics in reiserfs_fs.h have numbers from 1000 to 1999
334 preserve.c (unused) 3000 to 3999
335 bitmap.c 4000 to 4999
337 prints.c 6000 to 6999
339 fix_nodes.c 8000 to 8999
341 lbalance.c 10000 to 10999
342 ibalance.c 11000 to 11999 not ready
343 do_balan.c 12000 to 12999
344 inode.c 13000 to 13999
345 file.c 14000 to 14999
346 objectid.c 15000 - 15999
347 buffer.c 16000 - 16999
348 symlink.c 17000 - 17999
352 #ifdef CONFIG_REISERFS_CHECK
353 extern struct tree_balance
*cur_tb
;
356 void reiserfs_panic(struct super_block
*sb
, const char *fmt
, ...)
358 do_reiserfs_warning(fmt
);
359 printk(KERN_EMERG
"REISERFS: panic (device %s): %s\n",
360 reiserfs_bdevname(sb
), error_buf
);
363 /* this is not actually called, but makes reiserfs_panic() "noreturn" */
364 panic("REISERFS: panic (device %s): %s\n",
365 reiserfs_bdevname(sb
), error_buf
);
368 void reiserfs_abort(struct super_block
*sb
, int errno
, const char *fmt
, ...)
370 do_reiserfs_warning(fmt
);
372 if (reiserfs_error_panic(sb
)) {
373 panic(KERN_CRIT
"REISERFS: panic (device %s): %s\n",
374 reiserfs_bdevname(sb
), error_buf
);
377 if (sb
->s_flags
& MS_RDONLY
)
380 printk(KERN_CRIT
"REISERFS: abort (device %s): %s\n",
381 reiserfs_bdevname(sb
), error_buf
);
383 sb
->s_flags
|= MS_RDONLY
;
384 reiserfs_journal_abort(sb
, errno
);
387 /* this prints internal nodes (4 keys/items in line) (dc_number,
388 dc_size)[k_dirid, k_objectid, k_offset, k_uniqueness](dc_number,
390 static int print_internal(struct buffer_head
*bh
, int first
, int last
)
392 struct reiserfs_key
*key
;
393 struct disk_child
*dc
;
397 if (!B_IS_KEYS_LEVEL(bh
))
407 to
= last
< B_NR_ITEMS(bh
) ? last
: B_NR_ITEMS(bh
);
410 reiserfs_printk("INTERNAL NODE (%ld) contains %z\n", bh
->b_blocknr
, bh
);
412 dc
= B_N_CHILD(bh
, from
);
413 reiserfs_printk("PTR %d: %y ", from
, dc
);
415 for (i
= from
, key
= B_N_PDELIM_KEY(bh
, from
), dc
++; i
< to
;
417 reiserfs_printk("KEY %d: %k PTR %d: %y ", i
, key
, i
+ 1, dc
);
425 static int print_leaf(struct buffer_head
*bh
, int print_mode
, int first
,
428 struct block_head
*blkh
;
429 struct item_head
*ih
;
433 if (!B_IS_ITEMS_LEVEL(bh
))
438 blkh
= B_BLK_HEAD(bh
);
439 ih
= B_N_PITEM_HEAD(bh
, 0);
440 nr
= blkh_nr_item(blkh
);
443 ("\n===================================================================\n");
444 reiserfs_printk("LEAF NODE (%ld) contains %z\n", bh
->b_blocknr
, bh
);
446 if (!(print_mode
& PRINT_LEAF_ITEMS
)) {
447 reiserfs_printk("FIRST ITEM_KEY: %k, LAST ITEM KEY: %k\n",
448 &(ih
->ih_key
), &((ih
+ nr
- 1)->ih_key
));
452 if (first
< 0 || first
> nr
- 1)
457 if (last
< 0 || last
> nr
)
464 ("-------------------------------------------------------------------------------\n");
466 ("|##| type | key | ilen | free_space | version | loc |\n");
467 for (i
= from
; i
< to
; i
++, ih
++) {
469 ("-------------------------------------------------------------------------------\n");
470 reiserfs_printk("|%2d| %h |\n", i
, ih
);
471 if (print_mode
& PRINT_LEAF_ITEMS
)
472 op_print_item(ih
, B_I_PITEM(bh
, ih
));
476 ("===================================================================\n");
481 char *reiserfs_hashname(int code
)
483 if (code
== YURA_HASH
)
485 if (code
== TEA_HASH
)
493 /* return 1 if this is not super block */
494 static int print_super_block(struct buffer_head
*bh
)
496 struct reiserfs_super_block
*rs
=
497 (struct reiserfs_super_block
*)(bh
->b_data
);
498 int skipped
, data_blocks
;
500 char b
[BDEVNAME_SIZE
];
502 if (is_reiserfs_3_5(rs
)) {
504 } else if (is_reiserfs_3_6(rs
)) {
506 } else if (is_reiserfs_jr(rs
)) {
507 version
= ((sb_version(rs
) == REISERFS_VERSION_2
) ?
513 printk("%s\'s super block is in block %llu\n", bdevname(bh
->b_bdev
, b
),
514 (unsigned long long)bh
->b_blocknr
);
515 printk("Reiserfs version %s\n", version
);
516 printk("Block count %u\n", sb_block_count(rs
));
517 printk("Blocksize %d\n", sb_blocksize(rs
));
518 printk("Free blocks %u\n", sb_free_blocks(rs
));
519 // FIXME: this would be confusing if
520 // someone stores reiserfs super block in some data block ;)
521 // skipped = (bh->b_blocknr * bh->b_size) / sb_blocksize(rs);
522 skipped
= bh
->b_blocknr
;
523 data_blocks
= sb_block_count(rs
) - skipped
- 1 - sb_bmap_nr(rs
) -
524 (!is_reiserfs_jr(rs
) ? sb_jp_journal_size(rs
) +
525 1 : sb_reserved_for_journal(rs
)) - sb_free_blocks(rs
);
527 ("Busy blocks (skipped %d, bitmaps - %d, journal (or reserved) blocks - %d\n"
528 "1 super block, %d data blocks\n", skipped
, sb_bmap_nr(rs
),
529 (!is_reiserfs_jr(rs
) ? (sb_jp_journal_size(rs
) + 1) :
530 sb_reserved_for_journal(rs
)), data_blocks
);
531 printk("Root block %u\n", sb_root_block(rs
));
532 printk("Journal block (first) %d\n", sb_jp_journal_1st_block(rs
));
533 printk("Journal dev %d\n", sb_jp_journal_dev(rs
));
534 printk("Journal orig size %d\n", sb_jp_journal_size(rs
));
535 printk("FS state %d\n", sb_fs_state(rs
));
536 printk("Hash function \"%s\"\n",
537 reiserfs_hashname(sb_hash_function_code(rs
)));
539 printk("Tree height %d\n", sb_tree_height(rs
));
543 static int print_desc_block(struct buffer_head
*bh
)
545 struct reiserfs_journal_desc
*desc
;
547 if (memcmp(get_journal_desc_magic(bh
), JOURNAL_DESC_MAGIC
, 8))
550 desc
= (struct reiserfs_journal_desc
*)(bh
->b_data
);
551 printk("Desc block %llu (j_trans_id %d, j_mount_id %d, j_len %d)",
552 (unsigned long long)bh
->b_blocknr
, get_desc_trans_id(desc
),
553 get_desc_mount_id(desc
), get_desc_trans_len(desc
));
558 void print_block(struct buffer_head
*bh
, ...) //int print_mode, int first, int last)
561 int mode
, first
, last
;
566 printk("print_block: buffer is NULL\n");
570 mode
= va_arg(args
, int);
571 first
= va_arg(args
, int);
572 last
= va_arg(args
, int);
573 if (print_leaf(bh
, mode
, first
, last
))
574 if (print_internal(bh
, first
, last
))
575 if (print_super_block(bh
))
576 if (print_desc_block(bh
))
578 ("Block %llu contains unformatted data\n",
579 (unsigned long long)bh
->b_blocknr
);
582 static char print_tb_buf
[2048];
584 /* this stores initial state of tree balance in the print_tb_buf */
585 void store_print_tb(struct tree_balance
*tb
)
589 struct buffer_head
*tbSh
, *tbFh
;
594 sprintf(print_tb_buf
, "\n"
596 "MODE=%c, ITEM_POS=%d POS_IN_ITEM=%d\n"
597 "=====================================================================\n"
598 "* h * S * L * R * F * FL * FR * CFL * CFR *\n",
599 REISERFS_SB(tb
->tb_sb
)->s_do_balance
,
600 tb
->tb_mode
, PATH_LAST_POSITION(tb
->tb_path
),
601 tb
->tb_path
->pos_in_item
);
603 for (h
= 0; h
< ARRAY_SIZE(tb
->insert_size
); h
++) {
604 if (PATH_H_PATH_OFFSET(tb
->tb_path
, h
) <=
605 tb
->tb_path
->path_length
606 && PATH_H_PATH_OFFSET(tb
->tb_path
,
607 h
) > ILLEGAL_PATH_ELEMENT_OFFSET
) {
608 tbSh
= PATH_H_PBUFFER(tb
->tb_path
, h
);
609 tbFh
= PATH_H_PPARENT(tb
->tb_path
, h
);
614 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
615 "* %d * %3lld(%2d) * %3lld(%2d) * %3lld(%2d) * %5lld * %5lld * %5lld * %5lld * %5lld *\n",
617 (tbSh
) ? (long long)(tbSh
->b_blocknr
) : (-1LL),
618 (tbSh
) ? atomic_read(&(tbSh
->b_count
)) : -1,
619 (tb
->L
[h
]) ? (long long)(tb
->L
[h
]->b_blocknr
) : (-1LL),
620 (tb
->L
[h
]) ? atomic_read(&(tb
->L
[h
]->b_count
)) : -1,
621 (tb
->R
[h
]) ? (long long)(tb
->R
[h
]->b_blocknr
) : (-1LL),
622 (tb
->R
[h
]) ? atomic_read(&(tb
->R
[h
]->b_count
)) : -1,
623 (tbFh
) ? (long long)(tbFh
->b_blocknr
) : (-1LL),
624 (tb
->FL
[h
]) ? (long long)(tb
->FL
[h
]->
626 (tb
->FR
[h
]) ? (long long)(tb
->FR
[h
]->
628 (tb
->CFL
[h
]) ? (long long)(tb
->CFL
[h
]->
630 (tb
->CFR
[h
]) ? (long long)(tb
->CFR
[h
]->
631 b_blocknr
) : (-1LL));
634 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
635 "=====================================================================\n"
636 "* h * size * ln * lb * rn * rb * blkn * s0 * s1 * s1b * s2 * s2b * curb * lk * rk *\n"
637 "* 0 * %4d * %2d * %2d * %2d * %2d * %4d * %2d * %2d * %3d * %2d * %3d * %4d * %2d * %2d *\n",
638 tb
->insert_size
[0], tb
->lnum
[0], tb
->lbytes
, tb
->rnum
[0],
639 tb
->rbytes
, tb
->blknum
[0], tb
->s0num
, tb
->s1num
, tb
->s1bytes
,
640 tb
->s2num
, tb
->s2bytes
, tb
->cur_blknum
, tb
->lkey
[0],
643 /* this prints balance parameters for non-leaf levels */
647 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
648 "* %d * %4d * %2d * * %2d * * %2d *\n",
649 h
, tb
->insert_size
[h
], tb
->lnum
[h
], tb
->rnum
[h
],
651 } while (tb
->insert_size
[h
]);
653 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
654 "=====================================================================\n"
657 /* print FEB list (list of buffers in form (bh (b_blocknr, b_count), that will be used for new nodes) */
659 for (i
= 0; i
< ARRAY_SIZE(tb
->FEB
); i
++)
660 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
661 "%p (%llu %d)%s", tb
->FEB
[i
],
662 tb
->FEB
[i
] ? (unsigned long long)tb
->FEB
[i
]->
664 tb
->FEB
[i
] ? atomic_read(&(tb
->FEB
[i
]->b_count
)) : 0,
665 (i
== ARRAY_SIZE(tb
->FEB
) - 1) ? "\n" : ", ");
667 sprintf(print_tb_buf
+ strlen(print_tb_buf
),
668 "======================== the end ====================================\n");
671 void print_cur_tb(char *mes
)
673 printk("%s\n%s", mes
, print_tb_buf
);
676 static void check_leaf_block_head(struct buffer_head
*bh
)
678 struct block_head
*blkh
;
681 blkh
= B_BLK_HEAD(bh
);
682 nr
= blkh_nr_item(blkh
);
683 if (nr
> (bh
->b_size
- BLKH_SIZE
) / IH_SIZE
)
685 "vs-6010: check_leaf_block_head: invalid item number %z",
687 if (blkh_free_space(blkh
) > bh
->b_size
- BLKH_SIZE
- IH_SIZE
* nr
)
689 "vs-6020: check_leaf_block_head: invalid free space %z",
694 static void check_internal_block_head(struct buffer_head
*bh
)
696 struct block_head
*blkh
;
698 blkh
= B_BLK_HEAD(bh
);
699 if (!(B_LEVEL(bh
) > DISK_LEAF_NODE_LEVEL
&& B_LEVEL(bh
) <= MAX_HEIGHT
))
701 "vs-6025: check_internal_block_head: invalid level %z",
704 if (B_NR_ITEMS(bh
) > (bh
->b_size
- BLKH_SIZE
) / IH_SIZE
)
706 "vs-6030: check_internal_block_head: invalid item number %z",
709 if (B_FREE_SPACE(bh
) !=
710 bh
->b_size
- BLKH_SIZE
- KEY_SIZE
* B_NR_ITEMS(bh
) -
711 DC_SIZE
* (B_NR_ITEMS(bh
) + 1))
713 "vs-6040: check_internal_block_head: invalid free space %z",
718 void check_leaf(struct buffer_head
*bh
)
721 struct item_head
*ih
;
725 check_leaf_block_head(bh
);
726 for (i
= 0, ih
= B_N_PITEM_HEAD(bh
, 0); i
< B_NR_ITEMS(bh
); i
++, ih
++)
727 op_check_item(ih
, B_I_PITEM(bh
, ih
));
730 void check_internal(struct buffer_head
*bh
)
734 check_internal_block_head(bh
);
737 void print_statistics(struct super_block
*s
)
741 printk ("reiserfs_put_super: session statistics: balances %d, fix_nodes %d, \
742 bmap with search %d, without %d, dir2ind %d, ind2dir %d\n",
743 REISERFS_SB(s)->s_do_balance, REISERFS_SB(s)->s_fix_nodes,
744 REISERFS_SB(s)->s_bmaps, REISERFS_SB(s)->s_bmaps_without_search,
745 REISERFS_SB(s)->s_direct2indirect, REISERFS_SB(s)->s_indirect2direct);