]> git.proxmox.com Git - mirror_zfs.git/blob - cmd/zdb/zdb.c
cstyle: Resolve C style issues
[mirror_zfs.git] / cmd / zdb / zdb.c
1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21
22 /*
23 * Copyright (c) 2005, 2010, Oracle and/or its affiliates. All rights reserved.
24 * Copyright (c) 2012 by Delphix. All rights reserved.
25 */
26
27 #include <stdio.h>
28 #include <stdio_ext.h>
29 #include <stdlib.h>
30 #include <ctype.h>
31 #include <sys/zfs_context.h>
32 #include <sys/spa.h>
33 #include <sys/spa_impl.h>
34 #include <sys/dmu.h>
35 #include <sys/zap.h>
36 #include <sys/fs/zfs.h>
37 #include <sys/zfs_znode.h>
38 #include <sys/zfs_sa.h>
39 #include <sys/sa.h>
40 #include <sys/sa_impl.h>
41 #include <sys/vdev.h>
42 #include <sys/vdev_impl.h>
43 #include <sys/metaslab_impl.h>
44 #include <sys/dmu_objset.h>
45 #include <sys/dsl_dir.h>
46 #include <sys/dsl_dataset.h>
47 #include <sys/dsl_pool.h>
48 #include <sys/dbuf.h>
49 #include <sys/zil.h>
50 #include <sys/zil_impl.h>
51 #include <sys/stat.h>
52 #include <sys/resource.h>
53 #include <sys/dmu_traverse.h>
54 #include <sys/zio_checksum.h>
55 #include <sys/zio_compress.h>
56 #include <sys/zfs_fuid.h>
57 #include <sys/arc.h>
58 #include <sys/ddt.h>
59 #include <sys/zfeature.h>
60 #include <zfs_comutil.h>
61 #undef ZFS_MAXNAMELEN
62 #include <libzfs.h>
63
64 #define ZDB_COMPRESS_NAME(idx) ((idx) < ZIO_COMPRESS_FUNCTIONS ? \
65 zio_compress_table[(idx)].ci_name : "UNKNOWN")
66 #define ZDB_CHECKSUM_NAME(idx) ((idx) < ZIO_CHECKSUM_FUNCTIONS ? \
67 zio_checksum_table[(idx)].ci_name : "UNKNOWN")
68 #define ZDB_OT_NAME(idx) ((idx) < DMU_OT_NUMTYPES ? \
69 dmu_ot[(idx)].ot_name : DMU_OT_IS_VALID(idx) ? \
70 dmu_ot_byteswap[DMU_OT_BYTESWAP(idx)].ob_name : "UNKNOWN")
71 #define ZDB_OT_TYPE(idx) ((idx) < DMU_OT_NUMTYPES ? (idx) : \
72 (((idx) == DMU_OTN_ZAP_DATA || (idx) == DMU_OTN_ZAP_METADATA) ? \
73 DMU_OT_ZAP_OTHER : DMU_OT_NUMTYPES))
74
75 #ifndef lint
76 extern int zfs_recover;
77 #else
78 int zfs_recover;
79 #endif
80
81 const char cmdname[] = "zdb";
82 uint8_t dump_opt[256];
83
84 typedef void object_viewer_t(objset_t *, uint64_t, void *data, size_t size);
85
86 extern void dump_intent_log(zilog_t *);
87 uint64_t *zopt_object = NULL;
88 int zopt_objects = 0;
89 libzfs_handle_t *g_zfs;
90 uint64_t max_inflight = 200;
91
92 /*
93 * These libumem hooks provide a reasonable set of defaults for the allocator's
94 * debugging facilities.
95 */
96 const char *
97 _umem_debug_init(void)
98 {
99 return ("default,verbose"); /* $UMEM_DEBUG setting */
100 }
101
102 const char *
103 _umem_logging_init(void)
104 {
105 return ("fail,contents"); /* $UMEM_LOGGING setting */
106 }
107
108 static void
109 usage(void)
110 {
111 (void) fprintf(stderr,
112 "Usage: %s [-CumdibcsDvhLXFPA] [-t txg] [-e [-p path...]] "
113 "[-U config] [-M inflight I/Os] poolname [object...]\n"
114 " %s [-divPA] [-e -p path...] [-U config] dataset "
115 "[object...]\n"
116 " %s -m [-LXFPA] [-t txg] [-e [-p path...]] [-U config] "
117 "poolname [vdev [metaslab...]]\n"
118 " %s -R [-A] [-e [-p path...]] poolname "
119 "vdev:offset:size[:flags]\n"
120 " %s -S [-PA] [-e [-p path...]] [-U config] poolname\n"
121 " %s -l [-uA] device\n"
122 " %s -C [-A] [-U config]\n\n",
123 cmdname, cmdname, cmdname, cmdname, cmdname, cmdname, cmdname);
124
125 (void) fprintf(stderr, " Dataset name must include at least one "
126 "separator character '/' or '@'\n");
127 (void) fprintf(stderr, " If dataset name is specified, only that "
128 "dataset is dumped\n");
129 (void) fprintf(stderr, " If object numbers are specified, only "
130 "those objects are dumped\n\n");
131 (void) fprintf(stderr, " Options to control amount of output:\n");
132 (void) fprintf(stderr, " -u uberblock\n");
133 (void) fprintf(stderr, " -d dataset(s)\n");
134 (void) fprintf(stderr, " -i intent logs\n");
135 (void) fprintf(stderr, " -C config (or cachefile if alone)\n");
136 (void) fprintf(stderr, " -h pool history\n");
137 (void) fprintf(stderr, " -b block statistics\n");
138 (void) fprintf(stderr, " -m metaslabs\n");
139 (void) fprintf(stderr, " -c checksum all metadata (twice for "
140 "all data) blocks\n");
141 (void) fprintf(stderr, " -s report stats on zdb's I/O\n");
142 (void) fprintf(stderr, " -D dedup statistics\n");
143 (void) fprintf(stderr, " -S simulate dedup to measure effect\n");
144 (void) fprintf(stderr, " -v verbose (applies to all others)\n");
145 (void) fprintf(stderr, " -l dump label contents\n");
146 (void) fprintf(stderr, " -L disable leak tracking (do not "
147 "load spacemaps)\n");
148 (void) fprintf(stderr, " -R read and display block from a "
149 "device\n\n");
150 (void) fprintf(stderr, " Below options are intended for use "
151 "with other options (except -l):\n");
152 (void) fprintf(stderr, " -A ignore assertions (-A), enable "
153 "panic recovery (-AA) or both (-AAA)\n");
154 (void) fprintf(stderr, " -F attempt automatic rewind within "
155 "safe range of transaction groups\n");
156 (void) fprintf(stderr, " -U <cachefile_path> -- use alternate "
157 "cachefile\n");
158 (void) fprintf(stderr, " -X attempt extreme rewind (does not "
159 "work with dataset)\n");
160 (void) fprintf(stderr, " -e pool is exported/destroyed/"
161 "has altroot/not in a cachefile\n");
162 (void) fprintf(stderr, " -p <path> -- use one or more with "
163 "-e to specify path to vdev dir\n");
164 (void) fprintf(stderr, " -P print numbers in parseable form\n");
165 (void) fprintf(stderr, " -t <txg> -- highest txg to use when "
166 "searching for uberblocks\n");
167 (void) fprintf(stderr, " -M <number of inflight I/Os> -- "
168 "specify the maximum number of checksumming I/Os "
169 "[default is 200]\n");
170 (void) fprintf(stderr, "Specify an option more than once (e.g. -bb) "
171 "to make only that option verbose\n");
172 (void) fprintf(stderr, "Default is to dump everything non-verbosely\n");
173 exit(1);
174 }
175
176 /*
177 * Called for usage errors that are discovered after a call to spa_open(),
178 * dmu_bonus_hold(), or pool_match(). abort() is called for other errors.
179 */
180
181 static void
182 fatal(const char *fmt, ...)
183 {
184 va_list ap;
185
186 va_start(ap, fmt);
187 (void) fprintf(stderr, "%s: ", cmdname);
188 (void) vfprintf(stderr, fmt, ap);
189 va_end(ap);
190 (void) fprintf(stderr, "\n");
191
192 exit(1);
193 }
194
195 /* ARGSUSED */
196 static void
197 dump_packed_nvlist(objset_t *os, uint64_t object, void *data, size_t size)
198 {
199 nvlist_t *nv;
200 size_t nvsize = *(uint64_t *)data;
201 char *packed = umem_alloc(nvsize, UMEM_NOFAIL);
202
203 VERIFY(0 == dmu_read(os, object, 0, nvsize, packed, DMU_READ_PREFETCH));
204
205 VERIFY(nvlist_unpack(packed, nvsize, &nv, 0) == 0);
206
207 umem_free(packed, nvsize);
208
209 dump_nvlist(nv, 8);
210
211 nvlist_free(nv);
212 }
213
214 /* ARGSUSED */
215 static void
216 dump_history_offsets(objset_t *os, uint64_t object, void *data, size_t size)
217 {
218 spa_history_phys_t *shp = data;
219
220 if (shp == NULL)
221 return;
222
223 (void) printf("\t\tpool_create_len = %llu\n",
224 (u_longlong_t)shp->sh_pool_create_len);
225 (void) printf("\t\tphys_max_off = %llu\n",
226 (u_longlong_t)shp->sh_phys_max_off);
227 (void) printf("\t\tbof = %llu\n",
228 (u_longlong_t)shp->sh_bof);
229 (void) printf("\t\teof = %llu\n",
230 (u_longlong_t)shp->sh_eof);
231 (void) printf("\t\trecords_lost = %llu\n",
232 (u_longlong_t)shp->sh_records_lost);
233 }
234
235 static void
236 zdb_nicenum(uint64_t num, char *buf)
237 {
238 if (dump_opt['P'])
239 (void) sprintf(buf, "%llu", (longlong_t)num);
240 else
241 nicenum(num, buf);
242 }
243
244 const char dump_zap_stars[] = "****************************************";
245 const int dump_zap_width = sizeof (dump_zap_stars) - 1;
246
247 static void
248 dump_zap_histogram(uint64_t histo[ZAP_HISTOGRAM_SIZE])
249 {
250 int i;
251 int minidx = ZAP_HISTOGRAM_SIZE - 1;
252 int maxidx = 0;
253 uint64_t max = 0;
254
255 for (i = 0; i < ZAP_HISTOGRAM_SIZE; i++) {
256 if (histo[i] > max)
257 max = histo[i];
258 if (histo[i] > 0 && i > maxidx)
259 maxidx = i;
260 if (histo[i] > 0 && i < minidx)
261 minidx = i;
262 }
263
264 if (max < dump_zap_width)
265 max = dump_zap_width;
266
267 for (i = minidx; i <= maxidx; i++)
268 (void) printf("\t\t\t%u: %6llu %s\n", i, (u_longlong_t)histo[i],
269 &dump_zap_stars[(max - histo[i]) * dump_zap_width / max]);
270 }
271
272 static void
273 dump_zap_stats(objset_t *os, uint64_t object)
274 {
275 int error;
276 zap_stats_t zs;
277
278 error = zap_get_stats(os, object, &zs);
279 if (error)
280 return;
281
282 if (zs.zs_ptrtbl_len == 0) {
283 ASSERT(zs.zs_num_blocks == 1);
284 (void) printf("\tmicrozap: %llu bytes, %llu entries\n",
285 (u_longlong_t)zs.zs_blocksize,
286 (u_longlong_t)zs.zs_num_entries);
287 return;
288 }
289
290 (void) printf("\tFat ZAP stats:\n");
291
292 (void) printf("\t\tPointer table:\n");
293 (void) printf("\t\t\t%llu elements\n",
294 (u_longlong_t)zs.zs_ptrtbl_len);
295 (void) printf("\t\t\tzt_blk: %llu\n",
296 (u_longlong_t)zs.zs_ptrtbl_zt_blk);
297 (void) printf("\t\t\tzt_numblks: %llu\n",
298 (u_longlong_t)zs.zs_ptrtbl_zt_numblks);
299 (void) printf("\t\t\tzt_shift: %llu\n",
300 (u_longlong_t)zs.zs_ptrtbl_zt_shift);
301 (void) printf("\t\t\tzt_blks_copied: %llu\n",
302 (u_longlong_t)zs.zs_ptrtbl_blks_copied);
303 (void) printf("\t\t\tzt_nextblk: %llu\n",
304 (u_longlong_t)zs.zs_ptrtbl_nextblk);
305
306 (void) printf("\t\tZAP entries: %llu\n",
307 (u_longlong_t)zs.zs_num_entries);
308 (void) printf("\t\tLeaf blocks: %llu\n",
309 (u_longlong_t)zs.zs_num_leafs);
310 (void) printf("\t\tTotal blocks: %llu\n",
311 (u_longlong_t)zs.zs_num_blocks);
312 (void) printf("\t\tzap_block_type: 0x%llx\n",
313 (u_longlong_t)zs.zs_block_type);
314 (void) printf("\t\tzap_magic: 0x%llx\n",
315 (u_longlong_t)zs.zs_magic);
316 (void) printf("\t\tzap_salt: 0x%llx\n",
317 (u_longlong_t)zs.zs_salt);
318
319 (void) printf("\t\tLeafs with 2^n pointers:\n");
320 dump_zap_histogram(zs.zs_leafs_with_2n_pointers);
321
322 (void) printf("\t\tBlocks with n*5 entries:\n");
323 dump_zap_histogram(zs.zs_blocks_with_n5_entries);
324
325 (void) printf("\t\tBlocks n/10 full:\n");
326 dump_zap_histogram(zs.zs_blocks_n_tenths_full);
327
328 (void) printf("\t\tEntries with n chunks:\n");
329 dump_zap_histogram(zs.zs_entries_using_n_chunks);
330
331 (void) printf("\t\tBuckets with n entries:\n");
332 dump_zap_histogram(zs.zs_buckets_with_n_entries);
333 }
334
335 /*ARGSUSED*/
336 static void
337 dump_none(objset_t *os, uint64_t object, void *data, size_t size)
338 {
339 }
340
341 /*ARGSUSED*/
342 static void
343 dump_unknown(objset_t *os, uint64_t object, void *data, size_t size)
344 {
345 (void) printf("\tUNKNOWN OBJECT TYPE\n");
346 }
347
348 /*ARGSUSED*/
349 void
350 dump_uint8(objset_t *os, uint64_t object, void *data, size_t size)
351 {
352 }
353
354 /*ARGSUSED*/
355 static void
356 dump_uint64(objset_t *os, uint64_t object, void *data, size_t size)
357 {
358 }
359
360 /*ARGSUSED*/
361 static void
362 dump_zap(objset_t *os, uint64_t object, void *data, size_t size)
363 {
364 zap_cursor_t zc;
365 zap_attribute_t attr;
366 void *prop;
367 int i;
368
369 dump_zap_stats(os, object);
370 (void) printf("\n");
371
372 for (zap_cursor_init(&zc, os, object);
373 zap_cursor_retrieve(&zc, &attr) == 0;
374 zap_cursor_advance(&zc)) {
375 (void) printf("\t\t%s = ", attr.za_name);
376 if (attr.za_num_integers == 0) {
377 (void) printf("\n");
378 continue;
379 }
380 prop = umem_zalloc(attr.za_num_integers *
381 attr.za_integer_length, UMEM_NOFAIL);
382 (void) zap_lookup(os, object, attr.za_name,
383 attr.za_integer_length, attr.za_num_integers, prop);
384 if (attr.za_integer_length == 1) {
385 (void) printf("%s", (char *)prop);
386 } else {
387 for (i = 0; i < attr.za_num_integers; i++) {
388 switch (attr.za_integer_length) {
389 case 2:
390 (void) printf("%u ",
391 ((uint16_t *)prop)[i]);
392 break;
393 case 4:
394 (void) printf("%u ",
395 ((uint32_t *)prop)[i]);
396 break;
397 case 8:
398 (void) printf("%lld ",
399 (u_longlong_t)((int64_t *)prop)[i]);
400 break;
401 }
402 }
403 }
404 (void) printf("\n");
405 umem_free(prop, attr.za_num_integers * attr.za_integer_length);
406 }
407 zap_cursor_fini(&zc);
408 }
409
410 /*ARGSUSED*/
411 static void
412 dump_ddt_zap(objset_t *os, uint64_t object, void *data, size_t size)
413 {
414 dump_zap_stats(os, object);
415 /* contents are printed elsewhere, properly decoded */
416 }
417
418 /*ARGSUSED*/
419 static void
420 dump_sa_attrs(objset_t *os, uint64_t object, void *data, size_t size)
421 {
422 zap_cursor_t zc;
423 zap_attribute_t attr;
424
425 dump_zap_stats(os, object);
426 (void) printf("\n");
427
428 for (zap_cursor_init(&zc, os, object);
429 zap_cursor_retrieve(&zc, &attr) == 0;
430 zap_cursor_advance(&zc)) {
431 (void) printf("\t\t%s = ", attr.za_name);
432 if (attr.za_num_integers == 0) {
433 (void) printf("\n");
434 continue;
435 }
436 (void) printf(" %llx : [%d:%d:%d]\n",
437 (u_longlong_t)attr.za_first_integer,
438 (int)ATTR_LENGTH(attr.za_first_integer),
439 (int)ATTR_BSWAP(attr.za_first_integer),
440 (int)ATTR_NUM(attr.za_first_integer));
441 }
442 zap_cursor_fini(&zc);
443 }
444
445 /*ARGSUSED*/
446 static void
447 dump_sa_layouts(objset_t *os, uint64_t object, void *data, size_t size)
448 {
449 zap_cursor_t zc;
450 zap_attribute_t attr;
451 uint16_t *layout_attrs;
452 int i;
453
454 dump_zap_stats(os, object);
455 (void) printf("\n");
456
457 for (zap_cursor_init(&zc, os, object);
458 zap_cursor_retrieve(&zc, &attr) == 0;
459 zap_cursor_advance(&zc)) {
460 (void) printf("\t\t%s = [", attr.za_name);
461 if (attr.za_num_integers == 0) {
462 (void) printf("\n");
463 continue;
464 }
465
466 VERIFY(attr.za_integer_length == 2);
467 layout_attrs = umem_zalloc(attr.za_num_integers *
468 attr.za_integer_length, UMEM_NOFAIL);
469
470 VERIFY(zap_lookup(os, object, attr.za_name,
471 attr.za_integer_length,
472 attr.za_num_integers, layout_attrs) == 0);
473
474 for (i = 0; i != attr.za_num_integers; i++)
475 (void) printf(" %d ", (int)layout_attrs[i]);
476 (void) printf("]\n");
477 umem_free(layout_attrs,
478 attr.za_num_integers * attr.za_integer_length);
479 }
480 zap_cursor_fini(&zc);
481 }
482
483 /*ARGSUSED*/
484 static void
485 dump_zpldir(objset_t *os, uint64_t object, void *data, size_t size)
486 {
487 zap_cursor_t zc;
488 zap_attribute_t attr;
489 const char *typenames[] = {
490 /* 0 */ "not specified",
491 /* 1 */ "FIFO",
492 /* 2 */ "Character Device",
493 /* 3 */ "3 (invalid)",
494 /* 4 */ "Directory",
495 /* 5 */ "5 (invalid)",
496 /* 6 */ "Block Device",
497 /* 7 */ "7 (invalid)",
498 /* 8 */ "Regular File",
499 /* 9 */ "9 (invalid)",
500 /* 10 */ "Symbolic Link",
501 /* 11 */ "11 (invalid)",
502 /* 12 */ "Socket",
503 /* 13 */ "Door",
504 /* 14 */ "Event Port",
505 /* 15 */ "15 (invalid)",
506 };
507
508 dump_zap_stats(os, object);
509 (void) printf("\n");
510
511 for (zap_cursor_init(&zc, os, object);
512 zap_cursor_retrieve(&zc, &attr) == 0;
513 zap_cursor_advance(&zc)) {
514 (void) printf("\t\t%s = %lld (type: %s)\n",
515 attr.za_name, ZFS_DIRENT_OBJ(attr.za_first_integer),
516 typenames[ZFS_DIRENT_TYPE(attr.za_first_integer)]);
517 }
518 zap_cursor_fini(&zc);
519 }
520
521 static void
522 dump_spacemap(objset_t *os, space_map_obj_t *smo, space_map_t *sm)
523 {
524 uint64_t alloc, offset, entry;
525 uint8_t mapshift = sm->sm_shift;
526 uint64_t mapstart = sm->sm_start;
527 char *ddata[] = { "ALLOC", "FREE", "CONDENSE", "INVALID",
528 "INVALID", "INVALID", "INVALID", "INVALID" };
529
530 if (smo->smo_object == 0)
531 return;
532
533 /*
534 * Print out the freelist entries in both encoded and decoded form.
535 */
536 alloc = 0;
537 for (offset = 0; offset < smo->smo_objsize; offset += sizeof (entry)) {
538 VERIFY3U(0, ==, dmu_read(os, smo->smo_object, offset,
539 sizeof (entry), &entry, DMU_READ_PREFETCH));
540 if (SM_DEBUG_DECODE(entry)) {
541 (void) printf("\t [%6llu] %s: txg %llu, pass %llu\n",
542 (u_longlong_t)(offset / sizeof (entry)),
543 ddata[SM_DEBUG_ACTION_DECODE(entry)],
544 (u_longlong_t)SM_DEBUG_TXG_DECODE(entry),
545 (u_longlong_t)SM_DEBUG_SYNCPASS_DECODE(entry));
546 } else {
547 (void) printf("\t [%6llu] %c range:"
548 " %010llx-%010llx size: %06llx\n",
549 (u_longlong_t)(offset / sizeof (entry)),
550 SM_TYPE_DECODE(entry) == SM_ALLOC ? 'A' : 'F',
551 (u_longlong_t)((SM_OFFSET_DECODE(entry) <<
552 mapshift) + mapstart),
553 (u_longlong_t)((SM_OFFSET_DECODE(entry) <<
554 mapshift) + mapstart + (SM_RUN_DECODE(entry) <<
555 mapshift)),
556 (u_longlong_t)(SM_RUN_DECODE(entry) << mapshift));
557 if (SM_TYPE_DECODE(entry) == SM_ALLOC)
558 alloc += SM_RUN_DECODE(entry) << mapshift;
559 else
560 alloc -= SM_RUN_DECODE(entry) << mapshift;
561 }
562 }
563 if (alloc != smo->smo_alloc) {
564 (void) printf("space_map_object alloc (%llu) INCONSISTENT "
565 "with space map summary (%llu)\n",
566 (u_longlong_t)smo->smo_alloc, (u_longlong_t)alloc);
567 }
568 }
569
570 static void
571 dump_metaslab_stats(metaslab_t *msp)
572 {
573 char maxbuf[32];
574 space_map_t *sm = msp->ms_map;
575 avl_tree_t *t = sm->sm_pp_root;
576 int free_pct = sm->sm_space * 100 / sm->sm_size;
577
578 zdb_nicenum(space_map_maxsize(sm), maxbuf);
579
580 (void) printf("\t %25s %10lu %7s %6s %4s %4d%%\n",
581 "segments", avl_numnodes(t), "maxsize", maxbuf,
582 "freepct", free_pct);
583 }
584
585 static void
586 dump_metaslab(metaslab_t *msp)
587 {
588 vdev_t *vd = msp->ms_group->mg_vd;
589 spa_t *spa = vd->vdev_spa;
590 space_map_t *sm = msp->ms_map;
591 space_map_obj_t *smo = &msp->ms_smo;
592 char freebuf[32];
593
594 zdb_nicenum(sm->sm_size - smo->smo_alloc, freebuf);
595
596 (void) printf(
597 "\tmetaslab %6llu offset %12llx spacemap %6llu free %5s\n",
598 (u_longlong_t)(sm->sm_start / sm->sm_size),
599 (u_longlong_t)sm->sm_start, (u_longlong_t)smo->smo_object, freebuf);
600
601 if (dump_opt['m'] > 1 && !dump_opt['L']) {
602 mutex_enter(&msp->ms_lock);
603 space_map_load_wait(sm);
604 if (!sm->sm_loaded)
605 VERIFY(space_map_load(sm, zfs_metaslab_ops,
606 SM_FREE, smo, spa->spa_meta_objset) == 0);
607 dump_metaslab_stats(msp);
608 space_map_unload(sm);
609 mutex_exit(&msp->ms_lock);
610 }
611
612 if (dump_opt['d'] > 5 || dump_opt['m'] > 2) {
613 ASSERT(sm->sm_size == (1ULL << vd->vdev_ms_shift));
614
615 mutex_enter(&msp->ms_lock);
616 dump_spacemap(spa->spa_meta_objset, smo, sm);
617 mutex_exit(&msp->ms_lock);
618 }
619 }
620
621 static void
622 print_vdev_metaslab_header(vdev_t *vd)
623 {
624 (void) printf("\tvdev %10llu\n\t%-10s%5llu %-19s %-15s %-10s\n",
625 (u_longlong_t)vd->vdev_id,
626 "metaslabs", (u_longlong_t)vd->vdev_ms_count,
627 "offset", "spacemap", "free");
628 (void) printf("\t%15s %19s %15s %10s\n",
629 "---------------", "-------------------",
630 "---------------", "-------------");
631 }
632
633 static void
634 dump_metaslabs(spa_t *spa)
635 {
636 vdev_t *vd, *rvd = spa->spa_root_vdev;
637 uint64_t m, c = 0, children = rvd->vdev_children;
638
639 (void) printf("\nMetaslabs:\n");
640
641 if (!dump_opt['d'] && zopt_objects > 0) {
642 c = zopt_object[0];
643
644 if (c >= children)
645 (void) fatal("bad vdev id: %llu", (u_longlong_t)c);
646
647 if (zopt_objects > 1) {
648 vd = rvd->vdev_child[c];
649 print_vdev_metaslab_header(vd);
650
651 for (m = 1; m < zopt_objects; m++) {
652 if (zopt_object[m] < vd->vdev_ms_count)
653 dump_metaslab(
654 vd->vdev_ms[zopt_object[m]]);
655 else
656 (void) fprintf(stderr, "bad metaslab "
657 "number %llu\n",
658 (u_longlong_t)zopt_object[m]);
659 }
660 (void) printf("\n");
661 return;
662 }
663 children = c + 1;
664 }
665 for (; c < children; c++) {
666 vd = rvd->vdev_child[c];
667 print_vdev_metaslab_header(vd);
668
669 for (m = 0; m < vd->vdev_ms_count; m++)
670 dump_metaslab(vd->vdev_ms[m]);
671 (void) printf("\n");
672 }
673 }
674
675 static void
676 dump_dde(const ddt_t *ddt, const ddt_entry_t *dde, uint64_t index)
677 {
678 const ddt_phys_t *ddp = dde->dde_phys;
679 const ddt_key_t *ddk = &dde->dde_key;
680 char *types[4] = { "ditto", "single", "double", "triple" };
681 char blkbuf[BP_SPRINTF_LEN];
682 blkptr_t blk;
683 int p;
684
685 for (p = 0; p < DDT_PHYS_TYPES; p++, ddp++) {
686 if (ddp->ddp_phys_birth == 0)
687 continue;
688 ddt_bp_create(ddt->ddt_checksum, ddk, ddp, &blk);
689 sprintf_blkptr(blkbuf, &blk);
690 (void) printf("index %llx refcnt %llu %s %s\n",
691 (u_longlong_t)index, (u_longlong_t)ddp->ddp_refcnt,
692 types[p], blkbuf);
693 }
694 }
695
696 static void
697 dump_dedup_ratio(const ddt_stat_t *dds)
698 {
699 double rL, rP, rD, D, dedup, compress, copies;
700
701 if (dds->dds_blocks == 0)
702 return;
703
704 rL = (double)dds->dds_ref_lsize;
705 rP = (double)dds->dds_ref_psize;
706 rD = (double)dds->dds_ref_dsize;
707 D = (double)dds->dds_dsize;
708
709 dedup = rD / D;
710 compress = rL / rP;
711 copies = rD / rP;
712
713 (void) printf("dedup = %.2f, compress = %.2f, copies = %.2f, "
714 "dedup * compress / copies = %.2f\n\n",
715 dedup, compress, copies, dedup * compress / copies);
716 }
717
718 static void
719 dump_ddt(ddt_t *ddt, enum ddt_type type, enum ddt_class class)
720 {
721 char name[DDT_NAMELEN];
722 ddt_entry_t dde;
723 uint64_t walk = 0;
724 dmu_object_info_t doi;
725 uint64_t count, dspace, mspace;
726 int error;
727
728 error = ddt_object_info(ddt, type, class, &doi);
729
730 if (error == ENOENT)
731 return;
732 ASSERT(error == 0);
733
734 error = ddt_object_count(ddt, type, class, &count);
735 ASSERT(error == 0);
736 if (count == 0)
737 return;
738
739 dspace = doi.doi_physical_blocks_512 << 9;
740 mspace = doi.doi_fill_count * doi.doi_data_block_size;
741
742 ddt_object_name(ddt, type, class, name);
743
744 (void) printf("%s: %llu entries, size %llu on disk, %llu in core\n",
745 name,
746 (u_longlong_t)count,
747 (u_longlong_t)(dspace / count),
748 (u_longlong_t)(mspace / count));
749
750 if (dump_opt['D'] < 3)
751 return;
752
753 zpool_dump_ddt(NULL, &ddt->ddt_histogram[type][class]);
754
755 if (dump_opt['D'] < 4)
756 return;
757
758 if (dump_opt['D'] < 5 && class == DDT_CLASS_UNIQUE)
759 return;
760
761 (void) printf("%s contents:\n\n", name);
762
763 while ((error = ddt_object_walk(ddt, type, class, &walk, &dde)) == 0)
764 dump_dde(ddt, &dde, walk);
765
766 ASSERT(error == ENOENT);
767
768 (void) printf("\n");
769 }
770
771 static void
772 dump_all_ddts(spa_t *spa)
773 {
774 ddt_histogram_t ddh_total;
775 ddt_stat_t dds_total;
776 enum zio_checksum c;
777 enum ddt_type type;
778 enum ddt_class class;
779
780 bzero(&ddh_total, sizeof (ddt_histogram_t));
781 bzero(&dds_total, sizeof (ddt_stat_t));
782
783 for (c = 0; c < ZIO_CHECKSUM_FUNCTIONS; c++) {
784 ddt_t *ddt = spa->spa_ddt[c];
785 for (type = 0; type < DDT_TYPES; type++) {
786 for (class = 0; class < DDT_CLASSES;
787 class++) {
788 dump_ddt(ddt, type, class);
789 }
790 }
791 }
792
793 ddt_get_dedup_stats(spa, &dds_total);
794
795 if (dds_total.dds_blocks == 0) {
796 (void) printf("All DDTs are empty\n");
797 return;
798 }
799
800 (void) printf("\n");
801
802 if (dump_opt['D'] > 1) {
803 (void) printf("DDT histogram (aggregated over all DDTs):\n");
804 ddt_get_dedup_histogram(spa, &ddh_total);
805 zpool_dump_ddt(&dds_total, &ddh_total);
806 }
807
808 dump_dedup_ratio(&dds_total);
809 }
810
811 static void
812 dump_dtl_seg(space_map_t *sm, uint64_t start, uint64_t size)
813 {
814 char *prefix = (void *)sm;
815
816 (void) printf("%s [%llu,%llu) length %llu\n",
817 prefix,
818 (u_longlong_t)start,
819 (u_longlong_t)(start + size),
820 (u_longlong_t)(size));
821 }
822
823 static void
824 dump_dtl(vdev_t *vd, int indent)
825 {
826 spa_t *spa = vd->vdev_spa;
827 boolean_t required;
828 char *name[DTL_TYPES] = { "missing", "partial", "scrub", "outage" };
829 char prefix[256];
830 int c, t;
831
832 spa_vdev_state_enter(spa, SCL_NONE);
833 required = vdev_dtl_required(vd);
834 (void) spa_vdev_state_exit(spa, NULL, 0);
835
836 if (indent == 0)
837 (void) printf("\nDirty time logs:\n\n");
838
839 (void) printf("\t%*s%s [%s]\n", indent, "",
840 vd->vdev_path ? vd->vdev_path :
841 vd->vdev_parent ? vd->vdev_ops->vdev_op_type : spa_name(spa),
842 required ? "DTL-required" : "DTL-expendable");
843
844 for (t = 0; t < DTL_TYPES; t++) {
845 space_map_t *sm = &vd->vdev_dtl[t];
846 if (sm->sm_space == 0)
847 continue;
848 (void) snprintf(prefix, sizeof (prefix), "\t%*s%s",
849 indent + 2, "", name[t]);
850 mutex_enter(sm->sm_lock);
851 space_map_walk(sm, dump_dtl_seg, (void *)prefix);
852 mutex_exit(sm->sm_lock);
853 if (dump_opt['d'] > 5 && vd->vdev_children == 0)
854 dump_spacemap(spa->spa_meta_objset,
855 &vd->vdev_dtl_smo, sm);
856 }
857
858 for (c = 0; c < vd->vdev_children; c++)
859 dump_dtl(vd->vdev_child[c], indent + 4);
860 }
861
862 static void
863 dump_history(spa_t *spa)
864 {
865 nvlist_t **events = NULL;
866 char buf[SPA_MAXBLOCKSIZE];
867 uint64_t resid, len, off = 0;
868 uint_t num = 0;
869 int error;
870 time_t tsec;
871 struct tm t;
872 char tbuf[30];
873 char internalstr[MAXPATHLEN];
874 int i;
875
876 do {
877 len = sizeof (buf);
878
879 if ((error = spa_history_get(spa, &off, &len, buf)) != 0) {
880 (void) fprintf(stderr, "Unable to read history: "
881 "error %d\n", error);
882 return;
883 }
884
885 if (zpool_history_unpack(buf, len, &resid, &events, &num) != 0)
886 break;
887
888 off -= resid;
889 } while (len != 0);
890
891 (void) printf("\nHistory:\n");
892 for (i = 0; i < num; i++) {
893 uint64_t time, txg, ievent;
894 char *cmd, *intstr;
895 boolean_t printed = B_FALSE;
896
897 if (nvlist_lookup_uint64(events[i], ZPOOL_HIST_TIME,
898 &time) != 0)
899 goto next;
900 if (nvlist_lookup_string(events[i], ZPOOL_HIST_CMD,
901 &cmd) != 0) {
902 if (nvlist_lookup_uint64(events[i],
903 ZPOOL_HIST_INT_EVENT, &ievent) != 0)
904 goto next;
905 verify(nvlist_lookup_uint64(events[i],
906 ZPOOL_HIST_TXG, &txg) == 0);
907 verify(nvlist_lookup_string(events[i],
908 ZPOOL_HIST_INT_STR, &intstr) == 0);
909 if (ievent >= ZFS_NUM_LEGACY_HISTORY_EVENTS)
910 goto next;
911
912 (void) snprintf(internalstr,
913 sizeof (internalstr),
914 "[internal %s txg:%lld] %s",
915 zfs_history_event_names[ievent],
916 (longlong_t)txg, intstr);
917 cmd = internalstr;
918 }
919 tsec = time;
920 (void) localtime_r(&tsec, &t);
921 (void) strftime(tbuf, sizeof (tbuf), "%F.%T", &t);
922 (void) printf("%s %s\n", tbuf, cmd);
923 printed = B_TRUE;
924
925 next:
926 if (dump_opt['h'] > 1) {
927 if (!printed)
928 (void) printf("unrecognized record:\n");
929 dump_nvlist(events[i], 2);
930 }
931 }
932 }
933
934 /*ARGSUSED*/
935 static void
936 dump_dnode(objset_t *os, uint64_t object, void *data, size_t size)
937 {
938 }
939
940 static uint64_t
941 blkid2offset(const dnode_phys_t *dnp, const blkptr_t *bp, const zbookmark_t *zb)
942 {
943 if (dnp == NULL) {
944 ASSERT(zb->zb_level < 0);
945 if (zb->zb_object == 0)
946 return (zb->zb_blkid);
947 return (zb->zb_blkid * BP_GET_LSIZE(bp));
948 }
949
950 ASSERT(zb->zb_level >= 0);
951
952 return ((zb->zb_blkid <<
953 (zb->zb_level * (dnp->dn_indblkshift - SPA_BLKPTRSHIFT))) *
954 dnp->dn_datablkszsec << SPA_MINBLOCKSHIFT);
955 }
956
957 static void
958 sprintf_blkptr_compact(char *blkbuf, const blkptr_t *bp)
959 {
960 const dva_t *dva = bp->blk_dva;
961 int ndvas = dump_opt['d'] > 5 ? BP_GET_NDVAS(bp) : 1;
962 int i;
963
964 if (dump_opt['b'] >= 5) {
965 sprintf_blkptr(blkbuf, bp);
966 return;
967 }
968
969 blkbuf[0] = '\0';
970
971 for (i = 0; i < ndvas; i++)
972 (void) sprintf(blkbuf + strlen(blkbuf), "%llu:%llx:%llx ",
973 (u_longlong_t)DVA_GET_VDEV(&dva[i]),
974 (u_longlong_t)DVA_GET_OFFSET(&dva[i]),
975 (u_longlong_t)DVA_GET_ASIZE(&dva[i]));
976
977 (void) sprintf(blkbuf + strlen(blkbuf),
978 "%llxL/%llxP F=%llu B=%llu/%llu",
979 (u_longlong_t)BP_GET_LSIZE(bp),
980 (u_longlong_t)BP_GET_PSIZE(bp),
981 (u_longlong_t)bp->blk_fill,
982 (u_longlong_t)bp->blk_birth,
983 (u_longlong_t)BP_PHYSICAL_BIRTH(bp));
984 }
985
986 static void
987 print_indirect(blkptr_t *bp, const zbookmark_t *zb,
988 const dnode_phys_t *dnp)
989 {
990 char blkbuf[BP_SPRINTF_LEN];
991 int l;
992
993 ASSERT3U(BP_GET_TYPE(bp), ==, dnp->dn_type);
994 ASSERT3U(BP_GET_LEVEL(bp), ==, zb->zb_level);
995
996 (void) printf("%16llx ", (u_longlong_t)blkid2offset(dnp, bp, zb));
997
998 ASSERT(zb->zb_level >= 0);
999
1000 for (l = dnp->dn_nlevels - 1; l >= -1; l--) {
1001 if (l == zb->zb_level) {
1002 (void) printf("L%llx", (u_longlong_t)zb->zb_level);
1003 } else {
1004 (void) printf(" ");
1005 }
1006 }
1007
1008 sprintf_blkptr_compact(blkbuf, bp);
1009 (void) printf("%s\n", blkbuf);
1010 }
1011
1012 static int
1013 visit_indirect(spa_t *spa, const dnode_phys_t *dnp,
1014 blkptr_t *bp, const zbookmark_t *zb)
1015 {
1016 int err = 0;
1017
1018 if (bp->blk_birth == 0)
1019 return (0);
1020
1021 print_indirect(bp, zb, dnp);
1022
1023 if (BP_GET_LEVEL(bp) > 0) {
1024 uint32_t flags = ARC_WAIT;
1025 int i;
1026 blkptr_t *cbp;
1027 int epb = BP_GET_LSIZE(bp) >> SPA_BLKPTRSHIFT;
1028 arc_buf_t *buf;
1029 uint64_t fill = 0;
1030
1031 err = arc_read(NULL, spa, bp, arc_getbuf_func, &buf,
1032 ZIO_PRIORITY_ASYNC_READ, ZIO_FLAG_CANFAIL, &flags, zb);
1033 if (err)
1034 return (err);
1035 ASSERT(buf->b_data);
1036
1037 /* recursively visit blocks below this */
1038 cbp = buf->b_data;
1039 for (i = 0; i < epb; i++, cbp++) {
1040 zbookmark_t czb;
1041
1042 SET_BOOKMARK(&czb, zb->zb_objset, zb->zb_object,
1043 zb->zb_level - 1,
1044 zb->zb_blkid * epb + i);
1045 err = visit_indirect(spa, dnp, cbp, &czb);
1046 if (err)
1047 break;
1048 fill += cbp->blk_fill;
1049 }
1050 if (!err)
1051 ASSERT3U(fill, ==, bp->blk_fill);
1052 (void) arc_buf_remove_ref(buf, &buf);
1053 }
1054
1055 return (err);
1056 }
1057
1058 /*ARGSUSED*/
1059 static void
1060 dump_indirect(dnode_t *dn)
1061 {
1062 dnode_phys_t *dnp = dn->dn_phys;
1063 int j;
1064 zbookmark_t czb;
1065
1066 (void) printf("Indirect blocks:\n");
1067
1068 SET_BOOKMARK(&czb, dmu_objset_id(dn->dn_objset),
1069 dn->dn_object, dnp->dn_nlevels - 1, 0);
1070 for (j = 0; j < dnp->dn_nblkptr; j++) {
1071 czb.zb_blkid = j;
1072 (void) visit_indirect(dmu_objset_spa(dn->dn_objset), dnp,
1073 &dnp->dn_blkptr[j], &czb);
1074 }
1075
1076 (void) printf("\n");
1077 }
1078
1079 /*ARGSUSED*/
1080 static void
1081 dump_dsl_dir(objset_t *os, uint64_t object, void *data, size_t size)
1082 {
1083 dsl_dir_phys_t *dd = data;
1084 time_t crtime;
1085 char nice[32];
1086
1087 if (dd == NULL)
1088 return;
1089
1090 ASSERT3U(size, >=, sizeof (dsl_dir_phys_t));
1091
1092 crtime = dd->dd_creation_time;
1093 (void) printf("\t\tcreation_time = %s", ctime(&crtime));
1094 (void) printf("\t\thead_dataset_obj = %llu\n",
1095 (u_longlong_t)dd->dd_head_dataset_obj);
1096 (void) printf("\t\tparent_dir_obj = %llu\n",
1097 (u_longlong_t)dd->dd_parent_obj);
1098 (void) printf("\t\torigin_obj = %llu\n",
1099 (u_longlong_t)dd->dd_origin_obj);
1100 (void) printf("\t\tchild_dir_zapobj = %llu\n",
1101 (u_longlong_t)dd->dd_child_dir_zapobj);
1102 zdb_nicenum(dd->dd_used_bytes, nice);
1103 (void) printf("\t\tused_bytes = %s\n", nice);
1104 zdb_nicenum(dd->dd_compressed_bytes, nice);
1105 (void) printf("\t\tcompressed_bytes = %s\n", nice);
1106 zdb_nicenum(dd->dd_uncompressed_bytes, nice);
1107 (void) printf("\t\tuncompressed_bytes = %s\n", nice);
1108 zdb_nicenum(dd->dd_quota, nice);
1109 (void) printf("\t\tquota = %s\n", nice);
1110 zdb_nicenum(dd->dd_reserved, nice);
1111 (void) printf("\t\treserved = %s\n", nice);
1112 (void) printf("\t\tprops_zapobj = %llu\n",
1113 (u_longlong_t)dd->dd_props_zapobj);
1114 (void) printf("\t\tdeleg_zapobj = %llu\n",
1115 (u_longlong_t)dd->dd_deleg_zapobj);
1116 (void) printf("\t\tflags = %llx\n",
1117 (u_longlong_t)dd->dd_flags);
1118
1119 #define DO(which) \
1120 zdb_nicenum(dd->dd_used_breakdown[DD_USED_ ## which], nice); \
1121 (void) printf("\t\tused_breakdown[" #which "] = %s\n", nice)
1122 DO(HEAD);
1123 DO(SNAP);
1124 DO(CHILD);
1125 DO(CHILD_RSRV);
1126 DO(REFRSRV);
1127 #undef DO
1128 }
1129
1130 /*ARGSUSED*/
1131 static void
1132 dump_dsl_dataset(objset_t *os, uint64_t object, void *data, size_t size)
1133 {
1134 dsl_dataset_phys_t *ds = data;
1135 time_t crtime;
1136 char used[32], compressed[32], uncompressed[32], unique[32];
1137 char blkbuf[BP_SPRINTF_LEN];
1138
1139 if (ds == NULL)
1140 return;
1141
1142 ASSERT(size == sizeof (*ds));
1143 crtime = ds->ds_creation_time;
1144 zdb_nicenum(ds->ds_referenced_bytes, used);
1145 zdb_nicenum(ds->ds_compressed_bytes, compressed);
1146 zdb_nicenum(ds->ds_uncompressed_bytes, uncompressed);
1147 zdb_nicenum(ds->ds_unique_bytes, unique);
1148 sprintf_blkptr(blkbuf, &ds->ds_bp);
1149
1150 (void) printf("\t\tdir_obj = %llu\n",
1151 (u_longlong_t)ds->ds_dir_obj);
1152 (void) printf("\t\tprev_snap_obj = %llu\n",
1153 (u_longlong_t)ds->ds_prev_snap_obj);
1154 (void) printf("\t\tprev_snap_txg = %llu\n",
1155 (u_longlong_t)ds->ds_prev_snap_txg);
1156 (void) printf("\t\tnext_snap_obj = %llu\n",
1157 (u_longlong_t)ds->ds_next_snap_obj);
1158 (void) printf("\t\tsnapnames_zapobj = %llu\n",
1159 (u_longlong_t)ds->ds_snapnames_zapobj);
1160 (void) printf("\t\tnum_children = %llu\n",
1161 (u_longlong_t)ds->ds_num_children);
1162 (void) printf("\t\tuserrefs_obj = %llu\n",
1163 (u_longlong_t)ds->ds_userrefs_obj);
1164 (void) printf("\t\tcreation_time = %s", ctime(&crtime));
1165 (void) printf("\t\tcreation_txg = %llu\n",
1166 (u_longlong_t)ds->ds_creation_txg);
1167 (void) printf("\t\tdeadlist_obj = %llu\n",
1168 (u_longlong_t)ds->ds_deadlist_obj);
1169 (void) printf("\t\tused_bytes = %s\n", used);
1170 (void) printf("\t\tcompressed_bytes = %s\n", compressed);
1171 (void) printf("\t\tuncompressed_bytes = %s\n", uncompressed);
1172 (void) printf("\t\tunique = %s\n", unique);
1173 (void) printf("\t\tfsid_guid = %llu\n",
1174 (u_longlong_t)ds->ds_fsid_guid);
1175 (void) printf("\t\tguid = %llu\n",
1176 (u_longlong_t)ds->ds_guid);
1177 (void) printf("\t\tflags = %llx\n",
1178 (u_longlong_t)ds->ds_flags);
1179 (void) printf("\t\tnext_clones_obj = %llu\n",
1180 (u_longlong_t)ds->ds_next_clones_obj);
1181 (void) printf("\t\tprops_obj = %llu\n",
1182 (u_longlong_t)ds->ds_props_obj);
1183 (void) printf("\t\tbp = %s\n", blkbuf);
1184 }
1185
1186 /* ARGSUSED */
1187 static int
1188 dump_bptree_cb(void *arg, const blkptr_t *bp, dmu_tx_t *tx)
1189 {
1190 char blkbuf[BP_SPRINTF_LEN];
1191
1192 if (bp->blk_birth != 0) {
1193 sprintf_blkptr(blkbuf, bp);
1194 (void) printf("\t%s\n", blkbuf);
1195 }
1196 return (0);
1197 }
1198
1199 static void
1200 dump_bptree(objset_t *os, uint64_t obj, char *name)
1201 {
1202 char bytes[32];
1203 bptree_phys_t *bt;
1204 dmu_buf_t *db;
1205
1206 if (dump_opt['d'] < 3)
1207 return;
1208
1209 VERIFY3U(0, ==, dmu_bonus_hold(os, obj, FTAG, &db));
1210 bt = db->db_data;
1211 zdb_nicenum(bt->bt_bytes, bytes);
1212 (void) printf("\n %s: %llu datasets, %s\n",
1213 name, (unsigned long long)(bt->bt_end - bt->bt_begin), bytes);
1214 dmu_buf_rele(db, FTAG);
1215
1216 if (dump_opt['d'] < 5)
1217 return;
1218
1219 (void) printf("\n");
1220
1221 (void) bptree_iterate(os, obj, B_FALSE, dump_bptree_cb, NULL, NULL);
1222 }
1223
1224 /* ARGSUSED */
1225 static int
1226 dump_bpobj_cb(void *arg, const blkptr_t *bp, dmu_tx_t *tx)
1227 {
1228 char blkbuf[BP_SPRINTF_LEN];
1229
1230 ASSERT(bp->blk_birth != 0);
1231 sprintf_blkptr_compact(blkbuf, bp);
1232 (void) printf("\t%s\n", blkbuf);
1233 return (0);
1234 }
1235
1236 static void
1237 dump_bpobj(bpobj_t *bpo, char *name, int indent)
1238 {
1239 char bytes[32];
1240 char comp[32];
1241 char uncomp[32];
1242 uint64_t i;
1243
1244 if (dump_opt['d'] < 3)
1245 return;
1246
1247 zdb_nicenum(bpo->bpo_phys->bpo_bytes, bytes);
1248 if (bpo->bpo_havesubobj && bpo->bpo_phys->bpo_subobjs != 0) {
1249 zdb_nicenum(bpo->bpo_phys->bpo_comp, comp);
1250 zdb_nicenum(bpo->bpo_phys->bpo_uncomp, uncomp);
1251 (void) printf(" %*s: object %llu, %llu local blkptrs, "
1252 "%llu subobjs, %s (%s/%s comp)\n",
1253 indent * 8, name,
1254 (u_longlong_t)bpo->bpo_object,
1255 (u_longlong_t)bpo->bpo_phys->bpo_num_blkptrs,
1256 (u_longlong_t)bpo->bpo_phys->bpo_num_subobjs,
1257 bytes, comp, uncomp);
1258
1259 for (i = 0; i < bpo->bpo_phys->bpo_num_subobjs; i++) {
1260 uint64_t subobj;
1261 bpobj_t subbpo;
1262 int error;
1263 VERIFY0(dmu_read(bpo->bpo_os,
1264 bpo->bpo_phys->bpo_subobjs,
1265 i * sizeof (subobj), sizeof (subobj), &subobj, 0));
1266 error = bpobj_open(&subbpo, bpo->bpo_os, subobj);
1267 if (error != 0) {
1268 (void) printf("ERROR %u while trying to open "
1269 "subobj id %llu\n",
1270 error, (u_longlong_t)subobj);
1271 continue;
1272 }
1273 dump_bpobj(&subbpo, "subobj", indent + 1);
1274 }
1275 } else {
1276 (void) printf(" %*s: object %llu, %llu blkptrs, %s\n",
1277 indent * 8, name,
1278 (u_longlong_t)bpo->bpo_object,
1279 (u_longlong_t)bpo->bpo_phys->bpo_num_blkptrs,
1280 bytes);
1281 }
1282
1283 if (dump_opt['d'] < 5)
1284 return;
1285
1286
1287 if (indent == 0) {
1288 (void) bpobj_iterate_nofree(bpo, dump_bpobj_cb, NULL, NULL);
1289 (void) printf("\n");
1290 }
1291 }
1292
1293 static void
1294 dump_deadlist(dsl_deadlist_t *dl)
1295 {
1296 dsl_deadlist_entry_t *dle;
1297 uint64_t unused;
1298 char bytes[32];
1299 char comp[32];
1300 char uncomp[32];
1301
1302 if (dump_opt['d'] < 3)
1303 return;
1304
1305 zdb_nicenum(dl->dl_phys->dl_used, bytes);
1306 zdb_nicenum(dl->dl_phys->dl_comp, comp);
1307 zdb_nicenum(dl->dl_phys->dl_uncomp, uncomp);
1308 (void) printf("\n Deadlist: %s (%s/%s comp)\n",
1309 bytes, comp, uncomp);
1310
1311 if (dump_opt['d'] < 4)
1312 return;
1313
1314 (void) printf("\n");
1315
1316 /* force the tree to be loaded */
1317 dsl_deadlist_space_range(dl, 0, UINT64_MAX, &unused, &unused, &unused);
1318
1319 for (dle = avl_first(&dl->dl_tree); dle;
1320 dle = AVL_NEXT(&dl->dl_tree, dle)) {
1321 if (dump_opt['d'] >= 5) {
1322 char buf[128];
1323 (void) snprintf(buf, sizeof (buf),
1324 "mintxg %llu -> obj %llu",
1325 (longlong_t)dle->dle_mintxg,
1326 (longlong_t)dle->dle_bpobj.bpo_object);
1327
1328 dump_bpobj(&dle->dle_bpobj, buf, 0);
1329 } else {
1330 (void) printf("mintxg %llu -> obj %llu\n",
1331 (longlong_t)dle->dle_mintxg,
1332 (longlong_t)dle->dle_bpobj.bpo_object);
1333
1334 }
1335 }
1336 }
1337
1338 static avl_tree_t idx_tree;
1339 static avl_tree_t domain_tree;
1340 static boolean_t fuid_table_loaded;
1341 static boolean_t sa_loaded;
1342 sa_attr_type_t *sa_attr_table;
1343
1344 static void
1345 fuid_table_destroy(void)
1346 {
1347 if (fuid_table_loaded) {
1348 zfs_fuid_table_destroy(&idx_tree, &domain_tree);
1349 fuid_table_loaded = B_FALSE;
1350 }
1351 }
1352
1353 /*
1354 * print uid or gid information.
1355 * For normal POSIX id just the id is printed in decimal format.
1356 * For CIFS files with FUID the fuid is printed in hex followed by
1357 * the domain-rid string.
1358 */
1359 static void
1360 print_idstr(uint64_t id, const char *id_type)
1361 {
1362 if (FUID_INDEX(id)) {
1363 char *domain;
1364
1365 domain = zfs_fuid_idx_domain(&idx_tree, FUID_INDEX(id));
1366 (void) printf("\t%s %llx [%s-%d]\n", id_type,
1367 (u_longlong_t)id, domain, (int)FUID_RID(id));
1368 } else {
1369 (void) printf("\t%s %llu\n", id_type, (u_longlong_t)id);
1370 }
1371
1372 }
1373
1374 static void
1375 dump_uidgid(objset_t *os, uint64_t uid, uint64_t gid)
1376 {
1377 uint32_t uid_idx, gid_idx;
1378
1379 uid_idx = FUID_INDEX(uid);
1380 gid_idx = FUID_INDEX(gid);
1381
1382 /* Load domain table, if not already loaded */
1383 if (!fuid_table_loaded && (uid_idx || gid_idx)) {
1384 uint64_t fuid_obj;
1385
1386 /* first find the fuid object. It lives in the master node */
1387 VERIFY(zap_lookup(os, MASTER_NODE_OBJ, ZFS_FUID_TABLES,
1388 8, 1, &fuid_obj) == 0);
1389 zfs_fuid_avl_tree_create(&idx_tree, &domain_tree);
1390 (void) zfs_fuid_table_load(os, fuid_obj,
1391 &idx_tree, &domain_tree);
1392 fuid_table_loaded = B_TRUE;
1393 }
1394
1395 print_idstr(uid, "uid");
1396 print_idstr(gid, "gid");
1397 }
1398
1399 static void
1400 dump_znode_sa_xattr(sa_handle_t *hdl)
1401 {
1402 nvlist_t *sa_xattr;
1403 nvpair_t *elem = NULL;
1404 int sa_xattr_size = 0;
1405 int sa_xattr_entries = 0;
1406 int error;
1407 char *sa_xattr_packed;
1408
1409 error = sa_size(hdl, sa_attr_table[ZPL_DXATTR], &sa_xattr_size);
1410 if (error || sa_xattr_size == 0)
1411 return;
1412
1413 sa_xattr_packed = malloc(sa_xattr_size);
1414 if (sa_xattr_packed == NULL)
1415 return;
1416
1417 error = sa_lookup(hdl, sa_attr_table[ZPL_DXATTR],
1418 sa_xattr_packed, sa_xattr_size);
1419 if (error) {
1420 free(sa_xattr_packed);
1421 return;
1422 }
1423
1424 error = nvlist_unpack(sa_xattr_packed, sa_xattr_size, &sa_xattr, 0);
1425 if (error) {
1426 free(sa_xattr_packed);
1427 return;
1428 }
1429
1430 while ((elem = nvlist_next_nvpair(sa_xattr, elem)) != NULL)
1431 sa_xattr_entries++;
1432
1433 (void) printf("\tSA xattrs: %d bytes, %d entries\n\n",
1434 sa_xattr_size, sa_xattr_entries);
1435 while ((elem = nvlist_next_nvpair(sa_xattr, elem)) != NULL) {
1436 uchar_t *value;
1437 uint_t cnt, idx;
1438
1439 (void) printf("\t\t%s = ", nvpair_name(elem));
1440 nvpair_value_byte_array(elem, &value, &cnt);
1441 for (idx = 0; idx < cnt; ++idx) {
1442 if (isprint(value[idx]))
1443 (void) putchar(value[idx]);
1444 else
1445 (void) printf("\\%3.3o", value[idx]);
1446 }
1447 (void) putchar('\n');
1448 }
1449
1450 nvlist_free(sa_xattr);
1451 free(sa_xattr_packed);
1452 }
1453
1454 /*ARGSUSED*/
1455 static void
1456 dump_znode(objset_t *os, uint64_t object, void *data, size_t size)
1457 {
1458 char path[MAXPATHLEN * 2]; /* allow for xattr and failure prefix */
1459 sa_handle_t *hdl;
1460 uint64_t xattr, rdev, gen;
1461 uint64_t uid, gid, mode, fsize, parent, links;
1462 uint64_t pflags;
1463 uint64_t acctm[2], modtm[2], chgtm[2], crtm[2];
1464 time_t z_crtime, z_atime, z_mtime, z_ctime;
1465 sa_bulk_attr_t bulk[12];
1466 int idx = 0;
1467 int error;
1468
1469 if (!sa_loaded) {
1470 uint64_t sa_attrs = 0;
1471 uint64_t version;
1472
1473 VERIFY(zap_lookup(os, MASTER_NODE_OBJ, ZPL_VERSION_STR,
1474 8, 1, &version) == 0);
1475 if (version >= ZPL_VERSION_SA) {
1476 VERIFY(zap_lookup(os, MASTER_NODE_OBJ, ZFS_SA_ATTRS,
1477 8, 1, &sa_attrs) == 0);
1478 }
1479 if ((error = sa_setup(os, sa_attrs, zfs_attr_table,
1480 ZPL_END, &sa_attr_table)) != 0) {
1481 (void) printf("sa_setup failed errno %d, can't "
1482 "display znode contents\n", error);
1483 return;
1484 }
1485 sa_loaded = B_TRUE;
1486 }
1487
1488 if (sa_handle_get(os, object, NULL, SA_HDL_PRIVATE, &hdl)) {
1489 (void) printf("Failed to get handle for SA znode\n");
1490 return;
1491 }
1492
1493 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_UID], NULL, &uid, 8);
1494 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_GID], NULL, &gid, 8);
1495 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_LINKS], NULL,
1496 &links, 8);
1497 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_GEN], NULL, &gen, 8);
1498 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_MODE], NULL,
1499 &mode, 8);
1500 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_PARENT],
1501 NULL, &parent, 8);
1502 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_SIZE], NULL,
1503 &fsize, 8);
1504 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_ATIME], NULL,
1505 acctm, 16);
1506 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_MTIME], NULL,
1507 modtm, 16);
1508 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_CRTIME], NULL,
1509 crtm, 16);
1510 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_CTIME], NULL,
1511 chgtm, 16);
1512 SA_ADD_BULK_ATTR(bulk, idx, sa_attr_table[ZPL_FLAGS], NULL,
1513 &pflags, 8);
1514
1515 if (sa_bulk_lookup(hdl, bulk, idx)) {
1516 (void) sa_handle_destroy(hdl);
1517 return;
1518 }
1519
1520 error = zfs_obj_to_path(os, object, path, sizeof (path));
1521 if (error != 0) {
1522 (void) snprintf(path, sizeof (path), "\?\?\?<object#%llu>",
1523 (u_longlong_t)object);
1524 }
1525 if (dump_opt['d'] < 3) {
1526 (void) printf("\t%s\n", path);
1527 (void) sa_handle_destroy(hdl);
1528 return;
1529 }
1530
1531 z_crtime = (time_t)crtm[0];
1532 z_atime = (time_t)acctm[0];
1533 z_mtime = (time_t)modtm[0];
1534 z_ctime = (time_t)chgtm[0];
1535
1536 (void) printf("\tpath %s\n", path);
1537 dump_uidgid(os, uid, gid);
1538 (void) printf("\tatime %s", ctime(&z_atime));
1539 (void) printf("\tmtime %s", ctime(&z_mtime));
1540 (void) printf("\tctime %s", ctime(&z_ctime));
1541 (void) printf("\tcrtime %s", ctime(&z_crtime));
1542 (void) printf("\tgen %llu\n", (u_longlong_t)gen);
1543 (void) printf("\tmode %llo\n", (u_longlong_t)mode);
1544 (void) printf("\tsize %llu\n", (u_longlong_t)fsize);
1545 (void) printf("\tparent %llu\n", (u_longlong_t)parent);
1546 (void) printf("\tlinks %llu\n", (u_longlong_t)links);
1547 (void) printf("\tpflags %llx\n", (u_longlong_t)pflags);
1548 if (sa_lookup(hdl, sa_attr_table[ZPL_XATTR], &xattr,
1549 sizeof (uint64_t)) == 0)
1550 (void) printf("\txattr %llu\n", (u_longlong_t)xattr);
1551 if (sa_lookup(hdl, sa_attr_table[ZPL_RDEV], &rdev,
1552 sizeof (uint64_t)) == 0)
1553 (void) printf("\trdev 0x%016llx\n", (u_longlong_t)rdev);
1554 dump_znode_sa_xattr(hdl);
1555 sa_handle_destroy(hdl);
1556 }
1557
1558 /*ARGSUSED*/
1559 static void
1560 dump_acl(objset_t *os, uint64_t object, void *data, size_t size)
1561 {
1562 }
1563
1564 /*ARGSUSED*/
1565 static void
1566 dump_dmu_objset(objset_t *os, uint64_t object, void *data, size_t size)
1567 {
1568 }
1569
1570 static object_viewer_t *object_viewer[DMU_OT_NUMTYPES + 1] = {
1571 dump_none, /* unallocated */
1572 dump_zap, /* object directory */
1573 dump_uint64, /* object array */
1574 dump_none, /* packed nvlist */
1575 dump_packed_nvlist, /* packed nvlist size */
1576 dump_none, /* bplist */
1577 dump_none, /* bplist header */
1578 dump_none, /* SPA space map header */
1579 dump_none, /* SPA space map */
1580 dump_none, /* ZIL intent log */
1581 dump_dnode, /* DMU dnode */
1582 dump_dmu_objset, /* DMU objset */
1583 dump_dsl_dir, /* DSL directory */
1584 dump_zap, /* DSL directory child map */
1585 dump_zap, /* DSL dataset snap map */
1586 dump_zap, /* DSL props */
1587 dump_dsl_dataset, /* DSL dataset */
1588 dump_znode, /* ZFS znode */
1589 dump_acl, /* ZFS V0 ACL */
1590 dump_uint8, /* ZFS plain file */
1591 dump_zpldir, /* ZFS directory */
1592 dump_zap, /* ZFS master node */
1593 dump_zap, /* ZFS delete queue */
1594 dump_uint8, /* zvol object */
1595 dump_zap, /* zvol prop */
1596 dump_uint8, /* other uint8[] */
1597 dump_uint64, /* other uint64[] */
1598 dump_zap, /* other ZAP */
1599 dump_zap, /* persistent error log */
1600 dump_uint8, /* SPA history */
1601 dump_history_offsets, /* SPA history offsets */
1602 dump_zap, /* Pool properties */
1603 dump_zap, /* DSL permissions */
1604 dump_acl, /* ZFS ACL */
1605 dump_uint8, /* ZFS SYSACL */
1606 dump_none, /* FUID nvlist */
1607 dump_packed_nvlist, /* FUID nvlist size */
1608 dump_zap, /* DSL dataset next clones */
1609 dump_zap, /* DSL scrub queue */
1610 dump_zap, /* ZFS user/group used */
1611 dump_zap, /* ZFS user/group quota */
1612 dump_zap, /* snapshot refcount tags */
1613 dump_ddt_zap, /* DDT ZAP object */
1614 dump_zap, /* DDT statistics */
1615 dump_znode, /* SA object */
1616 dump_zap, /* SA Master Node */
1617 dump_sa_attrs, /* SA attribute registration */
1618 dump_sa_layouts, /* SA attribute layouts */
1619 dump_zap, /* DSL scrub translations */
1620 dump_none, /* fake dedup BP */
1621 dump_zap, /* deadlist */
1622 dump_none, /* deadlist hdr */
1623 dump_zap, /* dsl clones */
1624 dump_none, /* bpobj subobjs */
1625 dump_unknown, /* Unknown type, must be last */
1626 };
1627
1628 static void
1629 dump_object(objset_t *os, uint64_t object, int verbosity, int *print_header)
1630 {
1631 dmu_buf_t *db = NULL;
1632 dmu_object_info_t doi;
1633 dnode_t *dn;
1634 void *bonus = NULL;
1635 size_t bsize = 0;
1636 char iblk[32], dblk[32], lsize[32], asize[32], fill[32];
1637 char bonus_size[32];
1638 char aux[50];
1639 int error;
1640
1641 if (*print_header) {
1642 (void) printf("\n%10s %3s %5s %5s %5s %5s %6s %s\n",
1643 "Object", "lvl", "iblk", "dblk", "dsize", "lsize",
1644 "%full", "type");
1645 *print_header = 0;
1646 }
1647
1648 if (object == 0) {
1649 dn = DMU_META_DNODE(os);
1650 } else {
1651 error = dmu_bonus_hold(os, object, FTAG, &db);
1652 if (error)
1653 fatal("dmu_bonus_hold(%llu) failed, errno %u",
1654 object, error);
1655 bonus = db->db_data;
1656 bsize = db->db_size;
1657 dn = DB_DNODE((dmu_buf_impl_t *)db);
1658 }
1659 dmu_object_info_from_dnode(dn, &doi);
1660
1661 zdb_nicenum(doi.doi_metadata_block_size, iblk);
1662 zdb_nicenum(doi.doi_data_block_size, dblk);
1663 zdb_nicenum(doi.doi_max_offset, lsize);
1664 zdb_nicenum(doi.doi_physical_blocks_512 << 9, asize);
1665 zdb_nicenum(doi.doi_bonus_size, bonus_size);
1666 (void) sprintf(fill, "%6.2f", 100.0 * doi.doi_fill_count *
1667 doi.doi_data_block_size / (object == 0 ? DNODES_PER_BLOCK : 1) /
1668 doi.doi_max_offset);
1669
1670 aux[0] = '\0';
1671
1672 if (doi.doi_checksum != ZIO_CHECKSUM_INHERIT || verbosity >= 6) {
1673 (void) snprintf(aux + strlen(aux), sizeof (aux), " (K=%s)",
1674 ZDB_CHECKSUM_NAME(doi.doi_checksum));
1675 }
1676
1677 if (doi.doi_compress != ZIO_COMPRESS_INHERIT || verbosity >= 6) {
1678 (void) snprintf(aux + strlen(aux), sizeof (aux), " (Z=%s)",
1679 ZDB_COMPRESS_NAME(doi.doi_compress));
1680 }
1681
1682 (void) printf("%10lld %3u %5s %5s %5s %5s %6s %s%s\n",
1683 (u_longlong_t)object, doi.doi_indirection, iblk, dblk,
1684 asize, lsize, fill, ZDB_OT_NAME(doi.doi_type), aux);
1685
1686 if (doi.doi_bonus_type != DMU_OT_NONE && verbosity > 3) {
1687 (void) printf("%10s %3s %5s %5s %5s %5s %6s %s\n",
1688 "", "", "", "", "", bonus_size, "bonus",
1689 ZDB_OT_NAME(doi.doi_bonus_type));
1690 }
1691
1692 if (verbosity >= 4) {
1693 (void) printf("\tdnode flags: %s%s%s\n",
1694 (dn->dn_phys->dn_flags & DNODE_FLAG_USED_BYTES) ?
1695 "USED_BYTES " : "",
1696 (dn->dn_phys->dn_flags & DNODE_FLAG_USERUSED_ACCOUNTED) ?
1697 "USERUSED_ACCOUNTED " : "",
1698 (dn->dn_phys->dn_flags & DNODE_FLAG_SPILL_BLKPTR) ?
1699 "SPILL_BLKPTR" : "");
1700 (void) printf("\tdnode maxblkid: %llu\n",
1701 (longlong_t)dn->dn_phys->dn_maxblkid);
1702
1703 object_viewer[ZDB_OT_TYPE(doi.doi_bonus_type)](os, object,
1704 bonus, bsize);
1705 object_viewer[ZDB_OT_TYPE(doi.doi_type)](os, object, NULL, 0);
1706 *print_header = 1;
1707 }
1708
1709 if (verbosity >= 5)
1710 dump_indirect(dn);
1711
1712 if (verbosity >= 5) {
1713 /*
1714 * Report the list of segments that comprise the object.
1715 */
1716 uint64_t start = 0;
1717 uint64_t end;
1718 uint64_t blkfill = 1;
1719 int minlvl = 1;
1720
1721 if (dn->dn_type == DMU_OT_DNODE) {
1722 minlvl = 0;
1723 blkfill = DNODES_PER_BLOCK;
1724 }
1725
1726 for (;;) {
1727 char segsize[32];
1728 error = dnode_next_offset(dn,
1729 0, &start, minlvl, blkfill, 0);
1730 if (error)
1731 break;
1732 end = start;
1733 error = dnode_next_offset(dn,
1734 DNODE_FIND_HOLE, &end, minlvl, blkfill, 0);
1735 zdb_nicenum(end - start, segsize);
1736 (void) printf("\t\tsegment [%016llx, %016llx)"
1737 " size %5s\n", (u_longlong_t)start,
1738 (u_longlong_t)end, segsize);
1739 if (error)
1740 break;
1741 start = end;
1742 }
1743 }
1744
1745 if (db != NULL)
1746 dmu_buf_rele(db, FTAG);
1747 }
1748
1749 static char *objset_types[DMU_OST_NUMTYPES] = {
1750 "NONE", "META", "ZPL", "ZVOL", "OTHER", "ANY" };
1751
1752 static void
1753 dump_dir(objset_t *os)
1754 {
1755 dmu_objset_stats_t dds;
1756 uint64_t object, object_count;
1757 uint64_t refdbytes, usedobjs, scratch;
1758 char numbuf[32];
1759 char blkbuf[BP_SPRINTF_LEN + 20];
1760 char osname[MAXNAMELEN];
1761 char *type = "UNKNOWN";
1762 int verbosity = dump_opt['d'];
1763 int print_header = 1;
1764 int i, error;
1765
1766 dsl_pool_config_enter(dmu_objset_pool(os), FTAG);
1767 dmu_objset_fast_stat(os, &dds);
1768 dsl_pool_config_exit(dmu_objset_pool(os), FTAG);
1769
1770 if (dds.dds_type < DMU_OST_NUMTYPES)
1771 type = objset_types[dds.dds_type];
1772
1773 if (dds.dds_type == DMU_OST_META) {
1774 dds.dds_creation_txg = TXG_INITIAL;
1775 usedobjs = os->os_rootbp->blk_fill;
1776 refdbytes = os->os_spa->spa_dsl_pool->
1777 dp_mos_dir->dd_phys->dd_used_bytes;
1778 } else {
1779 dmu_objset_space(os, &refdbytes, &scratch, &usedobjs, &scratch);
1780 }
1781
1782 ASSERT3U(usedobjs, ==, os->os_rootbp->blk_fill);
1783
1784 zdb_nicenum(refdbytes, numbuf);
1785
1786 if (verbosity >= 4) {
1787 (void) sprintf(blkbuf, ", rootbp ");
1788 (void) sprintf_blkptr(blkbuf + strlen(blkbuf), os->os_rootbp);
1789 } else {
1790 blkbuf[0] = '\0';
1791 }
1792
1793 dmu_objset_name(os, osname);
1794
1795 (void) printf("Dataset %s [%s], ID %llu, cr_txg %llu, "
1796 "%s, %llu objects%s\n",
1797 osname, type, (u_longlong_t)dmu_objset_id(os),
1798 (u_longlong_t)dds.dds_creation_txg,
1799 numbuf, (u_longlong_t)usedobjs, blkbuf);
1800
1801 if (zopt_objects != 0) {
1802 for (i = 0; i < zopt_objects; i++)
1803 dump_object(os, zopt_object[i], verbosity,
1804 &print_header);
1805 (void) printf("\n");
1806 return;
1807 }
1808
1809 if (dump_opt['i'] != 0 || verbosity >= 2)
1810 dump_intent_log(dmu_objset_zil(os));
1811
1812 if (dmu_objset_ds(os) != NULL)
1813 dump_deadlist(&dmu_objset_ds(os)->ds_deadlist);
1814
1815 if (verbosity < 2)
1816 return;
1817
1818 if (os->os_rootbp->blk_birth == 0)
1819 return;
1820
1821 dump_object(os, 0, verbosity, &print_header);
1822 object_count = 0;
1823 if (DMU_USERUSED_DNODE(os) != NULL &&
1824 DMU_USERUSED_DNODE(os)->dn_type != 0) {
1825 dump_object(os, DMU_USERUSED_OBJECT, verbosity, &print_header);
1826 dump_object(os, DMU_GROUPUSED_OBJECT, verbosity, &print_header);
1827 }
1828
1829 object = 0;
1830 while ((error = dmu_object_next(os, &object, B_FALSE, 0)) == 0) {
1831 dump_object(os, object, verbosity, &print_header);
1832 object_count++;
1833 }
1834
1835 ASSERT3U(object_count, ==, usedobjs);
1836
1837 (void) printf("\n");
1838
1839 if (error != ESRCH) {
1840 (void) fprintf(stderr, "dmu_object_next() = %d\n", error);
1841 abort();
1842 }
1843 }
1844
1845 static void
1846 dump_uberblock(uberblock_t *ub, const char *header, const char *footer)
1847 {
1848 time_t timestamp = ub->ub_timestamp;
1849
1850 (void) printf("%s", header ? header : "");
1851 (void) printf("\tmagic = %016llx\n", (u_longlong_t)ub->ub_magic);
1852 (void) printf("\tversion = %llu\n", (u_longlong_t)ub->ub_version);
1853 (void) printf("\ttxg = %llu\n", (u_longlong_t)ub->ub_txg);
1854 (void) printf("\tguid_sum = %llu\n", (u_longlong_t)ub->ub_guid_sum);
1855 (void) printf("\ttimestamp = %llu UTC = %s",
1856 (u_longlong_t)ub->ub_timestamp, asctime(localtime(&timestamp)));
1857 if (dump_opt['u'] >= 3) {
1858 char blkbuf[BP_SPRINTF_LEN];
1859 sprintf_blkptr(blkbuf, &ub->ub_rootbp);
1860 (void) printf("\trootbp = %s\n", blkbuf);
1861 }
1862 (void) printf("%s", footer ? footer : "");
1863 }
1864
1865 static void
1866 dump_config(spa_t *spa)
1867 {
1868 dmu_buf_t *db;
1869 size_t nvsize = 0;
1870 int error = 0;
1871
1872
1873 error = dmu_bonus_hold(spa->spa_meta_objset,
1874 spa->spa_config_object, FTAG, &db);
1875
1876 if (error == 0) {
1877 nvsize = *(uint64_t *)db->db_data;
1878 dmu_buf_rele(db, FTAG);
1879
1880 (void) printf("\nMOS Configuration:\n");
1881 dump_packed_nvlist(spa->spa_meta_objset,
1882 spa->spa_config_object, (void *)&nvsize, 1);
1883 } else {
1884 (void) fprintf(stderr, "dmu_bonus_hold(%llu) failed, errno %d",
1885 (u_longlong_t)spa->spa_config_object, error);
1886 }
1887 }
1888
1889 static void
1890 dump_cachefile(const char *cachefile)
1891 {
1892 int fd;
1893 struct stat64 statbuf;
1894 char *buf;
1895 nvlist_t *config;
1896
1897 if ((fd = open64(cachefile, O_RDONLY)) < 0) {
1898 (void) printf("cannot open '%s': %s\n", cachefile,
1899 strerror(errno));
1900 exit(1);
1901 }
1902
1903 if (fstat64(fd, &statbuf) != 0) {
1904 (void) printf("failed to stat '%s': %s\n", cachefile,
1905 strerror(errno));
1906 exit(1);
1907 }
1908
1909 if ((buf = malloc(statbuf.st_size)) == NULL) {
1910 (void) fprintf(stderr, "failed to allocate %llu bytes\n",
1911 (u_longlong_t)statbuf.st_size);
1912 exit(1);
1913 }
1914
1915 if (read(fd, buf, statbuf.st_size) != statbuf.st_size) {
1916 (void) fprintf(stderr, "failed to read %llu bytes\n",
1917 (u_longlong_t)statbuf.st_size);
1918 exit(1);
1919 }
1920
1921 (void) close(fd);
1922
1923 if (nvlist_unpack(buf, statbuf.st_size, &config, 0) != 0) {
1924 (void) fprintf(stderr, "failed to unpack nvlist\n");
1925 exit(1);
1926 }
1927
1928 free(buf);
1929
1930 dump_nvlist(config, 0);
1931
1932 nvlist_free(config);
1933 }
1934
1935 #define ZDB_MAX_UB_HEADER_SIZE 32
1936
1937 static void
1938 dump_label_uberblocks(vdev_label_t *lbl, uint64_t ashift)
1939 {
1940 vdev_t vd;
1941 vdev_t *vdp = &vd;
1942 char header[ZDB_MAX_UB_HEADER_SIZE];
1943 int i;
1944
1945 vd.vdev_ashift = ashift;
1946 vdp->vdev_top = vdp;
1947
1948 for (i = 0; i < VDEV_UBERBLOCK_COUNT(vdp); i++) {
1949 uint64_t uoff = VDEV_UBERBLOCK_OFFSET(vdp, i);
1950 uberblock_t *ub = (void *)((char *)lbl + uoff);
1951
1952 if (uberblock_verify(ub))
1953 continue;
1954 (void) snprintf(header, ZDB_MAX_UB_HEADER_SIZE,
1955 "Uberblock[%d]\n", i);
1956 dump_uberblock(ub, header, "");
1957 }
1958 }
1959
1960 static void
1961 dump_label(const char *dev)
1962 {
1963 int fd;
1964 vdev_label_t label;
1965 char *path, *buf = label.vl_vdev_phys.vp_nvlist;
1966 size_t buflen = sizeof (label.vl_vdev_phys.vp_nvlist);
1967 struct stat64 statbuf;
1968 uint64_t psize, ashift;
1969 int len = strlen(dev) + 1;
1970 int l;
1971
1972 if (strncmp(dev, "/dev/dsk/", 9) == 0) {
1973 len++;
1974 path = malloc(len);
1975 (void) snprintf(path, len, "%s%s", "/dev/rdsk/", dev + 9);
1976 } else {
1977 path = strdup(dev);
1978 }
1979
1980 if ((fd = open64(path, O_RDONLY)) < 0) {
1981 (void) printf("cannot open '%s': %s\n", path, strerror(errno));
1982 free(path);
1983 exit(1);
1984 }
1985
1986 if (fstat64_blk(fd, &statbuf) != 0) {
1987 (void) printf("failed to stat '%s': %s\n", path,
1988 strerror(errno));
1989 free(path);
1990 (void) close(fd);
1991 exit(1);
1992 }
1993
1994 psize = statbuf.st_size;
1995 psize = P2ALIGN(psize, (uint64_t)sizeof (vdev_label_t));
1996
1997 for (l = 0; l < VDEV_LABELS; l++) {
1998 nvlist_t *config = NULL;
1999
2000 (void) printf("--------------------------------------------\n");
2001 (void) printf("LABEL %d\n", l);
2002 (void) printf("--------------------------------------------\n");
2003
2004 if (pread64(fd, &label, sizeof (label),
2005 vdev_label_offset(psize, l, 0)) != sizeof (label)) {
2006 (void) printf("failed to read label %d\n", l);
2007 continue;
2008 }
2009
2010 if (nvlist_unpack(buf, buflen, &config, 0) != 0) {
2011 (void) printf("failed to unpack label %d\n", l);
2012 ashift = SPA_MINBLOCKSHIFT;
2013 } else {
2014 nvlist_t *vdev_tree = NULL;
2015
2016 dump_nvlist(config, 4);
2017 if ((nvlist_lookup_nvlist(config,
2018 ZPOOL_CONFIG_VDEV_TREE, &vdev_tree) != 0) ||
2019 (nvlist_lookup_uint64(vdev_tree,
2020 ZPOOL_CONFIG_ASHIFT, &ashift) != 0))
2021 ashift = SPA_MINBLOCKSHIFT;
2022 nvlist_free(config);
2023 }
2024 if (dump_opt['u'])
2025 dump_label_uberblocks(&label, ashift);
2026 }
2027
2028 free(path);
2029 (void) close(fd);
2030 }
2031
2032 /*ARGSUSED*/
2033 static int
2034 dump_one_dir(const char *dsname, void *arg)
2035 {
2036 int error;
2037 objset_t *os;
2038
2039 error = dmu_objset_own(dsname, DMU_OST_ANY, B_TRUE, FTAG, &os);
2040 if (error) {
2041 (void) printf("Could not open %s, error %d\n", dsname, error);
2042 return (0);
2043 }
2044 dump_dir(os);
2045 dmu_objset_disown(os, FTAG);
2046 fuid_table_destroy();
2047 sa_loaded = B_FALSE;
2048 return (0);
2049 }
2050
2051 /*
2052 * Block statistics.
2053 */
2054 typedef struct zdb_blkstats {
2055 uint64_t zb_asize;
2056 uint64_t zb_lsize;
2057 uint64_t zb_psize;
2058 uint64_t zb_count;
2059 } zdb_blkstats_t;
2060
2061 /*
2062 * Extended object types to report deferred frees and dedup auto-ditto blocks.
2063 */
2064 #define ZDB_OT_DEFERRED (DMU_OT_NUMTYPES + 0)
2065 #define ZDB_OT_DITTO (DMU_OT_NUMTYPES + 1)
2066 #define ZDB_OT_OTHER (DMU_OT_NUMTYPES + 2)
2067 #define ZDB_OT_TOTAL (DMU_OT_NUMTYPES + 3)
2068
2069 static char *zdb_ot_extname[] = {
2070 "deferred free",
2071 "dedup ditto",
2072 "other",
2073 "Total",
2074 };
2075
2076 #define ZB_TOTAL DN_MAX_LEVELS
2077
2078 typedef struct zdb_cb {
2079 zdb_blkstats_t zcb_type[ZB_TOTAL + 1][ZDB_OT_TOTAL + 1];
2080 uint64_t zcb_dedup_asize;
2081 uint64_t zcb_dedup_blocks;
2082 uint64_t zcb_errors[256];
2083 int zcb_readfails;
2084 int zcb_haderrors;
2085 spa_t *zcb_spa;
2086 } zdb_cb_t;
2087
2088 static void
2089 zdb_count_block(zdb_cb_t *zcb, zilog_t *zilog, const blkptr_t *bp,
2090 dmu_object_type_t type)
2091 {
2092 uint64_t refcnt = 0;
2093 int i;
2094
2095 ASSERT(type < ZDB_OT_TOTAL);
2096
2097 if (zilog && zil_bp_tree_add(zilog, bp) != 0)
2098 return;
2099
2100 for (i = 0; i < 4; i++) {
2101 int l = (i < 2) ? BP_GET_LEVEL(bp) : ZB_TOTAL;
2102 int t = (i & 1) ? type : ZDB_OT_TOTAL;
2103 zdb_blkstats_t *zb = &zcb->zcb_type[l][t];
2104
2105 zb->zb_asize += BP_GET_ASIZE(bp);
2106 zb->zb_lsize += BP_GET_LSIZE(bp);
2107 zb->zb_psize += BP_GET_PSIZE(bp);
2108 zb->zb_count++;
2109 }
2110
2111 if (dump_opt['L'])
2112 return;
2113
2114 if (BP_GET_DEDUP(bp)) {
2115 ddt_t *ddt;
2116 ddt_entry_t *dde;
2117
2118 ddt = ddt_select(zcb->zcb_spa, bp);
2119 ddt_enter(ddt);
2120 dde = ddt_lookup(ddt, bp, B_FALSE);
2121
2122 if (dde == NULL) {
2123 refcnt = 0;
2124 } else {
2125 ddt_phys_t *ddp = ddt_phys_select(dde, bp);
2126 ddt_phys_decref(ddp);
2127 refcnt = ddp->ddp_refcnt;
2128 if (ddt_phys_total_refcnt(dde) == 0)
2129 ddt_remove(ddt, dde);
2130 }
2131 ddt_exit(ddt);
2132 }
2133
2134 VERIFY3U(zio_wait(zio_claim(NULL, zcb->zcb_spa,
2135 refcnt ? 0 : spa_first_txg(zcb->zcb_spa),
2136 bp, NULL, NULL, ZIO_FLAG_CANFAIL)), ==, 0);
2137 }
2138
2139 static void
2140 zdb_blkptr_done(zio_t *zio)
2141 {
2142 spa_t *spa = zio->io_spa;
2143 blkptr_t *bp = zio->io_bp;
2144 int ioerr = zio->io_error;
2145 zdb_cb_t *zcb = zio->io_private;
2146 zbookmark_t *zb = &zio->io_bookmark;
2147
2148 zio_data_buf_free(zio->io_data, zio->io_size);
2149
2150 mutex_enter(&spa->spa_scrub_lock);
2151 spa->spa_scrub_inflight--;
2152 cv_broadcast(&spa->spa_scrub_io_cv);
2153
2154 if (ioerr && !(zio->io_flags & ZIO_FLAG_SPECULATIVE)) {
2155 char blkbuf[BP_SPRINTF_LEN];
2156
2157 zcb->zcb_haderrors = 1;
2158 zcb->zcb_errors[ioerr]++;
2159
2160 if (dump_opt['b'] >= 2)
2161 sprintf_blkptr(blkbuf, bp);
2162 else
2163 blkbuf[0] = '\0';
2164
2165 (void) printf("zdb_blkptr_cb: "
2166 "Got error %d reading "
2167 "<%llu, %llu, %lld, %llx> %s -- skipping\n",
2168 ioerr,
2169 (u_longlong_t)zb->zb_objset,
2170 (u_longlong_t)zb->zb_object,
2171 (u_longlong_t)zb->zb_level,
2172 (u_longlong_t)zb->zb_blkid,
2173 blkbuf);
2174 }
2175 mutex_exit(&spa->spa_scrub_lock);
2176 }
2177
2178 static int
2179 zdb_blkptr_cb(spa_t *spa, zilog_t *zilog, const blkptr_t *bp,
2180 const zbookmark_t *zb, const dnode_phys_t *dnp, void *arg)
2181 {
2182 zdb_cb_t *zcb = arg;
2183 char blkbuf[BP_SPRINTF_LEN];
2184 dmu_object_type_t type;
2185 boolean_t is_metadata;
2186
2187 if (bp == NULL)
2188 return (0);
2189
2190 type = BP_GET_TYPE(bp);
2191
2192 zdb_count_block(zcb, zilog, bp,
2193 (type & DMU_OT_NEWTYPE) ? ZDB_OT_OTHER : type);
2194
2195 is_metadata = (BP_GET_LEVEL(bp) != 0 || DMU_OT_IS_METADATA(type));
2196
2197 if (dump_opt['c'] > 1 || (dump_opt['c'] && is_metadata)) {
2198 size_t size = BP_GET_PSIZE(bp);
2199 void *data = zio_data_buf_alloc(size);
2200 int flags = ZIO_FLAG_CANFAIL | ZIO_FLAG_SCRUB | ZIO_FLAG_RAW;
2201
2202 /* If it's an intent log block, failure is expected. */
2203 if (zb->zb_level == ZB_ZIL_LEVEL)
2204 flags |= ZIO_FLAG_SPECULATIVE;
2205
2206 mutex_enter(&spa->spa_scrub_lock);
2207 while (spa->spa_scrub_inflight > max_inflight)
2208 cv_wait(&spa->spa_scrub_io_cv, &spa->spa_scrub_lock);
2209 spa->spa_scrub_inflight++;
2210 mutex_exit(&spa->spa_scrub_lock);
2211
2212 zio_nowait(zio_read(NULL, spa, bp, data, size,
2213 zdb_blkptr_done, zcb, ZIO_PRIORITY_ASYNC_READ, flags, zb));
2214 }
2215
2216 zcb->zcb_readfails = 0;
2217
2218 if (dump_opt['b'] >= 4) {
2219 sprintf_blkptr(blkbuf, bp);
2220 (void) printf("objset %llu object %llu "
2221 "level %lld offset 0x%llx %s\n",
2222 (u_longlong_t)zb->zb_objset,
2223 (u_longlong_t)zb->zb_object,
2224 (longlong_t)zb->zb_level,
2225 (u_longlong_t)blkid2offset(dnp, bp, zb),
2226 blkbuf);
2227 }
2228
2229 return (0);
2230 }
2231
2232 static void
2233 zdb_leak(space_map_t *sm, uint64_t start, uint64_t size)
2234 {
2235 vdev_t *vd = sm->sm_ppd;
2236
2237 (void) printf("leaked space: vdev %llu, offset 0x%llx, size %llu\n",
2238 (u_longlong_t)vd->vdev_id, (u_longlong_t)start, (u_longlong_t)size);
2239 }
2240
2241 /* ARGSUSED */
2242 static void
2243 zdb_space_map_load(space_map_t *sm)
2244 {
2245 }
2246
2247 static void
2248 zdb_space_map_unload(space_map_t *sm)
2249 {
2250 space_map_vacate(sm, zdb_leak, sm);
2251 }
2252
2253 /* ARGSUSED */
2254 static void
2255 zdb_space_map_claim(space_map_t *sm, uint64_t start, uint64_t size)
2256 {
2257 }
2258
2259 static space_map_ops_t zdb_space_map_ops = {
2260 zdb_space_map_load,
2261 zdb_space_map_unload,
2262 NULL, /* alloc */
2263 zdb_space_map_claim,
2264 NULL, /* free */
2265 NULL /* maxsize */
2266 };
2267
2268 static void
2269 zdb_ddt_leak_init(spa_t *spa, zdb_cb_t *zcb)
2270 {
2271 ddt_bookmark_t ddb = { 0 };
2272 ddt_entry_t dde;
2273 int error;
2274 int p;
2275
2276 while ((error = ddt_walk(spa, &ddb, &dde)) == 0) {
2277 blkptr_t blk;
2278 ddt_phys_t *ddp = dde.dde_phys;
2279
2280 if (ddb.ddb_class == DDT_CLASS_UNIQUE)
2281 return;
2282
2283 ASSERT(ddt_phys_total_refcnt(&dde) > 1);
2284
2285 for (p = 0; p < DDT_PHYS_TYPES; p++, ddp++) {
2286 if (ddp->ddp_phys_birth == 0)
2287 continue;
2288 ddt_bp_create(ddb.ddb_checksum,
2289 &dde.dde_key, ddp, &blk);
2290 if (p == DDT_PHYS_DITTO) {
2291 zdb_count_block(zcb, NULL, &blk, ZDB_OT_DITTO);
2292 } else {
2293 zcb->zcb_dedup_asize +=
2294 BP_GET_ASIZE(&blk) * (ddp->ddp_refcnt - 1);
2295 zcb->zcb_dedup_blocks++;
2296 }
2297 }
2298 if (!dump_opt['L']) {
2299 ddt_t *ddt = spa->spa_ddt[ddb.ddb_checksum];
2300 ddt_enter(ddt);
2301 VERIFY(ddt_lookup(ddt, &blk, B_TRUE) != NULL);
2302 ddt_exit(ddt);
2303 }
2304 }
2305
2306 ASSERT(error == ENOENT);
2307 }
2308
2309 static void
2310 zdb_leak_init(spa_t *spa, zdb_cb_t *zcb)
2311 {
2312 zcb->zcb_spa = spa;
2313 int c, m;
2314
2315 if (!dump_opt['L']) {
2316 vdev_t *rvd = spa->spa_root_vdev;
2317 for (c = 0; c < rvd->vdev_children; c++) {
2318 vdev_t *vd = rvd->vdev_child[c];
2319 for (m = 0; m < vd->vdev_ms_count; m++) {
2320 metaslab_t *msp = vd->vdev_ms[m];
2321 mutex_enter(&msp->ms_lock);
2322 space_map_unload(msp->ms_map);
2323 VERIFY(space_map_load(msp->ms_map,
2324 &zdb_space_map_ops, SM_ALLOC, &msp->ms_smo,
2325 spa->spa_meta_objset) == 0);
2326 msp->ms_map->sm_ppd = vd;
2327 mutex_exit(&msp->ms_lock);
2328 }
2329 }
2330 }
2331
2332 spa_config_enter(spa, SCL_CONFIG, FTAG, RW_READER);
2333
2334 zdb_ddt_leak_init(spa, zcb);
2335
2336 spa_config_exit(spa, SCL_CONFIG, FTAG);
2337 }
2338
2339 static void
2340 zdb_leak_fini(spa_t *spa)
2341 {
2342 int c, m;
2343
2344 if (!dump_opt['L']) {
2345 vdev_t *rvd = spa->spa_root_vdev;
2346 for (c = 0; c < rvd->vdev_children; c++) {
2347 vdev_t *vd = rvd->vdev_child[c];
2348 for (m = 0; m < vd->vdev_ms_count; m++) {
2349 metaslab_t *msp = vd->vdev_ms[m];
2350 mutex_enter(&msp->ms_lock);
2351 space_map_unload(msp->ms_map);
2352 mutex_exit(&msp->ms_lock);
2353 }
2354 }
2355 }
2356 }
2357
2358 /* ARGSUSED */
2359 static int
2360 count_block_cb(void *arg, const blkptr_t *bp, dmu_tx_t *tx)
2361 {
2362 zdb_cb_t *zcb = arg;
2363
2364 if (dump_opt['b'] >= 4) {
2365 char blkbuf[BP_SPRINTF_LEN];
2366 sprintf_blkptr(blkbuf, bp);
2367 (void) printf("[%s] %s\n",
2368 "deferred free", blkbuf);
2369 }
2370 zdb_count_block(zcb, NULL, bp, ZDB_OT_DEFERRED);
2371 return (0);
2372 }
2373
2374 static int
2375 dump_block_stats(spa_t *spa)
2376 {
2377 zdb_cb_t zcb;
2378 zdb_blkstats_t *zb, *tzb;
2379 uint64_t norm_alloc, norm_space, total_alloc, total_found;
2380 int flags = TRAVERSE_PRE | TRAVERSE_PREFETCH_METADATA | TRAVERSE_HARD;
2381 int leaks = 0;
2382 int e;
2383
2384 (void) printf("\nTraversing all blocks %s%s%s%s%s...\n",
2385 (dump_opt['c'] || !dump_opt['L']) ? "to verify " : "",
2386 (dump_opt['c'] == 1) ? "metadata " : "",
2387 dump_opt['c'] ? "checksums " : "",
2388 (dump_opt['c'] && !dump_opt['L']) ? "and verify " : "",
2389 !dump_opt['L'] ? "nothing leaked " : "");
2390
2391 /*
2392 * Load all space maps as SM_ALLOC maps, then traverse the pool
2393 * claiming each block we discover. If the pool is perfectly
2394 * consistent, the space maps will be empty when we're done.
2395 * Anything left over is a leak; any block we can't claim (because
2396 * it's not part of any space map) is a double allocation,
2397 * reference to a freed block, or an unclaimed log block.
2398 */
2399 bzero(&zcb, sizeof (zdb_cb_t));
2400 zdb_leak_init(spa, &zcb);
2401
2402 /*
2403 * If there's a deferred-free bplist, process that first.
2404 */
2405 (void) bpobj_iterate_nofree(&spa->spa_deferred_bpobj,
2406 count_block_cb, &zcb, NULL);
2407 if (spa_version(spa) >= SPA_VERSION_DEADLISTS) {
2408 (void) bpobj_iterate_nofree(&spa->spa_dsl_pool->dp_free_bpobj,
2409 count_block_cb, &zcb, NULL);
2410 }
2411 if (spa_feature_is_active(spa,
2412 &spa_feature_table[SPA_FEATURE_ASYNC_DESTROY])) {
2413 VERIFY3U(0, ==, bptree_iterate(spa->spa_meta_objset,
2414 spa->spa_dsl_pool->dp_bptree_obj, B_FALSE, count_block_cb,
2415 &zcb, NULL));
2416 }
2417
2418 if (dump_opt['c'] > 1)
2419 flags |= TRAVERSE_PREFETCH_DATA;
2420
2421 zcb.zcb_haderrors |= traverse_pool(spa, 0, flags, zdb_blkptr_cb, &zcb);
2422
2423 /*
2424 * If we've traversed the data blocks then we need to wait for those
2425 * I/Os to complete. We leverage "The Godfather" zio to wait on
2426 * all async I/Os to complete.
2427 */
2428 if (dump_opt['c']) {
2429 (void) zio_wait(spa->spa_async_zio_root);
2430 spa->spa_async_zio_root = zio_root(spa, NULL, NULL,
2431 ZIO_FLAG_CANFAIL | ZIO_FLAG_SPECULATIVE |
2432 ZIO_FLAG_GODFATHER);
2433 }
2434
2435 if (zcb.zcb_haderrors) {
2436 (void) printf("\nError counts:\n\n");
2437 (void) printf("\t%5s %s\n", "errno", "count");
2438 for (e = 0; e < 256; e++) {
2439 if (zcb.zcb_errors[e] != 0) {
2440 (void) printf("\t%5d %llu\n",
2441 e, (u_longlong_t)zcb.zcb_errors[e]);
2442 }
2443 }
2444 }
2445
2446 /*
2447 * Report any leaked segments.
2448 */
2449 zdb_leak_fini(spa);
2450
2451 tzb = &zcb.zcb_type[ZB_TOTAL][ZDB_OT_TOTAL];
2452
2453 norm_alloc = metaslab_class_get_alloc(spa_normal_class(spa));
2454 norm_space = metaslab_class_get_space(spa_normal_class(spa));
2455
2456 total_alloc = norm_alloc + metaslab_class_get_alloc(spa_log_class(spa));
2457 total_found = tzb->zb_asize - zcb.zcb_dedup_asize;
2458
2459 if (total_found == total_alloc) {
2460 if (!dump_opt['L'])
2461 (void) printf("\n\tNo leaks (block sum matches space"
2462 " maps exactly)\n");
2463 } else {
2464 (void) printf("block traversal size %llu != alloc %llu "
2465 "(%s %lld)\n",
2466 (u_longlong_t)total_found,
2467 (u_longlong_t)total_alloc,
2468 (dump_opt['L']) ? "unreachable" : "leaked",
2469 (longlong_t)(total_alloc - total_found));
2470 leaks = 1;
2471 }
2472
2473 if (tzb->zb_count == 0)
2474 return (2);
2475
2476 (void) printf("\n");
2477 (void) printf("\tbp count: %10llu\n",
2478 (u_longlong_t)tzb->zb_count);
2479 (void) printf("\tbp logical: %10llu avg: %6llu\n",
2480 (u_longlong_t)tzb->zb_lsize,
2481 (u_longlong_t)(tzb->zb_lsize / tzb->zb_count));
2482 (void) printf("\tbp physical: %10llu avg:"
2483 " %6llu compression: %6.2f\n",
2484 (u_longlong_t)tzb->zb_psize,
2485 (u_longlong_t)(tzb->zb_psize / tzb->zb_count),
2486 (double)tzb->zb_lsize / tzb->zb_psize);
2487 (void) printf("\tbp allocated: %10llu avg:"
2488 " %6llu compression: %6.2f\n",
2489 (u_longlong_t)tzb->zb_asize,
2490 (u_longlong_t)(tzb->zb_asize / tzb->zb_count),
2491 (double)tzb->zb_lsize / tzb->zb_asize);
2492 (void) printf("\tbp deduped: %10llu ref>1:"
2493 " %6llu deduplication: %6.2f\n",
2494 (u_longlong_t)zcb.zcb_dedup_asize,
2495 (u_longlong_t)zcb.zcb_dedup_blocks,
2496 (double)zcb.zcb_dedup_asize / tzb->zb_asize + 1.0);
2497 (void) printf("\tSPA allocated: %10llu used: %5.2f%%\n",
2498 (u_longlong_t)norm_alloc, 100.0 * norm_alloc / norm_space);
2499
2500 if (dump_opt['b'] >= 2) {
2501 int l, t, level;
2502 (void) printf("\nBlocks\tLSIZE\tPSIZE\tASIZE"
2503 "\t avg\t comp\t%%Total\tType\n");
2504
2505 for (t = 0; t <= ZDB_OT_TOTAL; t++) {
2506 char csize[32], lsize[32], psize[32], asize[32];
2507 char avg[32];
2508 char *typename;
2509
2510 if (t < DMU_OT_NUMTYPES)
2511 typename = dmu_ot[t].ot_name;
2512 else
2513 typename = zdb_ot_extname[t - DMU_OT_NUMTYPES];
2514
2515 if (zcb.zcb_type[ZB_TOTAL][t].zb_asize == 0) {
2516 (void) printf("%6s\t%5s\t%5s\t%5s"
2517 "\t%5s\t%5s\t%6s\t%s\n",
2518 "-",
2519 "-",
2520 "-",
2521 "-",
2522 "-",
2523 "-",
2524 "-",
2525 typename);
2526 continue;
2527 }
2528
2529 for (l = ZB_TOTAL - 1; l >= -1; l--) {
2530 level = (l == -1 ? ZB_TOTAL : l);
2531 zb = &zcb.zcb_type[level][t];
2532
2533 if (zb->zb_asize == 0)
2534 continue;
2535
2536 if (dump_opt['b'] < 3 && level != ZB_TOTAL)
2537 continue;
2538
2539 if (level == 0 && zb->zb_asize ==
2540 zcb.zcb_type[ZB_TOTAL][t].zb_asize)
2541 continue;
2542
2543 zdb_nicenum(zb->zb_count, csize);
2544 zdb_nicenum(zb->zb_lsize, lsize);
2545 zdb_nicenum(zb->zb_psize, psize);
2546 zdb_nicenum(zb->zb_asize, asize);
2547 zdb_nicenum(zb->zb_asize / zb->zb_count, avg);
2548
2549 (void) printf("%6s\t%5s\t%5s\t%5s\t%5s"
2550 "\t%5.2f\t%6.2f\t",
2551 csize, lsize, psize, asize, avg,
2552 (double)zb->zb_lsize / zb->zb_psize,
2553 100.0 * zb->zb_asize / tzb->zb_asize);
2554
2555 if (level == ZB_TOTAL)
2556 (void) printf("%s\n", typename);
2557 else
2558 (void) printf(" L%d %s\n",
2559 level, typename);
2560 }
2561 }
2562 }
2563
2564 (void) printf("\n");
2565
2566 if (leaks)
2567 return (2);
2568
2569 if (zcb.zcb_haderrors)
2570 return (3);
2571
2572 return (0);
2573 }
2574
2575 typedef struct zdb_ddt_entry {
2576 ddt_key_t zdde_key;
2577 uint64_t zdde_ref_blocks;
2578 uint64_t zdde_ref_lsize;
2579 uint64_t zdde_ref_psize;
2580 uint64_t zdde_ref_dsize;
2581 avl_node_t zdde_node;
2582 } zdb_ddt_entry_t;
2583
2584 /* ARGSUSED */
2585 static int
2586 zdb_ddt_add_cb(spa_t *spa, zilog_t *zilog, const blkptr_t *bp,
2587 const zbookmark_t *zb, const dnode_phys_t *dnp, void *arg)
2588 {
2589 avl_tree_t *t = arg;
2590 avl_index_t where;
2591 zdb_ddt_entry_t *zdde, zdde_search;
2592
2593 if (bp == NULL)
2594 return (0);
2595
2596 if (dump_opt['S'] > 1 && zb->zb_level == ZB_ROOT_LEVEL) {
2597 (void) printf("traversing objset %llu, %llu objects, "
2598 "%lu blocks so far\n",
2599 (u_longlong_t)zb->zb_objset,
2600 (u_longlong_t)bp->blk_fill,
2601 avl_numnodes(t));
2602 }
2603
2604 if (BP_IS_HOLE(bp) || BP_GET_CHECKSUM(bp) == ZIO_CHECKSUM_OFF ||
2605 BP_GET_LEVEL(bp) > 0 || DMU_OT_IS_METADATA(BP_GET_TYPE(bp)))
2606 return (0);
2607
2608 ddt_key_fill(&zdde_search.zdde_key, bp);
2609
2610 zdde = avl_find(t, &zdde_search, &where);
2611
2612 if (zdde == NULL) {
2613 zdde = umem_zalloc(sizeof (*zdde), UMEM_NOFAIL);
2614 zdde->zdde_key = zdde_search.zdde_key;
2615 avl_insert(t, zdde, where);
2616 }
2617
2618 zdde->zdde_ref_blocks += 1;
2619 zdde->zdde_ref_lsize += BP_GET_LSIZE(bp);
2620 zdde->zdde_ref_psize += BP_GET_PSIZE(bp);
2621 zdde->zdde_ref_dsize += bp_get_dsize_sync(spa, bp);
2622
2623 return (0);
2624 }
2625
2626 static void
2627 dump_simulated_ddt(spa_t *spa)
2628 {
2629 avl_tree_t t;
2630 void *cookie = NULL;
2631 zdb_ddt_entry_t *zdde;
2632 ddt_histogram_t ddh_total;
2633 ddt_stat_t dds_total;
2634
2635 bzero(&ddh_total, sizeof (ddt_histogram_t));
2636 bzero(&dds_total, sizeof (ddt_stat_t));
2637
2638 avl_create(&t, ddt_entry_compare,
2639 sizeof (zdb_ddt_entry_t), offsetof(zdb_ddt_entry_t, zdde_node));
2640
2641 spa_config_enter(spa, SCL_CONFIG, FTAG, RW_READER);
2642
2643 (void) traverse_pool(spa, 0, TRAVERSE_PRE | TRAVERSE_PREFETCH_METADATA,
2644 zdb_ddt_add_cb, &t);
2645
2646 spa_config_exit(spa, SCL_CONFIG, FTAG);
2647
2648 while ((zdde = avl_destroy_nodes(&t, &cookie)) != NULL) {
2649 ddt_stat_t dds;
2650 uint64_t refcnt = zdde->zdde_ref_blocks;
2651 ASSERT(refcnt != 0);
2652
2653 dds.dds_blocks = zdde->zdde_ref_blocks / refcnt;
2654 dds.dds_lsize = zdde->zdde_ref_lsize / refcnt;
2655 dds.dds_psize = zdde->zdde_ref_psize / refcnt;
2656 dds.dds_dsize = zdde->zdde_ref_dsize / refcnt;
2657
2658 dds.dds_ref_blocks = zdde->zdde_ref_blocks;
2659 dds.dds_ref_lsize = zdde->zdde_ref_lsize;
2660 dds.dds_ref_psize = zdde->zdde_ref_psize;
2661 dds.dds_ref_dsize = zdde->zdde_ref_dsize;
2662
2663 ddt_stat_add(&ddh_total.ddh_stat[highbit(refcnt) - 1], &dds, 0);
2664
2665 umem_free(zdde, sizeof (*zdde));
2666 }
2667
2668 avl_destroy(&t);
2669
2670 ddt_histogram_stat(&dds_total, &ddh_total);
2671
2672 (void) printf("Simulated DDT histogram:\n");
2673
2674 zpool_dump_ddt(&dds_total, &ddh_total);
2675
2676 dump_dedup_ratio(&dds_total);
2677 }
2678
2679 static void
2680 dump_zpool(spa_t *spa)
2681 {
2682 dsl_pool_t *dp = spa_get_dsl(spa);
2683 int rc = 0;
2684
2685 if (dump_opt['S']) {
2686 dump_simulated_ddt(spa);
2687 return;
2688 }
2689
2690 if (!dump_opt['e'] && dump_opt['C'] > 1) {
2691 (void) printf("\nCached configuration:\n");
2692 dump_nvlist(spa->spa_config, 8);
2693 }
2694
2695 if (dump_opt['C'])
2696 dump_config(spa);
2697
2698 if (dump_opt['u'])
2699 dump_uberblock(&spa->spa_uberblock, "\nUberblock:\n", "\n");
2700
2701 if (dump_opt['D'])
2702 dump_all_ddts(spa);
2703
2704 if (dump_opt['d'] > 2 || dump_opt['m'])
2705 dump_metaslabs(spa);
2706
2707 if (dump_opt['d'] || dump_opt['i']) {
2708 dump_dir(dp->dp_meta_objset);
2709 if (dump_opt['d'] >= 3) {
2710 dump_bpobj(&spa->spa_deferred_bpobj,
2711 "Deferred frees", 0);
2712 if (spa_version(spa) >= SPA_VERSION_DEADLISTS) {
2713 dump_bpobj(&spa->spa_dsl_pool->dp_free_bpobj,
2714 "Pool snapshot frees", 0);
2715 }
2716
2717 if (spa_feature_is_active(spa,
2718 &spa_feature_table[SPA_FEATURE_ASYNC_DESTROY])) {
2719 dump_bptree(spa->spa_meta_objset,
2720 spa->spa_dsl_pool->dp_bptree_obj,
2721 "Pool dataset frees");
2722 }
2723 dump_dtl(spa->spa_root_vdev, 0);
2724 }
2725 (void) dmu_objset_find(spa_name(spa), dump_one_dir,
2726 NULL, DS_FIND_SNAPSHOTS | DS_FIND_CHILDREN);
2727 }
2728 if (dump_opt['b'] || dump_opt['c'])
2729 rc = dump_block_stats(spa);
2730
2731 if (dump_opt['s'])
2732 show_pool_stats(spa);
2733
2734 if (dump_opt['h'])
2735 dump_history(spa);
2736
2737 if (rc != 0)
2738 exit(rc);
2739 }
2740
2741 #define ZDB_FLAG_CHECKSUM 0x0001
2742 #define ZDB_FLAG_DECOMPRESS 0x0002
2743 #define ZDB_FLAG_BSWAP 0x0004
2744 #define ZDB_FLAG_GBH 0x0008
2745 #define ZDB_FLAG_INDIRECT 0x0010
2746 #define ZDB_FLAG_PHYS 0x0020
2747 #define ZDB_FLAG_RAW 0x0040
2748 #define ZDB_FLAG_PRINT_BLKPTR 0x0080
2749
2750 int flagbits[256];
2751
2752 static void
2753 zdb_print_blkptr(blkptr_t *bp, int flags)
2754 {
2755 char blkbuf[BP_SPRINTF_LEN];
2756
2757 if (flags & ZDB_FLAG_BSWAP)
2758 byteswap_uint64_array((void *)bp, sizeof (blkptr_t));
2759
2760 sprintf_blkptr(blkbuf, bp);
2761 (void) printf("%s\n", blkbuf);
2762 }
2763
2764 static void
2765 zdb_dump_indirect(blkptr_t *bp, int nbps, int flags)
2766 {
2767 int i;
2768
2769 for (i = 0; i < nbps; i++)
2770 zdb_print_blkptr(&bp[i], flags);
2771 }
2772
2773 static void
2774 zdb_dump_gbh(void *buf, int flags)
2775 {
2776 zdb_dump_indirect((blkptr_t *)buf, SPA_GBH_NBLKPTRS, flags);
2777 }
2778
2779 static void
2780 zdb_dump_block_raw(void *buf, uint64_t size, int flags)
2781 {
2782 if (flags & ZDB_FLAG_BSWAP)
2783 byteswap_uint64_array(buf, size);
2784 VERIFY(write(fileno(stdout), buf, size) == size);
2785 }
2786
2787 static void
2788 zdb_dump_block(char *label, void *buf, uint64_t size, int flags)
2789 {
2790 uint64_t *d = (uint64_t *)buf;
2791 int nwords = size / sizeof (uint64_t);
2792 int do_bswap = !!(flags & ZDB_FLAG_BSWAP);
2793 int i, j;
2794 char *hdr, *c;
2795
2796
2797 if (do_bswap)
2798 hdr = " 7 6 5 4 3 2 1 0 f e d c b a 9 8";
2799 else
2800 hdr = " 0 1 2 3 4 5 6 7 8 9 a b c d e f";
2801
2802 (void) printf("\n%s\n%6s %s 0123456789abcdef\n", label, "", hdr);
2803
2804 for (i = 0; i < nwords; i += 2) {
2805 (void) printf("%06llx: %016llx %016llx ",
2806 (u_longlong_t)(i * sizeof (uint64_t)),
2807 (u_longlong_t)(do_bswap ? BSWAP_64(d[i]) : d[i]),
2808 (u_longlong_t)(do_bswap ? BSWAP_64(d[i + 1]) : d[i + 1]));
2809
2810 c = (char *)&d[i];
2811 for (j = 0; j < 2 * sizeof (uint64_t); j++)
2812 (void) printf("%c", isprint(c[j]) ? c[j] : '.');
2813 (void) printf("\n");
2814 }
2815 }
2816
2817 /*
2818 * There are two acceptable formats:
2819 * leaf_name - For example: c1t0d0 or /tmp/ztest.0a
2820 * child[.child]* - For example: 0.1.1
2821 *
2822 * The second form can be used to specify arbitrary vdevs anywhere
2823 * in the heirarchy. For example, in a pool with a mirror of
2824 * RAID-Zs, you can specify either RAID-Z vdev with 0.0 or 0.1 .
2825 */
2826 static vdev_t *
2827 zdb_vdev_lookup(vdev_t *vdev, char *path)
2828 {
2829 char *s, *p, *q;
2830 int i;
2831
2832 if (vdev == NULL)
2833 return (NULL);
2834
2835 /* First, assume the x.x.x.x format */
2836 i = (int)strtoul(path, &s, 10);
2837 if (s == path || (s && *s != '.' && *s != '\0'))
2838 goto name;
2839 if (i < 0 || i >= vdev->vdev_children)
2840 return (NULL);
2841
2842 vdev = vdev->vdev_child[i];
2843 if (*s == '\0')
2844 return (vdev);
2845 return (zdb_vdev_lookup(vdev, s+1));
2846
2847 name:
2848 for (i = 0; i < vdev->vdev_children; i++) {
2849 vdev_t *vc = vdev->vdev_child[i];
2850
2851 if (vc->vdev_path == NULL) {
2852 vc = zdb_vdev_lookup(vc, path);
2853 if (vc == NULL)
2854 continue;
2855 else
2856 return (vc);
2857 }
2858
2859 p = strrchr(vc->vdev_path, '/');
2860 p = p ? p + 1 : vc->vdev_path;
2861 q = &vc->vdev_path[strlen(vc->vdev_path) - 2];
2862
2863 if (strcmp(vc->vdev_path, path) == 0)
2864 return (vc);
2865 if (strcmp(p, path) == 0)
2866 return (vc);
2867 if (strcmp(q, "s0") == 0 && strncmp(p, path, q - p) == 0)
2868 return (vc);
2869 }
2870
2871 return (NULL);
2872 }
2873
2874 /*
2875 * Read a block from a pool and print it out. The syntax of the
2876 * block descriptor is:
2877 *
2878 * pool:vdev_specifier:offset:size[:flags]
2879 *
2880 * pool - The name of the pool you wish to read from
2881 * vdev_specifier - Which vdev (see comment for zdb_vdev_lookup)
2882 * offset - offset, in hex, in bytes
2883 * size - Amount of data to read, in hex, in bytes
2884 * flags - A string of characters specifying options
2885 * b: Decode a blkptr at given offset within block
2886 * *c: Calculate and display checksums
2887 * d: Decompress data before dumping
2888 * e: Byteswap data before dumping
2889 * g: Display data as a gang block header
2890 * i: Display as an indirect block
2891 * p: Do I/O to physical offset
2892 * r: Dump raw data to stdout
2893 *
2894 * * = not yet implemented
2895 */
2896 static void
2897 zdb_read_block(char *thing, spa_t *spa)
2898 {
2899 blkptr_t blk, *bp = &blk;
2900 dva_t *dva = bp->blk_dva;
2901 int flags = 0;
2902 uint64_t offset = 0, size = 0, psize = 0, lsize = 0, blkptr_offset = 0;
2903 zio_t *zio;
2904 vdev_t *vd;
2905 void *pbuf, *lbuf, *buf;
2906 char *s, *p, *dup, *vdev, *flagstr;
2907 int i, error;
2908
2909 dup = strdup(thing);
2910 s = strtok(dup, ":");
2911 vdev = s ? s : "";
2912 s = strtok(NULL, ":");
2913 offset = strtoull(s ? s : "", NULL, 16);
2914 s = strtok(NULL, ":");
2915 size = strtoull(s ? s : "", NULL, 16);
2916 s = strtok(NULL, ":");
2917 flagstr = s ? s : "";
2918
2919 s = NULL;
2920 if (size == 0)
2921 s = "size must not be zero";
2922 if (!IS_P2ALIGNED(size, DEV_BSIZE))
2923 s = "size must be a multiple of sector size";
2924 if (!IS_P2ALIGNED(offset, DEV_BSIZE))
2925 s = "offset must be a multiple of sector size";
2926 if (s) {
2927 (void) printf("Invalid block specifier: %s - %s\n", thing, s);
2928 free(dup);
2929 return;
2930 }
2931
2932 for (s = strtok(flagstr, ":"); s; s = strtok(NULL, ":")) {
2933 for (i = 0; flagstr[i]; i++) {
2934 int bit = flagbits[(uchar_t)flagstr[i]];
2935
2936 if (bit == 0) {
2937 (void) printf("***Invalid flag: %c\n",
2938 flagstr[i]);
2939 continue;
2940 }
2941 flags |= bit;
2942
2943 /* If it's not something with an argument, keep going */
2944 if ((bit & (ZDB_FLAG_CHECKSUM |
2945 ZDB_FLAG_PRINT_BLKPTR)) == 0)
2946 continue;
2947
2948 p = &flagstr[i + 1];
2949 if (bit == ZDB_FLAG_PRINT_BLKPTR)
2950 blkptr_offset = strtoull(p, &p, 16);
2951 if (*p != ':' && *p != '\0') {
2952 (void) printf("***Invalid flag arg: '%s'\n", s);
2953 free(dup);
2954 return;
2955 }
2956 }
2957 }
2958
2959 vd = zdb_vdev_lookup(spa->spa_root_vdev, vdev);
2960 if (vd == NULL) {
2961 (void) printf("***Invalid vdev: %s\n", vdev);
2962 free(dup);
2963 return;
2964 } else {
2965 if (vd->vdev_path)
2966 (void) fprintf(stderr, "Found vdev: %s\n",
2967 vd->vdev_path);
2968 else
2969 (void) fprintf(stderr, "Found vdev type: %s\n",
2970 vd->vdev_ops->vdev_op_type);
2971 }
2972
2973 psize = size;
2974 lsize = size;
2975
2976 pbuf = umem_alloc_aligned(SPA_MAXBLOCKSIZE, 512, UMEM_NOFAIL);
2977 lbuf = umem_alloc(SPA_MAXBLOCKSIZE, UMEM_NOFAIL);
2978
2979 BP_ZERO(bp);
2980
2981 DVA_SET_VDEV(&dva[0], vd->vdev_id);
2982 DVA_SET_OFFSET(&dva[0], offset);
2983 DVA_SET_GANG(&dva[0], !!(flags & ZDB_FLAG_GBH));
2984 DVA_SET_ASIZE(&dva[0], vdev_psize_to_asize(vd, psize));
2985
2986 BP_SET_BIRTH(bp, TXG_INITIAL, TXG_INITIAL);
2987
2988 BP_SET_LSIZE(bp, lsize);
2989 BP_SET_PSIZE(bp, psize);
2990 BP_SET_COMPRESS(bp, ZIO_COMPRESS_OFF);
2991 BP_SET_CHECKSUM(bp, ZIO_CHECKSUM_OFF);
2992 BP_SET_TYPE(bp, DMU_OT_NONE);
2993 BP_SET_LEVEL(bp, 0);
2994 BP_SET_DEDUP(bp, 0);
2995 BP_SET_BYTEORDER(bp, ZFS_HOST_BYTEORDER);
2996
2997 spa_config_enter(spa, SCL_STATE, FTAG, RW_READER);
2998 zio = zio_root(spa, NULL, NULL, 0);
2999
3000 if (vd == vd->vdev_top) {
3001 /*
3002 * Treat this as a normal block read.
3003 */
3004 zio_nowait(zio_read(zio, spa, bp, pbuf, psize, NULL, NULL,
3005 ZIO_PRIORITY_SYNC_READ,
3006 ZIO_FLAG_CANFAIL | ZIO_FLAG_RAW, NULL));
3007 } else {
3008 /*
3009 * Treat this as a vdev child I/O.
3010 */
3011 zio_nowait(zio_vdev_child_io(zio, bp, vd, offset, pbuf, psize,
3012 ZIO_TYPE_READ, ZIO_PRIORITY_SYNC_READ,
3013 ZIO_FLAG_DONT_CACHE | ZIO_FLAG_DONT_QUEUE |
3014 ZIO_FLAG_DONT_PROPAGATE | ZIO_FLAG_DONT_RETRY |
3015 ZIO_FLAG_CANFAIL | ZIO_FLAG_RAW, NULL, NULL));
3016 }
3017
3018 error = zio_wait(zio);
3019 spa_config_exit(spa, SCL_STATE, FTAG);
3020
3021 if (error) {
3022 (void) printf("Read of %s failed, error: %d\n", thing, error);
3023 goto out;
3024 }
3025
3026 if (flags & ZDB_FLAG_DECOMPRESS) {
3027 /*
3028 * We don't know how the data was compressed, so just try
3029 * every decompress function at every inflated blocksize.
3030 */
3031 enum zio_compress c;
3032 void *pbuf2 = umem_alloc(SPA_MAXBLOCKSIZE, UMEM_NOFAIL);
3033 void *lbuf2 = umem_alloc(SPA_MAXBLOCKSIZE, UMEM_NOFAIL);
3034
3035 bcopy(pbuf, pbuf2, psize);
3036
3037 VERIFY(random_get_pseudo_bytes((uint8_t *)pbuf + psize,
3038 SPA_MAXBLOCKSIZE - psize) == 0);
3039
3040 VERIFY(random_get_pseudo_bytes((uint8_t *)pbuf2 + psize,
3041 SPA_MAXBLOCKSIZE - psize) == 0);
3042
3043 for (lsize = SPA_MAXBLOCKSIZE; lsize > psize;
3044 lsize -= SPA_MINBLOCKSIZE) {
3045 for (c = 0; c < ZIO_COMPRESS_FUNCTIONS; c++) {
3046 if (zio_decompress_data(c, pbuf, lbuf,
3047 psize, lsize) == 0 &&
3048 zio_decompress_data(c, pbuf2, lbuf2,
3049 psize, lsize) == 0 &&
3050 bcmp(lbuf, lbuf2, lsize) == 0)
3051 break;
3052 }
3053 if (c != ZIO_COMPRESS_FUNCTIONS)
3054 break;
3055 lsize -= SPA_MINBLOCKSIZE;
3056 }
3057
3058 umem_free(pbuf2, SPA_MAXBLOCKSIZE);
3059 umem_free(lbuf2, SPA_MAXBLOCKSIZE);
3060
3061 if (lsize <= psize) {
3062 (void) printf("Decompress of %s failed\n", thing);
3063 goto out;
3064 }
3065 buf = lbuf;
3066 size = lsize;
3067 } else {
3068 buf = pbuf;
3069 size = psize;
3070 }
3071
3072 if (flags & ZDB_FLAG_PRINT_BLKPTR)
3073 zdb_print_blkptr((blkptr_t *)(void *)
3074 ((uintptr_t)buf + (uintptr_t)blkptr_offset), flags);
3075 else if (flags & ZDB_FLAG_RAW)
3076 zdb_dump_block_raw(buf, size, flags);
3077 else if (flags & ZDB_FLAG_INDIRECT)
3078 zdb_dump_indirect((blkptr_t *)buf, size / sizeof (blkptr_t),
3079 flags);
3080 else if (flags & ZDB_FLAG_GBH)
3081 zdb_dump_gbh(buf, flags);
3082 else
3083 zdb_dump_block(thing, buf, size, flags);
3084
3085 out:
3086 umem_free(pbuf, SPA_MAXBLOCKSIZE);
3087 umem_free(lbuf, SPA_MAXBLOCKSIZE);
3088 free(dup);
3089 }
3090
3091 static boolean_t
3092 pool_match(nvlist_t *cfg, char *tgt)
3093 {
3094 uint64_t v, guid = strtoull(tgt, NULL, 0);
3095 char *s;
3096
3097 if (guid != 0) {
3098 if (nvlist_lookup_uint64(cfg, ZPOOL_CONFIG_POOL_GUID, &v) == 0)
3099 return (v == guid);
3100 } else {
3101 if (nvlist_lookup_string(cfg, ZPOOL_CONFIG_POOL_NAME, &s) == 0)
3102 return (strcmp(s, tgt) == 0);
3103 }
3104 return (B_FALSE);
3105 }
3106
3107 static char *
3108 find_zpool(char **target, nvlist_t **configp, int dirc, char **dirv)
3109 {
3110 nvlist_t *pools;
3111 nvlist_t *match = NULL;
3112 char *name = NULL;
3113 char *sepp = NULL;
3114 char sep = 0;
3115 int count = 0;
3116 importargs_t args = { 0 };
3117
3118 args.paths = dirc;
3119 args.path = dirv;
3120 args.can_be_active = B_TRUE;
3121
3122 if ((sepp = strpbrk(*target, "/@")) != NULL) {
3123 sep = *sepp;
3124 *sepp = '\0';
3125 }
3126
3127 pools = zpool_search_import(g_zfs, &args);
3128
3129 if (pools != NULL) {
3130 nvpair_t *elem = NULL;
3131 while ((elem = nvlist_next_nvpair(pools, elem)) != NULL) {
3132 verify(nvpair_value_nvlist(elem, configp) == 0);
3133 if (pool_match(*configp, *target)) {
3134 count++;
3135 if (match != NULL) {
3136 /* print previously found config */
3137 if (name != NULL) {
3138 (void) printf("%s\n", name);
3139 dump_nvlist(match, 8);
3140 name = NULL;
3141 }
3142 (void) printf("%s\n",
3143 nvpair_name(elem));
3144 dump_nvlist(*configp, 8);
3145 } else {
3146 match = *configp;
3147 name = nvpair_name(elem);
3148 }
3149 }
3150 }
3151 }
3152 if (count > 1)
3153 (void) fatal("\tMatched %d pools - use pool GUID "
3154 "instead of pool name or \n"
3155 "\tpool name part of a dataset name to select pool", count);
3156
3157 if (sepp)
3158 *sepp = sep;
3159 /*
3160 * If pool GUID was specified for pool id, replace it with pool name
3161 */
3162 if (name && (strstr(*target, name) != *target)) {
3163 int sz = 1 + strlen(name) + ((sepp) ? strlen(sepp) : 0);
3164
3165 *target = umem_alloc(sz, UMEM_NOFAIL);
3166 (void) snprintf(*target, sz, "%s%s", name, sepp ? sepp : "");
3167 }
3168
3169 *configp = name ? match : NULL;
3170
3171 return (name);
3172 }
3173
3174 int
3175 main(int argc, char **argv)
3176 {
3177 int i, c;
3178 struct rlimit rl = { 1024, 1024 };
3179 spa_t *spa = NULL;
3180 objset_t *os = NULL;
3181 int dump_all = 1;
3182 int verbose = 0;
3183 int error = 0;
3184 char **searchdirs = NULL;
3185 int nsearch = 0;
3186 char *target;
3187 nvlist_t *policy = NULL;
3188 uint64_t max_txg = UINT64_MAX;
3189 int rewind = ZPOOL_NEVER_REWIND;
3190 char *spa_config_path_env;
3191
3192 (void) setrlimit(RLIMIT_NOFILE, &rl);
3193 (void) enable_extended_FILE_stdio(-1, -1);
3194
3195 dprintf_setup(&argc, argv);
3196
3197 /*
3198 * If there is an environment variable SPA_CONFIG_PATH it overrides
3199 * default spa_config_path setting. If -U flag is specified it will
3200 * override this environment variable settings once again.
3201 */
3202 spa_config_path_env = getenv("SPA_CONFIG_PATH");
3203 if (spa_config_path_env != NULL)
3204 spa_config_path = spa_config_path_env;
3205
3206 while ((c = getopt(argc, argv, "bcdhilmM:suCDRSAFLXevp:t:U:P")) != -1) {
3207 switch (c) {
3208 case 'b':
3209 case 'c':
3210 case 'd':
3211 case 'h':
3212 case 'i':
3213 case 'l':
3214 case 'm':
3215 case 's':
3216 case 'u':
3217 case 'C':
3218 case 'D':
3219 case 'R':
3220 case 'S':
3221 dump_opt[c]++;
3222 dump_all = 0;
3223 break;
3224 case 'A':
3225 case 'F':
3226 case 'L':
3227 case 'X':
3228 case 'e':
3229 case 'P':
3230 dump_opt[c]++;
3231 break;
3232 case 'v':
3233 verbose++;
3234 break;
3235 case 'M':
3236 max_inflight = strtoull(optarg, NULL, 0);
3237 if (max_inflight == 0) {
3238 (void) fprintf(stderr, "maximum number "
3239 "of inflight I/Os must be greater "
3240 "than 0\n");
3241 usage();
3242 }
3243 break;
3244 case 'p':
3245 if (searchdirs == NULL) {
3246 searchdirs = umem_alloc(sizeof (char *),
3247 UMEM_NOFAIL);
3248 } else {
3249 char **tmp = umem_alloc((nsearch + 1) *
3250 sizeof (char *), UMEM_NOFAIL);
3251 bcopy(searchdirs, tmp, nsearch *
3252 sizeof (char *));
3253 umem_free(searchdirs,
3254 nsearch * sizeof (char *));
3255 searchdirs = tmp;
3256 }
3257 searchdirs[nsearch++] = optarg;
3258 break;
3259 case 't':
3260 max_txg = strtoull(optarg, NULL, 0);
3261 if (max_txg < TXG_INITIAL) {
3262 (void) fprintf(stderr, "incorrect txg "
3263 "specified: %s\n", optarg);
3264 usage();
3265 }
3266 break;
3267 case 'U':
3268 spa_config_path = optarg;
3269 break;
3270 default:
3271 usage();
3272 break;
3273 }
3274 }
3275
3276 if (!dump_opt['e'] && searchdirs != NULL) {
3277 (void) fprintf(stderr, "-p option requires use of -e\n");
3278 usage();
3279 }
3280
3281 kernel_init(FREAD);
3282 if ((g_zfs = libzfs_init()) == NULL)
3283 return (1);
3284
3285 if (dump_all)
3286 verbose = MAX(verbose, 1);
3287
3288 for (c = 0; c < 256; c++) {
3289 if (dump_all && !strchr("elAFLRSXP", c))
3290 dump_opt[c] = 1;
3291 if (dump_opt[c])
3292 dump_opt[c] += verbose;
3293 }
3294
3295 aok = (dump_opt['A'] == 1) || (dump_opt['A'] > 2);
3296 zfs_recover = (dump_opt['A'] > 1);
3297
3298 argc -= optind;
3299 argv += optind;
3300
3301 if (argc < 2 && dump_opt['R'])
3302 usage();
3303 if (argc < 1) {
3304 if (!dump_opt['e'] && dump_opt['C']) {
3305 dump_cachefile(spa_config_path);
3306 return (0);
3307 }
3308 usage();
3309 }
3310
3311 if (dump_opt['l']) {
3312 dump_label(argv[0]);
3313 return (0);
3314 }
3315
3316 if (dump_opt['X'] || dump_opt['F'])
3317 rewind = ZPOOL_DO_REWIND |
3318 (dump_opt['X'] ? ZPOOL_EXTREME_REWIND : 0);
3319
3320 if (nvlist_alloc(&policy, NV_UNIQUE_NAME_TYPE, 0) != 0 ||
3321 nvlist_add_uint64(policy, ZPOOL_REWIND_REQUEST_TXG, max_txg) != 0 ||
3322 nvlist_add_uint32(policy, ZPOOL_REWIND_REQUEST, rewind) != 0)
3323 fatal("internal error: %s", strerror(ENOMEM));
3324
3325 error = 0;
3326 target = argv[0];
3327
3328 if (dump_opt['e']) {
3329 nvlist_t *cfg = NULL;
3330 char *name = find_zpool(&target, &cfg, nsearch, searchdirs);
3331
3332 error = ENOENT;
3333 if (name) {
3334 if (dump_opt['C'] > 1) {
3335 (void) printf("\nConfiguration for import:\n");
3336 dump_nvlist(cfg, 8);
3337 }
3338 if (nvlist_add_nvlist(cfg,
3339 ZPOOL_REWIND_POLICY, policy) != 0) {
3340 fatal("can't open '%s': %s",
3341 target, strerror(ENOMEM));
3342 }
3343 if ((error = spa_import(name, cfg, NULL,
3344 ZFS_IMPORT_MISSING_LOG)) != 0) {
3345 error = spa_import(name, cfg, NULL,
3346 ZFS_IMPORT_VERBATIM);
3347 }
3348 }
3349 }
3350
3351 if (error == 0) {
3352 if (strpbrk(target, "/@") == NULL || dump_opt['R']) {
3353 error = spa_open_rewind(target, &spa, FTAG, policy,
3354 NULL);
3355 if (error) {
3356 /*
3357 * If we're missing the log device then
3358 * try opening the pool after clearing the
3359 * log state.
3360 */
3361 mutex_enter(&spa_namespace_lock);
3362 if ((spa = spa_lookup(target)) != NULL &&
3363 spa->spa_log_state == SPA_LOG_MISSING) {
3364 spa->spa_log_state = SPA_LOG_CLEAR;
3365 error = 0;
3366 }
3367 mutex_exit(&spa_namespace_lock);
3368
3369 if (!error) {
3370 error = spa_open_rewind(target, &spa,
3371 FTAG, policy, NULL);
3372 }
3373 }
3374 } else {
3375 error = dmu_objset_own(target, DMU_OST_ANY,
3376 B_TRUE, FTAG, &os);
3377 }
3378 }
3379 nvlist_free(policy);
3380
3381 if (error)
3382 fatal("can't open '%s': %s", target, strerror(error));
3383
3384 argv++;
3385 argc--;
3386 if (!dump_opt['R']) {
3387 if (argc > 0) {
3388 zopt_objects = argc;
3389 zopt_object = calloc(zopt_objects, sizeof (uint64_t));
3390 for (i = 0; i < zopt_objects; i++) {
3391 errno = 0;
3392 zopt_object[i] = strtoull(argv[i], NULL, 0);
3393 if (zopt_object[i] == 0 && errno != 0)
3394 fatal("bad number %s: %s",
3395 argv[i], strerror(errno));
3396 }
3397 }
3398 if (os != NULL) {
3399 dump_dir(os);
3400 } else if (zopt_objects > 0 && !dump_opt['m']) {
3401 dump_dir(spa->spa_meta_objset);
3402 } else {
3403 dump_zpool(spa);
3404 }
3405 } else {
3406 flagbits['b'] = ZDB_FLAG_PRINT_BLKPTR;
3407 flagbits['c'] = ZDB_FLAG_CHECKSUM;
3408 flagbits['d'] = ZDB_FLAG_DECOMPRESS;
3409 flagbits['e'] = ZDB_FLAG_BSWAP;
3410 flagbits['g'] = ZDB_FLAG_GBH;
3411 flagbits['i'] = ZDB_FLAG_INDIRECT;
3412 flagbits['p'] = ZDB_FLAG_PHYS;
3413 flagbits['r'] = ZDB_FLAG_RAW;
3414
3415 for (i = 0; i < argc; i++)
3416 zdb_read_block(argv[i], spa);
3417 }
3418
3419 (os != NULL) ? dmu_objset_disown(os, FTAG) : spa_close(spa, FTAG);
3420
3421 fuid_table_destroy();
3422 sa_loaded = B_FALSE;
3423
3424 libzfs_fini(g_zfs);
3425 kernel_fini();
3426
3427 return (0);
3428 }