blob: 4f3f928076f3c237c3c582e5f764b8a6ca3d1aea [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * Copyright 2000 by Hans Reiser, licensing governed by reiserfs/README
3 */
4
Linus Torvalds1da177e2005-04-16 15:20:36 -07005#include <linux/time.h>
6#include <linux/fs.h>
Al Virof466c6f2012-03-17 01:16:43 -04007#include "reiserfs.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -07008#include <linux/string.h>
9#include <linux/buffer_head.h>
10
11#include <stdarg.h>
12
13static char error_buf[1024];
14static char fmt_buf[1024];
15static char off_buf[80];
16
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070017static char *reiserfs_cpu_offset(struct cpu_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070018{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070019 if (cpu_key_k_type(key) == TYPE_DIRENTRY)
Fabian Frederick53872ed2014-08-08 14:21:10 -070020 sprintf(off_buf, "%llu(%llu)",
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070021 (unsigned long long)
22 GET_HASH_VALUE(cpu_key_k_offset(key)),
23 (unsigned long long)
24 GET_GENERATION_NUMBER(cpu_key_k_offset(key)));
25 else
26 sprintf(off_buf, "0x%Lx",
27 (unsigned long long)cpu_key_k_offset(key));
28 return off_buf;
Linus Torvalds1da177e2005-04-16 15:20:36 -070029}
30
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070031static char *le_offset(struct reiserfs_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070032{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070033 int version;
Linus Torvalds1da177e2005-04-16 15:20:36 -070034
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070035 version = le_key_version(key);
36 if (le_key_k_type(version, key) == TYPE_DIRENTRY)
Fabian Frederick53872ed2014-08-08 14:21:10 -070037 sprintf(off_buf, "%llu(%llu)",
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070038 (unsigned long long)
39 GET_HASH_VALUE(le_key_k_offset(version, key)),
40 (unsigned long long)
41 GET_GENERATION_NUMBER(le_key_k_offset(version, key)));
42 else
43 sprintf(off_buf, "0x%Lx",
44 (unsigned long long)le_key_k_offset(version, key));
45 return off_buf;
Linus Torvalds1da177e2005-04-16 15:20:36 -070046}
47
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070048static char *cpu_type(struct cpu_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070049{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070050 if (cpu_key_k_type(key) == TYPE_STAT_DATA)
51 return "SD";
52 if (cpu_key_k_type(key) == TYPE_DIRENTRY)
53 return "DIR";
54 if (cpu_key_k_type(key) == TYPE_DIRECT)
55 return "DIRECT";
56 if (cpu_key_k_type(key) == TYPE_INDIRECT)
57 return "IND";
58 return "UNKNOWN";
Linus Torvalds1da177e2005-04-16 15:20:36 -070059}
60
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070061static char *le_type(struct reiserfs_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070062{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070063 int version;
Linus Torvalds1da177e2005-04-16 15:20:36 -070064
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070065 version = le_key_version(key);
66
67 if (le_key_k_type(version, key) == TYPE_STAT_DATA)
68 return "SD";
69 if (le_key_k_type(version, key) == TYPE_DIRENTRY)
70 return "DIR";
71 if (le_key_k_type(version, key) == TYPE_DIRECT)
72 return "DIRECT";
73 if (le_key_k_type(version, key) == TYPE_INDIRECT)
74 return "IND";
75 return "UNKNOWN";
Linus Torvalds1da177e2005-04-16 15:20:36 -070076}
77
Linus Torvalds1da177e2005-04-16 15:20:36 -070078/* %k */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070079static void sprintf_le_key(char *buf, struct reiserfs_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070080{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070081 if (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),
84 le_type(key));
85 else
86 sprintf(buf, "[NULL]");
Linus Torvalds1da177e2005-04-16 15:20:36 -070087}
88
Linus Torvalds1da177e2005-04-16 15:20:36 -070089/* %K */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070090static void sprintf_cpu_key(char *buf, struct cpu_key *key)
Linus Torvalds1da177e2005-04-16 15:20:36 -070091{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -070092 if (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),
95 cpu_type(key));
96 else
97 sprintf(buf, "[NULL]");
Linus Torvalds1da177e2005-04-16 15:20:36 -070098}
99
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700100static void sprintf_de_head(char *buf, struct reiserfs_de_head *deh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700101{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700102 if (deh)
103 sprintf(buf,
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));
107 else
108 sprintf(buf, "[NULL]");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700109
110}
111
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700112static void sprintf_item_head(char *buf, struct item_head *ih)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700113{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700114 if (ih) {
115 strcpy(buf,
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));
121 } else
122 sprintf(buf, "[NULL]");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700123}
124
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700125static void sprintf_direntry(char *buf, struct reiserfs_dir_entry *de)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700126{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700127 char name[20];
Linus Torvalds1da177e2005-04-16 15:20:36 -0700128
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700129 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);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700132}
133
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700134static void sprintf_block_head(char *buf, struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700135{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700136 sprintf(buf, "level=%d, nr_items=%d, free_space=%d rdkey ",
137 B_LEVEL(bh), B_NR_ITEMS(bh), B_FREE_SPACE(bh));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700138}
139
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700140static void sprintf_buffer_head(char *buf, struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700141{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700142 sprintf(buf,
Dmitry Monakhova1c6f0572015-04-13 16:31:37 +0400143 "dev %pg, size %zd, blocknr %llu, count %d, state 0x%lx, page %p, (%s, %s, %s)",
144 bh->b_bdev, bh->b_size,
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700145 (unsigned long long)bh->b_blocknr, atomic_read(&(bh->b_count)),
146 bh->b_state, bh->b_page,
147 buffer_uptodate(bh) ? "UPTODATE" : "!UPTODATE",
148 buffer_dirty(bh) ? "DIRTY" : "CLEAN",
149 buffer_locked(bh) ? "LOCKED" : "UNLOCKED");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700150}
151
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700152static void sprintf_disk_child(char *buf, struct disk_child *dc)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700153{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700154 sprintf(buf, "[dc_number=%d, dc_size=%u]", dc_block_number(dc),
155 dc_size(dc));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700156}
157
Jeff Mahoneycacbe3d2009-03-30 14:02:22 -0400158static char *is_there_reiserfs_struct(char *fmt, int *what)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700159{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700160 char *k = fmt;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700161
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700162 while ((k = strchr(k, '%')) != NULL) {
163 if (k[1] == 'k' || k[1] == 'K' || k[1] == 'h' || k[1] == 't' ||
164 k[1] == 'z' || k[1] == 'b' || k[1] == 'y' || k[1] == 'a') {
165 *what = k[1];
166 break;
167 }
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700168 k++;
169 }
170 return k;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700171}
172
Jeff Mahoney098297b2014-04-23 10:00:36 -0400173/*
174 * debugging reiserfs we used to print out a lot of different
175 * variables, like keys, item headers, buffer heads etc. Values of
176 * most fields matter. So it took a long time just to write
177 * appropriative printk. With this reiserfs_warning you can use format
178 * specification for complex structures like you used to do with
179 * printfs for integers, doubles and pointers. For instance, to print
180 * out key structure you have to write just:
181 * reiserfs_warning ("bad key %k", key);
182 * instead of
183 * printk ("bad key %lu %lu %lu %lu", key->k_dir_id, key->k_objectid,
184 * key->k_offset, key->k_uniqueness);
185 */
Jeff Mahoney78b65132009-03-30 14:02:24 -0400186static DEFINE_SPINLOCK(error_lock);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700187static void prepare_error_buf(const char *fmt, va_list args)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700188{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700189 char *fmt1 = fmt_buf;
190 char *k;
191 char *p = error_buf;
Jeff Mahoneycacbe3d2009-03-30 14:02:22 -0400192 int what;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700193
Jeff Mahoney78b65132009-03-30 14:02:24 -0400194 spin_lock(&error_lock);
195
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700196 strcpy(fmt1, fmt);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700197
Jeff Mahoneycacbe3d2009-03-30 14:02:22 -0400198 while ((k = is_there_reiserfs_struct(fmt1, &what)) != NULL) {
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700199 *k = 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700200
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700201 p += vsprintf(p, fmt1, args);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700202
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700203 switch (what) {
204 case 'k':
205 sprintf_le_key(p, va_arg(args, struct reiserfs_key *));
206 break;
207 case 'K':
208 sprintf_cpu_key(p, va_arg(args, struct cpu_key *));
209 break;
210 case 'h':
211 sprintf_item_head(p, va_arg(args, struct item_head *));
212 break;
213 case 't':
214 sprintf_direntry(p,
215 va_arg(args,
216 struct reiserfs_dir_entry *));
217 break;
218 case 'y':
219 sprintf_disk_child(p,
220 va_arg(args, struct disk_child *));
221 break;
222 case 'z':
223 sprintf_block_head(p,
224 va_arg(args, struct buffer_head *));
225 break;
226 case 'b':
227 sprintf_buffer_head(p,
228 va_arg(args, struct buffer_head *));
229 break;
230 case 'a':
231 sprintf_de_head(p,
232 va_arg(args,
233 struct reiserfs_de_head *));
234 break;
235 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700236
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700237 p += strlen(p);
238 fmt1 = k + 2;
239 }
240 vsprintf(p, fmt1, args);
Jeff Mahoney78b65132009-03-30 14:02:24 -0400241 spin_unlock(&error_lock);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700242
243}
244
Jeff Mahoney098297b2014-04-23 10:00:36 -0400245/*
246 * in addition to usual conversion specifiers this accepts reiserfs
247 * specific conversion specifiers:
248 * %k to print little endian key,
249 * %K to print cpu key,
250 * %h to print item_head,
251 * %t to print directory entry
252 * %z to print block head (arg must be struct buffer_head *
253 * %b to print buffer_head
254 */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700255
256#define do_reiserfs_warning(fmt)\
257{\
258 va_list args;\
259 va_start( args, fmt );\
260 prepare_error_buf( fmt, args );\
261 va_end( args );\
262}
263
Jeff Mahoney45b03d52009-03-30 14:02:21 -0400264void __reiserfs_warning(struct super_block *sb, const char *id,
265 const char *function, const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700266{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700267 do_reiserfs_warning(fmt);
268 if (sb)
Jeff Mahoney45b03d52009-03-30 14:02:21 -0400269 printk(KERN_WARNING "REISERFS warning (device %s): %s%s%s: "
270 "%s\n", sb->s_id, id ? id : "", id ? " " : "",
271 function, error_buf);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700272 else
Jeff Mahoney45b03d52009-03-30 14:02:21 -0400273 printk(KERN_WARNING "REISERFS warning: %s%s%s: %s\n",
274 id ? id : "", id ? " " : "", function, error_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700275}
276
277/* No newline.. reiserfs_info calls can be followed by printk's */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700278void reiserfs_info(struct super_block *sb, const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700279{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700280 do_reiserfs_warning(fmt);
281 if (sb)
Jeff Mahoneya5437152009-03-30 14:02:19 -0400282 printk(KERN_NOTICE "REISERFS (device %s): %s",
283 sb->s_id, error_buf);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700284 else
Jeff Mahoneya5437152009-03-30 14:02:19 -0400285 printk(KERN_NOTICE "REISERFS %s:", error_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700286}
287
288/* No newline.. reiserfs_printk calls can be followed by printk's */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700289static void reiserfs_printk(const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700290{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700291 do_reiserfs_warning(fmt);
292 printk(error_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700293}
294
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700295void reiserfs_debug(struct super_block *s, int level, const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700296{
297#ifdef CONFIG_REISERFS_CHECK
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700298 do_reiserfs_warning(fmt);
299 if (s)
Jeff Mahoneya5437152009-03-30 14:02:19 -0400300 printk(KERN_DEBUG "REISERFS debug (device %s): %s\n",
301 s->s_id, error_buf);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700302 else
Jeff Mahoneya5437152009-03-30 14:02:19 -0400303 printk(KERN_DEBUG "REISERFS debug: %s\n", error_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700304#endif
305}
306
Jeff Mahoney098297b2014-04-23 10:00:36 -0400307/*
308 * The format:
309 *
310 * maintainer-errorid: [function-name:] message
311 *
312 * where errorid is unique to the maintainer and function-name is
313 * optional, is recommended, so that anyone can easily find the bug
314 * with a simple grep for the short to type string
315 * maintainer-errorid. Don't bother with reusing errorids, there are
316 * lots of numbers out there.
317 *
318 * Example:
319 *
320 * reiserfs_panic(
321 * p_sb, "reiser-29: reiserfs_new_blocknrs: "
322 * "one of search_start or rn(%d) is equal to MAX_B_NUM,"
323 * "which means that we are optimizing location based on the "
324 * "bogus location of a temp buffer (%p).",
325 * rn, bh
326 * );
327 *
328 * Regular panic()s sometimes clear the screen before the message can
329 * be read, thus the need for the while loop.
330 *
331 * Numbering scheme for panic used by Vladimir and Anatoly( Hans completely
332 * ignores this scheme, and considers it pointless complexity):
333 *
334 * panics in reiserfs_fs.h have numbers from 1000 to 1999
335 * super.c 2000 to 2999
336 * preserve.c (unused) 3000 to 3999
337 * bitmap.c 4000 to 4999
338 * stree.c 5000 to 5999
339 * prints.c 6000 to 6999
340 * namei.c 7000 to 7999
341 * fix_nodes.c 8000 to 8999
342 * dir.c 9000 to 9999
343 * lbalance.c 10000 to 10999
344 * ibalance.c 11000 to 11999 not ready
345 * do_balan.c 12000 to 12999
346 * inode.c 13000 to 13999
347 * file.c 14000 to 14999
348 * objectid.c 15000 - 15999
349 * buffer.c 16000 - 16999
350 * symlink.c 17000 - 17999
351 *
352 * . */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700353
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400354void __reiserfs_panic(struct super_block *sb, const char *id,
355 const char *function, const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700356{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700357 do_reiserfs_warning(fmt);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700358
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400359#ifdef CONFIG_REISERFS_CHECK
Jeff Mahoney8e186e42007-10-18 23:39:24 -0700360 dump_stack();
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400361#endif
362 if (sb)
Jeff Mahoney278f6672013-08-08 17:34:46 -0400363 printk(KERN_WARNING "REISERFS panic (device %s): %s%s%s: %s\n",
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400364 sb->s_id, id ? id : "", id ? " " : "",
365 function, error_buf);
366 else
Jeff Mahoney278f6672013-08-08 17:34:46 -0400367 printk(KERN_WARNING "REISERFS panic: %s%s%s: %s\n",
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400368 id ? id : "", id ? " " : "", function, error_buf);
Jeff Mahoney278f6672013-08-08 17:34:46 -0400369 BUG();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700370}
371
Jeff Mahoney1e5e59d2009-03-30 14:02:27 -0400372void __reiserfs_error(struct super_block *sb, const char *id,
373 const char *function, const char *fmt, ...)
374{
375 do_reiserfs_warning(fmt);
376
377 BUG_ON(sb == NULL);
378
379 if (reiserfs_error_panic(sb))
380 __reiserfs_panic(sb, id, function, error_buf);
381
382 if (id && id[0])
383 printk(KERN_CRIT "REISERFS error (device %s): %s %s: %s\n",
384 sb->s_id, id, function, error_buf);
385 else
386 printk(KERN_CRIT "REISERFS error (device %s): %s: %s\n",
387 sb->s_id, function, error_buf);
388
389 if (sb->s_flags & MS_RDONLY)
390 return;
391
392 reiserfs_info(sb, "Remounting filesystem read-only\n");
393 sb->s_flags |= MS_RDONLY;
394 reiserfs_abort_journal(sb, -EIO);
395}
396
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700397void reiserfs_abort(struct super_block *sb, int errno, const char *fmt, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700398{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700399 do_reiserfs_warning(fmt);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700400
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700401 if (reiserfs_error_panic(sb)) {
Jeff Mahoneya5437152009-03-30 14:02:19 -0400402 panic(KERN_CRIT "REISERFS panic (device %s): %s\n", sb->s_id,
403 error_buf);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700404 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700405
Jeff Mahoneya5437152009-03-30 14:02:19 -0400406 if (reiserfs_is_journal_aborted(SB_JOURNAL(sb)))
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700407 return;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700408
Jeff Mahoneya5437152009-03-30 14:02:19 -0400409 printk(KERN_CRIT "REISERFS abort (device %s): %s\n", sb->s_id,
410 error_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700411
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700412 sb->s_flags |= MS_RDONLY;
Jeff Mahoney32e8b102009-03-30 14:02:26 -0400413 reiserfs_abort_journal(sb, errno);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700414}
415
Jeff Mahoney098297b2014-04-23 10:00:36 -0400416/*
417 * this prints internal nodes (4 keys/items in line) (dc_number,
418 * dc_size)[k_dirid, k_objectid, k_offset, k_uniqueness](dc_number,
419 * dc_size)...
420 */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700421static int print_internal(struct buffer_head *bh, int first, int last)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700422{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700423 struct reiserfs_key *key;
424 struct disk_child *dc;
425 int i;
426 int from, to;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700427
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700428 if (!B_IS_KEYS_LEVEL(bh))
429 return 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700430
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700431 check_internal(bh);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700432
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700433 if (first == -1) {
434 from = 0;
435 to = B_NR_ITEMS(bh);
436 } else {
437 from = first;
438 to = last < B_NR_ITEMS(bh) ? last : B_NR_ITEMS(bh);
439 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700440
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700441 reiserfs_printk("INTERNAL NODE (%ld) contains %z\n", bh->b_blocknr, bh);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700442
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700443 dc = B_N_CHILD(bh, from);
444 reiserfs_printk("PTR %d: %y ", from, dc);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700445
Jeff Mahoney4cf5f7a2014-04-23 10:00:35 -0400446 for (i = from, key = internal_key(bh, from), dc++; i < to;
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700447 i++, key++, dc++) {
448 reiserfs_printk("KEY %d: %k PTR %d: %y ", i, key, i + 1, dc);
449 if (i && i % 4 == 0)
450 printk("\n");
451 }
452 printk("\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700453 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700454}
455
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700456static int print_leaf(struct buffer_head *bh, int print_mode, int first,
457 int last)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700458{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700459 struct block_head *blkh;
460 struct item_head *ih;
461 int i, nr;
462 int from, to;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700463
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700464 if (!B_IS_ITEMS_LEVEL(bh))
465 return 1;
466
467 check_leaf(bh);
468
469 blkh = B_BLK_HEAD(bh);
Jeff Mahoney4cf5f7a2014-04-23 10:00:35 -0400470 ih = item_head(bh, 0);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700471 nr = blkh_nr_item(blkh);
472
473 printk
474 ("\n===================================================================\n");
475 reiserfs_printk("LEAF NODE (%ld) contains %z\n", bh->b_blocknr, bh);
476
477 if (!(print_mode & PRINT_LEAF_ITEMS)) {
478 reiserfs_printk("FIRST ITEM_KEY: %k, LAST ITEM KEY: %k\n",
479 &(ih->ih_key), &((ih + nr - 1)->ih_key));
480 return 0;
481 }
482
483 if (first < 0 || first > nr - 1)
484 from = 0;
485 else
486 from = first;
487
488 if (last < 0 || last > nr)
489 to = nr;
490 else
491 to = last;
492
493 ih += from;
494 printk
495 ("-------------------------------------------------------------------------------\n");
496 printk
497 ("|##| type | key | ilen | free_space | version | loc |\n");
498 for (i = from; i < to; i++, ih++) {
499 printk
500 ("-------------------------------------------------------------------------------\n");
501 reiserfs_printk("|%2d| %h |\n", i, ih);
502 if (print_mode & PRINT_LEAF_ITEMS)
Jeff Mahoney4cf5f7a2014-04-23 10:00:35 -0400503 op_print_item(ih, ih_item_body(bh, ih));
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700504 }
505
506 printk
507 ("===================================================================\n");
508
509 return 0;
510}
511
512char *reiserfs_hashname(int code)
513{
514 if (code == YURA_HASH)
515 return "rupasov";
516 if (code == TEA_HASH)
517 return "tea";
518 if (code == R5_HASH)
519 return "r5";
520
521 return "unknown";
Linus Torvalds1da177e2005-04-16 15:20:36 -0700522}
523
524/* return 1 if this is not super block */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700525static int print_super_block(struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700526{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700527 struct reiserfs_super_block *rs =
528 (struct reiserfs_super_block *)(bh->b_data);
529 int skipped, data_blocks;
530 char *version;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700531
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700532 if (is_reiserfs_3_5(rs)) {
533 version = "3.5";
534 } else if (is_reiserfs_3_6(rs)) {
535 version = "3.6";
536 } else if (is_reiserfs_jr(rs)) {
537 version = ((sb_version(rs) == REISERFS_VERSION_2) ?
538 "3.6" : "3.5");
539 } else {
540 return 1;
541 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700542
Dmitry Monakhova1c6f0572015-04-13 16:31:37 +0400543 printk("%pg\'s super block is in block %llu\n", bh->b_bdev,
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700544 (unsigned long long)bh->b_blocknr);
545 printk("Reiserfs version %s\n", version);
546 printk("Block count %u\n", sb_block_count(rs));
547 printk("Blocksize %d\n", sb_blocksize(rs));
548 printk("Free blocks %u\n", sb_free_blocks(rs));
Jeff Mahoney098297b2014-04-23 10:00:36 -0400549 /*
550 * FIXME: this would be confusing if
551 * someone stores reiserfs super block in some data block ;)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700552// skipped = (bh->b_blocknr * bh->b_size) / sb_blocksize(rs);
Jeff Mahoney098297b2014-04-23 10:00:36 -0400553 */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700554 skipped = bh->b_blocknr;
555 data_blocks = sb_block_count(rs) - skipped - 1 - sb_bmap_nr(rs) -
556 (!is_reiserfs_jr(rs) ? sb_jp_journal_size(rs) +
557 1 : sb_reserved_for_journal(rs)) - sb_free_blocks(rs);
558 printk
559 ("Busy blocks (skipped %d, bitmaps - %d, journal (or reserved) blocks - %d\n"
560 "1 super block, %d data blocks\n", skipped, sb_bmap_nr(rs),
561 (!is_reiserfs_jr(rs) ? (sb_jp_journal_size(rs) + 1) :
562 sb_reserved_for_journal(rs)), data_blocks);
563 printk("Root block %u\n", sb_root_block(rs));
564 printk("Journal block (first) %d\n", sb_jp_journal_1st_block(rs));
565 printk("Journal dev %d\n", sb_jp_journal_dev(rs));
566 printk("Journal orig size %d\n", sb_jp_journal_size(rs));
567 printk("FS state %d\n", sb_fs_state(rs));
568 printk("Hash function \"%s\"\n",
569 reiserfs_hashname(sb_hash_function_code(rs)));
570
571 printk("Tree height %d\n", sb_tree_height(rs));
572 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700573}
574
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700575static int print_desc_block(struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700576{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700577 struct reiserfs_journal_desc *desc;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700578
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700579 if (memcmp(get_journal_desc_magic(bh), JOURNAL_DESC_MAGIC, 8))
580 return 1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700581
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700582 desc = (struct reiserfs_journal_desc *)(bh->b_data);
583 printk("Desc block %llu (j_trans_id %d, j_mount_id %d, j_len %d)",
584 (unsigned long long)bh->b_blocknr, get_desc_trans_id(desc),
585 get_desc_mount_id(desc), get_desc_trans_len(desc));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700586
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700587 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700588}
Jeff Mahoney098297b2014-04-23 10:00:36 -0400589/* ..., int print_mode, int first, int last) */
590void print_block(struct buffer_head *bh, ...)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700591{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700592 va_list args;
593 int mode, first, last;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700594
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700595 if (!bh) {
596 printk("print_block: buffer is NULL\n");
597 return;
598 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700599
Jesper Juhl566538a2011-01-12 17:00:27 -0800600 va_start(args, bh);
601
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700602 mode = va_arg(args, int);
603 first = va_arg(args, int);
604 last = va_arg(args, int);
605 if (print_leaf(bh, mode, first, last))
606 if (print_internal(bh, first, last))
607 if (print_super_block(bh))
608 if (print_desc_block(bh))
609 printk
610 ("Block %llu contains unformatted data\n",
611 (unsigned long long)bh->b_blocknr);
Richard Knutsson774ed222008-02-06 01:37:15 -0800612
613 va_end(args);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700614}
615
Linus Torvalds1da177e2005-04-16 15:20:36 -0700616static char print_tb_buf[2048];
617
618/* this stores initial state of tree balance in the print_tb_buf */
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700619void store_print_tb(struct tree_balance *tb)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700620{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700621 int h = 0;
622 int i;
623 struct buffer_head *tbSh, *tbFh;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700624
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700625 if (!tb)
626 return;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700627
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700628 sprintf(print_tb_buf, "\n"
629 "BALANCING %d\n"
630 "MODE=%c, ITEM_POS=%d POS_IN_ITEM=%d\n"
631 "=====================================================================\n"
632 "* h * S * L * R * F * FL * FR * CFL * CFR *\n",
633 REISERFS_SB(tb->tb_sb)->s_do_balance,
634 tb->tb_mode, PATH_LAST_POSITION(tb->tb_path),
635 tb->tb_path->pos_in_item);
636
Tobias Klausere8c96f82006-03-24 03:15:34 -0800637 for (h = 0; h < ARRAY_SIZE(tb->insert_size); h++) {
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700638 if (PATH_H_PATH_OFFSET(tb->tb_path, h) <=
639 tb->tb_path->path_length
640 && PATH_H_PATH_OFFSET(tb->tb_path,
641 h) > ILLEGAL_PATH_ELEMENT_OFFSET) {
642 tbSh = PATH_H_PBUFFER(tb->tb_path, h);
643 tbFh = PATH_H_PPARENT(tb->tb_path, h);
644 } else {
645 tbSh = NULL;
646 tbFh = NULL;
647 }
648 sprintf(print_tb_buf + strlen(print_tb_buf),
649 "* %d * %3lld(%2d) * %3lld(%2d) * %3lld(%2d) * %5lld * %5lld * %5lld * %5lld * %5lld *\n",
650 h,
651 (tbSh) ? (long long)(tbSh->b_blocknr) : (-1LL),
Jeff Mahoneya228bf82014-04-23 10:00:42 -0400652 (tbSh) ? atomic_read(&tbSh->b_count) : -1,
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700653 (tb->L[h]) ? (long long)(tb->L[h]->b_blocknr) : (-1LL),
Jeff Mahoneya228bf82014-04-23 10:00:42 -0400654 (tb->L[h]) ? atomic_read(&tb->L[h]->b_count) : -1,
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700655 (tb->R[h]) ? (long long)(tb->R[h]->b_blocknr) : (-1LL),
Jeff Mahoneya228bf82014-04-23 10:00:42 -0400656 (tb->R[h]) ? atomic_read(&tb->R[h]->b_count) : -1,
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700657 (tbFh) ? (long long)(tbFh->b_blocknr) : (-1LL),
658 (tb->FL[h]) ? (long long)(tb->FL[h]->
659 b_blocknr) : (-1LL),
660 (tb->FR[h]) ? (long long)(tb->FR[h]->
661 b_blocknr) : (-1LL),
662 (tb->CFL[h]) ? (long long)(tb->CFL[h]->
663 b_blocknr) : (-1LL),
664 (tb->CFR[h]) ? (long long)(tb->CFR[h]->
665 b_blocknr) : (-1LL));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700666 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700667
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700668 sprintf(print_tb_buf + strlen(print_tb_buf),
669 "=====================================================================\n"
670 "* h * size * ln * lb * rn * rb * blkn * s0 * s1 * s1b * s2 * s2b * curb * lk * rk *\n"
671 "* 0 * %4d * %2d * %2d * %2d * %2d * %4d * %2d * %2d * %3d * %2d * %3d * %4d * %2d * %2d *\n",
672 tb->insert_size[0], tb->lnum[0], tb->lbytes, tb->rnum[0],
Jeff Mahoneyb49fb112014-04-23 10:00:46 -0400673 tb->rbytes, tb->blknum[0], tb->s0num, tb->snum[0],
674 tb->sbytes[0], tb->snum[1], tb->sbytes[1],
675 tb->cur_blknum, tb->lkey[0], tb->rkey[0]);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700676
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700677 /* this prints balance parameters for non-leaf levels */
678 h = 0;
679 do {
680 h++;
681 sprintf(print_tb_buf + strlen(print_tb_buf),
682 "* %d * %4d * %2d * * %2d * * %2d *\n",
683 h, tb->insert_size[h], tb->lnum[h], tb->rnum[h],
684 tb->blknum[h]);
685 } while (tb->insert_size[h]);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700686
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700687 sprintf(print_tb_buf + strlen(print_tb_buf),
688 "=====================================================================\n"
689 "FEB list: ");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700690
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700691 /* print FEB list (list of buffers in form (bh (b_blocknr, b_count), that will be used for new nodes) */
692 h = 0;
Tobias Klausere8c96f82006-03-24 03:15:34 -0800693 for (i = 0; i < ARRAY_SIZE(tb->FEB); i++)
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700694 sprintf(print_tb_buf + strlen(print_tb_buf),
695 "%p (%llu %d)%s", tb->FEB[i],
696 tb->FEB[i] ? (unsigned long long)tb->FEB[i]->
697 b_blocknr : 0ULL,
Jeff Mahoneya228bf82014-04-23 10:00:42 -0400698 tb->FEB[i] ? atomic_read(&tb->FEB[i]->b_count) : 0,
Tobias Klausere8c96f82006-03-24 03:15:34 -0800699 (i == ARRAY_SIZE(tb->FEB) - 1) ? "\n" : ", ");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700700
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700701 sprintf(print_tb_buf + strlen(print_tb_buf),
702 "======================== the end ====================================\n");
Linus Torvalds1da177e2005-04-16 15:20:36 -0700703}
704
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700705void print_cur_tb(char *mes)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700706{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700707 printk("%s\n%s", mes, print_tb_buf);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700708}
709
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700710static void check_leaf_block_head(struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700711{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700712 struct block_head *blkh;
713 int nr;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700714
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700715 blkh = B_BLK_HEAD(bh);
716 nr = blkh_nr_item(blkh);
717 if (nr > (bh->b_size - BLKH_SIZE) / IH_SIZE)
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400718 reiserfs_panic(NULL, "vs-6010", "invalid item number %z",
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700719 bh);
720 if (blkh_free_space(blkh) > bh->b_size - BLKH_SIZE - IH_SIZE * nr)
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400721 reiserfs_panic(NULL, "vs-6020", "invalid free space %z",
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700722 bh);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700723
724}
725
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700726static void check_internal_block_head(struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700727{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700728 struct block_head *blkh;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700729
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700730 blkh = B_BLK_HEAD(bh);
731 if (!(B_LEVEL(bh) > DISK_LEAF_NODE_LEVEL && B_LEVEL(bh) <= MAX_HEIGHT))
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400732 reiserfs_panic(NULL, "vs-6025", "invalid level %z", bh);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700733
734 if (B_NR_ITEMS(bh) > (bh->b_size - BLKH_SIZE) / IH_SIZE)
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400735 reiserfs_panic(NULL, "vs-6030", "invalid item number %z", bh);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700736
737 if (B_FREE_SPACE(bh) !=
738 bh->b_size - BLKH_SIZE - KEY_SIZE * B_NR_ITEMS(bh) -
739 DC_SIZE * (B_NR_ITEMS(bh) + 1))
Jeff Mahoneyc3a9c212009-03-30 14:02:25 -0400740 reiserfs_panic(NULL, "vs-6040", "invalid free space %z", bh);
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700741
Linus Torvalds1da177e2005-04-16 15:20:36 -0700742}
743
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700744void check_leaf(struct buffer_head *bh)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700745{
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700746 int i;
747 struct item_head *ih;
748
749 if (!bh)
750 return;
751 check_leaf_block_head(bh);
Jeff Mahoney4cf5f7a2014-04-23 10:00:35 -0400752 for (i = 0, ih = item_head(bh, 0); i < B_NR_ITEMS(bh); i++, ih++)
753 op_check_item(ih, ih_item_body(bh, ih));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700754}
755
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700756void check_internal(struct buffer_head *bh)
757{
758 if (!bh)
759 return;
760 check_internal_block_head(bh);
761}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700762
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700763void print_statistics(struct super_block *s)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700764{
765
Linus Torvaldsbd4c6252005-07-12 20:21:28 -0700766 /*
767 printk ("reiserfs_put_super: session statistics: balances %d, fix_nodes %d, \
768 bmap with search %d, without %d, dir2ind %d, ind2dir %d\n",
769 REISERFS_SB(s)->s_do_balance, REISERFS_SB(s)->s_fix_nodes,
770 REISERFS_SB(s)->s_bmaps, REISERFS_SB(s)->s_bmaps_without_search,
771 REISERFS_SB(s)->s_direct2indirect, REISERFS_SB(s)->s_indirect2direct);
772 */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700773
774}