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