int main(int argc, char *argv[])
{
int ch, nopar = 0;
const char *server = NULL, *port = NULL;
char *p, *q, *qstring, fstring[64] = "\0";
#ifdef _WIN32
WSADATA wsa;
if (WSAStartup(0x0101, &wsa))
{
fputs("Winsock initalization error.", stderr);
return -1;
}
#endif
#ifdef ENABLE_NLS
setlocale(LC_ALL, "");
bindtextdomain(NLS_CAT_NAME, LOCALEDIR);
textdomain(NLS_CAT_NAME);
#endif
while ((ch = GETOPT_LONGISH(argc, argv, "acdFg:h:Hi:KlLmMp:q:rRs:St:T:v:V:x",
longopts, 0)) > 0) {
/* RIPE flags */
if (strchr(ripeflags, ch)) {
for (p = fstring; *p; p++);
sprintf(p--, "-%c ", ch);
continue;
}
if (strchr(ripeflagsp, ch)) {
for (p = fstring; *p; p++);
snprintf(p--, sizeof(fstring), "-%c %s ", ch, optarg);
if (ch == 't' || ch == 'v' || ch == 'q')
nopar = 1;
continue;
}
/* program flags */
switch (ch) {
case 'h':
server = q = malloc(strlen(optarg) + 1);
for (p = optarg; *p && *p != ':'; *q++ = tolower(*p++));
if (*p == ':')
port = p + 1;
*q = '\0';
break;
case 'V':
client_tag = optarg;
case 'H':
hide_discl = 0; /* enable disclaimers hiding */
break;
case 'p':
port = optarg;
break;
case 2:
verb = 1;
break;
case 1:
#ifdef VERSION
fprintf(stderr, _("Version %s.\n\nReport bugs to %s.\n"),
VERSION, "<*****@*****.**>");
#else
fprintf(stderr, "%s %s\n", inetutils_package, inetutils_version);
#endif
exit(0);
default:
usage();
}
}
argc -= optind;
argv += optind;
if (argc == 0 && !nopar) /* there is no parameter */
usage();
/* On some systems realloc only works on non-NULL buffers */
qstring = malloc(64);
*qstring = '\0';
/* parse other parameters, if any */
if (!nopar) {
int qslen = 0;
while (1) {
qslen += strlen(*argv) + 1 + 1;
qstring = realloc(qstring, qslen);
strcat(qstring, *argv++);
if (argc == 1)
break;
strcat(qstring, " ");
argc--;
}
}
/* -v or -t has been used */
if (!server && !*qstring)
server = "whois.ripe.net";
#ifdef CONFIG_FILE
if (!server) {
server = match_config_file(qstring);
if (verb && server)
printf(_("Using server %s.\n"), server);
}
#endif
signal(SIGTERM, sighandler);
signal(SIGINT, sighandler);
#ifndef _WIN32
signal(SIGALRM, alarm_handler);
#endif
alarm(60);
if (!server) {
char *tmp;
tmp = normalize_domain(qstring);
server = whichwhois(tmp);
free(tmp);
switch (server[0]) {
case 0:
if (!(server = getenv("WHOIS_SERVER")))
server = DEFAULTSERVER;
if (verb)
printf(_("Using default server %s.\n"), server);
break;
case 1:
puts(_("This TLD has no whois server, but you can access the "
"whois database at"));
case 2:
puts(server + 1);
exit(0);
case 3:
puts(_("This TLD has no whois server."));
exit(0);
case 4:
if (verb)
puts(_("Connecting to whois.crsnic.net."));
sockfd = openconn("whois.crsnic.net", NULL);
server = query_crsnic(sockfd, qstring);
closesocket(sockfd);
if (!server)
exit(0);
printf(_("\nFound a referral to %s.\n\n"), server);
alarm(60);
break;
case 9:
if (verb)
puts(_("Connecting to whois.nic.cc."));
sockfd = openconn("whois.nic.cc", NULL);
server = query_crsnic(sockfd, qstring);
closesocket(sockfd);
if (!server)
exit(0);
printf(_("\nFound a referral to %s.\n\n"), server);
alarm(60);
break;
case 7:
if (verb)
puts(_("Connecting to whois.publicinterestregistry.net."));
sockfd = openconn("whois.publicinterestregistry.net", NULL);
server = query_pir(sockfd, qstring);
closesocket(sockfd);
if (!server)
exit(0);
printf(_("\nFound referral to %s.\n\n"), server);
alarm(60);
break;
case 5:
puts(_("No whois server is known for this kind of object."));
exit(0);
case 6:
puts(_("Unknown AS number or IP network. Please upgrade this program."));
exit(0);
default:
if (verb)
printf(_("Using server %s.\n"), server);
}
}
if (getenv("WHOIS_HIDE"))
hide_discl = 0;
p = queryformat(server, fstring, qstring);
if (verb)
printf(_("Query string: \"%s\"\n\n"), p);
strcat(p, "\r\n");
sockfd = openconn(server, port);
/*
* Now we are connected and the query is supposed to complete quickly.
* This will help people who run whois ... | less
*/
alarm(0);
do_query(sockfd, p);
exit(0);
}
int
main (int argc, char *argv[])
{
int index;
char *fstring;
char *qstring;
char *p;
set_program_name (argv[0]);
#ifdef ENABLE_NLS
setlocale (LC_MESSAGES, "");
bindtextdomain (NLS_CAT_NAME, LOCALEDIR);
textdomain (NLS_CAT_NAME);
#endif
obstack_init (&query_stk);
iu_argp_init ("whois", program_authors);
argp_parse (&gwhois_argp, argc, argv, ARGP_IN_ORDER, &index, NULL);
obstack_1grow (&query_stk, 0);
fstring = obstack_finish (&query_stk);
argc -= index;
argv += index;
if (argc == 0 && !nopar) /* there is no parameter */
error (EXIT_FAILURE, 0, "not enough arguments");
/* parse other parameters, if any */
if (!nopar)
{
while (argc--)
{
const char *arg = *argv++;
obstack_grow (&query_stk, arg, strlen (arg));
if (argc)
obstack_1grow (&query_stk, ' ');
}
}
obstack_1grow (&query_stk, 0);
qstring = obstack_finish (&query_stk);
if (!server && domfind (qstring, gtlds))
{
if (verb)
puts (_("Connecting to whois.internic.net."));
sockfd = openconn ("whois.internic.net", NULL);
server = query_crsnic (sockfd, qstring);
closeconn (sockfd);
if (!server)
exit (EXIT_SUCCESS);
printf (_("\nFound InterNIC referral to %s.\n\n"), server);
}
if (!server)
{
server = whichwhois (qstring);
switch (server[0])
{
case 0:
if (!(server = getenv ("WHOIS_SERVER")))
server = DEFAULTSERVER;
if (verb)
printf (_("Using default server %s.\n"), server);
break;
case 1:
puts (_("This TLD has no whois server, but you can access the "
"whois database at"));
case 2:
puts (server + 1);
exit (EXIT_SUCCESS);
case 3:
puts (_("This TLD has no whois server."));
exit (EXIT_SUCCESS);
default:
if (verb)
printf (_("Using server %s.\n"), server);
}
}
if (getenv ("WHOIS_HIDE"))
hide_discl = 0;
p = queryformat (server, fstring, qstring);
if (verb)
printf (_("Query string: \"%s\"\n\n"), p);
strcat (p, "\r\n");
signal (SIGTERM, sighandler);
signal (SIGINT, sighandler);
sockfd = openconn (server, port);
do_query (sockfd, p);
closeconn (sockfd);
exit (EXIT_SUCCESS);
}
