GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: usr.bin/whois/whois.c Lines: 0 155 0.0 %
Date: 2017-11-07 Branches: 0 141 0.0 %

Line Branch Exec Source
1
/*      $OpenBSD: whois.c,v 1.56 2017/07/26 15:48:38 sthen Exp $   */
2
3
/*
4
 * Copyright (c) 1980, 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/types.h>
33
#include <sys/socket.h>
34
35
#include <netinet/in.h>
36
#include <arpa/inet.h>
37
#include <netdb.h>
38
39
#include <ctype.h>
40
#include <err.h>
41
#include <errno.h>
42
#include <stdio.h>
43
#include <stdlib.h>
44
#include <string.h>
45
#include <unistd.h>
46
47
#define	NICHOST		"whois.crsnic.net"
48
#define	INICHOST	"whois.networksolutions.com"
49
#define	CNICHOST	"whois.corenic.net"
50
#define	DNICHOST	"whois.nic.mil"
51
#define	GNICHOST	"whois.nic.gov"
52
#define	ANICHOST	"whois.arin.net"
53
#define	RNICHOST	"whois.ripe.net"
54
#define	PNICHOST	"whois.apnic.net"
55
#define	RUNICHOST	"whois.ripn.net"
56
#define	MNICHOST	"whois.ra.net"
57
#define LNICHOST	"whois.lacnic.net"
58
#define	AFNICHOST	"whois.afrinic.net"
59
#define BNICHOST	"whois.registro.br"
60
#define	PDBHOST		"whois.peeringdb.com"
61
#define	IANAHOST	"whois.iana.org"
62
#define	QNICHOST_TAIL	".whois-servers.net"
63
64
#define	WHOIS_PORT	"whois"
65
#define	WHOIS_SERVER_ID	"Registrar WHOIS Server:"
66
67
#define WHOIS_RECURSE		0x01
68
#define WHOIS_QUICK		0x02
69
70
const char *port_whois = WHOIS_PORT;
71
const char *ip_whois[] = { LNICHOST, RNICHOST, PNICHOST, BNICHOST,
72
    AFNICHOST, NULL };
73
74
__dead void usage(void);
75
int whois(const char *, const char *, const char *, int);
76
char *choose_server(const char *, const char *, char **);
77
78
int
79
main(int argc, char *argv[])
80
{
81
	int ch, flags, rval;
82
	char *host, *name, *country;
83
84
	country = host = NULL;
85
	flags = rval = 0;
86
	while ((ch = getopt(argc, argv, "aAc:dgh:iIlmp:PqQrR")) != -1)
87
		switch (ch) {
88
		case 'a':
89
			host = ANICHOST;
90
			break;
91
		case 'A':
92
			host = PNICHOST;
93
			break;
94
		case 'c':
95
			country = optarg;
96
			break;
97
		case 'd':
98
			host = DNICHOST;
99
			break;
100
		case 'g':
101
			host = GNICHOST;
102
			break;
103
		case 'h':
104
			host = optarg;
105
			break;
106
		case 'i':
107
			host = INICHOST;
108
			break;
109
		case 'I':
110
			host = IANAHOST;
111
			break;
112
		case 'l':
113
			host = LNICHOST;
114
			break;
115
		case 'm':
116
			host = MNICHOST;
117
			break;
118
		case 'p':
119
			port_whois = optarg;
120
			break;
121
		case 'P':
122
			host = PDBHOST;
123
			break;
124
		case 'q':
125
			/* deprecated, now the default */
126
			break;
127
		case 'Q':
128
			flags |= WHOIS_QUICK;
129
			break;
130
		case 'r':
131
			host = RNICHOST;
132
			break;
133
		case 'R':
134
			host = RUNICHOST;
135
			break;
136
		default:
137
			usage();
138
		}
139
	argc -= optind;
140
	argv += optind;
141
142
	if (!argc || (country != NULL && host != NULL))
143
		usage();
144
145
	if (pledge("stdio dns inet flock rpath cpath wpath", NULL) == -1)
146
		err(1, "pledge");
147
148
	if (host == NULL && country == NULL && !(flags & WHOIS_QUICK))
149
		flags |= WHOIS_RECURSE;
150
	for (name = *argv; (name = *argv) != NULL; argv++) {
151
		char *tofree = NULL;
152
		const char *server =
153
		    host ? host : choose_server(name, country, &tofree);
154
		rval += whois(name, server, port_whois, flags);
155
		free(tofree);
156
	}
157
	return (rval);
158
}
159
160
int
161
whois(const char *query, const char *server, const char *port, int flags)
162
{
163
	FILE *fp;
164
	char *buf, *p, *nhost, *nbuf = NULL;
165
	size_t len;
166
	int i, s, error;
167
	const char *reason = NULL, *fmt;
168
	struct addrinfo hints, *res, *ai;
169
170
	memset(&hints, 0, sizeof(hints));
171
	hints.ai_flags = 0;
172
	hints.ai_family = AF_UNSPEC;
173
	hints.ai_socktype = SOCK_STREAM;
174
	error = getaddrinfo(server, port, &hints, &res);
175
	if (error) {
176
		if (error == EAI_SERVICE)
177
			warnx("%s: bad port", port);
178
		else
179
			warnx("%s: %s", server, gai_strerror(error));
180
		return (1);
181
	}
182
183
	for (s = -1, ai = res; ai != NULL; ai = ai->ai_next) {
184
		s = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
185
		if (s == -1) {
186
			error = errno;
187
			reason = "socket";
188
			continue;
189
		}
190
		if (connect(s, ai->ai_addr, ai->ai_addrlen) == -1) {
191
			error = errno;
192
			reason = "connect";
193
			close(s);
194
			s = -1;
195
			continue;
196
		}
197
		break;	/*okay*/
198
	}
199
	if (s == -1) {
200
		if (reason) {
201
			errno = error;
202
			warn("%s: %s", server, reason);
203
		} else
204
			warn("unknown error in connection attempt");
205
		freeaddrinfo(res);
206
		return (1);
207
	}
208
209
	if (strcmp(server, "whois.denic.de") == 0 ||
210
	    strcmp(server, "de" QNICHOST_TAIL) == 0)
211
		fmt = "-T dn,ace -C ISO-8859-1 %s\r\n";
212
	else if (strcmp(server, "whois.dk-hostmaster.dk") == 0 ||
213
	    strcmp(server, "dk" QNICHOST_TAIL) == 0)
214
		fmt = "--show-handles %s\r\n";
215
	else
216
		fmt = "%s\r\n";
217
218
	fp = fdopen(s, "r+");
219
	if (fp == NULL)
220
		err(1, "fdopen");
221
	fprintf(fp, fmt, query);
222
	fflush(fp);
223
	nhost = NULL;
224
	while ((buf = fgetln(fp, &len)) != NULL) {
225
		p = buf + len - 1;
226
		if (isspace((unsigned char)*p)) {
227
			do
228
				*p = '\0';
229
			while (p > buf && isspace((unsigned char)*--p));
230
		} else {
231
			if ((nbuf = malloc(len + 1)) == NULL)
232
				err(1, "malloc");
233
			memcpy(nbuf, buf, len);
234
			nbuf[len] = '\0';
235
			buf = nbuf;
236
		}
237
		puts(buf);
238
239
		if (nhost != NULL || !(flags & WHOIS_RECURSE))
240
			continue;
241
242
		if ((p = strstr(buf, WHOIS_SERVER_ID))) {
243
			p += sizeof(WHOIS_SERVER_ID) - 1;
244
			while (isblank((unsigned char)*p))
245
				p++;
246
			if ((len = strcspn(p, " \t\n\r"))) {
247
				if ((nhost = malloc(len + 1)) == NULL)
248
					err(1, "malloc");
249
				memcpy(nhost, p, len);
250
				nhost[len] = '\0';
251
			}
252
		} else if (strcmp(server, ANICHOST) == 0) {
253
			for (p = buf; *p != '\0'; p++)
254
				*p = tolower((unsigned char)*p);
255
			for (i = 0; ip_whois[i] != NULL; i++) {
256
				if (strstr(buf, ip_whois[i]) != NULL) {
257
					nhost = strdup(ip_whois[i]);
258
					if (nhost == NULL)
259
						err(1, "strdup");
260
					break;
261
				}
262
			}
263
		}
264
	}
265
	fclose(fp);
266
	free(nbuf);
267
268
	if (nhost != NULL) {
269
		error = whois(query, nhost, port, 0);
270
		free(nhost);
271
	}
272
	freeaddrinfo(res);
273
	return (error);
274
}
275
276
/*
277
 * If no country is specified determine the top level domain from the query.
278
 * If the TLD is a number, query ARIN, otherwise, use TLD.whois-server.net.
279
 * If the domain does not contain '.', check to see if it is an NSI handle
280
 * (starts with '!') or a CORE handle (COCO-[0-9]+ or COHO-[0-9]+) or an
281
 * ASN (starts with AS). Fall back to NICHOST for the non-handle case.
282
 */
283
char *
284
choose_server(const char *name, const char *country, char **tofree)
285
{
286
	char *server;
287
	const char *qhead;
288
	char *ep;
289
	struct addrinfo hints, *res;
290
291
	memset(&hints, 0, sizeof(hints));
292
	hints.ai_flags = 0;
293
	hints.ai_family = AF_UNSPEC;
294
	hints.ai_socktype = SOCK_STREAM;
295
296
	if (country != NULL)
297
		qhead = country;
298
	else if ((qhead = strrchr(name, '.')) == NULL) {
299
		if (*name == '!')
300
			return (INICHOST);
301
		else if ((strncasecmp(name, "COCO-", 5) == 0 ||
302
		    strncasecmp(name, "COHO-", 5) == 0) &&
303
		    strtol(name + 5, &ep, 10) > 0 && *ep == '\0')
304
			return (CNICHOST);
305
		else if ((strncasecmp(name, "AS", 2) == 0) &&
306
		    strtol(name + 2, &ep, 10) > 0 && *ep == '\0')
307
			return (MNICHOST);
308
		else
309
			return (NICHOST);
310
	} else if (isdigit((unsigned char)*(++qhead)))
311
		return (ANICHOST);
312
313
	/*
314
	 * Post-2003 ("new") gTLDs are all supposed to have "whois.nic.domain"
315
	 * (per registry agreement), some older gTLDs also support this...
316
	 */
317
	if (asprintf(&server, "whois.nic.%s", qhead) == -1)
318
		err(1, NULL);
319
320
	/* most ccTLDs don't do this, but QNICHOST/whois-servers mostly works */
321
	if ((strlen(qhead) == 2 ||
322
	    /* and is required for most of the <=2003 TLDs/gTLDs */
323
	    strcasecmp(qhead, "org") == 0 ||
324
	    strcasecmp(qhead, "com") == 0 ||
325
	    strcasecmp(qhead, "net") == 0 ||
326
	    strcasecmp(qhead, "cat") == 0 ||
327
	    strcasecmp(qhead, "pro") == 0 ||
328
	    strcasecmp(qhead, "info") == 0 ||
329
	    strcasecmp(qhead, "aero") == 0 ||
330
	    strcasecmp(qhead, "jobs") == 0 ||
331
	    strcasecmp(qhead, "mobi") == 0 ||
332
	    strcasecmp(qhead, "museum") == 0 ||
333
	     /* for others, if whois.nic.TLD doesn't exist, try whois-servers */
334
	    getaddrinfo(server, NULL, &hints, &res) != 0)) {
335
		free(server);
336
		if (asprintf(&server, "%s%s", qhead, QNICHOST_TAIL) == -1)
337
			err(1, NULL);
338
	}
339
340
	*tofree = server;
341
	return (server);
342
}
343
344
__dead void
345
usage(void)
346
{
347
	extern char *__progname;
348
349
	fprintf(stderr,
350
	    "usage: %s [-AadgIilmPQRr] [-c country-code | -h host] "
351
		"[-p port] name ...\n", __progname);
352
	exit(1);
353
}