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