Code

socket frontend: Read incoming commands into a buffer.
[sysdb.git] / src / frontend / sock.c
index fb79f105f686295c77ef4b8a332a47aa27f2840b..792c0e4601400a286cacd012381817bfe782e504 100644 (file)
 
 #include "utils/channel.h"
 #include "utils/llist.h"
+#include "utils/strbuf.h"
 
 #include <assert.h>
-
 #include <errno.h>
 
+#include <arpa/inet.h>
+
 #include <stdio.h>
 #include <stdlib.h>
 #include <string.h>
  */
 
 typedef struct {
+       sdb_object_t super;
+
+       /* connection and client information */
        int fd;
        struct sockaddr_storage client_addr;
        socklen_t client_addr_len;
-} connection_t;
 
-typedef struct {
-       sdb_object_t super;
-       connection_t conn;
+       /* read buffer */
+       sdb_strbuf_t *buf;
+
+       /* state information for the currently executed command */
+       uint32_t cmd;
+       uint32_t cmd_len;
 } connection_obj_t;
 #define CONN(obj) ((connection_obj_t *)(obj))
 
@@ -181,6 +188,7 @@ listener_destroy(listener_t *listener)
 
        if (listener->sock_fd >= 0)
                close(listener->sock_fd);
+       listener->sock_fd = -1;
 
        if (listener->address)
                free(listener->address);
@@ -232,6 +240,48 @@ listener_create(sdb_fe_socket_t *sock, const char *address)
        return listener;
 } /* listener_create */
 
+static int
+listener_listen(listener_t *listener)
+{
+       assert(listener);
+
+       /* try to reopen */
+       if (listener->sock_fd < 0)
+               if (listener_impls[listener->type].opener(listener))
+                       return -1;
+       assert(listener->sock_fd >= 0);
+
+       if (listen(listener->sock_fd, /* backlog = */ 32)) {
+               char buf[1024];
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to listen on socket %s: %s",
+                               listener->address, sdb_strerror(errno, buf, sizeof(buf)));
+               return -1;
+       }
+       return 0;
+} /* listener_listen */
+
+static void
+listener_close(listener_t *listener)
+{
+       assert(listener);
+
+       if (listener->sock_fd < 0)
+               return;
+
+       close(listener->sock_fd);
+       listener->sock_fd = -1;
+} /* listener_close */
+
+static void
+socket_close(sdb_fe_socket_t *sock)
+{
+       size_t i;
+
+       assert(sock);
+       for (i = 0; i < sock->listeners_num; ++i)
+               listener_close(sock->listeners + i);
+} /* socket_close */
+
 /*
  * private data types
  */
@@ -239,15 +289,22 @@ listener_create(sdb_fe_socket_t *sock, const char *address)
 static int
 connection_init(sdb_object_t *obj, va_list ap)
 {
-       connection_t *conn;
+       connection_obj_t *conn;
        int sock_fd;
        int sock_fl;
 
        assert(obj);
-       conn = &CONN(obj)->conn;
+       conn = CONN(obj);
 
        sock_fd = va_arg(ap, int);
 
+       CONN(obj)->buf = sdb_strbuf_create(/* size = */ 128);
+       if (! CONN(obj)->buf) {
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to allocate a read buffer "
+                               "for a new remote connection");
+               return -1;
+       }
+
        conn->client_addr_len = sizeof(conn->client_addr);
        conn->fd = accept(sock_fd, (struct sockaddr *)&conn->client_addr,
                        &conn->client_addr_len);
@@ -287,13 +344,16 @@ connection_init(sdb_object_t *obj, va_list ap)
 static void
 connection_destroy(sdb_object_t *obj)
 {
-       connection_t *conn;
+       connection_obj_t *conn;
 
        assert(obj);
-       conn = &CONN(obj)->conn;
+       conn = CONN(obj);
 
+       sdb_log(SDB_LOG_DEBUG, "frontend: Closing connection on fd=%i", conn->fd);
        close(conn->fd);
        conn->fd = -1;
+
+       sdb_strbuf_destroy(CONN(obj)->buf);
 } /* connection_destroy */
 
 static sdb_type_t connection_type = {
@@ -306,33 +366,64 @@ static sdb_type_t connection_type = {
  * connection handler functions
  */
 
-/* returns negative value on error, 0 on EOF, number of packets else */
+static uint32_t
+connection_get_int32(connection_obj_t *conn, size_t offset)
+{
+       const char *data;
+       uint32_t n;
+
+       assert(conn && (sdb_strbuf_len(conn->buf) >= offset + sizeof(uint32_t)));
+
+       data = sdb_strbuf_string(conn->buf);
+       memcpy(&n, data + offset, sizeof(n));
+       n = ntohl(n);
+       return n;
+} /* connection_get_int32 */
+
+static int
+command_handle(connection_obj_t *conn)
+{
+       assert(conn && conn->cmd && conn->cmd_len);
+       /* XXX */
+       sdb_strbuf_skip(conn->buf, conn->cmd_len);
+       return 0;
+} /* command_handle */
+
+/* initialize the connection state information */
 static int
-connection_read(int fd)
+command_init(connection_obj_t *conn)
+{
+       assert(conn && (! conn->cmd) && (! conn->cmd_len));
+
+       conn->cmd = connection_get_int32(conn, 0);
+       conn->cmd_len = connection_get_int32(conn, sizeof(uint32_t));
+       sdb_strbuf_skip(conn->buf, 2 * sizeof(uint32_t));
+       return 0;
+} /* command_init */
+
+/* returns negative value on error, 0 on EOF, number of octets else */
+static ssize_t
+connection_read(connection_obj_t *conn)
 {
-       int n = 0;
+       ssize_t n = 0;
 
        while (42) {
-               int32_t cmd;
                ssize_t status;
 
                errno = 0;
-               status = read(fd, &cmd, sizeof(cmd));
+               status = sdb_strbuf_read(conn->buf, conn->fd, 1024);
                if (status < 0) {
                        if ((errno == EAGAIN) || (errno == EWOULDBLOCK))
-                               return n + 1;
+                               return n;
                        return (int)status;
                }
                else if (! status) /* EOF */
-                       return 0;
+                       return n;
 
-               /* XXX */
-               sdb_log(SDB_LOG_DEBUG, "frontend: read command %i from fd=%i",
-                               cmd, fd);
-               ++n;
+               n += status;
        }
 
-       return n + 1;
+       return n;
 } /* connection_read */
 
 static void *
@@ -363,9 +454,27 @@ connection_handler(void *data)
                        continue;
                }
 
-               /* XXX */
-               sdb_log(SDB_LOG_INFO, "frontend: Data available on connection fd=%i\n",
-                               conn->conn.fd);
+               status = (int)connection_read(conn);
+               if (status <= 0) {
+                       /* error or EOF -> close connection */
+                       sdb_object_deref(SDB_OBJ(conn));
+                       continue;
+               }
+
+               if (conn->cmd_len && (sdb_strbuf_len(conn->buf) >= conn->cmd_len))
+                       command_handle(conn);
+               else if (sdb_strbuf_len(conn->buf) >= 2 * sizeof(int32_t))
+                       command_init(conn);
+
+               /* return the connection to the main loop */
+               if (sdb_llist_append(sock->open_connections, SDB_OBJ(conn))) {
+                       sdb_log(SDB_LOG_ERR, "frontend: Failed to re-append "
+                                       "connection %s to list of open connections",
+                                       SDB_OBJ(conn)->name);
+               }
+
+               /* pass ownership back to list; or destroy in case of an error */
+               sdb_object_deref(SDB_OBJ(conn));
        }
        return NULL;
 } /* connection_handler */
@@ -395,6 +504,43 @@ connection_accept(sdb_fe_socket_t *sock, listener_t *listener)
        return 0;
 } /* connection_accept */
 
+static int
+socket_handle_incoming(sdb_fe_socket_t *sock,
+               fd_set *ready, fd_set *exceptions)
+{
+       sdb_llist_iter_t *iter;
+       size_t i;
+
+       for (i = 0; i < sock->listeners_num; ++i) {
+               listener_t *listener = sock->listeners + i;
+               if (FD_ISSET(listener->sock_fd, ready))
+                       if (connection_accept(sock, listener))
+                               continue;
+       }
+
+       iter = sdb_llist_get_iter(sock->open_connections);
+       if (! iter) {
+               sdb_log(SDB_LOG_ERR, "frontend: Failed to acquire iterator "
+                               "for open connections");
+               return -1;
+       }
+
+       while (sdb_llist_iter_has_next(iter)) {
+               sdb_object_t *obj = sdb_llist_iter_get_next(iter);
+
+               if (FD_ISSET(CONN(obj)->fd, exceptions))
+                       sdb_log(SDB_LOG_INFO, "Exception on fd %d",
+                                       CONN(obj)->fd);
+
+               if (FD_ISSET(CONN(obj)->fd, ready)) {
+                       sdb_llist_iter_remove_current(iter);
+                       sdb_channel_write(sock->chan, &obj);
+               }
+       }
+       sdb_llist_iter_destroy(iter);
+       return 0;
+} /* socket_handle_incoming */
+
 /*
  * public API
  */
@@ -460,18 +606,15 @@ sdb_fe_sock_listen_and_serve(sdb_fe_socket_t *sock, sdb_fe_loop_t *loop)
        /* XXX: make the number of threads configurable */
        pthread_t handler_threads[5];
 
-       if ((! sock) || (! sock->listeners_num) || (! loop))
+       if ((! sock) || (! sock->listeners_num) || (! loop) || sock->chan)
                return -1;
 
        FD_ZERO(&sockets);
-
        for (i = 0; i < sock->listeners_num; ++i) {
                listener_t *listener = sock->listeners + i;
 
-               if (listen(listener->sock_fd, /* backlog = */ 32)) {
-                       char buf[1024];
-                       sdb_log(SDB_LOG_ERR, "frontend: Failed to listen on socket %s: %s",
-                                       listener->address, sdb_strerror(errno, buf, sizeof(buf)));
+               if (listener_listen(listener)) {
+                       socket_close(sock);
                        return -1;
                }
 
@@ -481,8 +624,10 @@ sdb_fe_sock_listen_and_serve(sdb_fe_socket_t *sock, sdb_fe_loop_t *loop)
        }
 
        sock->chan = sdb_channel_create(1024, sizeof(connection_obj_t *));
-       if (! sock->chan)
+       if (! sock->chan) {
+               socket_close(sock);
                return -1;
+       }
 
        memset(&handler_threads, 0, sizeof(handler_threads));
        /* XXX: error handling */
@@ -491,35 +636,33 @@ sdb_fe_sock_listen_and_serve(sdb_fe_socket_t *sock, sdb_fe_loop_t *loop)
                                connection_handler, /* arg = */ sock);
 
        while (loop->do_loop) {
+               struct timeval timeout = { 1, 0 }; /* one second */
+               sdb_llist_iter_t *iter;
+
+               int max_fd = max_listen_fd;
                fd_set ready;
                fd_set exceptions;
-               int max_fd;
                int n;
 
-               struct timeval timeout = { 1, 0 }; /* one second */
-               sdb_llist_iter_t *iter;
-
                FD_ZERO(&ready);
                FD_ZERO(&exceptions);
 
                ready = sockets;
 
-               max_fd = max_listen_fd;
-
                iter = sdb_llist_get_iter(sock->open_connections);
                if (! iter) {
                        sdb_log(SDB_LOG_ERR, "frontend: Failed to acquire iterator "
                                        "for open connections");
-                       return -1;
+                       break;
                }
 
                while (sdb_llist_iter_has_next(iter)) {
                        sdb_object_t *obj = sdb_llist_iter_get_next(iter);
-                       FD_SET(CONN(obj)->conn.fd, &ready);
-                       FD_SET(CONN(obj)->conn.fd, &exceptions);
+                       FD_SET(CONN(obj)->fd, &ready);
+                       FD_SET(CONN(obj)->fd, &exceptions);
 
-                       if (CONN(obj)->conn.fd > max_fd)
-                               max_fd = CONN(obj)->conn.fd;
+                       if (CONN(obj)->fd > max_fd)
+                               max_fd = CONN(obj)->fd;
                }
                sdb_llist_iter_destroy(iter);
 
@@ -533,48 +676,27 @@ sdb_fe_sock_listen_and_serve(sdb_fe_socket_t *sock, sdb_fe_loop_t *loop)
 
                        sdb_log(SDB_LOG_ERR, "frontend: Failed to monitor sockets: %s",
                                        sdb_strerror(errno, buf, sizeof(buf)));
-                       return -1;
+                       break;
                }
-
-               if (! n)
+               else if (! n)
                        continue;
 
-               for (i = 0; i < sock->listeners_num; ++i) {
-                       listener_t *listener = sock->listeners + i;
-                       if (FD_ISSET(listener->sock_fd, &ready))
-                               if (connection_accept(sock, listener))
-                                       continue;
-               }
-
-               iter = sdb_llist_get_iter(sock->open_connections);
-               if (! iter) {
-                       sdb_log(SDB_LOG_ERR, "frontend: Failed to acquire iterator "
-                                       "for open connections");
-                       return -1;
-               }
-
-               while (sdb_llist_iter_has_next(iter)) {
-                       sdb_object_t *obj = sdb_llist_iter_get_next(iter);
-
-                       if (FD_ISSET(CONN(obj)->conn.fd, &exceptions))
-                               sdb_log(SDB_LOG_INFO, "Exception on fd %d",
-                                               CONN(obj)->conn.fd);
-
-                       if (FD_ISSET(CONN(obj)->conn.fd, &ready)) {
-                               sdb_log(SDB_LOG_INFO, "Data on fd %d", CONN(obj)->conn.fd);
-                               sdb_llist_iter_remove_current(iter);
-                               sdb_channel_write(sock->chan, &obj);
-                       }
-               }
-               sdb_llist_iter_destroy(iter);
+               /* handle new and open connections */
+               if (socket_handle_incoming(sock, &ready, &exceptions))
+                       break;
        }
 
+       socket_close(sock);
+
        sdb_log(SDB_LOG_INFO, "frontend: Waiting for connection handler threads "
                        "to terminate");
        if (! sdb_channel_shutdown(sock->chan))
                for (i = 0; i < SDB_STATIC_ARRAY_LEN(handler_threads); ++i)
                        pthread_join(handler_threads[i], NULL);
        /* else: we tried our best; let the operating system clean up */
+
+       sdb_channel_destroy(sock->chan);
+       sock->chan = NULL;
        return 0;
 } /* sdb_fe_sock_listen_and_server */