xref: /freebsd/usr.bin/ypwhich/ypwhich.c (revision 19fae0f66023a97a9b464b3beeeabb2081f575b3)
1 /*	$OpenBSD: ypwhich.c,v 1.23 2015/02/08 23:40:35 deraadt Exp $	*/
2 /*	$NetBSD: ypwhich.c,v 1.6 1996/05/13 02:43:48 thorpej Exp $	*/
3 
4 /*-
5  * SPDX-License-Identifier: BSD-2-Clause
6  *
7  * Copyright (c) 1992, 1993 Theo de Raadt <deraadt@theos.com>
8  * All rights reserved.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
20  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
21  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
23  * 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 __FBSDID("$FreeBSD$");
34 
35 #include <sys/param.h>
36 #include <sys/types.h>
37 #include <sys/socket.h>
38 
39 #include <netinet/in.h>
40 #include <arpa/inet.h>
41 
42 #include <ctype.h>
43 #include <err.h>
44 #include <netdb.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <unistd.h>
49 
50 #include <rpc/rpc.h>
51 #include <rpc/xdr.h>
52 #include <rpcsvc/yp.h>
53 #include <rpcsvc/ypclnt.h>
54 
55 #include "yplib_host.h"
56 
57 static const struct ypalias {
58 	char *alias, *name;
59 } ypaliases[] = {
60 	{ "passwd", "passwd.byname" },
61 	{ "master.passwd", "master.passwd.byname" },
62 	{ "shadow", "shadow.byname" },
63 	{ "group", "group.byname" },
64 	{ "networks", "networks.byaddr" },
65 	{ "hosts", "hosts.byaddr" },
66 	{ "protocols", "protocols.bynumber" },
67 	{ "services", "services.byname" },
68 	{ "aliases", "mail.aliases" },
69 	{ "ethers", "ethers.byname" },
70 };
71 
72 static void
73 usage(void)
74 {
75 	fprintf(stderr,
76 	    "usage: ypwhich [-t] [-d domain] [[-h] host]\n"
77 	    "       ypwhich [-t] [-d domain] [-h host] -m [mname]\n"
78 	    "       ypwhich -x\n");
79 	exit(1);
80 }
81 
82 
83 /*
84  * Like yp_bind except can query a specific host
85  */
86 static int
87 bind_host(char *dom, struct sockaddr_in *sin)
88 {
89 	struct hostent *hent = NULL;
90 	struct ypbind_resp ypbr;
91 	struct in_addr ss_addr;
92 	struct timeval tv;
93 	CLIENT *client;
94 	int sock, r;
95 
96 	sock = RPC_ANYSOCK;
97 	tv.tv_sec = 15;
98 	tv.tv_usec = 0;
99 	client = clntudp_create(sin, YPBINDPROG, YPBINDVERS, tv, &sock);
100 
101 	if (client == NULL) {
102 		warnx("host is not bound to a ypmaster");
103 		return (YPERR_YPBIND);
104 	}
105 
106 	tv.tv_sec = 5;
107 	tv.tv_usec = 0;
108 
109 	r = clnt_call(client, YPBINDPROC_DOMAIN,
110 		(xdrproc_t)xdr_domainname, &dom,
111 		(xdrproc_t)xdr_ypbind_resp, &ypbr, tv);
112 	if (r != RPC_SUCCESS) {
113 		warnx("can't clnt_call: %s", yperr_string(YPERR_YPBIND));
114 		clnt_destroy(client);
115 		return (YPERR_YPBIND);
116 	} else {
117 		if (ypbr.ypbind_status != YPBIND_SUCC_VAL) {
118 			warnx("can't yp_bind: reason: %s",
119 			    yperr_string(ypbr.ypbind_status));
120 			clnt_destroy(client);
121 			return (r);
122 		}
123 	}
124 	clnt_destroy(client);
125 
126 	memmove(&ss_addr.s_addr, &ypbr.ypbind_resp_u.ypbind_bindinfo.ypbind_binding_addr,
127 	    sizeof (ss_addr));
128 
129 	hent = gethostbyaddr((char *)&ss_addr.s_addr, sizeof(ss_addr.s_addr),
130 	    AF_INET);
131 	if (hent != NULL)
132 		printf("%s\n", hent->h_name);
133 	else
134 		printf("%s\n", inet_ntoa(ss_addr));
135 
136 	return (0);
137 }
138 
139 int
140 main(int argc, char *argv[])
141 {
142 	char *domain, *master, *map = NULL, *host = NULL;
143 	int notrans = 0, mode = 0, c, r, i;
144 	struct ypmaplist *ypml, *y;
145 	struct sockaddr_in sin;
146 	struct hostent *hent;
147 	CLIENT *client = NULL;
148 
149 	yp_get_default_domain(&domain);
150 	if (domain == NULL)
151 		errx(1, "YP domain name not set");
152 
153 	while ((c = getopt(argc, argv, "xd:h:mt")) != -1)
154 		switch (c) {
155 		case 'x':
156 			for (i = 0; i < nitems(ypaliases); i++)
157 				printf("\"%s\" is an alias for \"%s\"\n",
158 					ypaliases[i].alias,
159 					ypaliases[i].name);
160 			exit(0);
161 		case 'h':
162 			host = optarg;
163 			break;
164 		case 'd':
165 			domain = optarg;
166 			break;
167 		case 't':
168 			notrans = 1;
169 			break;
170 		case 'm':
171 			mode = 1;
172 			break;
173 		default:
174 			usage();
175 		}
176 	argc -= optind;
177 	argv += optind;
178 
179 	if (mode == 0) {
180 		switch (argc) {
181 		case 0:
182 			memset(&sin, 0, sizeof sin);
183 			sin.sin_family = AF_INET;
184 			sin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
185 
186 			if (bind_host(domain, &sin))
187 				exit(1);
188 			break;
189 		case 1:
190 			bzero(&sin, sizeof sin);
191 			sin.sin_family = AF_INET;
192 			if (inet_aton(argv[0], &sin.sin_addr) == 0) {
193 				hent = gethostbyname(argv[0]);
194 				if (!hent) {
195 					errx(1, "host %s unknown",
196 					    argv[0]);
197 				}
198 			}
199 			if (bind_host(domain, &sin))
200 				exit(1);
201 			break;
202 		default:
203 			usage();
204 		}
205 		exit(0);
206 	}
207 
208 	if (argc > 1)
209 		usage();
210 
211 	if (host != NULL)
212 		client = yp_bind_host(host, YPPROG, YPVERS, 0, 1);
213 
214 	if (argv[0]) {
215 		map = argv[0];
216 		if (notrans == 0) {
217 			for (i = 0; i < nitems(ypaliases); i++)
218 				if (strcmp(map, ypaliases[i].alias) == 0)
219 					map = ypaliases[i].name;
220 		}
221 
222 		if (host != NULL)
223 			r = yp_master_host(client, domain, map, &master);
224 		else
225 			r = yp_master(domain, map, &master);
226 
227 		switch (r) {
228 		case 0:
229 			printf("%s\n", master);
230 			free(master);
231 			break;
232 		case YPERR_YPBIND:
233 			errx(1, "not running ypbind");
234 		default:
235 			errx(1, "can't find master for map %s: reason: %s",
236 			    map, yperr_string(r));
237 		}
238 		exit(0);
239 	}
240 
241 	ypml = NULL;
242 	if (host != NULL)
243 		r = yp_maplist_host(client, domain, &ypml);
244 	else
245 		r = yp_maplist(domain, &ypml);
246 
247 	r = 0;
248 	switch (r) {
249 	case 0:
250 		for (y = ypml; y; ) {
251 			ypml = y;
252 			if (host != NULL) {
253 				r = yp_master_host(client,
254 						   domain, ypml->map, &master);
255 			} else {
256 				r = yp_master(domain, ypml->map, &master);
257 			}
258 			switch (r) {
259 			case 0:
260 				printf("%s %s\n", ypml->map, master);
261 				free(master);
262 				break;
263 			default:
264 				warnx("can't find the master of %s: reason: %s",
265 				    ypml->map, yperr_string(r));
266 				break;
267 			}
268 			y = ypml->next;
269 			free(ypml);
270 		}
271 		break;
272 	case YPERR_YPBIND:
273 		errx(1, "not running ypbind");
274 	default:
275 		errx(1, "can't get map list for domain %s: reason: %s",
276 		    domain, yperr_string(r));
277 	}
278 	exit(0);
279 }
280