1 /* Licensed under LGPLv2.1+ - see LICENSE file for details */
8 #include <sys/socket.h>
11 static size_t num_fds = 0, max_fds = 0, num_next = 0, num_finished = 0, num_waiting = 0;
12 static struct pollfd *pollfds = NULL;
13 static struct fd **fds = NULL;
14 static struct timers timeouts;
16 static bool add_fd(struct fd *fd, short events)
18 if (num_fds + 1 > max_fds) {
19 struct pollfd *newpollfds;
21 size_t num = max_fds ? max_fds * 2 : 8;
23 newpollfds = realloc(pollfds, sizeof(*newpollfds) * num);
27 newfds = realloc(fds, sizeof(*newfds) * num);
34 pollfds[num_fds].fd = fd->fd;
35 pollfds[num_fds].events = events;
36 pollfds[num_fds].revents = 0; /* In case we're iterating now */
38 fd->backend_info = num_fds;
43 static void del_fd(struct fd *fd)
45 size_t n = fd->backend_info;
49 if (n != num_fds - 1) {
50 /* Move last one over us. */
51 pollfds[n] = pollfds[num_fds-1];
52 fds[n] = fds[num_fds-1];
53 assert(fds[n]->backend_info == num_fds-1);
54 fds[n]->backend_info = n;
55 } else if (num_fds == 1) {
56 /* Free everything when no more fds. */
64 fd->backend_info = -1;
68 bool add_listener(struct io_listener *l)
70 if (!add_fd(&l->fd, POLLIN))
76 bool add_conn(struct io_conn *c)
78 if (!add_fd(&c->fd, 0))
84 bool add_duplex(struct io_conn *c)
86 c->fd.backend_info = c->duplex->fd.backend_info;
91 static void del_conn(struct io_conn *conn)
94 conn->finish(conn, conn->finish_arg);
95 if (timeout_active(conn))
96 backend_del_timeout(conn);
99 /* In case fds[] pointed to the other one. */
100 fds[conn->fd.backend_info] = &conn->duplex->fd;
101 conn->duplex->duplex = NULL;
104 if (conn->state == FINISHED)
106 else if (conn->state == NEXT)
110 void del_listener(struct io_listener *l)
115 void backend_set_state(struct io_conn *conn, struct io_plan *plan)
117 enum io_state state = from_ioplan(plan);
118 struct pollfd *pfd = &pollfds[conn->fd.backend_info];
123 pfd->events = conn->pollflag;
125 int mask = conn->duplex->pollflag;
126 /* You can't *both* read/write. */
127 assert(!mask || pfd->events != mask);
135 else if (state == FINISHED)
141 static void accept_conn(struct io_listener *l)
144 int fd = accept(l->fd.fd, NULL, NULL);
146 /* FIXME: What to do here? */
149 c = io_new_conn(fd, l->next, l->finish, l->conn_arg);
156 /* It's OK to miss some, as long as we make progress. */
157 static void finish_and_next(bool finished_only)
161 for (i = 0; !io_loop_return && i < num_fds; i++) {
162 struct io_conn *c, *duplex;
165 if (finished_only || num_next == 0)
168 if (fds[i]->listener)
171 for (duplex = c->duplex; c; c = duplex, duplex = NULL) {
172 if (c->state == FINISHED) {
176 } else if (!finished_only && c->state == NEXT) {
177 backend_set_state(c, c->next(c, c->next_arg));
184 static void ready(struct io_conn *c)
186 backend_set_state(c, do_ready(c));
189 void backend_add_timeout(struct io_conn *conn, struct timespec duration)
192 timers_init(&timeouts, time_now());
193 timer_add(&timeouts, &conn->timeout->timer,
194 time_add(time_now(), duration));
195 conn->timeout->conn = conn;
198 void backend_del_timeout(struct io_conn *conn)
200 assert(conn->timeout->conn == conn);
201 timer_del(&timeouts, &conn->timeout->timer);
202 conn->timeout->conn = NULL;
205 /* This is the main loop. */
210 while (!io_loop_return) {
211 int i, r, timeout = INT_MAX;
215 struct timespec first;
216 struct list_head expired;
217 struct io_timeout *t;
221 /* Call functions for expired timers. */
222 timers_expire(&timeouts, now, &expired);
223 while ((t = list_pop(&expired, struct io_timeout, timer.list))) {
224 struct io_conn *conn = t->conn;
225 /* Clear, in case timer re-adds */
227 backend_set_state(conn, t->next(conn, t->next_arg));
230 /* Now figure out how long to wait for the next one. */
231 if (timer_earliest(&timeouts, &first)) {
232 uint64_t f = time_to_msec(time_sub(first, now));
238 if (num_finished || num_next) {
239 finish_and_next(false);
240 /* Could have started/finished more. */
247 /* You can't tell them all to go to sleep! */
250 r = poll(pollfds, num_fds, timeout);
254 for (i = 0; i < num_fds && !io_loop_return; i++) {
255 struct io_conn *c = (void *)fds[i];
256 int events = pollfds[i].revents;
261 if (fds[i]->listener) {
262 if (events & POLLIN) {
263 accept_conn((void *)c);
266 } else if (events & (POLLIN|POLLOUT)) {
269 int mask = c->duplex->pollflag;
273 if (!(events&(POLLIN|POLLOUT)))
278 } else if (events & POLLHUP) {
280 backend_set_state(c, io_close(c, NULL));
282 backend_set_state(c->duplex,
290 finish_and_next(true);
292 ret = io_loop_return;
293 io_loop_return = NULL;