xref: /lighttpd1.4/src/network.c (revision 66698469)
1 #include "first.h"
2 
3 #include "network.h"
4 #include "base.h"
5 #include "fdevent.h"
6 #include "log.h"
7 #include "connections.h"
8 #include "plugin.h"
9 #include "sock_addr.h"
10 
11 #include "network_write.h"
12 #include "sys-socket.h"
13 
14 #include <sys/types.h>
15 #include <sys/stat.h>
16 #include "sys-time.h"
17 
18 #include <errno.h>
19 #include <fcntl.h>
20 #include <unistd.h>
21 #include <string.h>
22 #include <stdlib.h>
23 
24 void
25 network_accept_tcp_nagle_disable (const int fd)
26 {
27     static int noinherit_tcpnodelay = -1;
28     int opt;
29 
30     if (!noinherit_tcpnodelay) /* TCP_NODELAY inherited from listen socket */
31         return;
32 
33     if (noinherit_tcpnodelay < 0) {
34         socklen_t optlen = sizeof(opt);
35         if (0 == getsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &opt, &optlen)) {
36             noinherit_tcpnodelay = !opt;
37             if (opt)           /* TCP_NODELAY inherited from listen socket */
38                 return;
39         }
40     }
41 
42     opt = 1;
43     (void)setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &opt, sizeof(opt));
44 }
45 
46 static handler_t network_server_handle_fdevent(void *context, int revents) {
47     const server_socket * const srv_socket = (server_socket *)context;
48     server * const srv = srv_socket->srv;
49 
50     if (0 == (revents & FDEVENT_IN)) {
51         log_error(srv->errh, __FILE__, __LINE__,
52           "strange event for server socket %d %d", srv_socket->fd, revents);
53         return HANDLER_ERROR;
54     }
55 
56     /* accept()s at most 100 new connections before
57      * jumping out to process events on other connections */
58     int loops = (int)srv->lim_conns;
59     if (loops > 100)
60         loops = 100;
61     else if (loops <= 0)
62         return HANDLER_GO_ON;
63 
64     const int nagle_disable =
65       (sock_addr_get_family(&srv_socket->addr) != AF_UNIX);
66 
67     sock_addr addr;
68     size_t addrlen; /*(size_t intentional; not socklen_t)*/
69     do {
70         addrlen = sizeof(addr);
71         int fd = fdevent_accept_listenfd(srv_socket->fd,
72                                          (struct sockaddr *)&addr, &addrlen);
73         if (-1 == fd) break;
74 
75         if (nagle_disable)
76             network_accept_tcp_nagle_disable(fd);
77       #ifdef HAVE_SYS_UN_H /*(see sock_addr.h)*/
78         else if (addrlen <= 2) /*(AF_UNIX if !nagle_disable)*/
79             memcpy(addr.un.sun_path, srv_socket->addr.un.sun_path,
80                    srv_socket->srv_token_colon < sizeof(addr.un.sun_path)
81                    ? (size_t)srv_socket->srv_token_colon+1 /*(+1 for '\0')*/
82                    : sizeof(addr.un.sun_path));/*(escaped len might be longer)*/
83       #endif
84 
85         connection *con = connection_accepted(srv, srv_socket, &addr, fd);
86         if (__builtin_expect( (!con), 0)) return HANDLER_GO_ON;
87         connection_state_machine(con);
88     } while (--loops);
89 
90     if (loops) {
91         switch (errno) {
92           case EAGAIN:
93          #if EWOULDBLOCK != EAGAIN
94           case EWOULDBLOCK:
95          #endif
96           case EINTR:
97           case ECONNABORTED:
98           case EMFILE:
99             break;
100           default:
101             log_perror(srv->errh, __FILE__, __LINE__, "accept()");
102         }
103     }
104 
105     return HANDLER_GO_ON;
106 }
107 
108 #ifdef HAVE_SYS_UN_H
109 
110 /* abstract socket (Linux, QNX?, Windows 10?) */
111 
112 __attribute_cold__
113 static void
114 network_abstract_socket_enc (buffer * const restrict abstract,
115                              unsigned char * const restrict sun_path,
116                              const uint32_t len)
117 {
118     /*(strings needing encoding are expected to be short;
119      * code not written for performance)*/
120     buffer_clear(abstract);
121     uint32_t n = 0;
122     for (uint32_t i = 0; i < len; ++i)
123         n += (sun_path[i]-20 < 107) ? 1 : 4;
124     char *s = buffer_extend(abstract, n);
125     for (uint32_t i = 0; i < len; ++i) {
126         /* (sun_path[i] >= 20 && sun_path[i] < 127 && sun_path[i] != '\\') */
127         if (sun_path[i]-20 < 107 && sun_path[i] != '\\')
128             *s++ = ((char *)sun_path)[i];
129         else {
130             s[0] = '\\';
131             s[1] = 'x';
132             s[2] = "0123456789abcdef"[sun_path[i] >>  4];
133             s[3] = "0123456789abcdef"[sun_path[i] & 0xF];
134             s += 4;
135         }
136     }
137 }
138 
139 __attribute_cold__
140 static uint32_t
141 network_abstract_socket_dec (const buffer * const restrict abstract,
142                              char * const restrict sun_path,
143                              const uint32_t plen)
144 {
145     /*(strings expected to begin with "\\x00")*/
146     /*(strings needing decoding are expected to be short;
147      * code not written for performance)*/
148     const char *s = abstract->ptr;
149     uint32_t n = 0;
150     for (int hi, lo; *s && n < plen; ++n) {
151         if (s[0] != '\\')
152             sun_path[n] = *s++;
153         else if (s[1] == 'x'
154                  && (hi = hex2int(s[2])) != 0xFF
155                  && (lo = hex2int(s[3])) != 0xFF) {
156             sun_path[n] = (char)((hi << 4) | lo);
157             s += 4;
158         }
159         else
160             break;
161     }
162     return *s == '\0' ? n : 0;
163 }
164 
165 __attribute_cold__
166 static int
167 network_abstract_socket_parse (const buffer *abstract,
168                                sock_addr *addr, socklen_t *addr_len,
169                                log_error_st *errh)
170 {
171     /* abstract socket (Linux, QNX?, Windows 10?) */
172     /*assert(*addr_len >= sizeof(struct sockaddr_un));*/
173     memset(addr, 0, sizeof(struct sockaddr_un));
174     addr->un.sun_family = AF_UNIX;
175     uint32_t len =
176       (uint32_t)(*addr_len - offsetof(struct sockaddr_un, sun_path));
177     if (len > sizeof(addr->un.sun_path))
178         len = sizeof(addr->un.sun_path);
179     len = network_abstract_socket_dec(abstract, addr->un.sun_path, len);
180     if (len) {
181         *addr_len = offsetof(struct sockaddr_un, sun_path) + len;
182         return 0;
183     }
184     else {
185         log_error(errh, __FILE__, __LINE__,
186           "abstract unix socket filename invalid encoding or too long: %s",
187           abstract->ptr);
188         return -1;
189     }
190 }
191 
192 #endif /* HAVE_SYS_UN_H */
193 
194 static void network_host_normalize_addr_str(buffer *host, sock_addr *addr, socklen_t addr_len) {
195     buffer_clear(host);
196     sock_addr_stringify_append_buffer(host, addr);
197   #ifdef HAVE_SYS_UN_H
198     if (AF_UNIX == sock_addr_get_family(addr) && 0 == buffer_clen(host))
199         network_abstract_socket_enc(host, (unsigned char *)addr->un.sun_path,
200                                     (uint32_t)(addr_len
201                                     - offsetof(struct sockaddr_un, sun_path)));
202   #else
203     UNUSED(addr_len);
204   #endif
205 }
206 
207 static int network_host_parse_addr(server *srv, sock_addr *addr, socklen_t *addr_len, buffer *host, int use_ipv6) {
208     char *h;
209     char *colon = NULL;
210     const char *chost;
211     sa_family_t family = use_ipv6 ? AF_INET6 : AF_INET;
212     unsigned int port = srv->srvconf.port;
213     if (buffer_is_blank(host)) {
214         log_error(srv->errh, __FILE__, __LINE__,
215           "value of $SERVER[\"socket\"] must not be empty");
216         return -1;
217     }
218     h = host->ptr;
219     if (h[0] == '/' || h[0] == '\\') {
220       #ifdef HAVE_SYS_UN_H
221         if (h[0] == '\\' && h[1] == 'x' && h[2] == '0' && h[3] == '0')
222             return network_abstract_socket_parse(host,addr,addr_len,srv->errh);
223         return (1 ==
224                 sock_addr_from_str_hints(addr,addr_len,h,AF_UNIX,0,srv->errh))
225           ? 0
226           : -1;
227       #else
228         log_error(srv->errh, __FILE__, __LINE__,
229           "ERROR: Unix Domain sockets are not supported.");
230         return -1;
231       #endif
232     }
233     buffer * const tb = srv->tmp_buf;
234     buffer_copy_buffer(tb, host);
235     h = tb->ptr;
236     if (h[0] == '[') {
237         family = AF_INET6;
238         if ((h = strchr(h, ']'))) {
239             *h++ = '\0';
240             if (*h == ':') colon = h;
241         } /*(else should not happen; validated in configparser.y)*/
242         h = tb->ptr+1;
243     }
244     else {
245         colon = strrchr(h, ':');
246     }
247     if (colon) {
248         *colon++ = '\0';
249         port = (unsigned int)strtol(colon, NULL, 10);
250         if (port == 0 || port > 65535) {
251             log_error(srv->errh, __FILE__, __LINE__,
252               "port not set or out of range: %u", port);
253             return -1;
254         }
255     }
256     if (h[0] == '*' && h[1] == '\0') {
257         family = AF_INET;
258         ++h;
259     }
260     chost = *h ? h : family == AF_INET ? "0.0.0.0" : "::";
261     if (1 !=
262         sock_addr_from_str_hints(addr,addr_len,chost,family,port,srv->errh)) {
263         return -1;
264     }
265     return 0;
266 }
267 
268 static void network_srv_sockets_append(server *srv, server_socket *srv_socket) {
269 	if (srv->srv_sockets.used == srv->srv_sockets.size) {
270 		srv->srv_sockets.size += 4;
271 		srv->srv_sockets.ptr = realloc(srv->srv_sockets.ptr, srv->srv_sockets.size * sizeof(server_socket*));
272 		force_assert(NULL != srv->srv_sockets.ptr);
273 	}
274 
275 	srv->srv_sockets.ptr[srv->srv_sockets.used++] = srv_socket;
276 }
277 
278 typedef struct {
279     /* global or per-socket config; not patched per connection */
280     int listen_backlog;
281     unsigned char ssl_enabled;
282     unsigned char use_ipv6;
283     unsigned char set_v6only; /* set_v6only is only a temporary option */
284     unsigned char defer_accept;
285     int8_t v4mapped;
286     const buffer *socket_perms;
287     const buffer *bsd_accept_filter;
288 } network_socket_config;
289 
290 typedef struct {
291     PLUGIN_DATA;
292     network_socket_config defaults;
293     network_socket_config conf;
294 } network_plugin_data;
295 
296 static void network_merge_config_cpv(network_socket_config * const pconf, const config_plugin_value_t * const cpv) {
297     switch (cpv->k_id) { /* index into static config_plugin_keys_t cpk[] */
298       case 0: /* ssl.engine */
299         pconf->ssl_enabled = (0 != cpv->v.u);
300         break;
301       case 1: /* server.listen-backlog */
302         pconf->listen_backlog = (int)cpv->v.u;
303         break;
304       case 2: /* server.socket-perms */
305         pconf->socket_perms = cpv->v.b;
306         break;
307       case 3: /* server.bsd-accept-filter */
308         pconf->bsd_accept_filter = cpv->v.b;
309         break;
310       case 4: /* server.defer-accept */
311         pconf->defer_accept = (0 != cpv->v.u);
312         break;
313       case 5: /* server.use-ipv6 */
314         pconf->use_ipv6 = (0 != cpv->v.u);
315         break;
316       case 6: /* server.set-v6only */
317         pconf->set_v6only = (0 != cpv->v.u);
318         break;
319       case 7: /* server.v4mapped */
320         pconf->v4mapped = (0 != cpv->v.u);
321         break;
322       default:/* should not happen */
323         return;
324     }
325 }
326 
327 static void network_merge_config(network_socket_config * const pconf, const config_plugin_value_t *cpv) {
328     do {
329         network_merge_config_cpv(pconf, cpv);
330     } while ((++cpv)->k_id != -1);
331 }
332 
333 __attribute_pure__
334 static uint8_t network_srv_token_colon (const buffer * const b) {
335     const char *colon = NULL;
336     const char * const p = b->ptr;
337     if (*p == '[') {
338         colon = strstr(p, "]:");
339         if (colon) ++colon;
340     }
341     else if (*p != '/') {
342         colon = strchr(p, ':');
343     }
344     return colon ? (uint8_t)(colon - p) : (uint8_t)buffer_clen(b);
345 }
346 
347 static void network_srv_socket_init_token (server_socket * const srv_socket, const buffer * const token) {
348     buffer * const srv_token = srv_socket->srv_token = buffer_init();
349     buffer_copy_buffer(srv_token, token);
350   #ifdef HAVE_SYS_UN_H
351     /*(srv_socket->addr must have been initialized by caller)*/
352     if (AF_UNIX == sock_addr_get_family(&srv_socket->addr))
353         srv_socket->srv_token_colon = buffer_clen(srv_token);
354     else
355   #endif
356         srv_socket->srv_token_colon = network_srv_token_colon(srv_token);
357 }
358 
359 static int network_server_init(server *srv, network_socket_config *s, buffer *host_token, size_t sidx, int stdin_fd) {
360 	server_socket *srv_socket;
361 	const char *host;
362 	socklen_t addr_len = sizeof(sock_addr);
363 	sock_addr addr;
364 	int family = 0;
365 	int set_v6only = 0;
366 
367 	if (buffer_is_blank(host_token)) {
368 		log_error(srv->errh, __FILE__, __LINE__,
369 		  "value of $SERVER[\"socket\"] must not be empty");
370 		return -1;
371 	}
372 
373 	/* check if we already know this socket, and if yes, don't init it
374 	 * (optimization: check strings here to filter out exact matches;
375 	 *  binary addresses are matched further below) */
376 	for (uint32_t i = 0; i < srv->srv_sockets.used; ++i) {
377 		if (buffer_is_equal(srv->srv_sockets.ptr[i]->srv_token, host_token)) {
378 			return 0;
379 		}
380 	}
381 
382 	host = host_token->ptr;
383 	if ((s->use_ipv6 && (*host == '\0' || *host == ':')) || (host[0] == '[' && host[1] == ']')) {
384 		log_error(srv->errh, __FILE__, __LINE__,
385 		  "warning: please use server.use-ipv6 only for hostnames, "
386 		  "not without server.bind / empty address; your config will "
387 		  "break if the kernel default for IPV6_V6ONLY changes");
388 	}
389 	if (*host == '[') s->use_ipv6 = 1;
390 
391 	memset(&addr, 0, sizeof(addr));
392 	if (-1 != stdin_fd) {
393 		if (-1 == getsockname(stdin_fd, (struct sockaddr *)&addr, &addr_len)) {
394 			log_perror(srv->errh, __FILE__, __LINE__, "getsockname()");
395 			return -1;
396 		}
397 	} else if (0 != network_host_parse_addr(srv, &addr, &addr_len, host_token, s->use_ipv6)) {
398 		return -1;
399 	}
400 
401 	family = sock_addr_get_family(&addr);
402 
403       #ifdef HAVE_IPV6
404 	if (*host != '\0' && AF_INET6 == family) {
405 		if (s->set_v6only) {
406 			set_v6only = 1;
407 		} else {
408 			log_error(srv->errh, __FILE__, __LINE__,
409 			  "warning: server.set-v6only will be removed soon, "
410 			  "update your config to have different sockets for ipv4 and ipv6");
411 		}
412 	}
413 	if (AF_INET6 == family && -1 != s->v4mapped) { /*(configured; -1 is unset)*/
414 		set_v6only = (s->v4mapped ? -1 : 1);
415 	}
416       #endif
417 
418 	network_host_normalize_addr_str(host_token, &addr, addr_len);
419 	host = host_token->ptr;
420 
421 	if (srv->srvconf.preflight_check) {
422 		return 0;
423 	}
424 
425 	/* check if we already know this socket (after potential DNS resolution), and if yes, don't init it */
426 	for (uint32_t i = 0; i < srv->srv_sockets.used; ++i) {
427 		if (0 == memcmp(&srv->srv_sockets.ptr[i]->addr, &addr, sizeof(addr))) {
428 			return 0;
429 		}
430 	}
431 
432 	srv_socket = calloc(1, sizeof(*srv_socket));
433 	force_assert(NULL != srv_socket);
434 	memcpy(&srv_socket->addr, &addr, addr_len);
435 	srv_socket->fd = -1;
436 	srv_socket->sidx = sidx;
437 	srv_socket->is_ssl = s->ssl_enabled;
438 	srv_socket->srv = srv;
439 	network_srv_socket_init_token(srv_socket, host_token);
440 	network_srv_sockets_append(srv, srv_socket);
441 
442 	if (srv->sockets_disabled) { /* lighttpd -1 (one-shot mode) */
443 		return 0;
444 	}
445 
446 	if (srv->srvconf.systemd_socket_activation) {
447 		for (uint32_t i = 0; i < srv->srv_sockets_inherited.used; ++i) {
448 			if (0 != memcmp(&srv->srv_sockets_inherited.ptr[i]->addr, &srv_socket->addr, addr_len)) continue;
449 			if ((unsigned short)~0u == srv->srv_sockets_inherited.ptr[i]->sidx) {
450 				srv->srv_sockets_inherited.ptr[i]->sidx = sidx;
451 			}
452 			stdin_fd = srv->srv_sockets_inherited.ptr[i]->fd;
453 			break;
454 		}
455 	}
456 
457 	if (-1 != stdin_fd) {
458 		srv_socket->fd = stdin_fd;
459 		if (-1 == fdevent_fcntl_set_nb_cloexec(stdin_fd)) {
460 			log_perror(srv->errh, __FILE__, __LINE__, "fcntl");
461 			return -1;
462 		}
463 	} else
464 #ifdef HAVE_SYS_UN_H
465 	if (AF_UNIX == family) {
466 		/* check if the socket exists and try to connect to it. */
467 		force_assert(host); /*(static analysis hint)*/
468 		if (-1 == (srv_socket->fd = fdevent_socket_cloexec(AF_UNIX, SOCK_STREAM, 0))) {
469 			log_perror(srv->errh, __FILE__, __LINE__, "socket");
470 			return -1;
471 		}
472 		if (0 == connect(srv_socket->fd, (struct sockaddr *) &(srv_socket->addr), addr_len)) {
473 			log_error(srv->errh, __FILE__, __LINE__,
474 			  "server socket is still in use: %s", host);
475 			return -1;
476 		}
477 
478 		/* connect failed */
479 		switch(errno) {
480 		case ECONNREFUSED:
481 			if (*host == '/') unlink(host);
482 			break;
483 		case ENOENT:
484 			break;
485 		default:
486 			log_perror(srv->errh, __FILE__, __LINE__,
487 			  "testing socket failed: %s", host);
488 			return -1;
489 		}
490 
491 		if (-1 == fdevent_fcntl_set_nb(srv_socket->fd)) {
492 			log_perror(srv->errh, __FILE__, __LINE__, "fcntl");
493 			return -1;
494 		}
495 	} else
496 #endif
497 	{
498 		if (-1 == (srv_socket->fd = fdevent_socket_nb_cloexec(family, SOCK_STREAM, IPPROTO_TCP))) {
499 			log_perror(srv->errh, __FILE__, __LINE__, "socket");
500 			return -1;
501 		}
502 
503 #ifdef HAVE_IPV6
504 		if (set_v6only) {
505 				int val = (set_v6only > 0);
506 				if (-1 == setsockopt(srv_socket->fd, IPPROTO_IPV6, IPV6_V6ONLY, &val, sizeof(val))) {
507 					log_perror(srv->errh, __FILE__, __LINE__, "setsockopt(IPV6_V6ONLY)");
508 					return -1;
509 				}
510 		}
511 #endif
512 	}
513 
514 	/* */
515 	srv->cur_fds = srv_socket->fd;
516 
517 	if (fdevent_set_so_reuseaddr(srv_socket->fd, 1) < 0) {
518 		log_perror(srv->errh, __FILE__, __LINE__, "setsockopt(SO_REUSEADDR)");
519 		return -1;
520 	}
521 
522 	if (family != AF_UNIX) {
523 		if (fdevent_set_tcp_nodelay(srv_socket->fd, 1) < 0) {
524 			log_perror(srv->errh, __FILE__, __LINE__, "setsockopt(TCP_NODELAY)");
525 			return -1;
526 		}
527 	}
528 
529 	if (-1 != stdin_fd) { } else
530 	if (0 != bind(srv_socket->fd, (struct sockaddr *) &(srv_socket->addr), addr_len)) {
531 		log_perror(srv->errh, __FILE__, __LINE__,
532 		  "can't bind to socket: %s", host);
533 		return -1;
534 	}
535 
536   #ifdef HAVE_SYS_UN_H
537 	if (-1 != stdin_fd) { } else
538 	if (AF_UNIX == family && s->socket_perms) {
539 		mode_t m = 0;
540 		for (char *str = s->socket_perms->ptr; *str; ++str) {
541 			m <<= 3;
542 			m |= (*str - '0');
543 		}
544 		if (0 != m && *host == '/' && -1 == chmod(host, m)) {
545 			log_perror(srv->errh, __FILE__, __LINE__,
546 			  "chmod(\"%s\", %s)", host, s->socket_perms->ptr);
547 			return -1;
548 		}
549 	}
550   #endif
551 
552 	if (-1 != stdin_fd) { } else
553 	if (-1 == listen(srv_socket->fd, s->listen_backlog)) {
554 		log_perror(srv->errh, __FILE__, __LINE__, "listen");
555 		return -1;
556 	}
557 
558 	if (s->ssl_enabled) {
559 	}
560 #ifdef TCP_DEFER_ACCEPT
561 	else if (s->defer_accept) {
562 		int v = s->defer_accept;
563 		if (-1 == setsockopt(srv_socket->fd, IPPROTO_TCP, TCP_DEFER_ACCEPT, &v, sizeof(v))) {
564 			log_perror(srv->errh, __FILE__, __LINE__, "can't set TCP_DEFER_ACCEPT");
565 		}
566 	}
567 #endif
568 #if defined(__FreeBSD__) || defined(__NetBSD__) \
569  || defined(__OpenBSD__) || defined(__DragonFly__)
570 #ifdef SO_ACCEPTFILTER
571 	else if (s->bsd_accept_filter
572 		   && (buffer_is_equal_string(s->bsd_accept_filter, CONST_STR_LEN("httpready"))
573 			|| buffer_is_equal_string(s->bsd_accept_filter, CONST_STR_LEN("dataready")))) {
574 		/* FreeBSD accf_http filter */
575 		struct accept_filter_arg afa;
576 		memset(&afa, 0, sizeof(afa));
577 		strncpy(afa.af_name, s->bsd_accept_filter->ptr, sizeof(afa.af_name)-1);
578 		if (setsockopt(srv_socket->fd, SOL_SOCKET, SO_ACCEPTFILTER, &afa, sizeof(afa)) < 0) {
579 			if (errno != ENOENT) {
580 				log_perror(srv->errh, __FILE__, __LINE__,
581 				  "can't set accept-filter '%s'", s->bsd_accept_filter->ptr);
582 			}
583 		}
584 	}
585 #endif
586 #endif
587 
588 	return 0;
589 }
590 
591 int network_close(server *srv) {
592 	for (uint32_t i = 0; i < srv->srv_sockets.used; ++i) {
593 		server_socket *srv_socket = srv->srv_sockets.ptr[i];
594 		if (srv_socket->fd != -1) {
595 			network_unregister_sock(srv, srv_socket);
596 			close(srv_socket->fd);
597 		}
598 
599 		buffer_free(srv_socket->srv_token);
600 
601 		free(srv_socket);
602 	}
603 
604 	free(srv->srv_sockets.ptr);
605 	srv->srv_sockets.ptr = NULL;
606 	srv->srv_sockets.used = 0;
607 	srv->srv_sockets.size = 0;
608 
609 	for (uint32_t i = 0; i < srv->srv_sockets_inherited.used; ++i) {
610 		server_socket *srv_socket = srv->srv_sockets_inherited.ptr[i];
611 		if (srv_socket->fd != -1 && srv_socket->sidx != (unsigned short)~0u) {
612 			close(srv_socket->fd);
613 		}
614 
615 		buffer_free(srv_socket->srv_token);
616 
617 		free(srv_socket);
618 	}
619 
620 	free(srv->srv_sockets_inherited.ptr);
621 	srv->srv_sockets_inherited.ptr = NULL;
622 	srv->srv_sockets_inherited.used = 0;
623 	srv->srv_sockets_inherited.size = 0;
624 
625 	return 0;
626 }
627 
628 void network_socket_activation_to_env (server * const srv) {
629     /* set up listening sockets for systemd socket activation
630      * and ensure FD_CLOEXEC flag is not set on listen fds */
631     int fd = 3; /* #define SD_LISTEN_FDS_START 3 */
632     for (uint32_t n = 0, i; n < srv->srv_sockets.used; ++n) {
633         server_socket *srv_socket = srv->srv_sockets.ptr[n];
634         if (srv_socket->fd < fd) continue;
635         if (srv_socket->fd == fd) {
636             fdevent_clrfd_cloexec(fd);
637             ++fd;
638             continue;
639         }
640         /* (expecting ordered list, but check if fd is later in list)*/
641         for (i = n+1; i < srv->srv_sockets.used; ++i) {
642             if (fd == srv->srv_sockets.ptr[i]->fd)
643                 break;
644         }
645         if (i < srv->srv_sockets.used) {
646             fdevent_clrfd_cloexec(fd);
647             ++fd;
648             --n; /* loop to reprocess this entry */
649             continue;
650         }
651 
652         /* dup2() removes FD_CLOEXEC on newfd */
653         if (fd != dup2(srv_socket->fd, fd)) continue;
654         ++fd;
655         /* old fd will be closed upon execv() due to its FD_CLOEXEC flag
656          * (if not already closed by another dup2() over it) */
657     }
658     fd -= 3; /* now num fds; #define SD_LISTEN_FDS_START 3 */
659     if (0 == fd) return; /*(no active sockets?)*/
660     buffer * const tb = srv->tmp_buf;
661     buffer_clear(tb);
662     buffer_append_int(tb, fd);
663     setenv("LISTEN_FDS", tb->ptr, 1);
664     buffer_clear(tb);
665     buffer_append_int(tb, srv->pid); /* getpid() */
666     setenv("LISTEN_PID", tb->ptr, 1);
667 }
668 
669 static int network_socket_activation_nfds(server *srv, network_socket_config *s, int nfds) {
670     buffer *host = buffer_init();
671     socklen_t addr_len;
672     sock_addr addr;
673     int rc = 0;
674     nfds += 3; /* #define SD_LISTEN_FDS_START 3 */
675     for (int fd = 3; fd < nfds; ++fd) {
676         addr_len = sizeof(sock_addr);
677         if (-1 == (rc = getsockname(fd, (struct sockaddr *)&addr, &addr_len))) {
678             log_perror(srv->errh, __FILE__, __LINE__,
679               "socket activation getsockname()");
680             break;
681         }
682         network_host_normalize_addr_str(host, &addr, addr_len);
683         rc = network_server_init(srv, s, host, 0, fd);
684         if (0 != rc) break;
685         srv->srv_sockets.ptr[srv->srv_sockets.used-1]->sidx = (unsigned short)~0u;
686     }
687     buffer_free(host);
688     memcpy(&srv->srv_sockets_inherited, &srv->srv_sockets, sizeof(server_socket_array));
689     memset(&srv->srv_sockets, 0, sizeof(server_socket_array));
690     return rc;
691 }
692 
693 static int network_socket_activation_from_env(server *srv, network_socket_config *s) {
694     char *listen_pid = getenv("LISTEN_PID");
695     char *listen_fds = getenv("LISTEN_FDS");
696     pid_t lpid = listen_pid ? (pid_t)strtoul(listen_pid,NULL,10) : 0;
697     int nfds = listen_fds ? atoi(listen_fds) : 0;
698     int rc = (nfds > 0 && nfds < 5000
699               && (lpid == getpid()
700                  #ifndef _WIN32
701                   || (0 == strncmp(listen_pid, "parent:", 7)
702                       && getppid() == (pid_t)strtoul(listen_pid+7,NULL,10))
703                  #endif
704                  ))
705       ? network_socket_activation_nfds(srv, s, nfds)
706       : 0;
707     unsetenv("LISTEN_PID");
708     unsetenv("LISTEN_FDS");
709     unsetenv("LISTEN_FDNAMES");
710     /*(upon graceful restart, unsetenv will result in no-op above)*/
711     return rc;
712 }
713 
714 int network_init(server *srv, int stdin_fd) {
715     /*(network params used during setup (from $SERVER["socket"] condition))*/
716     static const config_plugin_keys_t cpk[] = {
717       { CONST_STR_LEN("ssl.engine"),
718         T_CONFIG_BOOL,
719         T_CONFIG_SCOPE_SOCKET }
720      ,{ CONST_STR_LEN("server.listen-backlog"),
721         T_CONFIG_INT,
722         T_CONFIG_SCOPE_SOCKET }
723      ,{ CONST_STR_LEN("server.socket-perms"),
724         T_CONFIG_STRING,
725         T_CONFIG_SCOPE_SOCKET }
726      ,{ CONST_STR_LEN("server.bsd-accept-filter"),
727         T_CONFIG_STRING,
728         T_CONFIG_SCOPE_SOCKET }
729      ,{ CONST_STR_LEN("server.defer-accept"),
730         T_CONFIG_BOOL,
731         T_CONFIG_SCOPE_SOCKET }
732      ,{ CONST_STR_LEN("server.use-ipv6"),
733         T_CONFIG_BOOL,
734         T_CONFIG_SCOPE_SOCKET }
735      ,{ CONST_STR_LEN("server.set-v6only"),
736         T_CONFIG_BOOL,
737         T_CONFIG_SCOPE_SOCKET }
738      ,{ CONST_STR_LEN("server.v4mapped"),
739         T_CONFIG_BOOL,
740         T_CONFIG_SCOPE_SOCKET }
741      ,{ NULL, 0,
742         T_CONFIG_UNSET,
743         T_CONFIG_SCOPE_UNSET }
744     };
745 
746   #ifdef __WIN32
747     WSADATA wsaData;
748     WORD wVersionRequested = MAKEWORD(2, 2);
749     if (0 != WSAStartup(wVersionRequested, &wsaData)) {
750         /* Tell the user that we could not find a usable WinSock DLL */
751         return -1;
752     }
753   #endif
754 
755     if (0 != network_write_init(srv)) return -1;
756 
757     network_plugin_data np;
758     memset(&np, 0, sizeof(network_plugin_data));
759     network_plugin_data *p = &np;
760 
761     if (!config_plugin_values_init(srv, p, cpk, "network"))
762         return HANDLER_ERROR;
763 
764     p->defaults.listen_backlog = 1024;
765     p->defaults.defer_accept = 0;
766     p->defaults.use_ipv6 = 0;
767     p->defaults.set_v6only = 1;
768     p->defaults.v4mapped = -1; /*(-1 for unset; not 0 or 1)*/
769 
770     /* initialize p->defaults from global config context */
771     if (p->nconfig > 0 && p->cvlist->v.u2[1]) {
772         const config_plugin_value_t *cpv = p->cvlist + p->cvlist->v.u2[0];
773         if (-1 != cpv->k_id)
774             network_merge_config(&p->defaults, cpv);
775     }
776 
777     int rc = 0;
778     do {
779 
780         if (srv->srvconf.systemd_socket_activation) {
781             for (uint32_t i = 0; i < srv->srv_sockets_inherited.used; ++i) {
782                 srv->srv_sockets_inherited.ptr[i]->sidx = (unsigned short)~0u;
783             }
784             rc = network_socket_activation_from_env(srv, &p->defaults);
785             if (0 != rc) break;
786             if (0 == srv->srv_sockets_inherited.used) {
787                 srv->srvconf.systemd_socket_activation = 0;
788             }
789         }
790 
791         /* special-case srv->srvconf.bindhost = "/dev/stdin" (see server.c) */
792         if (-1 != stdin_fd) {
793             buffer *b = buffer_init();
794             buffer_copy_buffer(b, srv->srvconf.bindhost);
795             /*assert(buffer_eq_slen(b, CONST_STR_LEN("/dev/stdin")));*/
796             rc = (0 == srv->srv_sockets.used)
797               ? network_server_init(srv, &p->defaults, b, 0, stdin_fd)
798               : close(stdin_fd);/*(graceful restart listening to "/dev/stdin")*/
799             buffer_free(b);
800             if (0 != rc) break;
801         }
802 
803         /* check for $SERVER["socket"] */
804         for (uint32_t i = 1; i < srv->config_context->used; ++i) {
805             config_cond_info cfginfo;
806             config_get_config_cond_info(&cfginfo, i);
807             if (COMP_SERVER_SOCKET != cfginfo.comp) continue;/* not our stage */
808 
809             buffer *host_token;
810             *(const buffer **)&host_token = cfginfo.string;
811             /*(cfginfo.string is modified during config)*/
812 
813             memcpy(&p->conf, &p->defaults, sizeof(network_socket_config));
814             for (int j = !p->cvlist[0].v.u2[1]; j < p->nconfig; ++j) {
815                 if ((int)i != p->cvlist[j].k_id) continue;
816                 const config_plugin_value_t *cpv =
817                   p->cvlist + p->cvlist[j].v.u2[0];
818                 network_merge_config(&p->conf, cpv);
819                 break;
820             }
821 
822             if (cfginfo.cond == CONFIG_COND_EQ) {
823                 rc = network_server_init(srv, &p->conf, host_token, i, -1);
824                 if (0 != rc) break;
825             }
826             else if (cfginfo.cond == CONFIG_COND_NE) {
827                 socklen_t addr_len = sizeof(sock_addr);
828                 sock_addr addr;
829                 rc = network_host_parse_addr(srv, &addr, &addr_len,
830                                              host_token, p->conf.use_ipv6);
831                 if (0 != rc) break;
832                 network_host_normalize_addr_str(host_token, &addr, addr_len);
833             }
834         }
835         if (0 != rc) break;
836 
837         /* process srv->srvconf.bindhost
838          * init global config for server.bindhost and server.port after
839          * initializing $SERVER["socket"] so that if bindhost and port match
840          * another $SERVER["socket"], the $SERVER["socket"] config is used,
841          * as the $SERVER["socket"] config inherits from the global scope and
842          * can then be overridden.  (bindhost = "/dev/stdin" is handled above)
843          * (skip if systemd socket activation is enabled and bindhost is empty;
844          *  do not additionally listen on "*") */
845         if ((!srv->srvconf.systemd_socket_activation || srv->srvconf.bindhost)
846             && -1 == stdin_fd) {
847             buffer *b = buffer_init();
848             if (srv->srvconf.bindhost)
849                 buffer_copy_buffer(b, srv->srvconf.bindhost);
850             /*(skip adding port if unix socket path)*/
851             if (!b->ptr || (b->ptr[0] != '/' && b->ptr[0] != '\\')) {
852                 buffer_append_char(b, ':');
853                 buffer_append_int(b, srv->srvconf.port);
854             }
855           #ifdef __COVERITY__
856             force_assert(b->ptr);
857           #endif
858 
859             rc = network_server_init(srv, &p->defaults, b, 0, -1);
860             buffer_free(b);
861             if (0 != rc) break;
862         }
863 
864         if (srv->srvconf.systemd_socket_activation) {
865             /* activate any inherited sockets not explicitly listed in config */
866             server_socket *srv_socket;
867             for (uint32_t i = 0; i < srv->srv_sockets_inherited.used; ++i) {
868                     if ((unsigned short)~0u
869                         != srv->srv_sockets_inherited.ptr[i]->sidx)
870                         continue;
871                     srv->srv_sockets_inherited.ptr[i]->sidx = 0;
872                 srv_socket = calloc(1, sizeof(server_socket));
873                 force_assert(NULL != srv_socket);
874                 memcpy(srv_socket, srv->srv_sockets_inherited.ptr[i],
875                        sizeof(server_socket));
876                 /*(note: re-inits srv_socket->srv_token to new buffer ptr)*/
877                 network_srv_socket_init_token(srv_socket,srv_socket->srv_token);
878                 network_srv_sockets_append(srv, srv_socket);
879             }
880         }
881 
882     } while (0);
883 
884     free(p->cvlist);
885     return rc;
886 }
887 
888 void network_unregister_sock(server *srv, server_socket *srv_socket) {
889 	fdnode *fdn = srv_socket->fdn;
890 	if (NULL == fdn) return;
891 	fdevent_fdnode_event_del(srv->ev, fdn);
892 	fdevent_unregister(srv->ev, fdn->fd);
893 	srv_socket->fdn = NULL;
894 }
895 
896 int network_register_fdevents(server *srv) {
897 	if (-1 == fdevent_reset(srv->ev)) {
898 		return -1;
899 	}
900 
901 	if (srv->sockets_disabled) return 0; /* lighttpd -1 (one-shot mode) */
902 
903 	/* register fdevents after reset */
904 	for (uint32_t i = 0; i < srv->srv_sockets.used; ++i) {
905 		server_socket *srv_socket = srv->srv_sockets.ptr[i];
906 
907 		srv_socket->fdn = fdevent_register(srv->ev, srv_socket->fd, network_server_handle_fdevent, srv_socket);
908 		fdevent_fdnode_event_set(srv->ev, srv_socket->fdn, FDEVENT_IN);
909 	}
910 	return 0;
911 }
912