Threads are just such a bad idea…
[apps/pfixtools.git] / main-postlicyd.c
index e31999d..1e1ce4d 100644 (file)
@@ -37,7 +37,7 @@
 
 #include "buffer.h"
 #include "common.h"
-#include "threads.h"
+#include "epoll.h"
 #include "tokens.h"
 
 #define DAEMON_NAME             "postlicyd"
@@ -87,8 +87,37 @@ typedef struct query_t {
     const char *encryption_cipher;
     const char *encryption_keysize;
     const char *etrn_domain;
+
+    const char *eoq;
 } query_t;
 
+typedef struct plicyd_t {
+    unsigned listener : 1;
+    int fd;
+    buffer_t ibuf;
+    buffer_t obuf;
+    query_t q;
+} plicyd_t;
+
+
+static plicyd_t *plicyd_new(void)
+{
+    plicyd_t *plicyd = p_new(plicyd_t, 1);
+    plicyd->fd = -1;
+    return plicyd;
+}
+
+static void plicyd_delete(plicyd_t **plicyd)
+{
+    if (*plicyd) {
+        if ((*plicyd)->fd >= 0)
+            close((*plicyd)->fd);
+        buffer_wipe(&(*plicyd)->ibuf);
+        buffer_wipe(&(*plicyd)->obuf);
+        p_delete(plicyd);
+    }
+}
+
 static int postfix_parsejob(query_t *query, char *p)
 {
 #define PARSE_CHECK(expr, error, ...)                                        \
@@ -183,46 +212,88 @@ static int postfix_parsejob(query_t *query, char *p)
 #undef PARSE_CHECK
 }
 
-static void *policy_run(int fd, void *data)
+__attribute__((format(printf,2,0)))
+static void policy_answer(plicyd_t *pcy, const char *fmt, ...)
 {
-    buffer_t buf;
+    va_list args;
+    va_start(args, fmt);
+    buffer_addvf(&pcy->obuf, fmt, args);
+    va_end(args);
+    buffer_addstr(&pcy->obuf, "\n\n");
+    buffer_consume(&pcy->ibuf, pcy->q.eoq - pcy->ibuf.data);
+    epoll_modify(pcy->fd, EPOLLIN | EPOLLOUT, pcy);
+}
 
-    buffer_init(&buf);
-    for (;;) {
-        ssize_t search_offs = MAX(0, buf.len - 1);
-        int nb = buffer_read(&buf, fd, -1);
-        const char *eoq;
-        query_t q;
+static void policy_process(plicyd_t *pcy)
+{
+    policy_answer(pcy, "DUNNO");
+}
 
-        if (nb < 0) {
-            if (errno == EAGAIN || errno == EINTR)
-                continue;
-            UNIXERR("read");
-            break;
-        }
-        if (nb == 0) {
-            if (buf.len)
-                syslog(LOG_ERR, "unexpected end of data");
-            break;
-        }
+static int policy_run(plicyd_t *pcy)
+{
+    ssize_t search_offs = MAX(0, pcy->ibuf.len - 1);
+    int nb = buffer_read(&pcy->ibuf, pcy->fd, -1);
+    const char *eoq;
+
+    if (nb < 0) {
+        if (errno == EAGAIN || errno == EINTR)
+            return 0;
+        UNIXERR("read");
+        return -1;
+    }
+    if (nb == 0) {
+        if (pcy->ibuf.len)
+            syslog(LOG_ERR, "unexpected end of data");
+        return -1;
+    }
 
-        eoq = strstr(buf.data + search_offs, "\n\n");
-        if (!eoq)
-            continue;
+    if (!(eoq = strstr(pcy->ibuf.data + search_offs, "\n\n")))
+        return 0;
 
-        if (postfix_parsejob(&q, buf.data) < 0)
-            break;
+    if (postfix_parsejob(&pcy->q, pcy->ibuf.data) < 0)
+        return -1;
+    pcy->q.eoq = eoq + strlen("\n\n");
+    epoll_modify(pcy->fd, 0, pcy);
+    policy_process(pcy);
+    return 0;
+}
 
-        buffer_consume(&buf, eoq + strlen("\n\n") - buf.data);
-        if (xwrite(fd, "DUNNO\n\n", strlen("DUNNO\n\n"))) {
-            UNIXERR("write");
-            break;
-        }
+int start_listener(int port)
+{
+    struct sockaddr_in addr = {
+        .sin_family = AF_INET,
+        .sin_addr   = { htonl(INADDR_LOOPBACK) },
+    };
+    plicyd_t *tmp;
+    int sock;
+
+    addr.sin_port = htons(port);
+    sock = tcp_listen_nonblock((const struct sockaddr *)&addr, sizeof(addr));
+    if (sock < 0) {
+        return -1;
     }
-    buffer_wipe(&buf);
 
-    close(fd);
-    return NULL;
+    tmp           = plicyd_new();
+    tmp->fd       = sock;
+    tmp->listener = true;
+    epoll_register(sock, EPOLLIN, tmp);
+    return 0;
+}
+
+void start_client(plicyd_t *d)
+{
+    plicyd_t *tmp;
+    int sock;
+
+    sock = accept_nonblock(d->fd);
+    if (sock < 0) {
+        UNIXERR("accept");
+        return;
+    }
+
+    tmp     = plicyd_new();
+    tmp->fd = sock;
+    epoll_register(sock, EPOLLIN, tmp);
 }
 
 /* administrivia {{{ */
@@ -262,14 +333,9 @@ void usage(void)
 
 int main(int argc, char *argv[])
 {
-    struct sockaddr_in addr = {
-        .sin_family = AF_INET,
-        .sin_addr   = { htonl(INADDR_LOOPBACK) },
-    };
     const char *pidfile = NULL;
     bool daemonize = true;
     int port = DEFAULT_PORT;
-    int sock = -1;
 
     for (int c = 0; (c = getopt(argc, argv, "hf" "l:p:")) >= 0; ) {
         switch (c) {
@@ -310,40 +376,49 @@ int main(int argc, char *argv[])
 
     pidfile_refresh();
 
-    addr.sin_port = htons(port);
-    sock = tcp_listen_nonblock((struct sockaddr *)&addr, sizeof(addr));
-    if (sock < 0)
+    if (start_listener(port) < 0)
         return EXIT_FAILURE;
 
     while (!sigint) {
-        fd_set rfd;
-        struct timeval tv = { 1, 0 };
-        int res;
+        struct epoll_event evts[1024];
+        int n;
 
-        FD_SET(sock, &rfd);
-        res = select(sock + 1, &rfd, NULL, NULL, &tv);
-
-        if (res < 0) {
-            if (errno != EINTR && errno != EAGAIN) {
-                UNIXERR("select");
+        n = epoll_select(evts, countof(evts), -1);
+        if (n < 0) {
+            if (errno != EAGAIN && errno != EINTR) {
+                UNIXERR("epoll_wait");
                 return EXIT_FAILURE;
             }
+            continue;
         }
-        if (res > 0) {
-            int fd = accept(sock, NULL, 0);
-            if (fd < 0) {
-                if (errno != EINTR && errno != EAGAIN) {
-                    UNIXERR("accept");
-                    return EXIT_FAILURE;
-                }
+
+        while (--n >= 0) {
+            plicyd_t *d = evts[n].data.ptr;
+
+            if (d->listener) {
+                start_client(d);
                 continue;
             }
-            thread_launch(policy_run, fd, NULL);
+
+            if (evts[n].events & EPOLLIN) {
+                if (policy_run(d) < 0) {
+                    plicyd_delete(&d);
+                    continue;
+                }
+            }
+
+            if ((evts[n].events & EPOLLOUT) && d->obuf.len) {
+                if (buffer_write(&d->obuf, d->fd) < 0) {
+                    plicyd_delete(&d);
+                    continue;
+                }
+                if (!d->obuf.len) {
+                    epoll_modify(d->fd, EPOLLIN, d);
+                }
+            }
         }
-        threads_join();
     }
 
-    close(sock);
     syslog(LOG_INFO, "Stopping...");
     return EXIT_SUCCESS;
 }