Cleanup source structure.

[apps/pfixtools.git] / common / server.c

diff --git a/common/server.c b/common/server.c
new file mode 100644 (file)
index 0000000..73c2888
--- /dev/null
+++ b/common/server.c
@@ -0,0 +1,179 @@
+/******************************************************************************/
+/*          pfixtools: a collection of postfix related tools                  */
+/*          ~~~~~~~~~                                                         */
+/*  ________________________________________________________________________  */
+/*                                                                            */
+/*  Redistribution and use in source and binary forms, with or without        */
+/*  modification, are permitted provided that the following conditions        */
+/*  are met:                                                                  */
+/*                                                                            */
+/*  1. Redistributions of source code must retain the above copyright         */
+/*     notice, this list of conditions and the following disclaimer.          */
+/*  2. Redistributions in binary form must reproduce the above copyright      */
+/*     notice, this list of conditions and the following disclaimer in the    */
+/*     documentation and/or other materials provided with the distribution.   */
+/*  3. The names of its contributors may not be used to endorse or promote    */
+/*     products derived from this software without specific prior written     */
+/*     permission.                                                            */
+/*                                                                            */
+/*  THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND   */
+/*  ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE     */
+/*  IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR        */
+/*  PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS    */
+/*  BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR    */
+/*  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF      */
+/*  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS  */
+/*  INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN   */
+/*  CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)   */
+/*  ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF    */
+/*  THE POSSIBILITY OF SUCH DAMAGE.                                           */
+/******************************************************************************/
+
+/*
+ * Copyright © 2008 Florent Bruneau
+ */
+
+#include "server.h"
+#include "epoll.h"
+
+static server_t *listeners[1024];
+static int listener_count = 0;
+
+
+static server_t* server_new(void)
+{
+    server_t* server = p_new(server_t, 1);
+    server->fd = -1;
+    return server;
+}
+
+static void server_delete(server_t **server)
+{
+    if (*server) {
+        if ((*server)->fd >= 0) {
+            close((*server)->fd);
+        }
+        if ((*server)->data && (*server)->clear_data) {
+            (*server)->clear_data(&(*server)->data);
+        }
+        buffer_wipe(&(*server)->ibuf);
+        buffer_wipe(&(*server)->obuf);
+        p_delete(server);
+    }
+}
+
+static void server_shutdown(void)
+{
+    for (int i = 0 ; i < listener_count ; ++i) {
+        server_delete(&listeners[i]);
+    }
+}
+
+module_exit(server_shutdown);
+
+int start_server(int port, start_listener_t starter, delete_client_t deleter)
+{
+    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 (starter) {
+      data = starter();
+      if (data == NULL) {
+        close(sock);
+        return -1;
+      }
+    }
+
+    tmp             = server_new();
+    tmp->fd         = sock;
+    tmp->listener   = true;
+    tmp->data       = data;
+    tmp->clear_data = deleter;
+    epoll_register(sock, EPOLLIN, tmp);
+    listeners[listener_count++] = tmp;
+    return 0;
+}
+
+static int start_client(server_t *server, start_client_t starter,
+                        delete_client_t deleter)
+{
+    server_t *tmp;
+    void* data = NULL;
+    int sock;
+
+    sock = accept_nonblock(server->fd);
+    if (sock < 0) {
+        UNIXERR("accept");
+        return -1;
+    }
+
+    if (starter) {
+        data = starter(server);
+        if (data == NULL) {
+            close(sock);
+            return -1;
+        }
+    }
+
+    tmp             = server_new();
+    tmp->fd         = sock;
+    tmp->data       = data;
+    tmp->clear_data = deleter;
+    epoll_register(sock, EPOLLIN, tmp);
+    return 0;
+}
+
+int server_loop(start_client_t starter, delete_client_t deleter,
+                run_client_t runner, void* config) {
+    while (!sigint) {
+        struct epoll_event evts[1024];
+        int n;
+
+        n = epoll_select(evts, countof(evts), -1);
+        if (n < 0) {
+            if (errno != EAGAIN && errno != EINTR) {
+                UNIXERR("epoll_wait");
+                return EXIT_FAILURE;
+            }
+            continue;
+        }
+
+        while (--n >= 0) {
+            server_t *d = evts[n].data.ptr;
+
+            if (d->listener) {
+                (void)start_client(d, starter, deleter);
+                continue;
+            }
+
+            if (evts[n].events & EPOLLIN) {
+                if (runner(d, config) < 0) {
+                    server_delete(&d);
+                    continue;
+                }
+            }
+
+            if ((evts[n].events & EPOLLOUT) && d->obuf.len) {
+                if (buffer_write(&d->obuf, d->fd) < 0) {
+                    server_delete(&d);
+                    continue;
+                }
+                if (!d->obuf.len) {
+                    epoll_modify(d->fd, EPOLLIN, d);
+                }
+            }
+        }
+    }
+    return EXIT_SUCCESS;
+}