xref: /dragonfly/usr.bin/showmount/showmount.c (revision 984263bc)
1 /*
2  * Copyright (c) 1989, 1993, 1995
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software contributed to Berkeley by
6  * Rick Macklem at The University of Guelph.
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. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *	This product includes software developed by the University of
19  *	California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  */
36 
37 #ifndef lint
38 static const char copyright[] =
39 "@(#) Copyright (c) 1989, 1993, 1995\n\
40 	The Regents of the University of California.  All rights reserved.\n";
41 #endif not lint
42 
43 #ifndef lint
44 #if 0
45 static char sccsid[] = "@(#)showmount.c	8.3 (Berkeley) 3/29/95";
46 #endif
47 static const char rcsid[] =
48   "$FreeBSD: src/usr.bin/showmount/showmount.c,v 1.8 1999/08/28 01:05:43 peter Exp $";
49 #endif not lint
50 
51 #include <sys/types.h>
52 #include <sys/queue.h>
53 #include <sys/file.h>
54 #include <sys/socket.h>
55 #include <sys/socketvar.h>
56 
57 #include <err.h>
58 #include <netdb.h>
59 #include <rpc/rpc.h>
60 #include <rpc/pmap_clnt.h>
61 #include <rpc/pmap_prot.h>
62 #include <nfs/rpcv2.h>
63 
64 #include <stdio.h>
65 #include <stdlib.h>
66 #include <string.h>
67 #include <unistd.h>
68 
69 /* Constant defs */
70 #define	ALL	1
71 #define	DIRS	2
72 
73 #define	DODUMP		0x1
74 #define	DOEXPORTS	0x2
75 
76 struct mountlist {
77 	struct mountlist *ml_left;
78 	struct mountlist *ml_right;
79 	char	ml_host[RPCMNT_NAMELEN+1];
80 	char	ml_dirp[RPCMNT_PATHLEN+1];
81 };
82 
83 struct grouplist {
84 	struct grouplist *gr_next;
85 	char	gr_name[RPCMNT_NAMELEN+1];
86 };
87 
88 struct exportslist {
89 	struct exportslist *ex_next;
90 	struct grouplist *ex_groups;
91 	char	ex_dirp[RPCMNT_PATHLEN+1];
92 };
93 
94 static struct mountlist *mntdump;
95 static struct exportslist *exports;
96 static int type = 0;
97 
98 void print_dump __P((struct mountlist *));
99 static void usage __P((void));
100 int xdr_mntdump __P((XDR *, struct mountlist **));
101 int xdr_exports __P((XDR *, struct exportslist **));
102 int tcp_callrpc __P((char *host,
103 		     int prognum, int versnum, int procnum,
104 		     xdrproc_t inproc, char *in,
105 		     xdrproc_t outproc, char *out));
106 
107 /*
108  * This command queries the NFS mount daemon for it's mount list and/or
109  * it's exports list and prints them out.
110  * See "NFS: Network File System Protocol Specification, RFC1094, Appendix A"
111  * and the "Network File System Protocol XXX.."
112  * for detailed information on the protocol.
113  */
114 int
115 main(argc, argv)
116 	int argc;
117 	char **argv;
118 {
119 	register struct exportslist *exp;
120 	register struct grouplist *grp;
121 	register int rpcs = 0, mntvers = 1;
122 	char ch;
123 	char *host;
124 	int estat;
125 
126 	while ((ch = getopt(argc, argv, "ade3")) != -1)
127 		switch((char)ch) {
128 		case 'a':
129 			if (type == 0) {
130 				type = ALL;
131 				rpcs |= DODUMP;
132 			} else
133 				usage();
134 			break;
135 		case 'd':
136 			if (type == 0) {
137 				type = DIRS;
138 				rpcs |= DODUMP;
139 			} else
140 				usage();
141 			break;
142 		case 'e':
143 			rpcs |= DOEXPORTS;
144 			break;
145 		case '3':
146 			mntvers = 3;
147 			break;
148 		case '?':
149 		default:
150 			usage();
151 		}
152 	argc -= optind;
153 	argv += optind;
154 
155 	if (argc > 0)
156 		host = *argv;
157 	else
158 		host = "localhost";
159 
160 	if (rpcs == 0)
161 		rpcs = DODUMP;
162 
163 	if (rpcs & DODUMP)
164 		if ((estat = tcp_callrpc(host, RPCPROG_MNT, mntvers,
165 			RPCMNT_DUMP, xdr_void, (char *)0,
166 			xdr_mntdump, (char *)&mntdump)) != 0) {
167 			clnt_perrno(estat);
168 			errx(1, "can't do mountdump rpc");
169 		}
170 	if (rpcs & DOEXPORTS)
171 		if ((estat = tcp_callrpc(host, RPCPROG_MNT, mntvers,
172 			RPCMNT_EXPORT, xdr_void, (char *)0,
173 			xdr_exports, (char *)&exports)) != 0) {
174 			clnt_perrno(estat);
175 			errx(1, "can't do exports rpc");
176 		}
177 
178 	/* Now just print out the results */
179 	if (rpcs & DODUMP) {
180 		switch (type) {
181 		case ALL:
182 			printf("All mount points on %s:\n", host);
183 			break;
184 		case DIRS:
185 			printf("Directories on %s:\n", host);
186 			break;
187 		default:
188 			printf("Hosts on %s:\n", host);
189 			break;
190 		};
191 		print_dump(mntdump);
192 	}
193 	if (rpcs & DOEXPORTS) {
194 		printf("Exports list on %s:\n", host);
195 		exp = exports;
196 		while (exp) {
197 			printf("%-35s", exp->ex_dirp);
198 			grp = exp->ex_groups;
199 			if (grp == NULL) {
200 				printf("Everyone\n");
201 			} else {
202 				while (grp) {
203 					printf("%s ", grp->gr_name);
204 					grp = grp->gr_next;
205 				}
206 				printf("\n");
207 			}
208 			exp = exp->ex_next;
209 		}
210 	}
211 	exit(0);
212 }
213 
214 /*
215  * tcp_callrpc has the same interface as callrpc, but tries to
216  * use tcp as transport method in order to handle large replies.
217  */
218 
219 int
220 tcp_callrpc(host, prognum, versnum, procnum, inproc, in, outproc, out)
221 	char *host;
222 	int prognum;
223 	int versnum;
224 	int procnum;
225 	xdrproc_t inproc;
226 	char *in;
227 	xdrproc_t outproc;
228 	char *out;
229 {
230 	struct hostent *hp;
231 	struct sockaddr_in server_addr;
232 	CLIENT *client;
233 	int sock;
234 	struct timeval timeout;
235 	int rval;
236 
237 	hp = gethostbyname(host);
238 
239 	if (!hp)
240 		return ((int) RPC_UNKNOWNHOST);
241 
242 	memset(&server_addr,0,sizeof(server_addr));
243 	memcpy((char *) &server_addr.sin_addr,
244 	       hp->h_addr,
245 	       hp->h_length);
246 	server_addr.sin_len = sizeof(struct sockaddr_in);
247 	server_addr.sin_family =AF_INET;
248 	server_addr.sin_port = 0;
249 
250 	sock = RPC_ANYSOCK;
251 
252 	client = clnttcp_create(&server_addr,
253 				(u_long) prognum,
254 				(u_long) versnum, &sock, 0, 0);
255 	if (!client) {
256 		timeout.tv_sec = 5;
257 		timeout.tv_usec = 0;
258 		server_addr.sin_port = 0;
259 		sock = RPC_ANYSOCK;
260 		client = clntudp_create(&server_addr,
261 					(u_long) prognum,
262 					(u_long) versnum,
263 					timeout,
264 					&sock);
265 	}
266 	if (!client)
267 		return ((int) rpc_createerr.cf_stat);
268 
269 	timeout.tv_sec = 25;
270 	timeout.tv_usec = 0;
271 	rval = (int) clnt_call(client, procnum,
272 			       inproc, in,
273 			       outproc, out,
274 			       timeout);
275 	clnt_destroy(client);
276  	return rval;
277 }
278 
279 /*
280  * Xdr routine for retrieving the mount dump list
281  */
282 int
283 xdr_mntdump(xdrsp, mlp)
284 	XDR *xdrsp;
285 	struct mountlist **mlp;
286 {
287 	register struct mountlist *mp;
288 	register struct mountlist *tp;
289 	register struct mountlist **otp;
290 	int val, val2;
291 	int bool;
292 	char *strp;
293 
294 	*mlp = (struct mountlist *)0;
295 	if (!xdr_bool(xdrsp, &bool))
296 		return (0);
297 	while (bool) {
298 		mp = (struct mountlist *)malloc(sizeof(struct mountlist));
299 		if (mp == NULL)
300 			return (0);
301 		mp->ml_left = mp->ml_right = (struct mountlist *)0;
302 		strp = mp->ml_host;
303 		if (!xdr_string(xdrsp, &strp, RPCMNT_NAMELEN))
304 			return (0);
305 		strp = mp->ml_dirp;
306 		if (!xdr_string(xdrsp, &strp, RPCMNT_PATHLEN))
307 			return (0);
308 
309 		/*
310 		 * Build a binary tree on sorted order of either host or dirp.
311 		 * Drop any duplications.
312 		 */
313 		if (*mlp == NULL) {
314 			*mlp = mp;
315 		} else {
316 			tp = *mlp;
317 			while (tp) {
318 				val = strcmp(mp->ml_host, tp->ml_host);
319 				val2 = strcmp(mp->ml_dirp, tp->ml_dirp);
320 				switch (type) {
321 				case ALL:
322 					if (val == 0) {
323 						if (val2 == 0) {
324 							free((caddr_t)mp);
325 							goto next;
326 						}
327 						val = val2;
328 					}
329 					break;
330 				case DIRS:
331 					if (val2 == 0) {
332 						free((caddr_t)mp);
333 						goto next;
334 					}
335 					val = val2;
336 					break;
337 				default:
338 					if (val == 0) {
339 						free((caddr_t)mp);
340 						goto next;
341 					}
342 					break;
343 				};
344 				if (val < 0) {
345 					otp = &tp->ml_left;
346 					tp = tp->ml_left;
347 				} else {
348 					otp = &tp->ml_right;
349 					tp = tp->ml_right;
350 				}
351 			}
352 			*otp = mp;
353 		}
354 next:
355 		if (!xdr_bool(xdrsp, &bool))
356 			return (0);
357 	}
358 	return (1);
359 }
360 
361 /*
362  * Xdr routine to retrieve exports list
363  */
364 int
365 xdr_exports(xdrsp, exp)
366 	XDR *xdrsp;
367 	struct exportslist **exp;
368 {
369 	register struct exportslist *ep;
370 	register struct grouplist *gp;
371 	int bool, grpbool;
372 	char *strp;
373 
374 	*exp = (struct exportslist *)0;
375 	if (!xdr_bool(xdrsp, &bool))
376 		return (0);
377 	while (bool) {
378 		ep = (struct exportslist *)malloc(sizeof(struct exportslist));
379 		if (ep == NULL)
380 			return (0);
381 		ep->ex_groups = (struct grouplist *)0;
382 		strp = ep->ex_dirp;
383 		if (!xdr_string(xdrsp, &strp, RPCMNT_PATHLEN))
384 			return (0);
385 		if (!xdr_bool(xdrsp, &grpbool))
386 			return (0);
387 		while (grpbool) {
388 			gp = (struct grouplist *)malloc(sizeof(struct grouplist));
389 			if (gp == NULL)
390 				return (0);
391 			strp = gp->gr_name;
392 			if (!xdr_string(xdrsp, &strp, RPCMNT_NAMELEN))
393 				return (0);
394 			gp->gr_next = ep->ex_groups;
395 			ep->ex_groups = gp;
396 			if (!xdr_bool(xdrsp, &grpbool))
397 				return (0);
398 		}
399 		ep->ex_next = *exp;
400 		*exp = ep;
401 		if (!xdr_bool(xdrsp, &bool))
402 			return (0);
403 	}
404 	return (1);
405 }
406 
407 static void
408 usage()
409 {
410 	fprintf(stderr, "usage: showmount [-ade3] host\n");
411 	exit(1);
412 }
413 
414 /*
415  * Print the binary tree in inorder so that output is sorted.
416  */
417 void
418 print_dump(mp)
419 	struct mountlist *mp;
420 {
421 
422 	if (mp == NULL)
423 		return;
424 	if (mp->ml_left)
425 		print_dump(mp->ml_left);
426 	switch (type) {
427 	case ALL:
428 		printf("%s:%s\n", mp->ml_host, mp->ml_dirp);
429 		break;
430 	case DIRS:
431 		printf("%s\n", mp->ml_dirp);
432 		break;
433 	default:
434 		printf("%s\n", mp->ml_host);
435 		break;
436 	};
437 	if (mp->ml_right)
438 		print_dump(mp->ml_right);
439 }
440