blob: 4806c564deaec1ca9868edaf9cd1c876cce34c1a [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreau7d1b48f2016-05-10 15:36:58 +02003 * Copyright 2000-2016 Willy Tarreau <willy@haproxy.org>.
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
David Carlier7ece0962015-12-08 21:43:09 +000028#define _GNU_SOURCE
Willy Tarreaubaaee002006-06-26 02:48:02 +020029#include <stdio.h>
30#include <stdlib.h>
31#include <unistd.h>
32#include <string.h>
33#include <ctype.h>
Maxime de Roucy379d9c72016-05-13 23:52:56 +020034#include <dirent.h>
Maxime de Roucy379d9c72016-05-13 23:52:56 +020035#include <sys/stat.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020036#include <sys/time.h>
37#include <sys/types.h>
38#include <sys/socket.h>
39#include <netinet/tcp.h>
40#include <netinet/in.h>
41#include <arpa/inet.h>
42#include <netdb.h>
43#include <fcntl.h>
44#include <errno.h>
45#include <signal.h>
46#include <stdarg.h>
47#include <sys/resource.h>
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +010048#include <sys/wait.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020049#include <time.h>
50#include <syslog.h>
Michael Schererab012dd2013-01-12 18:35:19 +010051#include <grp.h>
Willy Tarreaufc6c0322012-11-16 16:12:27 +010052#ifdef USE_CPU_AFFINITY
Willy Tarreaufc6c0322012-11-16 16:12:27 +010053#include <sched.h>
Pieter Baauwcaa6a1b2015-09-17 21:26:40 +020054#ifdef __FreeBSD__
55#include <sys/param.h>
56#include <sys/cpuset.h>
57#endif
Willy Tarreaufc6c0322012-11-16 16:12:27 +010058#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +020059
60#ifdef DEBUG_FULL
61#include <assert.h>
62#endif
63
Willy Tarreau2dd0d472006-06-29 17:53:05 +020064#include <common/base64.h>
65#include <common/cfgparse.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020066#include <common/chunk.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020067#include <common/compat.h>
68#include <common/config.h>
69#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010070#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020071#include <common/memory.h>
72#include <common/mini-clist.h>
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +010073#include <common/namespace.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020074#include <common/regex.h>
75#include <common/standard.h>
76#include <common/time.h>
77#include <common/uri_auth.h>
78#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020079
80#include <types/capture.h>
Christopher Faulet92d36382015-11-05 13:35:03 +010081#include <types/compression.h>
Christopher Fauletd7c91962015-04-30 11:48:27 +020082#include <types/filters.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020083#include <types/global.h>
Simon Hormanac821422011-07-15 13:14:09 +090084#include <types/acl.h>
Willy Tarreau3c63fd82011-09-07 18:00:47 +020085#include <types/peers.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020086
Willy Tarreau0fc45a72007-06-17 00:36:03 +020087#include <proto/acl.h>
Willy Tarreau3c595ac2015-04-19 09:59:31 +020088#include <proto/applet.h>
Willy Tarreau2e845be2012-10-19 19:49:09 +020089#include <proto/arg.h>
Willy Tarreau3c595ac2015-04-19 09:59:31 +020090#include <proto/auth.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020091#include <proto/backend.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020092#include <proto/channel.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020093#include <proto/checks.h>
Willy Tarreauf2943dc2012-10-26 20:10:28 +020094#include <proto/connection.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020095#include <proto/fd.h>
Christopher Fauletd7c91962015-04-30 11:48:27 +020096#include <proto/filters.h>
Willy Tarreau34eb6712011-10-24 18:15:04 +020097#include <proto/hdr_idx.h>
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +010098#include <proto/hlua.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020099#include <proto/listener.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200100#include <proto/log.h>
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +0100101#include <proto/pattern.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +0200102#include <proto/protocol.h>
Willy Tarreau80587432006-12-24 17:47:20 +0100103#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200104#include <proto/proxy.h>
105#include <proto/queue.h>
106#include <proto/server.h>
Willy Tarreaub1ec8c42015-04-03 13:53:24 +0200107#include <proto/session.h>
Willy Tarreau87b09662015-04-03 00:22:06 +0200108#include <proto/stream.h>
Willy Tarreau29857942009-05-10 09:01:21 +0200109#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200110#include <proto/task.h>
Baptiste Assmann325137d2015-04-13 23:40:55 +0200111#include <proto/dns.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200112
Emeric Brunfc0421f2012-09-07 17:30:07 +0200113#ifdef USE_OPENSSL
114#include <proto/ssl_sock.h>
115#endif
116
Willy Tarreaue5d31692016-11-08 18:47:25 +0100117#ifdef USE_WURFL
118#include <proto/wurfl.h>
119#endif
120
David Carlier4a026412015-06-01 13:57:22 +0200121#ifdef USE_DEVICEATLAS
122#include <import/da.h>
123#endif
124
Thomas Holmes6abded42015-05-12 16:23:58 +0100125#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +0200126#include <import/51d.h>
Thomas Holmes6abded42015-05-12 16:23:58 +0100127#endif
128
Willy Tarreaubaaee002006-06-26 02:48:02 +0200129/*********************************************************************/
130
Cyril Bonté6162c432012-11-10 19:27:47 +0100131extern const struct comp_algo comp_algos[];
132
Willy Tarreaubaaee002006-06-26 02:48:02 +0200133/*********************************************************************/
134
Willy Tarreau477ecd82010-01-03 21:12:30 +0100135/* list of config files */
136static struct list cfg_cfgfiles = LIST_HEAD_INIT(cfg_cfgfiles);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200137int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +0100138int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200139
140/* global options */
141struct global global = {
Willy Tarreau247a13a2012-11-15 17:38:15 +0100142 .nbproc = 1,
William Lallemand5f232402012-04-05 18:02:55 +0200143 .req_count = 0,
William Lallemand0f99e342011-10-12 17:50:54 +0200144 .logsrvs = LIST_HEAD_INIT(global.logsrvs),
Willy Tarreaued9dddd2015-11-26 16:34:56 +0100145#if defined(USE_ZLIB) && defined(DEFAULT_MAXZLIBMEM)
Willy Tarreau5a940372012-12-03 12:10:45 +0100146 .maxzlibmem = DEFAULT_MAXZLIBMEM * 1024U * 1024U,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100147#else
William Lallemand9d5f5482012-11-07 16:12:57 +0100148 .maxzlibmem = 0,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100149#endif
William Lallemandd85f9172012-11-09 17:05:39 +0100150 .comp_rate_lim = 0,
Emeric Brun850efd52014-01-29 12:24:34 +0100151 .ssl_server_verify = SSL_SERVER_VERIFY_REQUIRED,
Emeric Bruned760922010-10-22 17:59:25 +0200152 .unix_bind = {
153 .ux = {
154 .uid = -1,
155 .gid = -1,
156 .mode = 0,
157 }
158 },
Willy Tarreau27a674e2009-08-17 07:23:33 +0200159 .tune = {
160 .bufsize = BUFSIZE,
Willy Tarreau27097842015-09-28 13:53:23 +0200161 .maxrewrite = -1,
Willy Tarreau43961d52010-10-04 20:39:20 +0200162 .chksize = BUFSIZE,
Willy Tarreaua24adf02014-11-27 01:11:56 +0100163 .reserved_bufs = RESERVED_BUFS,
Willy Tarreauf3045d22015-04-29 16:24:50 +0200164 .pattern_cache = DEFAULT_PAT_LRU_SIZE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200165#ifdef USE_OPENSSL
Emeric Brun46635772012-11-14 11:32:56 +0100166 .sslcachesize = SSLCACHESIZE,
Remi Gacognef46cd6e2014-06-12 14:58:40 +0200167 .ssl_default_dh_param = SSL_DEFAULT_DH_PARAM,
Willy Tarreau03effc12014-02-12 14:55:41 +0100168#ifdef DEFAULT_SSL_MAX_RECORD
169 .ssl_max_record = DEFAULT_SSL_MAX_RECORD,
170#endif
Christopher Faulet31af49d2015-06-09 17:29:50 +0200171 .ssl_ctx_cache = DEFAULT_SSL_CTX_CACHE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200172#endif
William Lallemanda509e4c2012-11-07 16:54:34 +0100173#ifdef USE_ZLIB
174 .zlibmemlevel = 8,
175 .zlibwindowsize = MAX_WBITS,
176#endif
William Lallemandf3747832012-11-09 12:33:10 +0100177 .comp_maxlevel = 1,
Willy Tarreau7e312732014-02-12 16:35:14 +0100178#ifdef DEFAULT_IDLE_TIMER
179 .idle_timer = DEFAULT_IDLE_TIMER,
180#else
181 .idle_timer = 1000, /* 1 second */
182#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200183 },
Emeric Brun76d88952012-10-05 15:47:31 +0200184#ifdef USE_OPENSSL
185#ifdef DEFAULT_MAXSSLCONN
Willy Tarreau403edff2012-09-06 11:58:37 +0200186 .maxsslconn = DEFAULT_MAXSSLCONN,
187#endif
Emeric Brun76d88952012-10-05 15:47:31 +0200188#endif
David Carlier4a026412015-06-01 13:57:22 +0200189#ifdef USE_DEVICEATLAS
190 .deviceatlas = {
David Carlierdf3785f2015-12-02 11:22:53 +0000191 .loglevel = 0,
David Carlier4a026412015-06-01 13:57:22 +0200192 .jsonpath = 0,
David Carlier5801a822015-09-25 14:13:44 +0100193 .cookiename = 0,
194 .cookienamelen = 0,
195 .useragentid = 0,
196 .daset = 0,
David Carlier4a026412015-06-01 13:57:22 +0200197 .separator = '|',
198 },
199#endif
Dragan Dosenacd6b1f2015-06-11 21:36:33 +0200200#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +0200201 ._51degrees = {
202 .property_separator = ',',
203 .property_names = LIST_HEAD_INIT(global._51degrees.property_names),
204 .data_file_path = NULL,
205#ifdef FIFTYONEDEGREES_H_PATTERN_INCLUDED
206 .data_set = { },
207#endif
Dragan Dosen9373fc52015-08-07 16:41:23 +0200208 .cache_size = 0,
Dragan Dosen93b38d92015-06-29 16:43:25 +0200209 },
Dragan Dosenacd6b1f2015-06-11 21:36:33 +0200210#endif
scientiamobiled0027ed2016-11-04 10:55:08 +0100211#ifdef USE_WURFL
212 .wurfl = {
213 .data_file = NULL,
214 .cache_size = NULL,
215 .engine_mode = -1,
216 .useragent_priority = -1,
217 .information_list_separator = ',',
218 .information_list = LIST_HEAD_INIT(global.wurfl.information_list),
219 .patch_file_list = LIST_HEAD_INIT(global.wurfl.patch_file_list),
220 .handle = NULL,
221 },
222#endif
223
Willy Tarreaubaaee002006-06-26 02:48:02 +0200224 /* others NULL OK */
225};
226
227/*********************************************************************/
228
229int stopping; /* non zero means stopping in progress */
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200230int jobs = 0; /* number of active jobs (conns, listeners, active tasks, ...) */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200231
232/* Here we store informations about the pids of the processes we may pause
233 * or kill. We will send them a signal every 10 ms until we can bind to all
234 * our ports. With 200 retries, that's about 2 seconds.
235 */
236#define MAX_START_RETRIES 200
Willy Tarreaubaaee002006-06-26 02:48:02 +0200237static int *oldpids = NULL;
238static int oldpids_sig; /* use USR1 or TERM */
239
240/* this is used to drain data, and as a temporary buffer for sprintf()... */
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100241struct chunk trash = { };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200242
Willy Tarreau8096de92010-02-26 11:12:27 +0100243/* this buffer is always the same size as standard buffers and is used for
244 * swapping data inside a buffer.
245 */
246char *swap_buffer = NULL;
247
Willy Tarreaubb545b42010-08-25 12:58:59 +0200248int nb_oldpids = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200249const int zero = 0;
250const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200251const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200252
Willy Tarreau1d21e0a2010-03-12 21:58:54 +0100253char hostname[MAX_HOSTNAME_LEN];
Emeric Brun2b920a12010-09-23 18:30:22 +0200254char localpeer[MAX_HOSTNAME_LEN];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200255
Willy Tarreau89efaed2013-12-13 15:14:55 +0100256/* used from everywhere just to drain results we don't want to read and which
257 * recent versions of gcc increasingly and annoyingly complain about.
258 */
259int shut_your_big_mouth_gcc_int = 0;
260
Willy Tarreau08ceb102011-07-24 22:58:00 +0200261/* list of the temporarily limited listeners because of lack of resource */
262struct list global_listener_queue = LIST_HEAD_INIT(global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +0200263struct task *global_listener_queue_task;
264static struct task *manage_global_listener_queue(struct task *t);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200265
Willy Tarreauff055502014-04-28 22:27:06 +0200266/* bitfield of a few warnings to emit just once (WARN_*) */
267unsigned int warned = 0;
268
Willy Tarreaubaaee002006-06-26 02:48:02 +0200269/*********************************************************************/
270/* general purpose functions ***************************************/
271/*********************************************************************/
272
273void display_version()
274{
275 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreau8234f6d2016-03-14 00:10:05 +0100276 printf("Copyright 2000-2016 Willy Tarreau <willy@haproxy.org>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200277}
278
Willy Tarreau7b066db2007-12-02 11:28:59 +0100279void display_build_opts()
280{
281 printf("Build options :"
282#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100283 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100284#endif
285#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100286 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100287#endif
288#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100289 "\n CC = " BUILD_CC
290#endif
291#ifdef BUILD_CFLAGS
292 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100293#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100294#ifdef BUILD_OPTIONS
295 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100296#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200297 "\n\nDefault settings :"
298 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
299 "\n\n",
300 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200301
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100302 printf("Encrypted password support via crypt(3): "
303#ifdef CONFIG_HAP_CRYPT
304 "yes"
305#else
306 "no"
307#endif
308 "\n");
309
Cyril Bonté6162c432012-11-10 19:27:47 +0100310#ifdef USE_ZLIB
311 printf("Built with zlib version : " ZLIB_VERSION "\n");
Lukas Tribus255cc512016-09-12 21:42:14 +0000312 printf("Running on zlib version : %s\n", zlibVersion());
Willy Tarreau86ac1762015-10-13 16:46:28 +0200313#elif defined(USE_SLZ)
314 printf("Built with libslz for stateless compression.\n");
Cyril Bonté6162c432012-11-10 19:27:47 +0100315#else /* USE_ZLIB */
Willy Tarreau86ac1762015-10-13 16:46:28 +0200316 printf("Built without compression support (neither USE_ZLIB nor USE_SLZ are set)\n");
Cyril Bonté6162c432012-11-10 19:27:47 +0100317#endif
318 printf("Compression algorithms supported :");
319 {
320 int i;
321
Willy Tarreau615105e2015-03-28 16:40:46 +0100322 for (i = 0; comp_algos[i].cfg_name; i++) {
323 printf("%s %s(\"%s\")", (i == 0 ? "" : ","), comp_algos[i].cfg_name, comp_algos[i].ua_name);
Cyril Bonté6162c432012-11-10 19:27:47 +0100324 }
325 if (i == 0) {
326 printf("none");
327 }
328 }
329 printf("\n");
330
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200331#ifdef USE_OPENSSL
Lukas Tribus581cc8d2014-08-18 00:56:30 +0200332 printf("Built with OpenSSL version : "
333#ifdef OPENSSL_IS_BORINGSSL
334 "BoringSSL\n");
335#else /* OPENSSL_IS_BORINGSSL */
336 OPENSSL_VERSION_TEXT "\n");
Willy Tarreau0cff0db2013-04-26 18:16:13 +0200337 printf("Running on OpenSSL version : %s%s\n",
338 SSLeay_version(SSLEAY_VERSION),
339 ((OPENSSL_VERSION_NUMBER ^ SSLeay()) >> 8) ? " (VERSIONS DIFFER!)" : "");
Lukas Tribus581cc8d2014-08-18 00:56:30 +0200340#endif
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200341 printf("OpenSSL library supports TLS extensions : "
342#if OPENSSL_VERSION_NUMBER < 0x00907000L
343 "no (library version too old)"
344#elif defined(OPENSSL_NO_TLSEXT)
345 "no (disabled via OPENSSL_NO_TLSEXT)"
346#else
347 "yes"
348#endif
349 "\n");
350 printf("OpenSSL library supports SNI : "
351#ifdef SSL_CTRL_SET_TLSEXT_HOSTNAME
352 "yes"
353#else
354#ifdef OPENSSL_NO_TLSEXT
355 "no (because of OPENSSL_NO_TLSEXT)"
356#else
357 "no (version might be too old, 0.9.8f min needed)"
358#endif
359#endif
360 "\n");
361 printf("OpenSSL library supports prefer-server-ciphers : "
362#ifdef SSL_OP_CIPHER_SERVER_PREFERENCE
363 "yes"
364#else
365 "no (0.9.7 or later needed)"
366#endif
367 "\n");
368#else /* USE_OPENSSL */
369 printf("Built without OpenSSL support (USE_OPENSSL not set)\n");
370#endif
Lukas Tribusea68d362013-04-04 12:24:16 +0200371
372#ifdef USE_PCRE
Lukas Tribusdcbc5c52016-09-12 21:42:07 +0000373 printf("Built with PCRE version : %s\n", (HAP_XSTRING(Z PCRE_PRERELEASE)[1] == 0)?
374 HAP_XSTRING(PCRE_MAJOR.PCRE_MINOR PCRE_DATE) :
375 HAP_XSTRING(PCRE_MAJOR.PCRE_MINOR) HAP_XSTRING(PCRE_PRERELEASE PCRE_DATE));
Lukas Tribusd64788d2016-09-12 21:42:00 +0000376 printf("Running on PCRE version : %s", pcre_version());
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200377 printf("\nPCRE library supports JIT : ");
378#ifdef USE_PCRE_JIT
379 {
380 int r;
381 pcre_config(PCRE_CONFIG_JIT, &r);
382 if (r)
383 printf("yes");
384 else
385 printf("no (libpcre build without JIT?)");
386 }
Lukas Tribusea68d362013-04-04 12:24:16 +0200387#else
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200388 printf("no (USE_PCRE_JIT not set)");
Lukas Tribusea68d362013-04-04 12:24:16 +0200389#endif
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200390 printf("\n");
Lukas Tribusea68d362013-04-04 12:24:16 +0200391#else
392 printf("Built without PCRE support (using libc's regex instead)\n");
393#endif
394
Cyril Bonté47eb2192015-03-02 00:08:39 +0100395#ifdef USE_LUA
396 printf("Built with Lua version : %s\n", LUA_RELEASE);
397#else
398 printf("Built without Lua support\n");
399#endif
400
Willy Tarreau29fbe512015-08-20 19:35:14 +0200401#if defined(CONFIG_HAP_TRANSPARENT)
Pieter Baauwd551fb52013-05-08 22:49:23 +0200402 printf("Built with transparent proxy support using:"
Pieter Baauwd551fb52013-05-08 22:49:23 +0200403#if defined(IP_TRANSPARENT)
404 " IP_TRANSPARENT"
405#endif
406#if defined(IPV6_TRANSPARENT)
407 " IPV6_TRANSPARENT"
408#endif
409#if defined(IP_FREEBIND)
410 " IP_FREEBIND"
411#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200412#if defined(IP_BINDANY)
413 " IP_BINDANY"
414#endif
415#if defined(IPV6_BINDANY)
416 " IPV6_BINDANY"
417#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200418#if defined(SO_BINDANY)
419 " SO_BINDANY"
420#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200421 "\n");
422#endif
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100423
424#if defined(CONFIG_HAP_NS)
425 printf("Built with network namespace support\n");
426#endif
Thomas Holmes6abded42015-05-12 16:23:58 +0100427
David Carlierdf3785f2015-12-02 11:22:53 +0000428#ifdef USE_DEVICEATLAS
429 printf("Built with DeviceAtlas support\n");
430#endif
Thomas Holmes6abded42015-05-12 16:23:58 +0100431#ifdef USE_51DEGREES
432 printf("Built with 51Degrees support\n");
433#endif
scientiamobiled0027ed2016-11-04 10:55:08 +0100434#ifdef USE_WURFL
435 printf("Built with WURFL support\n");
436#endif
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100437 putchar('\n');
438
Willy Tarreaube5b6852009-10-03 18:57:08 +0200439 list_pollers(stdout);
440 putchar('\n');
Christopher Fauletb3f4e142016-03-07 12:46:38 +0100441 list_filters(stdout);
442 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100443}
444
Willy Tarreaubaaee002006-06-26 02:48:02 +0200445/*
446 * This function prints the command line usage and exits
447 */
448void usage(char *name)
449{
450 display_version();
451 fprintf(stderr,
Maxime de Roucy379d9c72016-05-13 23:52:56 +0200452 "Usage : %s [-f <cfgfile|cfgdir>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200453 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
Willy Tarreaua088d312015-10-08 11:58:48 +0200454 " [ -p <pidfile> ] [ -m <max megs> ] [ -C <dir> ] [-- <cfgfile>*]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100455 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200456 " -d enters debug mode ; -db only disables background mode.\n"
Willy Tarreau6e064432012-05-08 15:40:42 +0200457 " -dM[<byte>] poisons memory with <byte> (defaults to 0x50)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200458 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200459 " -D goes daemon ; -C changes to <dir> before loading files.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200460 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200461 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200462 " -n sets the maximum total # of connections (%d)\n"
463 " -m limits the usable amount of memory (in MB)\n"
464 " -N sets the default, per-proxy maximum # of connections (%d)\n"
Emeric Brun2b920a12010-09-23 18:30:22 +0200465 " -L set local peer name (default to hostname)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200466 " -p writes pids of all children to this file\n"
467#if defined(ENABLE_EPOLL)
468 " -de disables epoll() usage even when available\n"
469#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200470#if defined(ENABLE_KQUEUE)
471 " -dk disables kqueue() usage even when available\n"
472#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200473#if defined(ENABLE_POLL)
474 " -dp disables poll() usage even when available\n"
475#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200476#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100477 " -dS disables splice usage (broken on old kernels)\n"
478#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200479#if defined(USE_GETADDRINFO)
480 " -dG disables getaddrinfo() usage\n"
481#endif
Lukas Tribusa0bcbdc2016-09-12 21:42:20 +0000482#if defined(SO_REUSEPORT)
483 " -dR disables SO_REUSEPORT usage\n"
484#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100485 " -dV disables SSL verify on servers side\n"
Willy Tarreauc6ca1aa2015-10-08 11:32:32 +0200486 " -sf/-st [pid ]* finishes/terminates old pids.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200487 "\n",
488 name, DEFAULT_MAXCONN, cfg_maxpconn);
489 exit(1);
490}
491
492
493
494/*********************************************************************/
495/* more specific functions ***************************************/
496/*********************************************************************/
497
498/*
Willy Tarreaud0807c32010-08-27 18:26:11 +0200499 * upon SIGUSR1, let's have a soft stop. Note that soft_stop() broadcasts
500 * a signal zero to all subscribers. This means that it's as easy as
501 * subscribing to signal 0 to get informed about an imminent shutdown.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200502 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200503void sig_soft_stop(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200504{
505 soft_stop();
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200506 signal_unregister_handler(sh);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200507 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200508}
509
510/*
511 * upon SIGTTOU, we pause everything
512 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200513void sig_pause(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200514{
515 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200516 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200517}
518
519/*
520 * upon SIGTTIN, let's have a soft stop.
521 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200522void sig_listen(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200523{
Willy Tarreaube58c382011-07-24 18:28:10 +0200524 resume_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200525}
526
527/*
528 * this function dumps every server's state when the process receives SIGHUP.
529 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200530void sig_dump_state(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200531{
532 struct proxy *p = proxy;
533
534 Warning("SIGHUP received, dumping servers states.\n");
535 while (p) {
536 struct server *s = p->srv;
537
538 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
539 while (s) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100540 chunk_printf(&trash,
541 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
542 p->id, s->id,
Willy Tarreau892337c2014-05-13 23:41:20 +0200543 (s->state != SRV_ST_STOPPED) ? "UP" : "DOWN",
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100544 s->cur_sess, s->nbpend, s->counters.cum_sess);
545 Warning("%s\n", trash.str);
546 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200547 s = s->next;
548 }
549
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200550 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
551 if (!p->srv) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100552 chunk_printf(&trash,
553 "SIGHUP: Proxy %s has no servers. Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
554 p->id,
555 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 +0200556 } else if (p->srv_act == 0) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100557 chunk_printf(&trash,
558 "SIGHUP: Proxy %s %s ! Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
559 p->id,
560 (p->srv_bck) ? "is running on backup servers" : "has no server available",
561 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 +0200562 } else {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100563 chunk_printf(&trash,
564 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
565 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
566 p->id, p->srv_act, p->srv_bck,
567 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 +0200568 }
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100569 Warning("%s\n", trash.str);
570 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200571
572 p = p->next;
573 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200574}
575
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200576void dump(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200577{
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200578 /* dump memory usage then free everything possible */
579 dump_pools();
580 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200581}
582
Maxime de Roucy379d9c72016-05-13 23:52:56 +0200583/* This function check if cfg_cfgfiles containes directories.
584 * If it find one, it add all the files (and only files) it containes
585 * in cfg_cfgfiles in place of the directory (and remove the directory).
586 * It add the files in lexical order.
587 * It add only files with .cfg extension.
588 * It doesn't add files with name starting with '.'
589 */
590void cfgfiles_expand_directories(void)
591{
592 struct wordlist *wl, *wlb;
593 char *err = NULL;
594
595 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
596 struct stat file_stat;
597 struct dirent **dir_entries = NULL;
598 int dir_entries_nb;
599 int dir_entries_it;
600
601 if (stat(wl->s, &file_stat)) {
602 Alert("Cannot open configuration file/directory %s : %s\n",
603 wl->s,
604 strerror(errno));
605 exit(1);
606 }
607
608 if (!S_ISDIR(file_stat.st_mode))
609 continue;
610
611 /* from this point wl->s is a directory */
612
613 dir_entries_nb = scandir(wl->s, &dir_entries, NULL, alphasort);
614 if (dir_entries_nb < 0) {
615 Alert("Cannot open configuration directory %s : %s\n",
616 wl->s,
617 strerror(errno));
618 exit(1);
619 }
620
621 /* for each element in the directory wl->s */
622 for (dir_entries_it = 0; dir_entries_it < dir_entries_nb; dir_entries_it++) {
623 struct dirent *dir_entry = dir_entries[dir_entries_it];
624 char *filename = NULL;
625 char *d_name_cfgext = strstr(dir_entry->d_name, ".cfg");
626
627 /* don't add filename that begin with .
628 * only add filename with .cfg extention
629 */
630 if (dir_entry->d_name[0] == '.' ||
631 !(d_name_cfgext && d_name_cfgext[4] == '\0'))
632 goto next_dir_entry;
633
634 if (!memprintf(&filename, "%s/%s", wl->s, dir_entry->d_name)) {
635 Alert("Cannot load configuration files %s : out of memory.\n",
636 filename);
637 exit(1);
638 }
639
640 if (stat(filename, &file_stat)) {
641 Alert("Cannot open configuration file %s : %s\n",
642 wl->s,
643 strerror(errno));
644 exit(1);
645 }
646
647 /* don't add anything else than regular file in cfg_cfgfiles
648 * this way we avoid loops
649 */
650 if (!S_ISREG(file_stat.st_mode))
651 goto next_dir_entry;
652
653 if (!list_append_word(&wl->list, filename, &err)) {
654 Alert("Cannot load configuration files %s : %s\n",
655 filename,
656 err);
657 exit(1);
658 }
659
660next_dir_entry:
661 free(filename);
662 free(dir_entry);
663 }
664
665 free(dir_entries);
666
667 /* remove the current directory (wl) from cfg_cfgfiles */
668 free(wl->s);
669 LIST_DEL(&wl->list);
670 free(wl);
671 }
672
673 free(err);
674}
675
Willy Tarreaubaaee002006-06-26 02:48:02 +0200676/*
677 * This function initializes all the necessary variables. It only returns
678 * if everything is OK. If something fails, it exits.
679 */
680void init(int argc, char **argv)
681{
Willy Tarreaubaaee002006-06-26 02:48:02 +0200682 int arg_mode = 0; /* MODE_DEBUG, ... */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200683 char *tmp;
684 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200685 int err_code = 0;
Maxime de Roucy0f503922016-05-13 23:52:55 +0200686 char *err_msg = NULL;
Willy Tarreau477ecd82010-01-03 21:12:30 +0100687 struct wordlist *wl;
Kevinm48936af2010-12-22 16:08:21 +0000688 char *progname;
Willy Tarreau576132e2011-09-10 19:26:56 +0200689 char *change_dir = NULL;
Christopher Fauletd7c91962015-04-30 11:48:27 +0200690 struct proxy *px;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200691
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100692 chunk_init(&trash, malloc(global.tune.bufsize), global.tune.bufsize);
Willy Tarreau2819e992013-12-13 14:41:10 +0100693 alloc_trash_buffers(global.tune.bufsize);
David du Colombier7af46052012-05-16 14:16:48 +0200694
Emeric Brun2b920a12010-09-23 18:30:22 +0200695 /* NB: POSIX does not make it mandatory for gethostname() to NULL-terminate
696 * the string in case of truncation, and at least FreeBSD appears not to do
697 * it.
698 */
699 memset(hostname, 0, sizeof(hostname));
700 gethostname(hostname, sizeof(hostname) - 1);
701 memset(localpeer, 0, sizeof(localpeer));
702 memcpy(localpeer, hostname, (sizeof(hostname) > sizeof(localpeer) ? sizeof(localpeer) : sizeof(hostname)) - 1);
703
Willy Tarreaubaaee002006-06-26 02:48:02 +0200704 /*
705 * Initialize the previously static variables.
706 */
707
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100708 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200709
710
711#ifdef HAPROXY_MEMMAX
Willy Tarreau70060452015-12-14 12:46:07 +0100712 global.rlimit_memmax_all = HAPROXY_MEMMAX;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200713#endif
714
Benoit GARNIERb413c2a2016-03-27 11:08:03 +0200715 tzset();
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200716 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200717 start_date = now;
718
Willy Tarreau84310e22014-02-14 11:59:04 +0100719 srandom(now_ms - getpid());
720
Dragan Dosen835b9212016-02-12 13:23:03 +0100721 init_log();
Willy Tarreau29857942009-05-10 09:01:21 +0200722 signal_init();
Willy Tarreau8ed669b2013-01-11 15:49:37 +0100723 if (init_acl() != 0)
724 exit(1);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200725 init_task();
Willy Tarreau87b09662015-04-03 00:22:06 +0200726 init_stream();
Willy Tarreaub1ec8c42015-04-03 13:53:24 +0200727 init_session();
Willy Tarreauf2943dc2012-10-26 20:10:28 +0200728 init_connection();
Willy Tarreau8280d642009-09-23 23:37:52 +0200729 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200730 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100731 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200732
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +0100733 /* Initialise lua. */
734 hlua_init();
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +0100735
Willy Tarreau43b78992009-01-25 15:42:27 +0100736 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200737#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100738 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200739#endif
740#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100741 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200742#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200743#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100744 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200745#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200746#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100747 global.tune.options |= GTUNE_USE_SPLICE;
748#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200749#if defined(USE_GETADDRINFO)
750 global.tune.options |= GTUNE_USE_GAI;
751#endif
Lukas Tribusa0bcbdc2016-09-12 21:42:20 +0000752#if defined(SO_REUSEPORT)
753 global.tune.options |= GTUNE_USE_REUSEPORT;
754#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200755
756 pid = getpid();
757 progname = *argv;
758 while ((tmp = strchr(progname, '/')) != NULL)
759 progname = tmp + 1;
760
Kevinm48936af2010-12-22 16:08:21 +0000761 /* the process name is used for the logs only */
Dragan Dosen43885c72015-10-01 13:18:13 +0200762 chunk_initstr(&global.log_tag, strdup(progname));
Kevinm48936af2010-12-22 16:08:21 +0000763
Willy Tarreaubaaee002006-06-26 02:48:02 +0200764 argc--; argv++;
765 while (argc > 0) {
766 char *flag;
767
768 if (**argv == '-') {
769 flag = *argv+1;
770
771 /* 1 arg */
772 if (*flag == 'v') {
773 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100774 if (flag[1] == 'v') /* -vv */
775 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200776 exit(0);
777 }
778#if defined(ENABLE_EPOLL)
779 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100780 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200781#endif
782#if defined(ENABLE_POLL)
783 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100784 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200785#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200786#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200787 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100788 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200789#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200790#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100791 else if (*flag == 'd' && flag[1] == 'S')
792 global.tune.options &= ~GTUNE_USE_SPLICE;
793#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200794#if defined(USE_GETADDRINFO)
795 else if (*flag == 'd' && flag[1] == 'G')
796 global.tune.options &= ~GTUNE_USE_GAI;
797#endif
Lukas Tribusa0bcbdc2016-09-12 21:42:20 +0000798#if defined(SO_REUSEPORT)
799 else if (*flag == 'd' && flag[1] == 'R')
800 global.tune.options &= ~GTUNE_USE_REUSEPORT;
801#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100802 else if (*flag == 'd' && flag[1] == 'V')
803 global.ssl_server_verify = SSL_SERVER_VERIFY_NONE;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200804 else if (*flag == 'V')
805 arg_mode |= MODE_VERBOSE;
806 else if (*flag == 'd' && flag[1] == 'b')
807 arg_mode |= MODE_FOREGROUND;
Willy Tarreau6e064432012-05-08 15:40:42 +0200808 else if (*flag == 'd' && flag[1] == 'M')
809 mem_poison_byte = flag[2] ? strtol(flag + 2, NULL, 0) : 'P';
Willy Tarreaubaaee002006-06-26 02:48:02 +0200810 else if (*flag == 'd')
811 arg_mode |= MODE_DEBUG;
812 else if (*flag == 'c')
813 arg_mode |= MODE_CHECK;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100814 else if (*flag == 'D') {
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200815 arg_mode |= MODE_DAEMON;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100816 if (flag[1] == 's') /* -Ds */
817 arg_mode |= MODE_SYSTEMD;
818 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200819 else if (*flag == 'q')
820 arg_mode |= MODE_QUIET;
821 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
822 /* list of pids to finish ('f') or terminate ('t') */
823
824 if (flag[1] == 'f')
825 oldpids_sig = SIGUSR1; /* finish then exit */
826 else
827 oldpids_sig = SIGTERM; /* terminate immediately */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200828
Willy Tarreauc6ca1aa2015-10-08 11:32:32 +0200829 while (argc > 1 && argv[1][0] != '-') {
830 oldpids = realloc(oldpids, (nb_oldpids + 1) * sizeof(int));
831 if (!oldpids) {
832 Alert("Cannot allocate old pid : out of memory.\n");
833 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200834 }
Willy Tarreauc6ca1aa2015-10-08 11:32:32 +0200835 argc--; argv++;
836 oldpids[nb_oldpids] = atol(*argv);
837 if (oldpids[nb_oldpids] <= 0)
838 usage(progname);
839 nb_oldpids++;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200840 }
841 }
Willy Tarreaua088d312015-10-08 11:58:48 +0200842 else if (flag[0] == '-' && flag[1] == 0) { /* "--" */
843 /* now that's a cfgfile list */
844 argv++; argc--;
845 while (argc > 0) {
Maxime de Roucy0f503922016-05-13 23:52:55 +0200846 if (!list_append_word(&cfg_cfgfiles, *argv, &err_msg)) {
847 Alert("Cannot load configuration file/directory %s : %s\n",
848 *argv,
849 err_msg);
Willy Tarreaua088d312015-10-08 11:58:48 +0200850 exit(1);
851 }
Willy Tarreaua088d312015-10-08 11:58:48 +0200852 argv++; argc--;
853 }
854 break;
855 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200856 else { /* >=2 args */
857 argv++; argc--;
858 if (argc == 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200859 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200860
861 switch (*flag) {
Willy Tarreau576132e2011-09-10 19:26:56 +0200862 case 'C' : change_dir = *argv; break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200863 case 'n' : cfg_maxconn = atol(*argv); break;
Willy Tarreau70060452015-12-14 12:46:07 +0100864 case 'm' : global.rlimit_memmax_all = atol(*argv); break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200865 case 'N' : cfg_maxpconn = atol(*argv); break;
Emeric Brun2b920a12010-09-23 18:30:22 +0200866 case 'L' : strncpy(localpeer, *argv, sizeof(localpeer) - 1); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200867 case 'f' :
Maxime de Roucy0f503922016-05-13 23:52:55 +0200868 if (!list_append_word(&cfg_cfgfiles, *argv, &err_msg)) {
869 Alert("Cannot load configuration file/directory %s : %s\n",
870 *argv,
871 err_msg);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200872 exit(1);
873 }
Willy Tarreau5d01a632009-06-22 16:02:30 +0200874 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200875 case 'p' : cfg_pidfile = *argv; break;
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200876 default: usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200877 }
878 }
879 }
880 else
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200881 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200882 argv++; argc--;
883 }
884
885 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100886 (arg_mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_FOREGROUND | MODE_VERBOSE
Willy Tarreaubaaee002006-06-26 02:48:02 +0200887 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
888
Willy Tarreau576132e2011-09-10 19:26:56 +0200889 if (change_dir && chdir(change_dir) < 0) {
890 Alert("Could not change to directory %s : %s\n", change_dir, strerror(errno));
891 exit(1);
892 }
893
Maxime de Roucy379d9c72016-05-13 23:52:56 +0200894 /* handle cfgfiles that are actualy directories */
895 cfgfiles_expand_directories();
896
897 if (LIST_ISEMPTY(&cfg_cfgfiles))
898 usage(progname);
899
Willy Tarreaubaaee002006-06-26 02:48:02 +0200900 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200901
902 init_default_instance();
903
Willy Tarreau477ecd82010-01-03 21:12:30 +0100904 list_for_each_entry(wl, &cfg_cfgfiles, list) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100905 int ret;
906
Willy Tarreau477ecd82010-01-03 21:12:30 +0100907 ret = readcfgfile(wl->s);
Willy Tarreauc4382422009-12-06 13:10:44 +0100908 if (ret == -1) {
909 Alert("Could not open configuration file %s : %s\n",
Willy Tarreau477ecd82010-01-03 21:12:30 +0100910 wl->s, strerror(errno));
Willy Tarreauc4382422009-12-06 13:10:44 +0100911 exit(1);
912 }
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100913 if (ret & (ERR_ABORT|ERR_FATAL))
Willy Tarreau477ecd82010-01-03 21:12:30 +0100914 Alert("Error(s) found in configuration file : %s\n", wl->s);
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100915 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200916 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200917 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200918 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200919
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +0100920 pattern_finalize_config();
Nenad Merdanovic200b0fa2015-05-09 08:46:01 +0200921#if (defined SSL_CTRL_SET_TLSEXT_TICKET_KEY_CB && TLS_TICKETS_NO > 0)
922 tlskeys_finalize_config();
923#endif
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +0100924
Willy Tarreaubb925012009-07-23 13:36:36 +0200925 err_code |= check_config_validity();
926 if (err_code & (ERR_ABORT|ERR_FATAL)) {
927 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200928 exit(1);
929 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200930
Willy Tarreau70060452015-12-14 12:46:07 +0100931 /* recompute the amount of per-process memory depending on nbproc and
932 * the shared SSL cache size (allowed to exist in all processes).
933 */
934 if (global.rlimit_memmax_all) {
935#if defined (USE_OPENSSL) && !defined(USE_PRIVATE_CACHE)
936 int64_t ssl_cache_bytes = global.tune.sslcachesize * 200LL;
937
938 global.rlimit_memmax =
939 ((((int64_t)global.rlimit_memmax_all * 1048576LL) -
940 ssl_cache_bytes) / global.nbproc +
941 ssl_cache_bytes + 1048575LL) / 1048576LL;
942#else
943 global.rlimit_memmax = global.rlimit_memmax_all / global.nbproc;
944#endif
945 }
946
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100947#ifdef CONFIG_HAP_NS
948 err_code |= netns_init();
949 if (err_code & (ERR_ABORT|ERR_FATAL)) {
950 Alert("Failed to initialize namespace support.\n");
951 exit(1);
952 }
953#endif
954
Baptiste Assmann4215d7d2016-11-02 15:33:15 +0100955 /* Apply server states */
956 apply_server_state();
957
958 for (px = proxy; px; px = px->next)
959 srv_compute_all_admin_states(px);
960
Baptiste Assmann83cbaa52016-11-02 15:34:05 +0100961 /* Apply servers' configured address */
962 err_code |= srv_init_addr();
963 if (err_code & (ERR_ABORT|ERR_FATAL)) {
964 Alert("Failed to initialize server(s) addr.\n");
965 exit(1);
966 }
967
Willy Tarreaubaaee002006-06-26 02:48:02 +0200968 if (global.mode & MODE_CHECK) {
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100969 struct peers *pr;
970 struct proxy *px;
971
972 for (pr = peers; pr; pr = pr->next)
973 if (pr->peers_fe)
974 break;
975
976 for (px = proxy; px; px = px->next)
Willy Tarreau4348fad2012-09-20 16:48:07 +0200977 if (px->state == PR_STNEW && !LIST_ISEMPTY(&px->conf.listeners))
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100978 break;
979
980 if (pr || px) {
981 /* At least one peer or one listener has been found */
982 qfprintf(stdout, "Configuration file is valid\n");
983 exit(0);
984 }
985 qfprintf(stdout, "Configuration file has no error but will not start (no listener) => exit(2).\n");
986 exit(2);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200987 }
988
Willy Tarreaue9b26022011-08-01 20:57:55 +0200989 global_listener_queue_task = task_new();
990 if (!global_listener_queue_task) {
991 Alert("Out of memory when initializing global task\n");
992 exit(1);
993 }
994 /* very simple initialization, users will queue the task if needed */
995 global_listener_queue_task->context = NULL; /* not even a context! */
996 global_listener_queue_task->process = manage_global_listener_queue;
997 global_listener_queue_task->expire = TICK_ETERNITY;
998
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200999 /* now we know the buffer size, we can initialize the channels and buffers */
Willy Tarreau9b28e032012-10-12 23:49:43 +02001000 init_buffer();
David Carlier4a026412015-06-01 13:57:22 +02001001#if defined(USE_DEVICEATLAS)
1002 init_deviceatlas();
1003#endif
Dragan Dosen93b38d92015-06-29 16:43:25 +02001004#ifdef USE_51DEGREES
1005 init_51degrees();
1006#endif
scientiamobiled0027ed2016-11-04 10:55:08 +01001007#ifdef USE_WURFL
1008 ha_wurfl_init();
1009#endif
Willy Tarreau8280d642009-09-23 23:37:52 +02001010
Christopher Fauletd7c91962015-04-30 11:48:27 +02001011 for (px = proxy; px; px = px->next) {
1012 err_code |= flt_init(px);
1013 if (err_code & (ERR_ABORT|ERR_FATAL)) {
1014 Alert("Failed to initialize filters for proxy '%s'.\n",
1015 px->id);
1016 exit(1);
1017 }
1018 }
1019
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +02001020 if (start_checks() < 0)
1021 exit(1);
1022
Willy Tarreaubaaee002006-06-26 02:48:02 +02001023 if (cfg_maxconn > 0)
1024 global.maxconn = cfg_maxconn;
1025
1026 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +02001027 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001028 global.pidfile = strdup(cfg_pidfile);
1029 }
1030
Willy Tarreaud0256482015-01-15 21:45:22 +01001031 /* Now we want to compute the maxconn and possibly maxsslconn values.
1032 * It's a bit tricky. If memmax is not set, maxconn defaults to
1033 * DEFAULT_MAXCONN and maxsslconn defaults to DEFAULT_MAXSSLCONN.
1034 *
1035 * If memmax is set, then it depends on which values are set. If
1036 * maxsslconn is set, we use memmax to determine how many cleartext
1037 * connections may be added, and set maxconn to the sum of the two.
1038 * If maxconn is set and not maxsslconn, maxsslconn is computed from
1039 * the remaining amount of memory between memmax and the cleartext
1040 * connections. If neither are set, then it is considered that all
1041 * connections are SSL-capable, and maxconn is computed based on this,
1042 * then maxsslconn accordingly. We need to know if SSL is used on the
1043 * frontends, backends, or both, because when it's used on both sides,
1044 * we need twice the value for maxsslconn, but we only count the
1045 * handshake once since it is not performed on the two sides at the
1046 * same time (frontend-side is terminated before backend-side begins).
1047 * The SSL stack is supposed to have filled ssl_session_cost and
Willy Tarreau474b96a2015-01-28 19:03:21 +01001048 * ssl_handshake_cost during its initialization. In any case, if
1049 * SYSTEM_MAXCONN is set, we still enforce it as an upper limit for
1050 * maxconn in order to protect the system.
Willy Tarreaud0256482015-01-15 21:45:22 +01001051 */
1052 if (!global.rlimit_memmax) {
1053 if (global.maxconn == 0) {
1054 global.maxconn = DEFAULT_MAXCONN;
1055 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
1056 fprintf(stderr, "Note: setting global.maxconn to %d.\n", global.maxconn);
1057 }
1058 }
1059#ifdef USE_OPENSSL
1060 else if (!global.maxconn && !global.maxsslconn &&
1061 (global.ssl_used_frontend || global.ssl_used_backend)) {
1062 /* memmax is set, compute everything automatically. Here we want
1063 * to ensure that all SSL connections will be served. We take
1064 * care of the number of sides where SSL is used, and consider
1065 * the worst case : SSL used on both sides and doing a handshake
1066 * simultaneously. Note that we can't have more than maxconn
1067 * handshakes at a time by definition, so for the worst case of
1068 * two SSL conns per connection, we count a single handshake.
1069 */
1070 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
1071 int64_t mem = global.rlimit_memmax * 1048576ULL;
1072
1073 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
1074 mem -= global.maxzlibmem;
1075 mem = mem * MEM_USABLE_RATIO;
1076
1077 global.maxconn = mem /
Willy Tarreau87b09662015-04-03 00:22:06 +02001078 ((STREAM_MAX_COST + 2 * global.tune.bufsize) + // stream + 2 buffers per stream
Willy Tarreaud0256482015-01-15 21:45:22 +01001079 sides * global.ssl_session_max_cost + // SSL buffers, one per side
1080 global.ssl_handshake_max_cost); // 1 handshake per connection max
1081
1082 global.maxconn = round_2dig(global.maxconn);
Willy Tarreau474b96a2015-01-28 19:03:21 +01001083#ifdef SYSTEM_MAXCONN
1084 if (global.maxconn > DEFAULT_MAXCONN)
1085 global.maxconn = DEFAULT_MAXCONN;
1086#endif /* SYSTEM_MAXCONN */
Willy Tarreaud0256482015-01-15 21:45:22 +01001087 global.maxsslconn = sides * global.maxconn;
1088 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
1089 fprintf(stderr, "Note: setting global.maxconn to %d and global.maxsslconn to %d.\n",
1090 global.maxconn, global.maxsslconn);
1091 }
1092 else if (!global.maxsslconn &&
1093 (global.ssl_used_frontend || global.ssl_used_backend)) {
1094 /* memmax and maxconn are known, compute maxsslconn automatically.
1095 * maxsslconn being forced, we don't know how many of it will be
1096 * on each side if both sides are being used. The worst case is
1097 * when all connections use only one SSL instance because
1098 * handshakes may be on two sides at the same time.
1099 */
1100 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
1101 int64_t mem = global.rlimit_memmax * 1048576ULL;
1102 int64_t sslmem;
1103
1104 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
1105 mem -= global.maxzlibmem;
1106 mem = mem * MEM_USABLE_RATIO;
1107
Willy Tarreau87b09662015-04-03 00:22:06 +02001108 sslmem = mem - global.maxconn * (int64_t)(STREAM_MAX_COST + 2 * global.tune.bufsize);
Willy Tarreaud0256482015-01-15 21:45:22 +01001109 global.maxsslconn = sslmem / (global.ssl_session_max_cost + global.ssl_handshake_max_cost);
1110 global.maxsslconn = round_2dig(global.maxsslconn);
1111
1112 if (sslmem <= 0 || global.maxsslconn < sides) {
1113 Alert("Cannot compute the automatic maxsslconn because global.maxconn is already too "
1114 "high for the global.memmax value (%d MB). The absolute maximum possible value "
1115 "without SSL is %d, but %d was found and SSL is in use.\n",
1116 global.rlimit_memmax,
Willy Tarreau87b09662015-04-03 00:22:06 +02001117 (int)(mem / (STREAM_MAX_COST + 2 * global.tune.bufsize)),
Willy Tarreaud0256482015-01-15 21:45:22 +01001118 global.maxconn);
1119 exit(1);
1120 }
1121
1122 if (global.maxsslconn > sides * global.maxconn)
1123 global.maxsslconn = sides * global.maxconn;
1124
1125 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
1126 fprintf(stderr, "Note: setting global.maxsslconn to %d\n", global.maxsslconn);
1127 }
1128#endif
1129 else if (!global.maxconn) {
1130 /* memmax and maxsslconn are known/unused, compute maxconn automatically */
1131 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
1132 int64_t mem = global.rlimit_memmax * 1048576ULL;
1133 int64_t clearmem;
1134
1135 if (global.ssl_used_frontend || global.ssl_used_backend)
1136 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
1137
1138 mem -= global.maxzlibmem;
1139 mem = mem * MEM_USABLE_RATIO;
1140
1141 clearmem = mem;
1142 if (sides)
1143 clearmem -= (global.ssl_session_max_cost + global.ssl_handshake_max_cost) * (int64_t)global.maxsslconn;
1144
Willy Tarreau87b09662015-04-03 00:22:06 +02001145 global.maxconn = clearmem / (STREAM_MAX_COST + 2 * global.tune.bufsize);
Willy Tarreaud0256482015-01-15 21:45:22 +01001146 global.maxconn = round_2dig(global.maxconn);
Willy Tarreau474b96a2015-01-28 19:03:21 +01001147#ifdef SYSTEM_MAXCONN
1148 if (global.maxconn > DEFAULT_MAXCONN)
1149 global.maxconn = DEFAULT_MAXCONN;
1150#endif /* SYSTEM_MAXCONN */
Willy Tarreaud0256482015-01-15 21:45:22 +01001151
1152 if (clearmem <= 0 || !global.maxconn) {
1153 Alert("Cannot compute the automatic maxconn because global.maxsslconn is already too "
1154 "high for the global.memmax value (%d MB). The absolute maximum possible value "
1155 "is %d, but %d was found.\n",
1156 global.rlimit_memmax,
1157 (int)(mem / (global.ssl_session_max_cost + global.ssl_handshake_max_cost)),
1158 global.maxsslconn);
1159 exit(1);
1160 }
1161
1162 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
1163 if (sides && global.maxsslconn > sides * global.maxconn) {
1164 fprintf(stderr, "Note: global.maxsslconn is forced to %d which causes global.maxconn "
1165 "to be limited to %d. Better reduce global.maxsslconn to get more "
1166 "room for extra connections.\n", global.maxsslconn, global.maxconn);
1167 }
1168 fprintf(stderr, "Note: setting global.maxconn to %d\n", global.maxconn);
1169 }
1170 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001171
Willy Tarreau66aa61f2009-01-18 21:44:07 +01001172 if (!global.maxpipes) {
1173 /* maxpipes not specified. Count how many frontends and backends
1174 * may be using splicing, and bound that to maxconn.
1175 */
1176 struct proxy *cur;
1177 int nbfe = 0, nbbe = 0;
1178
1179 for (cur = proxy; cur; cur = cur->next) {
1180 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
1181 if (cur->cap & PR_CAP_FE)
1182 nbfe += cur->maxconn;
1183 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +01001184 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +01001185 }
1186 }
1187 global.maxpipes = MAX(nbfe, nbbe);
1188 if (global.maxpipes > global.maxconn)
1189 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +01001190 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +01001191 }
1192
1193
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001194 global.hardmaxconn = global.maxconn; /* keep this max value */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001195 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +01001196 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001197
Willy Tarreau3c63fd82011-09-07 18:00:47 +02001198 if (global.stats_fe)
1199 global.maxsock += global.stats_fe->maxconn;
1200
1201 if (peers) {
1202 /* peers also need to bypass global maxconn */
1203 struct peers *p = peers;
1204
1205 for (p = peers; p; p = p->next)
1206 if (p->peers_fe)
1207 global.maxsock += p->peers_fe->maxconn;
1208 }
1209
Willy Tarreau1db37712007-06-03 17:16:49 +02001210 if (global.tune.maxpollevents <= 0)
1211 global.tune.maxpollevents = MAX_POLL_EVENTS;
1212
Willy Tarreau6f4a82c2009-03-21 20:43:57 +01001213 if (global.tune.recv_enough == 0)
1214 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
1215
Willy Tarreau27097842015-09-28 13:53:23 +02001216 if (global.tune.maxrewrite < 0)
1217 global.tune.maxrewrite = MAXREWRITE;
1218
Willy Tarreau27a674e2009-08-17 07:23:33 +02001219 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
1220 global.tune.maxrewrite = global.tune.bufsize / 2;
1221
Willy Tarreaubaaee002006-06-26 02:48:02 +02001222 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
1223 /* command line debug mode inhibits configuration mode */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001224 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001225 global.mode |= (arg_mode & (MODE_DEBUG | MODE_FOREGROUND));
1226 }
1227
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001228 if (arg_mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001229 /* command line daemon mode inhibits foreground and debug modes mode */
1230 global.mode &= ~(MODE_DEBUG | MODE_FOREGROUND);
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001231 global.mode |= (arg_mode & (MODE_DAEMON | MODE_SYSTEMD));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001232 }
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001233
1234 global.mode |= (arg_mode & (MODE_QUIET | MODE_VERBOSE));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001235
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001236 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET))) {
1237 Warning("<debug> mode incompatible with <quiet>, <daemon> and <systemd>. Keeping <debug> only.\n");
1238 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001239 }
1240
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001241 if ((global.nbproc > 1) && !(global.mode & (MODE_DAEMON | MODE_SYSTEMD))) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001242 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
1243 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
1244 global.nbproc = 1;
1245 }
1246
1247 if (global.nbproc < 1)
1248 global.nbproc = 1;
1249
Vincent Bernat3c2f2f22016-04-03 13:48:42 +02001250 swap_buffer = calloc(1, global.tune.bufsize);
1251 get_http_auth_buff = calloc(1, global.tune.bufsize);
Thierry FOURNIER7e25df32015-07-24 19:31:59 +02001252 static_table_key = calloc(1, sizeof(*static_table_key));
Willy Tarreau8096de92010-02-26 11:12:27 +01001253
Vincent Bernat3c2f2f22016-04-03 13:48:42 +02001254 fdinfo = calloc(1, sizeof(struct fdinfo) * (global.maxsock));
1255 fdtab = calloc(1, sizeof(struct fdtab) * (global.maxsock));
Willy Tarreauef1d1f82007-04-16 00:25:25 +02001256 /*
1257 * Note: we could register external pollers here.
1258 * Built-in pollers have been registered before main().
1259 */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001260
Willy Tarreau43b78992009-01-25 15:42:27 +01001261 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +02001262 disable_poller("kqueue");
1263
Willy Tarreau43b78992009-01-25 15:42:27 +01001264 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001265 disable_poller("epoll");
1266
Willy Tarreau43b78992009-01-25 15:42:27 +01001267 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001268 disable_poller("poll");
1269
Willy Tarreau43b78992009-01-25 15:42:27 +01001270 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001271 disable_poller("select");
1272
1273 /* Note: we could disable any poller by name here */
1274
Christopher Fauletb3f4e142016-03-07 12:46:38 +01001275 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
Willy Tarreau2ff76222007-04-09 19:29:56 +02001276 list_pollers(stderr);
Christopher Fauletb3f4e142016-03-07 12:46:38 +01001277 fprintf(stderr, "\n");
1278 list_filters(stderr);
1279 }
Willy Tarreau2ff76222007-04-09 19:29:56 +02001280
Willy Tarreau4f60f162007-04-08 16:39:58 +02001281 if (!init_pollers()) {
Willy Tarreau3fa87b12013-03-31 14:41:15 +02001282 Alert("No polling mechanism available.\n"
1283 " It is likely that haproxy was built with TARGET=generic and that FD_SETSIZE\n"
1284 " is too low on this platform to support maxconn and the number of listeners\n"
1285 " and servers. You should rebuild haproxy specifying your system using TARGET=\n"
1286 " in order to support other polling systems (poll, epoll, kqueue) or reduce the\n"
Prach Pongpanichb837e682013-05-14 20:56:28 +02001287 " global maxconn setting to accommodate the system's limitation. For reference,\n"
Willy Tarreau3fa87b12013-03-31 14:41:15 +02001288 " FD_SETSIZE=%d on this system, global.maxconn=%d resulting in a maximum of\n"
1289 " %d file descriptors. You should thus reduce global.maxconn by %d. Also,\n"
1290 " check build settings using 'haproxy -vv'.\n\n",
1291 FD_SETSIZE, global.maxconn, global.maxsock, (global.maxsock + 1 - FD_SETSIZE) / 2);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001292 exit(1);
1293 }
Willy Tarreau2ff76222007-04-09 19:29:56 +02001294 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
1295 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001296 }
1297
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001298 if (!global.node)
1299 global.node = strdup(hostname);
1300
Thierry FOURNIERa4a0f3d2015-01-23 12:08:30 +01001301 if (!hlua_post_init())
1302 exit(1);
Thomas Holmes6abded42015-05-12 16:23:58 +01001303
Baptiste Assmann325137d2015-04-13 23:40:55 +02001304 /* initialize structures for name resolution */
1305 if (!dns_init_resolvers())
1306 exit(1);
Maxime de Roucy0f503922016-05-13 23:52:55 +02001307
1308 free(err_msg);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001309}
1310
Simon Horman6fb82592011-07-15 13:14:11 +09001311static void deinit_acl_cond(struct acl_cond *cond)
Simon Hormanac821422011-07-15 13:14:09 +09001312{
Simon Hormanac821422011-07-15 13:14:09 +09001313 struct acl_term_suite *suite, *suiteb;
1314 struct acl_term *term, *termb;
1315
Simon Horman6fb82592011-07-15 13:14:11 +09001316 if (!cond)
1317 return;
1318
1319 list_for_each_entry_safe(suite, suiteb, &cond->suites, list) {
1320 list_for_each_entry_safe(term, termb, &suite->terms, list) {
1321 LIST_DEL(&term->list);
1322 free(term);
Simon Hormanac821422011-07-15 13:14:09 +09001323 }
Simon Horman6fb82592011-07-15 13:14:11 +09001324 LIST_DEL(&suite->list);
1325 free(suite);
1326 }
1327
1328 free(cond);
1329}
1330
1331static void deinit_tcp_rules(struct list *rules)
1332{
Thierry FOURNIERa28a9422015-08-04 19:35:46 +02001333 struct act_rule *trule, *truleb;
Simon Horman6fb82592011-07-15 13:14:11 +09001334
1335 list_for_each_entry_safe(trule, truleb, rules, list) {
Simon Hormanac821422011-07-15 13:14:09 +09001336 LIST_DEL(&trule->list);
Simon Horman6fb82592011-07-15 13:14:11 +09001337 deinit_acl_cond(trule->cond);
Simon Hormanac821422011-07-15 13:14:09 +09001338 free(trule);
1339 }
1340}
1341
Willy Tarreau12785782012-04-27 21:37:17 +02001342static void deinit_sample_arg(struct arg *p)
Simon Horman6fb82592011-07-15 13:14:11 +09001343{
Willy Tarreauf9954102012-04-20 14:03:29 +02001344 struct arg *p_back = p;
1345
Simon Horman6fb82592011-07-15 13:14:11 +09001346 if (!p)
1347 return;
1348
Willy Tarreauf9954102012-04-20 14:03:29 +02001349 while (p->type != ARGT_STOP) {
Willy Tarreau496aa012012-06-01 10:38:29 +02001350 if (p->type == ARGT_STR || p->unresolved) {
Willy Tarreauf9954102012-04-20 14:03:29 +02001351 free(p->data.str.str);
1352 p->data.str.str = NULL;
Willy Tarreau496aa012012-06-01 10:38:29 +02001353 p->unresolved = 0;
Willy Tarreauecfb8e82012-04-20 12:29:52 +02001354 }
Willy Tarreau46947782015-01-19 19:00:58 +01001355 else if (p->type == ARGT_REG) {
1356 if (p->data.reg) {
1357 regex_free(p->data.reg);
1358 free(p->data.reg);
1359 p->data.reg = NULL;
1360 }
1361 }
Willy Tarreauf9954102012-04-20 14:03:29 +02001362 p++;
Willy Tarreauecfb8e82012-04-20 12:29:52 +02001363 }
Simon Horman6fb82592011-07-15 13:14:11 +09001364
Willy Tarreau2e845be2012-10-19 19:49:09 +02001365 if (p_back != empty_arg_list)
1366 free(p_back);
Simon Horman6fb82592011-07-15 13:14:11 +09001367}
1368
1369static void deinit_stick_rules(struct list *rules)
1370{
1371 struct sticking_rule *rule, *ruleb;
1372
1373 list_for_each_entry_safe(rule, ruleb, rules, list) {
1374 LIST_DEL(&rule->list);
1375 deinit_acl_cond(rule->cond);
1376 if (rule->expr) {
Willy Tarreau12785782012-04-27 21:37:17 +02001377 struct sample_conv_expr *conv_expr, *conv_exprb;
Simon Horman6fb82592011-07-15 13:14:11 +09001378 list_for_each_entry_safe(conv_expr, conv_exprb, &rule->expr->conv_exprs, list)
Willy Tarreau12785782012-04-27 21:37:17 +02001379 deinit_sample_arg(conv_expr->arg_p);
1380 deinit_sample_arg(rule->expr->arg_p);
Simon Horman6fb82592011-07-15 13:14:11 +09001381 free(rule->expr);
1382 }
1383 free(rule);
1384 }
1385}
1386
Willy Tarreaubaaee002006-06-26 02:48:02 +02001387void deinit(void)
1388{
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001389 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001390 struct cap_hdr *h,*h_next;
1391 struct server *s,*s_next;
1392 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001393 struct acl_cond *cond, *condb;
1394 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001395 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001396 struct switching_rule *rule, *ruleb;
Willy Tarreau4a5cade2012-04-05 21:09:48 +02001397 struct server_rule *srule, *sruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001398 struct redirect_rule *rdr, *rdrb;
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001399 struct wordlist *wl, *wlb;
Willy Tarreauf4f04122010-01-28 18:10:50 +01001400 struct cond_wordlist *cwl, *cwlb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001401 struct uri_auth *uap, *ua = NULL;
William Lallemand0f99e342011-10-12 17:50:54 +02001402 struct logsrv *log, *logb;
William Lallemand723b73a2012-02-08 16:37:49 +01001403 struct logformat_node *lf, *lfb;
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001404 struct bind_conf *bind_conf, *bind_back;
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001405 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001406
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001407 deinit_signals();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001408 while (p) {
Willy Tarreau8113a5d2012-10-04 08:01:43 +02001409 free(p->conf.file);
Willy Tarreaua534fea2008-08-03 12:19:50 +02001410 free(p->id);
1411 free(p->check_req);
1412 free(p->cookie_name);
1413 free(p->cookie_domain);
1414 free(p->url_param_name);
1415 free(p->capture_name);
1416 free(p->monitor_uri);
Simon Hormana31c7f72011-07-15 13:14:08 +09001417 free(p->rdp_cookie_name);
Willy Tarreau62a61232013-04-12 18:13:46 +02001418 if (p->conf.logformat_string != default_http_log_format &&
1419 p->conf.logformat_string != default_tcp_log_format &&
1420 p->conf.logformat_string != clf_http_log_format)
1421 free(p->conf.logformat_string);
Willy Tarreau196729e2012-05-31 19:30:26 +02001422
Willy Tarreau62a61232013-04-12 18:13:46 +02001423 free(p->conf.lfs_file);
1424 free(p->conf.uniqueid_format_string);
1425 free(p->conf.uif_file);
Godbachaf1a75d2013-10-02 17:10:11 +08001426 free(p->lbprm.map.srv);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001427
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001428 if (p->conf.logformat_sd_string != default_rfc5424_sd_log_format)
1429 free(p->conf.logformat_sd_string);
1430 free(p->conf.lfsd_file);
1431
Willy Tarreaua534fea2008-08-03 12:19:50 +02001432 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +02001433 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001434
Willy Tarreauf4f04122010-01-28 18:10:50 +01001435 list_for_each_entry_safe(cwl, cwlb, &p->req_add, list) {
1436 LIST_DEL(&cwl->list);
1437 free(cwl->s);
1438 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001439 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001440
Willy Tarreauf4f04122010-01-28 18:10:50 +01001441 list_for_each_entry_safe(cwl, cwlb, &p->rsp_add, list) {
1442 LIST_DEL(&cwl->list);
1443 free(cwl->s);
1444 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001445 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001446
Willy Tarreaub80c2302007-11-30 20:51:32 +01001447 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
1448 LIST_DEL(&cond->list);
1449 prune_acl_cond(cond);
1450 free(cond);
1451 }
1452
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001453 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001454 if (exp->preg) {
Thierry FOURNIER09af0d62014-06-18 11:35:54 +02001455 regex_free(exp->preg);
1456 free(exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001457 }
1458
Willy Tarreau98d04852015-05-26 12:18:29 +02001459 free((char *)exp->replace);
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001460 expb = exp;
1461 exp = exp->next;
1462 free(expb);
1463 }
1464
1465 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001466 if (exp->preg) {
Thierry FOURNIER09af0d62014-06-18 11:35:54 +02001467 regex_free(exp->preg);
1468 free(exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001469 }
1470
Willy Tarreau98d04852015-05-26 12:18:29 +02001471 free((char *)exp->replace);
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001472 expb = exp;
1473 exp = exp->next;
1474 free(expb);
1475 }
1476
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001477 /* build a list of unique uri_auths */
1478 if (!ua)
1479 ua = p->uri_auth;
1480 else {
1481 /* check if p->uri_auth is unique */
1482 for (uap = ua; uap; uap=uap->next)
1483 if (uap == p->uri_auth)
1484 break;
1485
Willy Tarreauaccc4e12008-06-24 11:14:45 +02001486 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001487 /* add it, if it is */
1488 p->uri_auth->next = ua;
1489 ua = p->uri_auth;
1490 }
1491 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001492
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001493 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
1494 LIST_DEL(&acl->list);
1495 prune_acl(acl);
1496 free(acl);
1497 }
1498
Willy Tarreau4a5cade2012-04-05 21:09:48 +02001499 list_for_each_entry_safe(srule, sruleb, &p->server_rules, list) {
1500 LIST_DEL(&srule->list);
1501 prune_acl_cond(srule->cond);
1502 free(srule->cond);
1503 free(srule);
1504 }
1505
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001506 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
1507 LIST_DEL(&rule->list);
Willy Tarreauf51658d2014-04-23 01:21:56 +02001508 if (rule->cond) {
1509 prune_acl_cond(rule->cond);
1510 free(rule->cond);
1511 }
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001512 free(rule);
1513 }
1514
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001515 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
1516 LIST_DEL(&rdr->list);
Willy Tarreauf285f542010-01-03 20:03:03 +01001517 if (rdr->cond) {
1518 prune_acl_cond(rdr->cond);
1519 free(rdr->cond);
1520 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001521 free(rdr->rdr_str);
Thierry FOURNIERd18cd0f2013-11-29 12:15:45 +01001522 list_for_each_entry_safe(lf, lfb, &rdr->rdr_fmt, list) {
1523 LIST_DEL(&lf->list);
1524 free(lf);
1525 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001526 free(rdr);
1527 }
1528
William Lallemand0f99e342011-10-12 17:50:54 +02001529 list_for_each_entry_safe(log, logb, &p->logsrvs, list) {
1530 LIST_DEL(&log->list);
1531 free(log);
1532 }
1533
William Lallemand723b73a2012-02-08 16:37:49 +01001534 list_for_each_entry_safe(lf, lfb, &p->logformat, list) {
1535 LIST_DEL(&lf->list);
1536 free(lf);
1537 }
1538
Dragan Dosen0b85ece2015-09-25 19:17:44 +02001539 list_for_each_entry_safe(lf, lfb, &p->logformat_sd, list) {
1540 LIST_DEL(&lf->list);
1541 free(lf);
1542 }
1543
Simon Hormanac821422011-07-15 13:14:09 +09001544 deinit_tcp_rules(&p->tcp_req.inspect_rules);
1545 deinit_tcp_rules(&p->tcp_req.l4_rules);
1546
Simon Horman6fb82592011-07-15 13:14:11 +09001547 deinit_stick_rules(&p->storersp_rules);
1548 deinit_stick_rules(&p->sticking_rules);
1549
Willy Tarreaubaaee002006-06-26 02:48:02 +02001550 h = p->req_cap;
1551 while (h) {
1552 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001553 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001554 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001555 free(h);
1556 h = h_next;
1557 }/* end while(h) */
1558
1559 h = p->rsp_cap;
1560 while (h) {
1561 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001562 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001563 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001564 free(h);
1565 h = h_next;
1566 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001567
Willy Tarreaubaaee002006-06-26 02:48:02 +02001568 s = p->srv;
1569 while (s) {
1570 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001571
Willy Tarreau5b3a2022012-09-28 15:01:02 +02001572 if (s->check.task) {
1573 task_delete(s->check.task);
1574 task_free(s->check.task);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001575 }
Simon Hormand60d6912013-11-25 10:46:36 +09001576 if (s->agent.task) {
1577 task_delete(s->agent.task);
1578 task_free(s->agent.task);
1579 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001580
Willy Tarreau2e993902011-10-31 11:53:20 +01001581 if (s->warmup) {
1582 task_delete(s->warmup);
1583 task_free(s->warmup);
1584 }
1585
Willy Tarreaua534fea2008-08-03 12:19:50 +02001586 free(s->id);
1587 free(s->cookie);
Willy Tarreau1ae1b7b2012-09-28 15:28:30 +02001588 free(s->check.bi);
1589 free(s->check.bo);
Simon Hormand60d6912013-11-25 10:46:36 +09001590 free(s->agent.bi);
1591 free(s->agent.bo);
James Brown55f9ff12015-10-21 18:19:05 -07001592 free(s->agent.send_string);
Sárközi, László34c01792014-09-05 10:08:23 +02001593 free((char*)s->conf.file);
Christopher Faulet77fe80c2015-07-29 13:02:40 +02001594#ifdef USE_OPENSSL
1595 if (s->use_ssl || s->check.use_ssl)
1596 ssl_sock_free_srv_ctx(s);
1597#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +02001598 free(s);
1599 s = s_next;
1600 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001601
Willy Tarreau4348fad2012-09-20 16:48:07 +02001602 list_for_each_entry_safe(l, l_next, &p->conf.listeners, by_fe) {
Willy Tarreauf6e2cc72010-09-03 10:38:17 +02001603 unbind_listener(l);
1604 delete_listener(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001605 LIST_DEL(&l->by_fe);
1606 LIST_DEL(&l->by_bind);
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001607 free(l->name);
1608 free(l->counters);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001609 free(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001610 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001611
Willy Tarreau4348fad2012-09-20 16:48:07 +02001612 /* Release unused SSL configs. */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001613 list_for_each_entry_safe(bind_conf, bind_back, &p->conf.bind, by_fe) {
1614#ifdef USE_OPENSSL
Christopher Faulet31af49d2015-06-09 17:29:50 +02001615 ssl_sock_free_ca(bind_conf);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001616 ssl_sock_free_all_ctx(bind_conf);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001617 free(bind_conf->ca_file);
Christopher Faulet31af49d2015-06-09 17:29:50 +02001618 free(bind_conf->ca_sign_file);
1619 free(bind_conf->ca_sign_pass);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001620 free(bind_conf->ciphers);
Emeric Brun2b58d042012-09-20 17:10:03 +02001621 free(bind_conf->ecdhe);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001622 free(bind_conf->crl_file);
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001623#endif /* USE_OPENSSL */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001624 free(bind_conf->file);
1625 free(bind_conf->arg);
1626 LIST_DEL(&bind_conf->by_fe);
1627 free(bind_conf);
1628 }
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001629
Christopher Fauletd7c91962015-04-30 11:48:27 +02001630 flt_deinit(p);
1631
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001632 free(p->desc);
1633 free(p->fwdfor_hdr_name);
1634
Willy Tarreauff011f22011-01-06 17:51:27 +01001635 free_http_req_rules(&p->http_req_rules);
Sasha Pachev218f0642014-06-16 12:05:59 -06001636 free_http_res_rules(&p->http_res_rules);
Willy Tarreau918ff602011-07-25 16:33:49 +02001637 free(p->task);
Krzysztof Piotr Oledzki59bb2182010-01-29 17:58:21 +01001638
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001639 pool_destroy2(p->req_cap_pool);
1640 pool_destroy2(p->rsp_cap_pool);
Simon Hormanb08584a2011-07-15 13:14:10 +09001641 pool_destroy2(p->table.pool);
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001642
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001643 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001644 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001645 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001646 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +02001647
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001648 while (ua) {
1649 uap = ua;
1650 ua = ua->next;
1651
Willy Tarreaua534fea2008-08-03 12:19:50 +02001652 free(uap->uri_prefix);
1653 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001654 free(uap->node);
1655 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001656
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001657 userlist_free(uap->userlist);
Willy Tarreauff011f22011-01-06 17:51:27 +01001658 free_http_req_rules(&uap->http_req_rules);
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001659
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001660 free(uap);
1661 }
1662
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001663 userlist_free(userlist);
1664
David Carlier834cb2e2015-09-25 12:02:25 +01001665 cfg_unregister_sections();
1666
1667 free_trash_buffers();
1668 chunk_destroy(&trash);
1669
Willy Tarreaudd815982007-10-16 12:25:14 +02001670 protocol_unbind_all();
1671
David Carlier4a026412015-06-01 13:57:22 +02001672#if defined(USE_DEVICEATLAS)
1673 deinit_deviceatlas();
1674#endif
1675
Thomas Holmes5ed33ee2015-05-14 17:14:30 +01001676#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +02001677 deinit_51degrees();
Thomas Holmes4d441a72015-05-29 12:54:25 +01001678#endif
Thomas Holmes5ed33ee2015-05-14 17:14:30 +01001679
scientiamobiled0027ed2016-11-04 10:55:08 +01001680#ifdef USE_WURFL
1681 ha_wurfl_deinit();
1682#endif
1683
Joe Williamsdf5b38f2010-12-29 17:05:48 +01001684 free(global.log_send_hostname); global.log_send_hostname = NULL;
Dragan Dosen43885c72015-10-01 13:18:13 +02001685 chunk_destroy(&global.log_tag);
Willy Tarreaua534fea2008-08-03 12:19:50 +02001686 free(global.chroot); global.chroot = NULL;
1687 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001688 free(global.node); global.node = NULL;
1689 free(global.desc); global.desc = NULL;
Godbach4cc1b0d2013-06-26 16:49:51 +08001690 free(fdinfo); fdinfo = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001691 free(fdtab); fdtab = NULL;
1692 free(oldpids); oldpids = NULL;
David Carlier834cb2e2015-09-25 12:02:25 +01001693 free(static_table_key); static_table_key = NULL;
1694 free(get_http_auth_buff); get_http_auth_buff = NULL;
1695 free(swap_buffer); swap_buffer = NULL;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001696 free(global_listener_queue_task); global_listener_queue_task = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001697
William Lallemand0f99e342011-10-12 17:50:54 +02001698 list_for_each_entry_safe(log, logb, &global.logsrvs, list) {
1699 LIST_DEL(&log->list);
1700 free(log);
1701 }
Willy Tarreau477ecd82010-01-03 21:12:30 +01001702 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
Maxime de Roucy0f503922016-05-13 23:52:55 +02001703 free(wl->s);
Willy Tarreau477ecd82010-01-03 21:12:30 +01001704 LIST_DEL(&wl->list);
1705 free(wl);
1706 }
1707
Willy Tarreau87b09662015-04-03 00:22:06 +02001708 pool_destroy2(pool2_stream);
Willy Tarreaufeb76402015-04-03 14:10:06 +02001709 pool_destroy2(pool2_session);
Willy Tarreauf2943dc2012-10-26 20:10:28 +02001710 pool_destroy2(pool2_connection);
Willy Tarreau9b28e032012-10-12 23:49:43 +02001711 pool_destroy2(pool2_buffer);
Willy Tarreau332f8bf2007-05-13 21:36:56 +02001712 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001713 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +02001714 pool_destroy2(pool2_capture);
Willy Tarreaue4d7e552007-05-13 20:19:55 +02001715 pool_destroy2(pool2_pendconn);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001716 pool_destroy2(pool2_sig_handlers);
Willy Tarreau34eb6712011-10-24 18:15:04 +02001717 pool_destroy2(pool2_hdr_idx);
Willy Tarreau63986c72015-04-03 22:55:33 +02001718 pool_destroy2(pool2_http_txn);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001719 deinit_pollers();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001720} /* end deinit() */
1721
Willy Tarreaubb545b42010-08-25 12:58:59 +02001722/* sends the signal <sig> to all pids found in <oldpids>. Returns the number of
1723 * pids the signal was correctly delivered to.
1724 */
1725static int tell_old_pids(int sig)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001726{
1727 int p;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001728 int ret = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001729 for (p = 0; p < nb_oldpids; p++)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001730 if (kill(oldpids[p], sig) == 0)
1731 ret++;
1732 return ret;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001733}
1734
Willy Tarreau918ff602011-07-25 16:33:49 +02001735/* Runs the polling loop */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001736void run_poll_loop()
1737{
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001738 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +02001739
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001740 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001741 while (1) {
Thierry FOURNIER9cf7c4b2014-12-15 13:26:01 +01001742 /* Process a few tasks */
1743 process_runnable_tasks();
1744
Willy Tarreau29857942009-05-10 09:01:21 +02001745 /* check if we caught some signals and process them */
1746 signal_process_queue();
1747
Willy Tarreau58b458d2008-06-29 22:40:23 +02001748 /* Check if we can expire some tasks */
Thierry FOURNIER9cf7c4b2014-12-15 13:26:01 +01001749 next = wake_expired_tasks();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001750
Willy Tarreauaf7ad002010-08-31 15:39:26 +02001751 /* stop when there's nothing left to do */
1752 if (jobs == 0)
Willy Tarreau4f60f162007-04-08 16:39:58 +02001753 break;
1754
Willy Tarreau10146c92015-04-13 20:44:19 +02001755 /* expire immediately if events are pending */
Willy Tarreau64bca9d2015-09-25 17:39:23 +02001756 if (fd_cache_num || run_queue || signal_queue_len || !LIST_ISEMPTY(&applet_active_queue))
Willy Tarreau10146c92015-04-13 20:44:19 +02001757 next = now_ms;
1758
Willy Tarreau58b458d2008-06-29 22:40:23 +02001759 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001760 cur_poller.poll(&cur_poller, next);
Willy Tarreau033cd9d2014-01-25 19:24:15 +01001761 fd_process_cached_events();
Willy Tarreau3c595ac2015-04-19 09:59:31 +02001762 applet_run_active();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001763 }
1764}
1765
Willy Tarreaue9b26022011-08-01 20:57:55 +02001766/* This is the global management task for listeners. It enables listeners waiting
1767 * for global resources when there are enough free resource, or at least once in
1768 * a while. It is designed to be called as a task.
1769 */
1770static struct task *manage_global_listener_queue(struct task *t)
1771{
1772 int next = TICK_ETERNITY;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001773 /* queue is empty, nothing to do */
1774 if (LIST_ISEMPTY(&global_listener_queue))
1775 goto out;
1776
1777 /* If there are still too many concurrent connections, let's wait for
1778 * some of them to go away. We don't need to re-arm the timer because
1779 * each of them will scan the queue anyway.
1780 */
1781 if (unlikely(actconn >= global.maxconn))
1782 goto out;
1783
1784 /* We should periodically try to enable listeners waiting for a global
1785 * resource here, because it is possible, though very unlikely, that
1786 * they have been blocked by a temporary lack of global resource such
1787 * as a file descriptor or memory and that the temporary condition has
1788 * disappeared.
1789 */
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001790 dequeue_all_listeners(&global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +02001791
1792 out:
1793 t->expire = next;
1794 task_queue(t);
1795 return t;
1796}
Willy Tarreau4f60f162007-04-08 16:39:58 +02001797
Willy Tarreaubaaee002006-06-26 02:48:02 +02001798int main(int argc, char **argv)
1799{
1800 int err, retry;
1801 struct rlimit limit;
Emeric Bruncf20bf12010-10-22 16:06:11 +02001802 char errmsg[100];
Willy Tarreau269ab312012-09-05 08:02:48 +02001803 int pidfd = -1;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001804
Emeric Bruncf20bf12010-10-22 16:06:11 +02001805 init(argc, argv);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001806 signal_register_fct(SIGQUIT, dump, SIGQUIT);
1807 signal_register_fct(SIGUSR1, sig_soft_stop, SIGUSR1);
1808 signal_register_fct(SIGHUP, sig_dump_state, SIGHUP);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001809
Willy Tarreaue437c442010-03-17 18:02:46 +01001810 /* Always catch SIGPIPE even on platforms which define MSG_NOSIGNAL.
1811 * Some recent FreeBSD setups report broken pipes, and MSG_NOSIGNAL
1812 * was defined there, so let's stay on the safe side.
Willy Tarreaubaaee002006-06-26 02:48:02 +02001813 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001814 signal_register_fct(SIGPIPE, NULL, 0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001815
Willy Tarreaudc23a922011-02-16 11:10:36 +01001816 /* ulimits */
1817 if (!global.rlimit_nofile)
1818 global.rlimit_nofile = global.maxsock;
1819
1820 if (global.rlimit_nofile) {
1821 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
1822 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
Willy Tarreauef635472016-06-21 11:48:18 +02001823 /* try to set it to the max possible at least */
1824 getrlimit(RLIMIT_NOFILE, &limit);
Willy Tarreau164dd0b2016-06-21 11:51:59 +02001825 limit.rlim_cur = limit.rlim_max;
1826 if (setrlimit(RLIMIT_NOFILE, &limit) != -1)
1827 getrlimit(RLIMIT_NOFILE, &limit);
1828
Willy Tarreauef635472016-06-21 11:48:18 +02001829 Warning("[%s.main()] Cannot raise FD limit to %d, limit is %d.\n", argv[0], global.rlimit_nofile, (int)limit.rlim_cur);
1830 global.rlimit_nofile = limit.rlim_cur;
Willy Tarreaudc23a922011-02-16 11:10:36 +01001831 }
1832 }
1833
1834 if (global.rlimit_memmax) {
1835 limit.rlim_cur = limit.rlim_max =
Willy Tarreau70060452015-12-14 12:46:07 +01001836 global.rlimit_memmax * 1048576ULL;
Willy Tarreaudc23a922011-02-16 11:10:36 +01001837#ifdef RLIMIT_AS
1838 if (setrlimit(RLIMIT_AS, &limit) == -1) {
1839 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1840 argv[0], global.rlimit_memmax);
1841 }
1842#else
1843 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
1844 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1845 argv[0], global.rlimit_memmax);
1846 }
1847#endif
1848 }
1849
Willy Tarreaubaaee002006-06-26 02:48:02 +02001850 /* We will loop at most 100 times with 10 ms delay each time.
1851 * That's at most 1 second. We only send a signal to old pids
1852 * if we cannot grab at least one port.
1853 */
1854 retry = MAX_START_RETRIES;
1855 err = ERR_NONE;
1856 while (retry >= 0) {
1857 struct timeval w;
1858 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +01001859 /* exit the loop on no error or fatal error */
1860 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001861 break;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001862 if (nb_oldpids == 0 || retry == 0)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001863 break;
1864
1865 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
1866 * listening sockets. So on those platforms, it would be wiser to
1867 * simply send SIGUSR1, which will not be undoable.
1868 */
Willy Tarreaubb545b42010-08-25 12:58:59 +02001869 if (tell_old_pids(SIGTTOU) == 0) {
1870 /* no need to wait if we can't contact old pids */
1871 retry = 0;
1872 continue;
1873 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001874 /* give some time to old processes to stop listening */
1875 w.tv_sec = 0;
1876 w.tv_usec = 10*1000;
1877 select(0, NULL, NULL, NULL, &w);
1878 retry--;
1879 }
1880
1881 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001882 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +02001883 if (retry != MAX_START_RETRIES && nb_oldpids) {
1884 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001885 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +02001886 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001887 exit(1);
1888 }
1889
1890 if (listeners == 0) {
Willy Tarreauf2ee0162015-08-09 11:01:51 +02001891 Alert("[%s.main()] No enabled listener found (check for 'bind' directives) ! Exiting.\n", argv[0]);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001892 /* Note: we don't have to send anything to the old pids because we
1893 * never stopped them. */
1894 exit(1);
1895 }
1896
Emeric Bruncf20bf12010-10-22 16:06:11 +02001897 err = protocol_bind_all(errmsg, sizeof(errmsg));
1898 if ((err & ~ERR_WARN) != ERR_NONE) {
1899 if ((err & ERR_ALERT) || (err & ERR_WARN))
1900 Alert("[%s.main()] %s.\n", argv[0], errmsg);
1901
Willy Tarreaudd815982007-10-16 12:25:14 +02001902 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1903 protocol_unbind_all(); /* cleanup everything we can */
1904 if (nb_oldpids)
1905 tell_old_pids(SIGTTIN);
1906 exit(1);
Emeric Bruncf20bf12010-10-22 16:06:11 +02001907 } else if (err & ERR_WARN) {
1908 Alert("[%s.main()] %s.\n", argv[0], errmsg);
Willy Tarreaudd815982007-10-16 12:25:14 +02001909 }
1910
Willy Tarreaubaaee002006-06-26 02:48:02 +02001911 /* prepare pause/play signals */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001912 signal_register_fct(SIGTTOU, sig_pause, SIGTTOU);
1913 signal_register_fct(SIGTTIN, sig_listen, SIGTTIN);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001914
Willy Tarreaubaaee002006-06-26 02:48:02 +02001915 /* MODE_QUIET can inhibit alerts and warnings below this line */
1916
1917 global.mode &= ~MODE_STARTING;
1918 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1919 /* detach from the tty */
1920 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001921 }
1922
1923 /* open log & pid files before the chroot */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001924 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD) && global.pidfile != NULL) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001925 unlink(global.pidfile);
1926 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1927 if (pidfd < 0) {
1928 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1929 if (nb_oldpids)
1930 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001931 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001932 exit(1);
1933 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001934 }
1935
Willy Tarreaub38651a2007-03-24 17:24:39 +01001936 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1937 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001938 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001939 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001940 exit(1);
1941 }
1942
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001943 /* If the user is not root, we'll still let him try the configuration
1944 * but we inform him that unexpected behaviour may occur.
1945 */
1946 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1947 Warning("[%s.main()] Some options which require full privileges"
1948 " might not work well.\n"
1949 "", argv[0]);
1950
Willy Tarreauf223cc02007-10-15 18:57:08 +02001951 /* chroot if needed */
1952 if (global.chroot != NULL) {
Willy Tarreau21337822012-04-29 14:11:38 +02001953 if (chroot(global.chroot) == -1 || chdir("/") == -1) {
Willy Tarreauf223cc02007-10-15 18:57:08 +02001954 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1955 if (nb_oldpids)
1956 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001957 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001958 exit(1);
1959 }
Willy Tarreauf223cc02007-10-15 18:57:08 +02001960 }
1961
Willy Tarreaubaaee002006-06-26 02:48:02 +02001962 if (nb_oldpids)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001963 nb_oldpids = tell_old_pids(oldpids_sig);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001964
1965 /* Note that any error at this stage will be fatal because we will not
1966 * be able to restart the old pids.
1967 */
1968
1969 /* setgid / setuid */
Michael Schererab012dd2013-01-12 18:35:19 +01001970 if (global.gid) {
1971 if (getgroups(0, NULL) > 0 && setgroups(0, NULL) == -1)
1972 Warning("[%s.main()] Failed to drop supplementary groups. Using 'gid'/'group'"
1973 " without 'uid'/'user' is generally useless.\n", argv[0]);
1974
1975 if (setgid(global.gid) == -1) {
1976 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
1977 protocol_unbind_all();
1978 exit(1);
1979 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001980 }
1981
1982 if (global.uid && setuid(global.uid) == -1) {
1983 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001984 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001985 exit(1);
1986 }
1987
1988 /* check ulimits */
1989 limit.rlim_cur = limit.rlim_max = 0;
1990 getrlimit(RLIMIT_NOFILE, &limit);
1991 if (limit.rlim_cur < global.maxsock) {
1992 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 +02001993 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001994 }
1995
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001996 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001997 struct proxy *px;
Willy Tarreauf83d3fe2015-05-01 19:13:41 +02001998 struct peers *curpeers;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001999 int ret = 0;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01002000 int *children = calloc(global.nbproc, sizeof(int));
Willy Tarreaubaaee002006-06-26 02:48:02 +02002001 int proc;
Willy Tarreaub9571092016-10-25 17:20:24 +02002002 char *wrapper_fd;
Willy Tarreaubaaee002006-06-26 02:48:02 +02002003
2004 /* the father launches the required number of processes */
2005 for (proc = 0; proc < global.nbproc; proc++) {
2006 ret = fork();
2007 if (ret < 0) {
2008 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02002009 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02002010 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02002011 }
2012 else if (ret == 0) /* child breaks here */
2013 break;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01002014 children[proc] = ret;
Willy Tarreau269ab312012-09-05 08:02:48 +02002015 if (pidfd >= 0) {
2016 char pidstr[100];
2017 snprintf(pidstr, sizeof(pidstr), "%d\n", ret);
Willy Tarreau89efaed2013-12-13 15:14:55 +01002018 shut_your_big_mouth_gcc(write(pidfd, pidstr, strlen(pidstr)));
Willy Tarreaubaaee002006-06-26 02:48:02 +02002019 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01002020 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02002021 }
Willy Tarreaufc6c0322012-11-16 16:12:27 +01002022
2023#ifdef USE_CPU_AFFINITY
2024 if (proc < global.nbproc && /* child */
Willy Tarreaue7597492015-04-20 11:36:57 +02002025 proc < LONGBITS && /* only the first 32/64 processes may be pinned */
Willy Tarreaufc6c0322012-11-16 16:12:27 +01002026 global.cpu_map[proc]) /* only do this if the process has a CPU map */
Pieter Baauwcaa6a1b2015-09-17 21:26:40 +02002027#ifdef __FreeBSD__
2028 cpuset_setaffinity(CPU_LEVEL_WHICH, CPU_WHICH_PID, -1, sizeof(unsigned long), (void *)&global.cpu_map[proc]);
2029#else
Willy Tarreaufc6c0322012-11-16 16:12:27 +01002030 sched_setaffinity(0, sizeof(unsigned long), (void *)&global.cpu_map[proc]);
2031#endif
Pieter Baauwcaa6a1b2015-09-17 21:26:40 +02002032#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +02002033 /* close the pidfile both in children and father */
Willy Tarreau269ab312012-09-05 08:02:48 +02002034 if (pidfd >= 0) {
2035 //lseek(pidfd, 0, SEEK_SET); /* debug: emulate eglibc bug */
2036 close(pidfd);
2037 }
Willy Tarreaud137dd32010-08-25 12:49:05 +02002038
Willy Tarreaub9571092016-10-25 17:20:24 +02002039 /* each child must notify the wrapper that it's ready by closing the requested fd */
2040 wrapper_fd = getenv("HAPROXY_WRAPPER_FD");
2041 if (wrapper_fd) {
2042 int pipe_fd = atoi(wrapper_fd);
2043
2044 if (pipe_fd >= 0)
2045 close(pipe_fd);
2046 }
2047
Willy Tarreaud137dd32010-08-25 12:49:05 +02002048 /* We won't ever use this anymore */
2049 free(oldpids); oldpids = NULL;
2050 free(global.chroot); global.chroot = NULL;
2051 free(global.pidfile); global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02002052
Willy Tarreauedaff0a2015-05-01 17:01:08 +02002053 if (proc == global.nbproc) {
2054 if (global.mode & MODE_SYSTEMD) {
William Lallemand6ad6bde2016-01-14 18:10:30 +01002055 int i;
2056
Willy Tarreauedaff0a2015-05-01 17:01:08 +02002057 protocol_unbind_all();
William Lallemand6ad6bde2016-01-14 18:10:30 +01002058 for (i = 1; i < argc; i++) {
2059 memset(argv[i], '\0', strlen(argv[i]));
2060 }
2061 /* it's OK because "-Ds -f x" is the shortest form going here */
2062 memcpy(argv[0] + strlen(argv[0]), "-master", 8);
Willy Tarreauedaff0a2015-05-01 17:01:08 +02002063 for (proc = 0; proc < global.nbproc; proc++)
2064 while (waitpid(children[proc], NULL, 0) == -1 && errno == EINTR);
2065 }
2066 exit(0); /* parent must leave */
2067 }
2068
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01002069 /* we might have to unbind some proxies from some processes */
2070 px = proxy;
2071 while (px != NULL) {
2072 if (px->bind_proc && px->state != PR_STSTOPPED) {
Willy Tarreaua9db57e2013-01-18 11:29:29 +01002073 if (!(px->bind_proc & (1UL << proc)))
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01002074 stop_proxy(px);
2075 }
2076 px = px->next;
2077 }
2078
Willy Tarreauf83d3fe2015-05-01 19:13:41 +02002079 /* we might have to unbind some peers sections from some processes */
2080 for (curpeers = peers; curpeers; curpeers = curpeers->next) {
2081 if (!curpeers->peers_fe)
2082 continue;
2083
2084 if (curpeers->peers_fe->bind_proc & (1UL << proc))
2085 continue;
2086
2087 stop_proxy(curpeers->peers_fe);
2088 /* disable this peer section so that it kills itself */
Willy Tarreau47c8c022015-09-28 16:39:25 +02002089 signal_unregister_handler(curpeers->sighandler);
2090 task_delete(curpeers->sync_task);
2091 task_free(curpeers->sync_task);
2092 curpeers->sync_task = NULL;
2093 task_free(curpeers->peers_fe->task);
2094 curpeers->peers_fe->task = NULL;
Willy Tarreauf83d3fe2015-05-01 19:13:41 +02002095 curpeers->peers_fe = NULL;
2096 }
2097
Dirkjan Bussink07fcaaa2014-04-28 22:57:16 +00002098 free(children);
2099 children = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02002100 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
2101 * that we can detach from the TTY. We MUST NOT do it in other cases since
2102 * it would have already be done, and 0-2 would have been affected to listening
2103 * sockets
2104 */
Willy Tarreau106cb762008-11-16 07:40:34 +01002105 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02002106 /* detach from the tty */
2107 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01002108 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02002109 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
2110 }
2111 pid = getpid(); /* update child's pid */
2112 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02002113 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02002114 }
2115
Willy Tarreaudd815982007-10-16 12:25:14 +02002116 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02002117 /*
2118 * That's it : the central polling loop. Run until we stop.
2119 */
2120 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02002121
Willy Tarreaubaaee002006-06-26 02:48:02 +02002122 /* Do some cleanup */
2123 deinit();
2124
2125 exit(0);
2126}
2127
2128
2129/*
2130 * Local variables:
2131 * c-indent-level: 8
2132 * c-basic-offset: 8
2133 * End:
2134 */