e576be50 |
1 | /* |
2 | * event.c |
3 | * - event loop core |
4 | * - TCP connection management |
5 | * - user-visible check/wait and event-loop-related functions |
6 | */ |
7 | /* |
d942707d |
8 | * This file is |
3d5cde09 |
9 | * Copyright (C) 1997-2000 Ian Jackson <ian@davenant.greenend.org.uk> |
d942707d |
10 | * |
11 | * It is part of adns, which is |
3d5cde09 |
12 | * Copyright (C) 1997-2000 Ian Jackson <ian@davenant.greenend.org.uk> |
bef232ae |
13 | * Copyright (C) 1999-2000 Tony Finch <dot@dotat.at> |
e576be50 |
14 | * |
15 | * This program is free software; you can redistribute it and/or modify |
16 | * it under the terms of the GNU General Public License as published by |
17 | * the Free Software Foundation; either version 2, or (at your option) |
18 | * any later version. |
19 | * |
20 | * This program is distributed in the hope that it will be useful, |
21 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
22 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
23 | * GNU General Public License for more details. |
24 | * |
25 | * You should have received a copy of the GNU General Public License |
26 | * along with this program; if not, write to the Free Software Foundation, |
27 | * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
28 | */ |
656b2da9 |
29 | |
4353a5c4 |
30 | #include <errno.h> |
31 | #include <stdlib.h> |
0f091044 |
32 | #include <unistd.h> |
4353a5c4 |
33 | |
0f091044 |
34 | #include <sys/types.h> |
35 | #include <sys/time.h> |
4353a5c4 |
36 | #include <netdb.h> |
eec1d9c8 |
37 | #include <sys/socket.h> |
38 | #include <netinet/in.h> |
4353a5c4 |
39 | #include <arpa/inet.h> |
40 | |
41 | #include "internal.h" |
2953d358 |
42 | #include "tvarith.h" |
37e28fde |
43 | |
620c146d |
44 | /* TCP connection management. */ |
45 | |
f7f83b4a |
46 | static void tcp_close(adns_state ads) { |
620c146d |
47 | int serv; |
48 | |
49 | serv= ads->tcpserver; |
50 | close(ads->tcpsocket); |
6a578b2c |
51 | ads->tcpsocket= -1; |
70ad7a2a |
52 | ads->tcprecv.used= ads->tcprecv_skip= ads->tcpsend.used= 0; |
620c146d |
53 | } |
656b2da9 |
54 | |
8402e34c |
55 | void adns__tcp_broken(adns_state ads, const char *what, const char *why) { |
56 | int serv; |
fb901bf5 |
57 | adns_query qu; |
8402e34c |
58 | |
59 | assert(ads->tcpstate == server_connecting || ads->tcpstate == server_ok); |
ddfda861 |
60 | serv= ads->tcpserver; |
f7f83b4a |
61 | if (what) adns__warn(ads,serv,0,"TCP connection failed: %s: %s",what,why); |
62 | |
fb901bf5 |
63 | if (ads->tcpstate == server_connecting) { |
64 | /* Counts as a retry for all the queries waiting for TCP. */ |
65 | for (qu= ads->tcpw.head; qu; qu= qu->next) |
66 | qu->retries++; |
67 | } |
68 | |
f7f83b4a |
69 | tcp_close(ads); |
70 | ads->tcpstate= server_broken; |
71 | ads->tcpserver= (serv+1)%ads->nservers; |
8402e34c |
72 | } |
73 | |
ddfda861 |
74 | static void tcp_connected(adns_state ads, struct timeval now) { |
4353a5c4 |
75 | adns_query qu, nqu; |
76 | |
68442019 |
77 | adns__debug(ads,ads->tcpserver,0,"TCP connected"); |
4353a5c4 |
78 | ads->tcpstate= server_ok; |
f7f83b4a |
79 | for (qu= ads->tcpw.head; qu && ads->tcpstate == server_ok; qu= nqu) { |
ddfda861 |
80 | nqu= qu->next; |
f7f83b4a |
81 | assert(qu->state == query_tcpw); |
82 | adns__querysend_tcp(qu,now); |
ddfda861 |
83 | } |
84 | } |
85 | |
237ce710 |
86 | static void tcp_broken_events(adns_state ads) { |
87 | adns_query qu, nqu; |
88 | |
89 | assert(ads->tcpstate == server_broken); |
90 | for (qu= ads->tcpw.head; qu; qu= nqu) { |
91 | nqu= qu->next; |
92 | assert(qu->state == query_tcpw); |
93 | if (qu->retries > ads->nservers) { |
94 | LIST_UNLINK(ads->tcpw,qu); |
95 | adns__query_fail(qu,adns_s_allservfail); |
96 | } |
97 | } |
98 | ads->tcpstate= server_disconnected; |
99 | } |
100 | |
ddfda861 |
101 | void adns__tcp_tryconnect(adns_state ads, struct timeval now) { |
8402e34c |
102 | int r, fd, tries; |
4353a5c4 |
103 | struct sockaddr_in addr; |
104 | struct protoent *proto; |
8402e34c |
105 | |
106 | for (tries=0; tries<ads->nservers; tries++) { |
f7f83b4a |
107 | switch (ads->tcpstate) { |
108 | case server_connecting: |
109 | case server_ok: |
110 | case server_broken: |
111 | return; |
112 | case server_disconnected: |
113 | break; |
114 | default: |
115 | abort(); |
116 | } |
117 | |
4353a5c4 |
118 | assert(!ads->tcpsend.used); |
119 | assert(!ads->tcprecv.used); |
70ad7a2a |
120 | assert(!ads->tcprecv_skip); |
8402e34c |
121 | |
122 | proto= getprotobyname("tcp"); |
609133ee |
123 | if (!proto) { |
124 | adns__diag(ads,-1,0,"unable to find protocol no. for TCP !"); |
125 | return; |
126 | } |
8402e34c |
127 | fd= socket(AF_INET,SOCK_STREAM,proto->p_proto); |
4353a5c4 |
128 | if (fd<0) { |
68442019 |
129 | adns__diag(ads,-1,0,"cannot create TCP socket: %s",strerror(errno)); |
4353a5c4 |
130 | return; |
131 | } |
132 | r= adns__setnonblock(ads,fd); |
133 | if (r) { |
609133ee |
134 | adns__diag(ads,-1,0,"cannot make TCP socket nonblocking:" |
135 | " %s",strerror(r)); |
4353a5c4 |
136 | close(fd); |
137 | return; |
138 | } |
8402e34c |
139 | memset(&addr,0,sizeof(addr)); |
140 | addr.sin_family= AF_INET; |
98a3f706 |
141 | addr.sin_port= htons(DNS_PORT); |
8402e34c |
142 | addr.sin_addr= ads->servers[ads->tcpserver].addr; |
eec1d9c8 |
143 | r= connect(fd,(const struct sockaddr*)&addr,sizeof(addr)); |
8402e34c |
144 | ads->tcpsocket= fd; |
145 | ads->tcpstate= server_connecting; |
f7f83b4a |
146 | if (r==0) { tcp_connected(ads,now); return; } |
147 | if (errno == EWOULDBLOCK || errno == EINPROGRESS) { |
148 | ads->tcptimeout= now; |
149 | timevaladd(&ads->tcptimeout,TCPCONNMS); |
150 | return; |
151 | } |
ddfda861 |
152 | adns__tcp_broken(ads,"connect",strerror(errno)); |
237ce710 |
153 | tcp_broken_events(ads); |
8402e34c |
154 | } |
155 | } |
156 | |
620c146d |
157 | /* Timeout handling functions. */ |
158 | |
159 | void adns__must_gettimeofday(adns_state ads, const struct timeval **now_io, |
160 | struct timeval *tv_buf) { |
161 | const struct timeval *now; |
162 | int r; |
163 | |
164 | now= *now_io; |
165 | if (now) return; |
166 | r= gettimeofday(tv_buf,0); if (!r) { *now_io= tv_buf; return; } |
167 | adns__diag(ads,-1,0,"gettimeofday failed: %s",strerror(errno)); |
168 | adns_globalsystemfailure(ads); |
169 | return; |
170 | } |
4353a5c4 |
171 | |
4fad263d |
172 | static void inter_immed(struct timeval **tv_io, struct timeval *tvbuf) { |
173 | struct timeval *rbuf; |
174 | |
175 | if (!tv_io) return; |
176 | |
177 | rbuf= *tv_io; |
178 | if (!rbuf) { *tv_io= rbuf= tvbuf; } |
179 | |
180 | timerclear(rbuf); |
181 | } |
182 | |
4353a5c4 |
183 | static void inter_maxto(struct timeval **tv_io, struct timeval *tvbuf, |
184 | struct timeval maxto) { |
185 | struct timeval *rbuf; |
186 | |
187 | if (!tv_io) return; |
188 | rbuf= *tv_io; |
94436798 |
189 | if (!rbuf) { |
190 | *tvbuf= maxto; *tv_io= tvbuf; |
191 | } else { |
192 | if (timercmp(rbuf,&maxto,>)) *rbuf= maxto; |
193 | } |
ffbda80c |
194 | /*fprintf(stderr,"inter_maxto maxto=%ld.%06ld result=%ld.%06ld\n", |
195 | maxto.tv_sec,maxto.tv_usec,(**tv_io).tv_sec,(**tv_io).tv_usec);*/ |
4353a5c4 |
196 | } |
197 | |
198 | static void inter_maxtoabs(struct timeval **tv_io, struct timeval *tvbuf, |
199 | struct timeval now, struct timeval maxtime) { |
f7f83b4a |
200 | /* tv_io may be 0 */ |
4353a5c4 |
201 | ldiv_t dr; |
202 | |
ffbda80c |
203 | /*fprintf(stderr,"inter_maxtoabs now=%ld.%06ld maxtime=%ld.%06ld\n", |
204 | now.tv_sec,now.tv_usec,maxtime.tv_sec,maxtime.tv_usec);*/ |
4353a5c4 |
205 | if (!tv_io) return; |
94436798 |
206 | maxtime.tv_sec -= (now.tv_sec+2); |
207 | maxtime.tv_usec -= (now.tv_usec-2000000); |
208 | dr= ldiv(maxtime.tv_usec,1000000); |
4353a5c4 |
209 | maxtime.tv_sec += dr.quot; |
94436798 |
210 | maxtime.tv_usec -= dr.quot*1000000; |
211 | if (maxtime.tv_sec<0) timerclear(&maxtime); |
4353a5c4 |
212 | inter_maxto(tv_io,tvbuf,maxtime); |
213 | } |
214 | |
f7f83b4a |
215 | static void timeouts_queue(adns_state ads, int act, |
216 | struct timeval **tv_io, struct timeval *tvbuf, |
217 | struct timeval now, struct query_queue *queue) { |
4353a5c4 |
218 | adns_query qu, nqu; |
f7f83b4a |
219 | |
220 | for (qu= queue->head; qu; qu= nqu) { |
4353a5c4 |
221 | nqu= qu->next; |
d855b532 |
222 | if (!timercmp(&now,&qu->timeout,>)) { |
620c146d |
223 | inter_maxtoabs(tv_io,tvbuf,now,qu->timeout); |
224 | } else { |
4fad263d |
225 | if (!act) { inter_immed(tv_io,tvbuf); return; } |
f7f83b4a |
226 | LIST_UNLINK(*queue,qu); |
d8c062fa |
227 | if (qu->state != query_tosend) { |
3955725c |
228 | adns__query_fail(qu,adns_s_timeout); |
4353a5c4 |
229 | } else { |
d8c062fa |
230 | adns__query_send(qu,now); |
4353a5c4 |
231 | } |
f7f83b4a |
232 | nqu= queue->head; |
4353a5c4 |
233 | } |
234 | } |
f7f83b4a |
235 | } |
236 | |
237 | static void tcp_events(adns_state ads, int act, |
238 | struct timeval **tv_io, struct timeval *tvbuf, |
239 | struct timeval now) { |
f7f83b4a |
240 | for (;;) { |
241 | switch (ads->tcpstate) { |
242 | case server_broken: |
4fad263d |
243 | if (!act) { inter_immed(tv_io,tvbuf); return; } |
237ce710 |
244 | tcp_broken_events(ads); |
f7f83b4a |
245 | case server_disconnected: /* fall through */ |
246 | if (!ads->tcpw.head) return; |
4fad263d |
247 | if (!act) { inter_immed(tv_io,tvbuf); return; } |
f7f83b4a |
248 | adns__tcp_tryconnect(ads,now); |
249 | break; |
250 | case server_ok: |
251 | if (ads->tcpw.head) return; |
252 | if (!ads->tcptimeout.tv_sec) { |
253 | assert(!ads->tcptimeout.tv_usec); |
254 | ads->tcptimeout= now; |
255 | timevaladd(&ads->tcptimeout,TCPIDLEMS); |
256 | } |
257 | case server_connecting: /* fall through */ |
4fad263d |
258 | if (!act || !timercmp(&now,&ads->tcptimeout,>)) { |
f7f83b4a |
259 | inter_maxtoabs(tv_io,tvbuf,now,ads->tcptimeout); |
260 | return; |
261 | } { |
262 | /* TCP timeout has happened */ |
263 | switch (ads->tcpstate) { |
264 | case server_connecting: /* failed to connect */ |
265 | adns__tcp_broken(ads,"unable to make connection","timed out"); |
266 | break; |
267 | case server_ok: /* idle timeout */ |
268 | tcp_close(ads); |
269 | ads->tcpstate= server_disconnected; |
270 | return; |
271 | default: |
272 | abort(); |
273 | } |
274 | } |
275 | break; |
276 | default: |
277 | abort(); |
278 | } |
279 | } |
4fad263d |
280 | return; |
f7f83b4a |
281 | } |
282 | |
283 | void adns__timeouts(adns_state ads, int act, |
284 | struct timeval **tv_io, struct timeval *tvbuf, |
285 | struct timeval now) { |
286 | timeouts_queue(ads,act,tv_io,tvbuf,now, &ads->udpw); |
287 | timeouts_queue(ads,act,tv_io,tvbuf,now, &ads->tcpw); |
288 | tcp_events(ads,act,tv_io,tvbuf,now); |
289 | } |
94436798 |
290 | |
620c146d |
291 | void adns_firsttimeout(adns_state ads, |
292 | struct timeval **tv_io, struct timeval *tvbuf, |
293 | struct timeval now) { |
28de6442 |
294 | adns__consistency(ads,0,cc_entex); |
620c146d |
295 | adns__timeouts(ads, 0, tv_io,tvbuf, now); |
28de6442 |
296 | adns__consistency(ads,0,cc_entex); |
620c146d |
297 | } |
298 | |
299 | void adns_processtimeouts(adns_state ads, const struct timeval *now) { |
300 | struct timeval tv_buf; |
301 | |
28de6442 |
302 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
303 | adns__must_gettimeofday(ads,&now,&tv_buf); |
304 | if (now) adns__timeouts(ads, 1, 0,0, *now); |
28de6442 |
305 | adns__consistency(ads,0,cc_entex); |
a8768e80 |
306 | } |
307 | |
620c146d |
308 | /* fd handling functions. These are the top-level of the real work of |
309 | * reception and often transmission. |
310 | */ |
311 | |
312 | int adns__pollfds(adns_state ads, struct pollfd pollfds_buf[MAX_POLLFDS]) { |
313 | /* Returns the number of entries filled in. Always zeroes revents. */ |
314 | |
315 | assert(MAX_POLLFDS==2); |
a8768e80 |
316 | |
620c146d |
317 | pollfds_buf[0].fd= ads->udpsocket; |
318 | pollfds_buf[0].events= POLLIN; |
319 | pollfds_buf[0].revents= 0; |
4353a5c4 |
320 | |
321 | switch (ads->tcpstate) { |
322 | case server_disconnected: |
6c68a593 |
323 | case server_broken: |
620c146d |
324 | return 1; |
4353a5c4 |
325 | case server_connecting: |
620c146d |
326 | pollfds_buf[1].events= POLLOUT; |
4353a5c4 |
327 | break; |
328 | case server_ok: |
609133ee |
329 | pollfds_buf[1].events= |
330 | ads->tcpsend.used ? POLLIN|POLLOUT|POLLPRI : POLLIN|POLLPRI; |
e062dcae |
331 | break; |
4353a5c4 |
332 | default: |
333 | abort(); |
334 | } |
620c146d |
335 | pollfds_buf[1].fd= ads->tcpsocket; |
620c146d |
336 | return 2; |
4353a5c4 |
337 | } |
338 | |
620c146d |
339 | int adns_processreadable(adns_state ads, int fd, const struct timeval *now) { |
70ad7a2a |
340 | int want, dgramlen, r, udpaddrlen, serv, old_skip; |
98a3f706 |
341 | byte udpbuf[DNS_MAXUDP]; |
37e28fde |
342 | struct sockaddr_in udpaddr; |
620c146d |
343 | |
28de6442 |
344 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
345 | |
ddfda861 |
346 | switch (ads->tcpstate) { |
347 | case server_disconnected: |
fb901bf5 |
348 | case server_broken: |
ddfda861 |
349 | case server_connecting: |
ddfda861 |
350 | break; |
351 | case server_ok: |
620c146d |
352 | if (fd != ads->tcpsocket) break; |
70ad7a2a |
353 | assert(!ads->tcprecv_skip); |
428bd682 |
354 | do { |
70ad7a2a |
355 | if (ads->tcprecv.used >= ads->tcprecv_skip+2) { |
356 | dgramlen= ((ads->tcprecv.buf[ads->tcprecv_skip]<<8) | |
357 | ads->tcprecv.buf[ads->tcprecv_skip+1]); |
358 | if (ads->tcprecv.used >= ads->tcprecv_skip+2+dgramlen) { |
359 | old_skip= ads->tcprecv_skip; |
360 | ads->tcprecv_skip += 2+dgramlen; |
361 | adns__procdgram(ads, ads->tcprecv.buf+old_skip+2, |
362 | dgramlen, ads->tcpserver, 1,*now); |
363 | continue; |
656b2da9 |
364 | } else { |
70ad7a2a |
365 | want= 2+dgramlen; |
656b2da9 |
366 | } |
70ad7a2a |
367 | } else { |
368 | want= 2; |
656b2da9 |
369 | } |
70ad7a2a |
370 | ads->tcprecv.used -= ads->tcprecv_skip; |
609133ee |
371 | memmove(ads->tcprecv.buf, ads->tcprecv.buf+ads->tcprecv_skip, |
372 | ads->tcprecv.used); |
70ad7a2a |
373 | ads->tcprecv_skip= 0; |
3e2e5fab |
374 | if (!adns__vbuf_ensure(&ads->tcprecv,want)) { r= ENOMEM; goto xit; } |
620c146d |
375 | assert(ads->tcprecv.used <= ads->tcprecv.avail); |
376 | if (ads->tcprecv.used == ads->tcprecv.avail) continue; |
377 | r= read(ads->tcpsocket, |
378 | ads->tcprecv.buf+ads->tcprecv.used, |
379 | ads->tcprecv.avail-ads->tcprecv.used); |
380 | if (r>0) { |
381 | ads->tcprecv.used+= r; |
382 | } else { |
383 | if (r) { |
3e2e5fab |
384 | if (errno==EAGAIN || errno==EWOULDBLOCK) { r= 0; goto xit; } |
620c146d |
385 | if (errno==EINTR) continue; |
3e2e5fab |
386 | if (errno_resources(errno)) { r= errno; goto xit; } |
656b2da9 |
387 | } |
620c146d |
388 | adns__tcp_broken(ads,"read",r?strerror(errno):"closed"); |
656b2da9 |
389 | } |
428bd682 |
390 | } while (ads->tcpstate == server_ok); |
391 | r= 0; goto xit; |
ddfda861 |
392 | default: |
393 | abort(); |
656b2da9 |
394 | } |
620c146d |
395 | if (fd == ads->udpsocket) { |
37e28fde |
396 | for (;;) { |
397 | udpaddrlen= sizeof(udpaddr); |
eec1d9c8 |
398 | r= recvfrom(ads->udpsocket,udpbuf,sizeof(udpbuf),0, |
399 | (struct sockaddr*)&udpaddr,&udpaddrlen); |
37e28fde |
400 | if (r<0) { |
3e2e5fab |
401 | if (errno == EAGAIN || errno == EWOULDBLOCK) { r= 0; goto xit; } |
620c146d |
402 | if (errno == EINTR) continue; |
3e2e5fab |
403 | if (errno_resources(errno)) { r= errno; goto xit; } |
620c146d |
404 | adns__warn(ads,-1,0,"datagram receive error: %s",strerror(errno)); |
3e2e5fab |
405 | r= 0; goto xit; |
37e28fde |
406 | } |
407 | if (udpaddrlen != sizeof(udpaddr)) { |
68442019 |
408 | adns__diag(ads,-1,0,"datagram received with wrong address length %d" |
5a0be244 |
409 | " (expected %lu)", udpaddrlen, |
410 | (unsigned long)sizeof(udpaddr)); |
37e28fde |
411 | continue; |
412 | } |
413 | if (udpaddr.sin_family != AF_INET) { |
68442019 |
414 | adns__diag(ads,-1,0,"datagram received with wrong protocol family" |
4353a5c4 |
415 | " %u (expected %u)",udpaddr.sin_family,AF_INET); |
37e28fde |
416 | continue; |
417 | } |
98a3f706 |
418 | if (ntohs(udpaddr.sin_port) != DNS_PORT) { |
609133ee |
419 | adns__diag(ads,-1,0,"datagram received from wrong port" |
420 | " %u (expected %u)", ntohs(udpaddr.sin_port),DNS_PORT); |
37e28fde |
421 | continue; |
422 | } |
423 | for (serv= 0; |
424 | serv < ads->nservers && |
425 | ads->servers[serv].addr.s_addr != udpaddr.sin_addr.s_addr; |
426 | serv++); |
427 | if (serv >= ads->nservers) { |
68442019 |
428 | adns__warn(ads,-1,0,"datagram received from unknown nameserver %s", |
4353a5c4 |
429 | inet_ntoa(udpaddr.sin_addr)); |
37e28fde |
430 | continue; |
431 | } |
ebf4877a |
432 | adns__procdgram(ads,udpbuf,r,serv,0,*now); |
656b2da9 |
433 | } |
37e28fde |
434 | } |
3e2e5fab |
435 | r= 0; |
436 | xit: |
28de6442 |
437 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
438 | return r; |
656b2da9 |
439 | } |
656b2da9 |
440 | |
620c146d |
441 | int adns_processwriteable(adns_state ads, int fd, const struct timeval *now) { |
656b2da9 |
442 | int r; |
620c146d |
443 | |
28de6442 |
444 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
445 | |
620c146d |
446 | switch (ads->tcpstate) { |
447 | case server_disconnected: |
fb901bf5 |
448 | case server_broken: |
620c146d |
449 | break; |
450 | case server_connecting: |
451 | if (fd != ads->tcpsocket) break; |
452 | assert(ads->tcprecv.used==0); |
70ad7a2a |
453 | assert(ads->tcprecv_skip==0); |
620c146d |
454 | for (;;) { |
3e2e5fab |
455 | if (!adns__vbuf_ensure(&ads->tcprecv,1)) { r= ENOMEM; goto xit; } |
620c146d |
456 | r= read(ads->tcpsocket,&ads->tcprecv.buf,1); |
457 | if (r==0 || (r<0 && (errno==EAGAIN || errno==EWOULDBLOCK))) { |
458 | tcp_connected(ads,*now); |
3e2e5fab |
459 | r= 0; goto xit; |
620c146d |
460 | } |
461 | if (r>0) { |
462 | adns__tcp_broken(ads,"connect/read","sent data before first request"); |
3e2e5fab |
463 | r= 0; goto xit; |
620c146d |
464 | } |
465 | if (errno==EINTR) continue; |
3e2e5fab |
466 | if (errno_resources(errno)) { r= errno; goto xit; } |
620c146d |
467 | adns__tcp_broken(ads,"connect/read",strerror(errno)); |
3e2e5fab |
468 | r= 0; goto xit; |
620c146d |
469 | } /* not reached */ |
470 | case server_ok: |
fb901bf5 |
471 | if (fd != ads->tcpsocket) break; |
472 | while (ads->tcpsend.used) { |
620c146d |
473 | adns__sigpipe_protect(ads); |
474 | r= write(ads->tcpsocket,ads->tcpsend.buf,ads->tcpsend.used); |
475 | adns__sigpipe_unprotect(ads); |
476 | if (r<0) { |
477 | if (errno==EINTR) continue; |
3e2e5fab |
478 | if (errno==EAGAIN || errno==EWOULDBLOCK) { r= 0; goto xit; } |
479 | if (errno_resources(errno)) { r= errno; goto xit; } |
620c146d |
480 | adns__tcp_broken(ads,"write",strerror(errno)); |
3e2e5fab |
481 | r= 0; goto xit; |
620c146d |
482 | } else if (r>0) { |
483 | ads->tcpsend.used -= r; |
484 | memmove(ads->tcpsend.buf,ads->tcpsend.buf+r,ads->tcpsend.used); |
485 | } |
fb901bf5 |
486 | } |
487 | r= 0; |
488 | goto xit; |
620c146d |
489 | default: |
490 | abort(); |
491 | } |
3e2e5fab |
492 | r= 0; |
493 | xit: |
28de6442 |
494 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
495 | return r; |
620c146d |
496 | } |
497 | |
609133ee |
498 | int adns_processexceptional(adns_state ads, int fd, |
499 | const struct timeval *now) { |
28de6442 |
500 | adns__consistency(ads,0,cc_entex); |
620c146d |
501 | switch (ads->tcpstate) { |
502 | case server_disconnected: |
fb901bf5 |
503 | case server_broken: |
620c146d |
504 | break; |
505 | case server_connecting: |
506 | case server_ok: |
507 | if (fd != ads->tcpsocket) break; |
508 | adns__tcp_broken(ads,"poll/select","exceptional condition detected"); |
3e2e5fab |
509 | break; |
620c146d |
510 | default: |
511 | abort(); |
512 | } |
28de6442 |
513 | adns__consistency(ads,0,cc_entex); |
620c146d |
514 | return 0; |
515 | } |
37e28fde |
516 | |
620c146d |
517 | static void fd_event(adns_state ads, int fd, |
518 | int revent, int pollflag, |
519 | int maxfd, const fd_set *fds, |
609133ee |
520 | int (*func)(adns_state, int fd, |
521 | const struct timeval *now), |
620c146d |
522 | struct timeval now, int *r_r) { |
656b2da9 |
523 | int r; |
620c146d |
524 | |
525 | if (!(revent & pollflag)) return; |
526 | if (fds && !(fd<maxfd && FD_ISSET(fd,fds))) return; |
527 | r= func(ads,fd,&now); |
528 | if (r) { |
529 | if (r_r) { |
530 | *r_r= r; |
531 | } else { |
609133ee |
532 | adns__diag(ads,-1,0,"process fd failed after select:" |
533 | " %s",strerror(errno)); |
620c146d |
534 | adns_globalsystemfailure(ads); |
535 | } |
536 | } |
537 | } |
538 | |
539 | void adns__fdevents(adns_state ads, |
540 | const struct pollfd *pollfds, int npollfds, |
541 | int maxfd, const fd_set *readfds, |
542 | const fd_set *writefds, const fd_set *exceptfds, |
543 | struct timeval now, int *r_r) { |
544 | int i, fd, revents; |
545 | |
546 | for (i=0; i<npollfds; i++) { |
547 | fd= pollfds[i].fd; |
548 | if (fd >= maxfd) maxfd= fd+1; |
549 | revents= pollfds[i].revents; |
609133ee |
550 | #define EV(pollfl,fds,how) \ |
551 | fd_event(ads,fd, revents,pollfl, maxfd,fds, adns_process##how,now,r_r) |
552 | EV( POLLIN, readfds, readable ); |
553 | EV( POLLOUT, writefds, writeable ); |
554 | EV( POLLPRI, exceptfds, exceptional ); |
555 | #undef EV |
620c146d |
556 | } |
557 | } |
37e28fde |
558 | |
620c146d |
559 | /* Wrappers for select(2). */ |
560 | |
561 | void adns_beforeselect(adns_state ads, int *maxfd_io, fd_set *readfds_io, |
562 | fd_set *writefds_io, fd_set *exceptfds_io, |
563 | struct timeval **tv_mod, struct timeval *tv_tobuf, |
564 | const struct timeval *now) { |
565 | struct timeval tv_nowbuf; |
566 | struct pollfd pollfds[MAX_POLLFDS]; |
567 | int i, fd, maxfd, npollfds; |
568 | |
28de6442 |
569 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
570 | |
620c146d |
571 | if (tv_mod && (!*tv_mod || (*tv_mod)->tv_sec || (*tv_mod)->tv_usec)) { |
572 | /* The caller is planning to sleep. */ |
573 | adns__must_gettimeofday(ads,&now,&tv_nowbuf); |
26cc07a3 |
574 | if (!now) { inter_immed(tv_mod,tv_tobuf); goto xit; } |
6c68a593 |
575 | adns__timeouts(ads, 0, tv_mod,tv_tobuf, *now); |
620c146d |
576 | } |
577 | |
578 | npollfds= adns__pollfds(ads,pollfds); |
579 | maxfd= *maxfd_io; |
580 | for (i=0; i<npollfds; i++) { |
581 | fd= pollfds[i].fd; |
582 | if (fd >= maxfd) maxfd= fd+1; |
583 | if (pollfds[i].events & POLLIN) FD_SET(fd,readfds_io); |
584 | if (pollfds[i].events & POLLOUT) FD_SET(fd,writefds_io); |
585 | if (pollfds[i].events & POLLPRI) FD_SET(fd,exceptfds_io); |
586 | } |
587 | *maxfd_io= maxfd; |
3e2e5fab |
588 | |
589 | xit: |
28de6442 |
590 | adns__consistency(ads,0,cc_entex); |
620c146d |
591 | } |
592 | |
593 | void adns_afterselect(adns_state ads, int maxfd, const fd_set *readfds, |
594 | const fd_set *writefds, const fd_set *exceptfds, |
595 | const struct timeval *now) { |
fc6a52ae |
596 | struct timeval tv_buf; |
620c146d |
597 | struct pollfd pollfds[MAX_POLLFDS]; |
fc6a52ae |
598 | int npollfds, i; |
620c146d |
599 | |
28de6442 |
600 | adns__consistency(ads,0,cc_entex); |
fc6a52ae |
601 | adns__must_gettimeofday(ads,&now,&tv_buf); |
3e2e5fab |
602 | if (!now) goto xit; |
620c146d |
603 | adns_processtimeouts(ads,now); |
604 | |
605 | npollfds= adns__pollfds(ads,pollfds); |
fc6a52ae |
606 | for (i=0; i<npollfds; i++) pollfds[i].revents= POLLIN|POLLOUT|POLLPRI; |
620c146d |
607 | adns__fdevents(ads, |
608 | pollfds,npollfds, |
609 | maxfd,readfds,writefds,exceptfds, |
610 | *now, 0); |
3e2e5fab |
611 | xit: |
28de6442 |
612 | adns__consistency(ads,0,cc_entex); |
620c146d |
613 | } |
614 | |
615 | /* General helpful functions. */ |
616 | |
617 | void adns_globalsystemfailure(adns_state ads) { |
28de6442 |
618 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
619 | |
f7f83b4a |
620 | while (ads->udpw.head) adns__query_fail(ads->udpw.head, adns_s_systemfail); |
621 | while (ads->tcpw.head) adns__query_fail(ads->tcpw.head, adns_s_systemfail); |
620c146d |
622 | |
623 | switch (ads->tcpstate) { |
624 | case server_connecting: |
625 | case server_ok: |
f7f83b4a |
626 | adns__tcp_broken(ads,0,0); |
620c146d |
627 | break; |
628 | case server_disconnected: |
fb901bf5 |
629 | case server_broken: |
620c146d |
630 | break; |
631 | default: |
632 | abort(); |
633 | } |
28de6442 |
634 | adns__consistency(ads,0,cc_entex); |
656b2da9 |
635 | } |
636 | |
620c146d |
637 | int adns_processany(adns_state ads) { |
aedf10f2 |
638 | int r, i; |
620c146d |
639 | struct timeval now; |
640 | struct pollfd pollfds[MAX_POLLFDS]; |
641 | int npollfds; |
642 | |
28de6442 |
643 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
644 | |
620c146d |
645 | r= gettimeofday(&now,0); |
646 | if (!r) adns_processtimeouts(ads,&now); |
647 | |
25913ee2 |
648 | /* We just use adns__fdevents to loop over the fd's trying them. |
649 | * This seems more sensible than calling select, since we're most |
650 | * likely just to want to do a read on one or two fds anyway. |
651 | */ |
620c146d |
652 | npollfds= adns__pollfds(ads,pollfds); |
1ed3dba4 |
653 | for (i=0; i<npollfds; i++) pollfds[i].revents= pollfds[i].events & ~POLLPRI; |
620c146d |
654 | adns__fdevents(ads, |
655 | pollfds,npollfds, |
656 | 0,0,0,0, |
657 | now,&r); |
3e2e5fab |
658 | |
28de6442 |
659 | adns__consistency(ads,0,cc_entex); |
c118a725 |
660 | return 0; |
620c146d |
661 | } |
ddfda861 |
662 | |
4353a5c4 |
663 | void adns__autosys(adns_state ads, struct timeval now) { |
ddfda861 |
664 | if (ads->iflags & adns_if_noautosys) return; |
620c146d |
665 | adns_processany(ads); |
ddfda861 |
666 | } |
667 | |
940356bd |
668 | int adns__internal_check(adns_state ads, |
669 | adns_query *query_io, |
670 | adns_answer **answer, |
671 | void **context_r) { |
656b2da9 |
672 | adns_query qu; |
673 | |
674 | qu= *query_io; |
675 | if (!qu) { |
4ae90a83 |
676 | if (ads->output.head) { |
677 | qu= ads->output.head; |
f7f83b4a |
678 | } else if (ads->udpw.head || ads->tcpw.head) { |
4ae90a83 |
679 | return EAGAIN; |
680 | } else { |
681 | return ESRCH; |
682 | } |
656b2da9 |
683 | } else { |
226c5eef |
684 | if (qu->id>=0) return EAGAIN; |
656b2da9 |
685 | } |
686 | LIST_UNLINK(ads->output,qu); |
8e5b0abb |
687 | *answer= qu->answer; |
a6536d8b |
688 | if (context_r) *context_r= qu->ctx.ext; |
8ce38e76 |
689 | *query_io= qu; |
656b2da9 |
690 | free(qu); |
691 | return 0; |
692 | } |
693 | |
694 | int adns_wait(adns_state ads, |
695 | adns_query *query_io, |
696 | adns_answer **answer_r, |
697 | void **context_r) { |
620c146d |
698 | int r, maxfd, rsel; |
656b2da9 |
699 | fd_set readfds, writefds, exceptfds; |
26cc07a3 |
700 | struct timeval tvbuf, *tvp; |
656b2da9 |
701 | |
28de6442 |
702 | adns__consistency(ads,*query_io,cc_entex); |
656b2da9 |
703 | for (;;) { |
940356bd |
704 | r= adns__internal_check(ads,query_io,answer_r,context_r); |
226c5eef |
705 | if (r != EAGAIN) break; |
656b2da9 |
706 | maxfd= 0; tvp= 0; |
37e28fde |
707 | FD_ZERO(&readfds); FD_ZERO(&writefds); FD_ZERO(&exceptfds); |
620c146d |
708 | adns_beforeselect(ads,&maxfd,&readfds,&writefds,&exceptfds,&tvp,&tvbuf,0); |
4fad263d |
709 | assert(tvp); |
656b2da9 |
710 | rsel= select(maxfd,&readfds,&writefds,&exceptfds,tvp); |
88372443 |
711 | if (rsel==-1) { |
620c146d |
712 | if (errno == EINTR) { |
3e2e5fab |
713 | if (ads->iflags & adns_if_eintr) { r= EINTR; break; } |
620c146d |
714 | } else { |
715 | adns__diag(ads,-1,0,"select failed in wait: %s",strerror(errno)); |
716 | adns_globalsystemfailure(ads); |
717 | } |
718 | } else { |
719 | assert(rsel >= 0); |
720 | adns_afterselect(ads,maxfd,&readfds,&writefds,&exceptfds,0); |
88372443 |
721 | } |
656b2da9 |
722 | } |
28de6442 |
723 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
724 | return r; |
656b2da9 |
725 | } |
726 | |
727 | int adns_check(adns_state ads, |
728 | adns_query *query_io, |
729 | adns_answer **answer_r, |
730 | void **context_r) { |
4353a5c4 |
731 | struct timeval now; |
732 | int r; |
733 | |
28de6442 |
734 | adns__consistency(ads,*query_io,cc_entex); |
620c146d |
735 | r= gettimeofday(&now,0); |
736 | if (!r) adns__autosys(ads,now); |
3e2e5fab |
737 | |
940356bd |
738 | r= adns__internal_check(ads,query_io,answer_r,context_r); |
28de6442 |
739 | adns__consistency(ads,0,cc_entex); |
3e2e5fab |
740 | return r; |
656b2da9 |
741 | } |