blob: 442d16a871ddb59e609dccd6ab252ffd3020e7cd [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreau289dd922013-04-03 02:26:31 +02003 * Copyright 2000-2013 Willy Tarreau <w@1wt.eu>.
Willy Tarreaubaaee002006-06-26 02:48:02 +02004 *
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License
7 * as published by the Free Software Foundation; either version
8 * 2 of the License, or (at your option) any later version.
9 *
10 * Please refer to RFC2068 or RFC2616 for informations about HTTP protocol, and
11 * RFC2965 for informations about cookies usage. More generally, the IETF HTTP
12 * Working Group's web site should be consulted for protocol related changes :
13 *
14 * http://ftp.ics.uci.edu/pub/ietf/http/
15 *
16 * Pending bugs (may be not fixed because never reproduced) :
17 * - solaris only : sometimes, an HTTP proxy with only a dispatch address causes
18 * the proxy to terminate (no core) if the client breaks the connection during
19 * the response. Seen on 1.1.8pre4, but never reproduced. May not be related to
20 * the snprintf() bug since requests were simple (GET / HTTP/1.0), but may be
21 * related to missing setsid() (fixed in 1.1.15)
22 * - a proxy with an invalid config will prevent the startup even if disabled.
23 *
24 * ChangeLog has moved to the CHANGELOG file.
25 *
Willy Tarreaubaaee002006-06-26 02:48:02 +020026 */
27
28#include <stdio.h>
29#include <stdlib.h>
30#include <unistd.h>
31#include <string.h>
32#include <ctype.h>
33#include <sys/time.h>
34#include <sys/types.h>
35#include <sys/socket.h>
36#include <netinet/tcp.h>
37#include <netinet/in.h>
38#include <arpa/inet.h>
39#include <netdb.h>
40#include <fcntl.h>
41#include <errno.h>
42#include <signal.h>
43#include <stdarg.h>
44#include <sys/resource.h>
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +010045#include <sys/wait.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020046#include <time.h>
47#include <syslog.h>
Michael Schererab012dd2013-01-12 18:35:19 +010048#include <grp.h>
Willy Tarreaufc6c0322012-11-16 16:12:27 +010049#ifdef USE_CPU_AFFINITY
50#define __USE_GNU
51#include <sched.h>
52#undef __USE_GNU
53#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +020054
55#ifdef DEBUG_FULL
56#include <assert.h>
57#endif
58
Willy Tarreau2dd0d472006-06-29 17:53:05 +020059#include <common/appsession.h>
60#include <common/base64.h>
61#include <common/cfgparse.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020062#include <common/chunk.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020063#include <common/compat.h>
64#include <common/config.h>
65#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010066#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020067#include <common/memory.h>
68#include <common/mini-clist.h>
69#include <common/regex.h>
70#include <common/standard.h>
71#include <common/time.h>
72#include <common/uri_auth.h>
73#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020074
75#include <types/capture.h>
76#include <types/global.h>
Simon Hormanac821422011-07-15 13:14:09 +090077#include <types/proto_tcp.h>
78#include <types/acl.h>
Willy Tarreau3c63fd82011-09-07 18:00:47 +020079#include <types/peers.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020080
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +010081#include <proto/auth.h>
Willy Tarreau0fc45a72007-06-17 00:36:03 +020082#include <proto/acl.h>
Willy Tarreau2e845be2012-10-19 19:49:09 +020083#include <proto/arg.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020084#include <proto/backend.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020085#include <proto/channel.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020086#include <proto/checks.h>
Willy Tarreauf2943dc2012-10-26 20:10:28 +020087#include <proto/connection.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020088#include <proto/fd.h>
Willy Tarreau34eb6712011-10-24 18:15:04 +020089#include <proto/hdr_idx.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020090#include <proto/listener.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020091#include <proto/log.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020092#include <proto/protocol.h>
Willy Tarreau80587432006-12-24 17:47:20 +010093#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020094#include <proto/proxy.h>
95#include <proto/queue.h>
96#include <proto/server.h>
Willy Tarreauc6ca1a02007-05-13 19:43:47 +020097#include <proto/session.h>
Willy Tarreau29857942009-05-10 09:01:21 +020098#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020099#include <proto/task.h>
100
Willy Tarreaub38651a2007-03-24 17:24:39 +0100101#ifdef CONFIG_HAP_CTTPROXY
102#include <proto/cttproxy.h>
103#endif
104
Emeric Brunfc0421f2012-09-07 17:30:07 +0200105#ifdef USE_OPENSSL
106#include <proto/ssl_sock.h>
107#endif
108
Willy Tarreaubaaee002006-06-26 02:48:02 +0200109/*********************************************************************/
110
Cyril Bonté6162c432012-11-10 19:27:47 +0100111extern const struct comp_algo comp_algos[];
112
Willy Tarreaubaaee002006-06-26 02:48:02 +0200113/*********************************************************************/
114
Willy Tarreau477ecd82010-01-03 21:12:30 +0100115/* list of config files */
116static struct list cfg_cfgfiles = LIST_HEAD_INIT(cfg_cfgfiles);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200117int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +0100118int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200119
120/* global options */
121struct global global = {
Willy Tarreau247a13a2012-11-15 17:38:15 +0100122 .nbproc = 1,
William Lallemand5f232402012-04-05 18:02:55 +0200123 .req_count = 0,
William Lallemand0f99e342011-10-12 17:50:54 +0200124 .logsrvs = LIST_HEAD_INIT(global.logsrvs),
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100125#ifdef DEFAULT_MAXZLIBMEM
Willy Tarreau5a940372012-12-03 12:10:45 +0100126 .maxzlibmem = DEFAULT_MAXZLIBMEM * 1024U * 1024U,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100127#else
William Lallemand9d5f5482012-11-07 16:12:57 +0100128 .maxzlibmem = 0,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100129#endif
William Lallemandd85f9172012-11-09 17:05:39 +0100130 .comp_rate_lim = 0,
Emeric Brun850efd52014-01-29 12:24:34 +0100131 .ssl_server_verify = SSL_SERVER_VERIFY_REQUIRED,
Emeric Bruned760922010-10-22 17:59:25 +0200132 .unix_bind = {
133 .ux = {
134 .uid = -1,
135 .gid = -1,
136 .mode = 0,
137 }
138 },
Willy Tarreau27a674e2009-08-17 07:23:33 +0200139 .tune = {
140 .bufsize = BUFSIZE,
141 .maxrewrite = MAXREWRITE,
Willy Tarreau43961d52010-10-04 20:39:20 +0200142 .chksize = BUFSIZE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200143#ifdef USE_OPENSSL
Emeric Brun46635772012-11-14 11:32:56 +0100144 .sslcachesize = SSLCACHESIZE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200145#endif
William Lallemanda509e4c2012-11-07 16:54:34 +0100146#ifdef USE_ZLIB
147 .zlibmemlevel = 8,
148 .zlibwindowsize = MAX_WBITS,
149#endif
William Lallemandf3747832012-11-09 12:33:10 +0100150 .comp_maxlevel = 1,
William Lallemanda509e4c2012-11-07 16:54:34 +0100151
152
Willy Tarreau27a674e2009-08-17 07:23:33 +0200153 },
Emeric Brun76d88952012-10-05 15:47:31 +0200154#ifdef USE_OPENSSL
155#ifdef DEFAULT_MAXSSLCONN
Willy Tarreau403edff2012-09-06 11:58:37 +0200156 .maxsslconn = DEFAULT_MAXSSLCONN,
157#endif
Emeric Brun76d88952012-10-05 15:47:31 +0200158#ifdef LISTEN_DEFAULT_CIPHERS
159 .listen_default_ciphers = LISTEN_DEFAULT_CIPHERS,
160#endif
161#ifdef CONNECT_DEFAULT_CIPHERS
162 .connect_default_ciphers = CONNECT_DEFAULT_CIPHERS,
163#endif
164#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200165 /* others NULL OK */
166};
167
168/*********************************************************************/
169
170int stopping; /* non zero means stopping in progress */
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200171int jobs = 0; /* number of active jobs (conns, listeners, active tasks, ...) */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200172
173/* Here we store informations about the pids of the processes we may pause
174 * or kill. We will send them a signal every 10 ms until we can bind to all
175 * our ports. With 200 retries, that's about 2 seconds.
176 */
177#define MAX_START_RETRIES 200
Willy Tarreaubaaee002006-06-26 02:48:02 +0200178static int *oldpids = NULL;
179static int oldpids_sig; /* use USR1 or TERM */
180
181/* this is used to drain data, and as a temporary buffer for sprintf()... */
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100182struct chunk trash = { };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200183
Willy Tarreau8096de92010-02-26 11:12:27 +0100184/* this buffer is always the same size as standard buffers and is used for
185 * swapping data inside a buffer.
186 */
187char *swap_buffer = NULL;
188
Willy Tarreaubb545b42010-08-25 12:58:59 +0200189int nb_oldpids = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200190const int zero = 0;
191const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200192const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200193
Willy Tarreau1d21e0a2010-03-12 21:58:54 +0100194char hostname[MAX_HOSTNAME_LEN];
Emeric Brun2b920a12010-09-23 18:30:22 +0200195char localpeer[MAX_HOSTNAME_LEN];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200196
Willy Tarreau89efaed2013-12-13 15:14:55 +0100197/* used from everywhere just to drain results we don't want to read and which
198 * recent versions of gcc increasingly and annoyingly complain about.
199 */
200int shut_your_big_mouth_gcc_int = 0;
201
Willy Tarreau08ceb102011-07-24 22:58:00 +0200202/* list of the temporarily limited listeners because of lack of resource */
203struct list global_listener_queue = LIST_HEAD_INIT(global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +0200204struct task *global_listener_queue_task;
205static struct task *manage_global_listener_queue(struct task *t);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200206
207/*********************************************************************/
208/* general purpose functions ***************************************/
209/*********************************************************************/
210
211void display_version()
212{
213 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreau289dd922013-04-03 02:26:31 +0200214 printf("Copyright 2000-2013 Willy Tarreau <w@1wt.eu>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200215}
216
Willy Tarreau7b066db2007-12-02 11:28:59 +0100217void display_build_opts()
218{
219 printf("Build options :"
220#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100221 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100222#endif
223#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100224 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100225#endif
226#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100227 "\n CC = " BUILD_CC
228#endif
229#ifdef BUILD_CFLAGS
230 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100231#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100232#ifdef BUILD_OPTIONS
233 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100234#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200235 "\n\nDefault settings :"
236 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
237 "\n\n",
238 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200239
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100240 printf("Encrypted password support via crypt(3): "
241#ifdef CONFIG_HAP_CRYPT
242 "yes"
243#else
244 "no"
245#endif
246 "\n");
247
Cyril Bonté6162c432012-11-10 19:27:47 +0100248#ifdef USE_ZLIB
249 printf("Built with zlib version : " ZLIB_VERSION "\n");
250#else /* USE_ZLIB */
251 printf("Built without zlib support (USE_ZLIB not set)\n");
252#endif
253 printf("Compression algorithms supported :");
254 {
255 int i;
256
257 for (i = 0; comp_algos[i].name; i++) {
258 printf("%s %s", (i == 0 ? "" : ","), comp_algos[i].name);
259 }
260 if (i == 0) {
261 printf("none");
262 }
263 }
264 printf("\n");
265
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200266#ifdef USE_OPENSSL
267 printf("Built with OpenSSL version : " OPENSSL_VERSION_TEXT "\n");
Willy Tarreau0cff0db2013-04-26 18:16:13 +0200268 printf("Running on OpenSSL version : %s%s\n",
269 SSLeay_version(SSLEAY_VERSION),
270 ((OPENSSL_VERSION_NUMBER ^ SSLeay()) >> 8) ? " (VERSIONS DIFFER!)" : "");
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200271 printf("OpenSSL library supports TLS extensions : "
272#if OPENSSL_VERSION_NUMBER < 0x00907000L
273 "no (library version too old)"
274#elif defined(OPENSSL_NO_TLSEXT)
275 "no (disabled via OPENSSL_NO_TLSEXT)"
276#else
277 "yes"
278#endif
279 "\n");
280 printf("OpenSSL library supports SNI : "
281#ifdef SSL_CTRL_SET_TLSEXT_HOSTNAME
282 "yes"
283#else
284#ifdef OPENSSL_NO_TLSEXT
285 "no (because of OPENSSL_NO_TLSEXT)"
286#else
287 "no (version might be too old, 0.9.8f min needed)"
288#endif
289#endif
290 "\n");
291 printf("OpenSSL library supports prefer-server-ciphers : "
292#ifdef SSL_OP_CIPHER_SERVER_PREFERENCE
293 "yes"
294#else
295 "no (0.9.7 or later needed)"
296#endif
297 "\n");
298#else /* USE_OPENSSL */
299 printf("Built without OpenSSL support (USE_OPENSSL not set)\n");
300#endif
Lukas Tribusea68d362013-04-04 12:24:16 +0200301
302#ifdef USE_PCRE
303 printf("Built with PCRE version : %s", pcre_version());
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200304 printf("\nPCRE library supports JIT : ");
305#ifdef USE_PCRE_JIT
306 {
307 int r;
308 pcre_config(PCRE_CONFIG_JIT, &r);
309 if (r)
310 printf("yes");
311 else
312 printf("no (libpcre build without JIT?)");
313 }
Lukas Tribusea68d362013-04-04 12:24:16 +0200314#else
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200315 printf("no (USE_PCRE_JIT not set)");
Lukas Tribusea68d362013-04-04 12:24:16 +0200316#endif
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200317 printf("\n");
Lukas Tribusea68d362013-04-04 12:24:16 +0200318#else
319 printf("Built without PCRE support (using libc's regex instead)\n");
320#endif
321
Pieter Baauwd551fb52013-05-08 22:49:23 +0200322#if defined(CONFIG_HAP_TRANSPARENT) || defined(CONFIG_HAP_CTTPROXY)
323 printf("Built with transparent proxy support using:"
324#if defined(CONFIG_HAP_CTTPROXY)
325 " CTTPROXY"
326#endif
327#if defined(IP_TRANSPARENT)
328 " IP_TRANSPARENT"
329#endif
330#if defined(IPV6_TRANSPARENT)
331 " IPV6_TRANSPARENT"
332#endif
333#if defined(IP_FREEBIND)
334 " IP_FREEBIND"
335#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200336#if defined(IP_BINDANY)
337 " IP_BINDANY"
338#endif
339#if defined(IPV6_BINDANY)
340 " IPV6_BINDANY"
341#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200342#if defined(SO_BINDANY)
343 " SO_BINDANY"
344#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200345 "\n");
346#endif
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100347 putchar('\n');
348
Willy Tarreaube5b6852009-10-03 18:57:08 +0200349 list_pollers(stdout);
350 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100351}
352
Willy Tarreaubaaee002006-06-26 02:48:02 +0200353/*
354 * This function prints the command line usage and exits
355 */
356void usage(char *name)
357{
358 display_version();
359 fprintf(stderr,
Willy Tarreau5d01a632009-06-22 16:02:30 +0200360 "Usage : %s [-f <cfgfile>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200361 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200362 " [ -p <pidfile> ] [ -m <max megs> ] [ -C <dir> ]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100363 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200364 " -d enters debug mode ; -db only disables background mode.\n"
Willy Tarreau6e064432012-05-08 15:40:42 +0200365 " -dM[<byte>] poisons memory with <byte> (defaults to 0x50)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200366 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200367 " -D goes daemon ; -C changes to <dir> before loading files.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200368 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200369 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200370 " -n sets the maximum total # of connections (%d)\n"
371 " -m limits the usable amount of memory (in MB)\n"
372 " -N sets the default, per-proxy maximum # of connections (%d)\n"
Emeric Brun2b920a12010-09-23 18:30:22 +0200373 " -L set local peer name (default to hostname)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200374 " -p writes pids of all children to this file\n"
375#if defined(ENABLE_EPOLL)
376 " -de disables epoll() usage even when available\n"
377#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200378#if defined(ENABLE_KQUEUE)
379 " -dk disables kqueue() usage even when available\n"
380#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200381#if defined(ENABLE_POLL)
382 " -dp disables poll() usage even when available\n"
383#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200384#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100385 " -dS disables splice usage (broken on old kernels)\n"
386#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100387 " -dV disables SSL verify on servers side\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200388 " -sf/-st [pid ]* finishes/terminates old pids. Must be last arguments.\n"
389 "\n",
390 name, DEFAULT_MAXCONN, cfg_maxpconn);
391 exit(1);
392}
393
394
395
396/*********************************************************************/
397/* more specific functions ***************************************/
398/*********************************************************************/
399
400/*
Willy Tarreaud0807c32010-08-27 18:26:11 +0200401 * upon SIGUSR1, let's have a soft stop. Note that soft_stop() broadcasts
402 * a signal zero to all subscribers. This means that it's as easy as
403 * subscribing to signal 0 to get informed about an imminent shutdown.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200404 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200405void sig_soft_stop(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200406{
407 soft_stop();
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200408 signal_unregister_handler(sh);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200409 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200410}
411
412/*
413 * upon SIGTTOU, we pause everything
414 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200415void sig_pause(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200416{
417 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200418 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200419}
420
421/*
422 * upon SIGTTIN, let's have a soft stop.
423 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200424void sig_listen(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200425{
Willy Tarreaube58c382011-07-24 18:28:10 +0200426 resume_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200427}
428
429/*
430 * this function dumps every server's state when the process receives SIGHUP.
431 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200432void sig_dump_state(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200433{
434 struct proxy *p = proxy;
435
436 Warning("SIGHUP received, dumping servers states.\n");
437 while (p) {
438 struct server *s = p->srv;
439
440 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
441 while (s) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100442 chunk_printf(&trash,
443 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
444 p->id, s->id,
445 (s->state & SRV_RUNNING) ? "UP" : "DOWN",
446 s->cur_sess, s->nbpend, s->counters.cum_sess);
447 Warning("%s\n", trash.str);
448 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200449 s = s->next;
450 }
451
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200452 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
453 if (!p->srv) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100454 chunk_printf(&trash,
455 "SIGHUP: Proxy %s has no servers. Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
456 p->id,
457 p->feconn, p->beconn, p->totpend, p->nbpend, p->fe_counters.cum_conn, p->be_counters.cum_conn);
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200458 } else if (p->srv_act == 0) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100459 chunk_printf(&trash,
460 "SIGHUP: Proxy %s %s ! Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
461 p->id,
462 (p->srv_bck) ? "is running on backup servers" : "has no server available",
463 p->feconn, p->beconn, p->totpend, p->nbpend, p->fe_counters.cum_conn, p->be_counters.cum_conn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200464 } else {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100465 chunk_printf(&trash,
466 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
467 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
468 p->id, p->srv_act, p->srv_bck,
469 p->feconn, p->beconn, p->totpend, p->nbpend, p->fe_counters.cum_conn, p->be_counters.cum_conn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200470 }
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100471 Warning("%s\n", trash.str);
472 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200473
474 p = p->next;
475 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200476}
477
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200478void dump(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200479{
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200480 /* dump memory usage then free everything possible */
481 dump_pools();
482 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200483}
484
Willy Tarreaubaaee002006-06-26 02:48:02 +0200485/*
486 * This function initializes all the necessary variables. It only returns
487 * if everything is OK. If something fails, it exits.
488 */
489void init(int argc, char **argv)
490{
Willy Tarreaubaaee002006-06-26 02:48:02 +0200491 int arg_mode = 0; /* MODE_DEBUG, ... */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200492 char *tmp;
493 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200494 int err_code = 0;
Willy Tarreau477ecd82010-01-03 21:12:30 +0100495 struct wordlist *wl;
Kevinm48936af2010-12-22 16:08:21 +0000496 char *progname;
Willy Tarreau576132e2011-09-10 19:26:56 +0200497 char *change_dir = NULL;
Yuxans Yao4e25b012012-10-19 10:36:09 +0800498 struct tm curtime;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200499
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100500 chunk_init(&trash, malloc(global.tune.bufsize), global.tune.bufsize);
Willy Tarreau2819e992013-12-13 14:41:10 +0100501 alloc_trash_buffers(global.tune.bufsize);
David du Colombier7af46052012-05-16 14:16:48 +0200502
Emeric Brun2b920a12010-09-23 18:30:22 +0200503 /* NB: POSIX does not make it mandatory for gethostname() to NULL-terminate
504 * the string in case of truncation, and at least FreeBSD appears not to do
505 * it.
506 */
507 memset(hostname, 0, sizeof(hostname));
508 gethostname(hostname, sizeof(hostname) - 1);
509 memset(localpeer, 0, sizeof(localpeer));
510 memcpy(localpeer, hostname, (sizeof(hostname) > sizeof(localpeer) ? sizeof(localpeer) : sizeof(hostname)) - 1);
511
Willy Tarreaubaaee002006-06-26 02:48:02 +0200512 /*
513 * Initialize the previously static variables.
514 */
515
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100516 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200517
518
519#ifdef HAPROXY_MEMMAX
520 global.rlimit_memmax = HAPROXY_MEMMAX;
521#endif
522
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200523 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200524 start_date = now;
525
Yuxans Yao4e25b012012-10-19 10:36:09 +0800526 /* Get the numeric timezone. */
527 get_localtime(start_date.tv_sec, &curtime);
528 strftime(localtimezone, 6, "%z", &curtime);
529
Willy Tarreau29857942009-05-10 09:01:21 +0200530 signal_init();
Willy Tarreau8ed669b2013-01-11 15:49:37 +0100531 if (init_acl() != 0)
532 exit(1);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200533 init_task();
534 init_session();
Willy Tarreauf2943dc2012-10-26 20:10:28 +0200535 init_connection();
Willy Tarreau8280d642009-09-23 23:37:52 +0200536 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200537 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100538 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200539
Willy Tarreau43b78992009-01-25 15:42:27 +0100540 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200541#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100542 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200543#endif
544#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100545 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200546#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200547#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100548 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200549#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200550#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100551 global.tune.options |= GTUNE_USE_SPLICE;
552#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200553
554 pid = getpid();
555 progname = *argv;
556 while ((tmp = strchr(progname, '/')) != NULL)
557 progname = tmp + 1;
558
Kevinm48936af2010-12-22 16:08:21 +0000559 /* the process name is used for the logs only */
560 global.log_tag = strdup(progname);
561
Willy Tarreaubaaee002006-06-26 02:48:02 +0200562 argc--; argv++;
563 while (argc > 0) {
564 char *flag;
565
566 if (**argv == '-') {
567 flag = *argv+1;
568
569 /* 1 arg */
570 if (*flag == 'v') {
571 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100572 if (flag[1] == 'v') /* -vv */
573 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200574 exit(0);
575 }
576#if defined(ENABLE_EPOLL)
577 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100578 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200579#endif
580#if defined(ENABLE_POLL)
581 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100582 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200583#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200584#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200585 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100586 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200587#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200588#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100589 else if (*flag == 'd' && flag[1] == 'S')
590 global.tune.options &= ~GTUNE_USE_SPLICE;
591#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100592 else if (*flag == 'd' && flag[1] == 'V')
593 global.ssl_server_verify = SSL_SERVER_VERIFY_NONE;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200594 else if (*flag == 'V')
595 arg_mode |= MODE_VERBOSE;
596 else if (*flag == 'd' && flag[1] == 'b')
597 arg_mode |= MODE_FOREGROUND;
Willy Tarreau6e064432012-05-08 15:40:42 +0200598 else if (*flag == 'd' && flag[1] == 'M')
599 mem_poison_byte = flag[2] ? strtol(flag + 2, NULL, 0) : 'P';
Willy Tarreaubaaee002006-06-26 02:48:02 +0200600 else if (*flag == 'd')
601 arg_mode |= MODE_DEBUG;
602 else if (*flag == 'c')
603 arg_mode |= MODE_CHECK;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100604 else if (*flag == 'D') {
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200605 arg_mode |= MODE_DAEMON;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100606 if (flag[1] == 's') /* -Ds */
607 arg_mode |= MODE_SYSTEMD;
608 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200609 else if (*flag == 'q')
610 arg_mode |= MODE_QUIET;
611 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
612 /* list of pids to finish ('f') or terminate ('t') */
613
614 if (flag[1] == 'f')
615 oldpids_sig = SIGUSR1; /* finish then exit */
616 else
617 oldpids_sig = SIGTERM; /* terminate immediately */
618 argv++; argc--;
619
620 if (argc > 0) {
621 oldpids = calloc(argc, sizeof(int));
622 while (argc > 0) {
623 oldpids[nb_oldpids] = atol(*argv);
624 if (oldpids[nb_oldpids] <= 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200625 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200626 argc--; argv++;
627 nb_oldpids++;
628 }
629 }
630 }
631 else { /* >=2 args */
632 argv++; argc--;
633 if (argc == 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200634 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200635
636 switch (*flag) {
Willy Tarreau576132e2011-09-10 19:26:56 +0200637 case 'C' : change_dir = *argv; break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200638 case 'n' : cfg_maxconn = atol(*argv); break;
639 case 'm' : global.rlimit_memmax = atol(*argv); break;
640 case 'N' : cfg_maxpconn = atol(*argv); break;
Emeric Brun2b920a12010-09-23 18:30:22 +0200641 case 'L' : strncpy(localpeer, *argv, sizeof(localpeer) - 1); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200642 case 'f' :
Willy Tarreau477ecd82010-01-03 21:12:30 +0100643 wl = (struct wordlist *)calloc(1, sizeof(*wl));
644 if (!wl) {
645 Alert("Cannot load configuration file %s : out of memory.\n", *argv);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200646 exit(1);
647 }
Willy Tarreau477ecd82010-01-03 21:12:30 +0100648 wl->s = *argv;
649 LIST_ADDQ(&cfg_cfgfiles, &wl->list);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200650 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200651 case 'p' : cfg_pidfile = *argv; break;
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200652 default: usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200653 }
654 }
655 }
656 else
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200657 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200658 argv++; argc--;
659 }
660
661 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100662 (arg_mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_FOREGROUND | MODE_VERBOSE
Willy Tarreaubaaee002006-06-26 02:48:02 +0200663 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
664
Willy Tarreau477ecd82010-01-03 21:12:30 +0100665 if (LIST_ISEMPTY(&cfg_cfgfiles))
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200666 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200667
Willy Tarreau576132e2011-09-10 19:26:56 +0200668 if (change_dir && chdir(change_dir) < 0) {
669 Alert("Could not change to directory %s : %s\n", change_dir, strerror(errno));
670 exit(1);
671 }
672
Willy Tarreaubaaee002006-06-26 02:48:02 +0200673 have_appsession = 0;
674 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200675
676 init_default_instance();
677
Willy Tarreau477ecd82010-01-03 21:12:30 +0100678 list_for_each_entry(wl, &cfg_cfgfiles, list) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100679 int ret;
680
Willy Tarreau477ecd82010-01-03 21:12:30 +0100681 ret = readcfgfile(wl->s);
Willy Tarreauc4382422009-12-06 13:10:44 +0100682 if (ret == -1) {
683 Alert("Could not open configuration file %s : %s\n",
Willy Tarreau477ecd82010-01-03 21:12:30 +0100684 wl->s, strerror(errno));
Willy Tarreauc4382422009-12-06 13:10:44 +0100685 exit(1);
686 }
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100687 if (ret & (ERR_ABORT|ERR_FATAL))
Willy Tarreau477ecd82010-01-03 21:12:30 +0100688 Alert("Error(s) found in configuration file : %s\n", wl->s);
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100689 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200690 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200691 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200692 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200693
Willy Tarreaubb925012009-07-23 13:36:36 +0200694 err_code |= check_config_validity();
695 if (err_code & (ERR_ABORT|ERR_FATAL)) {
696 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200697 exit(1);
698 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200699
700 if (global.mode & MODE_CHECK) {
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100701 struct peers *pr;
702 struct proxy *px;
703
704 for (pr = peers; pr; pr = pr->next)
705 if (pr->peers_fe)
706 break;
707
708 for (px = proxy; px; px = px->next)
Willy Tarreau4348fad2012-09-20 16:48:07 +0200709 if (px->state == PR_STNEW && !LIST_ISEMPTY(&px->conf.listeners))
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100710 break;
711
712 if (pr || px) {
713 /* At least one peer or one listener has been found */
714 qfprintf(stdout, "Configuration file is valid\n");
715 exit(0);
716 }
717 qfprintf(stdout, "Configuration file has no error but will not start (no listener) => exit(2).\n");
718 exit(2);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200719 }
720
Willy Tarreaue9b26022011-08-01 20:57:55 +0200721 global_listener_queue_task = task_new();
722 if (!global_listener_queue_task) {
723 Alert("Out of memory when initializing global task\n");
724 exit(1);
725 }
726 /* very simple initialization, users will queue the task if needed */
727 global_listener_queue_task->context = NULL; /* not even a context! */
728 global_listener_queue_task->process = manage_global_listener_queue;
729 global_listener_queue_task->expire = TICK_ETERNITY;
730
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200731 /* now we know the buffer size, we can initialize the channels and buffers */
732 init_channel();
Willy Tarreau9b28e032012-10-12 23:49:43 +0200733 init_buffer();
Willy Tarreau8280d642009-09-23 23:37:52 +0200734
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200735 if (have_appsession)
736 appsession_init();
737
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200738 if (start_checks() < 0)
739 exit(1);
740
Willy Tarreaubaaee002006-06-26 02:48:02 +0200741 if (cfg_maxconn > 0)
742 global.maxconn = cfg_maxconn;
743
744 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200745 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200746 global.pidfile = strdup(cfg_pidfile);
747 }
748
749 if (global.maxconn == 0)
750 global.maxconn = DEFAULT_MAXCONN;
751
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100752 if (!global.maxpipes) {
753 /* maxpipes not specified. Count how many frontends and backends
754 * may be using splicing, and bound that to maxconn.
755 */
756 struct proxy *cur;
757 int nbfe = 0, nbbe = 0;
758
759 for (cur = proxy; cur; cur = cur->next) {
760 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
761 if (cur->cap & PR_CAP_FE)
762 nbfe += cur->maxconn;
763 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +0100764 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100765 }
766 }
767 global.maxpipes = MAX(nbfe, nbbe);
768 if (global.maxpipes > global.maxconn)
769 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +0100770 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100771 }
772
773
Willy Tarreauabacc2c2011-09-07 14:26:33 +0200774 global.hardmaxconn = global.maxconn; /* keep this max value */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200775 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +0100776 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200777
Willy Tarreau3c63fd82011-09-07 18:00:47 +0200778 if (global.stats_fe)
779 global.maxsock += global.stats_fe->maxconn;
780
781 if (peers) {
782 /* peers also need to bypass global maxconn */
783 struct peers *p = peers;
784
785 for (p = peers; p; p = p->next)
786 if (p->peers_fe)
787 global.maxsock += p->peers_fe->maxconn;
788 }
789
Willy Tarreau1db37712007-06-03 17:16:49 +0200790 if (global.tune.maxpollevents <= 0)
791 global.tune.maxpollevents = MAX_POLL_EVENTS;
792
Willy Tarreau6f4a82c2009-03-21 20:43:57 +0100793 if (global.tune.recv_enough == 0)
794 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
795
Willy Tarreau27a674e2009-08-17 07:23:33 +0200796 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
797 global.tune.maxrewrite = global.tune.bufsize / 2;
798
Willy Tarreaubaaee002006-06-26 02:48:02 +0200799 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
800 /* command line debug mode inhibits configuration mode */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100801 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreau772f0dd2012-10-26 16:04:28 +0200802 global.mode |= (arg_mode & (MODE_DEBUG | MODE_FOREGROUND));
803 }
804
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100805 if (arg_mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau772f0dd2012-10-26 16:04:28 +0200806 /* command line daemon mode inhibits foreground and debug modes mode */
807 global.mode &= ~(MODE_DEBUG | MODE_FOREGROUND);
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100808 global.mode |= (arg_mode & (MODE_DAEMON | MODE_SYSTEMD));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200809 }
Willy Tarreau772f0dd2012-10-26 16:04:28 +0200810
811 global.mode |= (arg_mode & (MODE_QUIET | MODE_VERBOSE));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200812
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100813 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET))) {
814 Warning("<debug> mode incompatible with <quiet>, <daemon> and <systemd>. Keeping <debug> only.\n");
815 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200816 }
817
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100818 if ((global.nbproc > 1) && !(global.mode & (MODE_DAEMON | MODE_SYSTEMD))) {
Willy Tarreaubaaee002006-06-26 02:48:02 +0200819 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
820 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
821 global.nbproc = 1;
822 }
823
824 if (global.nbproc < 1)
825 global.nbproc = 1;
826
Willy Tarreau8096de92010-02-26 11:12:27 +0100827 swap_buffer = (char *)calloc(1, global.tune.bufsize);
Willy Tarreau7e2c6472012-10-29 20:44:36 +0100828 get_http_auth_buff = (char *)calloc(1, global.tune.bufsize);
Willy Tarreau07115412012-10-29 21:56:59 +0100829 static_table_key = calloc(1, sizeof(*static_table_key) + global.tune.bufsize);
Willy Tarreau8096de92010-02-26 11:12:27 +0100830
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200831 fdinfo = (struct fdinfo *)calloc(1,
832 sizeof(struct fdinfo) * (global.maxsock));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200833 fdtab = (struct fdtab *)calloc(1,
834 sizeof(struct fdtab) * (global.maxsock));
Willy Tarreauef1d1f82007-04-16 00:25:25 +0200835 /*
836 * Note: we could register external pollers here.
837 * Built-in pollers have been registered before main().
838 */
Willy Tarreau4f60f162007-04-08 16:39:58 +0200839
Willy Tarreau43b78992009-01-25 15:42:27 +0100840 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200841 disable_poller("kqueue");
842
Willy Tarreau43b78992009-01-25 15:42:27 +0100843 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200844 disable_poller("epoll");
845
Willy Tarreau43b78992009-01-25 15:42:27 +0100846 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200847 disable_poller("poll");
848
Willy Tarreau43b78992009-01-25 15:42:27 +0100849 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200850 disable_poller("select");
851
852 /* Note: we could disable any poller by name here */
853
Willy Tarreau2ff76222007-04-09 19:29:56 +0200854 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
855 list_pollers(stderr);
856
Willy Tarreau4f60f162007-04-08 16:39:58 +0200857 if (!init_pollers()) {
Willy Tarreau3fa87b12013-03-31 14:41:15 +0200858 Alert("No polling mechanism available.\n"
859 " It is likely that haproxy was built with TARGET=generic and that FD_SETSIZE\n"
860 " is too low on this platform to support maxconn and the number of listeners\n"
861 " and servers. You should rebuild haproxy specifying your system using TARGET=\n"
862 " in order to support other polling systems (poll, epoll, kqueue) or reduce the\n"
Prach Pongpanichb837e682013-05-14 20:56:28 +0200863 " global maxconn setting to accommodate the system's limitation. For reference,\n"
Willy Tarreau3fa87b12013-03-31 14:41:15 +0200864 " FD_SETSIZE=%d on this system, global.maxconn=%d resulting in a maximum of\n"
865 " %d file descriptors. You should thus reduce global.maxconn by %d. Also,\n"
866 " check build settings using 'haproxy -vv'.\n\n",
867 FD_SETSIZE, global.maxconn, global.maxsock, (global.maxsock + 1 - FD_SETSIZE) / 2);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200868 exit(1);
869 }
Willy Tarreau2ff76222007-04-09 19:29:56 +0200870 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
871 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200872 }
873
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200874 if (!global.node)
875 global.node = strdup(hostname);
876
Willy Tarreaubaaee002006-06-26 02:48:02 +0200877}
878
Simon Horman6fb82592011-07-15 13:14:11 +0900879static void deinit_acl_cond(struct acl_cond *cond)
Simon Hormanac821422011-07-15 13:14:09 +0900880{
Simon Hormanac821422011-07-15 13:14:09 +0900881 struct acl_term_suite *suite, *suiteb;
882 struct acl_term *term, *termb;
883
Simon Horman6fb82592011-07-15 13:14:11 +0900884 if (!cond)
885 return;
886
887 list_for_each_entry_safe(suite, suiteb, &cond->suites, list) {
888 list_for_each_entry_safe(term, termb, &suite->terms, list) {
889 LIST_DEL(&term->list);
890 free(term);
Simon Hormanac821422011-07-15 13:14:09 +0900891 }
Simon Horman6fb82592011-07-15 13:14:11 +0900892 LIST_DEL(&suite->list);
893 free(suite);
894 }
895
896 free(cond);
897}
898
899static void deinit_tcp_rules(struct list *rules)
900{
901 struct tcp_rule *trule, *truleb;
902
903 list_for_each_entry_safe(trule, truleb, rules, list) {
Simon Hormanac821422011-07-15 13:14:09 +0900904 LIST_DEL(&trule->list);
Simon Horman6fb82592011-07-15 13:14:11 +0900905 deinit_acl_cond(trule->cond);
Simon Hormanac821422011-07-15 13:14:09 +0900906 free(trule);
907 }
908}
909
Willy Tarreau12785782012-04-27 21:37:17 +0200910static void deinit_sample_arg(struct arg *p)
Simon Horman6fb82592011-07-15 13:14:11 +0900911{
Willy Tarreauf9954102012-04-20 14:03:29 +0200912 struct arg *p_back = p;
913
Simon Horman6fb82592011-07-15 13:14:11 +0900914 if (!p)
915 return;
916
Willy Tarreauf9954102012-04-20 14:03:29 +0200917 while (p->type != ARGT_STOP) {
Willy Tarreau496aa012012-06-01 10:38:29 +0200918 if (p->type == ARGT_STR || p->unresolved) {
Willy Tarreauf9954102012-04-20 14:03:29 +0200919 free(p->data.str.str);
920 p->data.str.str = NULL;
Willy Tarreau496aa012012-06-01 10:38:29 +0200921 p->unresolved = 0;
Willy Tarreauecfb8e82012-04-20 12:29:52 +0200922 }
Willy Tarreauf9954102012-04-20 14:03:29 +0200923 p++;
Willy Tarreauecfb8e82012-04-20 12:29:52 +0200924 }
Simon Horman6fb82592011-07-15 13:14:11 +0900925
Willy Tarreau2e845be2012-10-19 19:49:09 +0200926 if (p_back != empty_arg_list)
927 free(p_back);
Simon Horman6fb82592011-07-15 13:14:11 +0900928}
929
930static void deinit_stick_rules(struct list *rules)
931{
932 struct sticking_rule *rule, *ruleb;
933
934 list_for_each_entry_safe(rule, ruleb, rules, list) {
935 LIST_DEL(&rule->list);
936 deinit_acl_cond(rule->cond);
937 if (rule->expr) {
Willy Tarreau12785782012-04-27 21:37:17 +0200938 struct sample_conv_expr *conv_expr, *conv_exprb;
Simon Horman6fb82592011-07-15 13:14:11 +0900939 list_for_each_entry_safe(conv_expr, conv_exprb, &rule->expr->conv_exprs, list)
Willy Tarreau12785782012-04-27 21:37:17 +0200940 deinit_sample_arg(conv_expr->arg_p);
941 deinit_sample_arg(rule->expr->arg_p);
Simon Horman6fb82592011-07-15 13:14:11 +0900942 free(rule->expr);
943 }
944 free(rule);
945 }
946}
947
Willy Tarreaubaaee002006-06-26 02:48:02 +0200948void deinit(void)
949{
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200950 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200951 struct cap_hdr *h,*h_next;
952 struct server *s,*s_next;
953 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200954 struct acl_cond *cond, *condb;
955 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200956 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200957 struct switching_rule *rule, *ruleb;
Willy Tarreau4a5cade2012-04-05 21:09:48 +0200958 struct server_rule *srule, *sruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200959 struct redirect_rule *rdr, *rdrb;
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100960 struct wordlist *wl, *wlb;
Willy Tarreauf4f04122010-01-28 18:10:50 +0100961 struct cond_wordlist *cwl, *cwlb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200962 struct uri_auth *uap, *ua = NULL;
William Lallemand0f99e342011-10-12 17:50:54 +0200963 struct logsrv *log, *logb;
William Lallemand723b73a2012-02-08 16:37:49 +0100964 struct logformat_node *lf, *lfb;
Willy Tarreau2a65ff02012-09-13 17:54:29 +0200965 struct bind_conf *bind_conf, *bind_back;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200966 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200967
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200968 deinit_signals();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200969 while (p) {
Willy Tarreau8113a5d2012-10-04 08:01:43 +0200970 free(p->conf.file);
Willy Tarreaua534fea2008-08-03 12:19:50 +0200971 free(p->id);
972 free(p->check_req);
973 free(p->cookie_name);
974 free(p->cookie_domain);
975 free(p->url_param_name);
976 free(p->capture_name);
977 free(p->monitor_uri);
Simon Hormana31c7f72011-07-15 13:14:08 +0900978 free(p->rdp_cookie_name);
Willy Tarreau62a61232013-04-12 18:13:46 +0200979 if (p->conf.logformat_string != default_http_log_format &&
980 p->conf.logformat_string != default_tcp_log_format &&
981 p->conf.logformat_string != clf_http_log_format)
982 free(p->conf.logformat_string);
Willy Tarreau196729e2012-05-31 19:30:26 +0200983
Willy Tarreau62a61232013-04-12 18:13:46 +0200984 free(p->conf.lfs_file);
985 free(p->conf.uniqueid_format_string);
986 free(p->conf.uif_file);
Godbachaf1a75d2013-10-02 17:10:11 +0800987 free(p->lbprm.map.srv);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200988
Willy Tarreaua534fea2008-08-03 12:19:50 +0200989 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +0200990 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200991
Willy Tarreauf4f04122010-01-28 18:10:50 +0100992 list_for_each_entry_safe(cwl, cwlb, &p->req_add, list) {
993 LIST_DEL(&cwl->list);
994 free(cwl->s);
995 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100996 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200997
Willy Tarreauf4f04122010-01-28 18:10:50 +0100998 list_for_each_entry_safe(cwl, cwlb, &p->rsp_add, list) {
999 LIST_DEL(&cwl->list);
1000 free(cwl->s);
1001 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001002 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001003
1004 list_for_each_entry_safe(cond, condb, &p->block_cond, list) {
1005 LIST_DEL(&cond->list);
1006 prune_acl_cond(cond);
1007 free(cond);
1008 }
1009
Willy Tarreaub80c2302007-11-30 20:51:32 +01001010 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
1011 LIST_DEL(&cond->list);
1012 prune_acl_cond(cond);
1013 free(cond);
1014 }
1015
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001016 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001017 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001018 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001019 free((regex_t *)exp->preg);
1020 }
1021
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001022 if (exp->replace && exp->action != ACT_SETBE)
1023 free((char *)exp->replace);
1024 expb = exp;
1025 exp = exp->next;
1026 free(expb);
1027 }
1028
1029 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001030 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001031 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001032 free((regex_t *)exp->preg);
1033 }
1034
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001035 if (exp->replace && exp->action != ACT_SETBE)
1036 free((char *)exp->replace);
1037 expb = exp;
1038 exp = exp->next;
1039 free(expb);
1040 }
1041
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001042 /* build a list of unique uri_auths */
1043 if (!ua)
1044 ua = p->uri_auth;
1045 else {
1046 /* check if p->uri_auth is unique */
1047 for (uap = ua; uap; uap=uap->next)
1048 if (uap == p->uri_auth)
1049 break;
1050
Willy Tarreauaccc4e12008-06-24 11:14:45 +02001051 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001052 /* add it, if it is */
1053 p->uri_auth->next = ua;
1054 ua = p->uri_auth;
1055 }
1056 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001057
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001058 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
1059 LIST_DEL(&acl->list);
1060 prune_acl(acl);
1061 free(acl);
1062 }
1063
Willy Tarreau4a5cade2012-04-05 21:09:48 +02001064 list_for_each_entry_safe(srule, sruleb, &p->server_rules, list) {
1065 LIST_DEL(&srule->list);
1066 prune_acl_cond(srule->cond);
1067 free(srule->cond);
1068 free(srule);
1069 }
1070
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001071 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
1072 LIST_DEL(&rule->list);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001073 prune_acl_cond(rule->cond);
1074 free(rule->cond);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001075 free(rule);
1076 }
1077
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001078 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
1079 LIST_DEL(&rdr->list);
Willy Tarreauf285f542010-01-03 20:03:03 +01001080 if (rdr->cond) {
1081 prune_acl_cond(rdr->cond);
1082 free(rdr->cond);
1083 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001084 free(rdr->rdr_str);
Thierry FOURNIERd18cd0f2013-11-29 12:15:45 +01001085 list_for_each_entry_safe(lf, lfb, &rdr->rdr_fmt, list) {
1086 LIST_DEL(&lf->list);
1087 free(lf);
1088 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001089 free(rdr);
1090 }
1091
William Lallemand0f99e342011-10-12 17:50:54 +02001092 list_for_each_entry_safe(log, logb, &p->logsrvs, list) {
1093 LIST_DEL(&log->list);
1094 free(log);
1095 }
1096
William Lallemand723b73a2012-02-08 16:37:49 +01001097 list_for_each_entry_safe(lf, lfb, &p->logformat, list) {
1098 LIST_DEL(&lf->list);
1099 free(lf);
1100 }
1101
Simon Hormanac821422011-07-15 13:14:09 +09001102 deinit_tcp_rules(&p->tcp_req.inspect_rules);
1103 deinit_tcp_rules(&p->tcp_req.l4_rules);
1104
Simon Horman6fb82592011-07-15 13:14:11 +09001105 deinit_stick_rules(&p->storersp_rules);
1106 deinit_stick_rules(&p->sticking_rules);
1107
Willy Tarreaua534fea2008-08-03 12:19:50 +02001108 free(p->appsession_name);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001109
1110 h = p->req_cap;
1111 while (h) {
1112 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001113 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001114 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001115 free(h);
1116 h = h_next;
1117 }/* end while(h) */
1118
1119 h = p->rsp_cap;
1120 while (h) {
1121 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001122 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001123 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001124 free(h);
1125 h = h_next;
1126 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001127
Willy Tarreaubaaee002006-06-26 02:48:02 +02001128 s = p->srv;
1129 while (s) {
1130 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001131
Willy Tarreau5b3a2022012-09-28 15:01:02 +02001132 if (s->check.task) {
1133 task_delete(s->check.task);
1134 task_free(s->check.task);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001135 }
Simon Hormand60d6912013-11-25 10:46:36 +09001136 if (s->agent.task) {
1137 task_delete(s->agent.task);
1138 task_free(s->agent.task);
1139 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001140
Willy Tarreau2e993902011-10-31 11:53:20 +01001141 if (s->warmup) {
1142 task_delete(s->warmup);
1143 task_free(s->warmup);
1144 }
1145
Willy Tarreaua534fea2008-08-03 12:19:50 +02001146 free(s->id);
1147 free(s->cookie);
Willy Tarreau1ae1b7b2012-09-28 15:28:30 +02001148 free(s->check.bi);
1149 free(s->check.bo);
Simon Hormand60d6912013-11-25 10:46:36 +09001150 free(s->agent.bi);
1151 free(s->agent.bo);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001152 free(s);
1153 s = s_next;
1154 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001155
Willy Tarreau4348fad2012-09-20 16:48:07 +02001156 list_for_each_entry_safe(l, l_next, &p->conf.listeners, by_fe) {
Willy Tarreauf6e2cc72010-09-03 10:38:17 +02001157 unbind_listener(l);
1158 delete_listener(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001159 LIST_DEL(&l->by_fe);
1160 LIST_DEL(&l->by_bind);
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001161 free(l->name);
1162 free(l->counters);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001163 free(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001164 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001165
Willy Tarreau4348fad2012-09-20 16:48:07 +02001166 /* Release unused SSL configs. */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001167 list_for_each_entry_safe(bind_conf, bind_back, &p->conf.bind, by_fe) {
1168#ifdef USE_OPENSSL
1169 ssl_sock_free_all_ctx(bind_conf);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001170 free(bind_conf->ca_file);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001171 free(bind_conf->ciphers);
Emeric Brun2b58d042012-09-20 17:10:03 +02001172 free(bind_conf->ecdhe);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001173 free(bind_conf->crl_file);
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001174#endif /* USE_OPENSSL */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001175 free(bind_conf->file);
1176 free(bind_conf->arg);
1177 LIST_DEL(&bind_conf->by_fe);
1178 free(bind_conf);
1179 }
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001180
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001181 free(p->desc);
1182 free(p->fwdfor_hdr_name);
1183
Willy Tarreauff011f22011-01-06 17:51:27 +01001184 free_http_req_rules(&p->http_req_rules);
Willy Tarreau918ff602011-07-25 16:33:49 +02001185 free(p->task);
Krzysztof Piotr Oledzki59bb2182010-01-29 17:58:21 +01001186
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001187 pool_destroy2(p->req_cap_pool);
1188 pool_destroy2(p->rsp_cap_pool);
Simon Hormanb08584a2011-07-15 13:14:10 +09001189 pool_destroy2(p->table.pool);
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001190
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001191 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001192 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001193 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001194 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +02001195
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001196 while (ua) {
1197 uap = ua;
1198 ua = ua->next;
1199
Willy Tarreaua534fea2008-08-03 12:19:50 +02001200 free(uap->uri_prefix);
1201 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001202 free(uap->node);
1203 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001204
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001205 userlist_free(uap->userlist);
Willy Tarreauff011f22011-01-06 17:51:27 +01001206 free_http_req_rules(&uap->http_req_rules);
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001207
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001208 free(uap);
1209 }
1210
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001211 userlist_free(userlist);
1212
Willy Tarreaudd815982007-10-16 12:25:14 +02001213 protocol_unbind_all();
1214
Joe Williamsdf5b38f2010-12-29 17:05:48 +01001215 free(global.log_send_hostname); global.log_send_hostname = NULL;
Kevinm48936af2010-12-22 16:08:21 +00001216 free(global.log_tag); global.log_tag = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001217 free(global.chroot); global.chroot = NULL;
1218 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001219 free(global.node); global.node = NULL;
1220 free(global.desc); global.desc = NULL;
Godbach4cc1b0d2013-06-26 16:49:51 +08001221 free(fdinfo); fdinfo = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001222 free(fdtab); fdtab = NULL;
1223 free(oldpids); oldpids = NULL;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001224 free(global_listener_queue_task); global_listener_queue_task = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001225
William Lallemand0f99e342011-10-12 17:50:54 +02001226 list_for_each_entry_safe(log, logb, &global.logsrvs, list) {
1227 LIST_DEL(&log->list);
1228 free(log);
1229 }
Willy Tarreau477ecd82010-01-03 21:12:30 +01001230 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
1231 LIST_DEL(&wl->list);
1232 free(wl);
1233 }
1234
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001235 pool_destroy2(pool2_session);
Willy Tarreauf2943dc2012-10-26 20:10:28 +02001236 pool_destroy2(pool2_connection);
Willy Tarreau9b28e032012-10-12 23:49:43 +02001237 pool_destroy2(pool2_buffer);
Willy Tarreau8263d2b2012-08-28 00:06:31 +02001238 pool_destroy2(pool2_channel);
Willy Tarreau332f8bf2007-05-13 21:36:56 +02001239 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001240 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +02001241 pool_destroy2(pool2_capture);
Willy Tarreau63963c62007-05-13 21:29:55 +02001242 pool_destroy2(pool2_appsess);
Willy Tarreaue4d7e552007-05-13 20:19:55 +02001243 pool_destroy2(pool2_pendconn);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001244 pool_destroy2(pool2_sig_handlers);
Willy Tarreau34eb6712011-10-24 18:15:04 +02001245 pool_destroy2(pool2_hdr_idx);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001246
1247 if (have_appsession) {
Willy Tarreau63963c62007-05-13 21:29:55 +02001248 pool_destroy2(apools.serverid);
1249 pool_destroy2(apools.sessid);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001250 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001251
1252 deinit_pollers();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001253} /* end deinit() */
1254
Willy Tarreaubb545b42010-08-25 12:58:59 +02001255/* sends the signal <sig> to all pids found in <oldpids>. Returns the number of
1256 * pids the signal was correctly delivered to.
1257 */
1258static int tell_old_pids(int sig)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001259{
1260 int p;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001261 int ret = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001262 for (p = 0; p < nb_oldpids; p++)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001263 if (kill(oldpids[p], sig) == 0)
1264 ret++;
1265 return ret;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001266}
1267
Willy Tarreau918ff602011-07-25 16:33:49 +02001268/* Runs the polling loop */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001269void run_poll_loop()
1270{
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001271 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +02001272
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001273 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001274 while (1) {
Willy Tarreau29857942009-05-10 09:01:21 +02001275 /* check if we caught some signals and process them */
1276 signal_process_queue();
1277
Willy Tarreau58b458d2008-06-29 22:40:23 +02001278 /* Check if we can expire some tasks */
1279 wake_expired_tasks(&next);
1280
1281 /* Process a few tasks */
Willy Tarreaud825eef2007-05-12 22:35:00 +02001282 process_runnable_tasks(&next);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001283
Willy Tarreauaf7ad002010-08-31 15:39:26 +02001284 /* stop when there's nothing left to do */
1285 if (jobs == 0)
Willy Tarreau4f60f162007-04-08 16:39:58 +02001286 break;
1287
Willy Tarreau58b458d2008-06-29 22:40:23 +02001288 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001289 cur_poller.poll(&cur_poller, next);
Willy Tarreau033cd9d2014-01-25 19:24:15 +01001290 fd_process_cached_events();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001291 }
1292}
1293
Willy Tarreaue9b26022011-08-01 20:57:55 +02001294/* This is the global management task for listeners. It enables listeners waiting
1295 * for global resources when there are enough free resource, or at least once in
1296 * a while. It is designed to be called as a task.
1297 */
1298static struct task *manage_global_listener_queue(struct task *t)
1299{
1300 int next = TICK_ETERNITY;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001301 /* queue is empty, nothing to do */
1302 if (LIST_ISEMPTY(&global_listener_queue))
1303 goto out;
1304
1305 /* If there are still too many concurrent connections, let's wait for
1306 * some of them to go away. We don't need to re-arm the timer because
1307 * each of them will scan the queue anyway.
1308 */
1309 if (unlikely(actconn >= global.maxconn))
1310 goto out;
1311
1312 /* We should periodically try to enable listeners waiting for a global
1313 * resource here, because it is possible, though very unlikely, that
1314 * they have been blocked by a temporary lack of global resource such
1315 * as a file descriptor or memory and that the temporary condition has
1316 * disappeared.
1317 */
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001318 dequeue_all_listeners(&global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +02001319
1320 out:
1321 t->expire = next;
1322 task_queue(t);
1323 return t;
1324}
Willy Tarreau4f60f162007-04-08 16:39:58 +02001325
Willy Tarreaubaaee002006-06-26 02:48:02 +02001326int main(int argc, char **argv)
1327{
1328 int err, retry;
1329 struct rlimit limit;
Emeric Bruncf20bf12010-10-22 16:06:11 +02001330 char errmsg[100];
Willy Tarreau269ab312012-09-05 08:02:48 +02001331 int pidfd = -1;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001332
Emeric Bruncf20bf12010-10-22 16:06:11 +02001333 init(argc, argv);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001334 signal_register_fct(SIGQUIT, dump, SIGQUIT);
1335 signal_register_fct(SIGUSR1, sig_soft_stop, SIGUSR1);
1336 signal_register_fct(SIGHUP, sig_dump_state, SIGHUP);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001337
Willy Tarreaue437c442010-03-17 18:02:46 +01001338 /* Always catch SIGPIPE even on platforms which define MSG_NOSIGNAL.
1339 * Some recent FreeBSD setups report broken pipes, and MSG_NOSIGNAL
1340 * was defined there, so let's stay on the safe side.
Willy Tarreaubaaee002006-06-26 02:48:02 +02001341 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001342 signal_register_fct(SIGPIPE, NULL, 0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001343
Willy Tarreaudc23a922011-02-16 11:10:36 +01001344 /* ulimits */
1345 if (!global.rlimit_nofile)
1346 global.rlimit_nofile = global.maxsock;
1347
1348 if (global.rlimit_nofile) {
1349 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
1350 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
1351 Warning("[%s.main()] Cannot raise FD limit to %d.\n", argv[0], global.rlimit_nofile);
1352 }
1353 }
1354
1355 if (global.rlimit_memmax) {
1356 limit.rlim_cur = limit.rlim_max =
1357 global.rlimit_memmax * 1048576 / global.nbproc;
1358#ifdef RLIMIT_AS
1359 if (setrlimit(RLIMIT_AS, &limit) == -1) {
1360 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1361 argv[0], global.rlimit_memmax);
1362 }
1363#else
1364 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
1365 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1366 argv[0], global.rlimit_memmax);
1367 }
1368#endif
1369 }
1370
Willy Tarreaubaaee002006-06-26 02:48:02 +02001371 /* We will loop at most 100 times with 10 ms delay each time.
1372 * That's at most 1 second. We only send a signal to old pids
1373 * if we cannot grab at least one port.
1374 */
1375 retry = MAX_START_RETRIES;
1376 err = ERR_NONE;
1377 while (retry >= 0) {
1378 struct timeval w;
1379 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +01001380 /* exit the loop on no error or fatal error */
1381 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001382 break;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001383 if (nb_oldpids == 0 || retry == 0)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001384 break;
1385
1386 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
1387 * listening sockets. So on those platforms, it would be wiser to
1388 * simply send SIGUSR1, which will not be undoable.
1389 */
Willy Tarreaubb545b42010-08-25 12:58:59 +02001390 if (tell_old_pids(SIGTTOU) == 0) {
1391 /* no need to wait if we can't contact old pids */
1392 retry = 0;
1393 continue;
1394 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001395 /* give some time to old processes to stop listening */
1396 w.tv_sec = 0;
1397 w.tv_usec = 10*1000;
1398 select(0, NULL, NULL, NULL, &w);
1399 retry--;
1400 }
1401
1402 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001403 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +02001404 if (retry != MAX_START_RETRIES && nb_oldpids) {
1405 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001406 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +02001407 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001408 exit(1);
1409 }
1410
1411 if (listeners == 0) {
1412 Alert("[%s.main()] No enabled listener found (check the <listen> keywords) ! Exiting.\n", argv[0]);
1413 /* Note: we don't have to send anything to the old pids because we
1414 * never stopped them. */
1415 exit(1);
1416 }
1417
Emeric Bruncf20bf12010-10-22 16:06:11 +02001418 err = protocol_bind_all(errmsg, sizeof(errmsg));
1419 if ((err & ~ERR_WARN) != ERR_NONE) {
1420 if ((err & ERR_ALERT) || (err & ERR_WARN))
1421 Alert("[%s.main()] %s.\n", argv[0], errmsg);
1422
Willy Tarreaudd815982007-10-16 12:25:14 +02001423 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1424 protocol_unbind_all(); /* cleanup everything we can */
1425 if (nb_oldpids)
1426 tell_old_pids(SIGTTIN);
1427 exit(1);
Emeric Bruncf20bf12010-10-22 16:06:11 +02001428 } else if (err & ERR_WARN) {
1429 Alert("[%s.main()] %s.\n", argv[0], errmsg);
Willy Tarreaudd815982007-10-16 12:25:14 +02001430 }
1431
Willy Tarreaubaaee002006-06-26 02:48:02 +02001432 /* prepare pause/play signals */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001433 signal_register_fct(SIGTTOU, sig_pause, SIGTTOU);
1434 signal_register_fct(SIGTTIN, sig_listen, SIGTTIN);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001435
Willy Tarreaubaaee002006-06-26 02:48:02 +02001436 /* MODE_QUIET can inhibit alerts and warnings below this line */
1437
1438 global.mode &= ~MODE_STARTING;
1439 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1440 /* detach from the tty */
1441 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001442 }
1443
1444 /* open log & pid files before the chroot */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001445 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD) && global.pidfile != NULL) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001446 unlink(global.pidfile);
1447 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1448 if (pidfd < 0) {
1449 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1450 if (nb_oldpids)
1451 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001452 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001453 exit(1);
1454 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001455 }
1456
Willy Tarreaub38651a2007-03-24 17:24:39 +01001457#ifdef CONFIG_HAP_CTTPROXY
1458 if (global.last_checks & LSTCHK_CTTPROXY) {
1459 int ret;
1460
1461 ret = check_cttproxy_version();
1462 if (ret < 0) {
1463 Alert("[%s.main()] Cannot enable cttproxy.\n%s",
1464 argv[0],
1465 (ret == -1) ? " Incorrect module version.\n"
1466 : " Make sure you have enough permissions and that the module is loaded.\n");
Willy Tarreaudd815982007-10-16 12:25:14 +02001467 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001468 exit(1);
1469 }
1470 }
1471#endif
1472
1473 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1474 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001475 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001476 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001477 exit(1);
1478 }
1479
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001480 /* If the user is not root, we'll still let him try the configuration
1481 * but we inform him that unexpected behaviour may occur.
1482 */
1483 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1484 Warning("[%s.main()] Some options which require full privileges"
1485 " might not work well.\n"
1486 "", argv[0]);
1487
Willy Tarreauf223cc02007-10-15 18:57:08 +02001488 /* chroot if needed */
1489 if (global.chroot != NULL) {
Willy Tarreau21337822012-04-29 14:11:38 +02001490 if (chroot(global.chroot) == -1 || chdir("/") == -1) {
Willy Tarreauf223cc02007-10-15 18:57:08 +02001491 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1492 if (nb_oldpids)
1493 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001494 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001495 exit(1);
1496 }
Willy Tarreauf223cc02007-10-15 18:57:08 +02001497 }
1498
Willy Tarreaubaaee002006-06-26 02:48:02 +02001499 if (nb_oldpids)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001500 nb_oldpids = tell_old_pids(oldpids_sig);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001501
1502 /* Note that any error at this stage will be fatal because we will not
1503 * be able to restart the old pids.
1504 */
1505
1506 /* setgid / setuid */
Michael Schererab012dd2013-01-12 18:35:19 +01001507 if (global.gid) {
1508 if (getgroups(0, NULL) > 0 && setgroups(0, NULL) == -1)
1509 Warning("[%s.main()] Failed to drop supplementary groups. Using 'gid'/'group'"
1510 " without 'uid'/'user' is generally useless.\n", argv[0]);
1511
1512 if (setgid(global.gid) == -1) {
1513 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
1514 protocol_unbind_all();
1515 exit(1);
1516 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001517 }
1518
1519 if (global.uid && setuid(global.uid) == -1) {
1520 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001521 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001522 exit(1);
1523 }
1524
1525 /* check ulimits */
1526 limit.rlim_cur = limit.rlim_max = 0;
1527 getrlimit(RLIMIT_NOFILE, &limit);
1528 if (limit.rlim_cur < global.maxsock) {
1529 Warning("[%s.main()] FD limit (%d) too low for maxconn=%d/maxsock=%d. Please raise 'ulimit-n' to %d or more to avoid any trouble.\n",
Willy Tarreau1772ece2009-04-03 14:49:12 +02001530 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001531 }
1532
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001533 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001534 struct proxy *px;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001535 int ret = 0;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001536 int *children = calloc(global.nbproc, sizeof(int));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001537 int proc;
1538
1539 /* the father launches the required number of processes */
1540 for (proc = 0; proc < global.nbproc; proc++) {
1541 ret = fork();
1542 if (ret < 0) {
1543 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001544 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02001545 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001546 }
1547 else if (ret == 0) /* child breaks here */
1548 break;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001549 children[proc] = ret;
Willy Tarreau269ab312012-09-05 08:02:48 +02001550 if (pidfd >= 0) {
1551 char pidstr[100];
1552 snprintf(pidstr, sizeof(pidstr), "%d\n", ret);
Willy Tarreau89efaed2013-12-13 15:14:55 +01001553 shut_your_big_mouth_gcc(write(pidfd, pidstr, strlen(pidstr)));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001554 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01001555 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001556 }
Willy Tarreaufc6c0322012-11-16 16:12:27 +01001557
1558#ifdef USE_CPU_AFFINITY
1559 if (proc < global.nbproc && /* child */
1560 proc < 32 && /* only the first 32 processes may be pinned */
1561 global.cpu_map[proc]) /* only do this if the process has a CPU map */
1562 sched_setaffinity(0, sizeof(unsigned long), (void *)&global.cpu_map[proc]);
1563#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +02001564 /* close the pidfile both in children and father */
Willy Tarreau269ab312012-09-05 08:02:48 +02001565 if (pidfd >= 0) {
1566 //lseek(pidfd, 0, SEEK_SET); /* debug: emulate eglibc bug */
1567 close(pidfd);
1568 }
Willy Tarreaud137dd32010-08-25 12:49:05 +02001569
1570 /* We won't ever use this anymore */
1571 free(oldpids); oldpids = NULL;
1572 free(global.chroot); global.chroot = NULL;
1573 free(global.pidfile); global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001574
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001575 /* we might have to unbind some proxies from some processes */
1576 px = proxy;
1577 while (px != NULL) {
1578 if (px->bind_proc && px->state != PR_STSTOPPED) {
1579 if (!(px->bind_proc & (1 << proc)))
1580 stop_proxy(px);
1581 }
1582 px = px->next;
1583 }
1584
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001585 if (proc == global.nbproc) {
1586 if (global.mode & MODE_SYSTEMD) {
1587 for (proc = 0; proc < global.nbproc; proc++)
1588 while (waitpid(children[proc], NULL, 0) == -1 && errno == EINTR);
1589 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001590 exit(0); /* parent must leave */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001591 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001592
1593 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
1594 * that we can detach from the TTY. We MUST NOT do it in other cases since
1595 * it would have already be done, and 0-2 would have been affected to listening
1596 * sockets
1597 */
Willy Tarreau106cb762008-11-16 07:40:34 +01001598 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001599 /* detach from the tty */
1600 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01001601 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001602 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
1603 }
1604 pid = getpid(); /* update child's pid */
1605 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02001606 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001607 }
1608
Willy Tarreaudd815982007-10-16 12:25:14 +02001609 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001610 /*
1611 * That's it : the central polling loop. Run until we stop.
1612 */
1613 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001614
1615 /* Free all Hash Keys and all Hash elements */
1616 appsession_cleanup();
1617 /* Do some cleanup */
1618 deinit();
1619
1620 exit(0);
1621}
1622
1623
1624/*
1625 * Local variables:
1626 * c-indent-level: 8
1627 * c-basic-offset: 8
1628 * End:
1629 */