Home | History | Annotate | Line # | Download | only in mount
mount.c revision 1.4
      1  1.1      cgd /*
      2  1.1      cgd  * Copyright (c) 1980, 1989 The Regents of the University of California.
      3  1.1      cgd  * All rights reserved.
      4  1.1      cgd  *
      5  1.1      cgd  * Redistribution and use in source and binary forms, with or without
      6  1.1      cgd  * modification, are permitted provided that the following conditions
      7  1.1      cgd  * are met:
      8  1.1      cgd  * 1. Redistributions of source code must retain the above copyright
      9  1.1      cgd  *    notice, this list of conditions and the following disclaimer.
     10  1.1      cgd  * 2. Redistributions in binary form must reproduce the above copyright
     11  1.1      cgd  *    notice, this list of conditions and the following disclaimer in the
     12  1.1      cgd  *    documentation and/or other materials provided with the distribution.
     13  1.1      cgd  * 3. All advertising materials mentioning features or use of this software
     14  1.1      cgd  *    must display the following acknowledgement:
     15  1.1      cgd  *	This product includes software developed by the University of
     16  1.1      cgd  *	California, Berkeley and its contributors.
     17  1.1      cgd  * 4. Neither the name of the University nor the names of its contributors
     18  1.1      cgd  *    may be used to endorse or promote products derived from this software
     19  1.1      cgd  *    without specific prior written permission.
     20  1.1      cgd  *
     21  1.1      cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     22  1.1      cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  1.1      cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  1.1      cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     25  1.1      cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  1.1      cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  1.1      cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  1.1      cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  1.1      cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  1.1      cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  1.1      cgd  * SUCH DAMAGE.
     32  1.1      cgd  */
     33  1.1      cgd 
     34  1.1      cgd #ifndef lint
     35  1.1      cgd char copyright[] =
     36  1.1      cgd "@(#) Copyright (c) 1980, 1989 The Regents of the University of California.\n\
     37  1.1      cgd  All rights reserved.\n";
     38  1.1      cgd #endif /* not lint */
     39  1.1      cgd 
     40  1.1      cgd #ifndef lint
     41  1.4  mycroft /*static char sccsid[] = "from: @(#)mount.c	5.44 (Berkeley) 2/26/91";*/
     42  1.4  mycroft static char rcsid[] = "$Id: mount.c,v 1.4 1993/08/01 18:26:27 mycroft Exp $";
     43  1.1      cgd #endif /* not lint */
     44  1.1      cgd 
     45  1.1      cgd #include <sys/param.h>
     46  1.1      cgd #include <sys/file.h>
     47  1.1      cgd #include <sys/time.h>
     48  1.1      cgd #include <sys/wait.h>
     49  1.1      cgd #include <sys/errno.h>
     50  1.1      cgd #include <sys/signal.h>
     51  1.1      cgd #include <sys/mount.h>
     52  1.1      cgd #ifdef NFS
     53  1.1      cgd #include <sys/socket.h>
     54  1.1      cgd #include <sys/socketvar.h>
     55  1.1      cgd #include <netdb.h>
     56  1.1      cgd #include <rpc/rpc.h>
     57  1.1      cgd #include <rpc/pmap_clnt.h>
     58  1.1      cgd #include <rpc/pmap_prot.h>
     59  1.1      cgd #include <nfs/rpcv2.h>
     60  1.1      cgd #include <nfs/nfsv2.h>
     61  1.1      cgd #include <nfs/nfs.h>
     62  1.1      cgd #endif
     63  1.1      cgd #include <fstab.h>
     64  1.1      cgd #include <string.h>
     65  1.1      cgd #include <stdio.h>
     66  1.1      cgd #include <stdlib.h>
     67  1.1      cgd #include "pathnames.h"
     68  1.1      cgd 
     69  1.1      cgd #define DEFAULT_ROOTUID	-2
     70  1.1      cgd 
     71  1.1      cgd #define	BADTYPE(type) \
     72  1.1      cgd 	(strcmp(type, FSTAB_RO) && strcmp(type, FSTAB_RW) && \
     73  1.1      cgd 	    strcmp(type, FSTAB_RQ))
     74  1.1      cgd #define	SETTYPE(type) \
     75  1.1      cgd 	(!strcmp(type, FSTAB_RW) || !strcmp(type, FSTAB_RQ))
     76  1.1      cgd 
     77  1.1      cgd int fake, verbose, updateflg, mnttype;
     78  1.1      cgd char *mntname, **envp;
     79  1.1      cgd char **vfslist, **makevfslist();
     80  1.1      cgd static void prmount();
     81  1.1      cgd 
     82  1.1      cgd #ifdef NFS
     83  1.1      cgd int xdr_dir(), xdr_fh();
     84  1.1      cgd char *getnfsargs();
     85  1.1      cgd struct nfs_args nfsdefargs = {
     86  1.1      cgd 	(struct sockaddr *)0,
     87  1.1      cgd 	SOCK_DGRAM,
     88  1.1      cgd 	0,
     89  1.1      cgd 	(nfsv2fh_t *)0,
     90  1.1      cgd 	0,
     91  1.1      cgd 	NFS_WSIZE,
     92  1.1      cgd 	NFS_RSIZE,
     93  1.1      cgd 	NFS_TIMEO,
     94  1.1      cgd 	NFS_RETRANS,
     95  1.1      cgd 	(char *)0,
     96  1.1      cgd };
     97  1.1      cgd 
     98  1.1      cgd struct nfhret {
     99  1.1      cgd 	u_long	stat;
    100  1.1      cgd 	nfsv2fh_t nfh;
    101  1.1      cgd };
    102  1.1      cgd #define	DEF_RETRY	10000
    103  1.1      cgd int retrycnt;
    104  1.1      cgd #define	BGRND	1
    105  1.1      cgd #define	ISBGRND	2
    106  1.1      cgd int opflags = 0;
    107  1.1      cgd #endif
    108  1.1      cgd 
    109  1.1      cgd main(argc, argv, arge)
    110  1.1      cgd 	int argc;
    111  1.1      cgd 	char **argv;
    112  1.1      cgd 	char **arge;
    113  1.1      cgd {
    114  1.1      cgd 	extern char *optarg;
    115  1.1      cgd 	extern int optind;
    116  1.1      cgd 	register struct fstab *fs;
    117  1.1      cgd 	int all, ch, rval, flags, ret, pid, i;
    118  1.1      cgd 	long mntsize;
    119  1.1      cgd 	struct statfs *mntbuf, *getmntpt();
    120  1.1      cgd 	char *type, *options = NULL;
    121  1.1      cgd 	FILE *pidfile;
    122  1.1      cgd 
    123  1.1      cgd 	envp = arge;
    124  1.1      cgd 	all = 0;
    125  1.1      cgd 	type = NULL;
    126  1.1      cgd 	mnttype = MOUNT_UFS;
    127  1.1      cgd 	mntname = "ufs";
    128  1.1      cgd 	while ((ch = getopt(argc, argv, "afrwuvt:o:")) != EOF)
    129  1.1      cgd 		switch((char)ch) {
    130  1.1      cgd 		case 'a':
    131  1.1      cgd 			all = 1;
    132  1.1      cgd 			break;
    133  1.1      cgd 		case 'f':
    134  1.1      cgd 			fake = 1;
    135  1.1      cgd 			break;
    136  1.1      cgd 		case 'r':
    137  1.1      cgd 			type = FSTAB_RO;
    138  1.1      cgd 			break;
    139  1.1      cgd 		case 'u':
    140  1.1      cgd 			updateflg = MNT_UPDATE;
    141  1.1      cgd 			break;
    142  1.1      cgd 		case 'v':
    143  1.1      cgd 			verbose = 1;
    144  1.1      cgd 			break;
    145  1.1      cgd 		case 'w':
    146  1.1      cgd 			type = FSTAB_RW;
    147  1.1      cgd 			break;
    148  1.1      cgd 		case 'o':
    149  1.1      cgd 			options = optarg;
    150  1.1      cgd 			break;
    151  1.1      cgd 		case 't':
    152  1.1      cgd 			vfslist = makevfslist(optarg);
    153  1.1      cgd 			mnttype = getmnttype(optarg);
    154  1.1      cgd 			break;
    155  1.1      cgd 		case '?':
    156  1.1      cgd 		default:
    157  1.1      cgd 			usage();
    158  1.1      cgd 			/* NOTREACHED */
    159  1.1      cgd 		}
    160  1.1      cgd 	argc -= optind;
    161  1.1      cgd 	argv += optind;
    162  1.1      cgd 
    163  1.1      cgd 	/* NOSTRICT */
    164  1.1      cgd 
    165  1.1      cgd 	if (all) {
    166  1.1      cgd 		rval = 0;
    167  1.1      cgd 		while (fs = getfsent()) {
    168  1.1      cgd 			if (BADTYPE(fs->fs_type))
    169  1.1      cgd 				continue;
    170  1.1      cgd 			if (badvfsname(fs->fs_vfstype, vfslist))
    171  1.1      cgd 				continue;
    172  1.1      cgd 			/* `/' is special, it's always mounted */
    173  1.1      cgd 			if (!strcmp(fs->fs_file, "/"))
    174  1.1      cgd 				flags = MNT_UPDATE;
    175  1.1      cgd 			else
    176  1.1      cgd 				flags = updateflg;
    177  1.1      cgd 			mnttype = getmnttype(fs->fs_vfstype);
    178  1.1      cgd 			rval |= mountfs(fs->fs_spec, fs->fs_file, flags,
    179  1.1      cgd 			    type, options, fs->fs_mntops);
    180  1.1      cgd 		}
    181  1.1      cgd 		exit(rval);
    182  1.1      cgd 	}
    183  1.1      cgd 
    184  1.1      cgd 	if (argc == 0) {
    185  1.1      cgd 		if (verbose || fake || type)
    186  1.1      cgd 			usage();
    187  1.1      cgd 		if ((mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0) {
    188  1.1      cgd 			(void) fprintf(stderr,
    189  1.1      cgd 				"mount: cannot get mount information\n");
    190  1.1      cgd 			exit(1);
    191  1.1      cgd 		}
    192  1.1      cgd 		for (i = 0; i < mntsize; i++) {
    193  1.1      cgd 			if (badvfstype(mntbuf[i].f_type, vfslist))
    194  1.1      cgd 				continue;
    195  1.1      cgd 			prmount(mntbuf[i].f_mntfromname, mntbuf[i].f_mntonname,
    196  1.1      cgd 				mntbuf[i].f_flags);
    197  1.1      cgd 		}
    198  1.1      cgd 		exit(0);
    199  1.1      cgd 	}
    200  1.1      cgd 
    201  1.1      cgd 	if (argc == 1 && updateflg) {
    202  1.1      cgd 		if ((mntbuf = getmntpt(*argv)) == NULL) {
    203  1.1      cgd 			(void) fprintf(stderr,
    204  1.1      cgd 			    "mount: unknown special file or file system %s.\n",
    205  1.1      cgd 			    *argv);
    206  1.1      cgd 			exit(1);
    207  1.1      cgd 		}
    208  1.1      cgd 		mnttype = mntbuf->f_type;
    209  1.1      cgd #ifndef LETS_GET_SMALL
    210  1.1      cgd 		if (!strcmp(mntbuf->f_mntfromname, "root_device")) {
    211  1.1      cgd 			fs = getfsfile("/");
    212  1.1      cgd 			strcpy(mntbuf->f_mntfromname, fs->fs_spec);
    213  1.1      cgd 		}
    214  1.1      cgd #endif
    215  1.1      cgd 		ret = mountfs(mntbuf->f_mntfromname, mntbuf->f_mntonname,
    216  1.1      cgd 		    updateflg, type, options, (char *)NULL);
    217  1.1      cgd 	} else if (argc == 1) {
    218  1.1      cgd #ifndef	LETS_GET_SMALL
    219  1.1      cgd 		if (!(fs = getfsfile(*argv)) && !(fs = getfsspec(*argv))) {
    220  1.1      cgd 			(void) fprintf(stderr,
    221  1.1      cgd 			    "mount: unknown special file or file system %s.\n",
    222  1.1      cgd 			    *argv);
    223  1.1      cgd 			exit(1);
    224  1.1      cgd 		}
    225  1.1      cgd 		if (BADTYPE(fs->fs_type)) {
    226  1.1      cgd 			(void) fprintf(stderr,
    227  1.1      cgd 			    "mount: %s has unknown file system type.\n", *argv);
    228  1.1      cgd 			exit(1);
    229  1.1      cgd 		}
    230  1.1      cgd 		mnttype = getmnttype(fs->fs_vfstype);
    231  1.1      cgd 		ret = mountfs(fs->fs_spec, fs->fs_file, updateflg,
    232  1.1      cgd 		    type, options, fs->fs_mntops);
    233  1.1      cgd #else
    234  1.1      cgd 		exit(1);
    235  1.1      cgd #endif
    236  1.1      cgd 	} else if (argc != 2) {
    237  1.1      cgd 		usage();
    238  1.1      cgd 		ret = 1;
    239  1.1      cgd 	} else {
    240  1.1      cgd 		/*
    241  1.1      cgd 		 * If -t flag has not been specified, and spec
    242  1.1      cgd 		 * contains either a ':' or a '@' then assume that
    243  1.1      cgd 		 * an NFS filesystem is being specified ala Sun.
    244  1.1      cgd 		 */
    245  1.1      cgd 		if (vfslist == (char **)0 &&
    246  1.1      cgd 		    (index(argv[0], ':') || index(argv[0], '@')))
    247  1.1      cgd 			mnttype = MOUNT_NFS;
    248  1.1      cgd 		ret = mountfs(argv[0], argv[1], updateflg, type, options,
    249  1.1      cgd 		    (char *)NULL);
    250  1.1      cgd 	}
    251  1.1      cgd #ifndef LETS_GET_SMALL
    252  1.1      cgd 	if ((pidfile = fopen(_PATH_MOUNTDPID, "r")) != NULL) {
    253  1.1      cgd 		pid = 0;
    254  1.1      cgd 		fscanf(pidfile, "%d", &pid);
    255  1.1      cgd 		fclose(pidfile);
    256  1.1      cgd 		if (pid > 0)
    257  1.1      cgd 			kill(pid, SIGHUP);
    258  1.1      cgd 	}
    259  1.1      cgd #endif
    260  1.1      cgd 	exit (ret);
    261  1.1      cgd }
    262  1.1      cgd 
    263  1.1      cgd mountfs(spec, name, flags, type, options, mntopts)
    264  1.1      cgd 	char *spec, *name, *type, *options, *mntopts;
    265  1.1      cgd 	int flags;
    266  1.1      cgd {
    267  1.1      cgd 	union wait status;
    268  1.1      cgd 	pid_t pid;
    269  1.1      cgd 	int argc, i;
    270  1.1      cgd 	struct ufs_args args;
    271  1.1      cgd #ifdef	NFS
    272  1.1      cgd 	struct nfs_args nfsargs;
    273  1.1      cgd #endif
    274  1.1      cgd 	char *argp, *argv[50];
    275  1.1      cgd 	char execname[MAXPATHLEN + 1], flagval[12];
    276  1.1      cgd 
    277  1.1      cgd #ifdef NFS
    278  1.1      cgd 	nfsargs = nfsdefargs;
    279  1.1      cgd #endif
    280  1.1      cgd 	if (mntopts)
    281  1.1      cgd 		getstdopts(mntopts, &flags);
    282  1.1      cgd 	if (options)
    283  1.1      cgd 		getstdopts(options, &flags);
    284  1.1      cgd 	if (type)
    285  1.1      cgd 		getstdopts(type, &flags);
    286  1.1      cgd 	switch (mnttype) {
    287  1.1      cgd 	case MOUNT_UFS:
    288  1.1      cgd 		if (mntopts)
    289  1.1      cgd 			getufsopts(mntopts, &flags);
    290  1.1      cgd 		if (options)
    291  1.1      cgd 			getufsopts(options, &flags);
    292  1.1      cgd 		args.fspec = spec;
    293  1.1      cgd 		args.exroot = DEFAULT_ROOTUID;
    294  1.1      cgd 		if (flags & MNT_RDONLY)
    295  1.1      cgd 			args.exflags = MNT_EXRDONLY;
    296  1.1      cgd 		else
    297  1.1      cgd 			args.exflags = 0;
    298  1.1      cgd 		argp = (caddr_t)&args;
    299  1.1      cgd 		break;
    300  1.1      cgd 
    301  1.1      cgd #ifdef NFS
    302  1.1      cgd 	case MOUNT_NFS:
    303  1.1      cgd 		retrycnt = DEF_RETRY;
    304  1.1      cgd 		if (mntopts)
    305  1.1      cgd 			getnfsopts(mntopts, &nfsargs, &opflags, &retrycnt);
    306  1.1      cgd 		if (options)
    307  1.1      cgd 			getnfsopts(options, &nfsargs, &opflags, &retrycnt);
    308  1.1      cgd 		if (argp = getnfsargs(spec, &nfsargs))
    309  1.1      cgd 			break;
    310  1.1      cgd 		return (1);
    311  1.1      cgd #endif /* NFS */
    312  1.1      cgd 
    313  1.1      cgd #ifndef	LETS_GET_SMALL
    314  1.1      cgd 	case MOUNT_MFS:
    315  1.1      cgd 	default:
    316  1.1      cgd 		argv[0] = mntname;
    317  1.1      cgd 		argc = 1;
    318  1.1      cgd 		if (flags) {
    319  1.1      cgd 			argv[argc++] = "-F";
    320  1.1      cgd 			sprintf(flagval, "%d", flags);
    321  1.1      cgd 			argv[argc++] = flagval;
    322  1.1      cgd 		}
    323  1.1      cgd 		if (mntopts)
    324  1.1      cgd 			argc += getexecopts(mntopts, &argv[argc]);
    325  1.1      cgd 		if (options)
    326  1.1      cgd 			argc += getexecopts(options, &argv[argc]);
    327  1.1      cgd 		argv[argc++] = spec;
    328  1.1      cgd 		argv[argc++] = name;
    329  1.1      cgd 		argv[argc++] = NULL;
    330  1.1      cgd 		sprintf(execname, "%s/mount_%s", _PATH_EXECDIR, mntname);
    331  1.1      cgd 		if (verbose) {
    332  1.1      cgd 			(void)printf("exec: %s", execname);
    333  1.1      cgd 			for (i = 1; i < argc - 1; i++)
    334  1.1      cgd 				(void)printf(" %s", argv[i]);
    335  1.1      cgd 			(void)printf("\n");
    336  1.1      cgd 		}
    337  1.1      cgd 		if (fake)
    338  1.1      cgd 			break;
    339  1.1      cgd 		if (pid = vfork()) {
    340  1.1      cgd 			if (pid == -1) {
    341  1.1      cgd 				perror("mount: vfork starting file system");
    342  1.1      cgd 				return (1);
    343  1.1      cgd 			}
    344  1.1      cgd 			if (waitpid(pid, (int *)&status, 0) != -1 &&
    345  1.1      cgd 			    WIFEXITED(status) &&
    346  1.1      cgd 			    WEXITSTATUS(status) != 0)
    347  1.1      cgd 				return (WEXITSTATUS(status));
    348  1.1      cgd 			spec = mntname;
    349  1.1      cgd 			goto out;
    350  1.1      cgd 		}
    351  1.1      cgd 		execve(execname, argv, envp);
    352  1.1      cgd 		(void) fprintf(stderr, "mount: cannot exec %s for %s: ",
    353  1.1      cgd 			execname, name);
    354  1.1      cgd 		perror((char *)NULL);
    355  1.1      cgd 		exit (1);
    356  1.1      cgd #endif
    357  1.1      cgd 		/* NOTREACHED */
    358  1.1      cgd 
    359  1.1      cgd 	}
    360  1.1      cgd 	if (!fake && mount(mnttype, name, flags, argp)) {
    361  1.1      cgd #ifdef NFS
    362  1.1      cgd 		if (opflags & ISBGRND)
    363  1.1      cgd 			exit(1);
    364  1.1      cgd #endif
    365  1.1      cgd 		(void) fprintf(stderr, "%s on %s: ", spec, name);
    366  1.1      cgd 		switch (errno) {
    367  1.1      cgd 		case EMFILE:
    368  1.1      cgd 			(void) fprintf(stderr, "Mount table full\n");
    369  1.1      cgd 			break;
    370  1.1      cgd 		case EINVAL:
    371  1.1      cgd 			if (flags & MNT_UPDATE)
    372  1.1      cgd 				(void) fprintf(stderr, "Specified device %s\n",
    373  1.1      cgd 					"does not match mounted device");
    374  1.1      cgd 			else if (mnttype == MOUNT_UFS)
    375  1.1      cgd 				(void) fprintf(stderr, "Bogus super block\n");
    376  1.1      cgd 			else
    377  1.1      cgd 				perror((char *)NULL);
    378  1.1      cgd 			break;
    379  1.1      cgd 		default:
    380  1.1      cgd 			perror((char *)NULL);
    381  1.1      cgd 			break;
    382  1.1      cgd 		}
    383  1.1      cgd 		return(1);
    384  1.1      cgd 	}
    385  1.1      cgd 
    386  1.1      cgd out:
    387  1.1      cgd 	if (verbose)
    388  1.1      cgd 		prmount(spec, name, flags);
    389  1.1      cgd 
    390  1.1      cgd #ifdef NFS
    391  1.1      cgd 	if (opflags & ISBGRND)
    392  1.1      cgd 		exit(1);
    393  1.1      cgd #endif
    394  1.1      cgd 	return(0);
    395  1.1      cgd }
    396  1.1      cgd 
    397  1.1      cgd static void
    398  1.1      cgd prmount(spec, name, flags)
    399  1.1      cgd 	char *spec, *name;
    400  1.1      cgd 	register short flags;
    401  1.1      cgd {
    402  1.1      cgd 	register int first;
    403  1.1      cgd 
    404  1.1      cgd #ifdef NFS
    405  1.1      cgd 	if (opflags & ISBGRND)
    406  1.1      cgd 		return;
    407  1.1      cgd #endif
    408  1.1      cgd 	(void)printf("%s on %s", spec, name);
    409  1.1      cgd 	if (!(flags & MNT_VISFLAGMASK)) {
    410  1.1      cgd 		(void)printf("\n");
    411  1.1      cgd 		return;
    412  1.1      cgd 	}
    413  1.1      cgd 	first = 0;
    414  1.1      cgd #define	PR(msg)	(void)printf("%s%s", !first++ ? " (" : ", ", msg)
    415  1.1      cgd 	if (flags & MNT_RDONLY)
    416  1.1      cgd 		PR("read-only");
    417  1.1      cgd 	if (flags & MNT_NOEXEC)
    418  1.1      cgd 		PR("noexec");
    419  1.1      cgd 	if (flags & MNT_NOSUID)
    420  1.1      cgd 		PR("nosuid");
    421  1.1      cgd 	if (flags & MNT_NODEV)
    422  1.1      cgd 		PR("nodev");
    423  1.1      cgd 	if (flags & MNT_SYNCHRONOUS)
    424  1.1      cgd 		PR("synchronous");
    425  1.1      cgd 	if (flags & MNT_QUOTA)
    426  1.1      cgd 		PR("with quotas");
    427  1.1      cgd 	if (flags & MNT_LOCAL)
    428  1.1      cgd 		PR("local");
    429  1.1      cgd 	if (flags & MNT_EXPORTED)
    430  1.1      cgd 		if (flags & MNT_EXRDONLY)
    431  1.1      cgd 			PR("NFS exported read-only");
    432  1.1      cgd 		else
    433  1.1      cgd 			PR("NFS exported");
    434  1.1      cgd 	(void)printf(")\n");
    435  1.1      cgd }
    436  1.1      cgd 
    437  1.1      cgd getmnttype(fstype)
    438  1.1      cgd 	char *fstype;
    439  1.1      cgd {
    440  1.1      cgd 
    441  1.1      cgd 	mntname = fstype;
    442  1.1      cgd 	if (!strcmp(fstype, "ufs"))
    443  1.1      cgd 		return (MOUNT_UFS);
    444  1.1      cgd 	if (!strcmp(fstype, "nfs"))
    445  1.1      cgd 		return (MOUNT_NFS);
    446  1.1      cgd 	if (!strcmp(fstype, "mfs"))
    447  1.1      cgd 		return (MOUNT_MFS);
    448  1.1      cgd 	return (0);
    449  1.1      cgd }
    450  1.1      cgd 
    451  1.1      cgd usage()
    452  1.1      cgd {
    453  1.1      cgd 
    454  1.1      cgd 	(void) fprintf(stderr,
    455  1.1      cgd 		"usage:\n  mount %s %s\n  mount %s\n  mount %s\n",
    456  1.1      cgd 		"[ -frwu ] [ -t nfs | ufs | external_type ]",
    457  1.1      cgd 		"[ -o options ] special node",
    458  1.1      cgd 		"[ -afrwu ] [ -t nfs | ufs | external_type ]",
    459  1.1      cgd 		"[ -frwu ] special | node");
    460  1.1      cgd 	exit(1);
    461  1.1      cgd }
    462  1.1      cgd 
    463  1.1      cgd getstdopts(options, flagp)
    464  1.1      cgd 	char *options;
    465  1.1      cgd 	int *flagp;
    466  1.1      cgd {
    467  1.1      cgd 	register char *opt;
    468  1.1      cgd 	int negative;
    469  1.1      cgd 	char optbuf[BUFSIZ];
    470  1.1      cgd 
    471  1.1      cgd 	(void)strcpy(optbuf, options);
    472  1.1      cgd 	for (opt = strtok(optbuf, ","); opt; opt = strtok((char *)NULL, ",")) {
    473  1.1      cgd 		if (opt[0] == 'n' && opt[1] == 'o') {
    474  1.1      cgd 			negative++;
    475  1.1      cgd 			opt += 2;
    476  1.1      cgd 		} else {
    477  1.1      cgd 			negative = 0;
    478  1.1      cgd 		}
    479  1.1      cgd 		if (!negative && !strcasecmp(opt, FSTAB_RO)) {
    480  1.1      cgd 			*flagp |= MNT_RDONLY;
    481  1.1      cgd 			continue;
    482  1.1      cgd 		}
    483  1.1      cgd 		if (!negative && !strcasecmp(opt, FSTAB_RW)) {
    484  1.1      cgd 			*flagp &= ~MNT_RDONLY;
    485  1.1      cgd 			continue;
    486  1.1      cgd 		}
    487  1.1      cgd 		if (!strcasecmp(opt, "exec")) {
    488  1.1      cgd 			if (negative)
    489  1.1      cgd 				*flagp |= MNT_NOEXEC;
    490  1.1      cgd 			else
    491  1.1      cgd 				*flagp &= ~MNT_NOEXEC;
    492  1.1      cgd 			continue;
    493  1.1      cgd 		}
    494  1.1      cgd 		if (!strcasecmp(opt, "suid")) {
    495  1.1      cgd 			if (negative)
    496  1.1      cgd 				*flagp |= MNT_NOSUID;
    497  1.1      cgd 			else
    498  1.1      cgd 				*flagp &= ~MNT_NOSUID;
    499  1.1      cgd 			continue;
    500  1.1      cgd 		}
    501  1.1      cgd 		if (!strcasecmp(opt, "dev")) {
    502  1.1      cgd 			if (negative)
    503  1.1      cgd 				*flagp |= MNT_NODEV;
    504  1.1      cgd 			else
    505  1.1      cgd 				*flagp &= ~MNT_NODEV;
    506  1.1      cgd 			continue;
    507  1.1      cgd 		}
    508  1.1      cgd 		if (!strcasecmp(opt, "synchronous")) {
    509  1.1      cgd 			if (!negative)
    510  1.1      cgd 				*flagp |= MNT_SYNCHRONOUS;
    511  1.1      cgd 			else
    512  1.1      cgd 				*flagp &= ~MNT_SYNCHRONOUS;
    513  1.1      cgd 			continue;
    514  1.1      cgd 		}
    515  1.1      cgd 	}
    516  1.1      cgd }
    517  1.1      cgd 
    518  1.1      cgd /* ARGSUSED */
    519  1.1      cgd getufsopts(options, flagp)
    520  1.1      cgd 	char *options;
    521  1.1      cgd 	int *flagp;
    522  1.1      cgd {
    523  1.1      cgd 	return;
    524  1.1      cgd }
    525  1.1      cgd 
    526  1.1      cgd getexecopts(options, argv)
    527  1.1      cgd 	char *options;
    528  1.1      cgd 	char **argv;
    529  1.1      cgd {
    530  1.1      cgd 	register int argc = 0;
    531  1.1      cgd 	register char *opt;
    532  1.1      cgd 
    533  1.1      cgd 	for (opt = strtok(options, ","); opt; opt = strtok((char *)NULL, ",")) {
    534  1.1      cgd 		if (opt[0] != '-')
    535  1.1      cgd 			continue;
    536  1.1      cgd 		argv[argc++] = opt;
    537  1.1      cgd 		if (opt[2] == '\0' || opt[2] != '=')
    538  1.1      cgd 			continue;
    539  1.1      cgd 		opt[2] = '\0';
    540  1.1      cgd 		argv[argc++] = &opt[3];
    541  1.1      cgd 	}
    542  1.1      cgd 	return (argc);
    543  1.1      cgd }
    544  1.1      cgd 
    545  1.1      cgd struct statfs *
    546  1.1      cgd getmntpt(name)
    547  1.1      cgd 	char *name;
    548  1.1      cgd {
    549  1.1      cgd 	long mntsize;
    550  1.1      cgd 	register long i;
    551  1.1      cgd 	struct statfs *mntbuf;
    552  1.1      cgd 
    553  1.1      cgd 	mntsize = getmntinfo(&mntbuf, MNT_NOWAIT);
    554  1.1      cgd 	for (i = 0; i < mntsize; i++) {
    555  1.1      cgd 		if (!strcmp(mntbuf[i].f_mntfromname, name) ||
    556  1.1      cgd 		    !strcmp(mntbuf[i].f_mntonname, name))
    557  1.1      cgd 			return (&mntbuf[i]);
    558  1.1      cgd 	}
    559  1.1      cgd 	return ((struct statfs *)0);
    560  1.1      cgd }
    561  1.1      cgd 
    562  1.1      cgd static int skipvfs;
    563  1.1      cgd 
    564  1.1      cgd badvfstype(vfstype, vfslist)
    565  1.1      cgd 	short vfstype;
    566  1.1      cgd 	char **vfslist;
    567  1.1      cgd {
    568  1.1      cgd 
    569  1.1      cgd 	if (vfslist == 0)
    570  1.1      cgd 		return(0);
    571  1.1      cgd 	while (*vfslist) {
    572  1.1      cgd 		if (vfstype == getmnttype(*vfslist))
    573  1.1      cgd 			return(skipvfs);
    574  1.1      cgd 		vfslist++;
    575  1.1      cgd 	}
    576  1.1      cgd 	return (!skipvfs);
    577  1.1      cgd }
    578  1.1      cgd 
    579  1.1      cgd badvfsname(vfsname, vfslist)
    580  1.1      cgd 	char *vfsname;
    581  1.1      cgd 	char **vfslist;
    582  1.1      cgd {
    583  1.1      cgd 
    584  1.1      cgd 	if (vfslist == 0)
    585  1.1      cgd 		return(0);
    586  1.1      cgd 	while (*vfslist) {
    587  1.1      cgd 		if (strcmp(vfsname, *vfslist) == 0)
    588  1.1      cgd 			return(skipvfs);
    589  1.1      cgd 		vfslist++;
    590  1.1      cgd 	}
    591  1.1      cgd 	return (!skipvfs);
    592  1.1      cgd }
    593  1.1      cgd 
    594  1.1      cgd char **
    595  1.1      cgd makevfslist(fslist)
    596  1.1      cgd 	char *fslist;
    597  1.1      cgd {
    598  1.1      cgd 	register char **av, *nextcp;
    599  1.1      cgd 	register int i;
    600  1.1      cgd 
    601  1.1      cgd 	if (fslist == NULL)
    602  1.1      cgd 		return (NULL);
    603  1.1      cgd 	if (fslist[0] == 'n' && fslist[1] == 'o') {
    604  1.1      cgd 		fslist += 2;
    605  1.1      cgd 		skipvfs = 1;
    606  1.1      cgd 	}
    607  1.1      cgd 	for (i = 0, nextcp = fslist; *nextcp; nextcp++)
    608  1.1      cgd 		if (*nextcp == ',')
    609  1.1      cgd 			i++;
    610  1.1      cgd 	av = (char **)malloc((size_t)(i+2) * sizeof(char *));
    611  1.1      cgd 	if (av == NULL)
    612  1.1      cgd 		return (NULL);
    613  1.1      cgd 	nextcp = fslist;
    614  1.1      cgd 	i = 0;
    615  1.1      cgd 	av[i++] = nextcp;
    616  1.1      cgd 	while (nextcp = index(nextcp, ',')) {
    617  1.1      cgd 		*nextcp++ = '\0';
    618  1.1      cgd 		av[i++] = nextcp;
    619  1.1      cgd 	}
    620  1.1      cgd 	av[i++] = 0;
    621  1.1      cgd 	return (av);
    622  1.1      cgd }
    623  1.1      cgd 
    624  1.1      cgd #ifdef NFS
    625  1.1      cgd exclusive(a, b)
    626  1.1      cgd 	char *a, *b;
    627  1.1      cgd {
    628  1.1      cgd 
    629  1.1      cgd 	(void) fprintf(stderr, "mount: Options %s, %s mutually exclusive\n",
    630  1.1      cgd 	    a, b);
    631  1.1      cgd 	exit(1);
    632  1.1      cgd }
    633  1.1      cgd 
    634  1.1      cgd /*
    635  1.1      cgd  * Handle the getoption arg.
    636  1.1      cgd  * Essentially update "opflags", "retrycnt" and "nfsargs"
    637  1.1      cgd  */
    638  1.1      cgd getnfsopts(optarg, nfsargsp, opflagsp, retrycntp)
    639  1.1      cgd 	char *optarg;
    640  1.1      cgd 	register struct nfs_args *nfsargsp;
    641  1.1      cgd 	int *opflagsp;
    642  1.1      cgd 	int *retrycntp;
    643  1.1      cgd {
    644  1.1      cgd 	register char *cp, *nextcp;
    645  1.1      cgd 	int num;
    646  1.1      cgd 	char *nump;
    647  1.1      cgd 
    648  1.1      cgd 	for (cp = optarg; cp != NULL && *cp != '\0'; cp = nextcp) {
    649  1.1      cgd 		if ((nextcp = index(cp, ',')) != NULL)
    650  1.1      cgd 			*nextcp++ = '\0';
    651  1.1      cgd 		if ((nump = index(cp, '=')) != NULL) {
    652  1.1      cgd 			*nump++ = '\0';
    653  1.1      cgd 			num = atoi(nump);
    654  1.1      cgd 		} else
    655  1.1      cgd 			num = -1;
    656  1.1      cgd 		/*
    657  1.1      cgd 		 * Just test for a string match and do it
    658  1.1      cgd 		 */
    659  1.1      cgd 		if (!strcmp(cp, "bg")) {
    660  1.1      cgd 			*opflagsp |= BGRND;
    661  1.1      cgd 		} else if (!strcmp(cp, "soft")) {
    662  1.1      cgd 			if (nfsargsp->flags & NFSMNT_SPONGY)
    663  1.1      cgd 				exclusive("soft, spongy");
    664  1.1      cgd 			nfsargsp->flags |= NFSMNT_SOFT;
    665  1.1      cgd 		} else if (!strcmp(cp, "spongy")) {
    666  1.1      cgd 			if (nfsargsp->flags & NFSMNT_SOFT)
    667  1.1      cgd 				exclusive("soft, spongy");
    668  1.1      cgd 			nfsargsp->flags |= NFSMNT_SPONGY;
    669  1.1      cgd 		} else if (!strcmp(cp, "compress")) {
    670  1.1      cgd 			nfsargsp->flags |= NFSMNT_COMPRESS;
    671  1.1      cgd 		} else if (!strcmp(cp, "intr")) {
    672  1.1      cgd 			nfsargsp->flags |= NFSMNT_INT;
    673  1.1      cgd 		} else if (!strcmp(cp, "tcp")) {
    674  1.1      cgd 			nfsargsp->sotype = SOCK_STREAM;
    675  1.1      cgd 		} else if (!strcmp(cp, "noconn")) {
    676  1.1      cgd 			nfsargsp->flags |= NFSMNT_NOCONN;
    677  1.1      cgd 		} else if (!strcmp(cp, "retry") && num > 0) {
    678  1.1      cgd 			*retrycntp = num;
    679  1.1      cgd 		} else if (!strcmp(cp, "rsize") && num > 0) {
    680  1.1      cgd 			nfsargsp->rsize = num;
    681  1.1      cgd 			nfsargsp->flags |= NFSMNT_RSIZE;
    682  1.1      cgd 		} else if (!strcmp(cp, "wsize") && num > 0) {
    683  1.1      cgd 			nfsargsp->wsize = num;
    684  1.1      cgd 			nfsargsp->flags |= NFSMNT_WSIZE;
    685  1.1      cgd 		} else if (!strcmp(cp, "timeo") && num > 0) {
    686  1.1      cgd 			nfsargsp->timeo = num;
    687  1.1      cgd 			nfsargsp->flags |= NFSMNT_TIMEO;
    688  1.1      cgd 		} else if (!strcmp(cp, "retrans") && num > 0) {
    689  1.1      cgd 			nfsargsp->retrans = num;
    690  1.1      cgd 			nfsargsp->flags |= NFSMNT_RETRANS;
    691  1.1      cgd 		}
    692  1.1      cgd 	}
    693  1.1      cgd 	if (nfsargsp->sotype == SOCK_DGRAM) {
    694  1.1      cgd 		if (nfsargsp->rsize > NFS_MAXDGRAMDATA)
    695  1.1      cgd 			nfsargsp->rsize = NFS_MAXDGRAMDATA;
    696  1.1      cgd 		if (nfsargsp->wsize > NFS_MAXDGRAMDATA)
    697  1.1      cgd 			nfsargsp->wsize = NFS_MAXDGRAMDATA;
    698  1.1      cgd 	}
    699  1.1      cgd }
    700  1.1      cgd 
    701  1.1      cgd char *
    702  1.1      cgd getnfsargs(spec, nfsargsp)
    703  1.1      cgd 	char *spec;
    704  1.1      cgd 	struct nfs_args *nfsargsp;
    705  1.1      cgd {
    706  1.1      cgd 	register CLIENT *clp;
    707  1.1      cgd 	struct hostent *hp;
    708  1.1      cgd 	static struct sockaddr_in saddr;
    709  1.1      cgd 	struct timeval pertry, try;
    710  1.1      cgd 	enum clnt_stat clnt_stat;
    711  1.1      cgd 	int so = RPC_ANYSOCK;
    712  1.1      cgd 	char *fsp, *hostp, *delimp;
    713  1.1      cgd 	u_short tport;
    714  1.1      cgd 	static struct nfhret nfhret;
    715  1.1      cgd 	static char nam[MNAMELEN + 1];
    716  1.1      cgd 	char buf[MAXPATHLEN + 1];
    717  1.1      cgd 
    718  1.1      cgd 	strncpy(buf, spec, MAXPATHLEN);
    719  1.1      cgd 	buf[MAXPATHLEN] = '\0';
    720  1.1      cgd 	strncpy(nam, spec, MNAMELEN);
    721  1.1      cgd 	nam[MNAMELEN] = '\0';
    722  1.1      cgd 	if ((delimp = index(buf, '@')) != NULL) {
    723  1.1      cgd 		hostp = delimp + 1;
    724  1.1      cgd 		fsp = buf;
    725  1.1      cgd 	} else if ((delimp = index(buf, ':')) != NULL) {
    726  1.1      cgd 		hostp = buf;
    727  1.1      cgd 		fsp = delimp + 1;
    728  1.1      cgd 	} else {
    729  1.1      cgd 		(void) fprintf(stderr,
    730  1.1      cgd 		    "mount: No <host>:<dirpath> or <dirpath>@<host> spec\n");
    731  1.1      cgd 		return (0);
    732  1.1      cgd 	}
    733  1.1      cgd 	*delimp = '\0';
    734  1.1      cgd 	if ((hp = gethostbyname(hostp)) == NULL) {
    735  1.1      cgd 		(void) fprintf(stderr, "mount: Can't get net id for host\n");
    736  1.1      cgd 		return (0);
    737  1.1      cgd 	}
    738  1.1      cgd 	bcopy(hp->h_addr, (caddr_t)&saddr.sin_addr, hp->h_length);
    739  1.1      cgd 	nfhret.stat = ETIMEDOUT;	/* Mark not yet successful */
    740  1.1      cgd 	while (retrycnt > 0) {
    741  1.1      cgd 		saddr.sin_family = AF_INET;
    742  1.1      cgd 		saddr.sin_port = htons(PMAPPORT);
    743  1.1      cgd 		if ((tport = pmap_getport(&saddr, RPCPROG_NFS,
    744  1.1      cgd 		    NFS_VER2, IPPROTO_UDP)) == 0) {
    745  1.1      cgd 			if ((opflags & ISBGRND) == 0)
    746  1.1      cgd 				clnt_pcreateerror("NFS Portmap");
    747  1.1      cgd 		} else {
    748  1.1      cgd 			saddr.sin_port = 0;
    749  1.1      cgd 			pertry.tv_sec = 10;
    750  1.1      cgd 			pertry.tv_usec = 0;
    751  1.1      cgd 			if ((clp = clntudp_create(&saddr, RPCPROG_MNT,
    752  1.1      cgd 			    RPCMNT_VER1, pertry, &so)) == NULL) {
    753  1.1      cgd 				if ((opflags & ISBGRND) == 0)
    754  1.1      cgd 					clnt_pcreateerror("Cannot MNT PRC");
    755  1.1      cgd 			} else {
    756  1.1      cgd 				clp->cl_auth = authunix_create_default();
    757  1.1      cgd 				try.tv_sec = 10;
    758  1.1      cgd 				try.tv_usec = 0;
    759  1.1      cgd 				clnt_stat = clnt_call(clp, RPCMNT_MOUNT,
    760  1.1      cgd 				    xdr_dir, fsp, xdr_fh, &nfhret, try);
    761  1.1      cgd 				if (clnt_stat != RPC_SUCCESS) {
    762  1.1      cgd 					if ((opflags & ISBGRND) == 0)
    763  1.1      cgd 						clnt_perror(clp, "Bad MNT RPC");
    764  1.1      cgd 				} else {
    765  1.1      cgd 					auth_destroy(clp->cl_auth);
    766  1.1      cgd 					clnt_destroy(clp);
    767  1.1      cgd 					retrycnt = 0;
    768  1.1      cgd 				}
    769  1.1      cgd 			}
    770  1.1      cgd 		}
    771  1.1      cgd 		if (--retrycnt > 0) {
    772  1.1      cgd 			if (opflags & BGRND) {
    773  1.1      cgd 				opflags &= ~BGRND;
    774  1.1      cgd 				if (fork())
    775  1.1      cgd 					return (0);
    776  1.1      cgd 				else
    777  1.1      cgd 					opflags |= ISBGRND;
    778  1.1      cgd 			}
    779  1.1      cgd 			sleep(10);
    780  1.1      cgd 		}
    781  1.1      cgd 	}
    782  1.1      cgd 	if (nfhret.stat) {
    783  1.1      cgd 		if (opflags & ISBGRND)
    784  1.1      cgd 			exit(1);
    785  1.1      cgd 		(void) fprintf(stderr, "Mount RPC error on %s: ", spec);
    786  1.1      cgd 		errno = nfhret.stat;
    787  1.1      cgd 		perror((char *)NULL);
    788  1.1      cgd 		return (0);
    789  1.1      cgd 	}
    790  1.1      cgd 	saddr.sin_port = htons(tport);
    791  1.1      cgd 	nfsargsp->addr = (struct sockaddr *) &saddr;
    792  1.1      cgd 	nfsargsp->fh = &nfhret.nfh;
    793  1.1      cgd 	nfsargsp->hostname = nam;
    794  1.1      cgd 	return ((caddr_t)nfsargsp);
    795  1.1      cgd }
    796  1.1      cgd 
    797  1.1      cgd /*
    798  1.1      cgd  * xdr routines for mount rpc's
    799  1.1      cgd  */
    800  1.1      cgd xdr_dir(xdrsp, dirp)
    801  1.1      cgd 	XDR *xdrsp;
    802  1.1      cgd 	char *dirp;
    803  1.1      cgd {
    804  1.1      cgd 	return (xdr_string(xdrsp, &dirp, RPCMNT_PATHLEN));
    805  1.1      cgd }
    806  1.1      cgd 
    807  1.1      cgd xdr_fh(xdrsp, np)
    808  1.1      cgd 	XDR *xdrsp;
    809  1.1      cgd 	struct nfhret *np;
    810  1.1      cgd {
    811  1.1      cgd 	if (!xdr_u_long(xdrsp, &(np->stat)))
    812  1.1      cgd 		return (0);
    813  1.1      cgd 	if (np->stat)
    814  1.1      cgd 		return (1);
    815  1.1      cgd 	return (xdr_opaque(xdrsp, (caddr_t)&(np->nfh), NFSX_FH));
    816  1.1      cgd }
    817  1.1      cgd #endif /* NFS */
    818