xref: /illumos-gate/usr/src/cmd/fs.d/mount.c (revision eb36692e)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 /*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
22 /*	  All Rights Reserved  	*/
23 
24 
25 /*
26  * Copyright 2010 Sun Microsystems, Inc.  All rights reserved.
27  * Use is subject to license terms.
28  */
29 /*
30  * Copyright 2012 Nexenta Systems, Inc.  All rights reserved.
31  */
32 
33 #include	<stdio.h>
34 #include	<stdio_ext.h>
35 #include 	<limits.h>
36 #include 	<fcntl.h>
37 #include 	<unistd.h>
38 #include	<stdlib.h>
39 #include	<string.h>
40 #include	<stdarg.h>
41 #include	<sys/types.h>
42 #include	<sys/stat.h>
43 #include	<sys/statvfs.h>
44 #include	<errno.h>
45 #include	<sys/mnttab.h>
46 #include	<sys/mntent.h>
47 #include	<sys/mount.h>
48 #include	<sys/vfstab.h>
49 #include	<sys/param.h>
50 #include	<sys/wait.h>
51 #include	<sys/signal.h>
52 #include	<sys/resource.h>
53 #include	<stropts.h>
54 #include	<sys/conf.h>
55 #include	<locale.h>
56 #include	"fslib.h"
57 
58 #define	VFS_PATH	"/usr/lib/fs"
59 #define	ALT_PATH	"/etc/fs"
60 #define	REMOTE		"/etc/dfs/fstypes"
61 
62 #define	ARGV_MAX	16
63 #define	TIME_MAX	50
64 #define	FSTYPE_MAX	8
65 #define	REMOTE_MAX	64
66 
67 #define	OLD	0
68 #define	NEW	1
69 
70 #define	READONLY	0
71 #define	READWRITE	1
72 #define	SUID 		2
73 #define	NOSUID		3
74 #define	SETUID 		4
75 #define	NOSETUID	5
76 #define	DEVICES		6
77 #define	NODEVICES	7
78 
79 #define	FORMAT	"%a %b %e %H:%M:%S %Y\n"	/* date time format */
80 				/* a - abbreviated weekday name */
81 				/* b - abbreviated month name */
82 				/* e - day of month */
83 				/* H - hour */
84 				/* M - minute */
85 				/* S - second */
86 				/* Y - Year */
87 				/* n - newline */
88 
89 /*
90  * The fs-local method understands this exit code to mean that one or
91  * more failures occurred and that all the failures were of attempted
92  * lofs mounts.
93  */
94 #define	ALL_LOFS_FAILURES	111
95 
96 extern int	optind;
97 extern char	*optarg;
98 
99 extern void	usage(void);
100 extern char	*flags(char *, int);
101 extern char	*remote(char *, FILE *);
102 extern char	*default_fstype(char *);
103 
104 char	*myopts[] = {
105 	MNTOPT_RO,
106 	MNTOPT_RW,
107 	MNTOPT_SUID,
108 	MNTOPT_NOSUID,
109 	MNTOPT_SETUID,
110 	MNTOPT_NOSETUID,
111 	MNTOPT_DEVICES,
112 	MNTOPT_NODEVICES,
113 	NULL
114 };
115 
116 static char	*myname;		/* point to argv[0] */
117 
118 /*
119  * Set the limit to double the number of characters a user should be allowed to
120  * type in one line.
121  * This should cover the different shells, which don't use POSIX_MAX_INPUT,
122  * and should cover the case where a long option string can be in
123  * the /etc/vfstab file.
124  */
125 char	mntflags[(_POSIX_MAX_INPUT+1) * 2];
126 
127 char	realdir[MAXPATHLEN];	/* buffer for realpath() calls */
128 char	*vfstab = VFSTAB;
129 char	*mnttab = MNTTAB;
130 char	*specific_opts;		/* holds specific mount options */
131 char	*generic_opts;		/* holds generic mount options */
132 int	maxrun;
133 int	nrun;
134 int	failcnt;		/* total count of failures */
135 int	lofscnt;		/* presence of lofs prohibits parallel */
136 				/* mounting */
137 int	lofsfail;		/* count of failures of lofs mounts */
138 int	exitcode;
139 int	aflg, cflg, fflg, Fflg, gflg, oflg, pflg, rflg, vflg, Vflg, mflg, Oflg,
140 	dashflg, questflg, dflg, qflg;
141 
142 /*
143  * Currently, mounting cachefs instances simultaneously uncovers various
144  * problems.  For the short term, we serialize cachefs activity while we fix
145  * these cachefs bugs.
146  */
147 #define	CACHEFS_BUG
148 #ifdef	CACHEFS_BUG
149 int	cachefs_running;	/* parallel cachefs not supported yet */
150 #endif
151 
152 /*
153  * Each vfsent_t describes a vfstab entry.  It is used to manage and cleanup
154  * each child that performs the particular mount for the entry.
155  */
156 
157 typedef struct vfsent {
158 	struct vfstab	v;		/* the vfstab entry */
159 	char		*rpath;		/* resolved pathname so far */
160 	int		mlevel;		/* how deep is this mount point */
161 	int		order;		/* vfstab serial order of this vfs */
162 	int		flag;
163 	pid_t		pid;		/* the pid of this mount process */
164 	int		exitcode;	/* process's exitcode */
165 #define	RDPIPE		0
166 #define	WRPIPE		1
167 	int		sopipe[2];	/* pipe attached to child's stdout */
168 	int		sepipe[2];	/* pipe attached to child's stderr */
169 	struct vfsent	*next;		/* used when in linked list */
170 } vfsent_t;
171 
172 #define	VRPFAILED	0x01		/* most recent realpath failed on */
173 					/* this mount point */
174 #define	VNOTMOUNTED	0x02		/* mount point could not be mounted */
175 
176 vfsent_t	*vfsll, *vfslltail;	/* head and tail of the global */
177 					/* linked list of vfstab entries */
178 vfsent_t	**vfsarray;		/* global array of vfsent_t's */
179 int		vfsarraysize;		/* length of the list */
180 
181 /*
182  * This structure is used to build a linked list of
183  * mnttab structures from /etc/mnttab.
184  */
185 typedef struct mountent {
186 	struct extmnttab	*ment;
187 	int		flag;
188 	struct mountent	*next;
189 } mountent_t;
190 
191 #define	MSORTED		0x1
192 
193 static vfsent_t **make_vfsarray(char **, int);
194 static vfsent_t	*new_vfsent(struct vfstab *, int);
195 static vfsent_t *getvfsall(char *, int);
196 
197 static void	doexec(char *, char **);
198 static void	nomem();
199 static void	cleanup(int);
200 static char	*setrpath(vfsent_t *);
201 static int	dowait();
202 static int	setup_iopipe(vfsent_t *);
203 static void	setup_output(vfsent_t *);
204 static void	doio(vfsent_t *);
205 static void	do_mounts();
206 static int	parmount(char **, int, char *);
207 static int	mlevelcmp(const void *, const void *);
208 static int	mordercmp(const void *, const void *);
209 static int	check_fields(char *, char *);
210 static int	cleanupkid(pid_t, int);
211 static void	print_mnttab(int, int);
212 static void	vfserror(int, char *);
213 static void	mnterror(int);
214 static int	ignore(char *);
215 
216 /*
217  * This is /usr/sbin/mount: the generic command that in turn
218  * execs the appropriate /usr/lib/fs/{fstype}/mount.
219  * The -F flag and argument are NOT passed.
220  * If the usr file system is not mounted a duplicate copy
221  * can be found in /sbin and this version execs the
222  * appropriate /etc/fs/{fstype}/mount
223  *
224  * If the -F fstype, special or directory are missing,
225  * /etc/vfstab is searched to fill in the missing arguments.
226  *
227  * -V will print the built command on the stdout.
228  * It isn't passed either.
229  */
230 int
231 main(int argc, char *argv[])
232 {
233 	char	*special,	/* argument of special/resource */
234 	    *mountp,		/* argument of mount directory */
235 	    *fstype,		/* wherein the fstype name is filled */
236 	    *newargv[ARGV_MAX],	/* arg list for specific command */
237 	    *farg = NULL, *Farg = NULL;
238 	int	ii, ret, cc, fscnt;
239 	struct stat64	stbuf;
240 	struct vfstab	vget, vref;
241 	mode_t mode;
242 	FILE	*fd;
243 
244 	(void) setlocale(LC_ALL, "");
245 
246 #if !defined(TEXT_DOMAIN)
247 #define	TEXT_DOMAIN "SYS_TEST"
248 #endif
249 	(void) textdomain(TEXT_DOMAIN);
250 
251 	myname = strrchr(argv[0], '/');
252 	if (myname)
253 		myname++;
254 	else
255 		myname = argv[0];
256 	if (myname == 0) myname = "path unknown";
257 
258 	/* Process the args.  */
259 
260 	while ((cc = getopt(argc, argv, "?acd:f:F:gmno:pqrvVO")) != -1)
261 		switch (cc) {
262 			case 'a':
263 				aflg++;
264 				break;
265 			case 'c':
266 				cflg++;
267 				break;
268 
269 #ifdef DEBUG
270 			case 'd':
271 				dflg = atoi(optarg);
272 				break;
273 #endif
274 
275 			case 'f':
276 				fflg++;
277 				farg = optarg;
278 				break;
279 			case 'F':
280 				Fflg++;
281 				Farg = optarg;
282 				break;
283 			case 'g':
284 				gflg++;
285 				break;
286 			case 'm':
287 				mflg++;
288 				break; /* do not update /etc/mnttab */
289 			case 'o':
290 				oflg++;
291 				if ((specific_opts = strdup(optarg)) == NULL)
292 					nomem();
293 				break; /* fstype dependent options */
294 			case 'O':
295 				Oflg++;
296 				break;
297 			case 'p':
298 				pflg++;
299 				break;
300 			case 'q':
301 				qflg++;
302 				break;
303 			case 'r':
304 				rflg++;
305 				generic_opts = "ro";
306 				break;
307 			case 'v':
308 				vflg++;
309 				break;
310 			case 'V':
311 				Vflg++;
312 				break;
313 			case '?':
314 				questflg++;
315 				break;
316 		}
317 
318 	/* copy '--' to specific */
319 	if (strcmp(argv[optind-1], "--") == 0)
320 		dashflg++;
321 
322 	/* option checking */
323 	/* more than two args not allowed if !aflg */
324 	if (!aflg && (argc - optind > 2))
325 		usage();
326 
327 	/* pv mututally exclusive */
328 	if (pflg + vflg + aflg > 1) {
329 		fprintf(stderr, gettext
330 		    ("%s: -a, -p, and -v are mutually exclusive\n"),
331 		    myname);
332 		usage();
333 	}
334 
335 	/*
336 	 * Can't have overlaying mounts on the same mount point during
337 	 * a parallel mount.
338 	 */
339 	if (aflg && Oflg) {
340 		fprintf(stderr, gettext
341 		    ("%s: -a and -O are mutually exclusive\n"), myname);
342 		usage();
343 	}
344 
345 	/* dfF mutually exclusive */
346 	if (fflg + Fflg > 1) {
347 		fprintf(stderr, gettext
348 		    ("%s: More than one FSType specified\n"), myname);
349 		usage();
350 	}
351 
352 	/* no arguments, only allow p,v,V or [F]? */
353 	if (!aflg && optind == argc) {
354 		if (cflg || fflg || mflg || oflg || rflg || qflg)
355 			usage();
356 
357 		if (Fflg && !questflg)
358 			usage();
359 
360 		if (questflg) {
361 			if (Fflg) {
362 				newargv[2] = "-?";
363 				newargv[3] = NULL;
364 				doexec(Farg, newargv);
365 			}
366 			usage();
367 		}
368 	}
369 
370 	if (questflg)
371 		usage();
372 
373 	/* one or two args, allow any but p,v */
374 	if (optind != argc && (pflg || vflg)) {
375 		fprintf(stderr,
376 gettext("%s: Cannot use -p and -v with arguments\n"), myname);
377 		usage();
378 	}
379 
380 
381 	/* if only reporting mnttab, generic prints mnttab and exits */
382 	if (!aflg && optind == argc) {
383 		if (Vflg) {
384 			printf("%s", myname);
385 			if (pflg)
386 				printf(" -p");
387 			if (vflg)
388 				printf(" -v");
389 			printf("\n");
390 			exit(0);
391 		}
392 
393 		print_mnttab(vflg, pflg);
394 		exit(0);
395 	}
396 
397 	/*
398 	 * Get filesystem type here.  If "-F FStype" is specified, use
399 	 * that fs type.  Otherwise, determine the fs type from /etc/vfstab
400 	 * if the entry exists.  Otherwise, determine the local or remote
401 	 * fs type from /etc/default/df or /etc/dfs/fstypes respectively.
402 	 */
403 	if (fflg) {
404 		if ((strcmp(farg, "S51K") != 0) &&
405 		    (strcmp(farg, "S52K") != 0)) {
406 			fstype = farg;
407 		}
408 		else
409 			fstype = "ufs";
410 	} else /* if (Fflg) */
411 		fstype = Farg;
412 
413 	fscnt = argc - optind;
414 	if (aflg && (fscnt != 1))
415 		exit(parmount(argv + optind, fscnt, fstype));
416 
417 	/*
418 	 * Then don't bother with the parallel over head.  Everything
419 	 * from this point is simple/normal single execution.
420 	 */
421 	aflg = 0;
422 
423 	/* get special and/or mount-point from arg(s) */
424 	if (fscnt == 2)
425 		special = argv[optind++];
426 	else
427 		special = NULL;
428 	if (optind < argc)
429 		mountp = argv[optind++];
430 	else
431 		mountp = NULL;
432 
433 	/* lookup only if we need to */
434 	if (fstype == NULL || specific_opts == NULL || special == NULL ||
435 	    mountp == NULL) {
436 		if ((fd = fopen(vfstab, "r")) == NULL) {
437 			if (fstype == NULL || special == NULL ||
438 			    mountp == NULL) {
439 				fprintf(stderr, gettext(
440 				    "%s: Cannot open %s\n"),
441 				    myname, vfstab);
442 				exit(1);
443 			} else {
444 				/*
445 				 * No vfstab, but we know what we want
446 				 * to mount.
447 				 */
448 				goto out;
449 			}
450 		}
451 		vfsnull(&vref);
452 		vref.vfs_special = special;
453 		vref.vfs_mountp = mountp;
454 		vref.vfs_fstype = fstype;
455 
456 		/* get a vfstab entry matching mountp or special */
457 		while ((ret = getvfsany(fd, &vget, &vref)) > 0)
458 			vfserror(ret, vget.vfs_special);
459 
460 		/* if no entry and there was only one argument */
461 		/* then the argument could be the special */
462 		/* and not mount point as we thought earlier */
463 		if (ret == -1 && special == NULL) {
464 			rewind(fd);
465 			special = vref.vfs_special = mountp;
466 			mountp = vref.vfs_mountp = NULL;
467 			/* skip erroneous lines; they were reported above */
468 			while ((ret = getvfsany(fd, &vget, &vref)) > 0)
469 				;
470 		}
471 
472 		fclose(fd);
473 
474 		if (ret == 0) {
475 			if (fstype == NULL)
476 				fstype = vget.vfs_fstype;
477 			if (special == NULL)
478 				special = vget.vfs_special;
479 			if (mountp == NULL)
480 				mountp = vget.vfs_mountp;
481 			if (oflg == 0 && vget.vfs_mntopts) {
482 				oflg++;
483 				specific_opts = vget.vfs_mntopts;
484 			}
485 		} else if (special == NULL) {
486 			if (stat64(mountp, &stbuf) == -1) {
487 				fprintf(stderr, gettext("%s: cannot stat %s\n"),
488 				    myname, mountp);
489 				exit(2);
490 			}
491 			if (((mode = (stbuf.st_mode & S_IFMT)) == S_IFBLK) ||
492 			    (mode == S_IFCHR)) {
493 				fprintf(stderr,
494 gettext("%s: mount point cannot be determined\n"),
495 				    myname);
496 				exit(1);
497 			} else
498 				{
499 				fprintf(stderr,
500 gettext("%s: special cannot be determined\n"),
501 				    myname);
502 				exit(1);
503 			}
504 		} else if (fstype == NULL)
505 			fstype = default_fstype(special);
506 	}
507 
508 out:
509 	if (realpath(mountp, realdir) == NULL) {
510 		(void) fprintf(stderr, "mount: ");
511 		perror(mountp);
512 		exit(1);
513 	}
514 
515 	if ((mountp = strdup(realdir)) == NULL)
516 		nomem();
517 
518 	if (check_fields(fstype, mountp))
519 		exit(1);
520 
521 	/* create the new arg list, and end the list with a null pointer */
522 	ii = 2;
523 	if (cflg)
524 		newargv[ii++] = "-c";
525 	if (gflg)
526 		newargv[ii++] = "-g";
527 	if (mflg)
528 		newargv[ii++] = "-m";
529 	/*
530 	 * The q option needs to go before the -o option as some
531 	 * filesystems complain during first pass option parsing.
532 	 */
533 	if (qflg)
534 		newargv[ii++] = "-q";
535 	if (oflg) {
536 		newargv[ii++] = "-o";
537 		newargv[ii++] = specific_opts;
538 	}
539 	if (Oflg)
540 		newargv[ii++] = "-O";
541 	if (rflg)
542 		newargv[ii++] = "-r";
543 	if (dashflg)
544 		newargv[ii++] = "--";
545 	newargv[ii++] = special;
546 	newargv[ii++] = mountp;
547 	newargv[ii] = NULL;
548 
549 	doexec(fstype, newargv);
550 	return (0);
551 }
552 
553 void
554 usage(void)
555 {
556 	fprintf(stderr,	gettext("Usage:\n%s [-v | -p]\n"), myname);
557 	fprintf(stderr, gettext(
558 	    "%s [-F FSType] [-V] [current_options] [-o specific_options]"),
559 	    myname);
560 	fprintf(stderr, gettext("\n\t{special | mount_point}\n"));
561 
562 	fprintf(stderr, gettext(
563 	    "%s [-F FSType] [-V] [current_options] [-o specific_options]"),
564 	    myname);
565 	fprintf(stderr, gettext("\n\tspecial mount_point\n"));
566 
567 	fprintf(stderr, gettext(
568 	"%s -a [-F FSType ] [-V] [current_options] [-o specific_options]\n"),
569 	    myname);
570 	fprintf(stderr, gettext("\t[mount_point ...]\n"));
571 
572 	exit(1);
573 }
574 
575 /*
576  * Get rid of "dev=[hex string]" clause, if any.  It's not legal
577  * when printing in vfstab format.
578  */
579 void
580 elide_dev(char *mntopts)
581 {
582 	char *dev, *other;
583 
584 	if (mntopts != NULL) {
585 		dev = strstr(mntopts, "dev=");
586 		if (dev != NULL) {
587 			other = strpbrk(dev, ",");
588 			if (other == NULL) {
589 				/* last option */
590 				if (dev != mntopts) {
591 					*--dev = '\0';
592 				} else {
593 					*dev = '\0';
594 				}
595 			} else {
596 				/* first or intermediate option */
597 				memmove(dev, other+1, strlen(other+1)+1);
598 			}
599 		}
600 	}
601 }
602 
603 void
604 print_mnttab(int vflg, int pflg)
605 {
606 	FILE	*fd;
607 	FILE	*rfp;			/* this will be NULL if fopen fails */
608 	int	ret;
609 	char	time_buf[TIME_MAX];	/* array to hold date and time */
610 	struct extmnttab	mget;
611 	time_t	ltime;
612 
613 	if ((fd = fopen(mnttab, "r")) == NULL) {
614 		fprintf(stderr, gettext("%s: Cannot open mnttab\n"), myname);
615 		exit(1);
616 	}
617 	rfp = fopen(REMOTE, "r");
618 	while ((ret = getextmntent(fd, &mget, sizeof (struct extmnttab)))
619 	    == 0) {
620 		if (ignore(mget.mnt_mntopts))
621 			continue;
622 		if (mget.mnt_special && mget.mnt_mountp &&
623 		    mget.mnt_fstype && mget.mnt_time) {
624 			ltime = atol(mget.mnt_time);
625 			cftime(time_buf, FORMAT, &ltime);
626 			if (pflg) {
627 				elide_dev(mget.mnt_mntopts);
628 				printf("%s - %s %s - no %s\n",
629 				    mget.mnt_special,
630 				    mget.mnt_mountp,
631 				    mget.mnt_fstype,
632 				    mget.mnt_mntopts != NULL ?
633 				    mget.mnt_mntopts : "-");
634 			} else if (vflg) {
635 				printf("%s on %s type %s %s%s on %s",
636 				    mget.mnt_special,
637 				    mget.mnt_mountp,
638 				    mget.mnt_fstype,
639 				    remote(mget.mnt_fstype, rfp),
640 				    flags(mget.mnt_mntopts, NEW),
641 				    time_buf);
642 			} else
643 				printf("%s on %s %s%s on %s",
644 				    mget.mnt_mountp,
645 				    mget.mnt_special,
646 				    remote(mget.mnt_fstype, rfp),
647 				    flags(mget.mnt_mntopts, OLD),
648 				    time_buf);
649 		}
650 	}
651 	if (ret > 0)
652 		mnterror(ret);
653 }
654 
655 char	*
656 flags(char *mntopts, int flag)
657 {
658 	char	opts[sizeof (mntflags)];
659 	char	*value;
660 	int	rdwr = 1;
661 	int	suid = 1;
662 	int	devices = 1;
663 	int	setuid = 1;
664 
665 	if (mntopts == NULL || *mntopts == '\0')
666 		return ("read/write/setuid/devices");
667 
668 	strcpy(opts, "");
669 	while (*mntopts != '\0')  {
670 		switch (getsubopt(&mntopts, myopts, &value)) {
671 		case READONLY:
672 			rdwr = 0;
673 			break;
674 		case READWRITE:
675 			rdwr = 1;
676 			break;
677 		case SUID:
678 			suid = 1;
679 			break;
680 		case NOSUID:
681 			suid = 0;
682 			break;
683 		case SETUID:
684 			setuid = 1;
685 			break;
686 		case NOSETUID:
687 			setuid = 0;
688 			break;
689 		case DEVICES:
690 			devices = 1;
691 			break;
692 		case NODEVICES:
693 			devices = 0;
694 			break;
695 		default:
696 			/* cat '/' separator to mntflags */
697 			if (*opts != '\0' && value != NULL)
698 				strcat(opts, "/");
699 			strcat(opts, value);
700 			break;
701 		}
702 	}
703 
704 	strcpy(mntflags, "");
705 	if (rdwr)
706 		strcat(mntflags, "read/write");
707 	else if (flag == OLD)
708 		strcat(mntflags, "read only");
709 	else
710 		strcat(mntflags, "read-only");
711 	if (suid) {
712 		if (setuid)
713 			strcat(mntflags, "/setuid");
714 		else
715 			strcat(mntflags, "/nosetuid");
716 		if (devices)
717 			strcat(mntflags, "/devices");
718 		else
719 			strcat(mntflags, "/nodevices");
720 	} else {
721 		strcat(mntflags, "/nosetuid/nodevices");
722 	}
723 	if (*opts != '\0') {
724 		strcat(mntflags, "/");
725 		strcat(mntflags, opts);
726 	}
727 
728 	/*
729 	 * The assumed assertion
730 	 * 	assert (strlen(mntflags) < sizeof mntflags);
731 	 * is valid at this point in the code. Note that a call to "assert"
732 	 * is not appropriate in production code since it halts the program.
733 	 */
734 	return (mntflags);
735 }
736 
737 char	*
738 remote(char *fstype, FILE *rfp)
739 {
740 	char	buf[BUFSIZ];
741 	char	*fs;
742 	extern char *strtok();
743 
744 	if (rfp == NULL || fstype == NULL ||
745 	    strlen(fstype) > (size_t)FSTYPE_MAX)
746 		return ("");	/* not a remote */
747 	rewind(rfp);
748 	while (fgets(buf, sizeof (buf), rfp) != NULL) {
749 		fs = strtok(buf, " \t\n");
750 		if (strcmp(fstype, fs) == 0)
751 			return ("remote/");	/* is a remote fs */
752 	}
753 	return ("");	/* not a remote */
754 }
755 
756 
757 void
758 vfserror(int flag, char *special)
759 {
760 	if (special == NULL)
761 		special = "<null>";
762 	switch (flag) {
763 	case VFS_TOOLONG:
764 		fprintf(stderr,
765 gettext("%s: Warning: Line in vfstab for \"%s\" exceeds %d characters\n"),
766 		    myname, special, VFS_LINE_MAX-1);
767 		break;
768 	case VFS_TOOFEW:
769 		fprintf(stderr,
770 gettext("%s: Warning: Line for \"%s\" in vfstab has too few entries\n"),
771 		    myname, special);
772 		break;
773 	case VFS_TOOMANY:
774 		fprintf(stderr,
775 gettext("%s: Warning: Line for \"%s\" in vfstab has too many entries\n"),
776 		    myname, special);
777 		break;
778 	default:
779 		fprintf(stderr, gettext(
780 		    "%s: Warning: Error in line for \"%s\" in vfstab\n"),
781 		    myname, special);
782 	}
783 }
784 
785 void
786 mnterror(int flag)
787 {
788 	switch (flag) {
789 	case MNT_TOOLONG:
790 		fprintf(stderr,
791 		    gettext("%s: Line in mnttab exceeds %d characters\n"),
792 		    myname, MNT_LINE_MAX-2);
793 		break;
794 	case MNT_TOOFEW:
795 		fprintf(stderr,
796 		    gettext("%s: Line in mnttab has too few entries\n"),
797 		    myname);
798 		break;
799 	case MNT_TOOMANY:
800 		fprintf(stderr,
801 		    gettext("%s: Line in mnttab has too many entries\n"),
802 		    myname);
803 		break;
804 	}
805 	exit(1);
806 }
807 
808 void
809 doexec(char *fstype, char *newargv[])
810 {
811 	char	full_path[PATH_MAX];
812 	char	alter_path[PATH_MAX];
813 	char	*vfs_path = VFS_PATH;
814 	char	*alt_path = ALT_PATH;
815 	int	i;
816 
817 	/* build the full pathname of the fstype dependent command. */
818 	sprintf(full_path, "%s/%s/%s", vfs_path, fstype, myname);
819 	sprintf(alter_path, "%s/%s/%s", alt_path, fstype, myname);
820 	newargv[1] = myname;
821 
822 	if (Vflg) {
823 		printf("%s -F %s", newargv[1], fstype);
824 		for (i = 2; newargv[i]; i++)
825 			printf(" %s", newargv[i]);
826 		printf("\n");
827 		fflush(stdout);
828 		exit(0);
829 	}
830 
831 	/*
832 	 * Try to exec the fstype dependent portion of the mount.
833 	 * See if the directory is there before trying to exec dependent
834 	 * portion.  This is only useful for eliminating the
835 	 * '..mount: not found' message when '/usr' is mounted
836 	 */
837 	if (access(full_path, 0) == 0) {
838 		execv(full_path, &newargv[1]);
839 		if (errno == EACCES) {
840 			fprintf(stderr,
841 			gettext("%s: Cannot execute %s - permission denied\n"),
842 			    myname, full_path);
843 		}
844 		if (errno == ENOEXEC) {
845 			newargv[0] = "sh";
846 			newargv[1] = full_path;
847 			execv("/sbin/sh", &newargv[0]);
848 		}
849 	}
850 	execv(alter_path, &newargv[1]);
851 	if (errno == EACCES) {
852 		fprintf(stderr, gettext(
853 		    "%s: Cannot execute %s - permission denied\n"),
854 		    myname, alter_path);
855 		exit(1);
856 	}
857 	if (errno == ENOEXEC) {
858 		newargv[0] = "sh";
859 		newargv[1] = alter_path;
860 		execv("/sbin/sh", &newargv[0]);
861 	}
862 	fprintf(stderr,
863 	    gettext("%s: Operation not applicable to FSType %s\n"),
864 	    myname, fstype);
865 	exit(1);
866 }
867 
868 char *mntopts[] = { MNTOPT_IGNORE, NULL };
869 #define	IGNORE    0
870 
871 /*
872  * Return 1 if "ignore" appears in the options string
873  */
874 int
875 ignore(char *opts)
876 {
877 	char *value;
878 	char *saveptr, *my_opts;
879 	int rval = 0;
880 
881 	if (opts == NULL || *opts == NULL)
882 		return (0);
883 
884 	/*
885 	 * we make a copy of the option string to pass to getsubopt(),
886 	 * because getsubopt() modifies the string.  We also save
887 	 * the original pointer returned by strdup, because getsubopt
888 	 * changes the pointer passed into it.  If strdup fails (unlikely),
889 	 * we act as if the "ignore" option isn't set rather than fail.
890 	 */
891 
892 	if ((saveptr = my_opts = strdup(opts)) == NULL)
893 		nomem();
894 
895 	while (*my_opts != '\0') {
896 		if (getsubopt(&my_opts, mntopts, &value) == IGNORE)
897 			rval = 1;
898 	}
899 
900 	free(saveptr);
901 
902 	return (rval);
903 }
904 
905 /*
906  * Perform the parallel version of mount.  If count == 0, mount all
907  * vfstab filesystems with the automnt field == "yes".  Use fstype if
908  * supplied.  If mntlist supplied, then attempt to only mount those.
909  */
910 
911 int
912 parmount(char **mntlist, int count, char *fstype)
913 {
914 	int 		maxfd =	OPEN_MAX;
915 	struct 		rlimit rl;
916 	vfsent_t	**vl, *vp;
917 
918 	/*
919 	 * Process scaling.  After running a series
920 	 * of tests based on the number of simultaneous processes and
921 	 * processors available, optimum performance was achieved near or
922 	 * at (PROCN * 2).
923 	 */
924 	if ((maxrun = sysconf(_SC_NPROCESSORS_ONLN)) == -1)
925 		maxrun = 4;
926 	else
927 		maxrun = maxrun * 2 + 1;
928 
929 	if (getrlimit(RLIMIT_NOFILE, &rl) == 0) {
930 		rl.rlim_cur = rl.rlim_max;
931 		if (setrlimit(RLIMIT_NOFILE, &rl) == 0)
932 			maxfd = (int)rl.rlim_cur;
933 	}
934 	(void) enable_extended_FILE_stdio(-1, -1);
935 
936 	/*
937 	 * The parent needs to maintain 3 of its own fd's, plus 2 for
938 	 * each child (the stdout and stderr pipes).
939 	 */
940 	maxfd = (maxfd / 2) - 6;	/* 6 takes care of temporary  */
941 					/* periods of open fds */
942 	if (maxfd < maxrun)
943 		maxrun = maxfd;
944 	if (maxrun < 4)
945 		maxrun = 4;		/* sanity check */
946 
947 	if (count == 0)
948 		mntlist = NULL;		/* used as a flag later */
949 	else
950 		fstype = NULL;		/* mount points supplied: */
951 					/* ignore fstype */
952 	/*
953 	 * Read the whole vfstab into a linked list for quick processing.
954 	 * On average, this is the most efficient way to collect and
955 	 * manipulate the vfstab data.
956 	 */
957 	vfsll = getvfsall(fstype, mntlist == NULL);
958 
959 	/*
960 	 * Make an array out of the vfs linked list for sorting purposes.
961 	 */
962 	if (vfsll == NULL ||
963 	    (vfsarray = make_vfsarray(mntlist, count)) == NULL) {
964 		if (mntlist == NULL)	/* not an error - just none found */
965 			return (0);
966 
967 		fprintf(stderr, gettext("%s: No valid entries found in %s\n"),
968 		    myname, vfstab);
969 		return (1);
970 	}
971 
972 	/*
973 	 * Sort the entries based on their resolved path names
974 	 *
975 	 * If an lofs is encountered, then the original order of the vfstab
976 	 * file needs to be maintained until we are done mounting lofs's.
977 	 */
978 	if (!lofscnt)
979 		qsort((void *)vfsarray, vfsarraysize, sizeof (vfsent_t *),
980 		    mlevelcmp);
981 
982 	/*
983 	 * Shrink the vfsll linked list down to the new list.  This will
984 	 * speed up the pid search in cleanupkid() later.
985 	 */
986 	vfsll = vfsarray[0];
987 	for (vl = vfsarray; vp = *vl; )
988 		vp->next = *++vl;
989 
990 	/*
991 	 * Try to handle interrupts in a reasonable way.
992 	 */
993 	sigset(SIGHUP, cleanup);
994 	sigset(SIGQUIT, cleanup);
995 	sigset(SIGINT, cleanup);
996 
997 	do_mounts();		/* do the mounts */
998 
999 	if (failcnt > 0 && failcnt == lofsfail)
1000 		return (ALL_LOFS_FAILURES);
1001 
1002 	return (exitcode);
1003 }
1004 
1005 /*
1006  * Read all vstab (fp) entries into memory if fstype == NULL.
1007  * If fstype is specified, than read all those that match it.
1008  *
1009  * Returns a linked list.
1010  */
1011 vfsent_t *
1012 getvfsall(char *fstype, int takeall)
1013 {
1014 	vfsent_t	*vhead, *vtail;
1015 	struct vfstab 	vget;
1016 	FILE		*fp;
1017 	int		cnt = 0, ret;
1018 
1019 	if ((fp = fopen(vfstab, "r")) == NULL) {
1020 		fprintf(stderr, gettext("%s: Cannot open %s\n"),
1021 		    myname, vfstab);
1022 		exit(1);
1023 	}
1024 
1025 	vhead = vtail = NULL;
1026 
1027 	while ((ret = getvfsent(fp, &vget)) != -1) {
1028 		vfsent_t *vp;
1029 
1030 		if (ret > 0) {
1031 			vfserror(ret, vget.vfs_mountp);
1032 			continue;
1033 		}
1034 
1035 		/*
1036 		 * If mount points were not specified, then we ignore
1037 		 * entries that aren't marked "yes".
1038 		 */
1039 		if (takeall &&
1040 		    (vget.vfs_automnt == NULL ||
1041 		    strcmp(vget.vfs_automnt, "yes")))
1042 			continue;
1043 
1044 		if (fstype && vget.vfs_fstype &&
1045 		    strcmp(fstype, vget.vfs_fstype))
1046 			continue;
1047 
1048 		if (vget.vfs_mountp == NULL ||
1049 		    (vget.vfs_fstype && (strcmp(vget.vfs_fstype, "swap") == 0)))
1050 			continue;
1051 
1052 		if (check_fields(vget.vfs_fstype, vget.vfs_mountp)) {
1053 			exitcode = 1;
1054 			continue;
1055 		}
1056 
1057 		vp = new_vfsent(&vget, cnt);	/* create new vfs entry */
1058 		if (vhead == NULL)
1059 			vhead = vp;
1060 		else
1061 			vtail->next = vp;
1062 		vtail = vp;
1063 		cnt++;
1064 	}
1065 	fclose(fp);
1066 	if (vtail == NULL) {
1067 		vfsarraysize = 0;
1068 		vfslltail = NULL;
1069 		return (NULL);
1070 	}
1071 	vtail->next = NULL;
1072 	vfslltail = vtail;	/* save it in the global variable */
1073 	vfsarraysize = cnt;
1074 	return (vhead);
1075 }
1076 
1077 
1078 /*
1079  * Returns an array of vfsent_t's based on vfsll & mntlist.
1080  */
1081 vfsent_t **
1082 make_vfsarray(char **mntlist, int count)
1083 {
1084 	vfsent_t 	*vp, *vmark, *vpprev, **vpp;
1085 	int		ndx, found;
1086 
1087 	if (vfsll == NULL)
1088 		return (NULL);
1089 
1090 	if (count > 0)
1091 		vfsarraysize = count;
1092 
1093 	vpp = (vfsent_t **)malloc(sizeof (*vpp) * (vfsarraysize + 1));
1094 	if (vpp == NULL)
1095 		nomem();
1096 
1097 	if (mntlist == NULL) {
1098 		/*
1099 		 * No mount list specified: take all vfstab mount points.
1100 		 */
1101 		for (ndx = 0, vp = vfsll; vp; vp = vp->next) {
1102 			(void) setrpath(vp);
1103 			/*
1104 			 * Sigh. lofs entries can complicate matters so much
1105 			 * that the best way to avoid problems is to
1106 			 * stop parallel mounting when an lofs is
1107 			 * encountered, so we keep a count of how many
1108 			 * there are.
1109 			 * Fortunately this is rare.
1110 			 */
1111 			if (vp->v.vfs_fstype &&
1112 			    (strcmp(vp->v.vfs_fstype, MNTTYPE_LOFS) == 0))
1113 				lofscnt++;
1114 
1115 			vpp[ndx++] = vp;
1116 		}
1117 		vpp[ndx] = NULL;
1118 		return (vpp);
1119 	}
1120 
1121 	/*
1122 	 * A list of mount points was specified on the command line
1123 	 * and we need to search for each one.
1124 	 */
1125 	vpprev = vfslltail;
1126 	vpprev->next = vfsll;	/* make a circle out of it */
1127 	vmark = vp = vfsll;
1128 	/*
1129 	 * For each specified mount point:
1130 	 */
1131 	for (ndx = 0; *mntlist; mntlist++) {
1132 		found = 0;
1133 		/*
1134 		 * Circle our entire linked list, looking for *mntlist.
1135 		 */
1136 		while (vp) {
1137 			if (strcmp(*mntlist, vp->v.vfs_mountp) == 0) {
1138 				vpp[ndx++] = vp;	/* found it. */
1139 				(void) setrpath(vp);
1140 				if (vp->v.vfs_fstype &&
1141 				    (strcmp(vp->v.vfs_fstype,
1142 				    MNTTYPE_LOFS) == 0))
1143 					lofscnt++;
1144 
1145 				if (vp == vpprev) {	/* list exhausted */
1146 					vp = NULL;
1147 					found++;
1148 					break;
1149 				}
1150 				/*
1151 				 * Remove it from the circular list.  vpprev
1152 				 * remains unchanged.
1153 				 */
1154 				vp = vp->next;
1155 				vpprev->next->next = NULL;
1156 				vpprev->next = vp;
1157 				/*
1158 				 * Set vmark to the first elem that we check
1159 				 * each time.
1160 				 */
1161 				vmark = vp;
1162 				found++;
1163 				break;
1164 			}
1165 			vpprev = vp;
1166 			vp = vp->next;
1167 			if (vp == vmark)	/* break out if we completed */
1168 						/* the circle */
1169 				break;
1170 		}
1171 
1172 		if (!found) {
1173 			fprintf(stderr, gettext(
1174 			    "%s: Warning: %s not found in %s\n"),
1175 			    myname, *mntlist, vfstab);
1176 			exitcode = 1;
1177 		}
1178 	}
1179 	if (ndx == 0)
1180 		return (NULL);
1181 
1182 	vpp[ndx] = NULL;	/* null terminate the list */
1183 	vfsarraysize = ndx;	/* adjust vfsarraysize */
1184 	return (vpp);
1185 }
1186 
1187 /*
1188  * Performs the exec argument processing, all  of the child forking and
1189  * execing, and child cleanup.
1190  * Sets exitcode to non-zero if any errors occurred.
1191  */
1192 void
1193 do_mounts(void)
1194 {
1195 	int 		i, isave, cnt;
1196 	vfsent_t 	*vp, *vpprev, **vl;
1197 	char		*newargv[ARGV_MAX];
1198 	pid_t		child;
1199 
1200 	/*
1201 	 * create the arg list once;  the only differences among
1202 	 * the calls are the options, special and mountp fields.
1203 	 */
1204 	i = 2;
1205 	if (cflg)
1206 		newargv[i++] = "-c";
1207 	if (gflg)
1208 		newargv[i++] = "-g";
1209 	if (mflg)
1210 		newargv[i++] = "-m";
1211 	if (Oflg)
1212 		newargv[i++] = "-O";
1213 	if (qflg)
1214 		newargv[i++] = "-q";
1215 	if (rflg)
1216 		newargv[i++] = "-r";
1217 	if (dashflg)
1218 		newargv[i++] = "--";
1219 	if (oflg) {
1220 		newargv[i++] = "-o";
1221 		newargv[i++] = specific_opts;
1222 	}
1223 	isave = i;
1224 
1225 	/*
1226 	 * Main loop for the mount processes
1227 	 */
1228 	vl = vfsarray;
1229 	cnt = vfsarraysize;
1230 	for (vpprev = *vl; vp = *vl; vpprev = vp, vl++, cnt--) {
1231 		/*
1232 		 * Check to see if we cross a mount level: e.g.,
1233 		 * /a/b -> /a/b/c.  If so, we need to wait for all current
1234 		 * mounts to finish, rerun realpath on the remaining mount
1235 		 * points, and resort the list.
1236 		 *
1237 		 * Also, we mount serially as long as there are lofs's
1238 		 * to mount to avoid improper mount ordering.
1239 		 */
1240 		if (vp->mlevel > vpprev->mlevel || lofscnt > 0) {
1241 			vfsent_t **vlp;
1242 
1243 			while (nrun > 0 && (dowait() != -1))
1244 				;
1245 			/*
1246 			 * Gads! It's possible for real path mounts points to
1247 			 * change after mounts are done at a lower mount
1248 			 * level.
1249 			 * Thus, we need to recalculate mount levels and
1250 			 * resort the list from this point.
1251 			 */
1252 			for (vlp = vl; *vlp; vlp++)
1253 				(void) setrpath(*vlp);
1254 			/*
1255 			 * Sort the remaining entries based on their newly
1256 			 * resolved path names.
1257 			 * Do not sort if we still have lofs's to mount.
1258 			 */
1259 			if (lofscnt == 0) {
1260 				qsort((void *)vl, cnt, sizeof (vfsent_t *),
1261 				    mlevelcmp);
1262 				vp = *vl;
1263 			}
1264 		}
1265 
1266 		if (vp->flag & VRPFAILED) {
1267 			fprintf(stderr, gettext(
1268 			    "%s: Nonexistent mount point: %s\n"),
1269 			    myname, vp->v.vfs_mountp);
1270 			vp->flag |= VNOTMOUNTED;
1271 			exitcode = 1;
1272 			continue;
1273 		}
1274 
1275 		/*
1276 		 * If mount options were not specified on the command
1277 		 * line, then use the ones found in the vfstab entry,
1278 		 * if any.
1279 		 */
1280 		i = isave;
1281 		if (!oflg && vp->v.vfs_mntopts) {
1282 			newargv[i++] = "-o";
1283 			newargv[i++] = vp->v.vfs_mntopts;
1284 		}
1285 		newargv[i++] = vp->v.vfs_special;
1286 		newargv[i++] = vp->rpath;
1287 		newargv[i] = NULL;
1288 
1289 		/*
1290 		 * This should never really fail.
1291 		 */
1292 		while (setup_iopipe(vp) == -1 && (dowait() != -1))
1293 			;
1294 
1295 		while (nrun >= maxrun && (dowait() != -1))	/* throttle */
1296 			;
1297 
1298 #ifdef	CACHEFS_BUG
1299 		if (vp->v.vfs_fstype &&
1300 		    (strcmp(vp->v.vfs_fstype, "cachefs") == 0)) {
1301 			while (cachefs_running && (dowait() != -1))
1302 				;
1303 			cachefs_running = 1;
1304 		}
1305 #endif
1306 
1307 		if ((child = fork()) == -1) {
1308 			perror("fork");
1309 			cleanup(-1);
1310 			/* not reached */
1311 		}
1312 		if (child == 0) {		/* child */
1313 			signal(SIGHUP, SIG_IGN);
1314 			signal(SIGQUIT, SIG_IGN);
1315 			signal(SIGINT, SIG_IGN);
1316 			setup_output(vp);
1317 			doexec(vp->v.vfs_fstype, newargv);
1318 			perror("exec");
1319 			exit(1);
1320 		}
1321 
1322 		/* parent */
1323 		(void) close(vp->sopipe[WRPIPE]);
1324 		(void) close(vp->sepipe[WRPIPE]);
1325 		vp->pid = child;
1326 		nrun++;
1327 	}
1328 	/*
1329 	 * Mostly done by now - wait and clean up the stragglers.
1330 	 */
1331 	cleanup(0);
1332 }
1333 
1334 
1335 /*
1336  * Setup stdout and stderr pipes for the children's output.
1337  */
1338 int
1339 setup_iopipe(vfsent_t *mp)
1340 {
1341 	/*
1342 	 * Make a stdout and stderr pipe.  This should never fail.
1343 	 */
1344 	if (pipe(mp->sopipe) == -1)
1345 		return (-1);
1346 	if (pipe(mp->sepipe) == -1) {
1347 		(void) close(mp->sopipe[RDPIPE]);
1348 		(void) close(mp->sopipe[WRPIPE]);
1349 		return (-1);
1350 	}
1351 	/*
1352 	 * Don't block on an empty pipe.
1353 	 */
1354 	(void) fcntl(mp->sopipe[RDPIPE], F_SETFL, O_NDELAY|O_NONBLOCK);
1355 	(void) fcntl(mp->sepipe[RDPIPE], F_SETFL, O_NDELAY|O_NONBLOCK);
1356 	/*
1357 	 * Don't pass extra fds into children.
1358 	 */
1359 	(void) fcntl(mp->sopipe[RDPIPE], F_SETFD, FD_CLOEXEC);
1360 	(void) fcntl(mp->sepipe[RDPIPE], F_SETFD, FD_CLOEXEC);
1361 
1362 	return (0);
1363 }
1364 
1365 /*
1366  * Called by a child to attach its stdout and stderr to the write side of
1367  * the pipes.
1368  */
1369 void
1370 setup_output(vfsent_t *vp)
1371 {
1372 
1373 	(void) close(fileno(stdout));
1374 	(void) dup(vp->sopipe[WRPIPE]);
1375 	(void) close(vp->sopipe[WRPIPE]);
1376 
1377 	(void) close(fileno(stderr));
1378 	(void) dup(vp->sepipe[WRPIPE]);
1379 	(void) close(vp->sepipe[WRPIPE]);
1380 }
1381 
1382 /*
1383  * Parent uses this to print any stdout or stderr output issued by
1384  * the child.
1385  */
1386 static void
1387 doio(vfsent_t *vp)
1388 {
1389 	int bytes;
1390 	char ibuf[BUFSIZ];
1391 
1392 	while ((bytes = read(vp->sepipe[RDPIPE], ibuf, sizeof (ibuf))) > 0)
1393 		write(fileno(stderr), ibuf, bytes);
1394 	while ((bytes = read(vp->sopipe[RDPIPE], ibuf, sizeof (ibuf))) > 0)
1395 		write(fileno(stdout), ibuf, bytes);
1396 
1397 	(void) close(vp->sopipe[RDPIPE]);
1398 	(void) close(vp->sepipe[RDPIPE]);
1399 }
1400 
1401 /*
1402  * Waits for 1 child to die.
1403  *
1404  * Returns -1 if no children are left to wait for.
1405  * Returns 0 if a child died without an error.
1406  * Returns 1 if a child died with an error.
1407  */
1408 int
1409 dowait(void)
1410 {
1411 	int child, wstat;
1412 
1413 	if ((child = wait(&wstat)) == -1)
1414 		return (-1);
1415 	nrun--;
1416 	return (cleanupkid(child, wstat) != 0);
1417 }
1418 
1419 /*
1420  * Locates the child mount process represented by pid, outputs any io
1421  * it may have, and returns its exit code.
1422  * Sets the global exitcode if an error occurred.
1423  */
1424 int
1425 cleanupkid(pid_t pid, int wstat)
1426 {
1427 	vfsent_t *vp, *prevp;
1428 	int ret;
1429 
1430 	if (WIFEXITED(wstat))		/* this should always be true */
1431 		ret = WEXITSTATUS(wstat);
1432 	else
1433 		ret = 1;		/* assume some kind of error */
1434 	if (ret) {
1435 		exitcode = 1;
1436 		failcnt++;
1437 	}
1438 
1439 	/*
1440 	 * Find our child.
1441 	 * This search gets smaller and smaller as children are cleaned
1442 	 * up.
1443 	 */
1444 	for (prevp = NULL, vp = vfsll; vp; vp = vp->next) {
1445 		if (vp->pid != pid) {
1446 			prevp = vp;
1447 			continue;
1448 		}
1449 		/*
1450 		 * Found: let's remove it from this linked list.
1451 		 */
1452 		if (prevp) {
1453 			prevp->next = vp->next;
1454 			vp->next = NULL;
1455 		}
1456 		break;
1457 	}
1458 
1459 	if (vp == NULL) {
1460 		/*
1461 		 * This should never happen.
1462 		 */
1463 		fprintf(stderr, gettext(
1464 		    "%s: Unknown child %d\n"), myname, pid);
1465 		exitcode = 1;
1466 		return (ret);
1467 	}
1468 	doio(vp);	/* Any output? */
1469 
1470 	if (vp->v.vfs_fstype &&
1471 	    (strcmp(vp->v.vfs_fstype, MNTTYPE_LOFS) == 0)) {
1472 		lofscnt--;
1473 		if (ret)
1474 			lofsfail++;
1475 	}
1476 
1477 #ifdef CACHEFS_BUG
1478 	if (vp->v.vfs_fstype && (strcmp(vp->v.vfs_fstype, "cachefs") == 0))
1479 		cachefs_running = 0;
1480 #endif
1481 
1482 	vp->exitcode = ret;
1483 	return (ret);
1484 }
1485 
1486 
1487 static vfsent_t zvmount = { 0 };
1488 
1489 vfsent_t *
1490 new_vfsent(struct vfstab *vin, int order)
1491 {
1492 	vfsent_t *new;
1493 
1494 	new = (vfsent_t *)malloc(sizeof (*new));
1495 	if (new == NULL)
1496 		nomem();
1497 
1498 	*new = zvmount;
1499 	if (vin->vfs_special &&
1500 	    (new->v.vfs_special = strdup(vin->vfs_special)) == NULL)
1501 		nomem();
1502 	if (vin->vfs_mountp &&
1503 	    (new->v.vfs_mountp = strdup(vin->vfs_mountp)) == NULL)
1504 		nomem();
1505 	if (vin->vfs_fstype &&
1506 	    (new->v.vfs_fstype = strdup(vin->vfs_fstype)) == NULL)
1507 		nomem();
1508 	/*
1509 	 * If specific mount options were specified on the command
1510 	 * line, then use those.  Else, use the ones on the vfstab
1511 	 * line, if any.  In other words, specific options on the
1512 	 * command line override those in /etc/vfstab.
1513 	 */
1514 	if (oflg) {
1515 		if ((new->v.vfs_mntopts = strdup(specific_opts)) == NULL)
1516 			nomem();
1517 	} else if (vin->vfs_mntopts &&
1518 	    (new->v.vfs_mntopts = strdup(vin->vfs_mntopts)) == NULL)
1519 			nomem();
1520 
1521 	new->order = order;
1522 	return (new);
1523 }
1524 
1525 /*
1526  * Runs realpath on vp's mount point, records success or failure,
1527  * resets the mount level based on the new realpath, and returns
1528  * realpath()'s return value.
1529  */
1530 char *
1531 setrpath(vfsent_t *vp)
1532 {
1533 	char *rp;
1534 
1535 	if ((rp = realpath(vp->v.vfs_mountp, realdir)) == NULL)
1536 		vp->flag |= VRPFAILED;
1537 	else
1538 		vp->flag &= ~VRPFAILED;
1539 
1540 	if (vp->rpath)
1541 		free(vp->rpath);
1542 	if ((vp->rpath = strdup(realdir)) == NULL)
1543 		nomem();
1544 	vp->mlevel = fsgetmlevel(vp->rpath);
1545 	return (rp);
1546 }
1547 
1548 
1549 /*
1550  * sort first by mlevel (1...N), then by vfstab order.
1551  */
1552 int
1553 mlevelcmp(const void *a, const void *b)
1554 {
1555 	vfsent_t *a1, *b1;
1556 	int	lcmp;
1557 
1558 	a1 = *(vfsent_t **)a;
1559 	b1 = *(vfsent_t **)b;
1560 
1561 	lcmp = a1->mlevel - b1->mlevel;
1562 	if (lcmp == 0)
1563 		lcmp = a1->order - b1->order;
1564 	return (lcmp);
1565 }
1566 
1567 /* sort by vfstab order.  0..N */
1568 static int
1569 mordercmp(const void *a, const void *b)
1570 {
1571 	vfsent_t *a1, *b1;
1572 
1573 	a1 = *(vfsent_t **)a;
1574 	b1 = *(vfsent_t **)b;
1575 	return (a1->order - b1->order);
1576 }
1577 
1578 /*
1579  * cleanup the existing children and exit with an error
1580  * if asig != 0.
1581  */
1582 void
1583 cleanup(int asig)
1584 {
1585 	while (nrun > 0 && (dowait() != -1))
1586 		;
1587 
1588 	if (asig != 0)
1589 		exit(1);
1590 }
1591 
1592 
1593 int
1594 check_fields(char *fstype, char *mountp)
1595 {
1596 	struct stat64 stbuf;
1597 
1598 	if (strlen(fstype) > (size_t)FSTYPE_MAX) {
1599 		fprintf(stderr,
1600 		    gettext("%s: FSType %s exceeds %d characters\n"),
1601 		    myname, fstype, FSTYPE_MAX);
1602 		return (1);
1603 	}
1604 
1605 	if (mountp == NULL) {
1606 		fprintf(stderr,
1607 		    gettext("%s: Mount point cannot be determined\n"),
1608 		    myname);
1609 		return (1);
1610 	}
1611 	if (*mountp != '/') {
1612 		fprintf(stderr, gettext(
1613 		    "%s: Mount point %s is not an absolute pathname.\n"),
1614 		    myname, mountp);
1615 		return (1);
1616 	}
1617 	/*
1618 	 * Don't do some of these checks if aflg because a mount point may
1619 	 * not exist now, but will be mounted before we get to it.
1620 	 * This is one of the quirks of "secondary mounting".
1621 	 */
1622 	if (!aflg && stat64(mountp, &stbuf) < 0) {
1623 		if (errno == ENOENT || errno == ENOTDIR)
1624 			fprintf(stderr,
1625 			    gettext("%s: Mount point %s does not exist.\n"),
1626 			    myname, mountp);
1627 		else {
1628 			fprintf(stderr,
1629 			    gettext("%s: Cannot stat mount point %s.\n"),
1630 			    myname, mountp);
1631 			perror(myname);
1632 		}
1633 		return (1);
1634 	}
1635 	return (0);
1636 }
1637 
1638 void
1639 nomem(void)
1640 {
1641 	fprintf(stderr, gettext("%s: Out of memory\n"), myname);
1642 	while (nrun > 0 && (dowait() != -1))
1643 		;
1644 	exit(1);
1645 }
1646