dumplfs.c revision 1.19 1 1.19 perseant /* $NetBSD: dumplfs.c,v 1.19 2001/07/13 20:30:21 perseant Exp $ */
2 1.5 cgd
3 1.1 mycroft /*-
4 1.1 mycroft * Copyright (c) 1991, 1993
5 1.1 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 mycroft *
7 1.1 mycroft * Redistribution and use in source and binary forms, with or without
8 1.1 mycroft * modification, are permitted provided that the following conditions
9 1.1 mycroft * are met:
10 1.1 mycroft * 1. Redistributions of source code must retain the above copyright
11 1.1 mycroft * notice, this list of conditions and the following disclaimer.
12 1.1 mycroft * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 mycroft * notice, this list of conditions and the following disclaimer in the
14 1.1 mycroft * documentation and/or other materials provided with the distribution.
15 1.1 mycroft * 3. All advertising materials mentioning features or use of this software
16 1.1 mycroft * must display the following acknowledgement:
17 1.1 mycroft * This product includes software developed by the University of
18 1.1 mycroft * California, Berkeley and its contributors.
19 1.1 mycroft * 4. Neither the name of the University nor the names of its contributors
20 1.1 mycroft * may be used to endorse or promote products derived from this software
21 1.1 mycroft * without specific prior written permission.
22 1.1 mycroft *
23 1.1 mycroft * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 mycroft * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 mycroft * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 mycroft * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 mycroft * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 mycroft * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 mycroft * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 mycroft * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 mycroft * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 mycroft * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 mycroft * SUCH DAMAGE.
34 1.1 mycroft */
35 1.1 mycroft
36 1.8 fvdl #include <sys/cdefs.h>
37 1.8 fvdl
38 1.1 mycroft #ifndef lint
39 1.8 fvdl __COPYRIGHT(
40 1.1 mycroft "@(#) Copyright (c) 1991, 1993\n\
41 1.8 fvdl The Regents of the University of California. All rights reserved.\n");
42 1.1 mycroft #endif /* not lint */
43 1.1 mycroft
44 1.1 mycroft #ifndef lint
45 1.5 cgd #if 0
46 1.8 fvdl static char sccsid[] = "@(#)dumplfs.c 8.5 (Berkeley) 5/24/95";
47 1.5 cgd #else
48 1.19 perseant __RCSID("$NetBSD: dumplfs.c,v 1.19 2001/07/13 20:30:21 perseant Exp $");
49 1.5 cgd #endif
50 1.1 mycroft #endif /* not lint */
51 1.1 mycroft
52 1.1 mycroft #include <sys/param.h>
53 1.1 mycroft #include <sys/ucred.h>
54 1.1 mycroft #include <sys/mount.h>
55 1.1 mycroft #include <sys/time.h>
56 1.1 mycroft
57 1.1 mycroft #include <ufs/ufs/dinode.h>
58 1.1 mycroft #include <ufs/lfs/lfs.h>
59 1.1 mycroft
60 1.2 mycroft #include <err.h>
61 1.2 mycroft #include <errno.h>
62 1.1 mycroft #include <fcntl.h>
63 1.1 mycroft #include <fstab.h>
64 1.1 mycroft #include <stdlib.h>
65 1.1 mycroft #include <stdio.h>
66 1.1 mycroft #include <string.h>
67 1.2 mycroft #include <unistd.h>
68 1.1 mycroft #include "extern.h"
69 1.1 mycroft
70 1.19 perseant static void addseg(char *);
71 1.19 perseant static void dump_cleaner_info(struct lfs *, void *);
72 1.19 perseant static void dump_dinode(struct dinode *);
73 1.19 perseant static void dump_ifile(int, struct lfs *, int, int, int);
74 1.19 perseant static int dump_ipage_ifile(struct lfs *, int, char *, int);
75 1.19 perseant static int dump_ipage_segusage(struct lfs *, int, char *, int);
76 1.19 perseant static void dump_segment(int, int, daddr_t, struct lfs *, int);
77 1.19 perseant static int dump_sum(int, struct lfs *, SEGSUM *, int, daddr_t);
78 1.19 perseant static void dump_super(struct lfs *);
79 1.19 perseant static void usage(void);
80 1.1 mycroft
81 1.19 perseant extern u_long cksum(void *, size_t);
82 1.8 fvdl
83 1.1 mycroft typedef struct seglist SEGLIST;
84 1.1 mycroft struct seglist {
85 1.1 mycroft SEGLIST *next;
86 1.1 mycroft int num;
87 1.1 mycroft };
88 1.1 mycroft SEGLIST *seglist;
89 1.1 mycroft
90 1.1 mycroft char *special;
91 1.1 mycroft
92 1.1 mycroft /* Segment Usage formats */
93 1.1 mycroft #define print_suheader \
94 1.1 mycroft (void)printf("segnum\tflags\tnbytes\tninos\tnsums\tlastmod\n")
95 1.1 mycroft
96 1.19 perseant #define print_suentry(i, sp, fs) \
97 1.19 perseant (void)printf("%d\t%c%c%c\t%d\t%d\t%d\t%s", i, \
98 1.19 perseant (((sp)->su_flags & SEGUSE_ACTIVE) ? 'A' : ' '), \
99 1.19 perseant (((sp)->su_flags & SEGUSE_DIRTY) ? 'D' : 'C'), \
100 1.19 perseant (((sp)->su_flags & SEGUSE_SUPERBLOCK) ? 'S' : ' '), \
101 1.19 perseant (sp)->su_nbytes, (sp)->su_ninos, (sp)->su_nsums, \
102 1.19 perseant ((fs)->lfs_version == 1 ? ctime((time_t *)&(sp)->su_olastmod) : \
103 1.19 perseant ctime((time_t *)&(sp)->su_lastmod)))
104 1.1 mycroft
105 1.1 mycroft /* Ifile formats */
106 1.1 mycroft #define print_iheader \
107 1.1 mycroft (void)printf("inum\tstatus\tversion\tdaddr\t\tfreeptr\n")
108 1.1 mycroft #define print_ientry(i, ip) \
109 1.19 perseant if ((ip)->if_daddr == LFS_UNUSED_DADDR) \
110 1.1 mycroft (void)printf("%d\tFREE\t%d\t \t\t%d\n", \
111 1.19 perseant i, (ip)->if_version, (ip)->if_nextfree); \
112 1.1 mycroft else \
113 1.1 mycroft (void)printf("%d\tINUSE\t%d\t%8X \n", \
114 1.19 perseant i, (ip)->if_version, (ip)->if_daddr)
115 1.19 perseant #define fsbtobyte(fs, b) fsbtob((fs), (off_t)((b)))
116 1.16 toshii
117 1.1 mycroft int
118 1.19 perseant main(int argc, char **argv)
119 1.1 mycroft {
120 1.1 mycroft struct lfs lfs_sb1, lfs_sb2, *lfs_master;
121 1.14 perseant daddr_t seg_addr, idaddr, sbdaddr;
122 1.19 perseant int ch, do_allsb, do_ientries, do_segentries, fd, segnum;
123 1.1 mycroft
124 1.1 mycroft do_allsb = 0;
125 1.1 mycroft do_ientries = 0;
126 1.19 perseant do_segentries = 0;
127 1.14 perseant idaddr = 0x0;
128 1.14 perseant sbdaddr = 0x0;
129 1.19 perseant while ((ch = getopt(argc, argv, "ab:iI:Ss:")) != -1)
130 1.1 mycroft switch(ch) {
131 1.1 mycroft case 'a': /* Dump all superblocks */
132 1.1 mycroft do_allsb = 1;
133 1.1 mycroft break;
134 1.14 perseant case 'b': /* Use this superblock */
135 1.14 perseant sbdaddr = strtol(optarg, NULL, 0);
136 1.14 perseant break;
137 1.1 mycroft case 'i': /* Dump ifile entries */
138 1.19 perseant do_ientries = !do_ientries;
139 1.1 mycroft break;
140 1.14 perseant case 'I': /* Use this ifile inode */
141 1.14 perseant idaddr = strtol(optarg, NULL, 0);
142 1.14 perseant break;
143 1.19 perseant case 'S':
144 1.19 perseant do_segentries = !do_segentries;
145 1.19 perseant break;
146 1.1 mycroft case 's': /* Dump out these segments */
147 1.1 mycroft addseg(optarg);
148 1.1 mycroft break;
149 1.1 mycroft default:
150 1.1 mycroft usage();
151 1.1 mycroft }
152 1.1 mycroft argc -= optind;
153 1.1 mycroft argv += optind;
154 1.1 mycroft
155 1.1 mycroft if (argc != 1)
156 1.1 mycroft usage();
157 1.1 mycroft
158 1.1 mycroft special = argv[0];
159 1.1 mycroft if ((fd = open(special, O_RDONLY, 0)) < 0)
160 1.2 mycroft err(1, "%s", special);
161 1.1 mycroft
162 1.14 perseant if (sbdaddr == 0x0) {
163 1.19 perseant /* Read the proto-superblock */
164 1.14 perseant get(fd, LFS_LABELPAD, &(lfs_sb1.lfs_dlfs), sizeof(struct dlfs));
165 1.19 perseant
166 1.19 perseant /* If that wasn't the real first sb, get the real first sb */
167 1.19 perseant if (lfs_sb1.lfs_version > 1 &&
168 1.19 perseant lfs_sb1.lfs_sboffs[0] > btofsb(&lfs_sb1, LFS_LABELPAD))
169 1.19 perseant get(fd, fsbtob(&lfs_sb1, lfs_sb1.lfs_sboffs[0]),
170 1.19 perseant &(lfs_sb1.lfs_dlfs), sizeof(struct dlfs));
171 1.14 perseant
172 1.14 perseant /*
173 1.14 perseant * Read the second superblock and figure out which check point is
174 1.14 perseant * most up to date.
175 1.14 perseant */
176 1.14 perseant get(fd,
177 1.19 perseant fsbtobyte(&lfs_sb1, lfs_sb1.lfs_sboffs[1]),
178 1.16 toshii &(lfs_sb2.lfs_dlfs), sizeof(struct dlfs));
179 1.14 perseant
180 1.14 perseant lfs_master = &lfs_sb1;
181 1.19 perseant if (lfs_sb1.lfs_version > 1) {
182 1.19 perseant if (lfs_sb1.lfs_serial > lfs_sb2.lfs_serial) {
183 1.19 perseant lfs_master = &lfs_sb2;
184 1.19 perseant sbdaddr = lfs_sb1.lfs_sboffs[1];
185 1.19 perseant } else
186 1.19 perseant sbdaddr = lfs_sb1.lfs_sboffs[0];
187 1.19 perseant } else {
188 1.19 perseant if (lfs_sb1.lfs_otstamp > lfs_sb2.lfs_otstamp) {
189 1.19 perseant lfs_master = &lfs_sb2;
190 1.19 perseant sbdaddr = lfs_sb1.lfs_sboffs[1];
191 1.19 perseant } else
192 1.19 perseant sbdaddr = lfs_sb1.lfs_sboffs[0];
193 1.19 perseant }
194 1.14 perseant } else {
195 1.14 perseant /* Read the first superblock */
196 1.16 toshii get(fd, dbtob((off_t)sbdaddr), &(lfs_sb1.lfs_dlfs),
197 1.16 toshii sizeof(struct dlfs));
198 1.14 perseant lfs_master = &lfs_sb1;
199 1.13 perseant }
200 1.1 mycroft
201 1.19 perseant /* Compatibility */
202 1.19 perseant if (lfs_master->lfs_version == 1) {
203 1.19 perseant lfs_master->lfs_sumsize = LFS_V1_SUMMARY_SIZE;
204 1.19 perseant lfs_master->lfs_ibsize = lfs_master->lfs_bsize;
205 1.19 perseant lfs_master->lfs_start = lfs_master->lfs_sboffs[0];
206 1.19 perseant lfs_master->lfs_tstamp = lfs_master->lfs_otstamp;
207 1.19 perseant lfs_master->lfs_fsbtodb = 0;
208 1.19 perseant }
209 1.19 perseant
210 1.14 perseant (void)printf("Master Superblock at 0x%x:\n", sbdaddr);
211 1.1 mycroft dump_super(lfs_master);
212 1.1 mycroft
213 1.19 perseant dump_ifile(fd, lfs_master, do_ientries, do_segentries, idaddr);
214 1.1 mycroft
215 1.1 mycroft if (seglist != NULL)
216 1.1 mycroft for (; seglist != NULL; seglist = seglist->next) {
217 1.19 perseant seg_addr = sntod(lfs_master, seglist->num);
218 1.19 perseant dump_segment(fd, seglist->num, seg_addr, lfs_master,
219 1.19 perseant do_allsb);
220 1.1 mycroft }
221 1.1 mycroft else
222 1.19 perseant for (segnum = 0, seg_addr = sntod(lfs_master, 0);
223 1.19 perseant segnum < lfs_master->lfs_nseg;
224 1.19 perseant segnum++, seg_addr = sntod(lfs_master, segnum))
225 1.19 perseant dump_segment(fd, segnum, seg_addr, lfs_master,
226 1.19 perseant do_allsb);
227 1.1 mycroft
228 1.1 mycroft (void)close(fd);
229 1.1 mycroft exit(0);
230 1.1 mycroft }
231 1.1 mycroft
232 1.1 mycroft /*
233 1.1 mycroft * We are reading all the blocks of an inode and dumping out the ifile table.
234 1.1 mycroft * This code could be tighter, but this is a first pass at getting the stuff
235 1.1 mycroft * printed out rather than making this code incredibly efficient.
236 1.1 mycroft */
237 1.1 mycroft static void
238 1.19 perseant dump_ifile(int fd, struct lfs *lfsp, int do_ientries, int do_segentries, daddr_t addr)
239 1.1 mycroft {
240 1.19 perseant char *ipage;
241 1.1 mycroft struct dinode *dip, *dpage;
242 1.14 perseant daddr_t *addrp, *dindir, *iaddrp, *indir;
243 1.4 cgd int block_limit, i, inum, j, nblocks, psize;
244 1.1 mycroft
245 1.1 mycroft psize = lfsp->lfs_bsize;
246 1.14 perseant if (!addr)
247 1.14 perseant addr = lfsp->lfs_idaddr;
248 1.1 mycroft
249 1.1 mycroft if (!(dpage = malloc(psize)))
250 1.2 mycroft err(1, "malloc");
251 1.19 perseant get(fd, fsbtobyte(lfsp, addr), dpage, psize);
252 1.1 mycroft
253 1.1 mycroft for (dip = dpage + INOPB(lfsp) - 1; dip >= dpage; --dip)
254 1.1 mycroft if (dip->di_inumber == LFS_IFILE_INUM)
255 1.1 mycroft break;
256 1.1 mycroft
257 1.1 mycroft if (dip < dpage)
258 1.14 perseant errx(1, "unable to locate ifile inode at disk address 0x%x",
259 1.14 perseant addr);
260 1.1 mycroft
261 1.1 mycroft (void)printf("\nIFILE inode\n");
262 1.1 mycroft dump_dinode(dip);
263 1.1 mycroft
264 1.1 mycroft (void)printf("\nIFILE contents\n");
265 1.1 mycroft nblocks = dip->di_size >> lfsp->lfs_bshift;
266 1.1 mycroft block_limit = MIN(nblocks, NDADDR);
267 1.1 mycroft
268 1.1 mycroft /* Get the direct block */
269 1.1 mycroft if ((ipage = malloc(psize)) == NULL)
270 1.2 mycroft err(1, "malloc");
271 1.1 mycroft for (inum = 0, addrp = dip->di_db, i = 0; i < block_limit;
272 1.1 mycroft i++, addrp++) {
273 1.19 perseant get(fd, fsbtobyte(lfsp, *addrp), ipage, psize);
274 1.1 mycroft if (i < lfsp->lfs_cleansz) {
275 1.1 mycroft dump_cleaner_info(lfsp, ipage);
276 1.19 perseant if (do_segentries)
277 1.19 perseant print_suheader;
278 1.1 mycroft continue;
279 1.1 mycroft }
280 1.1 mycroft
281 1.1 mycroft if (i < (lfsp->lfs_segtabsz + lfsp->lfs_cleansz)) {
282 1.19 perseant if (do_segentries)
283 1.19 perseant inum = dump_ipage_segusage(lfsp, inum, ipage,
284 1.19 perseant lfsp->lfs_sepb);
285 1.19 perseant else
286 1.19 perseant inum = (i < lfsp->lfs_segtabsz + lfsp->lfs_cleansz - 1);
287 1.10 ross if (!inum) {
288 1.1 mycroft if(!do_ientries)
289 1.1 mycroft goto e0;
290 1.1 mycroft else
291 1.1 mycroft print_iheader;
292 1.10 ross }
293 1.1 mycroft } else
294 1.19 perseant inum = dump_ipage_ifile(lfsp, inum, ipage, lfsp->lfs_ifpb);
295 1.1 mycroft }
296 1.1 mycroft
297 1.1 mycroft if (nblocks <= NDADDR)
298 1.1 mycroft goto e0;
299 1.1 mycroft
300 1.1 mycroft /* Dump out blocks off of single indirect block */
301 1.1 mycroft if (!(indir = malloc(psize)))
302 1.2 mycroft err(1, "malloc");
303 1.19 perseant get(fd, fsbtobyte(lfsp, dip->di_ib[0]), indir, psize);
304 1.1 mycroft block_limit = MIN(i + lfsp->lfs_nindir, nblocks);
305 1.1 mycroft for (addrp = indir; i < block_limit; i++, addrp++) {
306 1.1 mycroft if (*addrp == LFS_UNUSED_DADDR)
307 1.1 mycroft break;
308 1.19 perseant get(fd, fsbtobyte(lfsp, *addrp), ipage, psize);
309 1.1 mycroft if (i < lfsp->lfs_cleansz) {
310 1.1 mycroft dump_cleaner_info(lfsp, ipage);
311 1.1 mycroft continue;
312 1.19 perseant }
313 1.1 mycroft
314 1.19 perseant if (i < lfsp->lfs_segtabsz + lfsp->lfs_cleansz) {
315 1.19 perseant if (do_segentries)
316 1.19 perseant inum = dump_ipage_segusage(lfsp, inum, ipage,
317 1.19 perseant lfsp->lfs_sepb);
318 1.19 perseant else
319 1.19 perseant inum = (i < lfsp->lfs_segtabsz + lfsp->lfs_cleansz - 1);
320 1.11 nathanw if (!inum) {
321 1.1 mycroft if(!do_ientries)
322 1.1 mycroft goto e1;
323 1.1 mycroft else
324 1.1 mycroft print_iheader;
325 1.11 nathanw }
326 1.1 mycroft } else
327 1.19 perseant inum = dump_ipage_ifile(lfsp, inum, ipage, lfsp->lfs_ifpb);
328 1.1 mycroft }
329 1.1 mycroft
330 1.1 mycroft if (nblocks <= lfsp->lfs_nindir * lfsp->lfs_ifpb)
331 1.1 mycroft goto e1;
332 1.1 mycroft
333 1.1 mycroft /* Get the double indirect block */
334 1.1 mycroft if (!(dindir = malloc(psize)))
335 1.2 mycroft err(1, "malloc");
336 1.19 perseant get(fd, fsbtobyte(lfsp, dip->di_ib[1]), dindir, psize);
337 1.1 mycroft for (iaddrp = dindir, j = 0; j < lfsp->lfs_nindir; j++, iaddrp++) {
338 1.1 mycroft if (*iaddrp == LFS_UNUSED_DADDR)
339 1.1 mycroft break;
340 1.19 perseant get(fd, fsbtobyte(lfsp, *iaddrp), indir, psize);
341 1.1 mycroft block_limit = MIN(i + lfsp->lfs_nindir, nblocks);
342 1.1 mycroft for (addrp = indir; i < block_limit; i++, addrp++) {
343 1.1 mycroft if (*addrp == LFS_UNUSED_DADDR)
344 1.1 mycroft break;
345 1.19 perseant get(fd, fsbtobyte(lfsp, *addrp), ipage, psize);
346 1.1 mycroft if (i < lfsp->lfs_cleansz) {
347 1.1 mycroft dump_cleaner_info(lfsp, ipage);
348 1.1 mycroft continue;
349 1.19 perseant }
350 1.1 mycroft
351 1.19 perseant if (i < lfsp->lfs_segtabsz + lfsp->lfs_cleansz) {
352 1.19 perseant if (do_segentries)
353 1.19 perseant inum = dump_ipage_segusage(lfsp,
354 1.19 perseant inum, ipage, lfsp->lfs_sepb);
355 1.19 perseant else
356 1.19 perseant inum = (i < lfsp->lfs_segtabsz +
357 1.19 perseant lfsp->lfs_cleansz - 1);
358 1.10 ross if (!inum) {
359 1.1 mycroft if(!do_ientries)
360 1.1 mycroft goto e2;
361 1.1 mycroft else
362 1.1 mycroft print_iheader;
363 1.10 ross }
364 1.1 mycroft } else
365 1.19 perseant inum = dump_ipage_ifile(lfsp, inum,
366 1.1 mycroft ipage, lfsp->lfs_ifpb);
367 1.1 mycroft }
368 1.1 mycroft }
369 1.1 mycroft e2: free(dindir);
370 1.1 mycroft e1: free(indir);
371 1.1 mycroft e0: free(dpage);
372 1.1 mycroft free(ipage);
373 1.1 mycroft }
374 1.1 mycroft
375 1.1 mycroft static int
376 1.19 perseant dump_ipage_ifile(struct lfs *lfsp, int i, char *pp, int tot)
377 1.1 mycroft {
378 1.19 perseant char *ip;
379 1.19 perseant int cnt, max, entsize;
380 1.1 mycroft
381 1.19 perseant if (lfsp->lfs_version == 1)
382 1.19 perseant entsize = sizeof(IFILE_V1);
383 1.19 perseant else
384 1.19 perseant entsize = sizeof(IFILE);
385 1.1 mycroft max = i + tot;
386 1.1 mycroft
387 1.19 perseant for (ip = pp, cnt = i; cnt < max; cnt++, ip += entsize)
388 1.19 perseant print_ientry(cnt, (IFILE *)ip);
389 1.1 mycroft return (max);
390 1.1 mycroft }
391 1.1 mycroft
392 1.1 mycroft static int
393 1.19 perseant dump_ipage_segusage(struct lfs *lfsp, int i, char *pp, int tot)
394 1.1 mycroft {
395 1.1 mycroft SEGUSE *sp;
396 1.1 mycroft int cnt, max;
397 1.15 perseant struct seglist *slp;
398 1.1 mycroft
399 1.1 mycroft max = i + tot;
400 1.1 mycroft for (sp = (SEGUSE *)pp, cnt = i;
401 1.19 perseant cnt < lfsp->lfs_nseg && cnt < max; cnt++) {
402 1.15 perseant if (seglist == NULL)
403 1.19 perseant print_suentry(cnt, sp, lfsp);
404 1.15 perseant else {
405 1.15 perseant for (slp = seglist; slp != NULL; slp = slp->next)
406 1.15 perseant if (cnt == slp->num) {
407 1.19 perseant print_suentry(cnt, sp, lfsp);
408 1.15 perseant break;
409 1.15 perseant }
410 1.15 perseant }
411 1.19 perseant if (lfsp->lfs_version > 1)
412 1.19 perseant ++sp;
413 1.19 perseant else
414 1.19 perseant sp = (SEGUSE *)((SEGUSE_V1 *)sp + 1);
415 1.15 perseant }
416 1.1 mycroft if (max >= lfsp->lfs_nseg)
417 1.1 mycroft return (0);
418 1.1 mycroft else
419 1.1 mycroft return (max);
420 1.1 mycroft }
421 1.1 mycroft
422 1.1 mycroft static void
423 1.19 perseant dump_dinode(struct dinode *dip)
424 1.1 mycroft {
425 1.1 mycroft int i;
426 1.7 thorpej time_t at, mt, ct;
427 1.7 thorpej
428 1.7 thorpej at = dip->di_atime;
429 1.7 thorpej mt = dip->di_mtime;
430 1.7 thorpej ct = dip->di_ctime;
431 1.1 mycroft
432 1.19 perseant (void)printf(" %so%o\t%s%d\t%s%d\t%s%d\t%s%llu\n",
433 1.1 mycroft "mode ", dip->di_mode,
434 1.1 mycroft "nlink ", dip->di_nlink,
435 1.1 mycroft "uid ", dip->di_uid,
436 1.1 mycroft "gid ", dip->di_gid,
437 1.9 thorpej "size ", (long long)dip->di_size);
438 1.19 perseant (void)printf(" %s%s %s%s %s%s",
439 1.7 thorpej "atime ", ctime(&at),
440 1.7 thorpej "mtime ", ctime(&mt),
441 1.7 thorpej "ctime ", ctime(&ct));
442 1.19 perseant (void)printf(" inum %d\n", dip->di_inumber);
443 1.19 perseant (void)printf(" Direct Addresses\n");
444 1.1 mycroft for (i = 0; i < NDADDR; i++) {
445 1.14 perseant (void)printf("\t0x%x", dip->di_db[i]);
446 1.1 mycroft if ((i % 6) == 5)
447 1.1 mycroft (void)printf("\n");
448 1.1 mycroft }
449 1.1 mycroft for (i = 0; i < NIADDR; i++)
450 1.14 perseant (void)printf("\t0x%x", dip->di_ib[i]);
451 1.1 mycroft (void)printf("\n");
452 1.1 mycroft }
453 1.1 mycroft
454 1.1 mycroft static int
455 1.19 perseant dump_sum(int fd, struct lfs *lfsp, SEGSUM *sp, int segnum, daddr_t addr)
456 1.1 mycroft {
457 1.1 mycroft FINFO *fp;
458 1.8 fvdl daddr_t *dp;
459 1.1 mycroft int i, j;
460 1.1 mycroft int ck;
461 1.8 fvdl int numbytes;
462 1.1 mycroft struct dinode *inop;
463 1.1 mycroft
464 1.8 fvdl if (sp->ss_magic != SS_MAGIC ||
465 1.8 fvdl sp->ss_sumsum != (ck = cksum(&sp->ss_datasum,
466 1.19 perseant lfsp->lfs_sumsize - sizeof(sp->ss_sumsum)))) {
467 1.14 perseant /* Don't print "corrupt" if we're just too close to the edge */
468 1.19 perseant if (dtosn(lfsp, addr + fsbtodb(lfsp, 1)) ==
469 1.19 perseant dtosn(lfsp, addr))
470 1.14 perseant (void)printf("dumplfs: %s %d address 0x%x\n",
471 1.14 perseant "corrupt summary block; segment", segnum,
472 1.14 perseant addr);
473 1.19 perseant return (0);
474 1.19 perseant }
475 1.19 perseant if (lfsp->lfs_version > 1 && sp->ss_ident != lfsp->lfs_ident) {
476 1.19 perseant (void)printf("dumplfs: %s %d address 0x%x\n",
477 1.19 perseant "summary from a former life; segment", segnum,
478 1.19 perseant addr);
479 1.19 perseant return (0);
480 1.1 mycroft }
481 1.1 mycroft
482 1.8 fvdl (void)printf("Segment Summary Info at 0x%x\n", addr);
483 1.14 perseant (void)printf(" %s0x%x\t%s%d\t%s%d\t%s%c%c\n %s0x%x\t%s0x%x",
484 1.1 mycroft "next ", sp->ss_next,
485 1.1 mycroft "nfinfo ", sp->ss_nfinfo,
486 1.1 mycroft "ninos ", sp->ss_ninos,
487 1.14 perseant "flags ", (sp->ss_flags & SS_DIROP) ? 'D' : '-',
488 1.14 perseant (sp->ss_flags & SS_CONT) ? 'C' : '-',
489 1.1 mycroft "sumsum ", sp->ss_sumsum,
490 1.1 mycroft "datasum ", sp->ss_datasum );
491 1.19 perseant if (lfsp->lfs_version == 1)
492 1.19 perseant (void)printf("\tcreate %s\n", ctime((time_t *)&sp->ss_ident));
493 1.19 perseant else {
494 1.19 perseant (void)printf("\tcreate %s", ctime((time_t *)&sp->ss_create));
495 1.19 perseant (void)printf(" roll_id %-8x", sp->ss_ident);
496 1.19 perseant (void)printf(" serial %lld\n", (long long)sp->ss_serial);
497 1.19 perseant }
498 1.1 mycroft
499 1.1 mycroft /* Dump out inode disk addresses */
500 1.1 mycroft dp = (daddr_t *)sp;
501 1.19 perseant dp += lfsp->lfs_sumsize / sizeof(daddr_t);
502 1.19 perseant inop = malloc(lfsp->lfs_bsize);
503 1.1 mycroft printf(" Inode addresses:");
504 1.8 fvdl numbytes = 0;
505 1.1 mycroft for (dp--, i = 0; i < sp->ss_ninos; dp--) {
506 1.19 perseant numbytes += lfsp->lfs_ibsize; /* add bytes for inode block */
507 1.14 perseant printf("\t0x%x {", *dp);
508 1.19 perseant get(fd, fsbtobyte(lfsp, *dp), inop, lfsp->lfs_ibsize);
509 1.1 mycroft for (j = 0; i < sp->ss_ninos && j < INOPB(lfsp); j++, i++) {
510 1.1 mycroft if (j > 0)
511 1.1 mycroft (void)printf(", ");
512 1.19 perseant (void)printf("%dv%d", inop[j].di_inumber, inop[j].di_gen);
513 1.1 mycroft }
514 1.1 mycroft (void)printf("}");
515 1.1 mycroft if (((i/INOPB(lfsp)) % 4) == 3)
516 1.1 mycroft (void)printf("\n");
517 1.1 mycroft }
518 1.1 mycroft free(inop);
519 1.1 mycroft
520 1.1 mycroft printf("\n");
521 1.19 perseant if (lfsp->lfs_version == 1)
522 1.19 perseant fp = (FINFO *)((SEGSUM_V1 *)sp + 1);
523 1.19 perseant else
524 1.19 perseant fp = (FINFO *)(sp + 1);
525 1.19 perseant for (i = 0; i < sp->ss_nfinfo; i++) {
526 1.8 fvdl (void)printf(" FINFO for inode: %d version %d nblocks %d lastlength %d\n",
527 1.8 fvdl fp->fi_ino, fp->fi_version, fp->fi_nblocks,
528 1.8 fvdl fp->fi_lastlength);
529 1.1 mycroft dp = &(fp->fi_blocks[0]);
530 1.1 mycroft for (j = 0; j < fp->fi_nblocks; j++, dp++) {
531 1.1 mycroft (void)printf("\t%d", *dp);
532 1.1 mycroft if ((j % 8) == 7)
533 1.1 mycroft (void)printf("\n");
534 1.8 fvdl if (j == fp->fi_nblocks - 1)
535 1.8 fvdl numbytes += fp->fi_lastlength;
536 1.8 fvdl else
537 1.8 fvdl numbytes += lfsp->lfs_bsize;
538 1.1 mycroft }
539 1.1 mycroft if ((j % 8) != 0)
540 1.1 mycroft (void)printf("\n");
541 1.1 mycroft fp = (FINFO *)dp;
542 1.1 mycroft }
543 1.8 fvdl return (numbytes);
544 1.1 mycroft }
545 1.1 mycroft
546 1.1 mycroft static void
547 1.19 perseant dump_segment(int fd, int segnum, daddr_t addr, struct lfs *lfsp, int dump_sb)
548 1.1 mycroft {
549 1.1 mycroft struct lfs lfs_sb, *sbp;
550 1.1 mycroft SEGSUM *sump;
551 1.19 perseant char *sumblock;
552 1.8 fvdl int did_one, nbytes, sb;
553 1.14 perseant off_t sum_offset;
554 1.14 perseant daddr_t new_addr;
555 1.1 mycroft
556 1.19 perseant (void)printf("\nSEGMENT %d (Disk Address 0x%x)\n", dtosn(lfsp, addr),
557 1.19 perseant addr);
558 1.19 perseant sum_offset = fsbtobyte(lfsp, addr);
559 1.19 perseant sumblock = malloc(lfsp->lfs_sumsize);
560 1.19 perseant
561 1.19 perseant if (lfsp->lfs_version > 1 && segnum == 0) {
562 1.19 perseant /* First segment eats the label as well as the superblock */
563 1.19 perseant sum_offset += fragroundup(lfsp, LFS_LABELPAD);
564 1.19 perseant addr += btofsb(lfsp, fragroundup(lfsp, LFS_LABELPAD));
565 1.19 perseant printf("Disklabel at 0x0\n");
566 1.19 perseant }
567 1.1 mycroft
568 1.1 mycroft sb = 0;
569 1.1 mycroft did_one = 0;
570 1.1 mycroft do {
571 1.19 perseant get(fd, sum_offset, sumblock, lfsp->lfs_sumsize);
572 1.1 mycroft sump = (SEGSUM *)sumblock;
573 1.19 perseant if ((lfsp->lfs_version > 1 &&
574 1.19 perseant sump->ss_ident != lfsp->lfs_ident) ||
575 1.19 perseant sump->ss_sumsum != cksum (&sump->ss_datasum,
576 1.19 perseant lfsp->lfs_sumsize - sizeof(sump->ss_sumsum))) {
577 1.1 mycroft sbp = (struct lfs *)sump;
578 1.8 fvdl if ((sb = (sbp->lfs_magic == LFS_MAGIC))) {
579 1.19 perseant printf("Superblock at 0x%x\n",
580 1.19 perseant (unsigned)btofsb(lfsp, sum_offset));
581 1.14 perseant if (dump_sb) {
582 1.14 perseant get(fd, sum_offset, &(lfs_sb.lfs_dlfs),
583 1.14 perseant sizeof(struct dlfs));
584 1.14 perseant dump_super(&lfs_sb);
585 1.14 perseant }
586 1.19 perseant if (lfsp->lfs_version > 1)
587 1.19 perseant sum_offset += fragroundup(lfsp, LFS_SBPAD);
588 1.19 perseant else
589 1.19 perseant sum_offset += LFS_SBPAD;
590 1.1 mycroft } else if (did_one)
591 1.1 mycroft break;
592 1.1 mycroft else {
593 1.19 perseant printf("Segment at 0x%x empty or corrupt\n",
594 1.19 perseant addr);
595 1.1 mycroft break;
596 1.1 mycroft }
597 1.1 mycroft } else {
598 1.19 perseant nbytes = dump_sum(fd, lfsp, sump, segnum,
599 1.19 perseant btofsb(lfsp, sum_offset));
600 1.8 fvdl if (nbytes)
601 1.19 perseant sum_offset += lfsp->lfs_sumsize + nbytes;
602 1.1 mycroft else
603 1.1 mycroft sum_offset = 0;
604 1.1 mycroft did_one = 1;
605 1.1 mycroft }
606 1.14 perseant /* If the segment ends right on a boundary, it still ends */
607 1.19 perseant new_addr = btofsb(lfsp, sum_offset);
608 1.19 perseant /* printf("end daddr = 0x%lx\n", (long)new_addr); */
609 1.19 perseant if (dtosn(lfsp, new_addr) != dtosn(lfsp, addr))
610 1.14 perseant break;
611 1.1 mycroft } while (sum_offset);
612 1.1 mycroft
613 1.1 mycroft return;
614 1.1 mycroft }
615 1.1 mycroft
616 1.1 mycroft static void
617 1.19 perseant dump_super(struct lfs *lfsp)
618 1.1 mycroft {
619 1.1 mycroft int i;
620 1.1 mycroft
621 1.19 perseant (void)printf(" %s0x%-8x %s0x%-8x %s%-10d\n",
622 1.19 perseant "magic ", lfsp->lfs_magic,
623 1.19 perseant "version ", lfsp->lfs_version,
624 1.19 perseant "size ", lfsp->lfs_size);
625 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
626 1.19 perseant "ssize ", lfsp->lfs_ssize,
627 1.19 perseant "dsize ", lfsp->lfs_dsize,
628 1.19 perseant "bsize ", lfsp->lfs_bsize);
629 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
630 1.19 perseant "fsize ", lfsp->lfs_fsize,
631 1.19 perseant "frag ", lfsp->lfs_frag,
632 1.19 perseant "minfree ", lfsp->lfs_minfree);
633 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
634 1.19 perseant "inopb ", lfsp->lfs_inopb,
635 1.19 perseant "ifpb ", lfsp->lfs_ifpb,
636 1.19 perseant "nindir ", lfsp->lfs_nindir);
637 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
638 1.19 perseant "nseg ", lfsp->lfs_nseg,
639 1.19 perseant "sepb ", lfsp->lfs_sepb,
640 1.19 perseant "cleansz ", lfsp->lfs_cleansz);
641 1.19 perseant (void)printf(" %s%-10d %s0x%-8x %s%-10d\n",
642 1.19 perseant "segtabsz ", lfsp->lfs_segtabsz,
643 1.19 perseant "segmask ", lfsp->lfs_segmask,
644 1.19 perseant "segshift ", lfsp->lfs_segshift);
645 1.19 perseant (void)printf(" %s0x%-8qx %s%-10d %s0x%-8qX\n",
646 1.19 perseant "bmask ", (long long)lfsp->lfs_bmask,
647 1.19 perseant "bshift ", lfsp->lfs_bshift,
648 1.19 perseant "ffmask ", (long long)lfsp->lfs_ffmask);
649 1.19 perseant (void)printf(" %s%-10d %s0x%-8qx %s%u\n",
650 1.19 perseant "ffshift ", lfsp->lfs_ffshift,
651 1.19 perseant "fbmask ", (long long)lfsp->lfs_fbmask,
652 1.19 perseant "fbshift ", lfsp->lfs_fbshift);
653 1.19 perseant
654 1.19 perseant (void)printf(" %s%-10d %s%-10d %s0x%-8x\n",
655 1.19 perseant "sushift ", lfsp->lfs_sushift,
656 1.19 perseant "fsbtodb ", lfsp->lfs_fsbtodb,
657 1.19 perseant "cksum ", lfsp->lfs_cksum);
658 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
659 1.19 perseant "nclean ", lfsp->lfs_nclean,
660 1.19 perseant "dmeta ", lfsp->lfs_dmeta,
661 1.19 perseant "minfreeseg ", lfsp->lfs_minfreeseg);
662 1.19 perseant (void)printf(" %s0x%-8x %s%-9d %s%-10d\n",
663 1.19 perseant "roll_id ", lfsp->lfs_ident,
664 1.19 perseant "interleave ", lfsp->lfs_interleave,
665 1.19 perseant "sumsize ", lfsp->lfs_sumsize);
666 1.19 perseant (void)printf(" %s0x%-8qx\n",
667 1.19 perseant "maxfilesize ", (long long)lfsp->lfs_maxfilesize);
668 1.19 perseant
669 1.19 perseant
670 1.19 perseant (void)printf(" Superblock disk addresses:\n ");
671 1.19 perseant for (i = 0; i < LFS_MAXNUMSB; i++) {
672 1.19 perseant (void)printf(" 0x%-8x", lfsp->lfs_sboffs[i]);
673 1.19 perseant if (i == (LFS_MAXNUMSB >> 1))
674 1.19 perseant (void)printf("\n ");
675 1.19 perseant }
676 1.19 perseant (void)printf("\n");
677 1.19 perseant
678 1.19 perseant (void)printf(" Checkpoint Info\n");
679 1.19 perseant (void)printf(" %s%-10d %s0x%-8x %s%-10d\n",
680 1.19 perseant "free ", lfsp->lfs_free,
681 1.19 perseant "idaddr ", lfsp->lfs_idaddr,
682 1.19 perseant "ifile ", lfsp->lfs_ifile);
683 1.19 perseant (void)printf(" %s%-10d %s%-10d %s%-10d\n",
684 1.19 perseant "uinodes ", lfsp->lfs_uinodes,
685 1.19 perseant "bfree ", lfsp->lfs_bfree,
686 1.19 perseant "avail ", lfsp->lfs_avail);
687 1.19 perseant (void)printf(" %s%-10d %s0x%-8x %s0x%-8x\n",
688 1.19 perseant "nfiles ", lfsp->lfs_nfiles,
689 1.19 perseant "lastseg ", lfsp->lfs_lastseg,
690 1.19 perseant "nextseg ", lfsp->lfs_nextseg);
691 1.19 perseant (void)printf(" %s0x%-8x %s0x%-8x %s%-10lld\n",
692 1.19 perseant "curseg ", lfsp->lfs_curseg,
693 1.19 perseant "offset ", lfsp->lfs_offset,
694 1.19 perseant "serial ", (long long)lfsp->lfs_serial);
695 1.19 perseant (void)printf(" tstamp %s", ctime((time_t *)&lfsp->lfs_tstamp));
696 1.1 mycroft }
697 1.1 mycroft
698 1.1 mycroft static void
699 1.19 perseant addseg(char *arg)
700 1.1 mycroft {
701 1.1 mycroft SEGLIST *p;
702 1.1 mycroft
703 1.1 mycroft if ((p = malloc(sizeof(SEGLIST))) == NULL)
704 1.2 mycroft err(1, "malloc");
705 1.1 mycroft p->next = seglist;
706 1.1 mycroft p->num = atoi(arg);
707 1.1 mycroft seglist = p;
708 1.1 mycroft }
709 1.1 mycroft
710 1.1 mycroft static void
711 1.19 perseant dump_cleaner_info(struct lfs *lfsp, void *ipage)
712 1.1 mycroft {
713 1.1 mycroft CLEANERINFO *cip;
714 1.1 mycroft
715 1.1 mycroft cip = (CLEANERINFO *)ipage;
716 1.19 perseant if (lfsp->lfs_version > 1) {
717 1.19 perseant (void)printf("free_head %d\n", cip->free_head);
718 1.19 perseant (void)printf("free_tail %d\n", cip->free_tail);
719 1.19 perseant }
720 1.17 perseant (void)printf("clean\t%d\tdirty\t%d\n",
721 1.17 perseant cip->clean, cip->dirty);
722 1.17 perseant (void)printf("bfree\t%d\tavail\t%d\n\n",
723 1.17 perseant cip->bfree, cip->avail);
724 1.1 mycroft }
725 1.1 mycroft
726 1.1 mycroft static void
727 1.19 perseant usage(void)
728 1.1 mycroft {
729 1.19 perseant (void)fprintf(stderr, "usage: dumplfs [-aiS] [-b daddr] [-I daddr] [-s segnum] file\n");
730 1.1 mycroft exit(1);
731 1.1 mycroft }
732