2 * Copyright (c) 2007-2012 Niels Provos and Nick Mathewson
3 * Copyright (c) 2002-2006 Niels Provos <provos@citi.umich.edu>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * 3. The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 #include "event2/event-config.h"
30 #include "evconfig-private.h"
32 #include <sys/types.h>
34 #ifdef EVENT__HAVE_SYS_TIME_H
42 #ifdef EVENT__HAVE_STDARG_H
45 #ifdef EVENT__HAVE_UNISTD_H
54 #ifdef EVENT__HAVE_SYS_SOCKET_H
55 #include <sys/socket.h>
57 #ifdef EVENT__HAVE_NETINET_IN_H
58 #include <netinet/in.h>
60 #ifdef EVENT__HAVE_NETINET_IN6_H
61 #include <netinet/in6.h>
64 #include "event2/util.h"
65 #include "event2/bufferevent.h"
66 #include "event2/buffer.h"
67 #include "event2/bufferevent_struct.h"
68 #include "event2/bufferevent_compat.h"
69 #include "event2/event.h"
70 #include "log-internal.h"
71 #include "mm-internal.h"
72 #include "bufferevent-internal.h"
73 #include "util-internal.h"
75 #include "iocp-internal.h"
79 static int be_socket_enable(struct bufferevent *, short);
80 static int be_socket_disable(struct bufferevent *, short);
81 static void be_socket_destruct(struct bufferevent *);
82 static int be_socket_flush(struct bufferevent *, short, enum bufferevent_flush_mode);
83 static int be_socket_ctrl(struct bufferevent *, enum bufferevent_ctrl_op, union bufferevent_ctrl_data *);
85 static void be_socket_setfd(struct bufferevent *, evutil_socket_t);
87 const struct bufferevent_ops bufferevent_ops_socket = {
89 evutil_offsetof(struct bufferevent_private, bev),
94 bufferevent_generic_adj_existing_timeouts_,
99 const struct sockaddr*
100 bufferevent_socket_get_conn_address_(struct bufferevent *bev)
102 struct bufferevent_private *bev_p = BEV_UPCAST(bev);
103 return (struct sockaddr *)&bev_p->conn_address;
107 bufferevent_socket_set_conn_address_fd_(struct bufferevent *bev,
110 struct bufferevent_private *bev_p = BEV_UPCAST(bev);
112 socklen_t len = sizeof(bev_p->conn_address);
114 struct sockaddr *addr = (struct sockaddr *)&bev_p->conn_address;
115 if (addr->sa_family != AF_UNSPEC)
116 getpeername(fd, addr, &len);
120 bufferevent_socket_set_conn_address_(struct bufferevent *bev,
121 struct sockaddr *addr, size_t addrlen)
123 struct bufferevent_private *bev_p = BEV_UPCAST(bev);
124 EVUTIL_ASSERT(addrlen <= sizeof(bev_p->conn_address));
125 memcpy(&bev_p->conn_address, addr, addrlen);
129 bufferevent_socket_outbuf_cb(struct evbuffer *buf,
130 const struct evbuffer_cb_info *cbinfo,
133 struct bufferevent *bufev = arg;
134 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
136 if (cbinfo->n_added &&
137 (bufev->enabled & EV_WRITE) &&
138 !event_pending(&bufev->ev_write, EV_WRITE, NULL) &&
139 !bufev_p->write_suspended) {
140 /* Somebody added data to the buffer, and we would like to
141 * write, and we were not writing. So, start writing. */
142 if (bufferevent_add_event_(&bufev->ev_write, &bufev->timeout_write) == -1) {
143 /* Should we log this? */
149 bufferevent_readcb(evutil_socket_t fd, short event, void *arg)
151 struct bufferevent *bufev = arg;
152 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
153 struct evbuffer *input;
155 short what = BEV_EVENT_READING;
156 ev_ssize_t howmuch = -1, readmax=-1;
158 bufferevent_incref_and_lock_(bufev);
160 if (event == EV_TIMEOUT) {
161 /* Note that we only check for event==EV_TIMEOUT. If
162 * event==EV_TIMEOUT|EV_READ, we can safely ignore the
163 * timeout, since a read has occurred */
164 what |= BEV_EVENT_TIMEOUT;
168 input = bufev->input;
171 * If we have a high watermark configured then we don't want to
172 * read more data than would make us reach the watermark.
174 if (bufev->wm_read.high != 0) {
175 howmuch = bufev->wm_read.high - evbuffer_get_length(input);
176 /* we somehow lowered the watermark, stop reading */
178 bufferevent_wm_suspend_read(bufev);
182 readmax = bufferevent_get_read_max_(bufev_p);
183 if (howmuch < 0 || howmuch > readmax) /* The use of -1 for "unlimited"
184 * uglifies this code. XXXX */
186 if (bufev_p->read_suspended)
189 evbuffer_unfreeze(input, 0);
190 res = evbuffer_read(input, fd, (int)howmuch); /* XXXX evbuffer_read would do better to take and return ev_ssize_t */
191 evbuffer_freeze(input, 0);
194 int err = evutil_socket_geterror(fd);
195 if (EVUTIL_ERR_RW_RETRIABLE(err))
197 if (EVUTIL_ERR_CONNECT_REFUSED(err)) {
198 bufev_p->connection_refused = 1;
202 what |= BEV_EVENT_ERROR;
203 } else if (res == 0) {
205 what |= BEV_EVENT_EOF;
211 bufferevent_decrement_read_buckets_(bufev_p, res);
213 /* Invoke the user callback - must always be called last */
214 bufferevent_trigger_nolock_(bufev, EV_READ, 0);
222 bufferevent_disable(bufev, EV_READ);
223 bufferevent_run_eventcb_(bufev, what, 0);
226 bufferevent_decref_and_unlock_(bufev);
230 bufferevent_writecb(evutil_socket_t fd, short event, void *arg)
232 struct bufferevent *bufev = arg;
233 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
235 short what = BEV_EVENT_WRITING;
237 ev_ssize_t atmost = -1;
239 bufferevent_incref_and_lock_(bufev);
241 if (event == EV_TIMEOUT) {
242 /* Note that we only check for event==EV_TIMEOUT. If
243 * event==EV_TIMEOUT|EV_WRITE, we can safely ignore the
244 * timeout, since a read has occurred */
245 what |= BEV_EVENT_TIMEOUT;
248 if (bufev_p->connecting) {
249 int c = evutil_socket_finished_connecting_(fd);
250 /* we need to fake the error if the connection was refused
251 * immediately - usually connection to localhost on BSD */
252 if (bufev_p->connection_refused) {
253 bufev_p->connection_refused = 0;
260 bufev_p->connecting = 0;
262 event_del(&bufev->ev_write);
263 event_del(&bufev->ev_read);
264 bufferevent_run_eventcb_(bufev, BEV_EVENT_ERROR, 0);
268 bufferevent_socket_set_conn_address_fd_(bufev, fd);
270 if (BEV_IS_ASYNC(bufev)) {
271 event_del(&bufev->ev_write);
272 bufferevent_async_set_connected_(bufev);
273 bufferevent_run_eventcb_(bufev,
274 BEV_EVENT_CONNECTED, 0);
278 bufferevent_run_eventcb_(bufev,
279 BEV_EVENT_CONNECTED, 0);
280 if (!(bufev->enabled & EV_WRITE) ||
281 bufev_p->write_suspended) {
282 event_del(&bufev->ev_write);
288 atmost = bufferevent_get_write_max_(bufev_p);
290 if (bufev_p->write_suspended)
293 if (evbuffer_get_length(bufev->output)) {
294 evbuffer_unfreeze(bufev->output, 1);
295 res = evbuffer_write_atmost(bufev->output, fd, atmost);
296 evbuffer_freeze(bufev->output, 1);
298 int err = evutil_socket_geterror(fd);
299 if (EVUTIL_ERR_RW_RETRIABLE(err))
301 what |= BEV_EVENT_ERROR;
302 } else if (res == 0) {
304 XXXX Actually, a 0 on write doesn't indicate
305 an EOF. An ECONNRESET might be more typical.
307 what |= BEV_EVENT_EOF;
312 bufferevent_decrement_write_buckets_(bufev_p, res);
315 if (evbuffer_get_length(bufev->output) == 0) {
316 event_del(&bufev->ev_write);
320 * Invoke the user callback if our buffer is drained or below the
323 if (res || !connected) {
324 bufferevent_trigger_nolock_(bufev, EV_WRITE, 0);
330 if (evbuffer_get_length(bufev->output) == 0) {
331 event_del(&bufev->ev_write);
336 bufferevent_disable(bufev, EV_WRITE);
337 bufferevent_run_eventcb_(bufev, what, 0);
340 bufferevent_decref_and_unlock_(bufev);
344 bufferevent_socket_new(struct event_base *base, evutil_socket_t fd,
347 struct bufferevent_private *bufev_p;
348 struct bufferevent *bufev;
351 if (base && event_base_get_iocp_(base))
352 return bufferevent_async_new_(base, fd, options);
355 if ((bufev_p = mm_calloc(1, sizeof(struct bufferevent_private)))== NULL)
358 if (bufferevent_init_common_(bufev_p, base, &bufferevent_ops_socket,
363 bufev = &bufev_p->bev;
364 evbuffer_set_flags(bufev->output, EVBUFFER_FLAG_DRAINS_TO_FD);
366 event_assign(&bufev->ev_read, bufev->ev_base, fd,
367 EV_READ|EV_PERSIST|EV_FINALIZE, bufferevent_readcb, bufev);
368 event_assign(&bufev->ev_write, bufev->ev_base, fd,
369 EV_WRITE|EV_PERSIST|EV_FINALIZE, bufferevent_writecb, bufev);
371 evbuffer_add_cb(bufev->output, bufferevent_socket_outbuf_cb, bufev);
373 evbuffer_freeze(bufev->input, 0);
374 evbuffer_freeze(bufev->output, 1);
380 bufferevent_socket_connect(struct bufferevent *bev,
381 const struct sockaddr *sa, int socklen)
383 struct bufferevent_private *bufev_p = BEV_UPCAST(bev);
390 bufferevent_incref_and_lock_(bev);
392 fd = bufferevent_getfd(bev);
396 fd = evutil_socket_(sa->sa_family,
397 SOCK_STREAM|EVUTIL_SOCK_NONBLOCK, 0);
404 if (bufferevent_async_can_connect_(bev)) {
405 bufferevent_setfd(bev, fd);
406 r = bufferevent_async_connect_(bev, fd, sa, socklen);
409 bufev_p->connecting = 1;
414 r = evutil_socket_connect_(&fd, sa, socklen);
419 /* ConnectEx() isn't always around, even when IOCP is enabled.
420 * Here, we borrow the socket object's write handler to fall back
421 * on a non-blocking connect() when ConnectEx() is unavailable. */
422 if (BEV_IS_ASYNC(bev)) {
423 event_assign(&bev->ev_write, bev->ev_base, fd,
424 EV_WRITE|EV_PERSIST|EV_FINALIZE, bufferevent_writecb, bev);
427 bufferevent_setfd(bev, fd);
429 if (! be_socket_enable(bev, EV_WRITE)) {
430 bufev_p->connecting = 1;
435 /* The connect succeeded already. How very BSD of it. */
437 bufev_p->connecting = 1;
438 bufferevent_trigger_nolock_(bev, EV_WRITE, BEV_OPT_DEFER_CALLBACKS);
445 evutil_closesocket(fd);
447 bufferevent_decref_and_unlock_(bev);
452 bufferevent_connect_getaddrinfo_cb(int result, struct evutil_addrinfo *ai,
455 struct bufferevent *bev = arg;
456 struct bufferevent_private *bev_p = BEV_UPCAST(bev);
460 bufferevent_unsuspend_write_(bev, BEV_SUSPEND_LOOKUP);
461 bufferevent_unsuspend_read_(bev, BEV_SUSPEND_LOOKUP);
463 bev_p->dns_request = NULL;
465 if (result == EVUTIL_EAI_CANCEL) {
466 bev_p->dns_error = result;
467 bufferevent_decref_and_unlock_(bev);
471 bev_p->dns_error = result;
472 bufferevent_run_eventcb_(bev, BEV_EVENT_ERROR, 0);
473 bufferevent_decref_and_unlock_(bev);
475 evutil_freeaddrinfo(ai);
479 /* XXX use the other addrinfos? */
480 bufferevent_socket_set_conn_address_(bev, ai->ai_addr, (int)ai->ai_addrlen);
481 r = bufferevent_socket_connect(bev, ai->ai_addr, (int)ai->ai_addrlen);
483 bufferevent_run_eventcb_(bev, BEV_EVENT_ERROR, 0);
484 bufferevent_decref_and_unlock_(bev);
485 evutil_freeaddrinfo(ai);
489 bufferevent_socket_connect_hostname(struct bufferevent *bev,
490 struct evdns_base *evdns_base, int family, const char *hostname, int port)
492 struct evutil_addrinfo hint;
493 memset(&hint, 0, sizeof(hint));
494 hint.ai_family = family;
495 hint.ai_protocol = IPPROTO_TCP;
496 hint.ai_socktype = SOCK_STREAM;
498 return bufferevent_socket_connect_hostname_hints(bev, evdns_base, &hint, hostname, port);
502 bufferevent_socket_connect_hostname_hints(struct bufferevent *bev,
503 struct evdns_base *evdns_base, const struct evutil_addrinfo *hints_in,
504 const char *hostname, int port)
507 struct bufferevent_private *bev_p =
508 EVUTIL_UPCAST(bev, struct bufferevent_private, bev);
510 if (hints_in->ai_family != AF_INET && hints_in->ai_family != AF_INET6 &&
511 hints_in->ai_family != AF_UNSPEC)
513 if (port < 1 || port > 65535)
517 bev_p->dns_error = 0;
519 evutil_snprintf(portbuf, sizeof(portbuf), "%d", port);
521 bufferevent_suspend_write_(bev, BEV_SUSPEND_LOOKUP);
522 bufferevent_suspend_read_(bev, BEV_SUSPEND_LOOKUP);
524 bufferevent_incref_(bev);
525 bev_p->dns_request = evutil_getaddrinfo_async_(evdns_base, hostname,
526 portbuf, hints_in, bufferevent_connect_getaddrinfo_cb, bev);
534 bufferevent_socket_get_dns_error(struct bufferevent *bev)
537 struct bufferevent_private *bev_p = BEV_UPCAST(bev);
540 rv = bev_p->dns_error;
547 * Create a new buffered event object.
549 * The read callback is invoked whenever we read new data.
550 * The write callback is invoked whenever the output buffer is drained.
551 * The error callback is invoked on a write/read error or on EOF.
553 * Both read and write callbacks maybe NULL. The error callback is not
554 * allowed to be NULL and have to be provided always.
558 bufferevent_new(evutil_socket_t fd,
559 bufferevent_data_cb readcb, bufferevent_data_cb writecb,
560 bufferevent_event_cb eventcb, void *cbarg)
562 struct bufferevent *bufev;
564 if (!(bufev = bufferevent_socket_new(NULL, fd, 0)))
567 bufferevent_setcb(bufev, readcb, writecb, eventcb, cbarg);
574 be_socket_enable(struct bufferevent *bufev, short event)
576 if (event & EV_READ &&
577 bufferevent_add_event_(&bufev->ev_read, &bufev->timeout_read) == -1)
579 if (event & EV_WRITE &&
580 bufferevent_add_event_(&bufev->ev_write, &bufev->timeout_write) == -1)
586 be_socket_disable(struct bufferevent *bufev, short event)
588 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
589 if (event & EV_READ) {
590 if (event_del(&bufev->ev_read) == -1)
593 /* Don't actually disable the write if we are trying to connect. */
594 if ((event & EV_WRITE) && ! bufev_p->connecting) {
595 if (event_del(&bufev->ev_write) == -1)
602 be_socket_destruct(struct bufferevent *bufev)
604 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
606 EVUTIL_ASSERT(BEV_IS_SOCKET(bufev));
608 fd = event_get_fd(&bufev->ev_read);
610 if ((bufev_p->options & BEV_OPT_CLOSE_ON_FREE) && fd >= 0)
611 EVUTIL_CLOSESOCKET(fd);
613 evutil_getaddrinfo_cancel_async_(bufev_p->dns_request);
617 be_socket_flush(struct bufferevent *bev, short iotype,
618 enum bufferevent_flush_mode mode)
625 be_socket_setfd(struct bufferevent *bufev, evutil_socket_t fd)
627 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
630 EVUTIL_ASSERT(BEV_IS_SOCKET(bufev));
632 event_del(&bufev->ev_read);
633 event_del(&bufev->ev_write);
635 evbuffer_unfreeze(bufev->input, 0);
636 evbuffer_unfreeze(bufev->output, 1);
638 event_assign(&bufev->ev_read, bufev->ev_base, fd,
639 EV_READ|EV_PERSIST|EV_FINALIZE, bufferevent_readcb, bufev);
640 event_assign(&bufev->ev_write, bufev->ev_base, fd,
641 EV_WRITE|EV_PERSIST|EV_FINALIZE, bufferevent_writecb, bufev);
644 bufferevent_enable(bufev, bufev->enabled);
646 evutil_getaddrinfo_cancel_async_(bufev_p->dns_request);
651 /* XXXX Should non-socket bufferevents support this? */
653 bufferevent_priority_set(struct bufferevent *bufev, int priority)
656 struct bufferevent_private *bufev_p = BEV_UPCAST(bufev);
659 if (BEV_IS_ASYNC(bufev) || BEV_IS_FILTER(bufev) || BEV_IS_PAIR(bufev))
662 if (event_priority_set(&bufev->ev_read, priority) == -1)
664 if (event_priority_set(&bufev->ev_write, priority) == -1)
667 event_deferred_cb_set_priority_(&bufev_p->deferred, priority);
675 /* XXXX Should non-socket bufferevents support this? */
677 bufferevent_base_set(struct event_base *base, struct bufferevent *bufev)
682 if (!BEV_IS_SOCKET(bufev))
685 bufev->ev_base = base;
687 res = event_base_set(base, &bufev->ev_read);
691 res = event_base_set(base, &bufev->ev_write);
698 be_socket_ctrl(struct bufferevent *bev, enum bufferevent_ctrl_op op,
699 union bufferevent_ctrl_data *data)
702 case BEV_CTRL_SET_FD:
703 be_socket_setfd(bev, data->fd);
705 case BEV_CTRL_GET_FD:
706 data->fd = event_get_fd(&bev->ev_read);
708 case BEV_CTRL_GET_UNDERLYING:
709 case BEV_CTRL_CANCEL_ALL: