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