xref: /netbsd/sbin/newfs/newfs.c (revision c4a72b64)
1 /*	$NetBSD: newfs.c,v 1.61 2002/09/28 20:11:07 dbj Exp $	*/
2 
3 /*
4  * Copyright (c) 1983, 1989, 1993, 1994
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 #include <sys/cdefs.h>
37 #ifndef lint
38 __COPYRIGHT("@(#) Copyright (c) 1983, 1989, 1993, 1994\n\
39 	The Regents of the University of California.  All rights reserved.\n");
40 #endif /* not lint */
41 
42 #ifndef lint
43 #if 0
44 static char sccsid[] = "@(#)newfs.c	8.13 (Berkeley) 5/1/95";
45 #else
46 __RCSID("$NetBSD: newfs.c,v 1.61 2002/09/28 20:11:07 dbj Exp $");
47 #endif
48 #endif /* not lint */
49 
50 /*
51  * newfs: friendly front end to mkfs
52  */
53 #include <sys/param.h>
54 #include <sys/ioctl.h>
55 #include <sys/disklabel.h>
56 #include <sys/file.h>
57 #include <sys/mount.h>
58 #include <sys/sysctl.h>
59 #include <sys/wait.h>
60 
61 #include <ufs/ufs/dir.h>
62 #include <ufs/ufs/dinode.h>
63 #include <ufs/ufs/ufsmount.h>
64 #include <ufs/ffs/fs.h>
65 
66 #include <ctype.h>
67 #include <disktab.h>
68 #include <err.h>
69 #include <errno.h>
70 #include <grp.h>
71 #include <paths.h>
72 #include <pwd.h>
73 #include <signal.h>
74 #include <stdio.h>
75 #include <stdlib.h>
76 #include <string.h>
77 #include <syslog.h>
78 #include <unistd.h>
79 #include <util.h>
80 
81 #include "mntopts.h"
82 #include "dkcksum.h"
83 #include "extern.h"
84 
85 struct mntopt mopts[] = {
86 	MOPT_STDOPTS,
87 	MOPT_ASYNC,
88 	MOPT_UPDATE,
89 	MOPT_GETARGS,
90 	MOPT_NOATIME,
91 	{ NULL },
92 };
93 
94 static struct disklabel *getdisklabel(char *, int);
95 static void rewritelabel(char *, int, struct disklabel *);
96 static gid_t mfs_group(const char *);
97 static uid_t mfs_user(const char *);
98 static int strsuftoi(const char *, const char *, int, int);
99 static void usage(void);
100 int main(int, char *[]);
101 
102 #define	COMPAT			/* allow non-labeled disks */
103 
104 /*
105  * The following two constants set the default block and fragment sizes.
106  * Both constants must be a power of 2 and meet the following constraints:
107  *	MINBSIZE <= DESBLKSIZE <= MAXBSIZE
108  *	sectorsize <= DESFRAGSIZE <= DESBLKSIZE
109  *	DESBLKSIZE / DESFRAGSIZE <= 8
110  */
111 /*
112  * For file systems smaller than SMALL_FSSIZE we use the S_DFL_* defaults,
113  * otherwise if less than MEDIUM_FSSIZE use M_DFL_*, otherwise use
114  * L_DFL_*.
115  */
116 #define	SMALL_FSSIZE	(20*1024*2)
117 #define	S_DFL_FRAGSIZE	512
118 #define	S_DFL_BLKSIZE	4096
119 #define	MEDIUM_FSSIZE	(1000*1024*2)
120 #define	M_DFL_FRAGSIZE	1024
121 #define	M_DFL_BLKSIZE	8192
122 #define	L_DFL_FRAGSIZE	2048
123 #define	L_DFL_BLKSIZE	16384
124 
125 /*
126  * Default sector size.
127  */
128 #define	DFL_SECSIZE	512
129 
130 /*
131  * Cylinder groups may have up to many cylinders. The actual
132  * number used depends upon how much information can be stored
133  * on a single cylinder. The default is to use 16 cylinders
134  * per group.
135  */
136 #define	DESCPG		65536	/* desired fs_cpg ("infinity") */
137 
138 /*
139  * ROTDELAY gives the minimum number of milliseconds to initiate
140  * another disk transfer on the same cylinder. It is used in
141  * determining the rotationally optimal layout for disk blocks
142  * within a file; the default of fs_rotdelay is 0ms.
143  */
144 #define	ROTDELAY	0
145 
146 /*
147  * MAXBLKPG determines the maximum number of data blocks which are
148  * placed in a single cylinder group. The default is one indirect
149  * block worth of data blocks.
150  */
151 #define	MAXBLKPG(bsize)	((bsize) / sizeof(daddr_t))
152 
153 /*
154  * Each file system has a number of inodes statically allocated.
155  * We allocate one inode slot per NFPI fragments, expecting this
156  * to be far more than we will ever need.
157  */
158 #define	NFPI		4
159 
160 /*
161  * For each cylinder we keep track of the availability of blocks at different
162  * rotational positions, so that we can lay out the data to be picked
163  * up with minimum rotational latency.  NRPOS is the default number of
164  * rotational positions that we distinguish.  With NRPOS of 8 the resolution
165  * of our summary information is 2ms for a typical 3600 rpm drive.  Caching
166  * and zoning pretty much defeats rotational optimization, so we now use a
167  * default of 1.
168  */
169 #define	NRPOS		1	/* number distinct rotational positions */
170 
171 
172 int	mfs;			/* run as the memory based filesystem */
173 int	Nflag;			/* run without writing file system */
174 int	Oflag;			/* format as an 4.3BSD file system */
175 int	fssize;			/* file system size */
176 int	ntracks;		/* # tracks/cylinder */
177 int	nsectors;		/* # sectors/track */
178 int	nphyssectors;		/* # sectors/track including spares */
179 int	secpercyl;		/* sectors per cylinder */
180 int	trackspares = -1;	/* spare sectors per track */
181 int	cylspares = -1;		/* spare sectors per cylinder */
182 int	sectorsize;		/* bytes/sector */
183 int	rpm;			/* revolutions/minute of drive */
184 int	interleave;		/* hardware sector interleave */
185 int	trackskew = -1;		/* sector 0 skew, per track */
186 int	fsize = 0;		/* fragment size */
187 int	bsize = 0;		/* block size */
188 int	cpg = DESCPG;		/* cylinders/cylinder group */
189 int	cpgflg;			/* cylinders/cylinder group flag was given */
190 int	minfree = MINFREE;	/* free space threshold */
191 int	opt = DEFAULTOPT;	/* optimization preference (space or time) */
192 int	density;		/* number of bytes per inode */
193 int	maxcontig = 0;		/* max contiguous blocks to allocate */
194 int	rotdelay = ROTDELAY;	/* rotational delay between blocks */
195 int	maxbpg;			/* maximum blocks per file in a cyl group */
196 int	nrpos = NRPOS;		/* # of distinguished rotational positions */
197 int	avgfilesize = AVFILESIZ;/* expected average file size */
198 int	avgfpdir = AFPDIR;	/* expected number of files per directory */
199 int	bbsize = BBSIZE;	/* boot block size */
200 int	sbsize = SBSIZE;	/* superblock size */
201 int	mntflags = MNT_ASYNC;	/* flags to be passed to mount */
202 u_long	memleft;		/* virtual memory available */
203 caddr_t	membase;		/* start address of memory based filesystem */
204 int	needswap;		/* Filesystem not in native byte order */
205 #ifdef COMPAT
206 char	*disktype;
207 int	unlabeled;
208 #endif
209 char *appleufs_volname = 0; /* Apple UFS volume name */
210 int isappleufs = 0;
211 
212 char	device[MAXPATHLEN];
213 
214 int
215 main(int argc, char *argv[])
216 {
217 	struct partition *pp;
218 	struct disklabel *lp;
219 	struct disklabel mfsfakelabel;
220 	struct partition oldpartition;
221 	struct statfs *mp;
222 	int ch, fsi, fso, len, maxpartitions, n, Fflag, Iflag, Zflag;
223 	char *cp, *endp, *s1, *s2, *special;
224 	const char *opstring;
225 	long long llsize;
226 	int dfl_fragsize, dfl_blksize;
227 #ifdef MFS
228 	char mountfromname[100];
229 	pid_t pid, res;
230 	struct statfs sf;
231 	int status;
232 #endif
233 	mode_t mfsmode;
234 	uid_t mfsuid;
235 	gid_t mfsgid;
236 
237 	cp = NULL;
238 	fsi = fso = -1;
239 	Fflag = Iflag = Zflag = 0;
240 	if (strstr(getprogname(), "mfs")) {
241 		mfs = 1;
242 		mfsmode = 01777; /* default mode for a /tmp-type directory */
243 		mfsuid = 0;	/* user root */
244 		mfsgid = 0;	/* group wheel */
245 		Nflag++;
246 	}
247 
248 	maxpartitions = getmaxpartitions();
249 	if (maxpartitions > 26)
250 		errx(1, "insane maxpartitions value %d", maxpartitions);
251 
252 	opstring = mfs ?
253 	    "NT:a:b:c:d:e:f:g:h:i:m:o:p:s:u:" :
254 	    "B:FINOS:T:Za:b:c:d:e:f:g:h:i:k:l:m:n:o:p:r:s:t:u:v:x:";
255 	while ((ch = getopt(argc, argv, opstring)) != -1)
256 		switch (ch) {
257 		case 'B':
258 			if (strcmp(optarg, "be") == 0) {
259 #if BYTE_ORDER == LITTLE_ENDIAN
260 				needswap = 1;
261 #endif
262 			} else if (strcmp(optarg, "le") == 0) {
263 #if BYTE_ORDER == BIG_ENDIAN
264 				needswap = 1;
265 #endif
266 			} else
267 				usage();
268 			break;
269 		case 'F':
270 			Fflag = 1;
271 			break;
272 		case 'I':
273 			Iflag = 1;
274 			break;
275 		case 'N':
276 			Nflag = 1;
277 			break;
278 		case 'O':
279 			Oflag = 1;
280 			break;
281 		case 'S':
282 			sectorsize = strsuftoi("sector size",
283 			    optarg, 1, INT_MAX);
284 			break;
285 #ifdef COMPAT
286 		case 'T':
287 			disktype = optarg;
288 			break;
289 #endif
290 		case 'Z':
291 			Zflag = 1;
292 			break;
293 		case 'a':
294 			maxcontig = strsuftoi("maximum contiguous blocks",
295 			    optarg, 1, INT_MAX);
296 			break;
297 		case 'b':
298 			bsize = strsuftoi("block size",
299 			    optarg, MINBSIZE, MAXBSIZE);
300 			break;
301 		case 'c':
302 			cpg = strsuftoi("cylinders per group",
303 			    optarg, 1, INT_MAX);
304 			cpgflg++;
305 			break;
306 		case 'd':
307 			rotdelay = strsuftoi("rotational delay",
308 			    optarg, 0, INT_MAX);
309 			break;
310 		case 'e':
311 			maxbpg = strsuftoi(
312 			    "blocks per file in a cylinder group",
313 			    optarg, 1, INT_MAX);
314 			break;
315 		case 'f':
316 			fsize = strsuftoi("fragment size",
317 			    optarg, 1, MAXBSIZE);
318 			break;
319 		case 'g':
320 			if (mfs)
321 				mfsgid = mfs_group(optarg);
322 			else {
323 				avgfilesize = strsuftoi("average file size",
324 				    optarg, 1, INT_MAX);
325 			}
326 			break;
327 		case 'h':
328 			avgfpdir = strsuftoi("expected files per directory",
329 			    optarg, 1, INT_MAX);
330 			break;
331 		case 'i':
332 			density = strsuftoi("bytes per inode",
333 			    optarg, 1, INT_MAX);
334 			break;
335 		case 'k':
336 			trackskew = strsuftoi("track skew",
337 			    optarg, 0, INT_MAX);
338 			break;
339 		case 'l':
340 			interleave = strsuftoi("interleave",
341 			    optarg, 1, INT_MAX);
342 			break;
343 		case 'm':
344 			minfree = strsuftoi("free space %",
345 			    optarg, 0, 99);
346 			break;
347 		case 'n':
348 			nrpos = strsuftoi("rotational layout count",
349 			    optarg, 1, INT_MAX);
350 			break;
351 		case 'o':
352 			if (mfs)
353 				getmntopts(optarg, mopts, &mntflags, 0);
354 			else {
355 				if (strcmp(optarg, "space") == 0)
356 					opt = FS_OPTSPACE;
357 				else if (strcmp(optarg, "time") == 0)
358 					opt = FS_OPTTIME;
359 				else
360 				    errx(1, "%s %s",
361 					"unknown optimization preference: ",
362 					"use `space' or `time'.");
363 			}
364 			break;
365 		case 'p':
366 			if (mfs) {
367 				if ((mfsmode = strtol(optarg, NULL, 8)) <= 0)
368 					errx(1, "bad mode `%s'", optarg);
369 			} else {
370 				trackspares = strsuftoi(
371 				    "spare sectors per track", optarg, 0,
372 				    INT_MAX);
373 			}
374 			break;
375 		case 'r':
376 			rpm = strsuftoi("revolutions per minute",
377 			    optarg, 1, INT_MAX);
378 			break;
379 		case 's':
380 			llsize = strtoll(optarg, &endp, 10);
381 			if (endp[0] != '\0' && endp[1] != '\0')
382 				llsize = -1;
383 			else {
384 				int	ssiz;
385 
386 				ssiz = (sectorsize ? sectorsize : DFL_SECSIZE);
387 				switch (tolower((unsigned char)endp[0])) {
388 				case 'b':
389 					llsize /= ssiz;
390 					break;
391 				case 'k':
392 					llsize *= 1024 / ssiz;
393 					break;
394 				case 'm':
395 					llsize *= 1024 * 1024 / ssiz;
396 					break;
397 				case 'g':
398 					llsize *= 1024 * 1024 * 1024 / ssiz;
399 					break;
400 				case '\0':
401 				case 's':
402 					break;
403 				default:
404 					llsize = -1;
405 				}
406 			}
407 			if (llsize > INT_MAX)
408 				errx(1, "file system size `%s' is too large.",
409 				    optarg);
410 			if (llsize <= 0)
411 				errx(1,
412 			    "`%s' is not a valid number for file system size.",
413 				    optarg);
414 			fssize = (int)llsize;
415 			break;
416 		case 't':
417 			ntracks = strsuftoi("total tracks",
418 			    optarg, 1, INT_MAX);
419 			break;
420 		case 'u':
421 			if (mfs)
422 				mfsuid = mfs_user(optarg);
423 			else {
424 				nsectors = strsuftoi("sectors per track",
425 				    optarg, 1, INT_MAX);
426 			}
427 			break;
428 		case 'v':
429 			appleufs_volname = optarg;
430 			if (strchr(appleufs_volname, ':') || strchr(appleufs_volname, '/'))
431 				errx(1,"Apple UFS volume name cannot contain ':' or '/'");
432 			if (appleufs_volname[0] == '\0')
433 				errx(1,"Apple UFS volume name cannot be zero length");
434 			isappleufs = 1;
435 			break;
436 		case 'x':
437 			cylspares = strsuftoi("spare sectors per cylinder",
438 			    optarg, 0, INT_MAX);
439 			break;
440 		case '?':
441 		default:
442 			usage();
443 		}
444 	argc -= optind;
445 	argv += optind;
446 	if (mntflags & MNT_GETARGS)
447 		goto doit;
448 
449 	if (argc != 2 && (mfs || argc != 1))
450 		usage();
451 
452 	special = argv[0];
453 	if (Fflag || mfs) {
454 		/*
455 		 * it's a file system image or an MFS, so fake up a label.
456 		 * XXX
457 		 */
458 		if (!sectorsize)
459 			sectorsize = DFL_SECSIZE;
460 
461 		if (Fflag && !Nflag) {	/* creating image in a regular file */
462 			if (fssize == 0)
463 				errx(1, "need to specify size when using -F");
464 			fso = open(special, O_RDWR | O_CREAT | O_TRUNC, 0777);
465 			if (fso == -1)
466 				err(1, "can't open file %s", special);
467 			if ((fsi = dup(fso)) == -1)
468 				err(1, "can't dup(2) image fd");
469 		/* XXXLUKEM: only ftruncate() regular files ? */
470 			if (ftruncate(fso, (off_t)fssize * sectorsize) == -1)
471 				err(1, "can't resize %s to %d",
472 				    special, fssize);
473 
474 			if (Zflag) {	/* pre-zero the file */
475 				char	*buf;
476 				int	bufsize, i;
477 				off_t	bufrem;
478 				struct statfs sfs;
479 
480 				if (fstatfs(fso, &sfs) == -1) {
481 					warn("can't fstatfs `%s'", special);
482 					bufsize = 8192;
483 				} else
484 					bufsize = sfs.f_iosize;
485 
486 				if ((buf = calloc(1, bufsize)) == NULL)
487 					err(1, "can't malloc buffer of %d",
488 					bufsize);
489 				bufrem = fssize * sectorsize;
490 				printf(
491     "Creating file system image in `%s', size %lld bytes, in %d byte chunks.\n",
492 				    special, (long long)bufrem, bufsize);
493 				while (bufrem > 0) {
494 					i = write(fso, buf,
495 					    MIN(bufsize, bufrem));
496 					if (i == -1)
497 						err(1, "writing image");
498 					bufrem -= i;
499 				}
500 			}
501 
502 		}
503 
504 		memset(&mfsfakelabel, 0, sizeof(mfsfakelabel));
505 		mfsfakelabel.d_secsize = sectorsize;
506 		mfsfakelabel.d_nsectors = 64;	/* these 3 add up to 16MB */
507 		mfsfakelabel.d_ntracks = 16;
508 		mfsfakelabel.d_ncylinders = 16;
509 		mfsfakelabel.d_secpercyl =
510 		    mfsfakelabel.d_nsectors * mfsfakelabel.d_ntracks;
511 		mfsfakelabel.d_secperunit =
512 		    mfsfakelabel.d_ncylinders * mfsfakelabel.d_secpercyl;
513 		mfsfakelabel.d_rpm = 10000;
514 		mfsfakelabel.d_interleave = 1;
515 		mfsfakelabel.d_npartitions = 1;
516 		mfsfakelabel.d_partitions[0].p_size = mfsfakelabel.d_secperunit;
517 		mfsfakelabel.d_partitions[0].p_fsize = 1024;
518 		mfsfakelabel.d_partitions[0].p_frag = 8;
519 		mfsfakelabel.d_partitions[0].p_cpg = 16;
520 
521 		lp = &mfsfakelabel;
522 		pp = &mfsfakelabel.d_partitions[0];
523 	} else {	/* !Fflag && !mfs */
524 		fsi = opendisk(special, O_RDONLY, device, sizeof(device), 0);
525 		special = device;
526 		if (fsi < 0)
527 			err(1, "%s: open for read", special);
528 
529 		if (Nflag) {
530 			fso = -1;
531 		} else {
532 			fso = open(special, O_WRONLY);
533 			if (fso < 0)
534 				err(1, "%s: open for write", special);
535 
536 			/* Bail if target special is mounted */
537 			n = getmntinfo(&mp, MNT_NOWAIT);
538 			if (n == 0)
539 				err(1, "%s: getmntinfo", special);
540 
541 			len = sizeof(_PATH_DEV) - 1;
542 			s1 = special;
543 			if (strncmp(_PATH_DEV, s1, len) == 0)
544 				s1 += len;
545 
546 			while (--n >= 0) {
547 				s2 = mp->f_mntfromname;
548 				if (strncmp(_PATH_DEV, s2, len) == 0) {
549 					s2 += len - 1;
550 					*s2 = 'r';
551 				}
552 				if (strcmp(s1, s2) == 0 ||
553 				    strcmp(s1, &s2[1]) == 0)
554 					errx(1, "%s is mounted on %s",
555 					    special, mp->f_mntonname);
556 				++mp;
557 			}
558 		}
559 		cp = strchr(argv[0], '\0') - 1;
560 		if (cp == 0 || ((*cp < 'a' || *cp > ('a' + maxpartitions - 1))
561 		    && !isdigit(*cp)))
562 			errx(1, "can't figure out file system partition");
563 #ifdef COMPAT
564 		if (disktype == NULL)
565 			disktype = argv[1];
566 #endif
567 		lp = getdisklabel(special, fsi);
568 		if (isdigit(*cp))
569 			pp = &lp->d_partitions[0];
570 		else
571 			pp = &lp->d_partitions[*cp - 'a'];
572 		if (pp->p_size == 0)
573 			errx(1, "`%c' partition is unavailable", *cp);
574 		if (pp->p_fstype == FS_APPLEUFS)
575 			isappleufs = 1;
576 		if (isappleufs) {
577 			if (!Iflag && (pp->p_fstype != FS_APPLEUFS))
578 				errx(1, "`%c' partition type is not `Apple UFS'", *cp);
579 		} else {
580 			if (!Iflag && (pp->p_fstype != FS_BSDFFS))
581 				errx(1, "`%c' partition type is not `4.2BSD'", *cp);
582 		}
583 	}	/* !Fflag && !mfs */
584 
585 	if (fssize == 0)
586 		fssize = pp->p_size;
587 	if (fssize > pp->p_size && !mfs && !Fflag)
588 		errx(1, "maximum file system size on the `%c' partition is %d",
589 		    *cp, pp->p_size);
590 	if (rpm == 0) {
591 		rpm = lp->d_rpm;
592 		if (rpm <= 0)
593 			rpm = 3600;
594 	}
595 	if (ntracks == 0) {
596 		ntracks = lp->d_ntracks;
597 		if (ntracks <= 0)
598 			errx(1, "no default #tracks");
599 	}
600 	if (nsectors == 0) {
601 		nsectors = lp->d_nsectors;
602 		if (nsectors <= 0)
603 			errx(1, "no default #sectors/track");
604 	}
605 	if (sectorsize == 0) {
606 		sectorsize = lp->d_secsize;
607 		if (sectorsize <= 0)
608 			errx(1, "no default sector size");
609 	}
610 	if (trackskew == -1) {
611 		trackskew = lp->d_trackskew;
612 		if (trackskew < 0)
613 			trackskew = 0;
614 	}
615 	if (interleave == 0) {
616 		interleave = lp->d_interleave;
617 		if (interleave <= 0)
618 			interleave = 1;
619 	}
620 
621 	if (fssize < SMALL_FSSIZE) {
622 		dfl_fragsize = S_DFL_FRAGSIZE;
623 		dfl_blksize = S_DFL_BLKSIZE;
624 	} else if (fssize < MEDIUM_FSSIZE) {
625 		dfl_fragsize = M_DFL_FRAGSIZE;
626 		dfl_blksize = M_DFL_BLKSIZE;
627 	} else {
628 		dfl_fragsize = L_DFL_FRAGSIZE;
629 		dfl_blksize = L_DFL_BLKSIZE;
630 	}
631 
632 	if (fsize == 0) {
633 		fsize = pp->p_fsize;
634 		if (fsize <= 0)
635 			fsize = MAX(dfl_fragsize, lp->d_secsize);
636 	}
637 	if (bsize == 0) {
638 		bsize = pp->p_frag * pp->p_fsize;
639 		if (bsize <= 0)
640 			bsize = MIN(dfl_blksize, 8 * fsize);
641 	}
642 	/*
643 	 * Maxcontig sets the default for the maximum number of blocks
644 	 * that may be allocated sequentially. With filesystem clustering
645 	 * it is possible to allocate contiguous blocks up to the maximum
646 	 * transfer size permitted by the controller or buffering.
647 	 */
648 	if (maxcontig == 0)
649 		maxcontig = MAX(1, MIN(MAXPHYS, MAXBSIZE) / bsize);
650 	if (density == 0)
651 		density = NFPI * fsize;
652 	if (minfree < MINFREE && opt != FS_OPTSPACE) {
653 		warnx("%s %s %d%%", "Warning: changing optimization to space",
654 		    "because minfree is less than", MINFREE);
655 		opt = FS_OPTSPACE;
656 	}
657 	if (trackspares == -1) {
658 		trackspares = lp->d_sparespertrack;
659 		if (trackspares < 0)
660 			trackspares = 0;
661 	}
662 	nphyssectors = nsectors + trackspares;
663 	if (cylspares == -1) {
664 		cylspares = lp->d_sparespercyl;
665 		if (cylspares < 0)
666 			cylspares = 0;
667 	}
668 	secpercyl = nsectors * ntracks - cylspares;
669 	if (secpercyl != lp->d_secpercyl)
670 		warnx("%s (%d) %s (%u)",
671 			"Warning: calculated sectors per cylinder", secpercyl,
672 			"disagrees with disk label", lp->d_secpercyl);
673 	if (maxbpg == 0)
674 		maxbpg = MAXBLKPG(bsize);
675 #ifdef notdef /* label may be 0 if faked up by kernel */
676 	bbsize = lp->d_bbsize;
677 	sbsize = lp->d_sbsize;
678 #endif
679 	oldpartition = *pp;
680 	mkfs(pp, special, fsi, fso, mfsmode, mfsuid, mfsgid);
681 	if (!Nflag && memcmp(pp, &oldpartition, sizeof(oldpartition)) && !Fflag)
682 		rewritelabel(special, fso, lp);
683 	if (!Nflag)
684 		close(fso);
685 	close(fsi);
686 #ifdef MFS
687 	if (mfs) {
688 		struct mfs_args args;
689 
690 		switch (pid = fork()) {
691 		case -1:
692 			perror("mfs");
693 			exit(10);
694 		case 0:
695 			(void)snprintf(mountfromname, sizeof(mountfromname),
696 			    "mfs:%d", getpid());
697 			break;
698 		default:
699 			(void)snprintf(mountfromname, sizeof(mountfromname),
700 			    "mfs:%d", pid);
701 			for (;;) {
702 				/*
703 				 * spin until the mount succeeds
704 				 * or the child exits
705 				 */
706 				usleep(1);
707 
708 				/*
709 				 * XXX Here is a race condition: another process
710 				 * can mount a filesystem which hides our
711 				 * ramdisk before we see the success.
712 				 */
713 				if (statfs(argv[1], &sf) < 0)
714 					err(88, "statfs %s", argv[1]);
715 				if (!strcmp(sf.f_mntfromname, mountfromname) &&
716 				    !strncmp(sf.f_mntonname, argv[1],
717 					     MNAMELEN) &&
718 				    !strcmp(sf.f_fstypename, "mfs"))
719 					exit(0);
720 
721 				res = waitpid(pid, &status, WNOHANG);
722 				if (res == -1)
723 					err(11, "waitpid");
724 				if (res != pid)
725 					continue;
726 				if (WIFEXITED(status)) {
727 					if (WEXITSTATUS(status) == 0)
728 						exit(0);
729 					errx(1, "%s: mount: %s", argv[1],
730 					     strerror(WEXITSTATUS(status)));
731 				} else
732 					errx(11, "abnormal termination");
733 			}
734 			/* NOTREACHED */
735 		}
736 
737 		(void) setsid();
738 		(void) close(0);
739 		(void) close(1);
740 		(void) close(2);
741 		(void) chdir("/");
742 
743 		args.fspec = mountfromname;
744 		args.export.ex_root = -2;
745 		if (mntflags & MNT_RDONLY)
746 			args.export.ex_flags = MNT_EXRDONLY;
747 		else
748 			args.export.ex_flags = 0;
749 		args.base = membase;
750 		args.size = fssize * sectorsize;
751 doit:
752 		if (mount(MOUNT_MFS, argv[1], mntflags, &args) < 0) {
753 			if (mntflags & MNT_GETARGS)
754 				err(1, "mount `%s' failed", argv[1]);
755 			exit(errno); /* parent prints message */
756 		}
757 		if (mntflags & MNT_GETARGS)
758 			printf("base=%p, size=%ld\n", args.base, args.size);
759 	}
760 #endif
761 	exit(0);
762 }
763 
764 #ifdef COMPAT
765 const char lmsg[] = "%s: can't read disk label; disk type must be specified";
766 #else
767 const char lmsg[] = "%s: can't read disk label";
768 #endif
769 
770 static struct disklabel *
771 getdisklabel(char *s, volatile int fd)
772 /* XXX why is fs volatile?! */
773 {
774 	static struct disklabel lab;
775 
776 	if (ioctl(fd, DIOCGDINFO, &lab) < 0) {
777 #ifdef COMPAT
778 		if (disktype) {
779 			struct disklabel *lp;
780 
781 			unlabeled++;
782 			lp = getdiskbyname(disktype);
783 			if (lp == NULL)
784 				errx(1, "%s: unknown disk type", disktype);
785 			return (lp);
786 		}
787 #endif
788 		warn("ioctl (GDINFO)");
789 		errx(1, lmsg, s);
790 	}
791 	return (&lab);
792 }
793 
794 static void
795 rewritelabel(char *s, volatile int fd, struct disklabel *lp)
796 /* XXX why is fd volatile?! */
797 {
798 #ifdef COMPAT
799 	if (unlabeled)
800 		return;
801 #endif
802 	lp->d_checksum = 0;
803 	lp->d_checksum = dkcksum(lp);
804 	if (ioctl(fd, DIOCWDINFO, (char *)lp) < 0) {
805 		if (errno == ESRCH)
806 			return;
807 		warn("ioctl (WDINFO)");
808 		errx(1, "%s: can't rewrite disk label", s);
809 	}
810 #if __vax__
811 	if (lp->d_type == DTYPE_SMD && lp->d_flags & D_BADSECT) {
812 		int i;
813 		int cfd;
814 		daddr_t alt;
815 		char specname[64];
816 		char blk[1024];
817 		char *cp;
818 
819 		/*
820 		 * Make name for 'c' partition.
821 		 */
822 		strcpy(specname, s);
823 		cp = specname + strlen(specname) - 1;
824 		if (!isdigit(*cp))
825 			*cp = 'c';
826 		cfd = open(specname, O_WRONLY);
827 		if (cfd < 0)
828 			err(1, "%s: open", specname);
829 		memset(blk, 0, sizeof(blk));
830 		*(struct disklabel *)(blk + LABELOFFSET) = *lp;
831 		alt = lp->d_ncylinders * lp->d_secpercyl - lp->d_nsectors;
832 		for (i = 1; i < 11 && i < lp->d_nsectors; i += 2) {
833 			off_t offset;
834 
835 			offset = alt + i;
836 			offset *= lp->d_secsize;
837 			if (lseek(cfd, offset, SEEK_SET) == -1)
838 				err(1, "lseek to badsector area: ");
839 			if (write(cfd, blk, lp->d_secsize) < lp->d_secsize)
840 				warn("alternate label %d write", i/2);
841 		}
842 		close(cfd);
843 	}
844 #endif
845 }
846 
847 static gid_t
848 mfs_group(const char *gname)
849 {
850 	struct group *gp;
851 
852 	if (!(gp = getgrnam(gname)) && !isdigit((unsigned char)*gname))
853 		errx(1, "unknown gname %s", gname);
854 	return gp ? gp->gr_gid : atoi(gname);
855 }
856 
857 static uid_t
858 mfs_user(const char *uname)
859 {
860 	struct passwd *pp;
861 
862 	if (!(pp = getpwnam(uname)) && !isdigit((unsigned char)*uname))
863 		errx(1, "unknown user %s", uname);
864 	return pp ? pp->pw_uid : atoi(uname);
865 }
866 
867 static int
868 strsuftoi(const char *desc, const char *arg, int min, int max)
869 {
870 	long long result;
871 	char	*ep;
872 
873 	errno = 0;
874 	result = strtoll(arg, &ep, 10);
875 	if (ep[0] != '\0' && ep[1] != '\0')
876 		errx(1, "%s `%s' is not a valid number.", desc, arg);
877 	switch (tolower((unsigned char)ep[0])) {
878 	case '\0':
879 	case 'b':
880 		break;
881 	case 'k':
882 		result <<= 10;
883 		break;
884 	case 'm':
885 		result <<= 20;
886 		break;
887 	case 'g':
888 		result <<= 30;
889 		break;
890 	default:
891 		errx(1, "`%s' is not a valid suffix for %s.", ep, desc);
892 	}
893 	if (result < min)
894 		errx(1, "%s `%s' (%lld) is less than minimum (%d).",
895 		    desc, arg, result, min);
896 	if (result > max)
897 		errx(1, "%s `%s' (%lld) is greater than maximum (%d).",
898 		    desc, arg, result, max);
899 	return ((int)result);
900 }
901 
902 #define	NEWFS		1
903 #define	MFS_MOUNT	2
904 #define	BOTH		NEWFS | MFS_MOUNT
905 
906 struct help_strings {
907 	int flags;
908 	const char *str;
909 } const help_strings[] = {
910 	{ NEWFS,	"-B byteorder\tbyte order (`be' or `le')" },
911 	{ NEWFS,	"-F \t\tcreate file system image in regular file" },
912 	{ NEWFS,	"-I \t\tdo not check that the file system type is '4.2BSD'" },
913 	{ BOTH,		"-N \t\tdo not create file system, just print out "
914 			    "parameters" },
915 	{ NEWFS,	"-O \t\tcreate a 4.3BSD format filesystem" },
916 	{ NEWFS,	"-S secsize\tsector size" },
917 #ifdef COMPAT
918 	{ NEWFS,	"-T disktype\tdisk type" },
919 #endif
920 	{ NEWFS,	"-Z \t\tpre-zero the image file (with -F)" },
921 	{ BOTH,		"-a maxcontig\tmaximum contiguous blocks" },
922 	{ BOTH,		"-b bsize\tblock size" },
923 	{ BOTH,		"-c cpg\t\tcylinders/group" },
924 	{ BOTH,		"-d rotdelay\trotational delay between contiguous "
925 			    "blocks" },
926 	{ BOTH,		"-e maxbpg\tmaximum blocks per file in a cylinder group"
927 			    },
928 	{ BOTH,		"-f fsize\tfrag size" },
929 	{ NEWFS,	"-g avgfilesize\taverage file size" },
930 	{ MFS_MOUNT,	"-g groupname\tgroup name of mount point" },
931 	{ BOTH,		"-h avgfpdir\taverage files per directory" },
932 	{ BOTH,		"-i density\tnumber of bytes per inode" },
933 	{ NEWFS,	"-k trackskew\tsector 0 skew, per track" },
934 	{ NEWFS,	"-l interleave\thardware sector interleave" },
935 	{ BOTH,		"-m minfree\tminimum free space %%" },
936 	{ NEWFS,	"-n nrpos\tnumber of distinguished rotational "
937 			    "positions" },
938 	{ BOTH,		"-o optim\toptimization preference (`space' or `time')"
939 			    },
940 	{ NEWFS,	"-p tracksparse\tspare sectors per track" },
941 	{ MFS_MOUNT,	"-p perm\t\tpermissions (in octal)" },
942 	{ BOTH,		"-s fssize\tfile system size (sectors)" },
943 	{ NEWFS,	"-r rpm\t\trevolutions/minute" },
944 	{ NEWFS,	"-t ntracks\ttracks/cylinder" },
945 	{ NEWFS,	"-u nsectors\tsectors/track" },
946 	{ MFS_MOUNT,	"-u username\tuser name of mount point" },
947 	{ NEWFS,	"-v volname\tApple UFS volume name" },
948 	{ NEWFS,	"-x cylspares\tspare sectors per cylinder" },
949 	{ 0, NULL }
950 };
951 
952 static void
953 usage(void)
954 {
955 	int match;
956 	const struct help_strings *hs;
957 
958 	if (mfs) {
959 		fprintf(stderr,
960 		    "usage: %s [ fsoptions ] special-device mount-point\n",
961 			getprogname());
962 	} else
963 		fprintf(stderr,
964 		    "usage: %s [ fsoptions ] special-device%s\n",
965 		    getprogname(),
966 #ifdef COMPAT
967 		    " [device-type]");
968 #else
969 		    "");
970 #endif
971 	fprintf(stderr, "where fsoptions are:\n");
972 
973 	match = mfs ? MFS_MOUNT : NEWFS;
974 	for (hs = help_strings; hs->flags != 0; hs++)
975 		if (hs->flags & match)
976 			fprintf(stderr, "\t%s\n", hs->str);
977 	exit(1);
978 }
979