xref: /csrg-svn/sbin/newlfs/lfs.c (revision 55480)
151149Sbostic /*-
251149Sbostic  * Copyright (c) 1991 The Regents of the University of California.
351149Sbostic  * All rights reserved.
451149Sbostic  *
551149Sbostic  * %sccs.include.redist.c%
651149Sbostic  */
751149Sbostic 
851149Sbostic #ifndef lint
9*55480Sbostic static char sccsid[] = "@(#)lfs.c	5.15 (Berkeley) 07/21/92";
1051149Sbostic #endif /* not lint */
1151149Sbostic 
1251149Sbostic #include <sys/param.h>
1351864Sbostic #include <sys/uio.h>
1451149Sbostic #include <sys/disklabel.h>
1551864Sbostic #include <sys/time.h>
1651864Sbostic #include <sys/resource.h>
1751864Sbostic #include <sys/proc.h>
1851864Sbostic #include <sys/vnode.h>
1952205Sbostic #include <sys/mount.h>
2051866Sbostic 
2151866Sbostic #include <ufs/ufs/dir.h>
2251866Sbostic #include <ufs/ufs/quota.h>
2351866Sbostic #include <ufs/ufs/dinode.h>
2451866Sbostic #include <ufs/ufs/ufsmount.h>
2551866Sbostic #include <ufs/lfs/lfs.h>
2651866Sbostic 
2751149Sbostic #include <unistd.h>
2851149Sbostic #include <errno.h>
2951149Sbostic #include <stdlib.h>
3051149Sbostic #include <string.h>
3151149Sbostic #include "config.h"
3251149Sbostic #include "extern.h"
3351149Sbostic 
3455389Sbostic /*
3555389Sbostic  * This table is indexed by the log base 2 of the block size.
3655389Sbostic  * It returns the maximum file size allowed in a file system
3755389Sbostic  * with the specified block size.  For block sizes smaller than
3855389Sbostic  * 8K, the size is limited by tha maximum number of blocks that
3955389Sbostic  * can be reached by triply indirect blocks:
4055389Sbostic  *	NDADDR + INOPB(bsize) + INOPB(bsize)^2 + INOPB(bsize)^3
4155389Sbostic  * For block size of 8K or larger, the file size is limited by the
4255389Sbostic  * number of blocks that can be represented in the file system.  Since
4355389Sbostic  * we use negative block numbers to represent indirect blocks, we can
4455389Sbostic  * have a maximum of 2^31 blocks.
4555389Sbostic  */
4655389Sbostic 
4755389Sbostic u_quad_t maxtable[] = {
4855389Sbostic 	/*    1 */ -1,
4955389Sbostic 	/*    2 */ -1,
5055389Sbostic 	/*    4 */ -1,
5155389Sbostic 	/*    8 */ -1,
5255389Sbostic 	/*   16 */ -1,
5355389Sbostic 	/*   32 */ -1,
5455389Sbostic 	/*   64 */ -1,
5555389Sbostic 	/*  128 */ -1,
5655389Sbostic 	/*  256 */ -1,
5755389Sbostic 	/*  512 */ NDADDR + 128 + 128 * 128 + 128 * 128 * 128,
5855389Sbostic 	/* 1024 */ NDADDR + 256 + 256 * 256 + 256 * 256 * 256,
5955389Sbostic 	/* 2048 */ NDADDR + 512 + 512 * 512 + 512 * 512 * 512,
6055389Sbostic 	/* 4096 */ NDADDR + 1024 + 1024 * 1024 + 1024 * 1024 * 1024,
6155389Sbostic 	/* 8192 */ 2 ^ 31,
6255389Sbostic 	/* 16 K */ 2 ^ 31,
6355389Sbostic 	/* 32 K */ 2 ^ 31
6455389Sbostic };
6555389Sbostic 
6651866Sbostic static struct lfs lfs_default =  {
6751149Sbostic 	/* lfs_magic */		LFS_MAGIC,
6851149Sbostic 	/* lfs_version */	LFS_VERSION,
6951149Sbostic 	/* lfs_size */		0,
7051866Sbostic 	/* lfs_ssize */		DFL_LFSSEG/DFL_LFSBLOCK,
7151149Sbostic 	/* lfs_dsize */		0,
7251149Sbostic 	/* lfs_bsize */		DFL_LFSBLOCK,
7351864Sbostic 	/* lfs_fsize */		DFL_LFSBLOCK,
7451864Sbostic 	/* lfs_frag */		1,
7551149Sbostic 	/* lfs_free */		LFS_FIRST_INUM,
7651864Sbostic 	/* lfs_bfree */		0,
7751864Sbostic 	/* lfs_nfiles */	0,
7851149Sbostic 	/* lfs_idaddr */	0,
7951149Sbostic 	/* lfs_ifile */		LFS_IFILE_INUM,
8051149Sbostic 	/* lfs_lastseg */	0,
8151864Sbostic 	/* lfs_nextseg */	0,
8251866Sbostic 	/* lfs_curseg */	0,
8351866Sbostic 	/* lfs_offset */	0,
8454263Sbostic 	/* lfs_lastpseg */	0,
8551149Sbostic 	/* lfs_tstamp */	0,
8651149Sbostic 	/* lfs_minfree */	MINFREE,
8755389Sbostic 	/* lfs_maxfilesize */	0,
8851866Sbostic 	/* lfs_dbpseg */	DFL_LFSSEG/DEV_BSIZE,
8951149Sbostic 	/* lfs_inopb */		DFL_LFSBLOCK/sizeof(struct dinode),
9051149Sbostic 	/* lfs_ifpb */		DFL_LFSBLOCK/sizeof(IFILE),
9151866Sbostic 	/* lfs_sepb */		DFL_LFSBLOCK/sizeof(SEGUSE),
9251149Sbostic 	/* lfs_nindir */	DFL_LFSBLOCK/sizeof(daddr_t),
9351149Sbostic 	/* lfs_nseg */		0,
9451149Sbostic 	/* lfs_nspf */		0,
9551866Sbostic 	/* lfs_cleansz */	0,
9651149Sbostic 	/* lfs_segtabsz */	0,
9751149Sbostic 	/* lfs_segmask */	DFL_LFSSEG_MASK,
9851149Sbostic 	/* lfs_segshift */	DFL_LFSSEG_SHIFT,
9951149Sbostic 	/* lfs_bmask */		DFL_LFSBLOCK_MASK,
10051149Sbostic 	/* lfs_bshift */	DFL_LFSBLOCK_SHIFT,
10151149Sbostic 	/* lfs_ffmask */	0,
10251149Sbostic 	/* lfs_ffshift */	0,
10351149Sbostic 	/* lfs_fbmask */	0,
10451149Sbostic 	/* lfs_fbshift */	0,
10551149Sbostic 	/* lfs_fsbtodb */	0,
10651149Sbostic 	/* lfs_sboffs */	{ 0 },
10751864Sbostic 	/* lfs_ivnode */	NULL,
10854710Sbostic 	/* lfs_seglock */	0,
10951864Sbostic 	/* lfs_iocount */	0,
11054263Sbostic 	/* lfs_writer */	0,
11154263Sbostic 	/* lfs_dirops */	0,
11254263Sbostic 	/* lfs_doifile */	0,
11351149Sbostic 	/* lfs_fmod */		0,
11451149Sbostic 	/* lfs_clean */		0,
11551149Sbostic 	/* lfs_ronly */		0,
11651149Sbostic 	/* lfs_flags */		0,
11751149Sbostic 	/* lfs_fsmnt */		{ 0 },
11851864Sbostic 	/* lfs_pad */		{ 0 },
11951149Sbostic 	/* lfs_cksum */		0
12051149Sbostic };
12151149Sbostic 
12251864Sbostic 
12351864Sbostic struct direct lfs_root_dir[] = {
12454715Sbostic 	{ ROOTINO, sizeof(struct direct), DT_DIR, 1, "."},
12554715Sbostic 	{ ROOTINO, sizeof(struct direct), DT_DIR, 2, ".."},
12654715Sbostic 	{ LFS_IFILE_INUM, sizeof(struct direct), DT_REG, 5, "ifile"},
12754715Sbostic 	{ LOSTFOUNDINO, sizeof(struct direct), DT_DIR, 10, "lost+found"},
12851864Sbostic };
12951864Sbostic 
13051864Sbostic struct direct lfs_lf_dir[] = {
13154715Sbostic         { LOSTFOUNDINO, sizeof(struct direct), DT_DIR, 1, "." },
13254715Sbostic         { ROOTINO, sizeof(struct direct), DT_DIR, 2, ".." },
13351864Sbostic };
13451864Sbostic 
13551864Sbostic static daddr_t make_dinode
13651866Sbostic 	__P((ino_t, struct dinode *, int, daddr_t, struct lfs *));
13751864Sbostic static void make_dir __P(( void *, struct direct *, int));
13851149Sbostic static void put __P((int, off_t, void *, size_t));
13951149Sbostic 
14051149Sbostic int
14151149Sbostic make_lfs(fd, lp, partp, minfree, block_size, seg_size)
14251149Sbostic 	int fd;
14351149Sbostic 	struct disklabel *lp;
14451149Sbostic 	struct partition *partp;
14551149Sbostic 	int minfree;
14651149Sbostic 	int block_size;
14751149Sbostic 	int seg_size;
14851149Sbostic {
14951149Sbostic 	struct dinode *dip;	/* Pointer to a disk inode */
15051864Sbostic 	struct dinode *dpagep;	/* Pointer to page of disk inodes */
15151866Sbostic 	CLEANERINFO *cleaninfo;	/* Segment cleaner information table */
15251149Sbostic 	FINFO file_info;	/* File info structure in summary blocks */
15351149Sbostic 	IFILE *ifile;		/* Pointer to array of ifile structures */
15451149Sbostic 	IFILE *ip;		/* Pointer to array of ifile structures */
15551866Sbostic 	struct lfs *lfsp;	/* Superblock */
15651864Sbostic 	SEGUSE *segp;		/* Segment usage table */
15751864Sbostic 	SEGUSE *segtable;	/* Segment usage table */
15851149Sbostic 	SEGSUM summary;		/* Segment summary structure */
15951866Sbostic 	SEGSUM *sp;		/* Segment summary pointer */
16051149Sbostic 	daddr_t	last_sb_addr;	/* Address of superblocks */
16151864Sbostic 	daddr_t last_addr;	/* Previous segment address */
16251149Sbostic 	daddr_t	sb_addr;	/* Address of superblocks */
16351864Sbostic 	daddr_t	seg_addr;	/* Address of current segment */
16451866Sbostic 	void *ipagep;		/* Pointer to the page we use to write stuff */
16551149Sbostic 	void *sump;		/* Used to copy stuff into segment buffer */
16651149Sbostic 	u_long *block_array;	/* Array of logical block nos to put in sum */
16751866Sbostic 	u_long blocks_used;	/* Number of blocks in first segment */
16851866Sbostic 	u_long *dp;		/* Used to computed checksum on data */
16951866Sbostic 	u_long *datasump;	/* Used to computed checksum on data */
17051149Sbostic 	int block_array_size;	/* How many entries in block array */
17151149Sbostic 	int bsize;		/* Block size */
17251149Sbostic 	int db_per_fb;		/* Disk blocks per file block */
17351864Sbostic 	int i, j;
17451866Sbostic 	int off;		/* Offset at which to write */
17551149Sbostic 	int sb_interval;	/* number of segs between super blocks */
17651149Sbostic 	int seg_seek;		/* Seek offset for a segment */
17751149Sbostic 	int ssize;		/* Segment size */
17851149Sbostic 	int sum_size;		/* Size of the summary block */
17951149Sbostic 
18051149Sbostic 	lfsp = &lfs_default;
18151149Sbostic 
18251149Sbostic 	if (!(bsize = block_size))
18351149Sbostic 		bsize = DFL_LFSBLOCK;
18451149Sbostic 	if (!(ssize = seg_size))
18551149Sbostic 		ssize = DFL_LFSSEG;
18651149Sbostic 
18751149Sbostic 	/* Modify parts of superblock overridden by command line arguments */
18851149Sbostic 	if (bsize != DFL_LFSBLOCK) {
18951149Sbostic 		lfsp->lfs_bshift = log2(bsize);
19051149Sbostic 		if (1 << lfsp->lfs_bshift != bsize)
19151149Sbostic 			fatal("%d: block size not a power of 2", bsize);
19251149Sbostic 		lfsp->lfs_bsize = bsize;
19351864Sbostic 		lfsp->lfs_fsize = bsize;
19451149Sbostic 		lfsp->lfs_bmask = bsize - 1;
19551149Sbostic 		lfsp->lfs_inopb = bsize / sizeof(struct dinode);
19651149Sbostic /* MIS -- should I round to power of 2 */
19751149Sbostic 		lfsp->lfs_ifpb = bsize / sizeof(IFILE);
19851866Sbostic 		lfsp->lfs_sepb = bsize / sizeof(SEGUSE);
19951149Sbostic 		lfsp->lfs_nindir = bsize / sizeof(daddr_t);
20051149Sbostic 	}
20151149Sbostic 
20251149Sbostic 	if (ssize != DFL_LFSSEG) {
20351149Sbostic 		lfsp->lfs_segshift = log2(ssize);
20451149Sbostic 		if (1 << lfsp->lfs_segshift != ssize)
20551149Sbostic 			fatal("%d: segment size not power of 2", ssize);
20651149Sbostic 		lfsp->lfs_ssize = ssize;
20751149Sbostic 		lfsp->lfs_segmask = ssize - 1;
20851149Sbostic 	}
20951149Sbostic 	lfsp->lfs_ssize = ssize >> lfsp->lfs_bshift;
21051149Sbostic 
21151149Sbostic 	if (minfree)
21251149Sbostic 		lfsp->lfs_minfree = minfree;
21351149Sbostic 
21451149Sbostic 	/*
21551149Sbostic 	 * Fill in parts of superblock that can be computed from file system
21651149Sbostic 	 * size, disk geometry and current time.
21751149Sbostic 	 */
21851149Sbostic 	db_per_fb = bsize/lp->d_secsize;
21951149Sbostic 	lfsp->lfs_fsbtodb = log2(db_per_fb);
22051149Sbostic 	lfsp->lfs_size = partp->p_size >> lfsp->lfs_fsbtodb;
22151149Sbostic 	lfsp->lfs_dsize = lfsp->lfs_size - (LFS_LABELPAD >> lfsp->lfs_bshift);
22251149Sbostic 	lfsp->lfs_nseg = lfsp->lfs_dsize / lfsp->lfs_ssize;
22355389Sbostic 	lfsp->lfs_maxfilesize = maxtable[lfsp->lfs_bshift] << lfsp->lfs_bshift;
22451864Sbostic 
22551864Sbostic 	/*
22651864Sbostic 	 * The number of free blocks is set from the total data size (lfs_dsize)
22751864Sbostic 	 * minus one block for each segment (for the segment summary).  Then
22851866Sbostic 	 * we'll subtract off the room for the superblocks, ifile entries and
22951866Sbostic 	 * segment usage table.
23051864Sbostic 	 */
23151864Sbostic 	lfsp->lfs_bfree = lfsp->lfs_dsize - lfsp->lfs_nseg;
23251149Sbostic 	lfsp->lfs_segtabsz = SEGTABSIZE_SU(lfsp);
23351866Sbostic 	lfsp->lfs_cleansz = CLEANSIZE_SU(lfsp);
23451149Sbostic 	if ((lfsp->lfs_tstamp = time(NULL)) == -1)
23551149Sbostic 		fatal("time: %s", strerror(errno));
23651149Sbostic 	if ((sb_interval = lfsp->lfs_nseg / LFS_MAXNUMSB) < LFS_MIN_SBINTERVAL)
23751149Sbostic 		sb_interval = LFS_MIN_SBINTERVAL;
23851149Sbostic 
23951149Sbostic 	/*
24051149Sbostic 	 * Now, lay out the file system.  We need to figure out where
24151149Sbostic 	 * the superblocks go, initialize the checkpoint information
24251149Sbostic 	 * for the first two superblocks, initialize the segment usage
24351149Sbostic 	 * information, put the segusage information in the ifile, create
24451149Sbostic 	 * the first block of IFILE structures, and link all the IFILE
24551149Sbostic 	 * structures into a free list.
24651149Sbostic 	 */
24751149Sbostic 
24851149Sbostic 	/* Figure out where the superblocks are going to live */
24951149Sbostic 	lfsp->lfs_sboffs[0] = LFS_LABELPAD/lp->d_secsize;
25051149Sbostic 	for (i = 1; i < LFS_MAXNUMSB; i++) {
25151149Sbostic 		sb_addr = ((i * sb_interval) <<
25251149Sbostic 		    (lfsp->lfs_segshift - lfsp->lfs_bshift + lfsp->lfs_fsbtodb))
25351149Sbostic 		    + lfsp->lfs_sboffs[0];
25451149Sbostic 		if (sb_addr > partp->p_size)
25551149Sbostic 			break;
25651149Sbostic 		lfsp->lfs_sboffs[i] = sb_addr;
25751149Sbostic 	}
25851149Sbostic 	last_sb_addr = lfsp->lfs_sboffs[i - 1];
25951149Sbostic 	lfsp->lfs_lastseg = lfsp->lfs_sboffs[0];
26051864Sbostic 	lfsp->lfs_nextseg =
26151864Sbostic 	    lfsp->lfs_sboffs[1] ? lfsp->lfs_sboffs[1] : lfsp->lfs_sboffs[0];
26251866Sbostic 	lfsp->lfs_curseg = lfsp->lfs_lastseg;
26351149Sbostic 
26451149Sbostic 	/*
26551149Sbostic 	 * Initialize the segment usage table.  The first segment will
26651866Sbostic 	 * contain the superblock, the cleanerinfo (cleansz), the segusage
26751866Sbostic 	 * table * (segtabsz), 1 block's worth of IFILE entries, the root
26851866Sbostic 	 * directory, the lost+found directory and one block's worth of
26951866Sbostic 	 * inodes (containing the ifile, root, and l+f inodes).
27051149Sbostic 	 */
27151866Sbostic 	if (!(cleaninfo = malloc(lfsp->lfs_cleansz << lfsp->lfs_bshift)))
27251866Sbostic 		fatal("%s", strerror(errno));
27351930Sbostic 	cleaninfo->clean = lfsp->lfs_nseg - 1;
27451930Sbostic 	cleaninfo->dirty = 1;
27551930Sbostic 
27651149Sbostic 	if (!(segtable = malloc(lfsp->lfs_segtabsz << lfsp->lfs_bshift)))
27751149Sbostic 		fatal("%s", strerror(errno));
27851149Sbostic 	segp = segtable;
27951866Sbostic 	blocks_used = lfsp->lfs_segtabsz + lfsp->lfs_cleansz + 4;
28052088Sbostic 	segp->su_nbytes = blocks_used << lfsp->lfs_bshift;
28151149Sbostic 	segp->su_lastmod = lfsp->lfs_tstamp;
28251930Sbostic 	segp->su_flags = SEGUSE_SUPERBLOCK | SEGUSE_DIRTY;
28351930Sbostic 	lfsp->lfs_bfree -= lfsp->lfs_cleansz + lfsp->lfs_segtabsz + 4;
28451149Sbostic 
28551866Sbostic 	/*
28651866Sbostic 	 * Now figure out the address of the ifile inode. The inode block
28751866Sbostic 	 * appears immediately after the segment summary.
28851866Sbostic 	 */
28951866Sbostic 	lfsp->lfs_idaddr = (LFS_LABELPAD + LFS_SBPAD + LFS_SUMMARY_SIZE) /
29051866Sbostic 	    lp->d_secsize;
29151149Sbostic 
29251149Sbostic 	for (segp = segtable + 1, i = 1; i < lfsp->lfs_nseg; i++, segp++) {
29351864Sbostic 		if ((i % sb_interval) == 0) {
29451930Sbostic 			segp->su_flags = SEGUSE_SUPERBLOCK;
29551864Sbostic 			lfsp->lfs_bfree -= (LFS_SBPAD >> lfsp->lfs_bshift);
29652088Sbostic 		} else
29751930Sbostic 			segp->su_flags = 0;
29851149Sbostic 		segp->su_lastmod = 0;
29952088Sbostic 		segp->su_nbytes = 0;
30051149Sbostic 	}
30151149Sbostic 
30251149Sbostic 	/*
30351149Sbostic 	 * Ready to start writing segments.  The first segment is different
30451149Sbostic 	 * because it contains the segment usage table and the ifile inode
30551864Sbostic 	 * as well as a superblock.  For the rest of the segments, set the
30651864Sbostic 	 * time stamp to be 0 so that the first segment is the most recent.
30751864Sbostic 	 * For each segment that is supposed to contain a copy of the super
30851864Sbostic 	 * block, initialize its first few blocks and its segment summary
30951864Sbostic 	 * to indicate this.
31051149Sbostic 	 */
31151864Sbostic 	lfsp->lfs_nfiles = LFS_FIRST_INUM - 1;
31251149Sbostic 	lfsp->lfs_cksum =
31351866Sbostic 	    cksum(lfsp, sizeof(struct lfs) - sizeof(lfsp->lfs_cksum));
31451149Sbostic 
31551864Sbostic 	/* Now create a block of disk inodes */
31651864Sbostic 	if (!(dpagep = malloc(lfsp->lfs_bsize)))
31751864Sbostic 		fatal("%s", strerror(errno));
31851864Sbostic 	dip = (struct dinode *)dpagep;
31951864Sbostic 	bzero(dip, lfsp->lfs_bsize);
32051864Sbostic 
32151866Sbostic 	/* Create a block of IFILE structures. */
32251866Sbostic 	if (!(ipagep = malloc(lfsp->lfs_bsize)))
32351149Sbostic 		fatal("%s", strerror(errno));
32451866Sbostic 	ifile = (IFILE *)ipagep;
32551864Sbostic 
32651866Sbostic 	/*
32751866Sbostic 	 * Initialize IFILE.  It is the next block following the
32851866Sbostic 	 * block of inodes (whose address has been calculated in
32951866Sbostic 	 * lfsp->lfs_idaddr;
33051866Sbostic 	 */
33151866Sbostic 	sb_addr = lfsp->lfs_idaddr + lfsp->lfs_bsize / lp->d_secsize;
33251866Sbostic 	sb_addr = make_dinode(LFS_IFILE_INUM, dip,
33351866Sbostic 	    lfsp->lfs_cleansz + lfsp->lfs_segtabsz+1, sb_addr, lfsp);
33451864Sbostic 	dip->di_mode = IFREG|IREAD|IWRITE;
33551864Sbostic 	ip = &ifile[LFS_IFILE_INUM];
33651864Sbostic 	ip->if_version = 1;
33751864Sbostic 	ip->if_daddr = lfsp->lfs_idaddr;
33851864Sbostic 
33951864Sbostic 	/* Initialize the ROOT Directory */
34051864Sbostic 	sb_addr = make_dinode(ROOTINO, ++dip, 1, sb_addr, lfsp);
34151864Sbostic 	dip->di_mode = IFDIR|IREAD|IWRITE|IEXEC;
34251864Sbostic 	dip->di_size = DIRBLKSIZ;
34351864Sbostic 	dip->di_nlink = 3;
34451864Sbostic 	ip = &ifile[ROOTINO];
34551864Sbostic 	ip->if_version = 1;
34651864Sbostic 	ip->if_daddr = lfsp->lfs_idaddr;
34751864Sbostic 
34851864Sbostic 	/* Initialize the lost+found Directory */
34951864Sbostic 	sb_addr = make_dinode(LOSTFOUNDINO, ++dip, 1, sb_addr, lfsp);
35051864Sbostic 	dip->di_mode = IFDIR|IREAD|IWRITE|IEXEC;
35151864Sbostic 	dip->di_size = DIRBLKSIZ;
35251864Sbostic 	dip->di_nlink = 2;
35351864Sbostic 	ip = &ifile[LOSTFOUNDINO];
35451864Sbostic 	ip->if_version = 1;
35551864Sbostic 	ip->if_daddr = lfsp->lfs_idaddr;
35651864Sbostic 
35751864Sbostic 	/* Make all the other dinodes invalid */
35851864Sbostic 	for (i = INOPB(lfsp)-3, dip++; i; i--, dip++)
35951864Sbostic 		dip->di_inum = LFS_UNUSED_INUM;
36051864Sbostic 
36151864Sbostic 
36251864Sbostic 	/* Link remaining IFILE entries in free list */
36351864Sbostic 	for (ip = &ifile[LFS_FIRST_INUM], i = LFS_FIRST_INUM;
36451864Sbostic 	    i < lfsp->lfs_ifpb; ++ip) {
36551149Sbostic 		ip->if_version = 1;
36651149Sbostic 		ip->if_daddr = LFS_UNUSED_DADDR;
36751149Sbostic 		ip->if_nextfree = ++i;
36851149Sbostic 	}
36951149Sbostic 	ifile[lfsp->lfs_ifpb - 1].if_nextfree = LFS_UNUSED_INUM;
37051149Sbostic 
37151866Sbostic 	/* Now, write the segment */
37251149Sbostic 
37351866Sbostic 	/* Compute a checksum across all the data you're writing */
37451866Sbostic 	dp = datasump = malloc (blocks_used * sizeof(u_long));
37551866Sbostic 	*dp++ = ((u_long *)dip)[0];		/* inode block */
37651866Sbostic 	for (i = 0; i < lfsp->lfs_cleansz; i++)
37751866Sbostic 		*dp++ = ((u_long *)cleaninfo)[(i << lfsp->lfs_bshift) /
37851866Sbostic 		    sizeof(u_long)];		/* Cleaner info */
37951866Sbostic 	for (i = 0; i < lfsp->lfs_segtabsz; i++)
38051866Sbostic 		*dp++ = ((u_long *)segtable)[(i << lfsp->lfs_bshift) /
38151866Sbostic 		    sizeof(u_long)];		/* Segusage table */
38251866Sbostic 	*dp++ = ((u_long *)ifile)[0];		/* Ifile */
38351866Sbostic 
38451866Sbostic 	/* Still need the root and l+f bytes; get them later */
38551866Sbostic 
38651866Sbostic 	/* Write out the inode block */
38751866Sbostic 	off = LFS_LABELPAD + LFS_SBPAD + LFS_SUMMARY_SIZE;
38851866Sbostic 	put(fd, off, dpagep, lfsp->lfs_bsize);
38951866Sbostic 	free(dpagep);
39051866Sbostic 	off += lfsp->lfs_bsize;
39151866Sbostic 
39251866Sbostic 	/* Write out the ifile */
39351866Sbostic 
39451866Sbostic 	put(fd, off, cleaninfo, lfsp->lfs_cleansz << lfsp->lfs_bshift);
39551866Sbostic 	off += (lfsp->lfs_cleansz << lfsp->lfs_bshift);
39651866Sbostic 	(void)free(cleaninfo);
39751866Sbostic 
39851866Sbostic 	put(fd, off, segtable, lfsp->lfs_segtabsz << lfsp->lfs_bshift);
39951866Sbostic 	off += (lfsp->lfs_segtabsz << lfsp->lfs_bshift);
40051866Sbostic 	(void)free(segtable);
40151866Sbostic 
40251866Sbostic 	put(fd, off, ifile, lfsp->lfs_bsize);
40351866Sbostic 	off += lfsp->lfs_bsize;
40451866Sbostic 
40551866Sbostic 	/*
40651866Sbostic 	 * use ipagep for space for writing out other stuff.  It used to
40751866Sbostic 	 * contain the ifile, but we're done with it.
40851866Sbostic 	 */
40951866Sbostic 
41051864Sbostic 	/* Write out the root and lost and found directories */
41151866Sbostic 	bzero(ipagep, lfsp->lfs_bsize);
41251866Sbostic 	make_dir(ipagep, lfs_root_dir,
41351864Sbostic 	    sizeof(lfs_root_dir) / sizeof(struct direct));
41451866Sbostic 	*dp++ = ((u_long *)ipagep)[0];
41551866Sbostic 	put(fd, off, ipagep, lfsp->lfs_bsize);
41651866Sbostic 	off += lfsp->lfs_bsize;
41751149Sbostic 
41851866Sbostic 	bzero(ipagep, lfsp->lfs_bsize);
41951866Sbostic 	make_dir(ipagep, lfs_lf_dir,
42051864Sbostic 		sizeof(lfs_lf_dir) / sizeof(struct direct));
42151866Sbostic 	*dp++ = ((u_long *)ipagep)[0];
42251866Sbostic 	put(fd, off, ipagep, lfsp->lfs_bsize);
42351149Sbostic 
42451866Sbostic 	/* Write Supberblock */
42551866Sbostic 	lfsp->lfs_offset = (off + lfsp->lfs_bsize) / lp->d_secsize;
42651866Sbostic 	put(fd, LFS_LABELPAD, lfsp, sizeof(struct lfs));
42751149Sbostic 
42851866Sbostic 	/*
42951866Sbostic 	 * Finally, calculate all the fields for the summary structure
43051866Sbostic 	 * and write it.
43151866Sbostic 	 */
43251866Sbostic 
43351864Sbostic 	summary.ss_next = lfsp->lfs_nextseg;
43451149Sbostic 	summary.ss_create = lfsp->lfs_tstamp;
43551866Sbostic 	summary.ss_nfinfo = 3;
43651866Sbostic 	summary.ss_ninos = 3;
43751866Sbostic 	summary.ss_datasum = cksum(datasump, sizeof(u_long) * blocks_used);
43851149Sbostic 
43951864Sbostic 	/*
44051864Sbostic 	 * Make sure that we don't overflow a summary block. We have to
44151866Sbostic 	 * record: FINFO structures for ifile, root, and l+f.  The number
44251866Sbostic 	 * of blocks recorded for the ifile is determined by the size of
44351866Sbostic 	 * the cleaner info and the segments usage table.  There is room
44451866Sbostic 	 * for one block included in sizeof(FINFO) so we don't need to add
44551866Sbostic 	 * any extra space for the ROOT and L+F, and one block of the ifile
44651866Sbostic 	 * is already counted.  Finally, we leave room for 1 inode block
44751866Sbostic 	 * address.
44851864Sbostic 	 */
44953248Sbostic 	sum_size = 3*sizeof(FINFO) + sizeof(SEGSUM) + sizeof(daddr_t) +
45051866Sbostic 	    (lfsp->lfs_cleansz + lfsp->lfs_segtabsz) * sizeof(u_long);
45151149Sbostic #define	SUMERR \
45251149Sbostic "Multiple summary blocks in segment 1 not yet implemented\nsummary is %d bytes."
45351149Sbostic 	if (sum_size > LFS_SUMMARY_SIZE)
45451149Sbostic 		fatal(SUMERR, sum_size);
45551149Sbostic 
45651866Sbostic 		block_array_size = lfsp->lfs_cleansz + lfsp->lfs_segtabsz + 1;
45751149Sbostic 
45851149Sbostic 	if (!(block_array = malloc(block_array_size *sizeof(int))))
45951149Sbostic 		fatal("%s: %s", special, strerror(errno));
46051149Sbostic 
46151149Sbostic 	/* fill in the array */
46251866Sbostic 	for (i = 0; i < block_array_size; i++)
46351149Sbostic 		block_array[i] = i;
46451149Sbostic 
46551149Sbostic 	/* copy into segment */
46651866Sbostic 	sump = ipagep;
46751149Sbostic 	bcopy(&summary, sump, sizeof(SEGSUM));
46851149Sbostic 	sump += sizeof(SEGSUM);
46951149Sbostic 
47051149Sbostic 	/* Now, add the ifile */
47151866Sbostic 	file_info.fi_nblocks = block_array_size;
47251149Sbostic 	file_info.fi_version = 1;
47351149Sbostic 	file_info.fi_ino = LFS_IFILE_INUM;
47451149Sbostic 
47551149Sbostic 	bcopy(&file_info, sump, sizeof(FINFO) - sizeof(u_long));
47651149Sbostic 	sump += sizeof(FINFO) - sizeof(u_long);
47751149Sbostic 	bcopy(block_array, sump, sizeof(u_long) * file_info.fi_nblocks);
47851864Sbostic 	sump += sizeof(u_long) * file_info.fi_nblocks;
47951149Sbostic 
48051864Sbostic 	/* Now, add the root directory */
48151864Sbostic 	file_info.fi_nblocks = 1;
48251864Sbostic 	file_info.fi_version = 1;
48351864Sbostic 	file_info.fi_ino = ROOTINO;
48451864Sbostic 	file_info.fi_blocks[0] = 0;
48551864Sbostic 	bcopy(&file_info, sump, sizeof(FINFO));
48651864Sbostic 	sump += sizeof(FINFO);
48751864Sbostic 
48851864Sbostic 	/* Now, add the lost and found */
48951864Sbostic 	file_info.fi_ino = LOSTFOUNDINO;
49051864Sbostic 	bcopy(&file_info, sump, sizeof(FINFO));
49151864Sbostic 
49251866Sbostic 	((daddr_t *)ipagep)[LFS_SUMMARY_SIZE / sizeof(daddr_t) - 1] =
49351866Sbostic 	    lfsp->lfs_idaddr;
49451866Sbostic 	((SEGSUM *)ipagep)->ss_sumsum = cksum(ipagep+sizeof(summary.ss_sumsum),
49551866Sbostic 	    LFS_SUMMARY_SIZE - sizeof(summary.ss_sumsum));
49651866Sbostic 	put(fd, LFS_LABELPAD + LFS_SBPAD, ipagep, LFS_SUMMARY_SIZE);
49751864Sbostic 
49851866Sbostic 	sp = (SEGSUM *)ipagep;
49951866Sbostic 	sp->ss_create = 0;
50051866Sbostic 	sp->ss_nfinfo = 0;
50151866Sbostic 	sp->ss_ninos = 0;
50251866Sbostic 	sp->ss_datasum = 0;
50351149Sbostic 
504*55480Sbostic 	/* Now write the summary block for the next partial so it's invalid */
505*55480Sbostic 	lfsp->lfs_tstamp = 0;
506*55480Sbostic 	off += lfsp->lfs_bsize;
507*55480Sbostic 	sp->ss_sumsum =
508*55480Sbostic 	    cksum(&sp->ss_datasum, LFS_SUMMARY_SIZE - sizeof(sp->ss_sumsum));
509*55480Sbostic 	put(fd, off, sp, LFS_SUMMARY_SIZE);
510*55480Sbostic 
51151149Sbostic 	/* Now, write rest of segments containing superblocks */
51251864Sbostic 	lfsp->lfs_cksum =
51351866Sbostic 	    cksum(lfsp, sizeof(struct lfs) - sizeof(lfsp->lfs_cksum));
51451864Sbostic 	for (seg_addr = last_addr = lfsp->lfs_sboffs[0], j = 1, i = 1;
51551864Sbostic 	    i < lfsp->lfs_nseg; i++) {
51651149Sbostic 
51751864Sbostic 		seg_addr += lfsp->lfs_ssize << lfsp->lfs_fsbtodb;
51851866Sbostic 		sp->ss_next = last_addr;
51951866Sbostic 		last_addr = seg_addr;
52051866Sbostic 		seg_seek = seg_addr * lp->d_secsize;
52151866Sbostic 
52251864Sbostic 		if (seg_addr == lfsp->lfs_sboffs[j]) {
52351864Sbostic 			if (j < (LFS_MAXNUMSB - 2))
52451864Sbostic 				j++;
52551866Sbostic 			put(fd, seg_seek, lfsp, sizeof(struct lfs));
52651866Sbostic 			seg_seek += LFS_SBPAD;
52751866Sbostic 		}
52851149Sbostic 
52951149Sbostic 		/* Summary */
53051866Sbostic 		sp->ss_sumsum = cksum(&sp->ss_datasum,
53151866Sbostic 		    LFS_SUMMARY_SIZE - sizeof(sp->ss_sumsum));
53251866Sbostic 		put(fd, seg_seek, sp, LFS_SUMMARY_SIZE);
53351149Sbostic 	}
53451866Sbostic 	free(ipagep);
53551864Sbostic 	close(fd);
53651149Sbostic 	return (0);
53751149Sbostic }
53851149Sbostic 
53951149Sbostic static void
54051149Sbostic put(fd, off, p, len)
54151149Sbostic 	int fd;
54251149Sbostic 	off_t off;
54351149Sbostic 	void *p;
54451149Sbostic 	size_t len;
54551149Sbostic {
54651149Sbostic 	int wbytes;
54751149Sbostic 
54851149Sbostic 	if (lseek(fd, off, SEEK_SET) < 0)
54951149Sbostic 		fatal("%s: %s", special, strerror(errno));
55051149Sbostic 	if ((wbytes = write(fd, p, len)) < 0)
55151149Sbostic 		fatal("%s: %s", special, strerror(errno));
55251149Sbostic 	if (wbytes != len)
55351149Sbostic 		fatal("%s: short write (%d, not %d)", special, wbytes, len);
55451149Sbostic }
55551864Sbostic 
55651864Sbostic /*
55751864Sbostic  * Create the root directory for this file system and the lost+found
55851864Sbostic  * directory.
55951864Sbostic  */
56051864Sbostic 
56151864Sbostic 	u_long	d_ino;			/* inode number of entry */
56251864Sbostic 	u_short	d_reclen;		/* length of this record */
56351864Sbostic 	u_short	d_namlen;		/* length of string in d_name */
56451864Sbostic 	char	d_name[MAXNAMLEN + 1];	/* name with length <= MAXNAMLEN */
56555389Sbostic void
56651864Sbostic lfsinit()
56755389Sbostic {}
56851864Sbostic 
56951864Sbostic static daddr_t
57051864Sbostic make_dinode(ino, dip, nblocks, saddr, lfsp)
57151864Sbostic 	ino_t ino;				/* inode we're creating */
57251864Sbostic 	struct dinode *dip;			/* disk inode */
57351864Sbostic 	int nblocks;				/* number of blocks in file */
57451864Sbostic 	daddr_t saddr;				/* starting block address */
57551866Sbostic 	struct lfs *lfsp;			/* superblock */
57651864Sbostic {
57751864Sbostic 	int db_per_fb, i;
57851864Sbostic 
57951864Sbostic 	dip->di_nlink = 1;
58055440Sbostic 	dip->di_blocks = nblocks << lfsp->lfs_fsbtodb;
58151864Sbostic 
582*55480Sbostic 	dip->di_size = (nblocks << lfsp->lfs_bshift);
58354715Sbostic 	dip->di_atime.ts_sec = dip->di_mtime.ts_sec =
58454715Sbostic 	    dip->di_ctime.ts_sec = lfsp->lfs_tstamp;
58554715Sbostic 	dip->di_atime.ts_nsec = dip->di_mtime.ts_nsec =
58654715Sbostic 	    dip->di_ctime.ts_nsec = 0;
58751864Sbostic 	dip->di_inum = ino;
58851864Sbostic 
58951864Sbostic #define	SEGERR \
59051864Sbostic "File requires more than the number of direct blocks; increase block or segment size."
59151864Sbostic 	if (NDADDR < nblocks)
59251864Sbostic 		fatal("%s", SEGERR);
59351864Sbostic 
59451864Sbostic 	/* Assign the block addresses for the ifile */
59551864Sbostic 	db_per_fb = 1 << lfsp->lfs_fsbtodb;
59655440Sbostic 	for (i = 0; i < nblocks; i++, saddr += db_per_fb)
59751864Sbostic 		dip->di_db[i] = saddr;
59851864Sbostic 
59951864Sbostic 	return (saddr);
60051864Sbostic }
60151864Sbostic 
60251864Sbostic 
60351864Sbostic /*
60451864Sbostic  * Construct a set of directory entries in "bufp".  We assume that all the
60551864Sbostic  * entries in protodir fir in the first DIRBLKSIZ.
60651864Sbostic  */
60751864Sbostic static void
60851864Sbostic make_dir(bufp, protodir, entries)
60951864Sbostic 	void *bufp;
61051864Sbostic 	register struct direct *protodir;
61151864Sbostic 	int entries;
61251864Sbostic {
61351864Sbostic 	char *cp;
61451864Sbostic 	int i, spcleft;
61551864Sbostic 
61651864Sbostic 	spcleft = DIRBLKSIZ;
61751864Sbostic 	for (cp = bufp, i = 0; i < entries - 1; i++) {
61854715Sbostic 		protodir[i].d_reclen = DIRSIZ(NEWDIRFMT, &protodir[i]);
61951864Sbostic 		bcopy(&protodir[i], cp, protodir[i].d_reclen);
62051864Sbostic 		cp += protodir[i].d_reclen;
62151864Sbostic 		if ((spcleft -= protodir[i].d_reclen) < 0)
62251864Sbostic 			fatal("%s: %s", special, "directory too big");
62351864Sbostic 	}
62451864Sbostic 	protodir[i].d_reclen = spcleft;
62554715Sbostic 	bcopy(&protodir[i], cp, DIRSIZ(NEWDIRFMT, &protodir[i]));
62651864Sbostic }
627