3 * - useful general-purpose resolver client program
4 * main program and useful subroutines
8 * Copyright (C) 1997-1999 Ian Jackson <ian@davenant.greenend.org.uk>
10 * It is part of adns, which is
11 * Copyright (C) 1997-1999 Ian Jackson <ian@davenant.greenend.org.uk>
12 * Copyright (C) 1999 Tony Finch <dot@dotat.at>
14 * This program is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU General Public License as published by
16 * the Free Software Foundation; either version 2, or (at your option)
19 * This program is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU General Public License for more details.
24 * You should have received a copy of the GNU General Public License
25 * along with this program; if not, write to the Free Software Foundation,
26 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
31 void sysfail(const char *what, int errnoval) {
32 fprintf(stderr,"adnshost failed: %s: %s\n",what,strerror(errnoval));
36 void usageerr(const char *fmt, ...) {
38 fputs("adnshost usage error: ",stderr);
40 vfprintf(stderr,fmt,al);
47 sysfail("write to stdout",errno);
50 static void domain_do(const char *domain) {
51 if (ov_pipe && !ads) usageerr("-f/--pipe not consistent with domains on command line");
56 void *xmalloc(size_t sz) {
59 p= malloc(sz); if (!p) sysfail("malloc",sz);
63 char *xstrsave(const char *str) {
66 p= xmalloc(strlen(str)+1);
71 void of_type(const struct optioninfo *oi, const char *arg) {
72 static const struct typename {
76 /* enhanced versions */
78 { adns_r_soa, "soa" },
79 { adns_r_ptr, "ptr" },
82 { adns_r_addr, "addr" },
84 /* types with only one version */
85 { adns_r_cname, "cname" },
86 { adns_r_hinfo, "hinfo" },
87 { adns_r_txt, "txt" },
91 { adns_r_ns_raw, "ns-" },
92 { adns_r_soa_raw, "soa-" },
93 { adns_r_ptr_raw, "ptr-" },
94 { adns_r_mx_raw, "mx-" },
95 { adns_r_rp_raw, "rp-" },
100 const struct typename *tnp;
103 tnp->type && strcmp(arg,tnp->desc);
105 if (!tnp->type) usageerr("unknown RR type %s",arg);
111 static void process_optarg(const char *arg,
112 const char *const **argv_p,
114 const struct optioninfo *oip;
117 if (arg[0] == '-' || arg[0] == '+') {
118 if (arg[0] == '-' && arg[1] == '-') {
119 if (!strncmp(arg,"--no-",5)) {
121 oip= opt_findl(arg+5);
124 oip= opt_findl(arg+2);
126 if (oip->type == ot_funcarg) {
127 arg= argv_p ? *++(*argv_p) : value;
128 if (!arg) usageerr("option --%s requires a value argument",oip->lopt);
130 if (value) usageerr("option --%s does not take a value",oip->lopt);
133 opt_do(oip,arg,invert);
134 } else if (arg[0] == '-' && arg[1] == 0) {
135 arg= argv_p ? *++(*argv_p) : value;
136 if (!arg) usageerr("option `-' must be followed by a domain");
138 } else { /* arg[1] != '-', != '\0' */
139 invert= (arg[0] == '+');
142 oip= opt_finds(&arg);
143 if (oip->type == ot_funcarg) {
145 arg= argv_p ? *++(*argv_p) : value;
146 if (!arg) usageerr("option -%s requires a value argument",oip->sopt);
148 if (value) usageerr("two values for option -%s given !",oip->sopt);
150 opt_do(oip,arg,invert);
153 if (value) usageerr("option -%s does not take a value",oip->sopt);
154 opt_do(oip,0,invert);
158 } else { /* arg[0] != '-' */
163 static void read_stdin(void) {
164 static int used, avail;
168 char *newline, *space;
171 while (!anydone || used) {
172 while (!(newline= memchr(buf,'\n',used))) {
174 avail += 20; avail <<= 1;
175 buf= realloc(buf,avail);
176 if (!buf) sysfail("realloc stdin buffer",errno);
179 r= read(0,buf+used,avail-used);
180 } while (r < 0 && errno == EINTR);
183 /* fake up final newline */
191 if (r < 0) sysfail("read stdin",errno);
195 space= strchr(buf,' ');
196 if (space) *space++= 0;
197 process_optarg(buf,0,space);
198 used -= (newline-buf);
199 memmove(buf,newline,used);
204 int main(int argc, const char *const *argv) {
205 struct timeval *tv, tvbuf;
210 fd_set readfds, writefds, exceptfds;
213 while ((arg= *++argv)) process_optarg(arg,&argv,0);
215 if (!ov_pipe && !ads) usageerr("no domains given, and -f/--pipe not used; try --help");
221 qu= ov_asynch ? 0 : outstanding.head ? outstanding.head->qu : 0;
222 r= adns_check(ads,&qu,&answer,&qun_v);
223 if (r == EAGAIN) break;
224 if (r == ESRCH) { if (!ov_pipe) goto x_quit; else break; }
226 query_done(qun_v,answer);
237 adns_beforeselect(ads, &maxfd, &readfds,&writefds,&exceptfds, &tv,&tvbuf,0);
238 r= select(maxfd, &readfds,&writefds,&exceptfds, tv);
240 if (errno == EINTR) continue;
241 sysfail("select",errno);
243 adns_afterselect(ads, maxfd, &readfds,&writefds,&exceptfds, 0);
244 if (ov_pipe && FD_ISSET(0,&readfds)) read_stdin();
247 if (fclose(stdout)) outerr();