debug.c revision 163844
1/*
2 * Copyright (c) 2000 Christoph Herrmann, Thomas-Henning von Kamptz
3 * Copyright (c) 1980, 1989, 1993 The Regents of the University of California.
4 * All rights reserved.
5 *
6 * This code is derived from software contributed to Berkeley by
7 * Christoph Herrmann and Thomas-Henning von Kamptz, Munich and Frankfurt.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 *    must display the following acknowledgment:
19 *      This product includes software developed by the University of
20 *      California, Berkeley and its contributors, as well as Christoph
21 *      Herrmann and Thomas-Henning von Kamptz.
22 * 4. Neither the name of the University nor the names of its contributors
23 *    may be used to endorse or promote products derived from this software
24 *    without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * SUCH DAMAGE.
37 *
38 * $TSHeader: src/sbin/growfs/debug.c,v 1.3 2000/12/12 19:31:00 tomsoft Exp $
39 *
40 */
41
42#ifndef lint
43static const char rcsid[] =
44  "$FreeBSD: head/sbin/growfs/debug.c 163844 2006-10-31 22:02:24Z pjd $";
45#endif /* not lint */
46
47/* ********************************************************** INCLUDES ***** */
48#include <sys/param.h>
49
50#include <limits.h>
51#include <stdio.h>
52#include <string.h>
53#include <ufs/ufs/dinode.h>
54#include <ufs/ffs/fs.h>
55
56#include "debug.h"
57
58#ifdef FS_DEBUG
59
60/* *********************************************************** GLOBALS ***** */
61static FILE	*dbg_log=NULL;
62static unsigned int	indent=0;
63
64/*
65 * prototypes not done here, as they come with debug.h
66 */
67
68/* ********************************************************** dbg_open ***** */
69/*
70 * Open the filehandle where all debug output has to go.
71 */
72void
73dbg_open(const char *fn)
74{
75
76	if (strcmp(fn, "-") == 0)
77		dbg_log=fopen("/dev/stdout", "a");
78	else
79		dbg_log=fopen(fn, "a");
80
81	return;
82}
83
84/* ********************************************************* dbg_close ***** */
85/*
86 * Close the filehandle where all debug output went to.
87 */
88void
89dbg_close(void)
90{
91
92	if(dbg_log) {
93		fclose(dbg_log);
94		dbg_log=NULL;
95	}
96
97	return;
98}
99
100/* ****************************************************** dbg_dump_hex ***** */
101/*
102 * Dump out a full file system block in hex.
103 */
104void
105dbg_dump_hex(struct fs *sb, const char *comment, unsigned char *mem)
106{
107	int i, j, k;
108
109	if(!dbg_log) {
110		return;
111	}
112	fprintf(dbg_log, "===== START HEXDUMP =====\n");
113	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)mem, comment);
114	indent++;
115	for (i=0; i<sb->fs_bsize; i+=24) {
116		for (j=0; j<3; j++) {
117			for (k=0; k<8; k++) {
118				fprintf(dbg_log, "%02x ", *mem++);
119			}
120			fprintf(dbg_log, "  ");
121		}
122		fprintf(dbg_log, "\n");
123	}
124	indent--;
125	fprintf(dbg_log, "===== END HEXDUMP =====\n");
126
127	return;
128}
129
130/* ******************************************************* dbg_dump_fs ***** */
131/*
132 * Dump the superblock.
133 */
134void
135dbg_dump_fs(struct fs *sb, const char *comment)
136{
137#ifdef FSMAXSNAP
138	int	j;
139#endif /* FSMAXSNAP */
140
141	if(!dbg_log) {
142		return;
143	}
144
145	fprintf(dbg_log, "===== START SUPERBLOCK =====\n");
146	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)sb, comment);
147	indent++;
148
149	fprintf(dbg_log, "sblkno            int32_t          0x%08x\n",
150	    sb->fs_sblkno);
151	fprintf(dbg_log, "cblkno            int32_t          0x%08x\n",
152	    sb->fs_cblkno);
153	fprintf(dbg_log, "iblkno            int32_t          0x%08x\n",
154	    sb->fs_iblkno);
155	fprintf(dbg_log, "dblkno            int32_t          0x%08x\n",
156	    sb->fs_dblkno);
157
158	fprintf(dbg_log, "old_cgoffset      int32_t          0x%08x\n",
159	    sb->fs_old_cgoffset);
160	fprintf(dbg_log, "old_cgmask        int32_t          0x%08x\n",
161	    sb->fs_old_cgmask);
162	fprintf(dbg_log, "old_time          int32_t          %10u\n",
163	    (unsigned int)sb->fs_old_time);
164	fprintf(dbg_log, "old_size          int32_t          0x%08x\n",
165	    sb->fs_old_size);
166	fprintf(dbg_log, "old_dsize         int32_t          0x%08x\n",
167	    sb->fs_old_dsize);
168	fprintf(dbg_log, "ncg               int32_t          0x%08x\n",
169	    sb->fs_ncg);
170	fprintf(dbg_log, "bsize             int32_t          0x%08x\n",
171	    sb->fs_bsize);
172	fprintf(dbg_log, "fsize             int32_t          0x%08x\n",
173	    sb->fs_fsize);
174	fprintf(dbg_log, "frag              int32_t          0x%08x\n",
175	    sb->fs_frag);
176
177	fprintf(dbg_log, "minfree           int32_t          0x%08x\n",
178	    sb->fs_minfree);
179	fprintf(dbg_log, "old_rotdelay      int32_t          0x%08x\n",
180	    sb->fs_old_rotdelay);
181	fprintf(dbg_log, "old_rps           int32_t          0x%08x\n",
182	    sb->fs_old_rps);
183
184	fprintf(dbg_log, "bmask             int32_t          0x%08x\n",
185	    sb->fs_bmask);
186	fprintf(dbg_log, "fmask             int32_t          0x%08x\n",
187	    sb->fs_fmask);
188	fprintf(dbg_log, "bshift            int32_t          0x%08x\n",
189	    sb->fs_bshift);
190	fprintf(dbg_log, "fshift            int32_t          0x%08x\n",
191	    sb->fs_fshift);
192
193	fprintf(dbg_log, "maxcontig         int32_t          0x%08x\n",
194	    sb->fs_maxcontig);
195	fprintf(dbg_log, "maxbpg            int32_t          0x%08x\n",
196	    sb->fs_maxbpg);
197
198	fprintf(dbg_log, "fragshift         int32_t          0x%08x\n",
199	    sb->fs_fragshift);
200	fprintf(dbg_log, "fsbtodb           int32_t          0x%08x\n",
201	    sb->fs_fsbtodb);
202	fprintf(dbg_log, "sbsize            int32_t          0x%08x\n",
203	    sb->fs_sbsize);
204	fprintf(dbg_log, "spare1            int32_t[2]       0x%08x 0x%08x\n",
205	    sb->fs_spare1[0], sb->fs_spare1[1]);
206	fprintf(dbg_log, "nindir            int32_t          0x%08x\n",
207	    sb->fs_nindir);
208	fprintf(dbg_log, "inopb             int32_t          0x%08x\n",
209	    sb->fs_inopb);
210	fprintf(dbg_log, "old_nspf          int32_t          0x%08x\n",
211	    sb->fs_old_nspf);
212
213	fprintf(dbg_log, "optim             int32_t          0x%08x\n",
214	    sb->fs_optim);
215
216	fprintf(dbg_log, "old_npsect        int32_t          0x%08x\n",
217	    sb->fs_old_npsect);
218	fprintf(dbg_log, "old_interleave    int32_t          0x%08x\n",
219	    sb->fs_old_interleave);
220	fprintf(dbg_log, "old_trackskew     int32_t          0x%08x\n",
221	    sb->fs_old_trackskew);
222
223	fprintf(dbg_log, "id                int32_t[2]       0x%08x 0x%08x\n",
224	    sb->fs_id[0], sb->fs_id[1]);
225
226	fprintf(dbg_log, "old_csaddr        int32_t          0x%08x\n",
227	    sb->fs_old_csaddr);
228	fprintf(dbg_log, "cssize            int32_t          0x%08x\n",
229	    sb->fs_cssize);
230	fprintf(dbg_log, "cgsize            int32_t          0x%08x\n",
231	    sb->fs_cgsize);
232
233	fprintf(dbg_log, "spare2            int32_t          0x%08x\n",
234	    sb->fs_spare2);
235	fprintf(dbg_log, "old_nsect         int32_t          0x%08x\n",
236	    sb->fs_old_nsect);
237	fprintf(dbg_log, "old_spc           int32_t          0x%08x\n",
238	    sb->fs_old_spc);
239
240	fprintf(dbg_log, "old_ncyl          int32_t          0x%08x\n",
241	    sb->fs_old_ncyl);
242
243	fprintf(dbg_log, "old_cpg           int32_t          0x%08x\n",
244	    sb->fs_old_cpg);
245	fprintf(dbg_log, "ipg               int32_t          0x%08x\n",
246	    sb->fs_ipg);
247	fprintf(dbg_log, "fpg               int32_t          0x%08x\n",
248	    sb->fs_fpg);
249
250	dbg_dump_csum("internal old_cstotal", &sb->fs_old_cstotal);
251
252	fprintf(dbg_log, "fmod              int8_t           0x%02x\n",
253	    sb->fs_fmod);
254	fprintf(dbg_log, "clean             int8_t           0x%02x\n",
255	    sb->fs_clean);
256	fprintf(dbg_log, "ronly             int8_t           0x%02x\n",
257	    sb->fs_ronly);
258	fprintf(dbg_log, "old_flags         int8_t           0x%02x\n",
259	    sb->fs_old_flags);
260	fprintf(dbg_log, "fsmnt             u_char[MAXMNTLEN] \"%s\"\n",
261	    sb->fs_fsmnt);
262	fprintf(dbg_log, "volname           u_char[MAXVOLLEN] \"%s\"\n",
263	    sb->fs_volname);
264	fprintf(dbg_log, "swuid             u_int64_t        0x%08x%08x\n",
265	    ((unsigned int *)&(sb->fs_swuid))[1],
266		((unsigned int *)&(sb->fs_swuid))[0]);
267
268	fprintf(dbg_log, "pad               int32_t          0x%08x\n",
269	    sb->fs_pad);
270
271	fprintf(dbg_log, "cgrotor           int32_t          0x%08x\n",
272	    sb->fs_cgrotor);
273/*
274 * struct csum[MAXCSBUFS] - is only maintained in memory
275 */
276/*	fprintf(dbg_log, " int32_t\n", sb->*fs_maxcluster);*/
277	fprintf(dbg_log, "old_cpc           int32_t          0x%08x\n",
278	    sb->fs_old_cpc);
279/*
280 * int16_t fs_opostbl[16][8] - is dumped when used in dbg_dump_sptbl
281 */
282	fprintf(dbg_log, "maxbsize          int32_t          0x%08x\n",
283	    sb->fs_maxbsize);
284	fprintf(dbg_log, "unrefs            int64_t          0x%08x\n",
285	    sb->fs_unrefs);
286	fprintf(dbg_log, "sblockloc         int64_t          0x%08x%08x\n",
287		((unsigned int *)&(sb->fs_sblockloc))[1],
288		((unsigned int *)&(sb->fs_sblockloc))[0]);
289
290	dbg_dump_csum_total("internal cstotal", &sb->fs_cstotal);
291
292	fprintf(dbg_log, "time              ufs_time_t       %10u\n",
293	    (unsigned int)sb->fs_time);
294
295	fprintf(dbg_log, "size              int64_t          0x%08x%08x\n",
296		((unsigned int *)&(sb->fs_size))[1],
297		((unsigned int *)&(sb->fs_size))[0]);
298	fprintf(dbg_log, "dsize             int64_t          0x%08x%08x\n",
299		((unsigned int *)&(sb->fs_dsize))[1],
300		((unsigned int *)&(sb->fs_dsize))[0]);
301	fprintf(dbg_log, "csaddr            ufs2_daddr_t     0x%08x%08x\n",
302		((unsigned int *)&(sb->fs_csaddr))[1],
303		((unsigned int *)&(sb->fs_csaddr))[0]);
304	fprintf(dbg_log, "pendingblocks     int64_t          0x%08x%08x\n",
305		((unsigned int *)&(sb->fs_pendingblocks))[1],
306		((unsigned int *)&(sb->fs_pendingblocks))[0]);
307	fprintf(dbg_log, "pendinginodes     int32_t          0x%08x\n",
308	    sb->fs_pendinginodes);
309
310#ifdef FSMAXSNAP
311	for(j=0; j<FSMAXSNAP; j++) {
312		fprintf(dbg_log, "snapinum          int32_t[%2d]      0x%08x\n",
313		    j, sb->fs_snapinum[j]);
314		if(!sb->fs_snapinum[j]) { /* list is dense */
315			break;
316		}
317	}
318#endif /* FSMAXSNAP */
319	fprintf(dbg_log, "avgfilesize       int32_t          0x%08x\n",
320	    sb->fs_avgfilesize);
321	fprintf(dbg_log, "avgfpdir          int32_t          0x%08x\n",
322	    sb->fs_avgfpdir);
323	fprintf(dbg_log, "save_cgsize       int32_t          0x%08x\n",
324	    sb->fs_save_cgsize);
325	fprintf(dbg_log, "flags             int32_t          0x%08x\n",
326	    sb->fs_flags);
327	fprintf(dbg_log, "contigsumsize     int32_t          0x%08x\n",
328	    sb->fs_contigsumsize);
329	fprintf(dbg_log, "maxsymlinklen     int32_t          0x%08x\n",
330	    sb->fs_maxsymlinklen);
331	fprintf(dbg_log, "old_inodefmt      int32_t          0x%08x\n",
332	    sb->fs_old_inodefmt);
333	fprintf(dbg_log, "maxfilesize       u_int64_t        0x%08x%08x\n",
334	    ((unsigned int *)&(sb->fs_maxfilesize))[1],
335	    ((unsigned int *)&(sb->fs_maxfilesize))[0]);
336	fprintf(dbg_log, "qbmask            int64_t          0x%08x%08x\n",
337	    ((unsigned int *)&(sb->fs_qbmask))[1],
338	    ((unsigned int *)&(sb->fs_qbmask))[0]);
339	fprintf(dbg_log, "qfmask            int64_t          0x%08x%08x\n",
340	    ((unsigned int *)&(sb->fs_qfmask))[1],
341	    ((unsigned int *)&(sb->fs_qfmask))[0]);
342	fprintf(dbg_log, "state             int32_t          0x%08x\n",
343	    sb->fs_state);
344	fprintf(dbg_log, "old_postblformat  int32_t          0x%08x\n",
345	    sb->fs_old_postblformat);
346	fprintf(dbg_log, "old_nrpos         int32_t          0x%08x\n",
347	    sb->fs_old_nrpos);
348	fprintf(dbg_log, "spare5            int32_t[2]       0x%08x 0x%08x\n",
349	    sb->fs_spare5[0], sb->fs_spare5[1]);
350	fprintf(dbg_log, "magic             int32_t          0x%08x\n",
351	    sb->fs_magic);
352
353	indent--;
354	fprintf(dbg_log, "===== END SUPERBLOCK =====\n");
355
356	return;
357}
358
359/* ******************************************************* dbg_dump_cg ***** */
360/*
361 * Dump a cylinder group.
362 */
363void
364dbg_dump_cg(const char *comment, struct cg *cgr)
365{
366	int j;
367
368	if(!dbg_log) {
369		return;
370	}
371
372	fprintf(dbg_log, "===== START CYLINDER GROUP =====\n");
373	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
374	indent++;
375
376	fprintf(dbg_log, "magic         int32_t    0x%08x\n", cgr->cg_magic);
377	fprintf(dbg_log, "old_time      int32_t    0x%08x\n", cgr->cg_old_time);
378	fprintf(dbg_log, "cgx           int32_t    0x%08x\n", cgr->cg_cgx);
379	fprintf(dbg_log, "old_ncyl      int16_t    0x%04x\n", cgr->cg_old_ncyl);
380	fprintf(dbg_log, "old_niblk     int16_t    0x%04x\n", cgr->cg_old_niblk);
381	fprintf(dbg_log, "ndblk         int32_t    0x%08x\n", cgr->cg_ndblk);
382	dbg_dump_csum("internal cs", &cgr->cg_cs);
383	fprintf(dbg_log, "rotor         int32_t    0x%08x\n", cgr->cg_rotor);
384	fprintf(dbg_log, "frotor        int32_t    0x%08x\n", cgr->cg_frotor);
385	fprintf(dbg_log, "irotor        int32_t    0x%08x\n", cgr->cg_irotor);
386	for(j=0; j<MAXFRAG; j++) {
387		fprintf(dbg_log, "frsum         int32_t[%d] 0x%08x\n", j,
388		    cgr->cg_frsum[j]);
389	}
390	fprintf(dbg_log, "old_btotoff   int32_t    0x%08x\n", cgr->cg_old_btotoff);
391	fprintf(dbg_log, "old_boff      int32_t    0x%08x\n", cgr->cg_old_boff);
392	fprintf(dbg_log, "iusedoff      int32_t    0x%08x\n", cgr->cg_iusedoff);
393	fprintf(dbg_log, "freeoff       int32_t    0x%08x\n", cgr->cg_freeoff);
394	fprintf(dbg_log, "nextfreeoff   int32_t    0x%08x\n",
395	    cgr->cg_nextfreeoff);
396	fprintf(dbg_log, "clustersumoff int32_t    0x%08x\n",
397	    cgr->cg_clustersumoff);
398	fprintf(dbg_log, "clusteroff    int32_t    0x%08x\n",
399	    cgr->cg_clusteroff);
400	fprintf(dbg_log, "nclusterblks  int32_t    0x%08x\n",
401	    cgr->cg_nclusterblks);
402	fprintf(dbg_log, "niblk         int32_t    0x%08x\n", cgr->cg_niblk);
403	fprintf(dbg_log, "initediblk    int32_t    0x%08x\n", cgr->cg_initediblk);
404	fprintf(dbg_log, "unrefs        int32_t    0x%08x\n", cgr->cg_unrefs);
405	fprintf(dbg_log, "time          ufs_time_t %10u\n",
406		(unsigned int)cgr->cg_initediblk);
407
408	indent--;
409	fprintf(dbg_log, "===== END CYLINDER GROUP =====\n");
410
411	return;
412}
413
414/* ***************************************************** dbg_dump_csum ***** */
415/*
416 * Dump a cylinder summary.
417 */
418void
419dbg_dump_csum(const char *comment, struct csum *cs)
420{
421
422	if(!dbg_log) {
423		return;
424	}
425
426	fprintf(dbg_log, "===== START CYLINDER SUMMARY =====\n");
427	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cs, comment);
428	indent++;
429
430	fprintf(dbg_log, "ndir   int32_t 0x%08x\n", cs->cs_ndir);
431	fprintf(dbg_log, "nbfree int32_t 0x%08x\n", cs->cs_nbfree);
432	fprintf(dbg_log, "nifree int32_t 0x%08x\n", cs->cs_nifree);
433	fprintf(dbg_log, "nffree int32_t 0x%08x\n", cs->cs_nffree);
434
435	indent--;
436	fprintf(dbg_log, "===== END CYLINDER SUMMARY =====\n");
437
438	return;
439}
440
441/* ************************************************ dbg_dump_csum_total ***** */
442/*
443 * Dump a cylinder summary.
444 */
445void
446dbg_dump_csum_total(const char *comment, struct csum_total *cs)
447{
448
449	if(!dbg_log) {
450		return;
451	}
452
453	fprintf(dbg_log, "===== START CYLINDER SUMMARY TOTAL =====\n");
454	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cs, comment);
455	indent++;
456
457	fprintf(dbg_log, "ndir        int64_t 0x%08x%08x\n",
458		((unsigned int *)&(cs->cs_ndir))[1],
459		((unsigned int *)&(cs->cs_ndir))[0]);
460	fprintf(dbg_log, "nbfree      int64_t 0x%08x%08x\n",
461		((unsigned int *)&(cs->cs_nbfree))[1],
462		((unsigned int *)&(cs->cs_nbfree))[0]);
463	fprintf(dbg_log, "nifree      int64_t 0x%08x%08x\n",
464		((unsigned int *)&(cs->cs_nifree))[1],
465		((unsigned int *)&(cs->cs_nifree))[0]);
466	fprintf(dbg_log, "nffree      int64_t 0x%08x%08x\n",
467		((unsigned int *)&(cs->cs_nffree))[1],
468		((unsigned int *)&(cs->cs_nffree))[0]);
469	fprintf(dbg_log, "numclusters int64_t 0x%08x%08x\n",
470		((unsigned int *)&(cs->cs_numclusters))[1],
471		((unsigned int *)&(cs->cs_numclusters))[0]);
472
473	indent--;
474	fprintf(dbg_log, "===== END CYLINDER SUMMARY TOTAL =====\n");
475
476	return;
477}
478/* **************************************************** dbg_dump_inmap ***** */
479/*
480 * Dump the inode allocation map in one cylinder group.
481 */
482void
483dbg_dump_inmap(struct fs *sb, const char *comment, struct cg *cgr)
484{
485	int j,k,l,e;
486	unsigned char *cp;
487
488	if(!dbg_log) {
489		return;
490	}
491
492	fprintf(dbg_log, "===== START INODE ALLOCATION MAP =====\n");
493	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
494	indent++;
495
496	cp=(unsigned char *)cg_inosused(cgr);
497	e=sb->fs_ipg/8;
498	for(j=0; j<e; j+=32) {
499		fprintf(dbg_log, "%08x: ", j);
500		for(k=0; k<32; k+=8) {
501			if(j+k+8<e) {
502				fprintf(dbg_log,
503				    "%02x%02x%02x%02x%02x%02x%02x%02x ",
504				    cp[0], cp[1], cp[2], cp[3],
505				    cp[4], cp[5], cp[6], cp[7]);
506			} else {
507				for(l=0; (l<8)&&(j+k+l<e); l++) {
508					fprintf(dbg_log, "%02x", cp[l]);
509				}
510			}
511			cp+=8;
512		}
513		fprintf(dbg_log, "\n");
514	}
515
516	indent--;
517	fprintf(dbg_log, "===== END INODE ALLOCATION MAP =====\n");
518
519	return;
520}
521
522
523/* **************************************************** dbg_dump_frmap ***** */
524/*
525 * Dump the fragment allocation map in one cylinder group.
526 */
527void
528dbg_dump_frmap(struct fs *sb, const char *comment, struct cg *cgr)
529{
530	int j,k,l,e;
531	unsigned char *cp;
532
533	if(!dbg_log) {
534		return;
535	}
536
537	fprintf(dbg_log, "===== START FRAGMENT ALLOCATION MAP =====\n");
538	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
539	indent++;
540
541	cp=(unsigned char *)cg_blksfree(cgr);
542	if (sb->fs_old_nspf)
543		e=howmany((sb->fs_old_cpg * sb->fs_old_spc / sb->fs_old_nspf), CHAR_BIT);
544	else
545		e = 0;
546	for(j=0; j<e; j+=32) {
547		fprintf(dbg_log, "%08x: ", j);
548		for(k=0; k<32; k+=8) {
549			if(j+k+8<e) {
550				fprintf(dbg_log,
551				    "%02x%02x%02x%02x%02x%02x%02x%02x ",
552				    cp[0], cp[1], cp[2], cp[3],
553				    cp[4], cp[5], cp[6], cp[7]);
554			} else {
555				for(l=0; (l<8)&&(j+k+l<e); l++) {
556					fprintf(dbg_log, "%02x", cp[l]);
557				}
558			}
559			cp+=8;
560		}
561		fprintf(dbg_log, "\n");
562	}
563
564	indent--;
565	fprintf(dbg_log, "===== END FRAGMENT ALLOCATION MAP =====\n");
566
567	return;
568}
569
570/* **************************************************** dbg_dump_clmap ***** */
571/*
572 * Dump the cluster allocation map in one cylinder group.
573 */
574void
575dbg_dump_clmap(struct fs *sb, const char *comment, struct cg *cgr)
576{
577	int j,k,l,e;
578	unsigned char *cp;
579
580	if(!dbg_log) {
581		return;
582	}
583
584	fprintf(dbg_log, "===== START CLUSTER ALLOCATION MAP =====\n");
585	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
586	indent++;
587
588	cp=(unsigned char *)cg_clustersfree(cgr);
589	if (sb->fs_old_nspf)
590		e=howmany(sb->fs_old_cpg * sb->fs_old_spc / (sb->fs_old_nspf << sb->fs_fragshift), CHAR_BIT);
591	else
592		e = 0;
593	for(j=0; j<e; j+=32) {
594		fprintf(dbg_log, "%08x: ", j);
595		for(k=0; k<32; k+=8) {
596			if(j+k+8<e) {
597				fprintf(dbg_log,
598				    "%02x%02x%02x%02x%02x%02x%02x%02x ",
599				    cp[0], cp[1], cp[2], cp[3],
600				    cp[4], cp[5], cp[6], cp[7]);
601			} else {
602				for(l=0; (l<8)&&(j+k+l<e); l++) {
603					fprintf(dbg_log, "%02x", cp[l]);
604				}
605			}
606			cp+=8;
607		}
608		fprintf(dbg_log, "\n");
609	}
610
611	indent--;
612	fprintf(dbg_log, "===== END CLUSTER ALLOCATION MAP =====\n");
613
614	return;
615}
616
617/* **************************************************** dbg_dump_clsum ***** */
618/*
619 * Dump the cluster availability summary of one cylinder group.
620 */
621void
622dbg_dump_clsum(struct fs *sb, const char *comment, struct cg *cgr)
623{
624	int j;
625	int *ip;
626
627	if(!dbg_log) {
628		return;
629	}
630
631	fprintf(dbg_log, "===== START CLUSTER SUMMARY =====\n");
632	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
633	indent++;
634
635	ip=(int *)cg_clustersum(cgr);
636	for(j=0; j<=sb->fs_contigsumsize; j++) {
637		fprintf(dbg_log, "%02d: %8d\n", j, *ip++);
638	}
639
640	indent--;
641	fprintf(dbg_log, "===== END CLUSTER SUMMARY =====\n");
642
643	return;
644}
645
646#ifdef NOT_CURRENTLY
647/*
648 * This code dates from before the UFS2 integration, and doesn't compile
649 * post-UFS2 due to the use of cg_blks().  I'm not sure how best to update
650 * this for UFS2, where the rotational bits of UFS no longer apply, so
651 * will leave it disabled for now; it should probably be re-enabled
652 * specifically for UFS1.
653 */
654/* **************************************************** dbg_dump_sptbl ***** */
655/*
656 * Dump the block summary, and the rotational layout table.
657 */
658void
659dbg_dump_sptbl(struct fs *sb, const char *comment, struct cg *cgr)
660{
661	int j,k;
662	int *ip;
663
664	if(!dbg_log) {
665		return;
666	}
667
668	fprintf(dbg_log,
669	    "===== START BLOCK SUMMARY AND POSITION TABLE =====\n");
670	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)cgr, comment);
671	indent++;
672
673	ip=(int *)cg_blktot(cgr);
674	for(j=0; j<sb->fs_old_cpg; j++) {
675		fprintf(dbg_log, "%2d: %5d = ", j, *ip++);
676		for(k=0; k<sb->fs_old_nrpos; k++) {
677			fprintf(dbg_log, "%4d", cg_blks(sb, cgr, j)[k]);
678			if(k<sb->fs_old_nrpos-1) {
679				fprintf(dbg_log, " + ");
680			}
681		}
682		fprintf(dbg_log, "\n");
683	}
684
685	indent--;
686	fprintf(dbg_log, "===== END BLOCK SUMMARY AND POSITION TABLE =====\n");
687
688	return;
689}
690#endif
691
692/* ************************************************** dbg_dump_ufs1_ino ***** */
693/*
694 * Dump a UFS1 inode structure.
695 */
696void
697dbg_dump_ufs1_ino(struct fs *sb, const char *comment, struct ufs1_dinode *ino)
698{
699	int ictr;
700	int remaining_blocks;
701
702	if(!dbg_log) {
703		return;
704	}
705
706	fprintf(dbg_log, "===== START UFS1 INODE DUMP =====\n");
707	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)ino, comment);
708	indent++;
709
710	fprintf(dbg_log, "mode       u_int16_t      0%o\n", ino->di_mode);
711	fprintf(dbg_log, "nlink      int16_t        0x%04x\n", ino->di_nlink);
712	fprintf(dbg_log, "size       u_int64_t      0x%08x%08x\n",
713	    ((unsigned int *)&(ino->di_size))[1],
714	    ((unsigned int *)&(ino->di_size))[0]);
715	fprintf(dbg_log, "atime      int32_t        0x%08x\n", ino->di_atime);
716	fprintf(dbg_log, "atimensec  int32_t        0x%08x\n",
717	    ino->di_atimensec);
718	fprintf(dbg_log, "mtime      int32_t        0x%08x\n",
719	    ino->di_mtime);
720	fprintf(dbg_log, "mtimensec  int32_t        0x%08x\n",
721	    ino->di_mtimensec);
722	fprintf(dbg_log, "ctime      int32_t        0x%08x\n", ino->di_ctime);
723	fprintf(dbg_log, "ctimensec  int32_t        0x%08x\n",
724	    ino->di_ctimensec);
725
726	remaining_blocks=howmany(ino->di_size, sb->fs_bsize); /* XXX ts - +1? */
727	for(ictr=0; ictr < MIN(NDADDR, remaining_blocks); ictr++) {
728		fprintf(dbg_log, "db         ufs_daddr_t[%x] 0x%08x\n", ictr,
729		    ino->di_db[ictr]);
730	}
731	remaining_blocks-=NDADDR;
732	if(remaining_blocks>0) {
733		fprintf(dbg_log, "ib         ufs_daddr_t[0] 0x%08x\n",
734		    ino->di_ib[0]);
735	}
736	remaining_blocks-=howmany(sb->fs_bsize, sizeof(ufs1_daddr_t));
737	if(remaining_blocks>0) {
738		fprintf(dbg_log, "ib         ufs_daddr_t[1] 0x%08x\n",
739		    ino->di_ib[1]);
740	}
741#define SQUARE(a) ((a)*(a))
742	remaining_blocks-=SQUARE(howmany(sb->fs_bsize, sizeof(ufs1_daddr_t)));
743#undef SQUARE
744	if(remaining_blocks>0) {
745		fprintf(dbg_log, "ib         ufs_daddr_t[2] 0x%08x\n",
746		    ino->di_ib[2]);
747	}
748
749	fprintf(dbg_log, "flags      u_int32_t      0x%08x\n", ino->di_flags);
750	fprintf(dbg_log, "blocks     int32_t        0x%08x\n", ino->di_blocks);
751	fprintf(dbg_log, "gen        int32_t        0x%08x\n", ino->di_gen);
752	fprintf(dbg_log, "uid        u_int32_t      0x%08x\n", ino->di_uid);
753	fprintf(dbg_log, "gid        u_int32_t      0x%08x\n", ino->di_gid);
754
755	indent--;
756	fprintf(dbg_log, "===== END UFS1 INODE DUMP =====\n");
757
758	return;
759}
760
761/* ************************************************** dbg_dump_ufs2_ino ***** */
762/*
763 * Dump a UFS2 inode structure.
764 */
765void
766dbg_dump_ufs2_ino(struct fs *sb, const char *comment, struct ufs2_dinode *ino)
767{
768	int ictr;
769	int remaining_blocks;
770
771	if(!dbg_log) {
772		return;
773	}
774
775	fprintf(dbg_log, "===== START UFS2 INODE DUMP =====\n");
776	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)ino, comment);
777	indent++;
778
779	fprintf(dbg_log, "mode       u_int16_t      0%o\n", ino->di_mode);
780	fprintf(dbg_log, "nlink      int16_t        0x%04x\n", ino->di_nlink);
781	fprintf(dbg_log, "uid        u_int32_t      0x%08x\n", ino->di_uid);
782	fprintf(dbg_log, "gid        u_int32_t      0x%08x\n", ino->di_gid);
783	fprintf(dbg_log, "blksize    u_int32_t      0x%08x\n", ino->di_blksize);
784	fprintf(dbg_log, "size       u_int64_t      0x%08x%08x\n",
785	    ((unsigned int *)&(ino->di_size))[1],
786	    ((unsigned int *)&(ino->di_size))[0]);
787	fprintf(dbg_log, "blocks     u_int64_t      0x%08x%08x\n",
788		((unsigned int *)&(ino->di_blocks))[1],
789		((unsigned int *)&(ino->di_blocks))[0]);
790	fprintf(dbg_log, "atime      ufs_time_t     %10jd\n", ino->di_atime);
791	fprintf(dbg_log, "mtime      ufs_time_t     %10jd\n", ino->di_mtime);
792	fprintf(dbg_log, "ctime      ufs_time_t     %10jd\n", ino->di_ctime);
793	fprintf(dbg_log, "birthtime  ufs_time_t     %10jd\n", ino->di_birthtime);
794	fprintf(dbg_log, "mtimensec  int32_t        0x%08x\n", ino->di_mtimensec);
795	fprintf(dbg_log, "atimensec  int32_t        0x%08x\n", ino->di_atimensec);
796	fprintf(dbg_log, "ctimensec  int32_t        0x%08x\n", ino->di_ctimensec);
797	fprintf(dbg_log, "birthnsec  int32_t        0x%08x\n", ino->di_birthnsec);
798	fprintf(dbg_log, "gen        int32_t        0x%08x\n", ino->di_gen);
799	fprintf(dbg_log, "kernflags  u_int32_t      0x%08x\n", ino->di_kernflags);
800	fprintf(dbg_log, "flags      u_int32_t      0x%08x\n", ino->di_flags);
801	fprintf(dbg_log, "extsize    int32_t        0x%08x\n", ino->di_extsize);
802
803	/* XXX: What do we do with di_extb[NXADDR]? */
804
805	remaining_blocks=howmany(ino->di_size, sb->fs_bsize); /* XXX ts - +1? */
806	for(ictr=0; ictr < MIN(NDADDR, remaining_blocks); ictr++) {
807		fprintf(dbg_log, "db         ufs2_daddr_t[%x] 0x%16jx\n", ictr,
808		    ino->di_db[ictr]);
809	}
810	remaining_blocks-=NDADDR;
811	if(remaining_blocks>0) {
812		fprintf(dbg_log, "ib         ufs2_daddr_t[0] 0x%16jx\n",
813		    ino->di_ib[0]);
814	}
815	remaining_blocks-=howmany(sb->fs_bsize, sizeof(ufs2_daddr_t));
816	if(remaining_blocks>0) {
817		fprintf(dbg_log, "ib         ufs2_daddr_t[1] 0x%16jx\n",
818		    ino->di_ib[1]);
819	}
820#define SQUARE(a) ((a)*(a))
821	remaining_blocks-=SQUARE(howmany(sb->fs_bsize, sizeof(ufs2_daddr_t)));
822#undef SQUARE
823	if(remaining_blocks>0) {
824		fprintf(dbg_log, "ib         ufs2_daddr_t[2] 0x%16jx\n",
825		    ino->di_ib[2]);
826	}
827
828	indent--;
829	fprintf(dbg_log, "===== END UFS2 INODE DUMP =====\n");
830
831	return;
832}
833
834/* ***************************************************** dbg_dump_iblk ***** */
835/*
836 * Dump an indirect block. The iteration to dump a full file has to be
837 * written around.
838 */
839void
840dbg_dump_iblk(struct fs *sb, const char *comment, char *block, size_t length)
841{
842	unsigned int *mem, i, j, size;
843
844	if(!dbg_log) {
845		return;
846	}
847
848	fprintf(dbg_log, "===== START INDIRECT BLOCK DUMP =====\n");
849	fprintf(dbg_log, "# %d@%lx: %s\n", indent, (unsigned long)block,
850	    comment);
851	indent++;
852
853	if (sb->fs_magic == FS_UFS1_MAGIC)
854		size = sizeof(ufs1_daddr_t);
855	else
856		size = sizeof(ufs2_daddr_t);
857
858	mem=(unsigned int *)block;
859	for (i=0; (size_t)i<MIN(howmany(sb->fs_bsize, size),
860	    length); i+=8) {
861		fprintf(dbg_log, "%04x: ", i);
862		for (j=0; j<8; j++) {
863			if((size_t)(i+j)<length) {
864				fprintf(dbg_log, "%08X ", *mem++);
865			}
866		}
867		fprintf(dbg_log, "\n");
868	}
869
870	indent--;
871	fprintf(dbg_log, "===== END INDIRECT BLOCK DUMP =====\n");
872
873	return;
874}
875
876#endif /* FS_DEBUG */
877
878