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