Home | History | Annotate | Line # | Download | only in newfs
newfs.c revision 1.38.8.3
      1  1.38.8.3        he /*	$NetBSD: newfs.c,v 1.38.8.3 2001/11/25 19:32:54 he 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.38.8.3        he __RCSID("$NetBSD: newfs.c,v 1.38.8.3 2001/11/25 19:32:54 he 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.30  drochner #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.32      fvdl #include <ufs/ufs/ufsmount.h>
     65      1.10   mycroft #include <ufs/ffs/fs.h>
     66      1.10   mycroft 
     67      1.10   mycroft #include <ctype.h>
     68      1.37      tron #include <disktab.h>
     69       1.1       cgd #include <errno.h>
     70      1.10   mycroft #include <paths.h>
     71       1.1       cgd #include <stdio.h>
     72      1.10   mycroft #include <stdlib.h>
     73       1.1       cgd #include <string.h>
     74      1.10   mycroft #include <syslog.h>
     75      1.10   mycroft #include <unistd.h>
     76      1.30  drochner #include <signal.h>
     77      1.25  christos #include <err.h>
     78      1.20   thorpej #include <util.h>
     79      1.10   mycroft 
     80      1.10   mycroft #include "mntopts.h"
     81      1.25  christos #include "dkcksum.h"
     82      1.25  christos #include "extern.h"
     83      1.10   mycroft 
     84      1.10   mycroft struct mntopt mopts[] = {
     85      1.10   mycroft 	MOPT_STDOPTS,
     86      1.10   mycroft 	MOPT_ASYNC,
     87      1.22       cgd 	MOPT_UPDATE,
     88      1.23       tls 	MOPT_NOATIME,
     89      1.10   mycroft 	{ NULL },
     90      1.10   mycroft };
     91      1.10   mycroft 
     92  1.38.8.2        he static struct disklabel *getdisklabel(char *, int);
     93  1.38.8.2        he static void rewritelabel(char *, int, struct disklabel *);
     94  1.38.8.2        he static void usage(void);
     95  1.38.8.2        he int main(int, char *[]);
     96       1.1       cgd 
     97       1.1       cgd #define	COMPAT			/* allow non-labeled disks */
     98       1.1       cgd 
     99       1.1       cgd /*
    100       1.1       cgd  * The following two constants set the default block and fragment sizes.
    101       1.1       cgd  * Both constants must be a power of 2 and meet the following constraints:
    102       1.1       cgd  *	MINBSIZE <= DESBLKSIZE <= MAXBSIZE
    103       1.1       cgd  *	sectorsize <= DESFRAGSIZE <= DESBLKSIZE
    104       1.1       cgd  *	DESBLKSIZE / DESFRAGSIZE <= 8
    105       1.1       cgd  */
    106       1.1       cgd #define	DFL_FRAGSIZE	1024
    107       1.1       cgd #define	DFL_BLKSIZE	8192
    108       1.1       cgd 
    109       1.1       cgd /*
    110       1.1       cgd  * Cylinder groups may have up to many cylinders. The actual
    111       1.1       cgd  * number used depends upon how much information can be stored
    112       1.1       cgd  * on a single cylinder. The default is to use 16 cylinders
    113       1.1       cgd  * per group.
    114       1.1       cgd  */
    115       1.1       cgd #define	DESCPG		16	/* desired fs_cpg */
    116       1.1       cgd 
    117       1.1       cgd /*
    118       1.1       cgd  * ROTDELAY gives the minimum number of milliseconds to initiate
    119       1.1       cgd  * another disk transfer on the same cylinder. It is used in
    120       1.1       cgd  * determining the rotationally optimal layout for disk blocks
    121      1.13   mycroft  * within a file; the default of fs_rotdelay is 0ms.
    122       1.1       cgd  */
    123      1.13   mycroft #define ROTDELAY	0
    124       1.1       cgd 
    125       1.1       cgd /*
    126       1.1       cgd  * MAXBLKPG determines the maximum number of data blocks which are
    127       1.1       cgd  * placed in a single cylinder group. The default is one indirect
    128       1.1       cgd  * block worth of data blocks.
    129       1.1       cgd  */
    130       1.1       cgd #define MAXBLKPG(bsize)	((bsize) / sizeof(daddr_t))
    131       1.1       cgd 
    132       1.1       cgd /*
    133       1.1       cgd  * Each file system has a number of inodes statically allocated.
    134       1.1       cgd  * We allocate one inode slot per NFPI fragments, expecting this
    135       1.1       cgd  * to be far more than we will ever need.
    136       1.1       cgd  */
    137       1.1       cgd #define	NFPI		4
    138       1.1       cgd 
    139       1.1       cgd /*
    140       1.1       cgd  * For each cylinder we keep track of the availability of blocks at different
    141       1.1       cgd  * rotational positions, so that we can lay out the data to be picked
    142       1.1       cgd  * up with minimum rotational latency.  NRPOS is the default number of
    143       1.1       cgd  * rotational positions that we distinguish.  With NRPOS of 8 the resolution
    144      1.13   mycroft  * of our summary information is 2ms for a typical 3600 rpm drive.  Caching
    145      1.13   mycroft  * and zoning pretty much defeats rotational optimization, so we now use a
    146      1.13   mycroft  * default of 1.
    147       1.1       cgd  */
    148      1.13   mycroft #define	NRPOS		1	/* number distinct rotational positions */
    149       1.1       cgd 
    150       1.1       cgd 
    151       1.1       cgd int	mfs;			/* run as the memory based filesystem */
    152       1.1       cgd int	Nflag;			/* run without writing file system */
    153      1.10   mycroft int	Oflag;			/* format as an 4.3BSD file system */
    154       1.1       cgd int	fssize;			/* file system size */
    155       1.1       cgd int	ntracks;		/* # tracks/cylinder */
    156       1.1       cgd int	nsectors;		/* # sectors/track */
    157       1.1       cgd int	nphyssectors;		/* # sectors/track including spares */
    158       1.1       cgd int	secpercyl;		/* sectors per cylinder */
    159       1.1       cgd int	trackspares = -1;	/* spare sectors per track */
    160       1.1       cgd int	cylspares = -1;		/* spare sectors per cylinder */
    161       1.1       cgd int	sectorsize;		/* bytes/sector */
    162       1.1       cgd int	rpm;			/* revolutions/minute of drive */
    163       1.1       cgd int	interleave;		/* hardware sector interleave */
    164       1.1       cgd int	trackskew = -1;		/* sector 0 skew, per track */
    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.36   mycroft int	maxcontig = 0;		/* 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.33    bouyer int needswap =0;		/* Filesystem not in native byte order */
    182       1.1       cgd #ifdef COMPAT
    183       1.1       cgd char	*disktype;
    184       1.1       cgd int	unlabeled;
    185       1.1       cgd #endif
    186       1.1       cgd 
    187       1.1       cgd char	device[MAXPATHLEN];
    188      1.25  christos extern char *__progname;
    189       1.1       cgd 
    190      1.10   mycroft int
    191  1.38.8.2        he main(int argc, char *argv[])
    192       1.1       cgd {
    193      1.25  christos 	struct partition *pp;
    194      1.25  christos 	struct disklabel *lp;
    195      1.14       cgd 	struct disklabel mfsfakelabel;
    196       1.1       cgd 	struct partition oldpartition;
    197       1.1       cgd 	struct stat st;
    198      1.10   mycroft 	struct statfs *mp;
    199  1.38.8.2        he 	int ch, fsi = 0, fso, len, maxpartitions, n;
    200  1.38.8.2        he 	char *cp = NULL, *endp, *opstring, *s1, *s2, *special;
    201      1.30  drochner #ifdef MFS
    202      1.30  drochner 	char mountfromname[100];
    203      1.30  drochner 	pid_t pid, res;
    204      1.30  drochner 	struct statfs sf;
    205      1.30  drochner 	int status;
    206      1.30  drochner #endif
    207       1.1       cgd 
    208      1.25  christos 	if (strstr(__progname, "mfs")) {
    209       1.1       cgd 		mfs = 1;
    210       1.1       cgd 		Nflag++;
    211       1.1       cgd 	}
    212       1.1       cgd 
    213      1.19   thorpej 	maxpartitions = getmaxpartitions();
    214      1.19   thorpej 	if (maxpartitions > 26)
    215      1.25  christos 		errx(1, "insane maxpartitions value %d", maxpartitions);
    216      1.19   thorpej 
    217      1.10   mycroft 	opstring = mfs ?
    218      1.10   mycroft 	    "NT:a:b:c:d:e:f:i:m:o:s:" :
    219      1.33    bouyer 	    "B:NOS:T:a:b:c:d:e:f:i:k:l:m:n:o:p:r:s:t:u:x:";
    220      1.26     lukem 	while ((ch = getopt(argc, argv, opstring)) != -1)
    221      1.10   mycroft 		switch (ch) {
    222      1.33    bouyer 		case 'B':
    223      1.33    bouyer 			if (strcmp(optarg, "be") == 0) {
    224      1.33    bouyer #if BYTE_ORDER == LITTLE_ENDIAN
    225      1.33    bouyer 				needswap = 1;
    226      1.33    bouyer #endif
    227      1.33    bouyer 			} else if (strcmp(optarg, "le") == 0) {
    228      1.33    bouyer #if BYTE_ORDER == BIG_ENDIAN
    229      1.33    bouyer 				needswap = 1;
    230      1.33    bouyer #endif
    231      1.33    bouyer 			} else
    232      1.33    bouyer 				usage();
    233      1.33    bouyer 			break;
    234      1.10   mycroft 		case 'N':
    235      1.10   mycroft 			Nflag = 1;
    236       1.1       cgd 			break;
    237      1.10   mycroft 		case 'O':
    238      1.10   mycroft 			Oflag = 1;
    239       1.1       cgd 			break;
    240       1.1       cgd 		case 'S':
    241       1.1       cgd 			if ((sectorsize = atoi(optarg)) <= 0)
    242      1.25  christos 				errx(1, "%s: bad sector size", optarg);
    243       1.1       cgd 			break;
    244       1.1       cgd #ifdef COMPAT
    245       1.1       cgd 		case 'T':
    246       1.1       cgd 			disktype = optarg;
    247       1.1       cgd 			break;
    248       1.1       cgd #endif
    249       1.1       cgd 		case 'a':
    250       1.1       cgd 			if ((maxcontig = atoi(optarg)) <= 0)
    251      1.25  christos 				errx(1, "%s: bad maximum contiguous blocks",
    252       1.1       cgd 				    optarg);
    253       1.1       cgd 			break;
    254       1.1       cgd 		case 'b':
    255       1.1       cgd 			if ((bsize = atoi(optarg)) < MINBSIZE)
    256      1.25  christos 				errx(1, "%s: bad block size", optarg);
    257       1.1       cgd 			break;
    258       1.1       cgd 		case 'c':
    259       1.1       cgd 			if ((cpg = atoi(optarg)) <= 0)
    260      1.25  christos 				errx(1, "%s: bad cylinders/group", optarg);
    261       1.1       cgd 			cpgflg++;
    262       1.1       cgd 			break;
    263       1.1       cgd 		case 'd':
    264       1.1       cgd 			if ((rotdelay = atoi(optarg)) < 0)
    265      1.25  christos 				errx(1, "%s: bad rotational delay", optarg);
    266       1.1       cgd 			break;
    267       1.1       cgd 		case 'e':
    268       1.1       cgd 			if ((maxbpg = atoi(optarg)) <= 0)
    269      1.25  christos 		errx(1, "%s: bad blocks per file in a cylinder group",
    270       1.1       cgd 				    optarg);
    271       1.1       cgd 			break;
    272       1.1       cgd 		case 'f':
    273       1.1       cgd 			if ((fsize = atoi(optarg)) <= 0)
    274      1.25  christos 				errx(1, "%s: bad fragment size", optarg);
    275       1.1       cgd 			break;
    276       1.1       cgd 		case 'i':
    277       1.1       cgd 			if ((density = atoi(optarg)) <= 0)
    278      1.25  christos 				errx(1, "%s: bad bytes per inode", optarg);
    279       1.1       cgd 			break;
    280       1.1       cgd 		case 'k':
    281       1.1       cgd 			if ((trackskew = atoi(optarg)) < 0)
    282      1.25  christos 				errx(1, "%s: bad track skew", optarg);
    283       1.1       cgd 			break;
    284       1.1       cgd 		case 'l':
    285       1.1       cgd 			if ((interleave = atoi(optarg)) <= 0)
    286      1.25  christos 				errx(1, "%s: bad interleave", optarg);
    287       1.1       cgd 			break;
    288       1.1       cgd 		case 'm':
    289       1.1       cgd 			if ((minfree = atoi(optarg)) < 0 || minfree > 99)
    290      1.25  christos 				errx(1, "%s: bad free space %%", optarg);
    291       1.1       cgd 			break;
    292       1.1       cgd 		case 'n':
    293       1.1       cgd 			if ((nrpos = atoi(optarg)) <= 0)
    294      1.25  christos 				errx(1, "%s: bad rotational layout count",
    295       1.1       cgd 				    optarg);
    296       1.1       cgd 			break;
    297       1.1       cgd 		case 'o':
    298      1.10   mycroft 			if (mfs)
    299      1.27     lukem 				getmntopts(optarg, mopts, &mntflags, 0);
    300      1.10   mycroft 			else {
    301      1.10   mycroft 				if (strcmp(optarg, "space") == 0)
    302      1.10   mycroft 					opt = FS_OPTSPACE;
    303      1.10   mycroft 				else if (strcmp(optarg, "time") == 0)
    304      1.10   mycroft 					opt = FS_OPTTIME;
    305      1.10   mycroft 				else
    306      1.25  christos 				    errx(1, "%s %s",
    307      1.25  christos 					"unknown optimization preference: ",
    308      1.25  christos 					"use `space' or `time'.");
    309      1.10   mycroft 			}
    310       1.1       cgd 			break;
    311       1.1       cgd 		case 'p':
    312       1.1       cgd 			if ((trackspares = atoi(optarg)) < 0)
    313      1.25  christos 				errx(1, "%s: bad spare sectors per track",
    314       1.1       cgd 				    optarg);
    315       1.1       cgd 			break;
    316       1.1       cgd 		case 'r':
    317       1.1       cgd 			if ((rpm = atoi(optarg)) <= 0)
    318      1.25  christos 				errx(1, "%s: bad revolutions/minute", optarg);
    319       1.1       cgd 			break;
    320       1.1       cgd 		case 's':
    321  1.38.8.2        he 			fssize = (int)strtol(optarg, &endp, 10);
    322  1.38.8.2        he 			if (*endp) {
    323  1.38.8.2        he 				if (mfs) {	/* Only do 'm' for mfs */
    324  1.38.8.2        he 					if (*endp == 'm' || *endp == 'M')
    325  1.38.8.2        he 						fssize *= 1024 * 1024 / 512;
    326  1.38.8.2        he 					else
    327  1.38.8.2        he 						fssize = -1;	/* error */
    328  1.38.8.2        he 				}
    329  1.38.8.2        he 				else
    330  1.38.8.2        he 					fssize = -1;	/* error */
    331  1.38.8.2        he 			}
    332  1.38.8.2        he 			if (fssize <= 0)
    333      1.25  christos 				errx(1, "%s: bad file system size", optarg);
    334       1.1       cgd 			break;
    335       1.1       cgd 		case 't':
    336       1.1       cgd 			if ((ntracks = atoi(optarg)) <= 0)
    337      1.25  christos 				errx(1, "%s: bad total tracks", optarg);
    338       1.1       cgd 			break;
    339       1.1       cgd 		case 'u':
    340       1.1       cgd 			if ((nsectors = atoi(optarg)) <= 0)
    341      1.25  christos 				errx(1, "%s: bad sectors/track", optarg);
    342       1.1       cgd 			break;
    343       1.1       cgd 		case 'x':
    344       1.1       cgd 			if ((cylspares = atoi(optarg)) < 0)
    345      1.25  christos 				errx(1, "%s: bad spare sectors per cylinder",
    346       1.1       cgd 				    optarg);
    347       1.1       cgd 			break;
    348       1.1       cgd 		case '?':
    349       1.1       cgd 		default:
    350       1.1       cgd 			usage();
    351       1.1       cgd 		}
    352       1.1       cgd 	argc -= optind;
    353       1.1       cgd 	argv += optind;
    354       1.1       cgd 
    355       1.1       cgd 	if (argc != 2 && (mfs || argc != 1))
    356       1.1       cgd 		usage();
    357       1.1       cgd 
    358       1.1       cgd 	special = argv[0];
    359      1.14       cgd 	if (mfs && !strcmp(special, "swap")) {
    360      1.14       cgd 		/*
    361      1.14       cgd 		 * it's an MFS, mounted on "swap."  fake up a label.
    362      1.14       cgd 		 * XXX XXX XXX
    363      1.14       cgd 		 */
    364      1.14       cgd 		fso = -1;	/* XXX; normally done below. */
    365      1.14       cgd 
    366      1.14       cgd 		memset(&mfsfakelabel, 0, sizeof(mfsfakelabel));
    367      1.14       cgd 		mfsfakelabel.d_secsize = 512;
    368      1.14       cgd 		mfsfakelabel.d_nsectors = 64;
    369      1.14       cgd 		mfsfakelabel.d_ntracks = 16;
    370      1.14       cgd 		mfsfakelabel.d_ncylinders = 16;
    371      1.14       cgd 		mfsfakelabel.d_secpercyl = 1024;
    372      1.14       cgd 		mfsfakelabel.d_secperunit = 16384;
    373      1.14       cgd 		mfsfakelabel.d_rpm = 3600;
    374      1.14       cgd 		mfsfakelabel.d_interleave = 1;
    375      1.14       cgd 		mfsfakelabel.d_npartitions = 1;
    376      1.14       cgd 		mfsfakelabel.d_partitions[0].p_size = 16384;
    377      1.14       cgd 		mfsfakelabel.d_partitions[0].p_fsize = 1024;
    378      1.14       cgd 		mfsfakelabel.d_partitions[0].p_frag = 8;
    379      1.14       cgd 		mfsfakelabel.d_partitions[0].p_cpg = 16;
    380      1.14       cgd 
    381      1.14       cgd 		lp = &mfsfakelabel;
    382      1.14       cgd 		pp = &mfsfakelabel.d_partitions[0];
    383      1.14       cgd 
    384      1.14       cgd 		goto havelabel;
    385      1.14       cgd 	}
    386      1.11   mycroft 	cp = strrchr(special, '/');
    387       1.1       cgd 	if (cp == 0) {
    388       1.1       cgd 		/*
    389       1.1       cgd 		 * No path prefix; try /dev/r%s then /dev/%s.
    390       1.1       cgd 		 */
    391      1.34   mycroft 		(void)snprintf(device, sizeof(device), "%sr%s", _PATH_DEV,
    392      1.34   mycroft 		    special);
    393       1.1       cgd 		if (stat(device, &st) == -1)
    394      1.34   mycroft 			(void)snprintf(device, sizeof(device), "%s%s",
    395      1.34   mycroft 			    _PATH_DEV, special);
    396       1.1       cgd 		special = device;
    397       1.1       cgd 	}
    398      1.10   mycroft 	if (Nflag) {
    399      1.10   mycroft 		fso = -1;
    400      1.10   mycroft 	} else {
    401       1.1       cgd 		fso = open(special, O_WRONLY);
    402       1.1       cgd 		if (fso < 0)
    403      1.28     enami 			err(1, "%s: open", special);
    404      1.10   mycroft 
    405      1.10   mycroft 		/* Bail if target special is mounted */
    406      1.10   mycroft 		n = getmntinfo(&mp, MNT_NOWAIT);
    407      1.10   mycroft 		if (n == 0)
    408      1.28     enami 			err(1, "%s: getmntinfo", special);
    409      1.10   mycroft 
    410      1.10   mycroft 		len = sizeof(_PATH_DEV) - 1;
    411      1.10   mycroft 		s1 = special;
    412      1.10   mycroft 		if (strncmp(_PATH_DEV, s1, len) == 0)
    413      1.10   mycroft 			s1 += len;
    414      1.10   mycroft 
    415      1.10   mycroft 		while (--n >= 0) {
    416      1.10   mycroft 			s2 = mp->f_mntfromname;
    417      1.10   mycroft 			if (strncmp(_PATH_DEV, s2, len) == 0) {
    418      1.10   mycroft 				s2 += len - 1;
    419      1.10   mycroft 				*s2 = 'r';
    420      1.10   mycroft 			}
    421      1.10   mycroft 			if (strcmp(s1, s2) == 0 || strcmp(s1, &s2[1]) == 0)
    422      1.25  christos 				errx(1, "%s is mounted on %s",
    423      1.10   mycroft 				    special, mp->f_mntonname);
    424      1.10   mycroft 			++mp;
    425      1.10   mycroft 		}
    426      1.10   mycroft 	}
    427      1.10   mycroft 	if (mfs && disktype != NULL) {
    428      1.10   mycroft 		lp = (struct disklabel *)getdiskbyname(disktype);
    429      1.10   mycroft 		if (lp == NULL)
    430      1.25  christos 			errx(1, "%s: unknown disk type", disktype);
    431      1.10   mycroft 		pp = &lp->d_partitions[1];
    432      1.10   mycroft 	} else {
    433      1.10   mycroft 		fsi = open(special, O_RDONLY);
    434      1.10   mycroft 		if (fsi < 0)
    435      1.28     enami 			err(1, "%s: open", special);
    436      1.10   mycroft 		if (fstat(fsi, &st) < 0)
    437      1.28     enami 			err(1, "%s: fstat", special);
    438      1.15   mycroft 		if (!S_ISCHR(st.st_mode) && !mfs)
    439      1.25  christos 			warnx("%s: not a character-special device", special);
    440      1.11   mycroft 		cp = strchr(argv[0], '\0') - 1;
    441      1.25  christos 		if (cp == 0 || ((*cp < 'a' || *cp > ('a' + maxpartitions - 1))
    442      1.25  christos 		    && !isdigit(*cp)))
    443      1.25  christos 			errx(1, "can't figure out file system partition");
    444       1.1       cgd #ifdef COMPAT
    445      1.10   mycroft 		if (!mfs && disktype == NULL)
    446      1.10   mycroft 			disktype = argv[1];
    447       1.1       cgd #endif
    448      1.10   mycroft 		lp = getdisklabel(special, fsi);
    449      1.10   mycroft 		if (isdigit(*cp))
    450      1.10   mycroft 			pp = &lp->d_partitions[0];
    451      1.10   mycroft 		else
    452      1.10   mycroft 			pp = &lp->d_partitions[*cp - 'a'];
    453      1.10   mycroft 		if (pp->p_size == 0)
    454      1.25  christos 			errx(1, "`%c' partition is unavailable", *cp);
    455      1.10   mycroft 		if (pp->p_fstype == FS_BOOT)
    456      1.25  christos 			errx(1, "`%c' partition overlaps boot program", *cp);
    457      1.10   mycroft 	}
    458      1.14       cgd havelabel:
    459       1.1       cgd 	if (fssize == 0)
    460       1.1       cgd 		fssize = pp->p_size;
    461       1.1       cgd 	if (fssize > pp->p_size && !mfs)
    462      1.25  christos 		errx(1, "maximum file system size on the `%c' partition is %d",
    463      1.25  christos 		    *cp, pp->p_size);
    464       1.1       cgd 	if (rpm == 0) {
    465       1.1       cgd 		rpm = lp->d_rpm;
    466       1.1       cgd 		if (rpm <= 0)
    467       1.1       cgd 			rpm = 3600;
    468       1.1       cgd 	}
    469       1.1       cgd 	if (ntracks == 0) {
    470       1.1       cgd 		ntracks = lp->d_ntracks;
    471       1.1       cgd 		if (ntracks <= 0)
    472      1.25  christos 			errx(1, "no default #tracks");
    473       1.1       cgd 	}
    474       1.1       cgd 	if (nsectors == 0) {
    475       1.1       cgd 		nsectors = lp->d_nsectors;
    476       1.1       cgd 		if (nsectors <= 0)
    477      1.25  christos 			errx(1, "no default #sectors/track");
    478       1.1       cgd 	}
    479       1.1       cgd 	if (sectorsize == 0) {
    480       1.1       cgd 		sectorsize = lp->d_secsize;
    481       1.1       cgd 		if (sectorsize <= 0)
    482      1.25  christos 			errx(1, "no default sector size");
    483       1.1       cgd 	}
    484       1.1       cgd 	if (trackskew == -1) {
    485       1.1       cgd 		trackskew = lp->d_trackskew;
    486       1.1       cgd 		if (trackskew < 0)
    487       1.1       cgd 			trackskew = 0;
    488       1.1       cgd 	}
    489       1.1       cgd 	if (interleave == 0) {
    490       1.1       cgd 		interleave = lp->d_interleave;
    491       1.1       cgd 		if (interleave <= 0)
    492       1.1       cgd 			interleave = 1;
    493       1.1       cgd 	}
    494       1.1       cgd 	if (fsize == 0) {
    495       1.1       cgd 		fsize = pp->p_fsize;
    496       1.1       cgd 		if (fsize <= 0)
    497       1.1       cgd 			fsize = MAX(DFL_FRAGSIZE, lp->d_secsize);
    498       1.1       cgd 	}
    499       1.1       cgd 	if (bsize == 0) {
    500       1.1       cgd 		bsize = pp->p_frag * pp->p_fsize;
    501       1.1       cgd 		if (bsize <= 0)
    502       1.1       cgd 			bsize = MIN(DFL_BLKSIZE, 8 * fsize);
    503      1.38  wrstuden 	}
    504      1.38  wrstuden 	if (cpgflg == 0) {
    505      1.38  wrstuden 		if (pp->p_cpg != 0)
    506      1.38  wrstuden 			cpg = pp->p_cpg;
    507       1.1       cgd 	}
    508      1.10   mycroft 	/*
    509      1.10   mycroft 	 * Maxcontig sets the default for the maximum number of blocks
    510      1.10   mycroft 	 * that may be allocated sequentially. With filesystem clustering
    511      1.10   mycroft 	 * it is possible to allocate contiguous blocks up to the maximum
    512      1.10   mycroft 	 * transfer size permitted by the controller or buffering.
    513      1.10   mycroft 	 */
    514      1.10   mycroft 	if (maxcontig == 0)
    515      1.27     lukem 		maxcontig = MAX(1, MIN(MAXPHYS, MAXBSIZE) / bsize);
    516       1.1       cgd 	if (density == 0)
    517       1.1       cgd 		density = NFPI * fsize;
    518       1.8       cgd 	if (minfree < MINFREE && opt != FS_OPTSPACE) {
    519      1.25  christos 		warnx("%s %s %d%%", "Warning: changing optimization to space",
    520      1.25  christos 		    "because minfree is less than", MINFREE);
    521       1.1       cgd 		opt = FS_OPTSPACE;
    522       1.1       cgd 	}
    523       1.1       cgd 	if (trackspares == -1) {
    524       1.1       cgd 		trackspares = lp->d_sparespertrack;
    525       1.1       cgd 		if (trackspares < 0)
    526       1.1       cgd 			trackspares = 0;
    527       1.1       cgd 	}
    528       1.1       cgd 	nphyssectors = nsectors + trackspares;
    529       1.1       cgd 	if (cylspares == -1) {
    530       1.1       cgd 		cylspares = lp->d_sparespercyl;
    531       1.1       cgd 		if (cylspares < 0)
    532       1.1       cgd 			cylspares = 0;
    533       1.1       cgd 	}
    534       1.1       cgd 	secpercyl = nsectors * ntracks - cylspares;
    535       1.1       cgd 	if (secpercyl != lp->d_secpercyl)
    536      1.25  christos 		warnx("%s (%d) %s (%u)\n",
    537       1.1       cgd 			"Warning: calculated sectors per cylinder", secpercyl,
    538       1.1       cgd 			"disagrees with disk label", lp->d_secpercyl);
    539       1.1       cgd 	if (maxbpg == 0)
    540       1.1       cgd 		maxbpg = MAXBLKPG(bsize);
    541       1.1       cgd #ifdef notdef /* label may be 0 if faked up by kernel */
    542       1.1       cgd 	bbsize = lp->d_bbsize;
    543       1.1       cgd 	sbsize = lp->d_sbsize;
    544       1.1       cgd #endif
    545       1.1       cgd 	oldpartition = *pp;
    546       1.1       cgd 	mkfs(pp, special, fsi, fso);
    547      1.12   mycroft 	if (!Nflag && memcmp(pp, &oldpartition, sizeof(oldpartition)))
    548       1.1       cgd 		rewritelabel(special, fso, lp);
    549       1.1       cgd 	if (!Nflag)
    550       1.1       cgd 		close(fso);
    551       1.1       cgd 	close(fsi);
    552       1.1       cgd #ifdef MFS
    553       1.1       cgd 	if (mfs) {
    554       1.1       cgd 		struct mfs_args args;
    555       1.1       cgd 
    556      1.30  drochner 		switch (pid = fork()) {
    557      1.30  drochner 		case -1:
    558      1.30  drochner 			perror("mfs");
    559      1.30  drochner 			exit(10);
    560      1.30  drochner 		case 0:
    561      1.34   mycroft 			(void)snprintf(mountfromname, sizeof(mountfromname),
    562      1.34   mycroft 			    "mfs:%d", getpid());
    563      1.30  drochner 			break;
    564      1.30  drochner 		default:
    565      1.34   mycroft 			(void)snprintf(mountfromname, sizeof(mountfromname),
    566      1.34   mycroft 			    "mfs:%d", pid);
    567      1.30  drochner 			for (;;) {
    568      1.30  drochner 				/*
    569      1.30  drochner 				 * spin until the mount succeeds
    570      1.30  drochner 				 * or the child exits
    571      1.30  drochner 				 */
    572      1.30  drochner 				usleep(1);
    573      1.30  drochner 
    574      1.30  drochner 				/*
    575      1.30  drochner 				 * XXX Here is a race condition: another process
    576      1.30  drochner 				 * can mount a filesystem which hides our
    577      1.30  drochner 				 * ramdisk before we see the success.
    578      1.30  drochner 				 */
    579      1.30  drochner 				if (statfs(argv[1], &sf) < 0)
    580      1.30  drochner 					err(88, "statfs %s", argv[1]);
    581      1.30  drochner 				if (!strcmp(sf.f_mntfromname, mountfromname) &&
    582      1.30  drochner 				    !strncmp(sf.f_mntonname, argv[1],
    583      1.30  drochner 					     MNAMELEN) &&
    584      1.30  drochner 				    !strcmp(sf.f_fstypename, "mfs"))
    585      1.30  drochner 					exit(0);
    586      1.30  drochner 
    587      1.30  drochner 				res = waitpid(pid, &status, WNOHANG);
    588      1.30  drochner 				if (res == -1)
    589      1.30  drochner 					err(11, "waitpid");
    590      1.30  drochner 				if (res != pid)
    591      1.30  drochner 					continue;
    592      1.31  drochner 				if (WIFEXITED(status)) {
    593      1.31  drochner 					if (WEXITSTATUS(status) == 0)
    594      1.31  drochner 						exit(0);
    595      1.30  drochner 					errx(1, "%s: mount: %s", argv[1],
    596      1.30  drochner 					     strerror(WEXITSTATUS(status)));
    597      1.31  drochner 				} else
    598      1.30  drochner 					errx(11, "abnormal termination");
    599      1.30  drochner 			}
    600      1.30  drochner 			/* NOTREACHED */
    601      1.30  drochner 		}
    602      1.30  drochner 
    603      1.30  drochner 		(void) setsid();
    604      1.30  drochner 		(void) close(0);
    605      1.30  drochner 		(void) close(1);
    606      1.30  drochner 		(void) close(2);
    607      1.30  drochner 		(void) chdir("/");
    608      1.30  drochner 
    609      1.30  drochner 		args.fspec = mountfromname;
    610      1.10   mycroft 		args.export.ex_root = -2;
    611      1.10   mycroft 		if (mntflags & MNT_RDONLY)
    612      1.10   mycroft 			args.export.ex_flags = MNT_EXRDONLY;
    613      1.10   mycroft 		else
    614      1.10   mycroft 			args.export.ex_flags = 0;
    615       1.1       cgd 		args.base = membase;
    616       1.1       cgd 		args.size = fssize * sectorsize;
    617       1.1       cgd 		if (mount(MOUNT_MFS, argv[1], mntflags, &args) < 0)
    618      1.30  drochner 			exit(errno); /* parent prints message */
    619       1.1       cgd 	}
    620       1.1       cgd #endif
    621       1.1       cgd 	exit(0);
    622       1.1       cgd }
    623       1.1       cgd 
    624       1.1       cgd #ifdef COMPAT
    625  1.38.8.1        tv const char lmsg[] = "%s: can't read disk label; disk type must be specified";
    626       1.1       cgd #else
    627  1.38.8.1        tv const char lmsg[] = "%s: can't read disk label";
    628       1.1       cgd #endif
    629       1.1       cgd 
    630      1.25  christos static struct disklabel *
    631  1.38.8.2        he getdisklabel(char *s, volatile int fd)
    632  1.38.8.2        he /* XXX why is fs volatile?! */
    633       1.1       cgd {
    634       1.1       cgd 	static struct disklabel lab;
    635       1.1       cgd 
    636      1.24       tls 	if (ioctl(fd, DIOCGDINFO, &lab) < 0) {
    637       1.1       cgd #ifdef COMPAT
    638       1.1       cgd 		if (disktype) {
    639      1.25  christos 			struct disklabel *lp;
    640       1.1       cgd 
    641       1.1       cgd 			unlabeled++;
    642       1.1       cgd 			lp = getdiskbyname(disktype);
    643       1.1       cgd 			if (lp == NULL)
    644      1.25  christos 				errx(1, "%s: unknown disk type", disktype);
    645       1.1       cgd 			return (lp);
    646       1.1       cgd 		}
    647       1.1       cgd #endif
    648      1.10   mycroft 		warn("ioctl (GDINFO)");
    649      1.25  christos 		errx(1, lmsg, s);
    650       1.1       cgd 	}
    651       1.1       cgd 	return (&lab);
    652       1.1       cgd }
    653       1.1       cgd 
    654      1.25  christos static void
    655  1.38.8.2        he rewritelabel(char *s, volatile int fd, struct disklabel *lp)
    656  1.38.8.2        he /* XXX why is fd volatile?! */
    657       1.1       cgd {
    658       1.1       cgd #ifdef COMPAT
    659       1.1       cgd 	if (unlabeled)
    660       1.1       cgd 		return;
    661       1.1       cgd #endif
    662       1.1       cgd 	lp->d_checksum = 0;
    663       1.1       cgd 	lp->d_checksum = dkcksum(lp);
    664       1.1       cgd 	if (ioctl(fd, DIOCWDINFO, (char *)lp) < 0) {
    665      1.10   mycroft 		warn("ioctl (WDINFO)");
    666      1.25  christos 		errx(1, "%s: can't rewrite disk label", s);
    667       1.1       cgd 	}
    668      1.35      matt #if __vax__
    669       1.1       cgd 	if (lp->d_type == DTYPE_SMD && lp->d_flags & D_BADSECT) {
    670      1.25  christos 		int i;
    671       1.1       cgd 		int cfd;
    672       1.1       cgd 		daddr_t alt;
    673       1.1       cgd 		char specname[64];
    674       1.1       cgd 		char blk[1024];
    675       1.1       cgd 		char *cp;
    676       1.1       cgd 
    677       1.1       cgd 		/*
    678       1.1       cgd 		 * Make name for 'c' partition.
    679       1.1       cgd 		 */
    680       1.1       cgd 		strcpy(specname, s);
    681       1.1       cgd 		cp = specname + strlen(specname) - 1;
    682       1.1       cgd 		if (!isdigit(*cp))
    683       1.1       cgd 			*cp = 'c';
    684       1.1       cgd 		cfd = open(specname, O_WRONLY);
    685       1.1       cgd 		if (cfd < 0)
    686      1.28     enami 			err(1, "%s: open", specname);
    687      1.11   mycroft 		memset(blk, 0, sizeof(blk));
    688       1.1       cgd 		*(struct disklabel *)(blk + LABELOFFSET) = *lp;
    689       1.1       cgd 		alt = lp->d_ncylinders * lp->d_secpercyl - lp->d_nsectors;
    690       1.1       cgd 		for (i = 1; i < 11 && i < lp->d_nsectors; i += 2) {
    691      1.17       cgd 			off_t offset;
    692      1.17       cgd 
    693      1.17       cgd 			offset = alt + i;
    694      1.17       cgd 			offset *= lp->d_secsize;
    695      1.17       cgd 			if (lseek(cfd, offset, SEEK_SET) == -1)
    696      1.25  christos 				err(1, "lseek to badsector area: ");
    697       1.1       cgd 			if (write(cfd, blk, lp->d_secsize) < lp->d_secsize)
    698      1.10   mycroft 				warn("alternate label %d write", i/2);
    699       1.1       cgd 		}
    700       1.1       cgd 		close(cfd);
    701       1.1       cgd 	}
    702       1.1       cgd #endif
    703       1.1       cgd }
    704       1.1       cgd 
    705      1.25  christos static void
    706  1.38.8.2        he usage(void)
    707       1.1       cgd {
    708       1.1       cgd 	if (mfs) {
    709       1.1       cgd 		fprintf(stderr,
    710      1.10   mycroft 		    "usage: %s [ -fsoptions ] special-device mount-point\n",
    711      1.25  christos 			__progname);
    712       1.1       cgd 	} else
    713       1.1       cgd 		fprintf(stderr,
    714      1.10   mycroft 		    "usage: %s [ -fsoptions ] special-device%s\n",
    715      1.25  christos 		    __progname,
    716       1.1       cgd #ifdef COMPAT
    717       1.1       cgd 		    " [device-type]");
    718       1.1       cgd #else
    719       1.1       cgd 		    "");
    720       1.1       cgd #endif
    721       1.1       cgd 	fprintf(stderr, "where fsoptions are:\n");
    722      1.33    bouyer 	fprintf(stderr, "\t-B byte order (`be' or `le')\n");
    723       1.1       cgd 	fprintf(stderr,
    724       1.1       cgd 	    "\t-N do not create file system, just print out parameters\n");
    725      1.10   mycroft 	fprintf(stderr, "\t-O create a 4.3BSD format filesystem\n");
    726       1.1       cgd 	fprintf(stderr, "\t-S sector size\n");
    727       1.1       cgd #ifdef COMPAT
    728       1.1       cgd 	fprintf(stderr, "\t-T disktype\n");
    729       1.1       cgd #endif
    730       1.1       cgd 	fprintf(stderr, "\t-a maximum contiguous blocks\n");
    731       1.1       cgd 	fprintf(stderr, "\t-b block size\n");
    732       1.1       cgd 	fprintf(stderr, "\t-c cylinders/group\n");
    733       1.1       cgd 	fprintf(stderr, "\t-d rotational delay between contiguous blocks\n");
    734       1.1       cgd 	fprintf(stderr, "\t-e maximum blocks per file in a cylinder group\n");
    735       1.1       cgd 	fprintf(stderr, "\t-f frag size\n");
    736       1.1       cgd 	fprintf(stderr, "\t-i number of bytes per inode\n");
    737       1.1       cgd 	fprintf(stderr, "\t-k sector 0 skew, per track\n");
    738       1.1       cgd 	fprintf(stderr, "\t-l hardware sector interleave\n");
    739       1.1       cgd 	fprintf(stderr, "\t-m minimum free space %%\n");
    740       1.1       cgd 	fprintf(stderr, "\t-n number of distinguished rotational positions\n");
    741       1.1       cgd 	fprintf(stderr, "\t-o optimization preference (`space' or `time')\n");
    742       1.1       cgd 	fprintf(stderr, "\t-p spare sectors per track\n");
    743       1.1       cgd 	fprintf(stderr, "\t-s file system size (sectors)\n");
    744       1.1       cgd 	fprintf(stderr, "\t-r revolutions/minute\n");
    745       1.1       cgd 	fprintf(stderr, "\t-t tracks/cylinder\n");
    746       1.1       cgd 	fprintf(stderr, "\t-u sectors/track\n");
    747       1.1       cgd 	fprintf(stderr, "\t-x spare sectors per cylinder\n");
    748       1.1       cgd 	exit(1);
    749       1.1       cgd }
    750