[unix-history] / usr / src / sbin / dumpfs / dumpfs.c

/*
* Copyright (c) 1983, 1992, 1993
*      The Regents of the University of California.  All rights reserved.
*
* %sccs.include.redist.c%
*/

#ifndef lint
static char copyright[] =
"@(#) Copyright (c) 1983, 1992, 1993\n\
       The Regents of the University of California.  All rights reserved.\n";
#endif /* not lint */

#ifndef lint
static char sccsid[] = "@(#)dumpfs.c    8.2 (Berkeley) %G%";
#endif /* not lint */

#include <sys/param.h>
#include <sys/time.h>

#include <ufs/ufs/dinode.h>
#include <ufs/ffs/fs.h>

#include <unistd.h>
#include <fcntl.h>
#include <errno.h>
#include <fstab.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>

union {
       struct fs fs;
       char pad[MAXBSIZE];
} fsun;
#define afs     fsun.fs

union {
       struct cg cg;
       char pad[MAXBSIZE];
} cgun;
#define acg     cgun.cg

long    dev_bsize = 1;

int     dumpfs __P((char *));
int     dumpcg __P((char *, int, int));
void    pbits __P((void *, int));
void    usage __P((void));

int
main(argc, argv)
       int argc;
       char *argv[];
{
       register struct fstab *fs;
       int ch, eval;

       while ((ch = getopt(argc, argv, "")) != EOF)
               switch(ch) {
               case '?':
               default:
                       usage();
               }
       argc -= optind;
       argv += optind;

       if (argc < 1)
               usage();

       for (eval = 0; *argv; ++argv)
               if ((fs = getfsfile(*argv)) == NULL)
                       eval |= dumpfs(*argv);
               else
                       eval |= dumpfs(fs->fs_spec);
       exit(eval);
}

int
dumpfs(name)
       char *name;
{
       int fd, c, i, j, k, size;

       if ((fd = open(name, O_RDONLY, 0)) < 0)
               goto err;
       if (lseek(fd, (off_t)SBOFF, SEEK_SET) == (off_t)-1)
               goto err;
       if (read(fd, &afs, SBSIZE) != SBSIZE)
               goto err;

       if (afs.fs_postblformat == FS_42POSTBLFMT)
               afs.fs_nrpos = 8;
       dev_bsize = afs.fs_fsize / fsbtodb(&afs, 1);
       printf("magic\t%x\ttime\t%s", afs.fs_magic,
           ctime(&afs.fs_time));
       printf("cylgrp\t%s\tinodes\t%s\n",
           afs.fs_postblformat == FS_42POSTBLFMT ? "static" : "dynamic",
           afs.fs_inodefmt < FS_44INODEFMT ? "4.2/4.3BSD" : "4.4BSD");
       printf("nbfree\t%d\tndir\t%d\tnifree\t%d\tnffree\t%d\n",
           afs.fs_cstotal.cs_nbfree, afs.fs_cstotal.cs_ndir,
           afs.fs_cstotal.cs_nifree, afs.fs_cstotal.cs_nffree);
       printf("ncg\t%d\tncyl\t%d\tsize\t%d\tblocks\t%d\n",
           afs.fs_ncg, afs.fs_ncyl, afs.fs_size, afs.fs_dsize);
       printf("bsize\t%d\tshift\t%d\tmask\t0x%08x\n",
           afs.fs_bsize, afs.fs_bshift, afs.fs_bmask);
       printf("fsize\t%d\tshift\t%d\tmask\t0x%08x\n",
           afs.fs_fsize, afs.fs_fshift, afs.fs_fmask);
       printf("frag\t%d\tshift\t%d\tfsbtodb\t%d\n",
           afs.fs_frag, afs.fs_fragshift, afs.fs_fsbtodb);
       printf("cpg\t%d\tbpg\t%d\tfpg\t%d\tipg\t%d\n",
           afs.fs_cpg, afs.fs_fpg / afs.fs_frag, afs.fs_fpg, afs.fs_ipg);
       printf("minfree\t%d%%\toptim\t%s\tmaxcontig %d\tmaxbpg\t%d\n",
           afs.fs_minfree, afs.fs_optim == FS_OPTSPACE ? "space" : "time",
           afs.fs_maxcontig, afs.fs_maxbpg);
       printf("rotdelay %dms\theadswitch %dus\ttrackseek %dus\trps\t%d\n",
           afs.fs_rotdelay, afs.fs_headswitch, afs.fs_trkseek, afs.fs_rps);
       printf("ntrak\t%d\tnsect\t%d\tnpsect\t%d\tspc\t%d\n",
           afs.fs_ntrak, afs.fs_nsect, afs.fs_npsect, afs.fs_spc);
       printf("symlinklen %d\ttrackskew %d\tinterleave %d\tcontigsumsize %d\n",
           afs.fs_maxsymlinklen, afs.fs_trackskew, afs.fs_interleave,
           afs.fs_contigsumsize);
       printf("nindir\t%d\tinopb\t%d\tnspf\t%d\n",
           afs.fs_nindir, afs.fs_inopb, afs.fs_nspf);
       printf("sblkno\t%d\tcblkno\t%d\tiblkno\t%d\tdblkno\t%d\n",
           afs.fs_sblkno, afs.fs_cblkno, afs.fs_iblkno, afs.fs_dblkno);
       printf("sbsize\t%d\tcgsize\t%d\tcgoffset %d\tcgmask\t0x%08x\n",
           afs.fs_sbsize, afs.fs_cgsize, afs.fs_cgoffset, afs.fs_cgmask);
       printf("csaddr\t%d\tcssize\t%d\tshift\t%d\tmask\t0x%08x\n",
           afs.fs_csaddr, afs.fs_cssize, afs.fs_csshift, afs.fs_csmask);
       printf("cgrotor\t%d\tfmod\t%d\tronly\t%d\n",
           afs.fs_cgrotor, afs.fs_fmod, afs.fs_ronly);
       if (afs.fs_cpc != 0)
               printf("blocks available in each of %d rotational positions",
                    afs.fs_nrpos);
       else
               printf("insufficient space to maintain rotational tables\n");
       for (c = 0; c < afs.fs_cpc; c++) {
               printf("\ncylinder number %d:", c);
               for (i = 0; i < afs.fs_nrpos; i++) {
                       if (fs_postbl(&afs, c)[i] == -1)
                               continue;
                       printf("\n   position %d:\t", i);
                       for (j = fs_postbl(&afs, c)[i], k = 1; ;
                            j += fs_rotbl(&afs)[j], k++) {
                               printf("%5d", j);
                               if (k % 12 == 0)
                                       printf("\n\t\t");
                               if (fs_rotbl(&afs)[j] == 0)
                                       break;
                       }
               }
       }
       printf("\ncs[].cs_(nbfree,ndir,nifree,nffree):\n\t");
       for (i = 0, j = 0; i < afs.fs_cssize; i += afs.fs_bsize, j++) {
               size = afs.fs_cssize - i < afs.fs_bsize ?
                   afs.fs_cssize - i : afs.fs_bsize;
               afs.fs_csp[j] = calloc(1, size);
               if (lseek(fd,
                   (off_t)(fsbtodb(&afs, (afs.fs_csaddr + j * afs.fs_frag)) *
                   dev_bsize), SEEK_SET) == (off_t)-1)
                       goto err;
               if (read(fd, afs.fs_csp[j], size) != size)
                       goto err;
       }
       for (i = 0; i < afs.fs_ncg; i++) {
               struct csum *cs = &afs.fs_cs(&afs, i);
               if (i && i % 4 == 0)
                       printf("\n\t");
               printf("(%d,%d,%d,%d) ",
                   cs->cs_nbfree, cs->cs_ndir, cs->cs_nifree, cs->cs_nffree);
       }
       printf("\n");
       if (afs.fs_ncyl % afs.fs_cpg) {
               printf("cylinders in last group %d\n",
                   i = afs.fs_ncyl % afs.fs_cpg);
               printf("blocks in last group %d\n",
                   i * afs.fs_spc / NSPB(&afs));
       }
       printf("\n");
       for (i = 0; i < afs.fs_ncg; i++)
               if (dumpcg(name, fd, i))
                       goto err;
       (void)close(fd);
       return (0);

err:    if (fd != -1)
               (void)close(fd);
       (void)fprintf(stderr, "dumpfs: %s: %s\n", name, strerror(errno));
       return (1);
};

int
dumpcg(name, fd, c)
       char *name;
       int fd, c;
{
       off_t cur;
       int i, j;

       printf("\ncg %d:\n", c);
       if ((cur = lseek(fd, (off_t)(fsbtodb(&afs, cgtod(&afs, c)) * dev_bsize),
           SEEK_SET)) == (off_t)-1)
               return (1);
       if (read(fd, &acg, afs.fs_bsize) != afs.fs_bsize) {
               (void)fprintf(stderr, "dumpfs: %s: error reading cg\n", name);
               return (1);
       }
       printf("magic\t%x\ttell\t%qx\ttime\t%s",
           afs.fs_postblformat == FS_42POSTBLFMT ?
           ((struct ocg *)&acg)->cg_magic : acg.cg_magic,
           cur, ctime(&acg.cg_time));
       printf("cgx\t%d\tncyl\t%d\tniblk\t%d\tndblk\t%d\n",
           acg.cg_cgx, acg.cg_ncyl, acg.cg_niblk, acg.cg_ndblk);
       printf("nbfree\t%d\tndir\t%d\tnifree\t%d\tnffree\t%d\n",
           acg.cg_cs.cs_nbfree, acg.cg_cs.cs_ndir,
           acg.cg_cs.cs_nifree, acg.cg_cs.cs_nffree);
       printf("rotor\t%d\tirotor\t%d\tfrotor\t%d\nfrsum",
           acg.cg_rotor, acg.cg_irotor, acg.cg_frotor);
       for (i = 1, j = 0; i < afs.fs_frag; i++) {
               printf("\t%d", acg.cg_frsum[i]);
               j += i * acg.cg_frsum[i];
       }
       printf("\nsum of frsum: %d", j);
       if (afs.fs_contigsumsize > 0) {
               for (i = 1; i < afs.fs_contigsumsize; i++) {
                       if ((i - 1) % 8 == 0)
                               printf("\nclusters %d-%d:", i,
                                   afs.fs_contigsumsize - 1 < i + 7 ?
                                   afs.fs_contigsumsize - 1 : i + 7);
                       printf("\t%d", cg_clustersum(&acg)[i]);
               }
               printf("\nclusters size %d and over: %d\n",
                   afs.fs_contigsumsize,
                   cg_clustersum(&acg)[afs.fs_contigsumsize]);
               printf("clusters free:\t");
               pbits(cg_clustersfree(&acg), acg.cg_nclusterblks);
       } else
               printf("\n");
       printf("iused:\t");
       pbits(cg_inosused(&acg), afs.fs_ipg);
       printf("free:\t");
       pbits(cg_blksfree(&acg), afs.fs_fpg);
       printf("b:\n");
       for (i = 0; i < afs.fs_cpg; i++) {
               if (cg_blktot(&acg)[i] == 0)
                       continue;
               printf("   c%d:\t(%d)\t", i, cg_blktot(&acg)[i]);
               for (j = 0; j < afs.fs_nrpos; j++) {
                       if (afs.fs_cpc > 0 &&
                           fs_postbl(&afs, i % afs.fs_cpc)[j] == -1)
                               continue;
                       printf(" %d", cg_blks(&afs, &acg, i)[j]);
               }
               printf("\n");
       }
       return (0);
};

void
pbits(vp, max)
       register void *vp;
       int max;
{
       register int i;
       register char *p;
       int count, j;

       for (count = i = 0, p = vp; i < max; i++)
               if (isset(p, i)) {
                       if (count)
                               printf(",%s", count % 6 ? " " : "\n\t");
                       count++;
                       printf("%d", i);
                       j = i;
                       while ((i+1)<max && isset(p, i+1))
                               i++;
                       if (i != j)
                               printf("-%d", i);
               }
       printf("\n");
}

void
usage()
{
       (void)fprintf(stderr, "usage: dumpfs filesys | device\n");
       exit(1);
}