576df0
diff --git a/server/listen.c b/server/listen.c
576df0
index a8e9e6f..1a6c1d3 100644
576df0
--- a/server/listen.c
576df0
+++ b/server/listen.c
576df0
@@ -34,6 +34,10 @@
576df0
 #include <unistd.h>
576df0
 #endif
576df0
 
576df0
+#ifdef HAVE_SYSTEMD
576df0
+#include <systemd/sd-daemon.h>
576df0
+#endif
576df0
+
576df0
 /* we know core's module_index is 0 */
576df0
 #undef APLOG_MODULE_INDEX
576df0
 #define APLOG_MODULE_INDEX AP_CORE_MODULE_INDEX
576df0
@@ -59,9 +63,12 @@ static int ap_listenbacklog;
576df0
 static int ap_listencbratio;
576df0
 static int send_buffer_size;
576df0
 static int receive_buffer_size;
576df0
+#ifdef HAVE_SYSTEMD
576df0
+static int use_systemd = -1;
576df0
+#endif
576df0
 
576df0
 /* TODO: make_sock is just begging and screaming for APR abstraction */
576df0
-static apr_status_t make_sock(apr_pool_t *p, ap_listen_rec *server)
576df0
+static apr_status_t make_sock(apr_pool_t *p, ap_listen_rec *server, int do_bind_listen)
576df0
 {
576df0
     apr_socket_t *s = server->sd;
576df0
     int one = 1;
576df0
@@ -94,20 +101,6 @@ static apr_status_t make_sock(apr_pool_t *p, ap_listen_rec *server)
576df0
         return stat;
576df0
     }
576df0
 
576df0
-#if APR_HAVE_IPV6
576df0
-    if (server->bind_addr->family == APR_INET6) {
576df0
-        stat = apr_socket_opt_set(s, APR_IPV6_V6ONLY, v6only_setting);
576df0
-        if (stat != APR_SUCCESS && stat != APR_ENOTIMPL) {
576df0
-            ap_log_perror(APLOG_MARK, APLOG_CRIT, stat, p, APLOGNO(00069)
576df0
-                          "make_sock: for address %pI, apr_socket_opt_set: "
576df0
-                          "(IPV6_V6ONLY)",
576df0
-                          server->bind_addr);
576df0
-            apr_socket_close(s);
576df0
-            return stat;
576df0
-        }
576df0
-    }
576df0
-#endif
576df0
-
576df0
     /*
576df0
      * To send data over high bandwidth-delay connections at full
576df0
      * speed we must force the TCP window to open wide enough to keep the
576df0
@@ -169,21 +162,37 @@ static apr_status_t make_sock(apr_pool_t *p, ap_listen_rec *server)
576df0
     }
576df0
 #endif
576df0
 
576df0
-    if ((stat = apr_socket_bind(s, server->bind_addr)) != APR_SUCCESS) {
576df0
-        ap_log_perror(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT, stat, p, APLOGNO(00072)
576df0
-                      "make_sock: could not bind to address %pI",
576df0
-                      server->bind_addr);
576df0
-        apr_socket_close(s);
576df0
-        return stat;
576df0
-    }
576df0
+    if (do_bind_listen) {
576df0
+#if APR_HAVE_IPV6
576df0
+        if (server->bind_addr->family == APR_INET6) {
576df0
+            stat = apr_socket_opt_set(s, APR_IPV6_V6ONLY, v6only_setting);
576df0
+            if (stat != APR_SUCCESS && stat != APR_ENOTIMPL) {
576df0
+                ap_log_perror(APLOG_MARK, APLOG_CRIT, stat, p, APLOGNO(00069)
576df0
+                              "make_sock: for address %pI, apr_socket_opt_set: "
576df0
+                              "(IPV6_V6ONLY)",
576df0
+                              server->bind_addr);
576df0
+                apr_socket_close(s);
576df0
+                return stat;
576df0
+            }
576df0
+        }
576df0
+#endif
576df0
 
576df0
-    if ((stat = apr_socket_listen(s, ap_listenbacklog)) != APR_SUCCESS) {
576df0
-        ap_log_perror(APLOG_MARK, APLOG_STARTUP|APLOG_ERR, stat, p, APLOGNO(00073)
576df0
-                      "make_sock: unable to listen for connections "
576df0
-                      "on address %pI",
576df0
-                      server->bind_addr);
576df0
-        apr_socket_close(s);
576df0
-        return stat;
576df0
+        if ((stat = apr_socket_bind(s, server->bind_addr)) != APR_SUCCESS) {
576df0
+            ap_log_perror(APLOG_MARK, APLOG_STARTUP|APLOG_CRIT, stat, p, APLOGNO(00072)
576df0
+                          "make_sock: could not bind to address %pI",
576df0
+                          server->bind_addr);
576df0
+            apr_socket_close(s);
576df0
+            return stat;
576df0
+        }
576df0
+
576df0
+        if ((stat = apr_socket_listen(s, ap_listenbacklog)) != APR_SUCCESS) {
576df0
+            ap_log_perror(APLOG_MARK, APLOG_STARTUP|APLOG_ERR, stat, p, APLOGNO(00073)
576df0
+                          "make_sock: unable to listen for connections "
576df0
+                          "on address %pI",
576df0
+                          server->bind_addr);
576df0
+            apr_socket_close(s);
576df0
+            return stat;
576df0
+        }
576df0
     }
576df0
 
576df0
 #ifdef WIN32
576df0
@@ -315,6 +324,123 @@ static int find_listeners(ap_listen_rec **from, ap_listen_rec **to,
576df0
     return found;
576df0
 }
576df0
 
576df0
+#ifdef HAVE_SYSTEMD
576df0
+
576df0
+static int find_systemd_socket(process_rec * process, apr_port_t port) {
576df0
+    int fdcount, fd;
576df0
+    int sdc = sd_listen_fds(0);
576df0
+
576df0
+    if (sdc < 0) {
576df0
+        ap_log_perror(APLOG_MARK, APLOG_CRIT, sdc, process->pool, APLOGNO(02486)
576df0
+                      "find_systemd_socket: Error parsing enviroment, sd_listen_fds returned %d",
576df0
+                      sdc);
576df0
+        return -1;
576df0
+    }
576df0
+
576df0
+    if (sdc == 0) {
576df0
+        ap_log_perror(APLOG_MARK, APLOG_CRIT, sdc, process->pool, APLOGNO(02487)
576df0
+                      "find_systemd_socket: At least one socket must be set.");
576df0
+        return -1;
576df0
+    }
576df0
+
576df0
+    fdcount = atoi(getenv("LISTEN_FDS"));
576df0
+    for (fd = SD_LISTEN_FDS_START; fd < SD_LISTEN_FDS_START + fdcount; fd++) {
576df0
+        if (sd_is_socket_inet(fd, 0, 0, -1, port) > 0) {
576df0
+            return fd;
576df0
+        }
576df0
+    }
576df0
+
576df0
+    return -1;
576df0
+}
576df0
+
576df0
+static apr_status_t alloc_systemd_listener(process_rec * process,
576df0
+                                           int fd, const char *proto,
576df0
+                                           ap_listen_rec **out_rec)
576df0
+{
576df0
+    apr_status_t rv;
576df0
+    struct sockaddr sa;
576df0
+    socklen_t len = sizeof(struct sockaddr);
576df0
+    apr_os_sock_info_t si;
576df0
+    ap_listen_rec *rec;
576df0
+    *out_rec = NULL;
576df0
+
576df0
+    memset(&si, 0, sizeof(si));
576df0
+
576df0
+    rv = getsockname(fd, &sa, &len;;
576df0
+
576df0
+    if (rv != 0) {
576df0
+        rv = apr_get_netos_error();
576df0
+        ap_log_perror(APLOG_MARK, APLOG_CRIT, rv, process->pool, APLOGNO(02489)
576df0
+                      "getsockname on %d failed.", fd);
576df0
+        return rv;
576df0
+    }
576df0
+
576df0
+    si.os_sock = &fd;
576df0
+    si.family = sa.sa_family;
576df0
+    si.local = &sa;
576df0
+    si.type = SOCK_STREAM;
576df0
+    si.protocol = APR_PROTO_TCP;
576df0
+
576df0
+    rec = apr_palloc(process->pool, sizeof(ap_listen_rec));
576df0
+    rec->active = 0;
576df0
+    rec->next = 0;
576df0
+
576df0
+
576df0
+    rv = apr_os_sock_make(&rec->sd, &si, process->pool);
576df0
+    if (rv != APR_SUCCESS) {
576df0
+        ap_log_perror(APLOG_MARK, APLOG_CRIT, rv, process->pool, APLOGNO(02490)
576df0
+                      "apr_os_sock_make on %d failed.", fd);
576df0
+        return rv;
576df0
+    }
576df0
+
576df0
+    rv = apr_socket_addr_get(&rec->bind_addr, APR_LOCAL, rec->sd);
576df0
+    if (rv != APR_SUCCESS) {
576df0
+        ap_log_perror(APLOG_MARK, APLOG_CRIT, rv, process->pool, APLOGNO(02491)
576df0
+                      "apr_socket_addr_get on %d failed.", fd);
576df0
+        return rv;
576df0
+    }
576df0
+
576df0
+    rec->protocol = apr_pstrdup(process->pool, proto);
576df0
+
576df0
+    *out_rec = rec;
576df0
+
576df0
+    return make_sock(process->pool, rec, 0);
576df0
+}
576df0
+
576df0
+static const char *set_systemd_listener(process_rec *process, apr_port_t port,
576df0
+                                        const char *proto)
576df0
+{
576df0
+    ap_listen_rec *last, *new;
576df0
+    apr_status_t rv;
576df0
+    int fd = find_systemd_socket(process, port);
576df0
+    if (fd < 0) {
576df0
+        return "Systemd socket activation is used, but this port is not "
576df0
+                "configured in systemd";
576df0
+    }
576df0
+
576df0
+    last = ap_listeners;
576df0
+    while (last && last->next) {
576df0
+        last = last->next;
576df0
+    }
576df0
+
576df0
+    rv = alloc_systemd_listener(process, fd, proto, &new;;
576df0
+    if (rv != APR_SUCCESS) {
576df0
+        return "Failed to setup socket passed by systemd using socket activation";
576df0
+    }
576df0
+
576df0
+    if (last == NULL) {
576df0
+        ap_listeners = last = new;
576df0
+    }
576df0
+    else {
576df0
+        last->next = new;
576df0
+        last = new;
576df0
+    }
576df0
+
576df0
+    return NULL;
576df0
+}
576df0
+
576df0
+#endif /* HAVE_SYSTEMD */
576df0
+
576df0
 static const char *alloc_listener(process_rec *process, const char *addr,
576df0
                                   apr_port_t port, const char* proto,
576df0
                                   void *slave)
576df0
@@ -495,7 +621,7 @@ static int open_listeners(apr_pool_t *pool)
576df0
                 }
576df0
             }
576df0
 #endif
576df0
-            if (make_sock(pool, lr) == APR_SUCCESS) {
576df0
+            if (make_sock(pool, lr, 1) == APR_SUCCESS) {
576df0
                 ++num_open;
576df0
             }
576df0
             else {
576df0
@@ -607,8 +733,28 @@ AP_DECLARE(int) ap_setup_listeners(server_rec *s)
576df0
         }
576df0
     }
576df0
 
576df0
-    if (open_listeners(s->process->pool)) {
576df0
-        return 0;
576df0
+#ifdef HAVE_SYSTEMD
576df0
+    if (use_systemd) {
576df0
+        const char *userdata_key = "ap_open_systemd_listeners";
576df0
+        void *data;
576df0
+        /* clear the enviroment on our second run
576df0
+        * so that none of our future children get confused.
576df0
+        */
576df0
+        apr_pool_userdata_get(&data, userdata_key, s->process->pool);
576df0
+        if (!data) {
576df0
+            apr_pool_userdata_set((const void *)1, userdata_key,
576df0
+                                apr_pool_cleanup_null, s->process->pool);
576df0
+        }
576df0
+        else {
576df0
+            sd_listen_fds(1);
576df0
+        }
576df0
+    }
576df0
+    else
576df0
+#endif
576df0
+    {
576df0
+        if (open_listeners(s->process->pool)) {
576df0
+            return 0;
576df0
+        }
576df0
     }
576df0
 
576df0
     for (lr = ap_listeners; lr; lr = lr->next) {
576df0
@@ -698,7 +844,7 @@ AP_DECLARE(apr_status_t) ap_duplicate_listeners(apr_pool_t *p, server_rec *s,
576df0
                             duplr->bind_addr);
576df0
                 return stat;
576df0
             }
576df0
-            make_sock(p, duplr);
576df0
+            make_sock(p, duplr, 1);
576df0
 #if AP_NONBLOCK_WHEN_MULTI_LISTEN
576df0
             use_nonblock = (ap_listeners && ap_listeners->next);
576df0
             stat = apr_socket_opt_set(duplr->sd, APR_SO_NONBLOCK, use_nonblock);
576df0
@@ -825,6 +971,11 @@ AP_DECLARE_NONSTD(const char *) ap_set_listener(cmd_parms *cmd, void *dummy,
576df0
     if (argc < 1 || argc > 2) {
576df0
         return "Listen requires 1 or 2 arguments.";
576df0
     }
576df0
+#ifdef HAVE_SYSTEMD
576df0
+    if (use_systemd == -1) {
576df0
+        use_systemd = sd_listen_fds(0) > 0;
576df0
+    }
576df0
+#endif
576df0
 
576df0
     rv = apr_parse_addr_port(&host, &scope_id, &port, argv[0], cmd->pool);
576df0
     if (rv != APR_SUCCESS) {
576df0
@@ -856,6 +1007,12 @@ AP_DECLARE_NONSTD(const char *) ap_set_listener(cmd_parms *cmd, void *dummy,
576df0
         ap_str_tolower(proto);
576df0
     }
576df0
 
576df0
+#ifdef HAVE_SYSTEMD
576df0
+    if (use_systemd) {
576df0
+        return set_systemd_listener(cmd->server->process, port, proto);
576df0
+    }
576df0
+#endif
576df0
+
576df0
     return alloc_listener(cmd->server->process, host, port, proto, NULL);
576df0
 }
576df0