dumplfs.c revision 1.45 1 /* $NetBSD: dumplfs.c,v 1.45 2015/07/28 05:09:35 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
41 static char sccsid[] = "@(#)dumplfs.c 8.5 (Berkeley) 5/24/95";
42 #else
43 __RCSID("$NetBSD: dumplfs.c,v 1.45 2015/07/28 05:09:35 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
65 static void addseg(char *);
66 static void dump_cleaner_info(struct lfs *, void *);
67 static void dump_dinode(struct ulfs1_dinode *);
68 static void dump_ifile(int, struct lfs *, int, int, daddr_t);
69 static int dump_ipage_ifile(struct lfs *, int, char *, int);
70 static int dump_ipage_segusage(struct lfs *, int, char *, int);
71 static void dump_segment(int, int, daddr_t, struct lfs *, int);
72 static int dump_sum(int, struct lfs *, SEGSUM *, int, daddr_t);
73 static void dump_super(struct lfs *);
74 static void usage(void);
75
76 extern uint32_t cksum(void *, size_t);
77
78 typedef struct seglist SEGLIST;
79 struct seglist {
80 SEGLIST *next;
81 int num;
82 };
83 SEGLIST *seglist;
84
85 char *special;
86
87 /* Segment Usage formats */
88 #define print_suheader \
89 (void)printf("segnum\tflags\tnbytes\tninos\tnsums\tlastmod\n")
90
91 static inline void
92 print_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
117 static inline void
118 print_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
131 int datasum_check = 0;
132
133 int
134 main(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 */
265 static void
266 dump_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%llx",
288 (long long)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 }
400 e2: free(dindir);
401 e1: free(indir);
402 e0: free(dpage);
403 free(ipage);
404 }
405
406 static int
407 dump_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
423 static int
424 dump_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
453 static void
454 dump_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
485 static int
486 dump_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
649 static void
650 dump_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
723 static void
724 dump_super(struct lfs *lfsp)
725 {
726 time_t stamp;
727 int i;
728
729 (void)printf(" %s0x%-8x %s0x%-8x %s%-10d\n",
730 "magic ", lfsp->lfs_magic,
731 "version ", lfsp->lfs_version,
732 "size ", lfs_sb_getsize(lfsp));
733 (void)printf(" %s%-10d %s%-10d %s%-10d\n",
734 "ssize ", lfs_sb_getssize(lfsp),
735 "dsize ", 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%-10d %s0x%-8jx\n",
775 "seg0addr ", 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%-8x", 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%-8x %s%-10d\n",
789 "freehd ", lfs_sb_getfreehd(lfsp),
790 "idaddr ", lfs_sb_getidaddr(lfsp),
791 "ifile ", lfs_sb_getifile(lfsp));
792 (void)printf(" %s%-10d %s%-10d %s%-10d\n",
793 "uinodes ", lfs_sb_getuinodes(lfsp),
794 "bfree ", lfs_sb_getbfree(lfsp),
795 "avail ", lfs_sb_getavail(lfsp));
796 (void)printf(" %s%-10d %s0x%-8x %s0x%-8x\n",
797 "nfiles ", lfs_sb_getnfiles(lfsp),
798 "lastseg ", lfs_sb_getlastseg(lfsp),
799 "nextseg ", lfs_sb_getnextseg(lfsp));
800 (void)printf(" %s0x%-8x %s0x%-8x %s%-10ju\n",
801 "curseg ", lfs_sb_getcurseg(lfsp),
802 "offset ", 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
808 static void
809 addseg(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
820 static void
821 dump_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
836 static void
837 usage(void)
838 {
839 (void)fprintf(stderr, "usage: dumplfs [-adiS] [-b blkno] [-I blkno] [-s segno] filesys|device\n");
840 exit(1);
841 }
842