dumplfs.c revision 1.47
1/* $NetBSD: dumplfs.c,v 1.47 2015/08/02 18:10:08 dholland Exp $ */ 2 3/*- 4 * Copyright (c) 1991, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the name of the University nor the names of its contributors 16 * may be used to endorse or promote products derived from this software 17 * without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32#include <sys/cdefs.h> 33 34#ifndef lint 35__COPYRIGHT("@(#) Copyright (c) 1991, 1993\ 36 The Regents of the University of California. All rights reserved."); 37#endif /* not lint */ 38 39#ifndef lint 40#if 0 41static char sccsid[] = "@(#)dumplfs.c 8.5 (Berkeley) 5/24/95"; 42#else 43__RCSID("$NetBSD: dumplfs.c,v 1.47 2015/08/02 18:10:08 dholland Exp $"); 44#endif 45#endif /* not lint */ 46 47#include <sys/param.h> 48#include <sys/ucred.h> 49#include <sys/mount.h> 50#include <sys/time.h> 51 52#include <ufs/lfs/lfs.h> 53#include <ufs/lfs/lfs_accessors.h> 54 55#include <err.h> 56#include <errno.h> 57#include <fcntl.h> 58#include <fstab.h> 59#include <stdlib.h> 60#include <stdio.h> 61#include <string.h> 62#include <unistd.h> 63#include "extern.h" 64 65static void addseg(char *); 66static void dump_cleaner_info(struct lfs *, void *); 67static void dump_dinode(struct ulfs1_dinode *); 68static void dump_ifile(int, struct lfs *, int, int, daddr_t); 69static int dump_ipage_ifile(struct lfs *, int, char *, int); 70static int dump_ipage_segusage(struct lfs *, int, char *, int); 71static void dump_segment(int, int, daddr_t, struct lfs *, int); 72static int dump_sum(int, struct lfs *, SEGSUM *, int, daddr_t); 73static void dump_super(struct lfs *); 74static void usage(void); 75 76extern uint32_t cksum(void *, size_t); 77 78typedef struct seglist SEGLIST; 79struct seglist { 80 SEGLIST *next; 81 int num; 82}; 83SEGLIST *seglist; 84 85char *special; 86 87/* Segment Usage formats */ 88#define print_suheader \ 89 (void)printf("segnum\tflags\tnbytes\tninos\tnsums\tlastmod\n") 90 91static inline void 92print_suentry(int i, SEGUSE *sp, struct lfs *fs) 93{ 94 time_t t; 95 char flags[4] = " "; 96 97 if (sp->su_flags & SEGUSE_ACTIVE) 98 flags[0] = 'A'; 99 if (sp->su_flags & SEGUSE_DIRTY) 100 flags[1] = 'D'; 101 else 102 flags[1] = 'C'; 103 if (sp->su_flags & SEGUSE_SUPERBLOCK) 104 flags[2] = 'S'; 105 106 t = (fs->lfs_version == 1 ? sp->su_olastmod : sp->su_lastmod); 107 108 printf("%d\t%s\t%d\t%d\t%d\t%s", i, flags, 109 sp->su_nbytes, sp->su_ninos, sp->su_nsums, 110 ctime(&t)); 111} 112 113/* Ifile formats */ 114#define print_iheader \ 115 (void)printf("inum\tstatus\tversion\tdaddr\t\tfreeptr\n") 116 117static inline void 118print_ientry(int i, IFILE *ip) 119{ 120 if (ip->if_daddr == LFS_UNUSED_DADDR) 121 printf("%d\tFREE\t%d\t \t\t%llu\n", i, ip->if_version, 122 (unsigned long long)ip->if_nextfree); 123 else 124 printf("%d\tINUSE\t%d\t%8X\t%s\n", 125 i, ip->if_version, ip->if_daddr, 126 (ip->if_nextfree == LFS_ORPHAN_NEXTFREE ? "FFFFFFFF" : "-")); 127} 128 129#define fsbtobyte(fs, b) lfs_fsbtob((fs), (off_t)((b))) 130 131int datasum_check = 0; 132 133int 134main(int argc, char **argv) 135{ 136 struct lfs lfs_sb1, lfs_sb2, *lfs_master; 137 daddr_t seg_addr, idaddr, sbdaddr; 138 int ch, do_allsb, do_ientries, do_segentries, fd, segnum; 139 void *sbuf; 140 141 do_allsb = 0; 142 do_ientries = 0; 143 do_segentries = 0; 144 idaddr = 0x0; 145 sbdaddr = 0x0; 146 while ((ch = getopt(argc, argv, "ab:diI:Ss:")) != -1) 147 switch(ch) { 148 case 'a': /* Dump all superblocks */ 149 do_allsb = 1; 150 break; 151 case 'b': /* Use this superblock */ 152 sbdaddr = strtol(optarg, NULL, 0); 153 break; 154 case 'd': 155 datasum_check = 1; 156 break; 157 case 'i': /* Dump ifile entries */ 158 do_ientries = !do_ientries; 159 break; 160 case 'I': /* Use this ifile inode */ 161 idaddr = strtol(optarg, NULL, 0); 162 break; 163 case 'S': 164 do_segentries = !do_segentries; 165 break; 166 case 's': /* Dump out these segments */ 167 addseg(optarg); 168 break; 169 default: 170 usage(); 171 } 172 argc -= optind; 173 argv += optind; 174 175 if (argc != 1) 176 usage(); 177 178 special = argv[0]; 179 if ((fd = open(special, O_RDONLY, 0)) < 0) 180 err(1, "%s", special); 181 182 sbuf = malloc(LFS_SBPAD); 183 if (sbuf == NULL) 184 err(1, "malloc"); 185 186 if (sbdaddr == 0x0) { 187 /* Read the proto-superblock */ 188 get(fd, LFS_LABELPAD, sbuf, LFS_SBPAD); 189 memcpy(&(lfs_sb1.lfs_dlfs), sbuf, sizeof(struct dlfs)); 190 191 /* If that wasn't the real first sb, get the real first sb */ 192 if (lfs_sb1.lfs_version > 1 && 193 lfs_sb_getsboff(&lfs_sb1, 0) > lfs_btofsb(&lfs_sb1, LFS_LABELPAD)) 194 get(fd, lfs_fsbtob(&lfs_sb1, lfs_sb_getsboff(&lfs_sb1, 0)), 195 &(lfs_sb1.lfs_dlfs), sizeof(struct dlfs)); 196 197 /* 198 * Read the second superblock and figure out which check point is 199 * most up to date. 200 */ 201 get(fd, 202 fsbtobyte(&lfs_sb1, lfs_sb_getsboff(&lfs_sb1, 1)), 203 sbuf, LFS_SBPAD); 204 memcpy(&(lfs_sb2.lfs_dlfs), sbuf, sizeof(struct dlfs)); 205 206 lfs_master = &lfs_sb1; 207 if (lfs_sb1.lfs_version > 1) { 208 if (lfs_sb_getserial(&lfs_sb1) > lfs_sb_getserial(&lfs_sb2)) { 209 lfs_master = &lfs_sb2; 210 sbdaddr = lfs_sb_getsboff(&lfs_sb1, 1); 211 } else 212 sbdaddr = lfs_sb_getsboff(&lfs_sb1, 0); 213 } else { 214 if (lfs_sb_getotstamp(&lfs_sb1) > lfs_sb_getotstamp(&lfs_sb2)) { 215 lfs_master = &lfs_sb2; 216 sbdaddr = lfs_sb_getsboff(&lfs_sb1, 1); 217 } else 218 sbdaddr = lfs_sb_getsboff(&lfs_sb1, 0); 219 } 220 } else { 221 /* Read the first superblock */ 222 get(fd, dbtob((off_t)sbdaddr), sbuf, LFS_SBPAD); 223 memcpy(&(lfs_sb1.lfs_dlfs), sbuf, sizeof(struct dlfs)); 224 lfs_master = &lfs_sb1; 225 } 226 227 free(sbuf); 228 229 /* Compatibility */ 230 if (lfs_master->lfs_version == 1) { 231 lfs_sb_setsumsize(lfs_master, LFS_V1_SUMMARY_SIZE); 232 lfs_sb_setibsize(lfs_master, lfs_sb_getbsize(lfs_master)); 233 lfs_sb_sets0addr(lfs_master, lfs_sb_getsboff(lfs_master, 0)); 234 lfs_sb_settstamp(lfs_master, lfs_sb_getotstamp(lfs_master)); 235 lfs_sb_setfsbtodb(lfs_master, 0); 236 } 237 238 (void)printf("Master Superblock at 0x%llx:\n", (long long)sbdaddr); 239 dump_super(lfs_master); 240 241 dump_ifile(fd, lfs_master, do_ientries, do_segentries, idaddr); 242 243 if (seglist != NULL) 244 for (; seglist != NULL; seglist = seglist->next) { 245 seg_addr = lfs_sntod(lfs_master, seglist->num); 246 dump_segment(fd, seglist->num, seg_addr, lfs_master, 247 do_allsb); 248 } 249 else 250 for (segnum = 0, seg_addr = lfs_sntod(lfs_master, 0); 251 segnum < lfs_sb_getnseg(lfs_master); 252 segnum++, seg_addr = lfs_sntod(lfs_master, segnum)) 253 dump_segment(fd, segnum, seg_addr, lfs_master, 254 do_allsb); 255 256 (void)close(fd); 257 exit(0); 258} 259 260/* 261 * We are reading all the blocks of an inode and dumping out the ifile table. 262 * This code could be tighter, but this is a first pass at getting the stuff 263 * printed out rather than making this code incredibly efficient. 264 */ 265static void 266dump_ifile(int fd, struct lfs *lfsp, int do_ientries, int do_segentries, daddr_t addr) 267{ 268 char *ipage; 269 struct ulfs1_dinode *dip, *dpage; 270 /* XXX ondisk32 */ 271 int32_t *addrp, *dindir, *iaddrp, *indir; 272 int block_limit, i, inum, j, nblocks, psize; 273 274 psize = lfs_sb_getbsize(lfsp); 275 if (!addr) 276 addr = lfs_sb_getidaddr(lfsp); 277 278 if (!(dpage = malloc(psize))) 279 err(1, "malloc"); 280 get(fd, fsbtobyte(lfsp, addr), dpage, psize); 281 282 for (dip = dpage + LFS_INOPB(lfsp) - 1; dip >= dpage; --dip) 283 if (dip->di_inumber == LFS_IFILE_INUM) 284 break; 285 286 if (dip < dpage) { 287 warnx("unable to locate ifile inode at disk address 0x%jx", 288 (uintmax_t)addr); 289 return; 290 } 291 292 (void)printf("\nIFILE inode\n"); 293 dump_dinode(dip); 294 295 (void)printf("\nIFILE contents\n"); 296 nblocks = dip->di_size >> lfs_sb_getbshift(lfsp); 297 block_limit = MIN(nblocks, ULFS_NDADDR); 298 299 /* Get the direct block */ 300 if ((ipage = malloc(psize)) == NULL) 301 err(1, "malloc"); 302 for (inum = 0, addrp = dip->di_db, i = 0; i < block_limit; 303 i++, addrp++) { 304 get(fd, fsbtobyte(lfsp, *addrp), ipage, psize); 305 if (i < lfs_sb_getcleansz(lfsp)) { 306 dump_cleaner_info(lfsp, ipage); 307 if (do_segentries) 308 print_suheader; 309 continue; 310 } 311 312 if (i < (lfs_sb_getsegtabsz(lfsp) + lfs_sb_getcleansz(lfsp))) { 313 if (do_segentries) 314 inum = dump_ipage_segusage(lfsp, inum, ipage, 315 lfs_sb_getsepb(lfsp)); 316 else 317 inum = (i < lfs_sb_getsegtabsz(lfsp) + lfs_sb_getcleansz(lfsp) - 1); 318 if (!inum) { 319 if(!do_ientries) 320 goto e0; 321 else 322 print_iheader; 323 } 324 } else 325 inum = dump_ipage_ifile(lfsp, inum, ipage, lfs_sb_getifpb(lfsp)); 326 } 327 328 if (nblocks <= ULFS_NDADDR) 329 goto e0; 330 331 /* Dump out blocks off of single indirect block */ 332 if (!(indir = malloc(psize))) 333 err(1, "malloc"); 334 get(fd, fsbtobyte(lfsp, dip->di_ib[0]), indir, psize); 335 block_limit = MIN(i + lfs_sb_getnindir(lfsp), nblocks); 336 for (addrp = indir; i < block_limit; i++, addrp++) { 337 if (*addrp == LFS_UNUSED_DADDR) 338 break; 339 get(fd, fsbtobyte(lfsp, *addrp), ipage, psize); 340 if (i < lfs_sb_getcleansz(lfsp)) { 341 dump_cleaner_info(lfsp, ipage); 342 continue; 343 } 344 345 if (i < lfs_sb_getsegtabsz(lfsp) + lfs_sb_getcleansz(lfsp)) { 346 if (do_segentries) 347 inum = dump_ipage_segusage(lfsp, inum, ipage, 348 lfs_sb_getsepb(lfsp)); 349 else 350 inum = (i < lfs_sb_getsegtabsz(lfsp) + lfs_sb_getcleansz(lfsp) - 1); 351 if (!inum) { 352 if(!do_ientries) 353 goto e1; 354 else 355 print_iheader; 356 } 357 } else 358 inum = dump_ipage_ifile(lfsp, inum, ipage, lfs_sb_getifpb(lfsp)); 359 } 360 361 if (nblocks <= lfs_sb_getnindir(lfsp) * lfs_sb_getifpb(lfsp)) 362 goto e1; 363 364 /* Get the double indirect block */ 365 if (!(dindir = malloc(psize))) 366 err(1, "malloc"); 367 get(fd, fsbtobyte(lfsp, dip->di_ib[1]), dindir, psize); 368 for (iaddrp = dindir, j = 0; j < lfs_sb_getnindir(lfsp); j++, iaddrp++) { 369 if (*iaddrp == LFS_UNUSED_DADDR) 370 break; 371 get(fd, fsbtobyte(lfsp, *iaddrp), indir, psize); 372 block_limit = MIN(i + lfs_sb_getnindir(lfsp), nblocks); 373 for (addrp = indir; i < block_limit; i++, addrp++) { 374 if (*addrp == LFS_UNUSED_DADDR) 375 break; 376 get(fd, fsbtobyte(lfsp, *addrp), ipage, psize); 377 if (i < lfs_sb_getcleansz(lfsp)) { 378 dump_cleaner_info(lfsp, ipage); 379 continue; 380 } 381 382 if (i < lfs_sb_getsegtabsz(lfsp) + lfs_sb_getcleansz(lfsp)) { 383 if (do_segentries) 384 inum = dump_ipage_segusage(lfsp, 385 inum, ipage, lfs_sb_getsepb(lfsp)); 386 else 387 inum = (i < lfs_sb_getsegtabsz(lfsp) + 388 lfs_sb_getcleansz(lfsp) - 1); 389 if (!inum) { 390 if(!do_ientries) 391 goto e2; 392 else 393 print_iheader; 394 } 395 } else 396 inum = dump_ipage_ifile(lfsp, inum, 397 ipage, lfs_sb_getifpb(lfsp)); 398 } 399 } 400e2: free(dindir); 401e1: free(indir); 402e0: free(dpage); 403 free(ipage); 404} 405 406static int 407dump_ipage_ifile(struct lfs *lfsp, int i, char *pp, int tot) 408{ 409 char *ip; 410 int cnt, max, entsize; 411 412 if (lfsp->lfs_version == 1) 413 entsize = sizeof(IFILE_V1); 414 else 415 entsize = sizeof(IFILE); 416 max = i + tot; 417 418 for (ip = pp, cnt = i; cnt < max; cnt++, ip += entsize) 419 print_ientry(cnt, (IFILE *)ip); 420 return (max); 421} 422 423static int 424dump_ipage_segusage(struct lfs *lfsp, int i, char *pp, int tot) 425{ 426 SEGUSE *sp; 427 int cnt, max; 428 struct seglist *slp; 429 430 max = i + tot; 431 for (sp = (SEGUSE *)pp, cnt = i; 432 cnt < lfs_sb_getnseg(lfsp) && cnt < max; cnt++) { 433 if (seglist == NULL) 434 print_suentry(cnt, sp, lfsp); 435 else { 436 for (slp = seglist; slp != NULL; slp = slp->next) 437 if (cnt == slp->num) { 438 print_suentry(cnt, sp, lfsp); 439 break; 440 } 441 } 442 if (lfsp->lfs_version > 1) 443 ++sp; 444 else 445 sp = (SEGUSE *)((SEGUSE_V1 *)sp + 1); 446 } 447 if (max >= lfs_sb_getnseg(lfsp)) 448 return (0); 449 else 450 return (max); 451} 452 453static void 454dump_dinode(struct ulfs1_dinode *dip) 455{ 456 int i; 457 time_t at, mt, ct; 458 459 at = dip->di_atime; 460 mt = dip->di_mtime; 461 ct = dip->di_ctime; 462 463 (void)printf(" %so%o\t%s%d\t%s%d\t%s%d\t%s%llu\n", 464 "mode ", dip->di_mode, 465 "nlink ", dip->di_nlink, 466 "uid ", dip->di_uid, 467 "gid ", dip->di_gid, 468 "size ", (long long)dip->di_size); 469 (void)printf(" %s%s %s%s %s%s", 470 "atime ", ctime(&at), 471 "mtime ", ctime(&mt), 472 "ctime ", ctime(&ct)); 473 (void)printf(" inum %d\n", dip->di_inumber); 474 (void)printf(" Direct Addresses\n"); 475 for (i = 0; i < ULFS_NDADDR; i++) { 476 (void)printf("\t0x%x", dip->di_db[i]); 477 if ((i % 6) == 5) 478 (void)printf("\n"); 479 } 480 for (i = 0; i < ULFS_NIADDR; i++) 481 (void)printf("\t0x%x", dip->di_ib[i]); 482 (void)printf("\n"); 483} 484 485static int 486dump_sum(int fd, struct lfs *lfsp, SEGSUM *sp, int segnum, daddr_t addr) 487{ 488 FINFO *fp; 489 int32_t *dp, *idp; 490 int i, j, acc; 491 int ck; 492 int numbytes, numblocks; 493 char *datap; 494 struct ulfs1_dinode *inop; 495 size_t el_size; 496 u_int32_t datasum; 497 time_t t; 498 char *buf; 499 500 if (sp->ss_magic != SS_MAGIC || 501 sp->ss_sumsum != (ck = cksum(&sp->ss_datasum, 502 lfs_sb_getsumsize(lfsp) - sizeof(sp->ss_sumsum)))) { 503 /* Don't print "corrupt" if we're just too close to the edge */ 504 if (lfs_dtosn(lfsp, addr + LFS_FSBTODB(lfsp, 1)) == 505 lfs_dtosn(lfsp, addr)) 506 (void)printf("dumplfs: %s %d address 0x%llx\n", 507 "corrupt summary block; segment", segnum, 508 (long long)addr); 509 return -1; 510 } 511 if (lfsp->lfs_version > 1 && sp->ss_ident != lfs_sb_getident(lfsp)) { 512 (void)printf("dumplfs: %s %d address 0x%llx\n", 513 "summary from a former life; segment", segnum, 514 (long long)addr); 515 return -1; 516 } 517 518 (void)printf("Segment Summary Info at 0x%llx\n", (long long)addr); 519 (void)printf(" %s0x%x\t%s%d\t%s%d\t%s%c%c%c%c\n %s0x%x\t%s0x%x", 520 "next ", sp->ss_next, 521 "nfinfo ", sp->ss_nfinfo, 522 "ninos ", sp->ss_ninos, 523 "flags ", (sp->ss_flags & SS_DIROP) ? 'D' : '-', 524 (sp->ss_flags & SS_CONT) ? 'C' : '-', 525 (sp->ss_flags & SS_CLEAN) ? 'L' : '-', 526 (sp->ss_flags & SS_RFW) ? 'R' : '-', 527 "sumsum ", sp->ss_sumsum, 528 "datasum ", sp->ss_datasum ); 529 if (lfsp->lfs_version == 1) { 530 t = sp->ss_ocreate; 531 (void)printf("\tcreate %s\n", ctime(&t)); 532 } else { 533 t = sp->ss_create; 534 (void)printf("\tcreate %s", ctime(&t)); 535 (void)printf(" roll_id %-8x", sp->ss_ident); 536 (void)printf(" serial %lld\n", (long long)sp->ss_serial); 537 } 538 539 /* Dump out inode disk addresses */ 540 dp = (int32_t *)sp; 541 dp += lfs_sb_getsumsize(lfsp) / sizeof(int32_t); 542 inop = malloc(lfs_sb_getbsize(lfsp)); 543 printf(" Inode addresses:"); 544 numbytes = 0; 545 numblocks = 0; 546 for (dp--, i = 0; i < sp->ss_ninos; dp--) { 547 ++numblocks; 548 numbytes += lfs_sb_getibsize(lfsp); /* add bytes for inode block */ 549 printf("\t0x%x {", *dp); 550 get(fd, fsbtobyte(lfsp, *dp), inop, lfs_sb_getibsize(lfsp)); 551 for (j = 0; i < sp->ss_ninos && j < LFS_INOPB(lfsp); j++, i++) { 552 if (j > 0) 553 (void)printf(", "); 554 (void)printf("%dv%d", inop[j].di_inumber, inop[j].di_gen); 555 } 556 (void)printf("}"); 557 if (((i/LFS_INOPB(lfsp)) % 4) == 3) 558 (void)printf("\n"); 559 } 560 free(inop); 561 562 printf("\n"); 563 564 if (lfsp->lfs_version == 1) 565 fp = (FINFO *)((SEGSUM_V1 *)sp + 1); 566 else 567 fp = (FINFO *)(sp + 1); 568 for (i = 0; i < sp->ss_nfinfo; i++) { 569 (void)printf(" FINFO for inode: %d version %d nblocks %d lastlength %d\n", 570 fp->fi_ino, fp->fi_version, fp->fi_nblocks, 571 fp->fi_lastlength); 572 dp = &(fp->fi_blocks[0]); 573 numblocks += fp->fi_nblocks; 574 for (j = 0; j < fp->fi_nblocks; j++, dp++) { 575 (void)printf("\t%d", *dp); 576 if ((j % 8) == 7) 577 (void)printf("\n"); 578 if (j == fp->fi_nblocks - 1) 579 numbytes += fp->fi_lastlength; 580 else 581 numbytes += lfs_sb_getbsize(lfsp); 582 } 583 if ((j % 8) != 0) 584 (void)printf("\n"); 585 fp = (FINFO *)dp; 586 } 587 588 if (datasum_check == 0) 589 return (numbytes); 590 591 /* 592 * Now that we know the number of blocks, run back through and 593 * compute the data checksum. (A bad data checksum is not enough 594 * to prevent us from continuing, but it odes merit a warning.) 595 */ 596 idp = (int32_t *)sp; 597 idp += lfs_sb_getsumsize(lfsp) / sizeof(int32_t); 598 --idp; 599 if (lfsp->lfs_version == 1) { 600 fp = (FINFO *)((SEGSUM_V1 *)sp + 1); 601 el_size = sizeof(unsigned long); 602 } else { 603 fp = (FINFO *)(sp + 1); 604 el_size = sizeof(u_int32_t); 605 } 606 datap = (char *)malloc(el_size * numblocks); 607 memset(datap, 0, el_size * numblocks); 608 acc = 0; 609 addr += lfs_btofsb(lfsp, lfs_sb_getsumsize(lfsp)); 610 buf = malloc(lfs_sb_getbsize(lfsp)); 611 for (i = 0; i < sp->ss_nfinfo; i++) { 612 while (addr == *idp) { 613 get(fd, fsbtobyte(lfsp, addr), buf, lfs_sb_getibsize(lfsp)); 614 memcpy(datap + acc * el_size, buf, el_size); 615 addr += lfs_btofsb(lfsp, lfs_sb_getibsize(lfsp)); 616 --idp; 617 ++acc; 618 } 619 for (j = 0; j < fp->fi_nblocks; j++) { 620 get(fd, fsbtobyte(lfsp, addr), buf, lfs_sb_getfsize(lfsp)); 621 memcpy(datap + acc * el_size, buf, el_size); 622 if (j == fp->fi_nblocks - 1) 623 addr += lfs_btofsb(lfsp, fp->fi_lastlength); 624 else 625 addr += lfs_btofsb(lfsp, lfs_sb_getbsize(lfsp)); 626 ++acc; 627 } 628 fp = (FINFO *)&(fp->fi_blocks[fp->fi_nblocks]); 629 } 630 while (addr == *idp) { 631 get(fd, fsbtobyte(lfsp, addr), buf, lfs_sb_getibsize(lfsp)); 632 memcpy(datap + acc * el_size, buf, el_size); 633 addr += lfs_btofsb(lfsp, lfs_sb_getibsize(lfsp)); 634 --idp; 635 ++acc; 636 } 637 free(buf); 638 if (acc != numblocks) 639 printf("** counted %d blocks but should have been %d\n", 640 acc, numblocks); 641 datasum = cksum(datap, numblocks * el_size); 642 if (datasum != sp->ss_datasum) 643 printf("** computed datasum 0x%lx does not match given datasum 0x%lx\n", (unsigned long)datasum, (unsigned long)sp->ss_datasum); 644 free(datap); 645 646 return (numbytes); 647} 648 649static void 650dump_segment(int fd, int segnum, daddr_t addr, struct lfs *lfsp, int dump_sb) 651{ 652 struct lfs lfs_sb, *sbp; 653 SEGSUM *sump; 654 char *sumblock; 655 int did_one, nbytes, sb; 656 off_t sum_offset; 657 daddr_t new_addr; 658 659 (void)printf("\nSEGMENT %lld (Disk Address 0x%llx)\n", 660 (long long)lfs_dtosn(lfsp, addr), (long long)addr); 661 sum_offset = fsbtobyte(lfsp, addr); 662 sumblock = malloc(lfs_sb_getsumsize(lfsp)); 663 664 if (lfsp->lfs_version > 1 && segnum == 0) { 665 if (lfs_fsbtob(lfsp, lfs_sb_gets0addr(lfsp)) < LFS_LABELPAD) { 666 /* First segment eats the disklabel */ 667 sum_offset += lfs_fragroundup(lfsp, LFS_LABELPAD) - 668 lfs_fsbtob(lfsp, lfs_sb_gets0addr(lfsp)); 669 addr += lfs_btofsb(lfsp, lfs_fragroundup(lfsp, LFS_LABELPAD)) - 670 lfs_sb_gets0addr(lfsp); 671 printf("Disklabel at 0x0\n"); 672 } 673 } 674 675 sb = 0; 676 did_one = 0; 677 do { 678 get(fd, sum_offset, sumblock, lfs_sb_getsumsize(lfsp)); 679 sump = (SEGSUM *)sumblock; 680 if ((lfsp->lfs_version > 1 && 681 sump->ss_ident != lfs_sb_getident(lfsp)) || 682 sump->ss_sumsum != cksum (&sump->ss_datasum, 683 lfs_sb_getsumsize(lfsp) - sizeof(sump->ss_sumsum))) { 684 sbp = (struct lfs *)sump; 685 if ((sb = (sbp->lfs_magic == LFS_MAGIC))) { 686 printf("Superblock at 0x%x\n", 687 (unsigned)lfs_btofsb(lfsp, sum_offset)); 688 if (dump_sb) { 689 get(fd, sum_offset, &(lfs_sb.lfs_dlfs), 690 sizeof(struct dlfs)); 691 dump_super(&lfs_sb); 692 } 693 if (lfsp->lfs_version > 1) 694 sum_offset += lfs_fragroundup(lfsp, LFS_SBPAD); 695 else 696 sum_offset += LFS_SBPAD; 697 } else if (did_one) 698 break; 699 else { 700 printf("Segment at 0x%llx empty or corrupt\n", 701 (long long)addr); 702 break; 703 } 704 } else { 705 nbytes = dump_sum(fd, lfsp, sump, segnum, 706 lfs_btofsb(lfsp, sum_offset)); 707 if (nbytes >= 0) 708 sum_offset += lfs_sb_getsumsize(lfsp) + nbytes; 709 else 710 sum_offset = 0; 711 did_one = 1; 712 } 713 /* If the segment ends right on a boundary, it still ends */ 714 new_addr = lfs_btofsb(lfsp, sum_offset); 715 /* printf("end daddr = 0x%lx\n", (long)new_addr); */ 716 if (lfs_dtosn(lfsp, new_addr) != lfs_dtosn(lfsp, addr)) 717 break; 718 } while (sum_offset); 719 720 free(sumblock); 721} 722 723static void 724dump_super(struct lfs *lfsp) 725{ 726 time_t stamp; 727 int i; 728 729 (void)printf(" %s0x%-8x %s0x%-8x %s%-10ju\n", 730 "magic ", lfsp->lfs_magic, 731 "version ", lfsp->lfs_version, 732 "size ", (uintmax_t)lfs_sb_getsize(lfsp)); 733 (void)printf(" %s%-10d %s%-10ju %s%-10d\n", 734 "ssize ", lfs_sb_getssize(lfsp), 735 "dsize ", (uintmax_t)lfs_sb_getdsize(lfsp), 736 "bsize ", lfs_sb_getbsize(lfsp)); 737 (void)printf(" %s%-10d %s%-10d %s%-10d\n", 738 "fsize ", lfs_sb_getfsize(lfsp), 739 "frag ", lfs_sb_getfrag(lfsp), 740 "minfree ", lfs_sb_getminfree(lfsp)); 741 (void)printf(" %s%-10d %s%-10d %s%-10d\n", 742 "inopb ", lfs_sb_getinopb(lfsp), 743 "ifpb ", lfs_sb_getifpb(lfsp), 744 "nindir ", lfs_sb_getnindir(lfsp)); 745 (void)printf(" %s%-10d %s%-10d %s%-10d\n", 746 "nseg ", lfs_sb_getnseg(lfsp), 747 "sepb ", lfs_sb_getsepb(lfsp), 748 "cleansz ", lfs_sb_getcleansz(lfsp)); 749 (void)printf(" %s%-10d %s0x%-8x %s%-10d\n", 750 "segtabsz ", lfs_sb_getsegtabsz(lfsp), 751 "segmask ", lfs_sb_getsegmask(lfsp), 752 "segshift ", lfs_sb_getsegshift(lfsp)); 753 (void)printf(" %s0x%-8jx %s%-10d %s0x%-8jX\n", 754 "bmask ", (uintmax_t)lfs_sb_getbmask(lfsp), 755 "bshift ", lfs_sb_getbshift(lfsp), 756 "ffmask ", (uintmax_t)lfs_sb_getffmask(lfsp)); 757 (void)printf(" %s%-10d %s0x%-8jx %s%u\n", 758 "ffshift ", lfs_sb_getffshift(lfsp), 759 "fbmask ", (uintmax_t)lfs_sb_getfbmask(lfsp), 760 "fbshift ", lfs_sb_getfbshift(lfsp)); 761 762 (void)printf(" %s%-10d %s%-10d %s0x%-8x\n", 763 "sushift ", lfs_sb_getsushift(lfsp), 764 "fsbtodb ", lfs_sb_getfsbtodb(lfsp), 765 "cksum ", lfs_sb_getcksum(lfsp)); 766 (void)printf(" %s%-10d %s%-10d %s%-10d\n", 767 "nclean ", lfs_sb_getnclean(lfsp), 768 "dmeta ", lfs_sb_getdmeta(lfsp), 769 "minfreeseg ", lfs_sb_getminfreeseg(lfsp)); 770 (void)printf(" %s0x%-8x %s%-9d %s%-10d\n", 771 "roll_id ", lfs_sb_getident(lfsp), 772 "interleave ", lfs_sb_getinterleave(lfsp), 773 "sumsize ", lfs_sb_getsumsize(lfsp)); 774 (void)printf(" %s%-10jd %s0x%-8jx\n", 775 "seg0addr ", (intmax_t)lfs_sb_gets0addr(lfsp), 776 "maxfilesize ", (uintmax_t)lfs_sb_getmaxfilesize(lfsp)); 777 778 779 (void)printf(" Superblock disk addresses:\n "); 780 for (i = 0; i < LFS_MAXNUMSB; i++) { 781 (void)printf(" 0x%-8jx", (intmax_t)lfs_sb_getsboff(lfsp, i)); 782 if (i == (LFS_MAXNUMSB >> 1)) 783 (void)printf("\n "); 784 } 785 (void)printf("\n"); 786 787 (void)printf(" Checkpoint Info\n"); 788 (void)printf(" %s%-10d %s0x%-8jx %s%-10d\n", 789 "freehd ", lfs_sb_getfreehd(lfsp), 790 "idaddr ", (intmax_t)lfs_sb_getidaddr(lfsp), 791 "ifile ", lfs_sb_getifile(lfsp)); 792 (void)printf(" %s%-10d %s%-10jd %s%-10jd\n", 793 "uinodes ", lfs_sb_getuinodes(lfsp), 794 "bfree ", (intmax_t)lfs_sb_getbfree(lfsp), 795 "avail ", (intmax_t)lfs_sb_getavail(lfsp)); 796 (void)printf(" %s%-10d %s0x%-8jx %s0x%-8jx\n", 797 "nfiles ", lfs_sb_getnfiles(lfsp), 798 "lastseg ", (uintmax_t)lfs_sb_getlastseg(lfsp), 799 "nextseg ", (uintmax_t)lfs_sb_getnextseg(lfsp)); 800 (void)printf(" %s0x%-8jx %s0x%-8jx %s%-10ju\n", 801 "curseg ", (uintmax_t)lfs_sb_getcurseg(lfsp), 802 "offset ", (uintmax_t)lfs_sb_getoffset(lfsp), 803 "serial ", (uintmax_t)lfs_sb_getserial(lfsp)); 804 stamp = lfs_sb_gettstamp(lfsp); 805 (void)printf(" tstamp %s", ctime(&stamp)); 806} 807 808static void 809addseg(char *arg) 810{ 811 SEGLIST *p; 812 813 if ((p = malloc(sizeof(SEGLIST))) == NULL) 814 err(1, "malloc"); 815 p->next = seglist; 816 p->num = atoi(arg); 817 seglist = p; 818} 819 820static void 821dump_cleaner_info(struct lfs *lfsp, void *ipage) 822{ 823 CLEANERINFO *cip; 824 825 cip = (CLEANERINFO *)ipage; 826 if (lfsp->lfs_version > 1) { 827 (void)printf("free_head %d\n", cip->free_head); 828 (void)printf("free_tail %d\n", cip->free_tail); 829 } 830 (void)printf("clean\t%d\tdirty\t%d\n", 831 cip->clean, cip->dirty); 832 (void)printf("bfree\t%d\tavail\t%d\n\n", 833 cip->bfree, cip->avail); 834} 835 836static void 837usage(void) 838{ 839 (void)fprintf(stderr, "usage: dumplfs [-adiS] [-b blkno] [-I blkno] [-s segno] filesys|device\n"); 840 exit(1); 841} 842