whois.c revision 1.8.2.1       1  1.8.2.1     he /*	$NetBSD: whois.c,v 1.8.2.1 1999/12/04 19:57:23 he Exp $	*/
      2      1.5    jtc 
      3      1.1    cgd /*
      4      1.5    jtc  * Copyright (c) 1980, 1993
      5      1.5    jtc  *	The Regents of the University of California.  All rights reserved.
      6      1.1    cgd  *
      7      1.1    cgd  * Redistribution and use in source and binary forms, with or without
      8      1.1    cgd  * modification, are permitted provided that the following conditions
      9      1.1    cgd  * are met:
     10      1.1    cgd  * 1. Redistributions of source code must retain the above copyright
     11      1.1    cgd  *    notice, this list of conditions and the following disclaimer.
     12      1.1    cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13      1.1    cgd  *    notice, this list of conditions and the following disclaimer in the
     14      1.1    cgd  *    documentation and/or other materials provided with the distribution.
     15      1.1    cgd  * 3. All advertising materials mentioning features or use of this software
     16      1.1    cgd  *    must display the following acknowledgement:
     17      1.1    cgd  *	This product includes software developed by the University of
     18      1.1    cgd  *	California, Berkeley and its contributors.
     19      1.1    cgd  * 4. Neither the name of the University nor the names of its contributors
     20      1.1    cgd  *    may be used to endorse or promote products derived from this software
     21      1.1    cgd  *    without specific prior written permission.
     22      1.1    cgd  *
     23      1.1    cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24      1.1    cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25      1.1    cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26      1.1    cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27      1.1    cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28      1.1    cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29      1.1    cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30      1.1    cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31      1.1    cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32      1.1    cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33      1.1    cgd  * SUCH DAMAGE.
     34      1.1    cgd  */
     35      1.1    cgd 
     36      1.6    mrg #include <sys/cdefs.h>
     37      1.1    cgd #ifndef lint
     38      1.6    mrg __COPYRIGHT("@(#) Copyright (c) 1980, 1993\n\
     39      1.6    mrg 	The Regents of the University of California.  All rights reserved.\n");
     40      1.1    cgd #endif /* not lint */
     41      1.1    cgd 
     42      1.1    cgd #ifndef lint
     43      1.5    jtc #if 0
     44      1.5    jtc static char sccsid[] = "@(#)whois.c	8.1 (Berkeley) 6/6/93";
     45      1.6    mrg #else
     46  1.8.2.1     he __RCSID("$NetBSD: whois.c,v 1.8.2.1 1999/12/04 19:57:23 he Exp $");
     47      1.5    jtc #endif
     48      1.1    cgd #endif /* not lint */
     49      1.1    cgd 
     50      1.1    cgd #include <sys/types.h>
     51      1.1    cgd #include <sys/socket.h>
     52      1.1    cgd #include <netinet/in.h>
     53      1.7  lukem #include <err.h>
     54      1.1    cgd #include <netdb.h>
     55      1.1    cgd #include <stdio.h>
     56      1.4    jtc #include <stdlib.h>
     57      1.4    jtc #include <string.h>
     58      1.4    jtc #include <unistd.h>
     59      1.1    cgd 
     60  1.8.2.1     he #define	NICHOST	"whois.networksolutions.com"
     61      1.1    cgd 
     62      1.6    mrg int main __P((int, char **));
     63      1.6    mrg static void usage __P((void));
     64      1.4    jtc 
     65      1.4    jtc int
     66      1.1    cgd main(argc, argv)
     67      1.1    cgd 	int argc;
     68      1.1    cgd 	char **argv;
     69      1.1    cgd {
     70      1.1    cgd 	extern char *optarg;
     71      1.1    cgd 	extern int optind;
     72      1.6    mrg 	FILE *sfi, *sfo;
     73      1.6    mrg 	int ch;
     74      1.1    cgd 	struct sockaddr_in sin;
     75      1.1    cgd 	struct hostent *hp;
     76      1.1    cgd 	struct servent *sp;
     77      1.1    cgd 	int s;
     78      1.1    cgd 	char *host;
     79      1.8    kim 	int port = 0;
     80      1.8    kim 	char *p;
     81      1.1    cgd 
     82      1.1    cgd 	host = NICHOST;
     83      1.7  lukem 	while ((ch = getopt(argc, argv, "h:")) != -1)
     84      1.1    cgd 		switch((char)ch) {
     85      1.1    cgd 		case 'h':
     86      1.1    cgd 			host = optarg;
     87      1.1    cgd 			break;
     88      1.1    cgd 		case '?':
     89      1.1    cgd 		default:
     90      1.1    cgd 			usage();
     91      1.1    cgd 		}
     92      1.1    cgd 	argc -= optind;
     93      1.1    cgd 	argv += optind;
     94      1.1    cgd 
     95      1.1    cgd 	if (!argc)
     96      1.1    cgd 		usage();
     97      1.1    cgd 
     98      1.8    kim 	if ((p = strrchr(host, ':')) != NULL) {
     99      1.8    kim 		*p++ = '\0';
    100      1.8    kim 		port = atoi(p);
    101      1.8    kim 	}
    102      1.1    cgd 	hp = gethostbyname(host);
    103      1.7  lukem 	if (hp == NULL)
    104      1.7  lukem 		errx(1, "%s: %s", host, hstrerror(h_errno));
    105      1.1    cgd 	host = hp->h_name;
    106      1.1    cgd 	s = socket(hp->h_addrtype, SOCK_STREAM, 0);
    107      1.7  lukem 	if (s < 0)
    108      1.7  lukem 		err(1, "socket");
    109      1.7  lukem 	memset((caddr_t)&sin, 0, sizeof (sin));
    110      1.1    cgd 	sin.sin_family = hp->h_addrtype;
    111      1.7  lukem 	if (bind(s, (struct sockaddr *)&sin, sizeof(sin)) < 0)
    112      1.7  lukem 		err(1, "bind");
    113      1.7  lukem 	memmove((char *)&sin.sin_addr, hp->h_addr, hp->h_length);
    114      1.8    kim 	if (port == 0) {
    115      1.8    kim 		sp = getservbyname("whois", "tcp");
    116      1.8    kim 		if (sp == NULL)
    117      1.8    kim 			errx(1, "whois/tcp: unknown service");
    118      1.8    kim 		sin.sin_port = sp->s_port;
    119      1.8    kim 	} else
    120      1.8    kim 		sin.sin_port = htons(port);
    121      1.7  lukem 	if (connect(s, (struct sockaddr *)&sin, sizeof(sin)) < 0)
    122      1.7  lukem 		err(1, "connect");
    123      1.1    cgd 	sfi = fdopen(s, "r");
    124      1.1    cgd 	sfo = fdopen(s, "w");
    125      1.7  lukem 	if (sfi == NULL || sfo == NULL)
    126      1.7  lukem 		err(1, "fdopen");
    127      1.1    cgd 	while (argc-- > 1)
    128      1.1    cgd 		(void)fprintf(sfo, "%s ", *argv++);
    129      1.1    cgd 	(void)fprintf(sfo, "%s\r\n", *argv);
    130      1.1    cgd 	(void)fflush(sfo);
    131      1.1    cgd 	while ((ch = getc(sfi)) != EOF)
    132      1.1    cgd 		putchar(ch);
    133      1.1    cgd 	exit(0);
    134      1.1    cgd }
    135      1.1    cgd 
    136      1.4    jtc static void
    137      1.1    cgd usage()
    138      1.1    cgd {
    139      1.1    cgd 	(void)fprintf(stderr, "usage: whois [-h hostname] name ...\n");
    140      1.1    cgd 	exit(1);
    141      1.1    cgd }
    142