1 /* 2 * Copyright (c) 1980, 1993 3 * The Regents of the University of California. 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. All advertising materials mentioning features or use of this software 14 * must display the following acknowledgement: 15 * This product includes software developed by the University of 16 * California, Berkeley and its contributors. 17 * 4. Neither the name of the University nor the names of its contributors 18 * may be used to endorse or promote products derived from this software 19 * without specific prior written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 31 * SUCH DAMAGE. 32 */ 33 34 #ifndef lint 35 static const char copyright[] = 36 "@(#) Copyright (c) 1980, 1993\n\ 37 The Regents of the University of California. All rights reserved.\n"; 38 #endif /* not lint */ 39 40 #if 0 41 #ifndef lint 42 static char sccsid[] = "@(#)whois.c 8.1 (Berkeley) 6/6/93"; 43 #endif /* not lint */ 44 #endif 45 46 #include <sys/cdefs.h> 47 __FBSDID("$FreeBSD$"); 48 49 #include <sys/types.h> 50 #include <sys/socket.h> 51 #include <netinet/in.h> 52 #include <arpa/inet.h> 53 #include <ctype.h> 54 #include <err.h> 55 #include <netdb.h> 56 #include <stdarg.h> 57 #include <stdio.h> 58 #include <stdlib.h> 59 #include <string.h> 60 #include <sysexits.h> 61 #include <unistd.h> 62 63 #define ABUSEHOST "whois.abuse.net" 64 #define NICHOST "whois.crsnic.net" 65 #define INICHOST "whois.networksolutions.com" 66 #define DNICHOST "whois.nic.mil" 67 #define GNICHOST "whois.nic.gov" 68 #define ANICHOST "whois.arin.net" 69 #define LNICHOST "whois.lacnic.net" 70 #define KNICHOST "whois.krnic.net" 71 #define RNICHOST "whois.ripe.net" 72 #define PNICHOST "whois.apnic.net" 73 #define MNICHOST "whois.ra.net" 74 #define QNICHOST_TAIL ".whois-servers.net" 75 #define SNICHOST "whois.6bone.net" 76 #define BNICHOST "whois.registro.br" 77 #define NORIDHOST "whois.norid.no" 78 #define IANAHOST "whois.iana.org" 79 #define GERMNICHOST "de.whois-servers.net" 80 #define DEFAULT_PORT "whois" 81 #define WHOIS_SERVER_ID "Whois Server: " 82 #define WHOIS_ORG_SERVER_ID "Registrant Street1:Whois Server:" 83 84 #define WHOIS_RECURSE 0x01 85 #define WHOIS_QUICK 0x02 86 87 #define ishost(h) (isalnum((unsigned char)h) || h == '.' || h == '-') 88 89 const char *ip_whois[] = { LNICHOST, RNICHOST, PNICHOST, BNICHOST, NULL }; 90 const char *port = DEFAULT_PORT; 91 92 static char *choose_server(char *); 93 static struct addrinfo *gethostinfo(char const *host, int exit_on_error); 94 static void s_asprintf(char **ret, const char *format, ...) __printflike(2, 3); 95 static void usage(void); 96 static void whois(const char *, const char *, int); 97 98 int 99 main(int argc, char *argv[]) 100 { 101 const char *country, *host; 102 char *qnichost; 103 int ch, flags, use_qnichost; 104 105 #ifdef SOCKS 106 SOCKSinit(argv[0]); 107 #endif 108 109 country = host = qnichost = NULL; 110 flags = use_qnichost = 0; 111 while ((ch = getopt(argc, argv, "aAbc:dgh:iIklmp:QrR6")) != -1) { 112 switch (ch) { 113 case 'a': 114 host = ANICHOST; 115 break; 116 case 'A': 117 host = PNICHOST; 118 break; 119 case 'b': 120 host = ABUSEHOST; 121 break; 122 case 'c': 123 country = optarg; 124 break; 125 case 'd': 126 host = DNICHOST; 127 break; 128 case 'g': 129 host = GNICHOST; 130 break; 131 case 'h': 132 host = optarg; 133 break; 134 case 'i': 135 host = INICHOST; 136 break; 137 case 'I': 138 host = IANAHOST; 139 break; 140 case 'k': 141 host = KNICHOST; 142 break; 143 case 'l': 144 host = LNICHOST; 145 break; 146 case 'm': 147 host = MNICHOST; 148 break; 149 case 'p': 150 port = optarg; 151 break; 152 case 'Q': 153 flags |= WHOIS_QUICK; 154 break; 155 case 'r': 156 host = RNICHOST; 157 break; 158 case 'R': 159 warnx("-R is deprecated; use '-c ru' instead"); 160 country = "ru"; 161 break; 162 case '6': 163 host = SNICHOST; 164 break; 165 case '?': 166 default: 167 usage(); 168 /* NOTREACHED */ 169 } 170 } 171 argc -= optind; 172 argv += optind; 173 174 if (!argc || (country != NULL && host != NULL)) 175 usage(); 176 177 /* 178 * If no host or country is specified determine the top level domain 179 * from the query. If the TLD is a number, query ARIN. Otherwise, use 180 * TLD.whois-server.net. If the domain does not contain '.', fall 181 * back to NICHOST. 182 */ 183 if (host == NULL && country == NULL) { 184 use_qnichost = 1; 185 host = NICHOST; 186 if (!(flags & WHOIS_QUICK)) 187 flags |= WHOIS_RECURSE; 188 } 189 while (argc-- > 0) { 190 if (country != NULL) { 191 s_asprintf(&qnichost, "%s%s", country, QNICHOST_TAIL); 192 whois(*argv, qnichost, flags); 193 } else if (use_qnichost) 194 if ((qnichost = choose_server(*argv)) != NULL) 195 whois(*argv, qnichost, flags); 196 if (qnichost == NULL) 197 whois(*argv, host, flags); 198 free(qnichost); 199 qnichost = NULL; 200 argv++; 201 } 202 exit(0); 203 } 204 205 /* 206 * This function will remove any trailing periods from domain, after which it 207 * returns a pointer to newly allocated memory containing the whois server to 208 * be queried, or a NULL if the correct server couldn't be determined. The 209 * caller must remember to free(3) the allocated memory. 210 */ 211 static char * 212 choose_server(char *domain) 213 { 214 char *pos, *retval; 215 216 for (pos = strchr(domain, '\0'); pos > domain && *--pos == '.';) 217 *pos = '\0'; 218 if (*domain == '\0') 219 errx(EX_USAGE, "can't search for a null string"); 220 if (strlen(domain) > sizeof("-NORID")-1 && 221 strcasecmp(domain + strlen(domain) - sizeof("-NORID") + 1, 222 "-NORID") == 0) { 223 s_asprintf(&retval, "%s", NORIDHOST); 224 return (retval); 225 } 226 while (pos > domain && *pos != '.') 227 --pos; 228 if (pos <= domain) 229 return (NULL); 230 if (isdigit((unsigned char)*++pos)) 231 s_asprintf(&retval, "%s", ANICHOST); 232 else 233 s_asprintf(&retval, "%s%s", pos, QNICHOST_TAIL); 234 return (retval); 235 } 236 237 static struct addrinfo * 238 gethostinfo(char const *host, int exit_on_error) 239 { 240 struct addrinfo hints, *res; 241 int error; 242 243 memset(&hints, 0, sizeof(hints)); 244 hints.ai_flags = 0; 245 hints.ai_family = AF_UNSPEC; 246 hints.ai_socktype = SOCK_STREAM; 247 error = getaddrinfo(host, port, &hints, &res); 248 if (error) { 249 warnx("%s: %s", host, gai_strerror(error)); 250 if (exit_on_error) 251 exit(EX_NOHOST); 252 return (NULL); 253 } 254 return (res); 255 } 256 257 /* 258 * Wrapper for asprintf(3) that exits on error. 259 */ 260 static void 261 s_asprintf(char **ret, const char *format, ...) 262 { 263 va_list ap; 264 265 va_start(ap, format); 266 if (vasprintf(ret, format, ap) == -1) { 267 va_end(ap); 268 err(EX_OSERR, "vasprintf()"); 269 } 270 va_end(ap); 271 } 272 273 static void 274 whois(const char *query, const char *hostname, int flags) 275 { 276 FILE *sfi, *sfo; 277 struct addrinfo *hostres, *res; 278 char *buf, *host, *nhost, *p; 279 int i, s; 280 size_t c, len; 281 282 s = -1; 283 hostres = gethostinfo(hostname, 1); 284 for (res = hostres; res; res = res->ai_next) { 285 s = socket(res->ai_family, res->ai_socktype, res->ai_protocol); 286 if (s < 0) 287 continue; 288 if (connect(s, res->ai_addr, res->ai_addrlen) == 0) 289 break; 290 close(s); 291 } 292 freeaddrinfo(hostres); 293 if (res == NULL) 294 err(EX_OSERR, "connect()"); 295 296 sfi = fdopen(s, "r"); 297 sfo = fdopen(s, "w"); 298 if (sfi == NULL || sfo == NULL) 299 err(EX_OSERR, "fdopen()"); 300 if (strcmp(hostname, GERMNICHOST) == 0) { 301 fprintf(sfo, "-T dn,ace -C US-ASCII %s\r\n", query); 302 } else { 303 fprintf(sfo, "%s\r\n", query); 304 } 305 fflush(sfo); 306 nhost = NULL; 307 while ((buf = fgetln(sfi, &len)) != NULL) { 308 while (len > 0 && isspace((unsigned char)buf[len - 1])) 309 buf[--len] = '\0'; 310 printf("%.*s\n", (int)len, buf); 311 312 if ((flags & WHOIS_RECURSE) && nhost == NULL) { 313 host = strnstr(buf, WHOIS_SERVER_ID, len); 314 if (host != NULL) { 315 host += sizeof(WHOIS_SERVER_ID) - 1; 316 for (p = host; p < buf + len; p++) { 317 if (!ishost(*p)) { 318 *p = '\0'; 319 break; 320 } 321 } 322 s_asprintf(&nhost, "%.*s", 323 (int)(buf + len - host), host); 324 } else if ((host = 325 strnstr(buf, WHOIS_ORG_SERVER_ID, len)) != NULL) { 326 host += sizeof(WHOIS_ORG_SERVER_ID) - 1; 327 for (p = host; p < buf + len; p++) { 328 if (!ishost(*p)) { 329 *p = '\0'; 330 break; 331 } 332 } 333 s_asprintf(&nhost, "%.*s", 334 (int)(buf + len - host), host); 335 } else if (strcmp(hostname, ANICHOST) == 0) { 336 for (c = 0; c <= len; c++) 337 buf[c] = tolower((int)buf[c]); 338 for (i = 0; ip_whois[i] != NULL; i++) { 339 if (strnstr(buf, ip_whois[i], len) != 340 NULL) { 341 s_asprintf(&nhost, "%s", 342 ip_whois[i]); 343 break; 344 } 345 } 346 } 347 } 348 } 349 if (nhost != NULL) { 350 whois(query, nhost, 0); 351 free(nhost); 352 } 353 } 354 355 static void 356 usage(void) 357 { 358 fprintf(stderr, 359 "usage: whois [-aAbdgiIklmQrR6] [-c country-code | -h hostname] " 360 "[-p port] name ...\n"); 361 exit(EX_USAGE); 362 } 363