Home | History | Annotate | Line # | Download | only in umount
umount.c revision 1.52
      1 /*	$NetBSD: umount.c,v 1.52 2016/06/26 04:01:30 dholland Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1980, 1989, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. Neither the name of the University nor the names of its contributors
     16  *    may be used to endorse or promote products derived from this software
     17  *    without specific prior written permission.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     29  * SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>
     33 #ifndef lint
     34 __COPYRIGHT("@(#) Copyright (c) 1980, 1989, 1993\
     35  The Regents of the University of California.  All rights reserved.");
     36 #endif /* not lint */
     37 
     38 #ifndef lint
     39 #if 0
     40 static char sccsid[] = "@(#)umount.c	8.8 (Berkeley) 5/8/95";
     41 #else
     42 __RCSID("$NetBSD: umount.c,v 1.52 2016/06/26 04:01:30 dholland Exp $");
     43 #endif
     44 #endif /* not lint */
     45 
     46 #include <sys/param.h>
     47 #include <sys/stat.h>
     48 #include <sys/mount.h>
     49 #include <sys/time.h>
     50 #ifndef SMALL
     51 #include <sys/socket.h>
     52 
     53 #include <netdb.h>
     54 #include <rpc/rpc.h>
     55 #include <rpc/pmap_clnt.h>
     56 #include <rpc/pmap_prot.h>
     57 #include <nfs/rpcv2.h>
     58 #include <nfs/nfsmount.h>
     59 #endif /* !SMALL */
     60 
     61 #include <err.h>
     62 #include <errno.h>
     63 #include <fstab.h>
     64 #include <stdio.h>
     65 #include <stdlib.h>
     66 #include <string.h>
     67 #include <unistd.h>
     68 
     69 typedef enum { MNTANY, MNTON, MNTFROM } mntwhat;
     70 
     71 #ifndef SMALL
     72 #include "mountprog.h"
     73 
     74 static int	 fake, verbose;
     75 static char	*nfshost;
     76 static struct addrinfo *nfshost_ai = NULL;
     77 
     78 static int	 namematch(const struct addrinfo *);
     79 static int	 sacmp(const struct sockaddr *, const struct sockaddr *);
     80 static int	 xdr_dir(XDR *, char *);
     81 static const char *getmntproto(const char *);
     82 #endif /* !SMALL */
     83 
     84 static int	 fflag;
     85 static char	*getmntname(const char *, mntwhat, char **);
     86 static int	 umountfs(const char *, const char **, int);
     87 static void	 usage(void) __dead;
     88 
     89 int
     90 main(int argc, char *argv[])
     91 {
     92 	int ch, errs, all = 0, raw = 0;
     93 #ifndef SMALL
     94 	int mnts;
     95 	struct statvfs *mntbuf;
     96 	struct addrinfo hints;
     97 #endif /* SMALL */
     98 	const char **typelist = NULL;
     99 
    100 #ifdef SMALL
    101 #define OPTS "fR"
    102 #else
    103 #define OPTS "AaFfh:Rt:v"
    104 #endif
    105 	while ((ch = getopt(argc, argv, OPTS)) != -1)
    106 		switch (ch) {
    107 		case 'f':
    108 			fflag = MNT_FORCE;
    109 			break;
    110 		case 'R':
    111 			raw = 1;
    112 			break;
    113 #ifndef SMALL
    114 		case 'A':
    115 		case 'a':
    116 			all = 1;
    117 			break;
    118 		case 'F':
    119 			fake = 1;
    120 			break;
    121 		case 'h':	/* -h implies -A. */
    122 			all = 1;
    123 			nfshost = optarg;
    124 			break;
    125 		case 't':
    126 			if (typelist != NULL)
    127 				errx(1, "only one -t option may be specified.");
    128 			typelist = makevfslist(optarg);
    129 			break;
    130 		case 'v':
    131 			verbose = 1;
    132 			break;
    133 #endif /* !SMALL */
    134 		default:
    135 			usage();
    136 			/* NOTREACHED */
    137 		}
    138 	argc -= optind;
    139 	argv += optind;
    140 
    141 	if ((argc == 0 && !all) || (argc != 0 && all) || (all && raw))
    142 		usage();
    143 
    144 #ifndef SMALL
    145 	/* -h implies "-t nfs" if no -t flag. */
    146 	if ((nfshost != NULL) && (typelist == NULL))
    147 		typelist = makevfslist("nfs");
    148 
    149 	if (nfshost != NULL) {
    150 		memset(&hints, 0, sizeof hints);
    151 		if (getaddrinfo(nfshost, NULL, &hints, &nfshost_ai) != 0) {
    152 			nfshost_ai = NULL;
    153 		}
    154 	}
    155 
    156 	errs = 0;
    157 	if (all) {
    158 		if ((mnts = getmntinfo(&mntbuf, ST_NOWAIT)) == 0) {
    159 			warn("getmntinfo");
    160 			errs = 1;
    161 		}
    162 		for (errs = 0, mnts--; mnts > 0; mnts--) {
    163 			if (checkvfsname(mntbuf[mnts].f_fstypename, typelist))
    164 				continue;
    165 			if (umountfs(mntbuf[mnts].f_mntonname, typelist,
    166 			             1) != 0)
    167 				errs = 1;
    168 		}
    169 	} else
    170 #endif /* !SMALL */
    171 		for (errs = 0; *argv != NULL; ++argv)
    172 			if (umountfs(*argv, typelist, raw) != 0)
    173 				errs = 1;
    174 	return errs;
    175 }
    176 
    177 static int
    178 umountfs(const char *name, const char **typelist, int raw)
    179 {
    180 #ifndef SMALL
    181 	enum clnt_stat clnt_stat;
    182 	struct timeval try;
    183 	CLIENT *clp;
    184 	char *hostp = NULL;
    185 	struct addrinfo *ai = NULL, hints;
    186 	const char *proto = NULL;
    187 #endif /* !SMALL */
    188 	const char *mntpt;
    189 	char *type, rname[MAXPATHLEN], umountprog[MAXPATHLEN];
    190 	mntwhat what;
    191 	struct stat sb;
    192 
    193 	if (raw) {
    194 		mntpt = name;
    195 	} else {
    196 
    197 		what = MNTANY;
    198 		if (realpath(name, rname) != NULL) {
    199 			name = rname;
    200 
    201 			if (stat(name, &sb) == 0) {
    202 				if (S_ISBLK(sb.st_mode))
    203 					what = MNTON;
    204 				else if (S_ISDIR(sb.st_mode))
    205 					what = MNTFROM;
    206 			}
    207 		}
    208 #ifdef SMALL
    209 		else {
    210  			warn("%s", name);
    211  			return 1;
    212 		}
    213 #endif /* SMALL */
    214 		mntpt = name;
    215 
    216 		switch (what) {
    217 		case MNTON:
    218 			if ((mntpt = getmntname(name, MNTON, &type)) == NULL) {
    219 				warnx("%s: not currently mounted", name);
    220 				return (1);
    221 			}
    222 			break;
    223 		case MNTFROM:
    224 			if ((name = getmntname(mntpt, MNTFROM, &type)) == NULL) {
    225 				warnx("%s: not currently mounted", mntpt);
    226 				return (1);
    227 			}
    228 			break;
    229 		default:
    230 			if ((name = getmntname(mntpt, MNTFROM, &type)) == NULL) {
    231 				name = mntpt;
    232 				if ((mntpt = getmntname(name, MNTON, &type)) == NULL) {
    233 					warnx("%s: not currently mounted", name);
    234 					return 1;
    235 				}
    236 			}
    237 		}
    238 
    239 #ifndef SMALL
    240 		if (checkvfsname(type, typelist))
    241 			return 1;
    242 
    243 		(void)memset(&hints, 0, sizeof hints);
    244 		if (!strncmp(type, MOUNT_NFS,
    245 		    sizeof(((struct statvfs *)NULL)->f_fstypename))) {
    246 			char *delimp;
    247 			proto = getmntproto(mntpt);
    248 			/* look for host:mountpoint */
    249 			if ((delimp = strrchr(name, ':')) != NULL) {
    250 				int len = delimp - name;
    251 				hostp = malloc(len + 1);
    252 				if (hostp == NULL)
    253 				    	return 1;
    254 				memcpy(hostp, name, len);
    255 				hostp[len] = 0;
    256 				name += len + 1;
    257 				if (getaddrinfo(hostp, NULL, &hints, &ai) != 0)
    258 					ai = NULL;
    259 			}
    260 		}
    261 
    262 		if (!namematch(ai))
    263 			return 1;
    264 #endif /* ! SMALL */
    265 		snprintf(umountprog, sizeof(umountprog), "umount_%s", type);
    266 	}
    267 
    268 #ifndef SMALL
    269 	if (verbose) {
    270 		(void)printf("%s: unmount from %s\n", name, mntpt);
    271 		/* put this before the test of FAKE */
    272 		if (!raw) {
    273 			(void)printf("Trying unmount program %s\n",
    274 			    umountprog);
    275 		}
    276 	}
    277 	if (fake)
    278 		return 0;
    279 #endif /* ! SMALL */
    280 
    281 	if (!raw) {
    282 		/*
    283 		 * The only options that need to be passed on are -f
    284 		 * and -v.
    285 		 */
    286 		char *args[3];
    287 		unsigned nargs = 0;
    288 
    289 		args[nargs++] = umountprog;
    290 		if (fflag == MNT_FORCE) {
    291 			args[nargs++] = __UNCONST("-f");
    292 		}
    293 #ifndef SMALL
    294 		if (verbose) {
    295 			args[nargs++] = __UNCONST("-v");
    296 		}
    297 #endif
    298 		execvp(umountprog, args);
    299 		if (errno != ENOENT) {
    300 			warn("%s: execvp", umountprog);
    301 		}
    302 	}
    303 
    304 #ifndef SMALL
    305 	if (verbose)
    306 		(void)printf("(No separate unmount program.)\n");
    307 #endif
    308 
    309 	if (unmount(mntpt, fflag) == -1) {
    310 		warn("%s", mntpt);
    311 		return 1;
    312 	}
    313 
    314 #ifndef SMALL
    315 	if (ai != NULL && !(fflag & MNT_FORCE)) {
    316 		clp = clnt_create(hostp, RPCPROG_MNT, RPCMNT_VER1, proto);
    317 		if (clp  == NULL) {
    318 			clnt_pcreateerror("Cannot MNT PRC");
    319 			return 1;
    320 		}
    321 		clp->cl_auth = authsys_create_default();
    322 		try.tv_sec = 20;
    323 		try.tv_usec = 0;
    324 		clnt_stat = clnt_call(clp, RPCMNT_UMOUNT, xdr_dir,
    325 		    __UNCONST(name), xdr_void, NULL, try);
    326 		if (clnt_stat != RPC_SUCCESS) {
    327 			clnt_perror(clp, "Bad MNT RPC");
    328 			return 1;
    329 		}
    330 		auth_destroy(clp->cl_auth);
    331 		clnt_destroy(clp);
    332 	}
    333 #endif /* ! SMALL */
    334 	return 0;
    335 }
    336 
    337 static char *
    338 getmntname(const char *name, mntwhat what, char **type)
    339 {
    340 	static struct statvfs *mntbuf;
    341 	static int mntsize;
    342 	int i;
    343 
    344 	if (mntbuf == NULL &&
    345 	    (mntsize = getmntinfo(&mntbuf, MNT_NOWAIT)) == 0) {
    346 		warn("getmntinfo");
    347 		return (NULL);
    348 	}
    349 	for (i = mntsize - 1; i >= 0; i--) {
    350 		if ((what == MNTON) && !strcmp(mntbuf[i].f_mntfromname, name)) {
    351 			if (type)
    352 				*type = mntbuf[i].f_fstypename;
    353 			return (mntbuf[i].f_mntonname);
    354 		}
    355 		if ((what == MNTFROM) && !strcmp(mntbuf[i].f_mntonname, name)) {
    356 			if (type)
    357 				*type = mntbuf[i].f_fstypename;
    358 			return (mntbuf[i].f_mntfromname);
    359 		}
    360 	}
    361 	return (NULL);
    362 }
    363 
    364 #ifndef SMALL
    365 static int
    366 sacmp(const struct sockaddr *sa1, const struct sockaddr *sa2)
    367 {
    368 	const void *p1, *p2;
    369 	size_t len;
    370 
    371 	if (sa1->sa_family != sa2->sa_family)
    372 		return 1;
    373 
    374 	switch (sa1->sa_family) {
    375 	case AF_INET:
    376 		p1 = &((const struct sockaddr_in *)sa1)->sin_addr;
    377 		p2 = &((const struct sockaddr_in *)sa2)->sin_addr;
    378 		len = 4;
    379 		break;
    380 	case AF_INET6:
    381 		p1 = &((const struct sockaddr_in6 *)sa1)->sin6_addr;
    382 		p2 = &((const struct sockaddr_in6 *)sa2)->sin6_addr;
    383 		len = 16;
    384 		if (((const struct sockaddr_in6 *)sa1)->sin6_scope_id !=
    385 		    ((const struct sockaddr_in6 *)sa2)->sin6_scope_id)
    386 			return 1;
    387 		break;
    388 	default:
    389 		return 1;
    390 	}
    391 
    392 	return memcmp(p1, p2, len);
    393 }
    394 
    395 static int
    396 namematch(const struct addrinfo *ai)
    397 {
    398 	struct addrinfo *aip;
    399 
    400 	if (nfshost == NULL || nfshost_ai == NULL)
    401 		return (1);
    402 
    403 	while (ai != NULL) {
    404 		aip = nfshost_ai;
    405 		while (aip != NULL) {
    406 			if (sacmp(ai->ai_addr, aip->ai_addr) == 0)
    407 				return 1;
    408 			aip = aip->ai_next;
    409 		}
    410 		ai = ai->ai_next;
    411 	}
    412 
    413 	return 0;
    414 }
    415 
    416 /*
    417  * xdr routines for mount rpc's
    418  */
    419 static int
    420 xdr_dir(XDR *xdrsp, char *dirp)
    421 {
    422 	return xdr_string(xdrsp, &dirp, RPCMNT_PATHLEN);
    423 }
    424 
    425 static const char *
    426 getmntproto(const char *name)
    427 {
    428 	struct nfs_args nfsargs;
    429 	struct sockaddr_storage ss;
    430 
    431 	nfsargs.sotype = SOCK_DGRAM;
    432 	nfsargs.addr = (struct sockaddr *)&ss;
    433 	nfsargs.addrlen = sizeof(ss);
    434 	(void)mount("nfs", name, MNT_GETARGS, &nfsargs, sizeof(nfsargs));
    435 	return nfsargs.sotype == SOCK_STREAM ? "tcp" : "udp";
    436 }
    437 #endif /* !SMALL */
    438 
    439 static void
    440 usage(void)
    441 {
    442 #ifdef SMALL
    443 	(void)fprintf(stderr,
    444 	    "Usage: %s [-fR]  special | node\n", getprogname());
    445 #else
    446 	(void)fprintf(stderr,
    447 	    "Usage: %s [-fvFR] [-t fstypelist] special | node\n"
    448 	    "\t %s -a[fvF] [-h host] [-t fstypelist]\n", getprogname(),
    449 	    getprogname());
    450 #endif /* SMALL */
    451 	exit(1);
    452 }
    453