Home | History | Annotate | Line # | Download | only in whois
      1 /*      $NetBSD: whois.c,v 1.38 2020/03/01 02:26:16 sevan Exp $    */
      2 /*      $OpenBSD: whois.c,v 1.58 2018/06/19 11:28:11 jca Exp $   */
      3 
      4 /*
      5  * Copyright (c) 1980, 1993
      6  *	The Regents of the University of California.  All rights reserved.
      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. Neither the name of the University nor the names of its contributors
     17  *    may be used to endorse or promote products derived from this software
     18  *    without specific prior written permission.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     21  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     22  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     23  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     24  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     30  * SUCH DAMAGE.
     31  */
     32 
     33 #include <sys/cdefs.h>
     34 
     35 #ifndef lint
     36 __COPYRIGHT("@(#) Copyright (c) 1980, 1993\
     37  The Regents of the University of California.  All rights reserved.");
     38 #endif /* not lint */
     39 
     40 #ifndef lint
     41 #if 0
     42 static const char sccsid[] = "@(#)whois.c	8.1 (Berkeley) 6/6/93";
     43 #else
     44 __RCSID("$NetBSD: whois.c,v 1.38 2020/03/01 02:26:16 sevan Exp $");
     45 #endif
     46 #endif /* not lint */
     47 
     48 #include <sys/types.h>
     49 #include <sys/socket.h>
     50 
     51 #include <netinet/in.h>
     52 #include <arpa/inet.h>
     53 #include <netdb.h>
     54 
     55 #include <ctype.h>
     56 #include <err.h>
     57 #include <stdio.h>
     58 #include <stdlib.h>
     59 #include <string.h>
     60 #include <unistd.h>
     61 #include <errno.h>
     62 
     63 #define	ANICHOST	"whois.arin.net"
     64 #define	BNICHOST	"whois.registro.br"
     65 #define	CNICHOST	"whois.corenic.net"
     66 #define	DNICHOST	"whois.nic.mil"
     67 #define	FNICHOST	"whois.afrinic.net"
     68 #define	GNICHOST	"whois.nic.gov"
     69 #define	IANAHOST	"whois.iana.org"
     70 #define	INICHOST	"whois.networksolutions.com"
     71 #define	LNICHOST	"whois.lacnic.net"
     72 #define	MNICHOST	"whois.ra.net"
     73 #define	NICHOST		"whois.crsnic.net"
     74 #define	PDBHOST		"whois.peeringdb.com"
     75 #define	PNICHOST	"whois.apnic.net"
     76 #define	QNICHOST_TAIL	".whois-servers.net"
     77 #define	RNICHOST	"whois.ripe.net"
     78 #define	RUNICHOST	"whois.ripn.net"
     79 
     80 #define	WHOIS_PORT	"whois"
     81 #define	WHOIS_SERVER_ID	"Registrar WHOIS Server:"
     82 
     83 #define WHOIS_RECURSE		0x01
     84 #define WHOIS_QUICK		0x02
     85 
     86 static const char *port_whois = WHOIS_PORT;
     87 static const char *ip_whois[] =
     88     { LNICHOST, RNICHOST, PNICHOST, FNICHOST, BNICHOST, NULL };
     89 
     90 static void usage(void) __dead;
     91 static int whois(const char *, const char *, const char *, int);
     92 static const char *choose_server(const char *, const char *, char **);
     93 
     94 int
     95 main(int argc, char *argv[])
     96 {
     97 	int ch, flags, rval;
     98 	const char *host, *name, *country;
     99 
    100 	country = host = NULL;
    101 	flags = rval = 0;
    102 	while ((ch = getopt(argc, argv, "Aac:dfgh:Iilmp:PqQRr")) != -1)
    103 		switch (ch) {
    104 		case 'a':
    105 			host = ANICHOST;
    106 			break;
    107 		case 'A':
    108 			host = PNICHOST;
    109 			break;
    110 		case 'c':
    111 			country = optarg;
    112 			break;
    113 		case 'd':
    114 			host = DNICHOST;
    115 			break;
    116 		case 'f':
    117 			host = FNICHOST;
    118 			break;
    119 		case 'g':
    120 			host = GNICHOST;
    121 			break;
    122 		case 'h':
    123 			host = optarg;
    124 			break;
    125 		case 'i':
    126 			host = INICHOST;
    127 			break;
    128 		case 'I':
    129 			host = IANAHOST;
    130 			break;
    131 		case 'l':
    132 			host = LNICHOST;
    133 			break;
    134 		case 'm':
    135 			host = MNICHOST;
    136 			break;
    137 		case 'p':
    138 			port_whois = optarg;
    139 			break;
    140 		case 'P':
    141 			host = PDBHOST;
    142 			break;
    143 		case 'q':
    144 			/* deprecated, now the default */
    145 			break;
    146 		case 'Q':
    147 			flags |= WHOIS_QUICK;
    148 			break;
    149 		case 'r':
    150 			host = RNICHOST;
    151 			break;
    152 		case 'R':
    153 			host = RUNICHOST;
    154 			break;
    155 		default:
    156 			usage();
    157 		}
    158 	argc -= optind;
    159 	argv += optind;
    160 
    161 	if (!argc || (country != NULL && host != NULL))
    162 		usage();
    163 
    164 	if (host == NULL && country == NULL && !(flags & WHOIS_QUICK))
    165 		flags |= WHOIS_RECURSE;
    166 	for (name = *argv; (name = *argv) != NULL; argv++) {
    167 		char *tofree = NULL;
    168 		const char *server =
    169 		    host ? host : choose_server(name, country, &tofree);
    170 		rval += whois(name, server, port_whois, flags);
    171 		free(tofree);
    172 	}
    173 	return (rval);
    174 }
    175 
    176 static int
    177 whois(const char *query, const char *server, const char *port, int flags)
    178 {
    179 	FILE *fp;
    180 	char *buf, *p, *nhost, *nbuf = NULL;
    181 	size_t len;
    182 	int i, s, error;
    183 	const char *reason = NULL, *fmt;
    184 	struct addrinfo hints, *res, *ai;
    185 
    186 	(void)memset(&hints, 0, sizeof(hints));
    187 	hints.ai_flags = 0;
    188 	hints.ai_family = AF_UNSPEC;
    189 	hints.ai_socktype = SOCK_STREAM;
    190 	error = getaddrinfo(server, port, &hints, &res);
    191 	if (error) {
    192 		if (error == EAI_SERVICE)
    193 			warnx("%s: bad port", port);
    194 		else
    195 			warnx("%s: %s", server, gai_strerror(error));
    196 		return (1);
    197 	}
    198 
    199 	for (s = -1, ai = res; ai != NULL; ai = ai->ai_next) {
    200 		s = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
    201 		if (s < 0) {
    202 			error = errno;
    203 			reason = "socket";
    204 			continue;
    205 		}
    206 		if (connect(s, ai->ai_addr, ai->ai_addrlen) < 0) {
    207 			error = errno;
    208 			reason = "connect";
    209 			close(s);
    210 			s = -1;
    211 			continue;
    212 		}
    213 		break;	/*okay*/
    214 	}
    215 	freeaddrinfo(res);
    216 	if (s < 0) {
    217 		if (reason) {
    218 			errno = error;
    219 			warn("%s: %s", server, reason);
    220 		} else
    221 			warnx("Unknown error in connection attempt");
    222 		return (1);
    223 	}
    224 
    225 	if (strcmp(server, "whois.denic.de") == 0 ||
    226 	    strcmp(server, "de" QNICHOST_TAIL) == 0)
    227 		fmt = "-T dn,ace -C ISO-8859-1 ";
    228 	else if (strcmp(server, "whois.dk-hostmaster.dk") == 0 ||
    229 	    strcmp(server, "dk" QNICHOST_TAIL) == 0)
    230 		fmt = "--show-handles ";
    231 	else
    232 		fmt = "";
    233 
    234 	fp = fdopen(s, "r+");
    235 	if (fp == NULL)
    236 		err(1, "fdopen");
    237 	(void)fprintf(fp, "%s%s\r\n", fmt, query);
    238 	(void)fflush(fp);
    239 	nhost = NULL;
    240 	while ((buf = fgetln(fp, &len)) != NULL) {
    241 		p = buf + len - 1;
    242 		if (isspace((unsigned char)*p)) {
    243 			do
    244 				*p = '\0';
    245 			while (p > buf && isspace((unsigned char)*--p));
    246 		} else {
    247 			if ((nbuf = malloc(len + 1)) == NULL)
    248 				err(1, "malloc");
    249 			(void)memcpy(nbuf, buf, len);
    250 			nbuf[len] = '\0';
    251 			buf = nbuf;
    252 		}
    253 		(void)puts(buf);
    254 
    255 		if (nhost != NULL || !(flags & WHOIS_RECURSE))
    256 			continue;
    257 
    258 		if ((p = strstr(buf, WHOIS_SERVER_ID))) {
    259 			p += sizeof(WHOIS_SERVER_ID) - 1;
    260 			while (isblank((unsigned char)*p))
    261 				p++;
    262 			if ((len = strcspn(p, " \t\n\r"))) {
    263 				if ((nhost = malloc(len + 1)) == NULL)
    264 					err(1, "malloc");
    265 				(void)memcpy(nhost, p, len);
    266 				nhost[len] = '\0';
    267 			}
    268 		} else if (strcmp(server, ANICHOST) == 0) {
    269 			for (p = buf; *p != '\0'; p++)
    270 				*p = tolower((unsigned char)*p);
    271 			for (i = 0; ip_whois[i] != NULL; i++) {
    272 				if (strstr(buf, ip_whois[i]) != NULL) {
    273 					nhost = strdup(ip_whois[i]);
    274 					if (nhost == NULL)
    275 						err(1, "strdup");
    276 					break;
    277 				}
    278 			}
    279 		}
    280 	}
    281 	fclose(fp);
    282 	free(nbuf);
    283 
    284 	if (nhost != NULL) {
    285 		error = whois(query, nhost, port, 0);
    286 		free(nhost);
    287 	}
    288 
    289 	return (error);
    290 }
    291 
    292 /*
    293  * If no country is specified determine the top level domain from the query.
    294  * If the TLD is a number, query ARIN, otherwise, use TLD.whois-server.net.
    295  * If the domain does not contain '.', check to see if it is an NSI handle
    296  * (starts with '!') or a CORE handle (COCO-[0-9]+ or COHO-[0-9]+) or an
    297  * ASN (starts with AS) or IPv6 address (contains ':'). Fall back to
    298  * NICHOST for the non-handle and non-IPv6 case.
    299  */
    300 static const char *
    301 choose_server(const char *name, const char *country, char **tofree)
    302 {
    303 	static char *server;
    304 	const char *qhead;
    305 	char *ep;
    306 	struct addrinfo hints, *res = NULL;
    307 
    308 	(void)memset(&hints, 0, sizeof(hints));
    309 	hints.ai_flags = 0;
    310 	hints.ai_family = AF_UNSPEC;
    311 	hints.ai_socktype = SOCK_STREAM;
    312 
    313 	if (country != NULL)
    314 		qhead = country;
    315 	else if ((qhead = strrchr(name, '.')) == NULL) {
    316 		if (*name == '!')
    317 			return (INICHOST);
    318 		else if ((strncasecmp(name, "COCO-", 5) == 0 ||
    319 		    strncasecmp(name, "COHO-", 5) == 0) &&
    320 		    strtol(name + 5, &ep, 10) > 0 && *ep == '\0')
    321 			return (CNICHOST);
    322 		else if ((strncasecmp(name, "AS", 2) == 0) &&
    323 		    strtol(name + 2, &ep, 10) > 0 && *ep == '\0')
    324 			return (MNICHOST);
    325 		else if (strchr(name, ':') != NULL) /* IPv6 address */
    326 			return (ANICHOST);
    327 		else
    328 			return (NICHOST);
    329 	} else if (isdigit((unsigned char)*(++qhead)))
    330 		return (ANICHOST);
    331 
    332 	/*
    333 	 * Post-2003 ("new") gTLDs are all supposed to have "whois.nic.domain"
    334 	 * (per registry agreement), some older gTLDs also support this...
    335 	 */
    336 	if (asprintf(&server, "whois.nic.%s", qhead) == -1)
    337 		err(1, NULL);
    338 
    339 	/* most ccTLDs don't do this, but QNICHOST/whois-servers mostly works */
    340 	if ((strlen(qhead) == 2 ||
    341 	    /* and is required for most of the <=2003 TLDs/gTLDs */
    342 	    strcasecmp(qhead, "org") == 0 ||
    343 	    strcasecmp(qhead, "com") == 0 ||
    344 	    strcasecmp(qhead, "net") == 0 ||
    345 	    strcasecmp(qhead, "cat") == 0 ||
    346 	    strcasecmp(qhead, "pro") == 0 ||
    347 	    strcasecmp(qhead, "info") == 0 ||
    348 	    strcasecmp(qhead, "aero") == 0 ||
    349 	    strcasecmp(qhead, "jobs") == 0 ||
    350 	    strcasecmp(qhead, "mobi") == 0 ||
    351 	    strcasecmp(qhead, "museum") == 0 ||
    352 	     /* for others, if whois.nic.TLD doesn't exist, try whois-servers */
    353 	    getaddrinfo(server, NULL, &hints, &res) != 0)) {
    354 		free(server);
    355 		if (asprintf(&server, "%s%s", qhead, QNICHOST_TAIL) == -1)
    356 			err(1, NULL);
    357 	}
    358 	if (res != NULL)
    359 		freeaddrinfo(res);
    360 
    361 	*tofree = server;
    362 	return (server);
    363 }
    364 
    365 static void
    366 usage(void)
    367 {
    368 	(void)fprintf(stderr,
    369 	    "usage: %s [-AadfgIilmPQRr] [-c country-code | -h host] "
    370 		"[-p port] name ...\n", getprogname());
    371 	exit(1);
    372 }
    373