xref: /dragonfly/usr.bin/ypwhich/ypwhich.c (revision f746689a)
1 /*
2  * Copyright (c) 1992/3 Theo de Raadt <deraadt@fsa.ca>
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. The name of the author may not be used to endorse or promote
14  *    products derived from this software without specific prior written
15  *    permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
18  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
19  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * $FreeBSD: src/usr.bin/ypwhich/ypwhich.c,v 1.16 2004/04/04 19:17:38 charnier Exp $
30  * $DragonFly: src/usr.bin/ypwhich/ypwhich.c,v 1.3 2003/10/04 20:36:55 hmp Exp $
31  */
32 
33 #include <sys/param.h>
34 #include <sys/types.h>
35 #include <sys/socket.h>
36 
37 #include <rpc/rpc.h>
38 #include <rpc/xdr.h>
39 #include <rpcsvc/yp_prot.h>
40 #include <rpcsvc/ypclnt.h>
41 
42 #include <netinet/in.h>
43 
44 #include <arpa/inet.h>
45 
46 #include <ctype.h>
47 #include <err.h>
48 #include <netdb.h>
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include <string.h>
52 #include <unistd.h>
53 
54 #define ERR_USAGE	1	/* bad arguments - display 'usage' message */
55 #define ERR_NOSUCHHOST	2	/* no such host */
56 #define ERR_NOBINDING	3	/* error from ypbind -- domain not bound */
57 #define ERR_NOYPBIND	4	/* ypbind not running */
58 #define ERR_NOMASTER	5	/* could not find master server */
59 
60 extern bool_t xdr_domainname();
61 
62 struct ypalias {
63 	char *alias, *name;
64 } ypaliases[] = {
65 	{ "passwd", "passwd.byname" },
66 	{ "master.passwd", "master.passwd.byname" },
67 	{ "group", "group.byname" },
68 	{ "networks", "networks.byaddr" },
69 	{ "hosts", "hosts.byaddr" },
70 	{ "protocols", "protocols.bynumber" },
71 	{ "services", "services.byname" },
72 	{ "aliases", "mail.aliases" },
73 	{ "ethers", "ethers.byname" },
74 };
75 
76 static void
77 usage(void)
78 {
79 	fprintf(stderr, "%s\n%s\n",
80 		"usage: ypwhich [-d domain] [[-t] -m [mname] | host]",
81 		"       ypwhich -x");
82 	exit(ERR_USAGE);
83 }
84 
85 
86 /*
87  * Like yp_bind except can query a specific host
88  */
89 static int
90 bind_host(char *dom, struct sockaddr_in *lsin)
91 {
92 	struct hostent *hent = NULL;
93 	struct ypbind_resp ypbr;
94 	struct timeval tv;
95 	CLIENT *client;
96 	int sock, r;
97 	struct in_addr ss_addr;
98 
99 	sock = RPC_ANYSOCK;
100 	tv.tv_sec = 15;
101 	tv.tv_usec = 0;
102 	client = clntudp_create(lsin, YPBINDPROG, YPBINDVERS, tv, &sock);
103 	if (client == NULL) {
104 		warnx("can't clntudp_create: %s", yperr_string(YPERR_YPBIND));
105 		return (YPERR_YPBIND);
106 	}
107 
108 	tv.tv_sec = 5;
109 	tv.tv_usec = 0;
110 	r = clnt_call(client, YPBINDPROC_DOMAIN,
111 		(xdrproc_t)xdr_domainname, &dom,
112 		(xdrproc_t)xdr_ypbind_resp, &ypbr, tv);
113 	if (r != RPC_SUCCESS) {
114 		warnx("can't clnt_call: %s", yperr_string(YPERR_YPBIND));
115 		clnt_destroy(client);
116 		return (YPERR_YPBIND);
117 	} else {
118 		if (ypbr.ypbind_status != YPBIND_SUCC_VAL) {
119 			warnx("can't yp_bind: reason: %s",
120 				ypbinderr_string(ypbr.ypbind_respbody.ypbind_error));
121 			clnt_destroy(client);
122 			return (r);
123 		}
124 	}
125 	clnt_destroy(client);
126 
127 	ss_addr = ypbr.ypbind_respbody.ypbind_bindinfo.ypbind_binding_addr;
128 	/*printf("%08x\n", ss_addr);*/
129 	hent = gethostbyaddr(&ss_addr, sizeof(ss_addr), AF_INET);
130 	if (hent)
131 		printf("%s\n", hent->h_name);
132 	else
133 		printf("%s\n", inet_ntoa(ss_addr));
134 	return (0);
135 }
136 
137 int
138 main(int argc, char **argv)
139 {
140 	char *domnam = NULL, *master;
141 	char *map = NULL;
142 	struct ypmaplist *ypml, *y;
143 	struct hostent *hent;
144 	struct sockaddr_in lsin;
145 	int notrans, mode, getmap;
146 	int c, r;
147 	u_int i;
148 
149 	getmap = notrans = mode = 0;
150 	while ((c = getopt(argc, argv, "xd:mt")) != -1)
151 		switch (c) {
152 		case 'x':
153 			for (i = 0; i<sizeof ypaliases/sizeof ypaliases[0]; i++)
154 				printf("\"%s\" is an alias for \"%s\"\n",
155 					ypaliases[i].alias,
156 					ypaliases[i].name);
157 			exit(0);
158 		case 'd':
159 			domnam = optarg;
160 			break;
161 		case 't':
162 			notrans++;
163 			break;
164 		case 'm':
165 			mode++;
166 			break;
167 		default:
168 			usage();
169 		}
170 
171 	if (!domnam)
172 		yp_get_default_domain(&domnam);
173 
174 	if (mode == 0) {
175 		switch (argc-optind) {
176 		case 0:
177 			bzero(&lsin, sizeof lsin);
178 			lsin.sin_family = AF_INET;
179 			lsin.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
180 
181 			if (bind_host(domnam, &lsin))
182 				exit(ERR_NOBINDING);
183 			break;
184 		case 1:
185 			bzero(&lsin, sizeof lsin);
186 			lsin.sin_family = AF_INET;
187 			if ((lsin.sin_addr.s_addr = inet_addr(argv[optind])) == INADDR_NONE) {
188 				hent = gethostbyname(argv[optind]);
189 				if (!hent)
190 					errx(ERR_NOSUCHHOST, "host %s unknown", argv[optind]);
191 				bcopy((char *)hent->h_addr_list[0],
192 					(char *)&lsin.sin_addr, sizeof lsin.sin_addr);
193 			}
194 			if (bind_host(domnam, &lsin))
195 				exit(ERR_NOBINDING);
196 			break;
197 		default:
198 			usage();
199 		}
200 		exit(0);
201 	}
202 
203 	if (argc-optind > 1)
204 		usage();
205 
206 	if (argv[optind]) {
207 		map = argv[optind];
208 		for (i = 0; (!notrans) && i<sizeof ypaliases/sizeof ypaliases[0]; i++)
209 			if (strcmp(map, ypaliases[i].alias) == 0)
210 				map = ypaliases[i].name;
211 		r = yp_master(domnam, map, &master);
212 		switch (r) {
213 		case 0:
214 			printf("%s\n", master);
215 			free(master);
216 			break;
217 		case YPERR_YPBIND:
218 			errx(ERR_NOYPBIND, "not running ypbind");
219 		default:
220 			errx(ERR_NOMASTER, "can't find master for map %s: reason: %s",
221 				map, yperr_string(r));
222 		}
223 		exit(0);
224 	}
225 
226 	ypml = NULL;
227 	r = yp_maplist(domnam, &ypml);
228 	switch (r) {
229 	case 0:
230 		for (y = ypml; y;) {
231 			ypml = y;
232 			r = yp_master(domnam, ypml->ypml_name, &master);
233 			switch (r) {
234 			case 0:
235 				printf("%s %s\n", ypml->ypml_name, master);
236 				free(master);
237 				break;
238 			default:
239 				warnx("can't find the master of %s: reason: %s",
240 					ypml->ypml_name, yperr_string(r));
241 				break;
242 			}
243 			y = ypml->ypml_next;
244 			free(ypml);
245 		}
246 		break;
247 	case YPERR_YPBIND:
248 		errx(ERR_NOYPBIND, "not running ypbind");
249 	default:
250 		errx(ERR_NOMASTER, "can't get map list for domain %s: reason: %s",
251 			domnam, yperr_string(r));
252 	}
253 	exit(0);
254 }
255