Home | History | Annotate | Line # | Download | only in newfs
newfs.c revision 1.29.2.2
      1  1.29.2.2    mellon /*	$NetBSD: newfs.c,v 1.29.2.2 1997/11/19 21:24:09 mellon Exp $	*/
      2      1.18       cgd 
      3       1.1       cgd /*
      4      1.10   mycroft  * Copyright (c) 1983, 1989, 1993, 1994
      5      1.10   mycroft  *	The Regents of the University of California.  All rights reserved.
      6       1.1       cgd  *
      7       1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8       1.1       cgd  * modification, are permitted provided that the following conditions
      9       1.1       cgd  * are met:
     10       1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11       1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12       1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13       1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14       1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15       1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     16       1.1       cgd  *    must display the following acknowledgement:
     17       1.1       cgd  *	This product includes software developed by the University of
     18       1.1       cgd  *	California, Berkeley and its contributors.
     19       1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     20       1.1       cgd  *    may be used to endorse or promote products derived from this software
     21       1.1       cgd  *    without specific prior written permission.
     22       1.1       cgd  *
     23       1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24       1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25       1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26       1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27       1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28       1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29       1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30       1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31       1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32       1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33       1.1       cgd  * SUCH DAMAGE.
     34       1.1       cgd  */
     35       1.1       cgd 
     36      1.25  christos #include <sys/cdefs.h>
     37       1.1       cgd #ifndef lint
     38      1.25  christos __COPYRIGHT("@(#) Copyright (c) 1983, 1989, 1993, 1994\n\
     39      1.25  christos 	The Regents of the University of California.  All rights reserved.\n");
     40       1.1       cgd #endif /* not lint */
     41       1.1       cgd 
     42       1.1       cgd #ifndef lint
     43      1.18       cgd #if 0
     44      1.27     lukem static char sccsid[] = "@(#)newfs.c	8.13 (Berkeley) 5/1/95";
     45      1.18       cgd #else
     46  1.29.2.2    mellon __RCSID("$NetBSD: newfs.c,v 1.29.2.2 1997/11/19 21:24:09 mellon Exp $");
     47      1.18       cgd #endif
     48       1.1       cgd #endif /* not lint */
     49       1.1       cgd 
     50       1.1       cgd /*
     51       1.1       cgd  * newfs: friendly front end to mkfs
     52       1.1       cgd  */
     53       1.1       cgd #include <sys/param.h>
     54       1.1       cgd #include <sys/stat.h>
     55       1.1       cgd #include <sys/ioctl.h>
     56       1.1       cgd #include <sys/disklabel.h>
     57       1.1       cgd #include <sys/file.h>
     58       1.1       cgd #include <sys/mount.h>
     59      1.19   thorpej #include <sys/sysctl.h>
     60  1.29.2.1    mellon #include <sys/wait.h>
     61       1.1       cgd 
     62      1.10   mycroft #include <ufs/ufs/dir.h>
     63      1.27     lukem #include <ufs/ufs/dinode.h>
     64      1.10   mycroft #include <ufs/ffs/fs.h>
     65      1.10   mycroft 
     66      1.10   mycroft #include <ctype.h>
     67       1.1       cgd #include <errno.h>
     68      1.10   mycroft #include <paths.h>
     69       1.1       cgd #include <stdio.h>
     70      1.10   mycroft #include <stdlib.h>
     71       1.1       cgd #include <string.h>
     72      1.10   mycroft #include <syslog.h>
     73      1.10   mycroft #include <unistd.h>
     74  1.29.2.1    mellon #include <signal.h>
     75      1.25  christos #include <err.h>
     76      1.20   thorpej #include <util.h>
     77      1.10   mycroft 
     78      1.10   mycroft #include "mntopts.h"
     79      1.25  christos #include "dkcksum.h"
     80      1.25  christos #include "extern.h"
     81      1.10   mycroft 
     82      1.10   mycroft struct mntopt mopts[] = {
     83      1.10   mycroft 	MOPT_STDOPTS,
     84      1.10   mycroft 	MOPT_ASYNC,
     85      1.22       cgd 	MOPT_UPDATE,
     86      1.23       tls 	MOPT_NOATIME,
     87      1.10   mycroft 	{ NULL },
     88      1.10   mycroft };
     89      1.10   mycroft 
     90      1.25  christos static struct disklabel *getdisklabel __P((char *, int));
     91      1.25  christos static void rewritelabel __P((char *, int, struct disklabel *));
     92      1.25  christos static void usage __P((void));
     93      1.25  christos int	main __P((int, char *[]));
     94       1.1       cgd 
     95       1.1       cgd #define	COMPAT			/* allow non-labeled disks */
     96       1.1       cgd 
     97       1.1       cgd /*
     98       1.1       cgd  * The following two constants set the default block and fragment sizes.
     99       1.1       cgd  * Both constants must be a power of 2 and meet the following constraints:
    100       1.1       cgd  *	MINBSIZE <= DESBLKSIZE <= MAXBSIZE
    101       1.1       cgd  *	sectorsize <= DESFRAGSIZE <= DESBLKSIZE
    102       1.1       cgd  *	DESBLKSIZE / DESFRAGSIZE <= 8
    103       1.1       cgd  */
    104       1.1       cgd #define	DFL_FRAGSIZE	1024
    105       1.1       cgd #define	DFL_BLKSIZE	8192
    106       1.1       cgd 
    107       1.1       cgd /*
    108       1.1       cgd  * Cylinder groups may have up to many cylinders. The actual
    109       1.1       cgd  * number used depends upon how much information can be stored
    110       1.1       cgd  * on a single cylinder. The default is to use 16 cylinders
    111       1.1       cgd  * per group.
    112       1.1       cgd  */
    113       1.1       cgd #define	DESCPG		16	/* desired fs_cpg */
    114       1.1       cgd 
    115       1.1       cgd /*
    116       1.1       cgd  * ROTDELAY gives the minimum number of milliseconds to initiate
    117       1.1       cgd  * another disk transfer on the same cylinder. It is used in
    118       1.1       cgd  * determining the rotationally optimal layout for disk blocks
    119      1.13   mycroft  * within a file; the default of fs_rotdelay is 0ms.
    120       1.1       cgd  */
    121      1.13   mycroft #define ROTDELAY	0
    122       1.1       cgd 
    123       1.1       cgd /*
    124       1.1       cgd  * MAXBLKPG determines the maximum number of data blocks which are
    125       1.1       cgd  * placed in a single cylinder group. The default is one indirect
    126       1.1       cgd  * block worth of data blocks.
    127       1.1       cgd  */
    128       1.1       cgd #define MAXBLKPG(bsize)	((bsize) / sizeof(daddr_t))
    129       1.1       cgd 
    130       1.1       cgd /*
    131       1.1       cgd  * Each file system has a number of inodes statically allocated.
    132       1.1       cgd  * We allocate one inode slot per NFPI fragments, expecting this
    133       1.1       cgd  * to be far more than we will ever need.
    134       1.1       cgd  */
    135       1.1       cgd #define	NFPI		4
    136       1.1       cgd 
    137       1.1       cgd /*
    138       1.1       cgd  * For each cylinder we keep track of the availability of blocks at different
    139       1.1       cgd  * rotational positions, so that we can lay out the data to be picked
    140       1.1       cgd  * up with minimum rotational latency.  NRPOS is the default number of
    141       1.1       cgd  * rotational positions that we distinguish.  With NRPOS of 8 the resolution
    142      1.13   mycroft  * of our summary information is 2ms for a typical 3600 rpm drive.  Caching
    143      1.13   mycroft  * and zoning pretty much defeats rotational optimization, so we now use a
    144      1.13   mycroft  * default of 1.
    145       1.1       cgd  */
    146      1.13   mycroft #define	NRPOS		1	/* number distinct rotational positions */
    147       1.1       cgd 
    148       1.1       cgd 
    149       1.1       cgd int	mfs;			/* run as the memory based filesystem */
    150       1.1       cgd int	Nflag;			/* run without writing file system */
    151      1.10   mycroft int	Oflag;			/* format as an 4.3BSD file system */
    152       1.1       cgd int	fssize;			/* file system size */
    153       1.1       cgd int	ntracks;		/* # tracks/cylinder */
    154       1.1       cgd int	nsectors;		/* # sectors/track */
    155       1.1       cgd int	nphyssectors;		/* # sectors/track including spares */
    156       1.1       cgd int	secpercyl;		/* sectors per cylinder */
    157       1.1       cgd int	trackspares = -1;	/* spare sectors per track */
    158       1.1       cgd int	cylspares = -1;		/* spare sectors per cylinder */
    159       1.1       cgd int	sectorsize;		/* bytes/sector */
    160       1.1       cgd int	rpm;			/* revolutions/minute of drive */
    161       1.1       cgd int	interleave;		/* hardware sector interleave */
    162       1.1       cgd int	trackskew = -1;		/* sector 0 skew, per track */
    163       1.1       cgd int	headswitch;		/* head switch time, usec */
    164       1.1       cgd int	trackseek;		/* track-to-track seek, usec */
    165       1.1       cgd int	fsize = 0;		/* fragment size */
    166       1.1       cgd int	bsize = 0;		/* block size */
    167       1.1       cgd int	cpg = DESCPG;		/* cylinders/cylinder group */
    168       1.1       cgd int	cpgflg;			/* cylinders/cylinder group flag was given */
    169       1.1       cgd int	minfree = MINFREE;	/* free space threshold */
    170       1.1       cgd int	opt = DEFAULTOPT;	/* optimization preference (space or time) */
    171       1.1       cgd int	density;		/* number of bytes per inode */
    172      1.13   mycroft int	maxcontig = 8;		/* max contiguous blocks to allocate */
    173       1.1       cgd int	rotdelay = ROTDELAY;	/* rotational delay between blocks */
    174       1.1       cgd int	maxbpg;			/* maximum blocks per file in a cyl group */
    175       1.1       cgd int	nrpos = NRPOS;		/* # of distinguished rotational positions */
    176       1.1       cgd int	bbsize = BBSIZE;	/* boot block size */
    177       1.1       cgd int	sbsize = SBSIZE;	/* superblock size */
    178      1.10   mycroft int	mntflags = MNT_ASYNC;	/* flags to be passed to mount */
    179       1.1       cgd u_long	memleft;		/* virtual memory available */
    180       1.1       cgd caddr_t	membase;		/* start address of memory based filesystem */
    181       1.1       cgd #ifdef COMPAT
    182       1.1       cgd char	*disktype;
    183       1.1       cgd int	unlabeled;
    184       1.1       cgd #endif
    185       1.1       cgd 
    186       1.1       cgd char	device[MAXPATHLEN];
    187      1.25  christos extern char *__progname;
    188       1.1       cgd 
    189      1.10   mycroft int
    190       1.1       cgd main(argc, argv)
    191       1.1       cgd 	int argc;
    192       1.1       cgd 	char *argv[];
    193       1.1       cgd {
    194      1.25  christos 	int ch;
    195      1.25  christos 	struct partition *pp;
    196      1.25  christos 	struct disklabel *lp;
    197      1.14       cgd 	struct disklabel mfsfakelabel;
    198       1.1       cgd 	struct partition oldpartition;
    199       1.1       cgd 	struct stat st;
    200      1.10   mycroft 	struct statfs *mp;
    201      1.25  christos 	int fsi = 0, fso, len, n, maxpartitions;
    202  1.29.2.1    mellon 	char *cp = NULL, *s1, *s2, *special, *opstring;
    203  1.29.2.1    mellon #ifdef MFS
    204  1.29.2.1    mellon 	char mountfromname[100];
    205  1.29.2.1    mellon 	pid_t pid, res;
    206  1.29.2.1    mellon 	struct statfs sf;
    207  1.29.2.1    mellon 	int status;
    208  1.29.2.1    mellon #endif
    209       1.1       cgd 
    210      1.25  christos 	if (strstr(__progname, "mfs")) {
    211       1.1       cgd 		mfs = 1;
    212       1.1       cgd 		Nflag++;
    213       1.1       cgd 	}
    214       1.1       cgd 
    215      1.19   thorpej 	maxpartitions = getmaxpartitions();
    216      1.19   thorpej 	if (maxpartitions > 26)
    217      1.25  christos 		errx(1, "insane maxpartitions value %d", maxpartitions);
    218      1.19   thorpej 
    219      1.10   mycroft 	opstring = mfs ?
    220      1.10   mycroft 	    "NT:a:b:c:d:e:f:i:m:o:s:" :
    221      1.10   mycroft 	    "NOS:T:a:b:c:d:e:f:i:k:l:m:n:o:p:r:s:t:u:x:";
    222      1.26     lukem 	while ((ch = getopt(argc, argv, opstring)) != -1)
    223      1.10   mycroft 		switch (ch) {
    224      1.10   mycroft 		case 'N':
    225      1.10   mycroft 			Nflag = 1;
    226       1.1       cgd 			break;
    227      1.10   mycroft 		case 'O':
    228      1.10   mycroft 			Oflag = 1;
    229       1.1       cgd 			break;
    230       1.1       cgd 		case 'S':
    231       1.1       cgd 			if ((sectorsize = atoi(optarg)) <= 0)
    232      1.25  christos 				errx(1, "%s: bad sector size", optarg);
    233       1.1       cgd 			break;
    234       1.1       cgd #ifdef COMPAT
    235       1.1       cgd 		case 'T':
    236       1.1       cgd 			disktype = optarg;
    237       1.1       cgd 			break;
    238       1.1       cgd #endif
    239       1.1       cgd 		case 'a':
    240       1.1       cgd 			if ((maxcontig = atoi(optarg)) <= 0)
    241      1.25  christos 				errx(1, "%s: bad maximum contiguous blocks",
    242       1.1       cgd 				    optarg);
    243       1.1       cgd 			break;
    244       1.1       cgd 		case 'b':
    245       1.1       cgd 			if ((bsize = atoi(optarg)) < MINBSIZE)
    246      1.25  christos 				errx(1, "%s: bad block size", optarg);
    247       1.1       cgd 			break;
    248       1.1       cgd 		case 'c':
    249       1.1       cgd 			if ((cpg = atoi(optarg)) <= 0)
    250      1.25  christos 				errx(1, "%s: bad cylinders/group", optarg);
    251       1.1       cgd 			cpgflg++;
    252       1.1       cgd 			break;
    253       1.1       cgd 		case 'd':
    254       1.1       cgd 			if ((rotdelay = atoi(optarg)) < 0)
    255      1.25  christos 				errx(1, "%s: bad rotational delay", optarg);
    256       1.1       cgd 			break;
    257       1.1       cgd 		case 'e':
    258       1.1       cgd 			if ((maxbpg = atoi(optarg)) <= 0)
    259      1.25  christos 		errx(1, "%s: bad blocks per file in a cylinder group",
    260       1.1       cgd 				    optarg);
    261       1.1       cgd 			break;
    262       1.1       cgd 		case 'f':
    263       1.1       cgd 			if ((fsize = atoi(optarg)) <= 0)
    264      1.25  christos 				errx(1, "%s: bad fragment size", optarg);
    265       1.1       cgd 			break;
    266       1.1       cgd 		case 'i':
    267       1.1       cgd 			if ((density = atoi(optarg)) <= 0)
    268      1.25  christos 				errx(1, "%s: bad bytes per inode", optarg);
    269       1.1       cgd 			break;
    270       1.1       cgd 		case 'k':
    271       1.1       cgd 			if ((trackskew = atoi(optarg)) < 0)
    272      1.25  christos 				errx(1, "%s: bad track skew", optarg);
    273       1.1       cgd 			break;
    274       1.1       cgd 		case 'l':
    275       1.1       cgd 			if ((interleave = atoi(optarg)) <= 0)
    276      1.25  christos 				errx(1, "%s: bad interleave", optarg);
    277       1.1       cgd 			break;
    278       1.1       cgd 		case 'm':
    279       1.1       cgd 			if ((minfree = atoi(optarg)) < 0 || minfree > 99)
    280      1.25  christos 				errx(1, "%s: bad free space %%", optarg);
    281       1.1       cgd 			break;
    282       1.1       cgd 		case 'n':
    283       1.1       cgd 			if ((nrpos = atoi(optarg)) <= 0)
    284      1.25  christos 				errx(1, "%s: bad rotational layout count",
    285       1.1       cgd 				    optarg);
    286       1.1       cgd 			break;
    287       1.1       cgd 		case 'o':
    288      1.10   mycroft 			if (mfs)
    289      1.27     lukem 				getmntopts(optarg, mopts, &mntflags, 0);
    290      1.10   mycroft 			else {
    291      1.10   mycroft 				if (strcmp(optarg, "space") == 0)
    292      1.10   mycroft 					opt = FS_OPTSPACE;
    293      1.10   mycroft 				else if (strcmp(optarg, "time") == 0)
    294      1.10   mycroft 					opt = FS_OPTTIME;
    295      1.10   mycroft 				else
    296      1.25  christos 				    errx(1, "%s %s",
    297      1.25  christos 					"unknown optimization preference: ",
    298      1.25  christos 					"use `space' or `time'.");
    299      1.10   mycroft 			}
    300       1.1       cgd 			break;
    301       1.1       cgd 		case 'p':
    302       1.1       cgd 			if ((trackspares = atoi(optarg)) < 0)
    303      1.25  christos 				errx(1, "%s: bad spare sectors per track",
    304       1.1       cgd 				    optarg);
    305       1.1       cgd 			break;
    306       1.1       cgd 		case 'r':
    307       1.1       cgd 			if ((rpm = atoi(optarg)) <= 0)
    308      1.25  christos 				errx(1, "%s: bad revolutions/minute", optarg);
    309       1.1       cgd 			break;
    310       1.1       cgd 		case 's':
    311       1.1       cgd 			if ((fssize = atoi(optarg)) <= 0)
    312      1.25  christos 				errx(1, "%s: bad file system size", optarg);
    313       1.1       cgd 			break;
    314       1.1       cgd 		case 't':
    315       1.1       cgd 			if ((ntracks = atoi(optarg)) <= 0)
    316      1.25  christos 				errx(1, "%s: bad total tracks", optarg);
    317       1.1       cgd 			break;
    318       1.1       cgd 		case 'u':
    319       1.1       cgd 			if ((nsectors = atoi(optarg)) <= 0)
    320      1.25  christos 				errx(1, "%s: bad sectors/track", optarg);
    321       1.1       cgd 			break;
    322       1.1       cgd 		case 'x':
    323       1.1       cgd 			if ((cylspares = atoi(optarg)) < 0)
    324      1.25  christos 				errx(1, "%s: bad spare sectors per cylinder",
    325       1.1       cgd 				    optarg);
    326       1.1       cgd 			break;
    327       1.1       cgd 		case '?':
    328       1.1       cgd 		default:
    329       1.1       cgd 			usage();
    330       1.1       cgd 		}
    331       1.1       cgd 	argc -= optind;
    332       1.1       cgd 	argv += optind;
    333       1.1       cgd 
    334       1.1       cgd 	if (argc != 2 && (mfs || argc != 1))
    335       1.1       cgd 		usage();
    336       1.1       cgd 
    337       1.1       cgd 	special = argv[0];
    338      1.14       cgd 	if (mfs && !strcmp(special, "swap")) {
    339      1.14       cgd 		/*
    340      1.14       cgd 		 * it's an MFS, mounted on "swap."  fake up a label.
    341      1.14       cgd 		 * XXX XXX XXX
    342      1.14       cgd 		 */
    343      1.14       cgd 		fso = -1;	/* XXX; normally done below. */
    344      1.14       cgd 
    345      1.14       cgd 		memset(&mfsfakelabel, 0, sizeof(mfsfakelabel));
    346      1.14       cgd 		mfsfakelabel.d_secsize = 512;
    347      1.14       cgd 		mfsfakelabel.d_nsectors = 64;
    348      1.14       cgd 		mfsfakelabel.d_ntracks = 16;
    349      1.14       cgd 		mfsfakelabel.d_ncylinders = 16;
    350      1.14       cgd 		mfsfakelabel.d_secpercyl = 1024;
    351      1.14       cgd 		mfsfakelabel.d_secperunit = 16384;
    352      1.14       cgd 		mfsfakelabel.d_rpm = 3600;
    353      1.14       cgd 		mfsfakelabel.d_interleave = 1;
    354      1.14       cgd 		mfsfakelabel.d_npartitions = 1;
    355      1.14       cgd 		mfsfakelabel.d_partitions[0].p_size = 16384;
    356      1.14       cgd 		mfsfakelabel.d_partitions[0].p_fsize = 1024;
    357      1.14       cgd 		mfsfakelabel.d_partitions[0].p_frag = 8;
    358      1.14       cgd 		mfsfakelabel.d_partitions[0].p_cpg = 16;
    359      1.14       cgd 
    360      1.14       cgd 		lp = &mfsfakelabel;
    361      1.14       cgd 		pp = &mfsfakelabel.d_partitions[0];
    362      1.14       cgd 
    363      1.14       cgd 		goto havelabel;
    364      1.14       cgd 	}
    365      1.11   mycroft 	cp = strrchr(special, '/');
    366       1.1       cgd 	if (cp == 0) {
    367       1.1       cgd 		/*
    368       1.1       cgd 		 * No path prefix; try /dev/r%s then /dev/%s.
    369       1.1       cgd 		 */
    370       1.1       cgd 		(void)sprintf(device, "%sr%s", _PATH_DEV, special);
    371       1.1       cgd 		if (stat(device, &st) == -1)
    372       1.1       cgd 			(void)sprintf(device, "%s%s", _PATH_DEV, special);
    373       1.1       cgd 		special = device;
    374       1.1       cgd 	}
    375      1.10   mycroft 	if (Nflag) {
    376      1.10   mycroft 		fso = -1;
    377      1.10   mycroft 	} else {
    378       1.1       cgd 		fso = open(special, O_WRONLY);
    379       1.1       cgd 		if (fso < 0)
    380      1.28     enami 			err(1, "%s: open", special);
    381      1.10   mycroft 
    382      1.10   mycroft 		/* Bail if target special is mounted */
    383      1.10   mycroft 		n = getmntinfo(&mp, MNT_NOWAIT);
    384      1.10   mycroft 		if (n == 0)
    385      1.28     enami 			err(1, "%s: getmntinfo", special);
    386      1.10   mycroft 
    387      1.10   mycroft 		len = sizeof(_PATH_DEV) - 1;
    388      1.10   mycroft 		s1 = special;
    389      1.10   mycroft 		if (strncmp(_PATH_DEV, s1, len) == 0)
    390      1.10   mycroft 			s1 += len;
    391      1.10   mycroft 
    392      1.10   mycroft 		while (--n >= 0) {
    393      1.10   mycroft 			s2 = mp->f_mntfromname;
    394      1.10   mycroft 			if (strncmp(_PATH_DEV, s2, len) == 0) {
    395      1.10   mycroft 				s2 += len - 1;
    396      1.10   mycroft 				*s2 = 'r';
    397      1.10   mycroft 			}
    398      1.10   mycroft 			if (strcmp(s1, s2) == 0 || strcmp(s1, &s2[1]) == 0)
    399      1.25  christos 				errx(1, "%s is mounted on %s",
    400      1.10   mycroft 				    special, mp->f_mntonname);
    401      1.10   mycroft 			++mp;
    402      1.10   mycroft 		}
    403      1.10   mycroft 	}
    404      1.10   mycroft 	if (mfs && disktype != NULL) {
    405      1.10   mycroft 		lp = (struct disklabel *)getdiskbyname(disktype);
    406      1.10   mycroft 		if (lp == NULL)
    407      1.25  christos 			errx(1, "%s: unknown disk type", disktype);
    408      1.10   mycroft 		pp = &lp->d_partitions[1];
    409      1.10   mycroft 	} else {
    410      1.10   mycroft 		fsi = open(special, O_RDONLY);
    411      1.10   mycroft 		if (fsi < 0)
    412      1.28     enami 			err(1, "%s: open", special);
    413      1.10   mycroft 		if (fstat(fsi, &st) < 0)
    414      1.28     enami 			err(1, "%s: fstat", special);
    415      1.15   mycroft 		if (!S_ISCHR(st.st_mode) && !mfs)
    416      1.25  christos 			warnx("%s: not a character-special device", special);
    417      1.11   mycroft 		cp = strchr(argv[0], '\0') - 1;
    418      1.25  christos 		if (cp == 0 || ((*cp < 'a' || *cp > ('a' + maxpartitions - 1))
    419      1.25  christos 		    && !isdigit(*cp)))
    420      1.25  christos 			errx(1, "can't figure out file system partition");
    421       1.1       cgd #ifdef COMPAT
    422      1.10   mycroft 		if (!mfs && disktype == NULL)
    423      1.10   mycroft 			disktype = argv[1];
    424       1.1       cgd #endif
    425      1.10   mycroft 		lp = getdisklabel(special, fsi);
    426      1.10   mycroft 		if (isdigit(*cp))
    427      1.10   mycroft 			pp = &lp->d_partitions[0];
    428      1.10   mycroft 		else
    429      1.10   mycroft 			pp = &lp->d_partitions[*cp - 'a'];
    430      1.10   mycroft 		if (pp->p_size == 0)
    431      1.25  christos 			errx(1, "`%c' partition is unavailable", *cp);
    432      1.10   mycroft 		if (pp->p_fstype == FS_BOOT)
    433      1.25  christos 			errx(1, "`%c' partition overlaps boot program", *cp);
    434      1.10   mycroft 	}
    435      1.14       cgd havelabel:
    436       1.1       cgd 	if (fssize == 0)
    437       1.1       cgd 		fssize = pp->p_size;
    438       1.1       cgd 	if (fssize > pp->p_size && !mfs)
    439      1.25  christos 		errx(1, "maximum file system size on the `%c' partition is %d",
    440      1.25  christos 		    *cp, pp->p_size);
    441       1.1       cgd 	if (rpm == 0) {
    442       1.1       cgd 		rpm = lp->d_rpm;
    443       1.1       cgd 		if (rpm <= 0)
    444       1.1       cgd 			rpm = 3600;
    445       1.1       cgd 	}
    446       1.1       cgd 	if (ntracks == 0) {
    447       1.1       cgd 		ntracks = lp->d_ntracks;
    448       1.1       cgd 		if (ntracks <= 0)
    449      1.25  christos 			errx(1, "no default #tracks");
    450       1.1       cgd 	}
    451       1.1       cgd 	if (nsectors == 0) {
    452       1.1       cgd 		nsectors = lp->d_nsectors;
    453       1.1       cgd 		if (nsectors <= 0)
    454      1.25  christos 			errx(1, "no default #sectors/track");
    455       1.1       cgd 	}
    456       1.1       cgd 	if (sectorsize == 0) {
    457       1.1       cgd 		sectorsize = lp->d_secsize;
    458       1.1       cgd 		if (sectorsize <= 0)
    459      1.25  christos 			errx(1, "no default sector size");
    460       1.1       cgd 	}
    461       1.1       cgd 	if (trackskew == -1) {
    462       1.1       cgd 		trackskew = lp->d_trackskew;
    463       1.1       cgd 		if (trackskew < 0)
    464       1.1       cgd 			trackskew = 0;
    465       1.1       cgd 	}
    466       1.1       cgd 	if (interleave == 0) {
    467       1.1       cgd 		interleave = lp->d_interleave;
    468       1.1       cgd 		if (interleave <= 0)
    469       1.1       cgd 			interleave = 1;
    470       1.1       cgd 	}
    471       1.1       cgd 	if (fsize == 0) {
    472       1.1       cgd 		fsize = pp->p_fsize;
    473       1.1       cgd 		if (fsize <= 0)
    474       1.1       cgd 			fsize = MAX(DFL_FRAGSIZE, lp->d_secsize);
    475       1.1       cgd 	}
    476       1.1       cgd 	if (bsize == 0) {
    477       1.1       cgd 		bsize = pp->p_frag * pp->p_fsize;
    478       1.1       cgd 		if (bsize <= 0)
    479       1.1       cgd 			bsize = MIN(DFL_BLKSIZE, 8 * fsize);
    480       1.1       cgd 	}
    481      1.10   mycroft 	/*
    482      1.10   mycroft 	 * Maxcontig sets the default for the maximum number of blocks
    483      1.10   mycroft 	 * that may be allocated sequentially. With filesystem clustering
    484      1.10   mycroft 	 * it is possible to allocate contiguous blocks up to the maximum
    485      1.10   mycroft 	 * transfer size permitted by the controller or buffering.
    486      1.10   mycroft 	 */
    487      1.10   mycroft 	if (maxcontig == 0)
    488      1.27     lukem 		maxcontig = MAX(1, MIN(MAXPHYS, MAXBSIZE) / bsize);
    489       1.1       cgd 	if (density == 0)
    490       1.1       cgd 		density = NFPI * fsize;
    491       1.8       cgd 	if (minfree < MINFREE && opt != FS_OPTSPACE) {
    492      1.25  christos 		warnx("%s %s %d%%", "Warning: changing optimization to space",
    493      1.25  christos 		    "because minfree is less than", MINFREE);
    494       1.1       cgd 		opt = FS_OPTSPACE;
    495       1.1       cgd 	}
    496       1.1       cgd 	if (trackspares == -1) {
    497       1.1       cgd 		trackspares = lp->d_sparespertrack;
    498       1.1       cgd 		if (trackspares < 0)
    499       1.1       cgd 			trackspares = 0;
    500       1.1       cgd 	}
    501       1.1       cgd 	nphyssectors = nsectors + trackspares;
    502       1.1       cgd 	if (cylspares == -1) {
    503       1.1       cgd 		cylspares = lp->d_sparespercyl;
    504       1.1       cgd 		if (cylspares < 0)
    505       1.1       cgd 			cylspares = 0;
    506       1.1       cgd 	}
    507       1.1       cgd 	secpercyl = nsectors * ntracks - cylspares;
    508       1.1       cgd 	if (secpercyl != lp->d_secpercyl)
    509      1.25  christos 		warnx("%s (%d) %s (%u)\n",
    510       1.1       cgd 			"Warning: calculated sectors per cylinder", secpercyl,
    511       1.1       cgd 			"disagrees with disk label", lp->d_secpercyl);
    512       1.1       cgd 	if (maxbpg == 0)
    513       1.1       cgd 		maxbpg = MAXBLKPG(bsize);
    514       1.1       cgd 	headswitch = lp->d_headswitch;
    515       1.1       cgd 	trackseek = lp->d_trkseek;
    516       1.1       cgd #ifdef notdef /* label may be 0 if faked up by kernel */
    517       1.1       cgd 	bbsize = lp->d_bbsize;
    518       1.1       cgd 	sbsize = lp->d_sbsize;
    519       1.1       cgd #endif
    520       1.1       cgd 	oldpartition = *pp;
    521       1.1       cgd 	mkfs(pp, special, fsi, fso);
    522      1.12   mycroft 	if (!Nflag && memcmp(pp, &oldpartition, sizeof(oldpartition)))
    523       1.1       cgd 		rewritelabel(special, fso, lp);
    524       1.1       cgd 	if (!Nflag)
    525       1.1       cgd 		close(fso);
    526       1.1       cgd 	close(fsi);
    527       1.1       cgd #ifdef MFS
    528       1.1       cgd 	if (mfs) {
    529       1.1       cgd 		struct mfs_args args;
    530       1.1       cgd 
    531  1.29.2.1    mellon 		switch (pid = fork()) {
    532  1.29.2.1    mellon 		case -1:
    533  1.29.2.1    mellon 			perror("mfs");
    534  1.29.2.1    mellon 			exit(10);
    535  1.29.2.1    mellon 		case 0:
    536  1.29.2.1    mellon 			sprintf(mountfromname, "mfs:%d", getpid());
    537  1.29.2.1    mellon 			break;
    538  1.29.2.1    mellon 		default:
    539  1.29.2.1    mellon 			sprintf(mountfromname, "mfs:%d", pid);
    540  1.29.2.1    mellon 			for (;;) {
    541  1.29.2.1    mellon 				/*
    542  1.29.2.1    mellon 				 * spin until the mount succeeds
    543  1.29.2.1    mellon 				 * or the child exits
    544  1.29.2.1    mellon 				 */
    545  1.29.2.1    mellon 				usleep(1);
    546  1.29.2.1    mellon 
    547  1.29.2.1    mellon 				/*
    548  1.29.2.1    mellon 				 * XXX Here is a race condition: another process
    549  1.29.2.1    mellon 				 * can mount a filesystem which hides our
    550  1.29.2.1    mellon 				 * ramdisk before we see the success.
    551  1.29.2.1    mellon 				 */
    552  1.29.2.1    mellon 				if (statfs(argv[1], &sf) < 0)
    553  1.29.2.1    mellon 					err(88, "statfs %s", argv[1]);
    554  1.29.2.1    mellon 				if (!strcmp(sf.f_mntfromname, mountfromname) &&
    555  1.29.2.1    mellon 				    !strncmp(sf.f_mntonname, argv[1],
    556  1.29.2.1    mellon 					     MNAMELEN) &&
    557  1.29.2.1    mellon 				    !strcmp(sf.f_fstypename, "mfs"))
    558  1.29.2.1    mellon 					exit(0);
    559  1.29.2.1    mellon 
    560  1.29.2.1    mellon 				res = waitpid(pid, &status, WNOHANG);
    561  1.29.2.1    mellon 				if (res == -1)
    562  1.29.2.1    mellon 					err(11, "waitpid");
    563  1.29.2.1    mellon 				if (res != pid)
    564  1.29.2.1    mellon 					continue;
    565  1.29.2.2    mellon 				if (WIFEXITED(status)) {
    566  1.29.2.2    mellon 					if (WEXITSTATUS(status) == 0)
    567  1.29.2.2    mellon 						exit(0);
    568  1.29.2.1    mellon 					errx(1, "%s: mount: %s", argv[1],
    569  1.29.2.1    mellon 					     strerror(WEXITSTATUS(status)));
    570  1.29.2.2    mellon 				} else
    571  1.29.2.1    mellon 					errx(11, "abnormal termination");
    572  1.29.2.1    mellon 			}
    573  1.29.2.1    mellon 			/* NOTREACHED */
    574  1.29.2.1    mellon 		}
    575  1.29.2.1    mellon 
    576  1.29.2.1    mellon 		(void) setsid();
    577  1.29.2.1    mellon 		(void) close(0);
    578  1.29.2.1    mellon 		(void) close(1);
    579  1.29.2.1    mellon 		(void) close(2);
    580  1.29.2.1    mellon 		(void) chdir("/");
    581  1.29.2.1    mellon 
    582  1.29.2.1    mellon 		args.fspec = mountfromname;
    583      1.10   mycroft 		args.export.ex_root = -2;
    584      1.10   mycroft 		if (mntflags & MNT_RDONLY)
    585      1.10   mycroft 			args.export.ex_flags = MNT_EXRDONLY;
    586      1.10   mycroft 		else
    587      1.10   mycroft 			args.export.ex_flags = 0;
    588       1.1       cgd 		args.base = membase;
    589       1.1       cgd 		args.size = fssize * sectorsize;
    590       1.1       cgd 		if (mount(MOUNT_MFS, argv[1], mntflags, &args) < 0)
    591  1.29.2.1    mellon 			exit(errno); /* parent prints message */
    592       1.1       cgd 	}
    593       1.1       cgd #endif
    594       1.1       cgd 	exit(0);
    595       1.1       cgd }
    596       1.1       cgd 
    597       1.1       cgd #ifdef COMPAT
    598       1.1       cgd char lmsg[] = "%s: can't read disk label; disk type must be specified";
    599       1.1       cgd #else
    600       1.1       cgd char lmsg[] = "%s: can't read disk label";
    601       1.1       cgd #endif
    602       1.1       cgd 
    603      1.25  christos static struct disklabel *
    604       1.1       cgd getdisklabel(s, fd)
    605       1.1       cgd 	char *s;
    606      1.24       tls 	volatile int fd;
    607       1.1       cgd {
    608       1.1       cgd 	static struct disklabel lab;
    609       1.1       cgd 
    610      1.24       tls 	if (ioctl(fd, DIOCGDINFO, &lab) < 0) {
    611       1.1       cgd #ifdef COMPAT
    612       1.1       cgd 		if (disktype) {
    613      1.25  christos 			struct disklabel *lp;
    614       1.1       cgd 
    615       1.1       cgd 			unlabeled++;
    616       1.1       cgd 			lp = getdiskbyname(disktype);
    617       1.1       cgd 			if (lp == NULL)
    618      1.25  christos 				errx(1, "%s: unknown disk type", disktype);
    619       1.1       cgd 			return (lp);
    620       1.1       cgd 		}
    621       1.1       cgd #endif
    622      1.10   mycroft 		warn("ioctl (GDINFO)");
    623      1.25  christos 		errx(1, lmsg, s);
    624       1.1       cgd 	}
    625       1.1       cgd 	return (&lab);
    626       1.1       cgd }
    627       1.1       cgd 
    628      1.25  christos static void
    629       1.1       cgd rewritelabel(s, fd, lp)
    630       1.1       cgd 	char *s;
    631      1.24       tls 	volatile int fd;
    632      1.25  christos 	struct disklabel *lp;
    633       1.1       cgd {
    634       1.1       cgd #ifdef COMPAT
    635       1.1       cgd 	if (unlabeled)
    636       1.1       cgd 		return;
    637       1.1       cgd #endif
    638       1.1       cgd 	lp->d_checksum = 0;
    639       1.1       cgd 	lp->d_checksum = dkcksum(lp);
    640       1.1       cgd 	if (ioctl(fd, DIOCWDINFO, (char *)lp) < 0) {
    641      1.10   mycroft 		warn("ioctl (WDINFO)");
    642      1.25  christos 		errx(1, "%s: can't rewrite disk label", s);
    643       1.1       cgd 	}
    644       1.1       cgd #if vax
    645       1.1       cgd 	if (lp->d_type == DTYPE_SMD && lp->d_flags & D_BADSECT) {
    646      1.25  christos 		int i;
    647       1.1       cgd 		int cfd;
    648       1.1       cgd 		daddr_t alt;
    649       1.1       cgd 		char specname[64];
    650       1.1       cgd 		char blk[1024];
    651       1.1       cgd 		char *cp;
    652       1.1       cgd 
    653       1.1       cgd 		/*
    654       1.1       cgd 		 * Make name for 'c' partition.
    655       1.1       cgd 		 */
    656       1.1       cgd 		strcpy(specname, s);
    657       1.1       cgd 		cp = specname + strlen(specname) - 1;
    658       1.1       cgd 		if (!isdigit(*cp))
    659       1.1       cgd 			*cp = 'c';
    660       1.1       cgd 		cfd = open(specname, O_WRONLY);
    661       1.1       cgd 		if (cfd < 0)
    662      1.28     enami 			err(1, "%s: open", specname);
    663      1.11   mycroft 		memset(blk, 0, sizeof(blk));
    664       1.1       cgd 		*(struct disklabel *)(blk + LABELOFFSET) = *lp;
    665       1.1       cgd 		alt = lp->d_ncylinders * lp->d_secpercyl - lp->d_nsectors;
    666       1.1       cgd 		for (i = 1; i < 11 && i < lp->d_nsectors; i += 2) {
    667      1.17       cgd 			off_t offset;
    668      1.17       cgd 
    669      1.17       cgd 			offset = alt + i;
    670      1.17       cgd 			offset *= lp->d_secsize;
    671      1.17       cgd 			if (lseek(cfd, offset, SEEK_SET) == -1)
    672      1.25  christos 				err(1, "lseek to badsector area: ");
    673       1.1       cgd 			if (write(cfd, blk, lp->d_secsize) < lp->d_secsize)
    674      1.10   mycroft 				warn("alternate label %d write", i/2);
    675       1.1       cgd 		}
    676       1.1       cgd 		close(cfd);
    677       1.1       cgd 	}
    678       1.1       cgd #endif
    679       1.1       cgd }
    680       1.1       cgd 
    681      1.25  christos static void
    682       1.1       cgd usage()
    683       1.1       cgd {
    684       1.1       cgd 	if (mfs) {
    685       1.1       cgd 		fprintf(stderr,
    686      1.10   mycroft 		    "usage: %s [ -fsoptions ] special-device mount-point\n",
    687      1.25  christos 			__progname);
    688       1.1       cgd 	} else
    689       1.1       cgd 		fprintf(stderr,
    690      1.10   mycroft 		    "usage: %s [ -fsoptions ] special-device%s\n",
    691      1.25  christos 		    __progname,
    692       1.1       cgd #ifdef COMPAT
    693       1.1       cgd 		    " [device-type]");
    694       1.1       cgd #else
    695       1.1       cgd 		    "");
    696       1.1       cgd #endif
    697       1.1       cgd 	fprintf(stderr, "where fsoptions are:\n");
    698       1.1       cgd 	fprintf(stderr,
    699       1.1       cgd 	    "\t-N do not create file system, just print out parameters\n");
    700      1.10   mycroft 	fprintf(stderr, "\t-O create a 4.3BSD format filesystem\n");
    701       1.1       cgd 	fprintf(stderr, "\t-S sector size\n");
    702       1.1       cgd #ifdef COMPAT
    703       1.1       cgd 	fprintf(stderr, "\t-T disktype\n");
    704       1.1       cgd #endif
    705       1.1       cgd 	fprintf(stderr, "\t-a maximum contiguous blocks\n");
    706       1.1       cgd 	fprintf(stderr, "\t-b block size\n");
    707       1.1       cgd 	fprintf(stderr, "\t-c cylinders/group\n");
    708       1.1       cgd 	fprintf(stderr, "\t-d rotational delay between contiguous blocks\n");
    709       1.1       cgd 	fprintf(stderr, "\t-e maximum blocks per file in a cylinder group\n");
    710       1.1       cgd 	fprintf(stderr, "\t-f frag size\n");
    711       1.1       cgd 	fprintf(stderr, "\t-i number of bytes per inode\n");
    712       1.1       cgd 	fprintf(stderr, "\t-k sector 0 skew, per track\n");
    713       1.1       cgd 	fprintf(stderr, "\t-l hardware sector interleave\n");
    714       1.1       cgd 	fprintf(stderr, "\t-m minimum free space %%\n");
    715       1.1       cgd 	fprintf(stderr, "\t-n number of distinguished rotational positions\n");
    716       1.1       cgd 	fprintf(stderr, "\t-o optimization preference (`space' or `time')\n");
    717       1.1       cgd 	fprintf(stderr, "\t-p spare sectors per track\n");
    718       1.1       cgd 	fprintf(stderr, "\t-s file system size (sectors)\n");
    719       1.1       cgd 	fprintf(stderr, "\t-r revolutions/minute\n");
    720       1.1       cgd 	fprintf(stderr, "\t-t tracks/cylinder\n");
    721       1.1       cgd 	fprintf(stderr, "\t-u sectors/track\n");
    722       1.1       cgd 	fprintf(stderr, "\t-x spare sectors per cylinder\n");
    723       1.1       cgd 	exit(1);
    724       1.1       cgd }
    725