*/
#include "server.h"
-#include "epoll.h"
#include "common.h"
static PA(server_t) listeners = ARRAY_INIT;
static PA(server_t) server_pool = ARRAY_INIT;
+struct ev_loop *global_loop = NULL;
+static start_client_t client_start = NULL;
+static delete_client_t client_delete = NULL;
+static run_client_t client_run = NULL;
+static refresh_t config_refresh = NULL;
+static void *config_ptr = NULL;
+
static server_t* server_new(void)
{
server_t* server = p_new(server_t, 1);
server->fd = -1;
- server->fd2 = -1;
return server;
}
static void server_wipe(server_t *server)
{
- server->listener = server->event = false;
- if (server->fd > 0) {
+ if (server->fd >= 0) {
+ ev_io_stop(global_loop, &server->io);
close(server->fd);
server->fd = -1;
}
- if (server->fd2 > 0) {
- close(server->fd2);
- server->fd2 = -1;
- }
if (server->data && server->clear_data) {
server->clear_data(&server->data);
}
- array_shrink(server->ibuf, 512);
- array_shrink(server->obuf, 512);
}
-static void server_delete(server_t **server)
+void server_delete(server_t **server)
{
if (*server) {
buffer_wipe(&(*server)->ibuf);
}
}
-static void server_release(server_t *server)
+void server_release(server_t *server)
{
server_wipe(server);
array_add(server_pool, server);
}
+static int server_init(void)
+{
+ global_loop = ev_default_loop(0);
+ return 0;
+}
+
static void server_shutdown(void)
{
array_deep_wipe(listeners, server_delete);
array_deep_wipe(server_pool, server_delete);
}
-
+module_init(server_init);
module_exit(server_shutdown);
-int start_server(int port, start_listener_t starter, delete_client_t deleter)
+static void client_cb(EV_P_ struct ev_io *w, int events)
{
- struct sockaddr_in addr = {
- .sin_family = AF_INET,
- .sin_addr = { htonl(INADDR_LOOPBACK) },
- };
- server_t *tmp;
- void* data = NULL;
- int sock;
+ server_t *server = (server_t*)w;
- addr.sin_port = htons(port);
- sock = tcp_listen_nonblock((const struct sockaddr *)&addr, sizeof(addr));
- if (sock < 0) {
- return -1;
- }
+ debug("Entering client_cb for %p, %d (%d | %d)", w, events, EV_WRITE, EV_READ);
- if (starter) {
- data = starter();
- if (data == NULL) {
- close(sock);
- return -1;
- }
+ if (events & EV_WRITE && server->obuf.len) {
+ if (buffer_write(&server->obuf, server->fd) < 0) {
+ server_release(server);
+ return;
+ }
+ if (!server->obuf.len) {
+ ev_io_set(&server->io, server->fd, EV_READ);
+ }
}
- tmp = server_acquire();
- tmp->fd = sock;
- tmp->listener = true;
- tmp->data = data;
- tmp->clear_data = deleter;
- epoll_register(sock, EPOLLIN, tmp);
- array_add(listeners, tmp);
- return 0;
+ if (events & EV_READ) {
+ if (server->run(server, config_ptr) < 0) {
+ server_release(server);
+ return;
+ }
+ }
}
static int start_client(server_t *server, start_client_t starter,
- delete_client_t deleter)
+ run_client_t runner, delete_client_t deleter)
{
server_t *tmp;
void* data = NULL;
tmp = server_acquire();
tmp->fd = sock;
tmp->data = data;
+ tmp->run = runner;
tmp->clear_data = deleter;
- epoll_register(sock, EPOLLIN, tmp);
+ ev_io_init(&tmp->io, client_cb, tmp->fd, EV_READ);
+ ev_io_start(global_loop, &tmp->io);
return 0;
}
-int event_register(void *data)
+static void server_cb(EV_P_ struct ev_io *w, int events)
+{
+ server_t *server = (server_t*)w;
+ if (start_client(server, client_start, client_run, client_delete) != 0) {
+ ev_unloop(EV_A_ EVUNLOOP_ALL);
+ }
+}
+
+int start_server(int port, start_listener_t starter, delete_client_t deleter)
{
- int fds[2];
- if (pipe(fds) != 0) {
- UNIXERR("pipe");
+ struct sockaddr_in addr = {
+ .sin_family = AF_INET,
+ .sin_addr = { htonl(INADDR_LOOPBACK) },
+ };
+ server_t *tmp;
+ void* data = NULL;
+ int sock;
+
+ addr.sin_port = htons(port);
+ sock = tcp_listen_nonblock((const struct sockaddr *)&addr, sizeof(addr));
+ if (sock < 0) {
return -1;
}
- if (setnonblock(fds[0]) != 0) {
- close(fds[0]);
- close(fds[1]);
+
+ if (starter) {
+ data = starter();
+ if (data == NULL) {
+ close(sock);
return -1;
+ }
}
- server_t *tmp = server_acquire();
- tmp->event = true;
- tmp->fd = fds[0];
- tmp->fd2 = fds[1];
- tmp->data = data;
- epoll_register(fds[0], EPOLLIN, tmp);
- return tmp->fd2;
+ tmp = server_acquire();
+ tmp->fd = sock;
+ tmp->data = data;
+ tmp->run = NULL;
+ tmp->clear_data = deleter;
+ ev_io_init(&tmp->io, server_cb, tmp->fd, EV_READ);
+ ev_io_start(global_loop, &tmp->io);
+ array_add(listeners, tmp);
+ return 0;
}
-bool event_fire(int event)
+server_t *server_register(int fd, run_client_t runner, void *data)
{
- static const char *data = "";
- return write(event, data, 1) == 0;
+ if (fd < 0) {
+ return NULL;
+ }
+
+ server_t *tmp = server_acquire();
+ tmp->fd = fd;
+ tmp->data = data;
+ tmp->run = runner;
+ tmp->clear_data = NULL;
+ ev_io_init(&tmp->io, client_cb, tmp->fd, EV_READ);
+ ev_io_start(global_loop, &tmp->io);
+ return tmp;
}
-static bool event_cancel(int event)
+static void refresh_cb(EV_P_ struct ev_signal *w, int event)
{
- static char buff[1];
- while (true) {
- ssize_t res = read(event, buff, 64);
- if (res == -1 && errno != EAGAIN && errno != EINTR) {
- UNIXERR("read");
- return false;
- } else if (res == -1 && errno == EINTR) {
- continue;
- } else if (res != 1) {
- return true;
- }
+ if (!config_refresh(config_ptr)) {
+ ev_unloop(EV_A_ EVUNLOOP_ALL);
}
}
+static void exit_cb(EV_P_ struct ev_signal *w, int event)
+{
+ ev_unloop(EV_A_ EVUNLOOP_ALL);
+}
+
int server_loop(start_client_t starter, delete_client_t deleter,
- run_client_t runner, event_handler_t handler,
- refresh_t refresh, void* config) {
- info("entering processing loop");
- while (!sigint) {
- struct epoll_event evts[1024];
- int n;
-
- if (sighup && refresh) {
- sighup = false;
- info("refreshing...");
- if (!refresh(config)) {
- crit("error while refreshing configuration");
- return EXIT_FAILURE;
- }
- info("refresh done, processing loop restarts");
- }
+ run_client_t runner, refresh_t refresh, void* config)
+{
+ struct ev_signal ev_sighup;
+ struct ev_signal ev_sigint;
+ struct ev_signal ev_sigterm;
- n = epoll_select(evts, countof(evts), -1);
- if (n < 0) {
- if (errno != EAGAIN && errno != EINTR) {
- UNIXERR("epoll_wait");
- return EXIT_FAILURE;
- }
- continue;
- }
+ client_start = starter;
+ client_delete = deleter;
+ client_run = runner;
+ config_refresh = refresh;
+ config_ptr = config;
- while (--n >= 0) {
- server_t *d = evts[n].data.ptr;
-
- if (d->listener) {
- (void)start_client(d, starter, deleter);
- continue;
- } else if (d->event) {
- if (!event_cancel(d->fd)) {
- server_release(d);
- continue;
- }
- if (handler) {
- if (!handler(d->data, config)) {
- server_release(d);
- }
- }
- continue;
- }
-
- if (evts[n].events & EPOLLIN) {
- if (runner(d, config) < 0) {
- server_release(d);
- continue;
- }
- }
-
- if ((evts[n].events & EPOLLOUT) && d->obuf.len) {
- if (buffer_write(&d->obuf, d->fd) < 0) {
- server_release(d);
- continue;
- }
- if (!d->obuf.len) {
- epoll_modify(d->fd, EPOLLIN, d);
- }
- }
- }
+ if (refresh != NULL) {
+ ev_signal_init(&ev_sighup, refresh_cb, SIGHUP);
+ ev_signal_start(global_loop, &ev_sighup);
}
+ ev_signal_init(&ev_sigint, exit_cb, SIGINT);
+ ev_signal_start(global_loop, &ev_sigint);
+ ev_signal_init(&ev_sigterm, exit_cb, SIGTERM);
+ ev_signal_start(global_loop, &ev_sigterm);
+
+ info("entering processing loop");
+ ev_loop(global_loop, 0);
info("exit requested");
return EXIT_SUCCESS;
}