1/*	$OpenBSD: mount.c,v 1.78 2024/05/09 08:35:40 florian Exp $	*/
2/*	$NetBSD: mount.c,v 1.24 1995/11/18 03:34:29 cgd Exp $	*/
3
4/*
5 * Copyright (c) 1980, 1989, 1993, 1994
6 *	The Regents of the University of California.  All rights reserved.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 * 3. Neither the name of the University nor the names of its contributors
17 *    may be used to endorse or promote products derived from this software
18 *    without specific prior written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 */
32
33#include <sys/types.h>
34#include <sys/mount.h>
35#include <sys/socket.h>
36#include <sys/wait.h>
37
38#include <nfs/rpcv2.h>
39#include <nfs/nfsproto.h>
40#include <nfs/nfs.h>
41
42#include <err.h>
43#include <errno.h>
44#include <fstab.h>
45#include <netdb.h>
46#include <signal.h>
47#include <stdio.h>
48#include <stdlib.h>
49#include <string.h>
50#include <unistd.h>
51#include <limits.h>
52#include <util.h>
53
54#include "pathnames.h"
55
56int	debug, verbose, skip;
57char	**typelist = NULL;
58enum { NONET_FILTER, NET_FILTER } filter = NONET_FILTER;
59
60int	selected(const char *);
61char   *catopt(char *, const char *);
62char   *flags2opts(u_int32_t);
63struct statfs
64       *getmntpt(const char *);
65int	hasopt(const char *, const char *);
66void	maketypelist(char *);
67void	mangle(char *, int *, const char **, int);
68int	mountfs(const char *, const char *, const char *, const char *,
69	    const char *, int);
70void	prmount(struct statfs *);
71int	disklabelcheck(struct fstab *);
72__dead void	usage(void);
73
74/* Map from mount options to printable formats. */
75static struct opt {
76	int o_opt;
77	int o_silent;
78	const char *o_name;
79	const char *o_optname;
80} optnames[] = {
81	{ MNT_ASYNC,		0,	"asynchronous",		"async" },
82	{ MNT_DEFEXPORTED,	1,	"exported to the world", "" },
83	{ MNT_EXPORTED,		0,	"NFS exported",		"" },
84	{ MNT_EXPORTANON,	1,	"anon uid mapping",	"" },
85	{ MNT_EXRDONLY,		1,	"exported read-only",	"" },
86	{ MNT_LOCAL,		0,	"local",		"" },
87	{ MNT_NOATIME,		0,	"noatime",		"noatime" },
88	{ MNT_NODEV,		0,	"nodev",		"nodev" },
89	{ MNT_NOEXEC,		0,	"noexec",		"noexec" },
90	{ MNT_NOSUID,		0,	"nosuid",		"nosuid" },
91	{ MNT_NOPERM,		0,	"noperm",		"noperm" },
92	{ MNT_WXALLOWED,	0,	"wxallowed",		"wxallowed" },
93	{ MNT_QUOTA,		0,	"with quotas",		"" },
94	{ MNT_RDONLY,		0,	"read-only",		"ro" },
95	{ MNT_ROOTFS,		1,	"root file system",	"" },
96	{ MNT_SYNCHRONOUS,	0,	"synchronous",		"sync" },
97	{ MNT_SOFTDEP,		0,	"softdep",		"softdep" },
98	{ 0,			0,	"",			"" }
99};
100
101int
102main(int argc, char * const argv[])
103{
104	const char *mntonname, *vfstype;
105	struct fstab *fs;
106	struct statfs *mntbuf;
107	FILE *mountdfp;
108	pid_t pid;
109	int all, ch, forceall, i, mntsize, rval, new;
110	char *options, mntpath[PATH_MAX];
111
112	all = forceall = 0;
113	options = NULL;
114	vfstype = "ffs";
115	while ((ch = getopt(argc, argv, "AadfNo:rswt:uv")) != -1)
116		switch (ch) {
117		case 'A':
118			all = forceall = 1;
119			break;
120		case 'a':
121			all = 1;
122			break;
123		case 'd':
124			debug = 1;
125			break;
126		case 'f':
127			if (!hasopt(options, "force"))
128				options = catopt(options, "force");
129			break;
130		case 'N':
131			filter = NET_FILTER;
132			break;
133		case 'o':
134			if (*optarg)
135				options = catopt(options, optarg);
136			break;
137		case 'r':
138			if (!hasopt(options, "ro"))
139				options = catopt(options, "ro");
140			break;
141		case 's':
142			skip = 1;
143			break;
144		case 't':
145			if (typelist != NULL)
146				errx(1, "only one -t option may be specified.");
147			maketypelist(optarg);
148			vfstype = optarg;
149			break;
150		case 'u':
151			if (!hasopt(options, "update"))
152				options = catopt(options, "update");
153			break;
154		case 'v':
155			verbose = 1;
156			break;
157		case 'w':
158			if (!hasopt(options, "rw"))
159				options = catopt(options, "rw");
160			break;
161		default:
162			usage();
163		}
164	argc -= optind;
165	argv += optind;
166
167	if (typelist == NULL && argc == 2) {
168		/*
169		 * If -t flag has not been specified, and spec contains either
170		 * a ':' or a '@' then assume that an NFS filesystem is being
171		 * specified ala Sun.  If not, check the disklabel for a
172		 * known filesystem type.
173		 */
174		if (strpbrk(argv[0], ":@") != NULL)
175			vfstype = "nfs";
176		else {
177			char *labelfs = readlabelfs(argv[0], 0);
178			if (labelfs != NULL)
179				vfstype = labelfs;
180		}
181	}
182
183	if (pledge("stdio rpath disklabel proc exec", NULL) == -1)
184		err(1, "pledge");
185
186#define	BADTYPE(type)							\
187	(strcmp(type, FSTAB_RO) &&					\
188	    strcmp(type, FSTAB_RW) && strcmp(type, FSTAB_RQ))
189
190	rval = 0;
191	new = 0;
192	switch (argc) {
193	case 0:
194		if (all)
195			while ((fs = getfsent()) != NULL) {
196				if (BADTYPE(fs->fs_type))
197					continue;
198				switch (filter) {
199				case NET_FILTER:
200					if (!hasopt(fs->fs_mntops, "net"))
201						continue;
202					break;
203				case NONET_FILTER:
204					if (hasopt(fs->fs_mntops, "net"))
205						continue;
206					break;
207				}
208				if (!selected(fs->fs_vfstype))
209					continue;
210				if (hasopt(fs->fs_mntops, "noauto"))
211					continue;
212				if (disklabelcheck(fs))
213					continue;
214				if (mountfs(fs->fs_vfstype, fs->fs_spec,
215				    fs->fs_file, options,
216				    fs->fs_mntops, !forceall))
217					rval = 1;
218				else
219					++new;
220			}
221		else {
222			if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0)
223				err(1, "getmntinfo");
224			for (i = 0; i < mntsize; i++) {
225				if (!selected(mntbuf[i].f_fstypename))
226					continue;
227				prmount(&mntbuf[i]);
228			}
229			return (rval);
230		}
231		break;
232	case 1:
233		if (typelist != NULL)
234			usage();
235
236		if (realpath(*argv, mntpath) == NULL)
237			strlcpy(mntpath, *argv, sizeof(mntpath));
238		if (hasopt(options, "update")) {
239			if ((mntbuf = getmntpt(mntpath)) == NULL)
240				errx(1,
241				    "unknown special file or file system %s.",
242				    mntpath);
243			if ((mntbuf->f_flags & MNT_ROOTFS) &&
244			    !strcmp(mntbuf->f_mntfromname, "root_device")) {
245				/* Lookup fstab for name of root device. */
246				fs = getfsfile(mntbuf->f_mntonname);
247				if (fs == NULL)
248					errx(1,
249					    "can't find fstab entry for %s.",
250					    mntpath);
251			} else {
252				if ((fs = malloc(sizeof(*fs))) == NULL)
253					err(1, NULL);
254				fs->fs_vfstype = mntbuf->f_fstypename;
255				fs->fs_spec = mntbuf->f_mntfromname;
256			}
257			/*
258			 * It's an update, ignore the fstab file options.
259			 * Get the current options, so we can change only
260			 * the options which given via a command line.
261			 */
262			fs->fs_mntops = flags2opts(mntbuf->f_flags);
263			mntonname = mntbuf->f_mntonname;
264		} else {
265			if ((fs = getfsfile(mntpath)) == NULL &&
266			    (fs = getfsspec(mntpath)) == NULL)
267				errx(1, "can't find fstab entry for %s.",
268				    mntpath);
269			if (BADTYPE(fs->fs_type))
270				errx(1, "%s has unknown file system type.",
271				    mntpath);
272			mntonname = fs->fs_file;
273		}
274		rval = mountfs(fs->fs_vfstype, fs->fs_spec,
275		    mntonname, options, fs->fs_mntops, skip);
276		break;
277	case 2:
278		rval = mountfs(vfstype, argv[0], argv[1], options, NULL, skip);
279		break;
280	default:
281		usage();
282	}
283
284	/*
285	 * If the mount was successful and done by root, tell mountd the
286	 * good news.  Pid checks are probably unnecessary, but don't hurt.
287	 * XXX This should be done from kernel.
288	 */
289	if ((rval == 0 || new) && getuid() == 0 &&
290	    (mountdfp = fopen(_PATH_MOUNTDPID, "r")) != NULL) {
291		if (fscanf(mountdfp, "%d", &pid) == 1 &&
292		    pid > 0 && kill(pid, SIGHUP) == -1 && errno != ESRCH)
293			err(1, "signal mountd");
294		(void)fclose(mountdfp);
295	}
296
297	return (rval);
298}
299
300int
301hasopt(const char *mntopts, const char *option)
302{
303	int found;
304	char *opt, *optbuf;
305
306	if (mntopts == NULL)
307		return (0);
308	if ((optbuf = strdup(mntopts)) == NULL)
309		err(1, NULL);
310	found = 0;
311	for (opt = optbuf; !found && opt != NULL; strsep(&opt, ","))
312		found = !strncmp(opt, option, strlen(option));
313	free(optbuf);
314	return (found);
315}
316
317/*
318 * Convert mount(2) flags to list of mount(8) options.
319 */
320char*
321flags2opts(u_int32_t flags)
322{
323	char	*optlist;
324	struct opt *p;
325
326	optlist = NULL;
327	for (p = optnames; p->o_opt; p++) {
328		if (flags & p->o_opt && *p->o_optname)
329			optlist = catopt(optlist, p->o_optname);
330	}
331
332	return(optlist);
333}
334
335int
336mountfs(const char *vfstype, const char *spec, const char *name,
337    const char *options, const char *mntopts, int skipmounted)
338{
339	char *cp;
340
341	/* List of directories containing mount_xxx subcommands. */
342	static const char *edirs[] = {
343		_PATH_SBIN,
344		_PATH_USRSBIN,
345		NULL
346	};
347	const char **argv, **edir;
348	struct statfs sf;
349	pid_t pid;
350	int argc, i, status, argvsize;
351	char *optbuf, execname[PATH_MAX], mntpath[PATH_MAX];
352
353	if (realpath(name, mntpath) == NULL) {
354		warn("realpath %s", name);
355		return (1);
356	}
357
358	name = mntpath;
359
360	if (mntopts == NULL)
361		mntopts = "";
362
363	if (options == NULL) {
364		if (*mntopts == '\0')
365			options = "rw";
366		else {
367			options = mntopts;
368			mntopts = "";
369		}
370	}
371
372	/* options follows after mntopts, so they get priority over mntopts */
373	if ((cp = strdup(mntopts)) == NULL)
374		err(1, NULL);
375	optbuf = catopt(cp, options);
376
377	if (strcmp(name, "/") == 0) {
378		if (!hasopt(optbuf, "update"))
379			optbuf = catopt(optbuf, "update");
380	} else if (skipmounted) {
381		if (statfs(name, &sf) == -1) {
382			warn("statfs %s", name);
383			return (1);
384		}
385		/* XXX can't check f_mntfromname, thanks to mfs, etc. */
386		if (strncmp(name, sf.f_mntonname, MNAMELEN) == 0 &&
387		    strncmp(vfstype, sf.f_fstypename, MFSNAMELEN) == 0) {
388			if (verbose) {
389				printf("%s", sf.f_mntfromname);
390				if (strncmp(sf.f_mntfromname,
391				    sf.f_mntfromspec, MNAMELEN) != 0)
392					printf(" (%s)", sf.f_mntfromspec);
393				printf(" on %s type %.*s: %s\n",
394				    sf.f_mntonname,
395				    MFSNAMELEN, sf.f_fstypename,
396				    "already mounted");
397			}
398			return (0);
399		}
400	}
401
402	argvsize = 64;
403	if((argv = reallocarray(NULL, argvsize, sizeof(char *))) == NULL)
404		err(1, NULL);
405	argc = 0;
406	argv[argc++] = NULL;	/* this should be a full path name */
407	mangle(optbuf, &argc, argv, argvsize - 4);
408	argv[argc++] = spec;
409	argv[argc++] = name;
410	argv[argc] = NULL;
411
412	if (debug) {
413		(void)printf("exec: mount_%s", vfstype);
414		for (i = 1; i < argc; i++)
415			(void)printf(" %s", argv[i]);
416		(void)printf("\n");
417		free(optbuf);
418		free(argv);
419		return (0);
420	}
421
422	switch ((pid = fork())) {
423	case -1:				/* Error. */
424		warn("fork");
425		free(optbuf);
426		free(argv);
427		return (1);
428	case 0:					/* Child. */
429		/* Go find an executable. */
430		edir = edirs;
431		do {
432			(void)snprintf(execname,
433			    sizeof(execname), "%s/mount_%s", *edir, vfstype);
434			argv[0] = execname;
435			execv(execname, (char * const *)argv);
436			if (errno != ENOENT)
437				warn("exec %s for %s", execname, name);
438		} while (*++edir != NULL);
439
440		if (errno == ENOENT)
441			warn("no mount helper program found for %s", vfstype);
442		_exit(1);
443	default:				/* Parent. */
444		free(optbuf);
445		free(argv);
446
447		if (waitpid(pid, &status, 0) == -1) {
448			warn("waitpid");
449			return (1);
450		}
451
452		if (WIFEXITED(status)) {
453			if (WEXITSTATUS(status) != 0)
454				return (WEXITSTATUS(status));
455		} else if (WIFSIGNALED(status)) {
456			warnx("%s: %s", name, strsignal(WTERMSIG(status)));
457			return (1);
458		}
459
460		if (verbose) {
461			if (statfs(name, &sf) == -1) {
462				warn("statfs %s", name);
463				return (1);
464			}
465			prmount(&sf);
466		}
467		break;
468	}
469
470	return (0);
471}
472
473void
474prmount(struct statfs *sf)
475{
476	int flags;
477	struct opt *o;
478	int f = 0;
479
480	printf("%s", sf->f_mntfromname);
481	if (verbose &&
482	    strncmp(sf->f_mntfromname, sf->f_mntfromspec, MNAMELEN) != 0)
483		printf(" (%s)", sf->f_mntfromspec);
484	printf(" on %s type %.*s", sf->f_mntonname,
485	    MFSNAMELEN, sf->f_fstypename);
486
487	flags = sf->f_flags & MNT_VISFLAGMASK;
488	if (verbose && !(flags & MNT_RDONLY))
489		(void)printf("%s%s", !f++ ? " (" : ", ", "rw");
490	for (o = optnames; flags && o->o_opt; o++)
491		if (flags & o->o_opt) {
492			if (!o->o_silent)
493				(void)printf("%s%s", !f++ ? " (" : ", ",
494				    o->o_name);
495			flags &= ~o->o_opt;
496		}
497	if (flags)
498		(void)printf("%sunknown flag%s %#x", !f++ ? " (" : ", ",
499		    flags & (flags - 1) ? "s" : "", flags);
500
501
502	if (verbose) {
503		char buf[26];
504		time_t t = sf->f_ctime;
505
506		if (ctime_r(&t, buf))
507			printf(", ctime=%.24s", buf);
508		else
509			printf(", ctime=%lld", t);
510	}
511
512	/*
513	 * Filesystem-specific options
514	 * We only print the "interesting" values unless in verbose
515	 * mode in order to keep the signal/noise ratio high.
516	 */
517	if (strcmp(sf->f_fstypename, MOUNT_NFS) == 0) {
518		struct protoent *pr;
519		struct nfs_args *nfs_args = &sf->mount_info.nfs_args;
520
521		(void)printf("%s%s", !f++ ? " (" : ", ",
522		    (nfs_args->flags & NFSMNT_NFSV3) ? "v3" : "v2");
523		if (nfs_args->proto && (pr = getprotobynumber(nfs_args->proto)))
524			(void)printf("%s%s", !f++ ? " (" : ", ", pr->p_name);
525		else
526			(void)printf("%s%s", !f++ ? " (" : ", ",
527			    (nfs_args->sotype == SOCK_DGRAM) ? "udp" : "tcp");
528		if (nfs_args->flags & NFSMNT_SOFT)
529			(void)printf("%s%s", !f++ ? " (" : ", ", "soft");
530		else if (verbose)
531			(void)printf("%s%s", !f++ ? " (" : ", ", "hard");
532		if (nfs_args->flags & NFSMNT_INT)
533			(void)printf("%s%s", !f++ ? " (" : ", ", "intr");
534		if (nfs_args->flags & NFSMNT_NOCONN)
535			(void)printf("%s%s", !f++ ? " (" : ", ", "noconn");
536		if (nfs_args->flags & NFSMNT_RDIRPLUS)
537			(void)printf("%s%s", !f++ ? " (" : ", ", "rdirplus");
538		if (verbose || nfs_args->wsize != NFS_WSIZE)
539			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
540			    "wsize", nfs_args->wsize);
541		if (verbose || nfs_args->rsize != NFS_RSIZE)
542			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
543			    "rsize", nfs_args->rsize);
544		if (verbose || nfs_args->readdirsize != NFS_READDIRSIZE)
545			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
546			    "rdirsize", nfs_args->readdirsize);
547		if (verbose || nfs_args->timeo != 10) /* XXX */
548			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
549			    "timeo", nfs_args->timeo);
550		if (verbose || nfs_args->retrans != NFS_RETRANS)
551			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
552			    "retrans", nfs_args->retrans);
553		if (verbose || nfs_args->maxgrouplist != NFS_MAXGRPS)
554			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
555			    "maxgrouplist", nfs_args->maxgrouplist);
556		if (verbose || nfs_args->readahead != NFS_DEFRAHEAD)
557			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
558			    "readahead", nfs_args->readahead);
559		if (verbose) {
560			(void)printf("%s%s=%d", !f++ ? " (" : ", ",
561			    "acregmin", nfs_args->acregmin);
562			(void)printf(", %s=%d",
563			    "acregmax", nfs_args->acregmax);
564			(void)printf(", %s=%d",
565			    "acdirmin", nfs_args->acdirmin);
566			(void)printf(", %s=%d",
567			    "acdirmax", nfs_args->acdirmax);
568		}
569#ifndef SMALL
570	} else if (strcmp(sf->f_fstypename, MOUNT_MFS) == 0) {
571		int headerlen;
572		long blocksize;
573		char *header;
574
575		header = getbsize(&headerlen, &blocksize);
576		(void)printf("%s%s=%lu %s", !f++ ? " (" : ", ",
577		    "size", sf->mount_info.mfs_args.size / blocksize, header);
578#endif /* SMALL */
579	} else if (strcmp(sf->f_fstypename, MOUNT_MSDOS) == 0) {
580		struct msdosfs_args *msdosfs_args = &sf->mount_info.msdosfs_args;
581
582		if (verbose || msdosfs_args->uid || msdosfs_args->gid)
583			(void)printf("%s%s=%u, %s=%u", !f++ ? " (" : ", ",
584			    "uid", msdosfs_args->uid, "gid", msdosfs_args->gid);
585		if (verbose || msdosfs_args->mask != 0755)
586			(void)printf("%s%s=0%o", !f++ ? " (" : ", ",
587			    "mask", msdosfs_args->mask);
588		if (msdosfs_args->flags & MSDOSFSMNT_SHORTNAME)
589			(void)printf("%s%s", !f++ ? " (" : ", ", "short");
590		if (msdosfs_args->flags & MSDOSFSMNT_LONGNAME)
591			(void)printf("%s%s", !f++ ? " (" : ", ", "long");
592		if (msdosfs_args->flags & MSDOSFSMNT_NOWIN95)
593			(void)printf("%s%s", !f++ ? " (" : ", ", "nowin95");
594	} else if (strcmp(sf->f_fstypename, MOUNT_CD9660) == 0) {
595		struct iso_args *iso_args = &sf->mount_info.iso_args;
596
597		if (iso_args->flags & ISOFSMNT_NORRIP)
598			(void)printf("%s%s", !f++ ? " (" : ", ", "norrip");
599		if (iso_args->flags & ISOFSMNT_GENS)
600			(void)printf("%s%s", !f++ ? " (" : ", ", "gens");
601		if (iso_args->flags & ISOFSMNT_EXTATT)
602			(void)printf("%s%s", !f++ ? " (" : ", ", "extatt");
603#ifndef SMALL
604	} else if (strcmp(sf->f_fstypename, MOUNT_TMPFS) == 0) {
605		struct tmpfs_args *tmpfs_args = &sf->mount_info.tmpfs_args;
606
607		if (verbose || tmpfs_args->ta_root_uid || tmpfs_args->ta_root_gid)
608			(void)printf("%s%s=%u, %s=%u", !f++ ? " (" : ", ",
609			    "uid", tmpfs_args->ta_root_uid, "gid", tmpfs_args->ta_root_gid);
610		if (verbose || tmpfs_args->ta_root_mode != 040755)
611			(void)printf("%s%s=%04o", !f++ ? " (" : ", ",
612			    "mode", tmpfs_args->ta_root_mode & 07777);
613		if (verbose || tmpfs_args->ta_size_max)
614			(void)printf("%s%s=%lu", !f++ ? " (" : ", ",
615			    "size", (unsigned long)tmpfs_args->ta_size_max);
616		if (verbose || tmpfs_args->ta_nodes_max)
617			(void)printf("%s%s=%lu", !f++ ? " (" : ", ",
618			    "inodes", (unsigned long)tmpfs_args->ta_nodes_max);
619#endif /* SMALL */
620	}
621	(void)printf(f ? ")\n" : "\n");
622}
623
624struct statfs *
625getmntpt(const char *name)
626{
627	struct statfs *mntbuf;
628	int i, mntsize;
629
630	mntsize = getmntinfo(&mntbuf, MNT_NOWAIT);
631	for (i = 0; i < mntsize; i++)
632		if (strcmp(mntbuf[i].f_mntfromname, name) == 0 ||
633		    strcmp(mntbuf[i].f_mntonname, name) == 0)
634			return (&mntbuf[i]);
635	return (NULL);
636}
637
638static enum { IN_LIST, NOT_IN_LIST } which;
639
640int
641selected(const char *type)
642{
643	char **av;
644
645	/* If no type specified, it's always selected. */
646	if (typelist == NULL)
647		return (1);
648	for (av = typelist; *av != NULL; ++av)
649		if (!strncmp(type, *av, MFSNAMELEN))
650			return (which == IN_LIST ? 1 : 0);
651	return (which == IN_LIST ? 0 : 1);
652}
653
654void
655maketypelist(char *fslist)
656{
657	int i;
658	char *nextcp, **av;
659
660	if ((fslist == NULL) || (fslist[0] == '\0'))
661		errx(1, "empty type list");
662
663	/*
664	 * XXX
665	 * Note: the syntax is "noxxx,yyy" for no xxx's and
666	 * no yyy's, not the more intuitive "noxxx,noyyy".
667	 */
668	if (fslist[0] == 'n' && fslist[1] == 'o') {
669		fslist += 2;
670		which = NOT_IN_LIST;
671	} else
672		which = IN_LIST;
673
674	/* Count the number of types. */
675	for (i = 1, nextcp = fslist; (nextcp = strchr(nextcp, ',')); i++)
676		++nextcp;
677
678	/* Build an array of that many types. */
679	if ((av = typelist = reallocarray(NULL, i + 1, sizeof(char *))) == NULL)
680		err(1, NULL);
681	av[0] = fslist;
682	for (i = 1, nextcp = fslist; (nextcp = strchr(nextcp, ',')); i++) {
683		*nextcp = '\0';
684		av[i] = ++nextcp;
685	}
686	/* Terminate the array. */
687	av[i] = NULL;
688}
689
690char *
691catopt(char *s0, const char *s1)
692{
693	char *cp;
694
695	if (s0 && *s0) {
696		if (asprintf(&cp, "%s,%s", s0, s1) == -1)
697			err(1, NULL);
698	} else {
699		if ((cp = strdup(s1)) == NULL)
700			err(1, NULL);
701	}
702
703	free(s0);
704	return cp;
705}
706
707void
708mangle(char *options, int *argcp, const char **argv, int argcmax)
709{
710	char *p, *s;
711	int argc;
712
713	argcmax -= 2;
714	argc = *argcp;
715	for (s = options; argc <= argcmax && (p = strsep(&s, ",")) != NULL;)
716		if (*p != '\0') {
717			if (*p == '-') {
718				argv[argc++] = p;
719				p = strchr(p, '=');
720				if (p) {
721					*p = '\0';
722					argv[argc++] = p + 1;
723				}
724			} else {
725				argv[argc++] = "-o";
726				argv[argc++] = p;
727			}
728		}
729
730	*argcp = argc;
731}
732
733__dead void
734usage(void)
735{
736	(void)fprintf(stderr,
737	    "usage: mount [-AadfNruvw] [-t type]\n"
738	    "       mount [-dfrsuvw] special | node\n"
739	    "       mount [-dfruvw] [-o options] [-t type] special node\n");
740	exit(1);
741}
742
743int
744disklabelcheck(struct fstab *fs)
745{
746	char *labelfs;
747
748	if (strcmp(fs->fs_vfstype, "nfs") != 0 ||
749	    strpbrk(fs->fs_spec, ":@") == NULL) {
750		labelfs = readlabelfs(fs->fs_spec, 0);
751		if (labelfs == NULL ||
752		    strcmp(labelfs, fs->fs_vfstype) == 0)
753			return (0);
754		if (strcmp(fs->fs_vfstype, "ufs") == 0 &&
755		    strcmp(labelfs, "ffs") == 0) {
756			warnx("%s: fstab uses outdated type 'ufs' -- fix please",
757			    fs->fs_spec);
758			return (0);
759		}
760		if (strcmp(fs->fs_vfstype, "mfs") == 0 &&
761		    strcmp(labelfs, "ffs") == 0)
762			return (0);
763		warnx("%s: fstab type %s != disklabel type %s",
764		    fs->fs_spec, fs->fs_vfstype, labelfs);
765		return (1);
766	}
767	return (0);
768}
769