81453aec |
1 | /* |
2 | * adnslogres.c |
3 | * - a replacement for the Apache logresolve program using adns |
4 | */ |
5 | /* |
23d78b27 |
6 | * This file is |
b8b163f9 |
7 | * Copyright (C) 1999 Tony Finch <dot@dotat.at> |
2658c305 |
8 | * Copyright (C) 1999-2000 Ian Jackson <ian@davenant.greenend.org.uk> |
d942707d |
9 | * |
10 | * It is part of adns, which is |
2658c305 |
11 | * Copyright (C) 1997-2000 Ian Jackson <ian@davenant.greenend.org.uk> |
b8b163f9 |
12 | * Copyright (C) 1999 Tony Finch <dot@dotat.at> |
81453aec |
13 | * |
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) |
17 | * any later version. |
18 | * |
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. |
23 | * |
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, |
23d78b27 |
26 | * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
27 | * |
2658c305 |
28 | * This version was originally supplied by Tony Finch, but has been |
29 | * modified by Ian Jackson as it was incorporated into adns and |
30 | * subsequently. |
81453aec |
31 | */ |
32 | |
33 | static const char * const cvsid = |
34 | "$Id$"; |
35 | |
36 | #include <sys/types.h> |
37 | #include <sys/time.h> |
38 | |
940356bd |
39 | #include <unistd.h> |
81453aec |
40 | #include <string.h> |
41 | #include <stdlib.h> |
42 | #include <stdio.h> |
43 | #include <ctype.h> |
44 | #include <errno.h> |
5a0be244 |
45 | #include <stdarg.h> |
81453aec |
46 | |
5a0be244 |
47 | #include "config.h" |
81453aec |
48 | #include "adns.h" |
49 | |
50 | /* maximum number of concurrent DNS queries */ |
295cf525 |
51 | #define MAXMAXPENDING 64000 |
52 | #define DEFMAXPENDING 2000 |
81453aec |
53 | |
54 | /* maximum length of a line */ |
55 | #define MAXLINE 1024 |
56 | |
940356bd |
57 | /* option flags */ |
58 | #define OPT_DEBUG 1 |
59 | #define OPT_POLL 2 |
60 | |
81453aec |
61 | static const char *progname; |
62 | |
7c409027 |
63 | #define guard_null(str) ((str) ? (str) : "") |
9715e5f4 |
64 | |
d0bed398 |
65 | #define sensible_ctype(type,ch) (type((unsigned char)(ch))) |
66 | /* isfoo() functions from ctype.h can't safely be fed char - blech ! */ |
67 | |
5a0be244 |
68 | static void msg(const char *fmt, ...) { |
69 | va_list al; |
70 | |
71 | fprintf(stderr, "%s: ", progname); |
72 | va_start(al,fmt); |
73 | vfprintf(stderr, fmt, al); |
74 | va_end(al); |
75 | fputc('\n',stderr); |
76 | } |
77 | |
9715e5f4 |
78 | static void aargh(const char *cause) { |
79 | const char *why = strerror(errno); |
80 | if (!why) why = "Unknown error"; |
81 | msg("%s: %s (%d)", cause, why, errno); |
81453aec |
82 | exit(1); |
83 | } |
84 | |
85 | /* |
86 | * Parse the IP address and convert to a reverse domain name. |
87 | */ |
940356bd |
88 | static char *ipaddr2domain(char *start, char **addr, char **rest) { |
81453aec |
89 | static char buf[30]; /* "123.123.123.123.in-addr.arpa.\0" */ |
90 | char *ptrs[5]; |
91 | int i; |
92 | |
940356bd |
93 | ptrs[0]= start; |
94 | retry: |
d0bed398 |
95 | while (!sensible_ctype(isdigit,*ptrs[0])) |
940356bd |
96 | if (!*ptrs[0]++) { |
97 | strcpy(buf, "invalid."); |
98 | *addr= *rest= NULL; |
99 | return buf; |
100 | } |
bb149f75 |
101 | for (i= 1; i < 5; i++) { |
102 | ptrs[i]= ptrs[i-1]; |
d0bed398 |
103 | while (sensible_ctype(isdigit,*ptrs[i]++)); |
104 | if ((i == 4 && !sensible_ctype(isspace,ptrs[i][-1])) || |
bb149f75 |
105 | (i != 4 && ptrs[i][-1] != '.') || |
106 | (ptrs[i]-ptrs[i-1] > 4)) { |
107 | ptrs[0]= ptrs[i]-1; |
940356bd |
108 | goto retry; |
bb149f75 |
109 | } |
81453aec |
110 | } |
111 | sprintf(buf, "%.*s.%.*s.%.*s.%.*s.in-addr.arpa.", |
112 | ptrs[4]-ptrs[3]-1, ptrs[3], |
113 | ptrs[3]-ptrs[2]-1, ptrs[2], |
114 | ptrs[2]-ptrs[1]-1, ptrs[1], |
115 | ptrs[1]-ptrs[0]-1, ptrs[0]); |
116 | *addr= ptrs[0]; |
117 | *rest= ptrs[4]-1; |
940356bd |
118 | return buf; |
81453aec |
119 | } |
120 | |
bb149f75 |
121 | static void printline(FILE *outf, char *start, char *addr, char *rest, char *domain) { |
81453aec |
122 | if (domain) |
bb149f75 |
123 | fprintf(outf, "%.*s%s%s", addr - start, start, domain, rest); |
81453aec |
124 | else |
bb149f75 |
125 | fputs(start, outf); |
126 | if (ferror(outf)) aargh("write output"); |
81453aec |
127 | } |
128 | |
129 | typedef struct logline { |
130 | struct logline *next; |
131 | char *start, *addr, *rest; |
132 | adns_query query; |
133 | } logline; |
134 | |
bb149f75 |
135 | static logline *readline(FILE *inf, adns_state adns, int opts) { |
81453aec |
136 | static char buf[MAXLINE]; |
137 | char *str; |
138 | logline *line; |
139 | |
bb149f75 |
140 | if (fgets(buf, MAXLINE, inf)) { |
81453aec |
141 | str= malloc(sizeof(*line) + strlen(buf) + 1); |
142 | if (!str) aargh("malloc"); |
143 | line= (logline*)str; |
144 | line->next= NULL; |
145 | line->start= str+sizeof(logline); |
146 | strcpy(line->start, buf); |
bb149f75 |
147 | str= ipaddr2domain(line->start, &line->addr, &line->rest); |
940356bd |
148 | if (opts & OPT_DEBUG) |
7c409027 |
149 | msg("submitting %.*s -> %s", line->rest-line->addr, guard_null(line->addr), str); |
81453aec |
150 | if (adns_submit(adns, str, adns_r_ptr, |
151 | adns_qf_quoteok_cname|adns_qf_cname_loose, |
152 | NULL, &line->query)) |
153 | aargh("adns_submit"); |
154 | return line; |
155 | } |
bb149f75 |
156 | if (!feof(inf)) |
81453aec |
157 | aargh("fgets"); |
158 | return NULL; |
159 | } |
160 | |
295cf525 |
161 | static void proclog(FILE *inf, FILE *outf, int maxpending, int opts) { |
81453aec |
162 | int eof, err, len; |
163 | adns_state adns; |
164 | adns_answer *answer; |
165 | logline *head, *tail, *line; |
166 | |
940356bd |
167 | errno= adns_init(&adns, (opts & OPT_DEBUG) ? adns_if_debug : 0, 0); |
81453aec |
168 | if (errno) aargh("adns_init"); |
bb149f75 |
169 | head= tail= readline(inf, adns, opts); |
81453aec |
170 | len= 1; eof= 0; |
171 | while (head) { |
295cf525 |
172 | while (head) { |
173 | if (opts & OPT_DEBUG) |
174 | msg("%d in queue; checking %.*s", len, |
175 | head->rest-head->addr, guard_null(head->addr)); |
176 | if (eof || len > maxpending) { |
177 | if (opts & OPT_POLL) |
178 | err= adns_wait_poll(adns, &head->query, &answer, NULL); |
179 | else |
180 | err= adns_wait(adns, &head->query, &answer, NULL); |
181 | } else { |
182 | err= adns_check(adns, &head->query, &answer, NULL); |
183 | } |
184 | if (err == EAGAIN) break; |
bb149f75 |
185 | printline(outf, head->start, head->addr, head->rest, |
186 | answer->status == adns_s_ok ? *answer->rrs.str : NULL); |
187 | line= head; head= head->next; |
188 | free(line); free(answer); |
189 | len--; |
81453aec |
190 | } |
191 | if (!eof) { |
bb149f75 |
192 | line= readline(inf, adns, opts); |
295cf525 |
193 | if (line) { |
194 | if (!head) head= line; |
195 | else tail->next= line; |
196 | tail= line; len++; |
197 | } else { |
81453aec |
198 | eof= 1; |
81453aec |
199 | } |
200 | } |
201 | } |
202 | adns_finish(adns); |
203 | } |
204 | |
bb149f75 |
205 | static void usage(void) { |
295cf525 |
206 | fprintf(stderr, "usage: %s [-d] [-p] [-c concurrency] [logfile]\n", progname); |
bb149f75 |
207 | exit(1); |
208 | } |
209 | |
23d78b27 |
210 | int main(int argc, char *argv[]) { |
295cf525 |
211 | int c, opts, maxpending; |
212 | extern char *optarg; |
bb149f75 |
213 | FILE *inf; |
940356bd |
214 | |
bb149f75 |
215 | progname= strrchr(*argv, '/'); |
216 | if (progname) |
217 | progname++; |
218 | else |
219 | progname= *argv; |
b8b163f9 |
220 | |
295cf525 |
221 | maxpending= DEFMAXPENDING; |
222 | opts= 0; |
223 | while ((c= getopt(argc, argv, "c:dp")) != -1) |
940356bd |
224 | switch (c) { |
295cf525 |
225 | case 'c': |
226 | maxpending= atoi(optarg); |
227 | if (maxpending < 1 || maxpending > MAXMAXPENDING) { |
228 | fprintf(stderr, "%s: unfeasible concurrency %d\n", progname, maxpending); |
229 | exit(1); |
230 | } |
231 | break; |
940356bd |
232 | case 'd': |
bb149f75 |
233 | opts|= OPT_DEBUG; |
940356bd |
234 | break; |
235 | case 'p': |
bb149f75 |
236 | opts|= OPT_POLL; |
940356bd |
237 | break; |
238 | default: |
bb149f75 |
239 | usage(); |
940356bd |
240 | } |
940356bd |
241 | |
bb149f75 |
242 | argc-= optind; |
243 | argv+= optind; |
244 | |
245 | inf= NULL; |
246 | if (argc == 0) |
247 | inf= stdin; |
248 | else if (argc == 1) |
249 | inf= fopen(*argv, "r"); |
250 | else |
251 | usage(); |
252 | |
253 | if (!inf) |
254 | aargh("couldn't open input"); |
255 | |
295cf525 |
256 | proclog(inf, stdout, maxpending, opts); |
bb149f75 |
257 | |
258 | if (fclose(inf)) |
259 | aargh("fclose input"); |
260 | if (fclose(stdout)) |
261 | aargh("fclose output"); |
940356bd |
262 | |
81453aec |
263 | return 0; |
264 | } |