blob: b0b25468f109e4aa8f6d5551c245f3da1b668241 [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreauad90f0d2015-06-17 15:53:25 +02003 * Copyright 2000-2015 Willy Tarreau <w@1wt.eu>.
Willy Tarreaubaaee002006-06-26 02:48:02 +02004 *
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License
7 * as published by the Free Software Foundation; either version
8 * 2 of the License, or (at your option) any later version.
9 *
10 * Please refer to RFC2068 or RFC2616 for informations about HTTP protocol, and
11 * RFC2965 for informations about cookies usage. More generally, the IETF HTTP
12 * Working Group's web site should be consulted for protocol related changes :
13 *
14 * http://ftp.ics.uci.edu/pub/ietf/http/
15 *
16 * Pending bugs (may be not fixed because never reproduced) :
17 * - solaris only : sometimes, an HTTP proxy with only a dispatch address causes
18 * the proxy to terminate (no core) if the client breaks the connection during
19 * the response. Seen on 1.1.8pre4, but never reproduced. May not be related to
20 * the snprintf() bug since requests were simple (GET / HTTP/1.0), but may be
21 * related to missing setsid() (fixed in 1.1.15)
22 * - a proxy with an invalid config will prevent the startup even if disabled.
23 *
24 * ChangeLog has moved to the CHANGELOG file.
25 *
Willy Tarreaubaaee002006-06-26 02:48:02 +020026 */
27
28#include <stdio.h>
29#include <stdlib.h>
30#include <unistd.h>
31#include <string.h>
32#include <ctype.h>
33#include <sys/time.h>
34#include <sys/types.h>
35#include <sys/socket.h>
36#include <netinet/tcp.h>
37#include <netinet/in.h>
38#include <arpa/inet.h>
39#include <netdb.h>
40#include <fcntl.h>
41#include <errno.h>
42#include <signal.h>
43#include <stdarg.h>
44#include <sys/resource.h>
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +010045#include <sys/wait.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020046#include <time.h>
47#include <syslog.h>
Michael Schererab012dd2013-01-12 18:35:19 +010048#include <grp.h>
Willy Tarreaufc6c0322012-11-16 16:12:27 +010049#ifdef USE_CPU_AFFINITY
50#define __USE_GNU
51#include <sched.h>
52#undef __USE_GNU
53#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +020054
55#ifdef DEBUG_FULL
56#include <assert.h>
57#endif
58
Willy Tarreau2dd0d472006-06-29 17:53:05 +020059#include <common/appsession.h>
60#include <common/base64.h>
61#include <common/cfgparse.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020062#include <common/chunk.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020063#include <common/compat.h>
64#include <common/config.h>
65#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010066#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020067#include <common/memory.h>
68#include <common/mini-clist.h>
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +010069#include <common/namespace.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020070#include <common/regex.h>
71#include <common/standard.h>
72#include <common/time.h>
73#include <common/uri_auth.h>
74#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020075
76#include <types/capture.h>
77#include <types/global.h>
Simon Hormanac821422011-07-15 13:14:09 +090078#include <types/proto_tcp.h>
79#include <types/acl.h>
Willy Tarreau3c63fd82011-09-07 18:00:47 +020080#include <types/peers.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020081
Willy Tarreau0fc45a72007-06-17 00:36:03 +020082#include <proto/acl.h>
Willy Tarreau3c595ac2015-04-19 09:59:31 +020083#include <proto/applet.h>
Willy Tarreau2e845be2012-10-19 19:49:09 +020084#include <proto/arg.h>
Willy Tarreau3c595ac2015-04-19 09:59:31 +020085#include <proto/auth.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020086#include <proto/backend.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020087#include <proto/channel.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020088#include <proto/checks.h>
Willy Tarreauf2943dc2012-10-26 20:10:28 +020089#include <proto/connection.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020090#include <proto/fd.h>
Willy Tarreau34eb6712011-10-24 18:15:04 +020091#include <proto/hdr_idx.h>
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +010092#include <proto/hlua.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020093#include <proto/listener.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020094#include <proto/log.h>
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +010095#include <proto/pattern.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020096#include <proto/protocol.h>
Willy Tarreau80587432006-12-24 17:47:20 +010097#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020098#include <proto/proxy.h>
99#include <proto/queue.h>
100#include <proto/server.h>
Willy Tarreaub1ec8c42015-04-03 13:53:24 +0200101#include <proto/session.h>
Willy Tarreau87b09662015-04-03 00:22:06 +0200102#include <proto/stream.h>
Willy Tarreau29857942009-05-10 09:01:21 +0200103#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200104#include <proto/task.h>
Baptiste Assmann325137d2015-04-13 23:40:55 +0200105#include <proto/dns.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +0200106
Willy Tarreaub38651a2007-03-24 17:24:39 +0100107#ifdef CONFIG_HAP_CTTPROXY
108#include <proto/cttproxy.h>
109#endif
110
Emeric Brunfc0421f2012-09-07 17:30:07 +0200111#ifdef USE_OPENSSL
112#include <proto/ssl_sock.h>
113#endif
114
David Carlier4a026412015-06-01 13:57:22 +0200115#ifdef USE_DEVICEATLAS
116#include <import/da.h>
117#endif
118
Thomas Holmes6abded42015-05-12 16:23:58 +0100119#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +0200120#include <import/51d.h>
Thomas Holmes6abded42015-05-12 16:23:58 +0100121#endif
122
Willy Tarreaubaaee002006-06-26 02:48:02 +0200123/*********************************************************************/
124
Cyril Bonté6162c432012-11-10 19:27:47 +0100125extern const struct comp_algo comp_algos[];
126
Willy Tarreaubaaee002006-06-26 02:48:02 +0200127/*********************************************************************/
128
Willy Tarreau477ecd82010-01-03 21:12:30 +0100129/* list of config files */
130static struct list cfg_cfgfiles = LIST_HEAD_INIT(cfg_cfgfiles);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200131int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +0100132int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200133
134/* global options */
135struct global global = {
Willy Tarreau247a13a2012-11-15 17:38:15 +0100136 .nbproc = 1,
William Lallemand5f232402012-04-05 18:02:55 +0200137 .req_count = 0,
William Lallemand0f99e342011-10-12 17:50:54 +0200138 .logsrvs = LIST_HEAD_INIT(global.logsrvs),
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100139#ifdef DEFAULT_MAXZLIBMEM
Willy Tarreau5a940372012-12-03 12:10:45 +0100140 .maxzlibmem = DEFAULT_MAXZLIBMEM * 1024U * 1024U,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100141#else
William Lallemand9d5f5482012-11-07 16:12:57 +0100142 .maxzlibmem = 0,
Willy Tarreau96aa6b32012-11-12 15:52:53 +0100143#endif
William Lallemandd85f9172012-11-09 17:05:39 +0100144 .comp_rate_lim = 0,
Emeric Brun850efd52014-01-29 12:24:34 +0100145 .ssl_server_verify = SSL_SERVER_VERIFY_REQUIRED,
Emeric Bruned760922010-10-22 17:59:25 +0200146 .unix_bind = {
147 .ux = {
148 .uid = -1,
149 .gid = -1,
150 .mode = 0,
151 }
152 },
Willy Tarreau27a674e2009-08-17 07:23:33 +0200153 .tune = {
154 .bufsize = BUFSIZE,
155 .maxrewrite = MAXREWRITE,
Willy Tarreau43961d52010-10-04 20:39:20 +0200156 .chksize = BUFSIZE,
Willy Tarreaua24adf02014-11-27 01:11:56 +0100157 .reserved_bufs = RESERVED_BUFS,
Willy Tarreauf3045d22015-04-29 16:24:50 +0200158 .pattern_cache = DEFAULT_PAT_LRU_SIZE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200159#ifdef USE_OPENSSL
Emeric Brun46635772012-11-14 11:32:56 +0100160 .sslcachesize = SSLCACHESIZE,
Remi Gacognef46cd6e2014-06-12 14:58:40 +0200161 .ssl_default_dh_param = SSL_DEFAULT_DH_PARAM,
Willy Tarreau03effc12014-02-12 14:55:41 +0100162#ifdef DEFAULT_SSL_MAX_RECORD
163 .ssl_max_record = DEFAULT_SSL_MAX_RECORD,
164#endif
Christopher Faulet31af49d2015-06-09 17:29:50 +0200165 .ssl_ctx_cache = DEFAULT_SSL_CTX_CACHE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200166#endif
William Lallemanda509e4c2012-11-07 16:54:34 +0100167#ifdef USE_ZLIB
168 .zlibmemlevel = 8,
169 .zlibwindowsize = MAX_WBITS,
170#endif
William Lallemandf3747832012-11-09 12:33:10 +0100171 .comp_maxlevel = 1,
Willy Tarreau7e312732014-02-12 16:35:14 +0100172#ifdef DEFAULT_IDLE_TIMER
173 .idle_timer = DEFAULT_IDLE_TIMER,
174#else
175 .idle_timer = 1000, /* 1 second */
176#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200177 },
Emeric Brun76d88952012-10-05 15:47:31 +0200178#ifdef USE_OPENSSL
179#ifdef DEFAULT_MAXSSLCONN
Willy Tarreau403edff2012-09-06 11:58:37 +0200180 .maxsslconn = DEFAULT_MAXSSLCONN,
181#endif
Emeric Brun76d88952012-10-05 15:47:31 +0200182#endif
David Carlier4a026412015-06-01 13:57:22 +0200183#ifdef USE_DEVICEATLAS
184 .deviceatlas = {
185 .loglevel = DA_SEV_INFO,
186 .useragentid = 0,
187 .jsonpath = 0,
188 .separator = '|',
189 },
190#endif
Dragan Dosenacd6b1f2015-06-11 21:36:33 +0200191#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +0200192 ._51degrees = {
193 .property_separator = ',',
194 .property_names = LIST_HEAD_INIT(global._51degrees.property_names),
195 .data_file_path = NULL,
196#ifdef FIFTYONEDEGREES_H_PATTERN_INCLUDED
197 .data_set = { },
Dragan Dosen105c8e62015-06-29 16:43:26 +0200198 .cache_size = 0,
Dragan Dosen93b38d92015-06-29 16:43:25 +0200199#endif
200 },
Dragan Dosenacd6b1f2015-06-11 21:36:33 +0200201#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200202 /* others NULL OK */
203};
204
205/*********************************************************************/
206
207int stopping; /* non zero means stopping in progress */
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200208int jobs = 0; /* number of active jobs (conns, listeners, active tasks, ...) */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200209
210/* Here we store informations about the pids of the processes we may pause
211 * or kill. We will send them a signal every 10 ms until we can bind to all
212 * our ports. With 200 retries, that's about 2 seconds.
213 */
214#define MAX_START_RETRIES 200
Willy Tarreaubaaee002006-06-26 02:48:02 +0200215static int *oldpids = NULL;
216static int oldpids_sig; /* use USR1 or TERM */
217
218/* this is used to drain data, and as a temporary buffer for sprintf()... */
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100219struct chunk trash = { };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200220
Willy Tarreau8096de92010-02-26 11:12:27 +0100221/* this buffer is always the same size as standard buffers and is used for
222 * swapping data inside a buffer.
223 */
224char *swap_buffer = NULL;
225
Willy Tarreaubb545b42010-08-25 12:58:59 +0200226int nb_oldpids = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200227const int zero = 0;
228const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200229const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200230
Willy Tarreau1d21e0a2010-03-12 21:58:54 +0100231char hostname[MAX_HOSTNAME_LEN];
Emeric Brun2b920a12010-09-23 18:30:22 +0200232char localpeer[MAX_HOSTNAME_LEN];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200233
Willy Tarreau89efaed2013-12-13 15:14:55 +0100234/* used from everywhere just to drain results we don't want to read and which
235 * recent versions of gcc increasingly and annoyingly complain about.
236 */
237int shut_your_big_mouth_gcc_int = 0;
238
Willy Tarreau08ceb102011-07-24 22:58:00 +0200239/* list of the temporarily limited listeners because of lack of resource */
240struct list global_listener_queue = LIST_HEAD_INIT(global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +0200241struct task *global_listener_queue_task;
242static struct task *manage_global_listener_queue(struct task *t);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200243
Willy Tarreauff055502014-04-28 22:27:06 +0200244/* bitfield of a few warnings to emit just once (WARN_*) */
245unsigned int warned = 0;
246
Willy Tarreaubaaee002006-06-26 02:48:02 +0200247/*********************************************************************/
248/* general purpose functions ***************************************/
249/*********************************************************************/
250
251void display_version()
252{
253 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreauad90f0d2015-06-17 15:53:25 +0200254 printf("Copyright 2000-2015 Willy Tarreau <willy@haproxy.org>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200255}
256
Willy Tarreau7b066db2007-12-02 11:28:59 +0100257void display_build_opts()
258{
259 printf("Build options :"
260#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100261 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100262#endif
263#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100264 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100265#endif
266#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100267 "\n CC = " BUILD_CC
268#endif
269#ifdef BUILD_CFLAGS
270 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100271#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100272#ifdef BUILD_OPTIONS
273 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100274#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200275 "\n\nDefault settings :"
276 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
277 "\n\n",
278 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200279
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100280 printf("Encrypted password support via crypt(3): "
281#ifdef CONFIG_HAP_CRYPT
282 "yes"
283#else
284 "no"
285#endif
286 "\n");
287
Cyril Bonté6162c432012-11-10 19:27:47 +0100288#ifdef USE_ZLIB
289 printf("Built with zlib version : " ZLIB_VERSION "\n");
290#else /* USE_ZLIB */
291 printf("Built without zlib support (USE_ZLIB not set)\n");
292#endif
293 printf("Compression algorithms supported :");
294 {
295 int i;
296
Willy Tarreau615105e2015-03-28 16:40:46 +0100297 for (i = 0; comp_algos[i].cfg_name; i++) {
298 printf("%s %s(\"%s\")", (i == 0 ? "" : ","), comp_algos[i].cfg_name, comp_algos[i].ua_name);
Cyril Bonté6162c432012-11-10 19:27:47 +0100299 }
300 if (i == 0) {
301 printf("none");
302 }
303 }
304 printf("\n");
305
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200306#ifdef USE_OPENSSL
Lukas Tribus581cc8d2014-08-18 00:56:30 +0200307 printf("Built with OpenSSL version : "
308#ifdef OPENSSL_IS_BORINGSSL
309 "BoringSSL\n");
310#else /* OPENSSL_IS_BORINGSSL */
311 OPENSSL_VERSION_TEXT "\n");
Willy Tarreau0cff0db2013-04-26 18:16:13 +0200312 printf("Running on OpenSSL version : %s%s\n",
313 SSLeay_version(SSLEAY_VERSION),
314 ((OPENSSL_VERSION_NUMBER ^ SSLeay()) >> 8) ? " (VERSIONS DIFFER!)" : "");
Lukas Tribus581cc8d2014-08-18 00:56:30 +0200315#endif
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200316 printf("OpenSSL library supports TLS extensions : "
317#if OPENSSL_VERSION_NUMBER < 0x00907000L
318 "no (library version too old)"
319#elif defined(OPENSSL_NO_TLSEXT)
320 "no (disabled via OPENSSL_NO_TLSEXT)"
321#else
322 "yes"
323#endif
324 "\n");
325 printf("OpenSSL library supports SNI : "
326#ifdef SSL_CTRL_SET_TLSEXT_HOSTNAME
327 "yes"
328#else
329#ifdef OPENSSL_NO_TLSEXT
330 "no (because of OPENSSL_NO_TLSEXT)"
331#else
332 "no (version might be too old, 0.9.8f min needed)"
333#endif
334#endif
335 "\n");
336 printf("OpenSSL library supports prefer-server-ciphers : "
337#ifdef SSL_OP_CIPHER_SERVER_PREFERENCE
338 "yes"
339#else
340 "no (0.9.7 or later needed)"
341#endif
342 "\n");
343#else /* USE_OPENSSL */
344 printf("Built without OpenSSL support (USE_OPENSSL not set)\n");
345#endif
Lukas Tribusea68d362013-04-04 12:24:16 +0200346
347#ifdef USE_PCRE
348 printf("Built with PCRE version : %s", pcre_version());
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200349 printf("\nPCRE library supports JIT : ");
350#ifdef USE_PCRE_JIT
351 {
352 int r;
353 pcre_config(PCRE_CONFIG_JIT, &r);
354 if (r)
355 printf("yes");
356 else
357 printf("no (libpcre build without JIT?)");
358 }
Lukas Tribusea68d362013-04-04 12:24:16 +0200359#else
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200360 printf("no (USE_PCRE_JIT not set)");
Lukas Tribusea68d362013-04-04 12:24:16 +0200361#endif
Lukas Tribusd9bdccd2013-04-15 00:41:40 +0200362 printf("\n");
Lukas Tribusea68d362013-04-04 12:24:16 +0200363#else
364 printf("Built without PCRE support (using libc's regex instead)\n");
365#endif
366
Cyril Bonté47eb2192015-03-02 00:08:39 +0100367#ifdef USE_LUA
368 printf("Built with Lua version : %s\n", LUA_RELEASE);
369#else
370 printf("Built without Lua support\n");
371#endif
372
Pieter Baauwd551fb52013-05-08 22:49:23 +0200373#if defined(CONFIG_HAP_TRANSPARENT) || defined(CONFIG_HAP_CTTPROXY)
374 printf("Built with transparent proxy support using:"
375#if defined(CONFIG_HAP_CTTPROXY)
376 " CTTPROXY"
377#endif
378#if defined(IP_TRANSPARENT)
379 " IP_TRANSPARENT"
380#endif
381#if defined(IPV6_TRANSPARENT)
382 " IPV6_TRANSPARENT"
383#endif
384#if defined(IP_FREEBIND)
385 " IP_FREEBIND"
386#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200387#if defined(IP_BINDANY)
388 " IP_BINDANY"
389#endif
390#if defined(IPV6_BINDANY)
391 " IPV6_BINDANY"
392#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200393#if defined(SO_BINDANY)
394 " SO_BINDANY"
395#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200396 "\n");
397#endif
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100398
399#if defined(CONFIG_HAP_NS)
400 printf("Built with network namespace support\n");
401#endif
Thomas Holmes6abded42015-05-12 16:23:58 +0100402
403#ifdef USE_51DEGREES
404 printf("Built with 51Degrees support\n");
405#endif
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100406 putchar('\n');
407
Willy Tarreaube5b6852009-10-03 18:57:08 +0200408 list_pollers(stdout);
409 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100410}
411
Willy Tarreaubaaee002006-06-26 02:48:02 +0200412/*
413 * This function prints the command line usage and exits
414 */
415void usage(char *name)
416{
417 display_version();
418 fprintf(stderr,
Willy Tarreau5d01a632009-06-22 16:02:30 +0200419 "Usage : %s [-f <cfgfile>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200420 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200421 " [ -p <pidfile> ] [ -m <max megs> ] [ -C <dir> ]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100422 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200423 " -d enters debug mode ; -db only disables background mode.\n"
Willy Tarreau6e064432012-05-08 15:40:42 +0200424 " -dM[<byte>] poisons memory with <byte> (defaults to 0x50)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200425 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200426 " -D goes daemon ; -C changes to <dir> before loading files.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200427 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200428 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200429 " -n sets the maximum total # of connections (%d)\n"
430 " -m limits the usable amount of memory (in MB)\n"
431 " -N sets the default, per-proxy maximum # of connections (%d)\n"
Emeric Brun2b920a12010-09-23 18:30:22 +0200432 " -L set local peer name (default to hostname)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200433 " -p writes pids of all children to this file\n"
434#if defined(ENABLE_EPOLL)
435 " -de disables epoll() usage even when available\n"
436#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200437#if defined(ENABLE_KQUEUE)
438 " -dk disables kqueue() usage even when available\n"
439#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200440#if defined(ENABLE_POLL)
441 " -dp disables poll() usage even when available\n"
442#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200443#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100444 " -dS disables splice usage (broken on old kernels)\n"
445#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200446#if defined(USE_GETADDRINFO)
447 " -dG disables getaddrinfo() usage\n"
448#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100449 " -dV disables SSL verify on servers side\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200450 " -sf/-st [pid ]* finishes/terminates old pids. Must be last arguments.\n"
451 "\n",
452 name, DEFAULT_MAXCONN, cfg_maxpconn);
453 exit(1);
454}
455
456
457
458/*********************************************************************/
459/* more specific functions ***************************************/
460/*********************************************************************/
461
462/*
Willy Tarreaud0807c32010-08-27 18:26:11 +0200463 * upon SIGUSR1, let's have a soft stop. Note that soft_stop() broadcasts
464 * a signal zero to all subscribers. This means that it's as easy as
465 * subscribing to signal 0 to get informed about an imminent shutdown.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200466 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200467void sig_soft_stop(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200468{
469 soft_stop();
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200470 signal_unregister_handler(sh);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200471 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200472}
473
474/*
475 * upon SIGTTOU, we pause everything
476 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200477void sig_pause(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200478{
479 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200480 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200481}
482
483/*
484 * upon SIGTTIN, let's have a soft stop.
485 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200486void sig_listen(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200487{
Willy Tarreaube58c382011-07-24 18:28:10 +0200488 resume_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200489}
490
491/*
492 * this function dumps every server's state when the process receives SIGHUP.
493 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200494void sig_dump_state(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200495{
496 struct proxy *p = proxy;
497
498 Warning("SIGHUP received, dumping servers states.\n");
499 while (p) {
500 struct server *s = p->srv;
501
502 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
503 while (s) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100504 chunk_printf(&trash,
505 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
506 p->id, s->id,
Willy Tarreau892337c2014-05-13 23:41:20 +0200507 (s->state != SRV_ST_STOPPED) ? "UP" : "DOWN",
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100508 s->cur_sess, s->nbpend, s->counters.cum_sess);
509 Warning("%s\n", trash.str);
510 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200511 s = s->next;
512 }
513
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200514 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
515 if (!p->srv) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100516 chunk_printf(&trash,
517 "SIGHUP: Proxy %s has no servers. Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
518 p->id,
519 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 +0200520 } else if (p->srv_act == 0) {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100521 chunk_printf(&trash,
522 "SIGHUP: Proxy %s %s ! Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
523 p->id,
524 (p->srv_bck) ? "is running on backup servers" : "has no server available",
525 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 +0200526 } else {
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100527 chunk_printf(&trash,
528 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
529 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
530 p->id, p->srv_act, p->srv_bck,
531 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 +0200532 }
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100533 Warning("%s\n", trash.str);
534 send_log(p, LOG_NOTICE, "%s\n", trash.str);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200535
536 p = p->next;
537 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200538}
539
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200540void dump(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200541{
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200542 /* dump memory usage then free everything possible */
543 dump_pools();
544 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200545}
546
Willy Tarreaubaaee002006-06-26 02:48:02 +0200547/*
548 * This function initializes all the necessary variables. It only returns
549 * if everything is OK. If something fails, it exits.
550 */
551void init(int argc, char **argv)
552{
Willy Tarreaubaaee002006-06-26 02:48:02 +0200553 int arg_mode = 0; /* MODE_DEBUG, ... */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200554 char *tmp;
555 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200556 int err_code = 0;
Willy Tarreau477ecd82010-01-03 21:12:30 +0100557 struct wordlist *wl;
Kevinm48936af2010-12-22 16:08:21 +0000558 char *progname;
Willy Tarreau576132e2011-09-10 19:26:56 +0200559 char *change_dir = NULL;
Yuxans Yao4e25b012012-10-19 10:36:09 +0800560 struct tm curtime;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200561
Willy Tarreau19d14ef2012-10-29 16:51:55 +0100562 chunk_init(&trash, malloc(global.tune.bufsize), global.tune.bufsize);
Willy Tarreau2819e992013-12-13 14:41:10 +0100563 alloc_trash_buffers(global.tune.bufsize);
David du Colombier7af46052012-05-16 14:16:48 +0200564
Emeric Brun2b920a12010-09-23 18:30:22 +0200565 /* NB: POSIX does not make it mandatory for gethostname() to NULL-terminate
566 * the string in case of truncation, and at least FreeBSD appears not to do
567 * it.
568 */
569 memset(hostname, 0, sizeof(hostname));
570 gethostname(hostname, sizeof(hostname) - 1);
571 memset(localpeer, 0, sizeof(localpeer));
572 memcpy(localpeer, hostname, (sizeof(hostname) > sizeof(localpeer) ? sizeof(localpeer) : sizeof(hostname)) - 1);
573
Willy Tarreaubaaee002006-06-26 02:48:02 +0200574 /*
575 * Initialize the previously static variables.
576 */
577
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100578 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200579
580
581#ifdef HAPROXY_MEMMAX
582 global.rlimit_memmax = HAPROXY_MEMMAX;
583#endif
584
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200585 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200586 start_date = now;
587
Willy Tarreau84310e22014-02-14 11:59:04 +0100588 srandom(now_ms - getpid());
589
Yuxans Yao4e25b012012-10-19 10:36:09 +0800590 /* Get the numeric timezone. */
591 get_localtime(start_date.tv_sec, &curtime);
592 strftime(localtimezone, 6, "%z", &curtime);
593
Willy Tarreau29857942009-05-10 09:01:21 +0200594 signal_init();
Willy Tarreau8ed669b2013-01-11 15:49:37 +0100595 if (init_acl() != 0)
596 exit(1);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200597 init_task();
Willy Tarreau87b09662015-04-03 00:22:06 +0200598 init_stream();
Willy Tarreaub1ec8c42015-04-03 13:53:24 +0200599 init_session();
Willy Tarreauf2943dc2012-10-26 20:10:28 +0200600 init_connection();
Willy Tarreau8280d642009-09-23 23:37:52 +0200601 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200602 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100603 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200604
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +0100605 /* Initialise lua. */
606 hlua_init();
Thierry FOURNIER6f1fd482015-01-23 14:06:13 +0100607
Willy Tarreau43b78992009-01-25 15:42:27 +0100608 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200609#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100610 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200611#endif
612#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100613 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200614#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200615#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100616 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200617#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200618#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100619 global.tune.options |= GTUNE_USE_SPLICE;
620#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200621#if defined(USE_GETADDRINFO)
622 global.tune.options |= GTUNE_USE_GAI;
623#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200624
625 pid = getpid();
626 progname = *argv;
627 while ((tmp = strchr(progname, '/')) != NULL)
628 progname = tmp + 1;
629
Kevinm48936af2010-12-22 16:08:21 +0000630 /* the process name is used for the logs only */
631 global.log_tag = strdup(progname);
632
Willy Tarreaubaaee002006-06-26 02:48:02 +0200633 argc--; argv++;
634 while (argc > 0) {
635 char *flag;
636
637 if (**argv == '-') {
638 flag = *argv+1;
639
640 /* 1 arg */
641 if (*flag == 'v') {
642 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100643 if (flag[1] == 'v') /* -vv */
644 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200645 exit(0);
646 }
647#if defined(ENABLE_EPOLL)
648 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100649 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200650#endif
651#if defined(ENABLE_POLL)
652 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100653 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200654#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200655#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200656 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100657 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200658#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200659#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100660 else if (*flag == 'd' && flag[1] == 'S')
661 global.tune.options &= ~GTUNE_USE_SPLICE;
662#endif
Nenad Merdanovic88afe032014-04-14 15:56:58 +0200663#if defined(USE_GETADDRINFO)
664 else if (*flag == 'd' && flag[1] == 'G')
665 global.tune.options &= ~GTUNE_USE_GAI;
666#endif
Emeric Brun850efd52014-01-29 12:24:34 +0100667 else if (*flag == 'd' && flag[1] == 'V')
668 global.ssl_server_verify = SSL_SERVER_VERIFY_NONE;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200669 else if (*flag == 'V')
670 arg_mode |= MODE_VERBOSE;
671 else if (*flag == 'd' && flag[1] == 'b')
672 arg_mode |= MODE_FOREGROUND;
Willy Tarreau6e064432012-05-08 15:40:42 +0200673 else if (*flag == 'd' && flag[1] == 'M')
674 mem_poison_byte = flag[2] ? strtol(flag + 2, NULL, 0) : 'P';
Willy Tarreaubaaee002006-06-26 02:48:02 +0200675 else if (*flag == 'd')
676 arg_mode |= MODE_DEBUG;
677 else if (*flag == 'c')
678 arg_mode |= MODE_CHECK;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100679 else if (*flag == 'D') {
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200680 arg_mode |= MODE_DAEMON;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100681 if (flag[1] == 's') /* -Ds */
682 arg_mode |= MODE_SYSTEMD;
683 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200684 else if (*flag == 'q')
685 arg_mode |= MODE_QUIET;
686 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
687 /* list of pids to finish ('f') or terminate ('t') */
688
689 if (flag[1] == 'f')
690 oldpids_sig = SIGUSR1; /* finish then exit */
691 else
692 oldpids_sig = SIGTERM; /* terminate immediately */
693 argv++; argc--;
694
695 if (argc > 0) {
696 oldpids = calloc(argc, sizeof(int));
697 while (argc > 0) {
698 oldpids[nb_oldpids] = atol(*argv);
699 if (oldpids[nb_oldpids] <= 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200700 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200701 argc--; argv++;
702 nb_oldpids++;
703 }
704 }
705 }
706 else { /* >=2 args */
707 argv++; argc--;
708 if (argc == 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200709 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200710
711 switch (*flag) {
Willy Tarreau576132e2011-09-10 19:26:56 +0200712 case 'C' : change_dir = *argv; break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200713 case 'n' : cfg_maxconn = atol(*argv); break;
714 case 'm' : global.rlimit_memmax = atol(*argv); break;
715 case 'N' : cfg_maxpconn = atol(*argv); break;
Emeric Brun2b920a12010-09-23 18:30:22 +0200716 case 'L' : strncpy(localpeer, *argv, sizeof(localpeer) - 1); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200717 case 'f' :
Willy Tarreau477ecd82010-01-03 21:12:30 +0100718 wl = (struct wordlist *)calloc(1, sizeof(*wl));
719 if (!wl) {
720 Alert("Cannot load configuration file %s : out of memory.\n", *argv);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200721 exit(1);
722 }
Willy Tarreau477ecd82010-01-03 21:12:30 +0100723 wl->s = *argv;
724 LIST_ADDQ(&cfg_cfgfiles, &wl->list);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200725 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200726 case 'p' : cfg_pidfile = *argv; break;
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200727 default: usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200728 }
729 }
730 }
731 else
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200732 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200733 argv++; argc--;
734 }
735
736 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +0100737 (arg_mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_FOREGROUND | MODE_VERBOSE
Willy Tarreaubaaee002006-06-26 02:48:02 +0200738 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
739
Willy Tarreau477ecd82010-01-03 21:12:30 +0100740 if (LIST_ISEMPTY(&cfg_cfgfiles))
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200741 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200742
Willy Tarreau576132e2011-09-10 19:26:56 +0200743 if (change_dir && chdir(change_dir) < 0) {
744 Alert("Could not change to directory %s : %s\n", change_dir, strerror(errno));
745 exit(1);
746 }
747
Willy Tarreaubaaee002006-06-26 02:48:02 +0200748 have_appsession = 0;
749 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200750
751 init_default_instance();
752
Willy Tarreau477ecd82010-01-03 21:12:30 +0100753 list_for_each_entry(wl, &cfg_cfgfiles, list) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100754 int ret;
755
Willy Tarreau477ecd82010-01-03 21:12:30 +0100756 ret = readcfgfile(wl->s);
Willy Tarreauc4382422009-12-06 13:10:44 +0100757 if (ret == -1) {
758 Alert("Could not open configuration file %s : %s\n",
Willy Tarreau477ecd82010-01-03 21:12:30 +0100759 wl->s, strerror(errno));
Willy Tarreauc4382422009-12-06 13:10:44 +0100760 exit(1);
761 }
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100762 if (ret & (ERR_ABORT|ERR_FATAL))
Willy Tarreau477ecd82010-01-03 21:12:30 +0100763 Alert("Error(s) found in configuration file : %s\n", wl->s);
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100764 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200765 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200766 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200767 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200768
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +0100769 pattern_finalize_config();
Nenad Merdanovic200b0fa2015-05-09 08:46:01 +0200770#if (defined SSL_CTRL_SET_TLSEXT_TICKET_KEY_CB && TLS_TICKETS_NO > 0)
771 tlskeys_finalize_config();
772#endif
Thierry FOURNIERaf5a29d2014-03-11 14:29:22 +0100773
Willy Tarreaubb925012009-07-23 13:36:36 +0200774 err_code |= check_config_validity();
775 if (err_code & (ERR_ABORT|ERR_FATAL)) {
776 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200777 exit(1);
778 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200779
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100780#ifdef CONFIG_HAP_NS
781 err_code |= netns_init();
782 if (err_code & (ERR_ABORT|ERR_FATAL)) {
783 Alert("Failed to initialize namespace support.\n");
784 exit(1);
785 }
786#endif
787
Willy Tarreaubaaee002006-06-26 02:48:02 +0200788 if (global.mode & MODE_CHECK) {
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100789 struct peers *pr;
790 struct proxy *px;
791
792 for (pr = peers; pr; pr = pr->next)
793 if (pr->peers_fe)
794 break;
795
796 for (px = proxy; px; px = px->next)
Willy Tarreau4348fad2012-09-20 16:48:07 +0200797 if (px->state == PR_STNEW && !LIST_ISEMPTY(&px->conf.listeners))
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100798 break;
799
800 if (pr || px) {
801 /* At least one peer or one listener has been found */
802 qfprintf(stdout, "Configuration file is valid\n");
803 exit(0);
804 }
805 qfprintf(stdout, "Configuration file has no error but will not start (no listener) => exit(2).\n");
806 exit(2);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200807 }
808
Willy Tarreaue9b26022011-08-01 20:57:55 +0200809 global_listener_queue_task = task_new();
810 if (!global_listener_queue_task) {
811 Alert("Out of memory when initializing global task\n");
812 exit(1);
813 }
814 /* very simple initialization, users will queue the task if needed */
815 global_listener_queue_task->context = NULL; /* not even a context! */
816 global_listener_queue_task->process = manage_global_listener_queue;
817 global_listener_queue_task->expire = TICK_ETERNITY;
818
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200819 /* now we know the buffer size, we can initialize the channels and buffers */
Willy Tarreau9b28e032012-10-12 23:49:43 +0200820 init_buffer();
David Carlier4a026412015-06-01 13:57:22 +0200821#if defined(USE_DEVICEATLAS)
822 init_deviceatlas();
823#endif
Dragan Dosen93b38d92015-06-29 16:43:25 +0200824#ifdef USE_51DEGREES
825 init_51degrees();
826#endif
Willy Tarreau8280d642009-09-23 23:37:52 +0200827
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200828 if (have_appsession)
829 appsession_init();
830
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200831 if (start_checks() < 0)
832 exit(1);
833
Willy Tarreaubaaee002006-06-26 02:48:02 +0200834 if (cfg_maxconn > 0)
835 global.maxconn = cfg_maxconn;
836
837 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200838 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200839 global.pidfile = strdup(cfg_pidfile);
840 }
841
Willy Tarreaud0256482015-01-15 21:45:22 +0100842 /* Now we want to compute the maxconn and possibly maxsslconn values.
843 * It's a bit tricky. If memmax is not set, maxconn defaults to
844 * DEFAULT_MAXCONN and maxsslconn defaults to DEFAULT_MAXSSLCONN.
845 *
846 * If memmax is set, then it depends on which values are set. If
847 * maxsslconn is set, we use memmax to determine how many cleartext
848 * connections may be added, and set maxconn to the sum of the two.
849 * If maxconn is set and not maxsslconn, maxsslconn is computed from
850 * the remaining amount of memory between memmax and the cleartext
851 * connections. If neither are set, then it is considered that all
852 * connections are SSL-capable, and maxconn is computed based on this,
853 * then maxsslconn accordingly. We need to know if SSL is used on the
854 * frontends, backends, or both, because when it's used on both sides,
855 * we need twice the value for maxsslconn, but we only count the
856 * handshake once since it is not performed on the two sides at the
857 * same time (frontend-side is terminated before backend-side begins).
858 * The SSL stack is supposed to have filled ssl_session_cost and
Willy Tarreau474b96a2015-01-28 19:03:21 +0100859 * ssl_handshake_cost during its initialization. In any case, if
860 * SYSTEM_MAXCONN is set, we still enforce it as an upper limit for
861 * maxconn in order to protect the system.
Willy Tarreaud0256482015-01-15 21:45:22 +0100862 */
863 if (!global.rlimit_memmax) {
864 if (global.maxconn == 0) {
865 global.maxconn = DEFAULT_MAXCONN;
866 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
867 fprintf(stderr, "Note: setting global.maxconn to %d.\n", global.maxconn);
868 }
869 }
870#ifdef USE_OPENSSL
871 else if (!global.maxconn && !global.maxsslconn &&
872 (global.ssl_used_frontend || global.ssl_used_backend)) {
873 /* memmax is set, compute everything automatically. Here we want
874 * to ensure that all SSL connections will be served. We take
875 * care of the number of sides where SSL is used, and consider
876 * the worst case : SSL used on both sides and doing a handshake
877 * simultaneously. Note that we can't have more than maxconn
878 * handshakes at a time by definition, so for the worst case of
879 * two SSL conns per connection, we count a single handshake.
880 */
881 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
882 int64_t mem = global.rlimit_memmax * 1048576ULL;
883
884 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
885 mem -= global.maxzlibmem;
886 mem = mem * MEM_USABLE_RATIO;
887
888 global.maxconn = mem /
Willy Tarreau87b09662015-04-03 00:22:06 +0200889 ((STREAM_MAX_COST + 2 * global.tune.bufsize) + // stream + 2 buffers per stream
Willy Tarreaud0256482015-01-15 21:45:22 +0100890 sides * global.ssl_session_max_cost + // SSL buffers, one per side
891 global.ssl_handshake_max_cost); // 1 handshake per connection max
892
893 global.maxconn = round_2dig(global.maxconn);
Willy Tarreau474b96a2015-01-28 19:03:21 +0100894#ifdef SYSTEM_MAXCONN
895 if (global.maxconn > DEFAULT_MAXCONN)
896 global.maxconn = DEFAULT_MAXCONN;
897#endif /* SYSTEM_MAXCONN */
Willy Tarreaud0256482015-01-15 21:45:22 +0100898 global.maxsslconn = sides * global.maxconn;
899 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
900 fprintf(stderr, "Note: setting global.maxconn to %d and global.maxsslconn to %d.\n",
901 global.maxconn, global.maxsslconn);
902 }
903 else if (!global.maxsslconn &&
904 (global.ssl_used_frontend || global.ssl_used_backend)) {
905 /* memmax and maxconn are known, compute maxsslconn automatically.
906 * maxsslconn being forced, we don't know how many of it will be
907 * on each side if both sides are being used. The worst case is
908 * when all connections use only one SSL instance because
909 * handshakes may be on two sides at the same time.
910 */
911 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
912 int64_t mem = global.rlimit_memmax * 1048576ULL;
913 int64_t sslmem;
914
915 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
916 mem -= global.maxzlibmem;
917 mem = mem * MEM_USABLE_RATIO;
918
Willy Tarreau87b09662015-04-03 00:22:06 +0200919 sslmem = mem - global.maxconn * (int64_t)(STREAM_MAX_COST + 2 * global.tune.bufsize);
Willy Tarreaud0256482015-01-15 21:45:22 +0100920 global.maxsslconn = sslmem / (global.ssl_session_max_cost + global.ssl_handshake_max_cost);
921 global.maxsslconn = round_2dig(global.maxsslconn);
922
923 if (sslmem <= 0 || global.maxsslconn < sides) {
924 Alert("Cannot compute the automatic maxsslconn because global.maxconn is already too "
925 "high for the global.memmax value (%d MB). The absolute maximum possible value "
926 "without SSL is %d, but %d was found and SSL is in use.\n",
927 global.rlimit_memmax,
Willy Tarreau87b09662015-04-03 00:22:06 +0200928 (int)(mem / (STREAM_MAX_COST + 2 * global.tune.bufsize)),
Willy Tarreaud0256482015-01-15 21:45:22 +0100929 global.maxconn);
930 exit(1);
931 }
932
933 if (global.maxsslconn > sides * global.maxconn)
934 global.maxsslconn = sides * global.maxconn;
935
936 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
937 fprintf(stderr, "Note: setting global.maxsslconn to %d\n", global.maxsslconn);
938 }
939#endif
940 else if (!global.maxconn) {
941 /* memmax and maxsslconn are known/unused, compute maxconn automatically */
942 int sides = !!global.ssl_used_frontend + !!global.ssl_used_backend;
943 int64_t mem = global.rlimit_memmax * 1048576ULL;
944 int64_t clearmem;
945
946 if (global.ssl_used_frontend || global.ssl_used_backend)
947 mem -= global.tune.sslcachesize * 200; // about 200 bytes per SSL cache entry
948
949 mem -= global.maxzlibmem;
950 mem = mem * MEM_USABLE_RATIO;
951
952 clearmem = mem;
953 if (sides)
954 clearmem -= (global.ssl_session_max_cost + global.ssl_handshake_max_cost) * (int64_t)global.maxsslconn;
955
Willy Tarreau87b09662015-04-03 00:22:06 +0200956 global.maxconn = clearmem / (STREAM_MAX_COST + 2 * global.tune.bufsize);
Willy Tarreaud0256482015-01-15 21:45:22 +0100957 global.maxconn = round_2dig(global.maxconn);
Willy Tarreau474b96a2015-01-28 19:03:21 +0100958#ifdef SYSTEM_MAXCONN
959 if (global.maxconn > DEFAULT_MAXCONN)
960 global.maxconn = DEFAULT_MAXCONN;
961#endif /* SYSTEM_MAXCONN */
Willy Tarreaud0256482015-01-15 21:45:22 +0100962
963 if (clearmem <= 0 || !global.maxconn) {
964 Alert("Cannot compute the automatic maxconn because global.maxsslconn is already too "
965 "high for the global.memmax value (%d MB). The absolute maximum possible value "
966 "is %d, but %d was found.\n",
967 global.rlimit_memmax,
968 (int)(mem / (global.ssl_session_max_cost + global.ssl_handshake_max_cost)),
969 global.maxsslconn);
970 exit(1);
971 }
972
973 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
974 if (sides && global.maxsslconn > sides * global.maxconn) {
975 fprintf(stderr, "Note: global.maxsslconn is forced to %d which causes global.maxconn "
976 "to be limited to %d. Better reduce global.maxsslconn to get more "
977 "room for extra connections.\n", global.maxsslconn, global.maxconn);
978 }
979 fprintf(stderr, "Note: setting global.maxconn to %d\n", global.maxconn);
980 }
981 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200982
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100983 if (!global.maxpipes) {
984 /* maxpipes not specified. Count how many frontends and backends
985 * may be using splicing, and bound that to maxconn.
986 */
987 struct proxy *cur;
988 int nbfe = 0, nbbe = 0;
989
990 for (cur = proxy; cur; cur = cur->next) {
991 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
992 if (cur->cap & PR_CAP_FE)
993 nbfe += cur->maxconn;
994 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +0100995 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100996 }
997 }
998 global.maxpipes = MAX(nbfe, nbbe);
999 if (global.maxpipes > global.maxconn)
1000 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +01001001 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +01001002 }
1003
1004
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001005 global.hardmaxconn = global.maxconn; /* keep this max value */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001006 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +01001007 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001008
Willy Tarreau3c63fd82011-09-07 18:00:47 +02001009 if (global.stats_fe)
1010 global.maxsock += global.stats_fe->maxconn;
1011
1012 if (peers) {
1013 /* peers also need to bypass global maxconn */
1014 struct peers *p = peers;
1015
1016 for (p = peers; p; p = p->next)
1017 if (p->peers_fe)
1018 global.maxsock += p->peers_fe->maxconn;
1019 }
1020
Willy Tarreau1db37712007-06-03 17:16:49 +02001021 if (global.tune.maxpollevents <= 0)
1022 global.tune.maxpollevents = MAX_POLL_EVENTS;
1023
Willy Tarreau6f4a82c2009-03-21 20:43:57 +01001024 if (global.tune.recv_enough == 0)
1025 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
1026
Willy Tarreau27a674e2009-08-17 07:23:33 +02001027 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
1028 global.tune.maxrewrite = global.tune.bufsize / 2;
1029
Willy Tarreaubaaee002006-06-26 02:48:02 +02001030 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
1031 /* command line debug mode inhibits configuration mode */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001032 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001033 global.mode |= (arg_mode & (MODE_DEBUG | MODE_FOREGROUND));
1034 }
1035
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001036 if (arg_mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001037 /* command line daemon mode inhibits foreground and debug modes mode */
1038 global.mode &= ~(MODE_DEBUG | MODE_FOREGROUND);
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001039 global.mode |= (arg_mode & (MODE_DAEMON | MODE_SYSTEMD));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001040 }
Willy Tarreau772f0dd2012-10-26 16:04:28 +02001041
1042 global.mode |= (arg_mode & (MODE_QUIET | MODE_VERBOSE));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001043
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001044 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET))) {
1045 Warning("<debug> mode incompatible with <quiet>, <daemon> and <systemd>. Keeping <debug> only.\n");
1046 global.mode &= ~(MODE_DAEMON | MODE_SYSTEMD | MODE_QUIET);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001047 }
1048
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001049 if ((global.nbproc > 1) && !(global.mode & (MODE_DAEMON | MODE_SYSTEMD))) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001050 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
1051 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
1052 global.nbproc = 1;
1053 }
1054
1055 if (global.nbproc < 1)
1056 global.nbproc = 1;
1057
Willy Tarreau8096de92010-02-26 11:12:27 +01001058 swap_buffer = (char *)calloc(1, global.tune.bufsize);
Willy Tarreau7e2c6472012-10-29 20:44:36 +01001059 get_http_auth_buff = (char *)calloc(1, global.tune.bufsize);
Willy Tarreau07115412012-10-29 21:56:59 +01001060 static_table_key = calloc(1, sizeof(*static_table_key) + global.tune.bufsize);
Willy Tarreau8096de92010-02-26 11:12:27 +01001061
Willy Tarreau8d5d77e2009-10-18 07:25:52 +02001062 fdinfo = (struct fdinfo *)calloc(1,
1063 sizeof(struct fdinfo) * (global.maxsock));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001064 fdtab = (struct fdtab *)calloc(1,
1065 sizeof(struct fdtab) * (global.maxsock));
Willy Tarreauef1d1f82007-04-16 00:25:25 +02001066 /*
1067 * Note: we could register external pollers here.
1068 * Built-in pollers have been registered before main().
1069 */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001070
Willy Tarreau43b78992009-01-25 15:42:27 +01001071 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +02001072 disable_poller("kqueue");
1073
Willy Tarreau43b78992009-01-25 15:42:27 +01001074 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001075 disable_poller("epoll");
1076
Willy Tarreau43b78992009-01-25 15:42:27 +01001077 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001078 disable_poller("poll");
1079
Willy Tarreau43b78992009-01-25 15:42:27 +01001080 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +02001081 disable_poller("select");
1082
1083 /* Note: we could disable any poller by name here */
1084
Willy Tarreau2ff76222007-04-09 19:29:56 +02001085 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
1086 list_pollers(stderr);
1087
Willy Tarreau4f60f162007-04-08 16:39:58 +02001088 if (!init_pollers()) {
Willy Tarreau3fa87b12013-03-31 14:41:15 +02001089 Alert("No polling mechanism available.\n"
1090 " It is likely that haproxy was built with TARGET=generic and that FD_SETSIZE\n"
1091 " is too low on this platform to support maxconn and the number of listeners\n"
1092 " and servers. You should rebuild haproxy specifying your system using TARGET=\n"
1093 " in order to support other polling systems (poll, epoll, kqueue) or reduce the\n"
Prach Pongpanichb837e682013-05-14 20:56:28 +02001094 " global maxconn setting to accommodate the system's limitation. For reference,\n"
Willy Tarreau3fa87b12013-03-31 14:41:15 +02001095 " FD_SETSIZE=%d on this system, global.maxconn=%d resulting in a maximum of\n"
1096 " %d file descriptors. You should thus reduce global.maxconn by %d. Also,\n"
1097 " check build settings using 'haproxy -vv'.\n\n",
1098 FD_SETSIZE, global.maxconn, global.maxsock, (global.maxsock + 1 - FD_SETSIZE) / 2);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001099 exit(1);
1100 }
Willy Tarreau2ff76222007-04-09 19:29:56 +02001101 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
1102 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001103 }
1104
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001105 if (!global.node)
1106 global.node = strdup(hostname);
1107
Thierry FOURNIERa4a0f3d2015-01-23 12:08:30 +01001108 if (!hlua_post_init())
1109 exit(1);
Thomas Holmes6abded42015-05-12 16:23:58 +01001110
Baptiste Assmann325137d2015-04-13 23:40:55 +02001111 /* initialize structures for name resolution */
1112 if (!dns_init_resolvers())
1113 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001114}
1115
Simon Horman6fb82592011-07-15 13:14:11 +09001116static void deinit_acl_cond(struct acl_cond *cond)
Simon Hormanac821422011-07-15 13:14:09 +09001117{
Simon Hormanac821422011-07-15 13:14:09 +09001118 struct acl_term_suite *suite, *suiteb;
1119 struct acl_term *term, *termb;
1120
Simon Horman6fb82592011-07-15 13:14:11 +09001121 if (!cond)
1122 return;
1123
1124 list_for_each_entry_safe(suite, suiteb, &cond->suites, list) {
1125 list_for_each_entry_safe(term, termb, &suite->terms, list) {
1126 LIST_DEL(&term->list);
1127 free(term);
Simon Hormanac821422011-07-15 13:14:09 +09001128 }
Simon Horman6fb82592011-07-15 13:14:11 +09001129 LIST_DEL(&suite->list);
1130 free(suite);
1131 }
1132
1133 free(cond);
1134}
1135
1136static void deinit_tcp_rules(struct list *rules)
1137{
1138 struct tcp_rule *trule, *truleb;
1139
1140 list_for_each_entry_safe(trule, truleb, rules, list) {
Simon Hormanac821422011-07-15 13:14:09 +09001141 LIST_DEL(&trule->list);
Simon Horman6fb82592011-07-15 13:14:11 +09001142 deinit_acl_cond(trule->cond);
Simon Hormanac821422011-07-15 13:14:09 +09001143 free(trule);
1144 }
1145}
1146
Willy Tarreau12785782012-04-27 21:37:17 +02001147static void deinit_sample_arg(struct arg *p)
Simon Horman6fb82592011-07-15 13:14:11 +09001148{
Willy Tarreauf9954102012-04-20 14:03:29 +02001149 struct arg *p_back = p;
1150
Simon Horman6fb82592011-07-15 13:14:11 +09001151 if (!p)
1152 return;
1153
Willy Tarreauf9954102012-04-20 14:03:29 +02001154 while (p->type != ARGT_STOP) {
Willy Tarreau496aa012012-06-01 10:38:29 +02001155 if (p->type == ARGT_STR || p->unresolved) {
Willy Tarreauf9954102012-04-20 14:03:29 +02001156 free(p->data.str.str);
1157 p->data.str.str = NULL;
Willy Tarreau496aa012012-06-01 10:38:29 +02001158 p->unresolved = 0;
Willy Tarreauecfb8e82012-04-20 12:29:52 +02001159 }
Willy Tarreau46947782015-01-19 19:00:58 +01001160 else if (p->type == ARGT_REG) {
1161 if (p->data.reg) {
1162 regex_free(p->data.reg);
1163 free(p->data.reg);
1164 p->data.reg = NULL;
1165 }
1166 }
Willy Tarreauf9954102012-04-20 14:03:29 +02001167 p++;
Willy Tarreauecfb8e82012-04-20 12:29:52 +02001168 }
Simon Horman6fb82592011-07-15 13:14:11 +09001169
Willy Tarreau2e845be2012-10-19 19:49:09 +02001170 if (p_back != empty_arg_list)
1171 free(p_back);
Simon Horman6fb82592011-07-15 13:14:11 +09001172}
1173
1174static void deinit_stick_rules(struct list *rules)
1175{
1176 struct sticking_rule *rule, *ruleb;
1177
1178 list_for_each_entry_safe(rule, ruleb, rules, list) {
1179 LIST_DEL(&rule->list);
1180 deinit_acl_cond(rule->cond);
1181 if (rule->expr) {
Willy Tarreau12785782012-04-27 21:37:17 +02001182 struct sample_conv_expr *conv_expr, *conv_exprb;
Simon Horman6fb82592011-07-15 13:14:11 +09001183 list_for_each_entry_safe(conv_expr, conv_exprb, &rule->expr->conv_exprs, list)
Willy Tarreau12785782012-04-27 21:37:17 +02001184 deinit_sample_arg(conv_expr->arg_p);
1185 deinit_sample_arg(rule->expr->arg_p);
Simon Horman6fb82592011-07-15 13:14:11 +09001186 free(rule->expr);
1187 }
1188 free(rule);
1189 }
1190}
1191
Willy Tarreaubaaee002006-06-26 02:48:02 +02001192void deinit(void)
1193{
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001194 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001195 struct cap_hdr *h,*h_next;
1196 struct server *s,*s_next;
1197 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001198 struct acl_cond *cond, *condb;
1199 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001200 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001201 struct switching_rule *rule, *ruleb;
Willy Tarreau4a5cade2012-04-05 21:09:48 +02001202 struct server_rule *srule, *sruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001203 struct redirect_rule *rdr, *rdrb;
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001204 struct wordlist *wl, *wlb;
Willy Tarreauf4f04122010-01-28 18:10:50 +01001205 struct cond_wordlist *cwl, *cwlb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001206 struct uri_auth *uap, *ua = NULL;
William Lallemand0f99e342011-10-12 17:50:54 +02001207 struct logsrv *log, *logb;
William Lallemand723b73a2012-02-08 16:37:49 +01001208 struct logformat_node *lf, *lfb;
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001209 struct bind_conf *bind_conf, *bind_back;
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001210 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001211
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001212 deinit_signals();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001213 while (p) {
Willy Tarreau8113a5d2012-10-04 08:01:43 +02001214 free(p->conf.file);
Willy Tarreaua534fea2008-08-03 12:19:50 +02001215 free(p->id);
1216 free(p->check_req);
1217 free(p->cookie_name);
1218 free(p->cookie_domain);
1219 free(p->url_param_name);
1220 free(p->capture_name);
1221 free(p->monitor_uri);
Simon Hormana31c7f72011-07-15 13:14:08 +09001222 free(p->rdp_cookie_name);
Willy Tarreau62a61232013-04-12 18:13:46 +02001223 if (p->conf.logformat_string != default_http_log_format &&
1224 p->conf.logformat_string != default_tcp_log_format &&
1225 p->conf.logformat_string != clf_http_log_format)
1226 free(p->conf.logformat_string);
Willy Tarreau196729e2012-05-31 19:30:26 +02001227
Willy Tarreau62a61232013-04-12 18:13:46 +02001228 free(p->conf.lfs_file);
1229 free(p->conf.uniqueid_format_string);
1230 free(p->conf.uif_file);
Godbachaf1a75d2013-10-02 17:10:11 +08001231 free(p->lbprm.map.srv);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001232
Willy Tarreaua534fea2008-08-03 12:19:50 +02001233 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +02001234 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001235
Willy Tarreauf4f04122010-01-28 18:10:50 +01001236 list_for_each_entry_safe(cwl, cwlb, &p->req_add, list) {
1237 LIST_DEL(&cwl->list);
1238 free(cwl->s);
1239 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001240 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001241
Willy Tarreauf4f04122010-01-28 18:10:50 +01001242 list_for_each_entry_safe(cwl, cwlb, &p->rsp_add, list) {
1243 LIST_DEL(&cwl->list);
1244 free(cwl->s);
1245 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01001246 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001247
Willy Tarreaub80c2302007-11-30 20:51:32 +01001248 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
1249 LIST_DEL(&cond->list);
1250 prune_acl_cond(cond);
1251 free(cond);
1252 }
1253
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001254 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001255 if (exp->preg) {
Thierry FOURNIER09af0d62014-06-18 11:35:54 +02001256 regex_free(exp->preg);
1257 free(exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001258 }
1259
Willy Tarreau98d04852015-05-26 12:18:29 +02001260 free((char *)exp->replace);
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001261 expb = exp;
1262 exp = exp->next;
1263 free(expb);
1264 }
1265
1266 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001267 if (exp->preg) {
Thierry FOURNIER09af0d62014-06-18 11:35:54 +02001268 regex_free(exp->preg);
1269 free(exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001270 }
1271
Willy Tarreau98d04852015-05-26 12:18:29 +02001272 free((char *)exp->replace);
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001273 expb = exp;
1274 exp = exp->next;
1275 free(expb);
1276 }
1277
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001278 /* build a list of unique uri_auths */
1279 if (!ua)
1280 ua = p->uri_auth;
1281 else {
1282 /* check if p->uri_auth is unique */
1283 for (uap = ua; uap; uap=uap->next)
1284 if (uap == p->uri_auth)
1285 break;
1286
Willy Tarreauaccc4e12008-06-24 11:14:45 +02001287 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001288 /* add it, if it is */
1289 p->uri_auth->next = ua;
1290 ua = p->uri_auth;
1291 }
1292 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +02001293
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001294 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
1295 LIST_DEL(&acl->list);
1296 prune_acl(acl);
1297 free(acl);
1298 }
1299
Willy Tarreau4a5cade2012-04-05 21:09:48 +02001300 list_for_each_entry_safe(srule, sruleb, &p->server_rules, list) {
1301 LIST_DEL(&srule->list);
1302 prune_acl_cond(srule->cond);
1303 free(srule->cond);
1304 free(srule);
1305 }
1306
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001307 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
1308 LIST_DEL(&rule->list);
Willy Tarreauf51658d2014-04-23 01:21:56 +02001309 if (rule->cond) {
1310 prune_acl_cond(rule->cond);
1311 free(rule->cond);
1312 }
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001313 free(rule);
1314 }
1315
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001316 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
1317 LIST_DEL(&rdr->list);
Willy Tarreauf285f542010-01-03 20:03:03 +01001318 if (rdr->cond) {
1319 prune_acl_cond(rdr->cond);
1320 free(rdr->cond);
1321 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001322 free(rdr->rdr_str);
Thierry FOURNIERd18cd0f2013-11-29 12:15:45 +01001323 list_for_each_entry_safe(lf, lfb, &rdr->rdr_fmt, list) {
1324 LIST_DEL(&lf->list);
1325 free(lf);
1326 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +02001327 free(rdr);
1328 }
1329
William Lallemand0f99e342011-10-12 17:50:54 +02001330 list_for_each_entry_safe(log, logb, &p->logsrvs, list) {
1331 LIST_DEL(&log->list);
1332 free(log);
1333 }
1334
William Lallemand723b73a2012-02-08 16:37:49 +01001335 list_for_each_entry_safe(lf, lfb, &p->logformat, list) {
1336 LIST_DEL(&lf->list);
1337 free(lf);
1338 }
1339
Simon Hormanac821422011-07-15 13:14:09 +09001340 deinit_tcp_rules(&p->tcp_req.inspect_rules);
1341 deinit_tcp_rules(&p->tcp_req.l4_rules);
1342
Simon Horman6fb82592011-07-15 13:14:11 +09001343 deinit_stick_rules(&p->storersp_rules);
1344 deinit_stick_rules(&p->sticking_rules);
1345
Willy Tarreaua534fea2008-08-03 12:19:50 +02001346 free(p->appsession_name);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001347
1348 h = p->req_cap;
1349 while (h) {
1350 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001351 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001352 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001353 free(h);
1354 h = h_next;
1355 }/* end while(h) */
1356
1357 h = p->rsp_cap;
1358 while (h) {
1359 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001360 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001361 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001362 free(h);
1363 h = h_next;
1364 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001365
Willy Tarreaubaaee002006-06-26 02:48:02 +02001366 s = p->srv;
1367 while (s) {
1368 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001369
Willy Tarreau5b3a2022012-09-28 15:01:02 +02001370 if (s->check.task) {
1371 task_delete(s->check.task);
1372 task_free(s->check.task);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001373 }
Simon Hormand60d6912013-11-25 10:46:36 +09001374 if (s->agent.task) {
1375 task_delete(s->agent.task);
1376 task_free(s->agent.task);
1377 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001378
Willy Tarreau2e993902011-10-31 11:53:20 +01001379 if (s->warmup) {
1380 task_delete(s->warmup);
1381 task_free(s->warmup);
1382 }
1383
Willy Tarreaua534fea2008-08-03 12:19:50 +02001384 free(s->id);
1385 free(s->cookie);
Willy Tarreau1ae1b7b2012-09-28 15:28:30 +02001386 free(s->check.bi);
1387 free(s->check.bo);
Simon Hormand60d6912013-11-25 10:46:36 +09001388 free(s->agent.bi);
1389 free(s->agent.bo);
Sárközi, László34c01792014-09-05 10:08:23 +02001390 free((char*)s->conf.file);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001391 free(s);
1392 s = s_next;
1393 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001394
Willy Tarreau4348fad2012-09-20 16:48:07 +02001395 list_for_each_entry_safe(l, l_next, &p->conf.listeners, by_fe) {
Willy Tarreauf6e2cc72010-09-03 10:38:17 +02001396 unbind_listener(l);
1397 delete_listener(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001398 LIST_DEL(&l->by_fe);
1399 LIST_DEL(&l->by_bind);
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001400 free(l->name);
1401 free(l->counters);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001402 free(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001403 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001404
Willy Tarreau4348fad2012-09-20 16:48:07 +02001405 /* Release unused SSL configs. */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001406 list_for_each_entry_safe(bind_conf, bind_back, &p->conf.bind, by_fe) {
1407#ifdef USE_OPENSSL
Christopher Faulet31af49d2015-06-09 17:29:50 +02001408 ssl_sock_free_ca(bind_conf);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001409 ssl_sock_free_all_ctx(bind_conf);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001410 free(bind_conf->ca_file);
Christopher Faulet31af49d2015-06-09 17:29:50 +02001411 free(bind_conf->ca_sign_file);
1412 free(bind_conf->ca_sign_pass);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001413 free(bind_conf->ciphers);
Emeric Brun2b58d042012-09-20 17:10:03 +02001414 free(bind_conf->ecdhe);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001415 free(bind_conf->crl_file);
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001416#endif /* USE_OPENSSL */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001417 free(bind_conf->file);
1418 free(bind_conf->arg);
1419 LIST_DEL(&bind_conf->by_fe);
1420 free(bind_conf);
1421 }
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001422
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001423 free(p->desc);
1424 free(p->fwdfor_hdr_name);
1425
Willy Tarreauff011f22011-01-06 17:51:27 +01001426 free_http_req_rules(&p->http_req_rules);
Sasha Pachev218f0642014-06-16 12:05:59 -06001427 free_http_res_rules(&p->http_res_rules);
Willy Tarreau918ff602011-07-25 16:33:49 +02001428 free(p->task);
Krzysztof Piotr Oledzki59bb2182010-01-29 17:58:21 +01001429
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001430 pool_destroy2(p->req_cap_pool);
1431 pool_destroy2(p->rsp_cap_pool);
Simon Hormanb08584a2011-07-15 13:14:10 +09001432 pool_destroy2(p->table.pool);
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001433
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001434 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001435 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001436 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001437 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +02001438
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001439 while (ua) {
1440 uap = ua;
1441 ua = ua->next;
1442
Willy Tarreaua534fea2008-08-03 12:19:50 +02001443 free(uap->uri_prefix);
1444 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001445 free(uap->node);
1446 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001447
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001448 userlist_free(uap->userlist);
Willy Tarreauff011f22011-01-06 17:51:27 +01001449 free_http_req_rules(&uap->http_req_rules);
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001450
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001451 free(uap);
1452 }
1453
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001454 userlist_free(userlist);
1455
Willy Tarreaudd815982007-10-16 12:25:14 +02001456 protocol_unbind_all();
1457
David Carlier4a026412015-06-01 13:57:22 +02001458#if defined(USE_DEVICEATLAS)
1459 deinit_deviceatlas();
1460#endif
1461
Thomas Holmes5ed33ee2015-05-14 17:14:30 +01001462#ifdef USE_51DEGREES
Dragan Dosen93b38d92015-06-29 16:43:25 +02001463 deinit_51degrees();
Thomas Holmes4d441a72015-05-29 12:54:25 +01001464#endif
Thomas Holmes5ed33ee2015-05-14 17:14:30 +01001465
Joe Williamsdf5b38f2010-12-29 17:05:48 +01001466 free(global.log_send_hostname); global.log_send_hostname = NULL;
Kevinm48936af2010-12-22 16:08:21 +00001467 free(global.log_tag); global.log_tag = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001468 free(global.chroot); global.chroot = NULL;
1469 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001470 free(global.node); global.node = NULL;
1471 free(global.desc); global.desc = NULL;
Godbach4cc1b0d2013-06-26 16:49:51 +08001472 free(fdinfo); fdinfo = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001473 free(fdtab); fdtab = NULL;
1474 free(oldpids); oldpids = NULL;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001475 free(global_listener_queue_task); global_listener_queue_task = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001476
William Lallemand0f99e342011-10-12 17:50:54 +02001477 list_for_each_entry_safe(log, logb, &global.logsrvs, list) {
1478 LIST_DEL(&log->list);
1479 free(log);
1480 }
Willy Tarreau477ecd82010-01-03 21:12:30 +01001481 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
1482 LIST_DEL(&wl->list);
1483 free(wl);
1484 }
1485
Willy Tarreau87b09662015-04-03 00:22:06 +02001486 pool_destroy2(pool2_stream);
Willy Tarreaufeb76402015-04-03 14:10:06 +02001487 pool_destroy2(pool2_session);
Willy Tarreauf2943dc2012-10-26 20:10:28 +02001488 pool_destroy2(pool2_connection);
Willy Tarreau9b28e032012-10-12 23:49:43 +02001489 pool_destroy2(pool2_buffer);
Willy Tarreau332f8bf2007-05-13 21:36:56 +02001490 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001491 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +02001492 pool_destroy2(pool2_capture);
Willy Tarreau63963c62007-05-13 21:29:55 +02001493 pool_destroy2(pool2_appsess);
Willy Tarreaue4d7e552007-05-13 20:19:55 +02001494 pool_destroy2(pool2_pendconn);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001495 pool_destroy2(pool2_sig_handlers);
Willy Tarreau34eb6712011-10-24 18:15:04 +02001496 pool_destroy2(pool2_hdr_idx);
Willy Tarreau63986c72015-04-03 22:55:33 +02001497 pool_destroy2(pool2_http_txn);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001498
1499 if (have_appsession) {
Willy Tarreau63963c62007-05-13 21:29:55 +02001500 pool_destroy2(apools.serverid);
1501 pool_destroy2(apools.sessid);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001502 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001503
1504 deinit_pollers();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001505} /* end deinit() */
1506
Willy Tarreaubb545b42010-08-25 12:58:59 +02001507/* sends the signal <sig> to all pids found in <oldpids>. Returns the number of
1508 * pids the signal was correctly delivered to.
1509 */
1510static int tell_old_pids(int sig)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001511{
1512 int p;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001513 int ret = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001514 for (p = 0; p < nb_oldpids; p++)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001515 if (kill(oldpids[p], sig) == 0)
1516 ret++;
1517 return ret;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001518}
1519
Willy Tarreau918ff602011-07-25 16:33:49 +02001520/* Runs the polling loop */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001521void run_poll_loop()
1522{
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001523 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +02001524
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001525 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001526 while (1) {
Thierry FOURNIER9cf7c4b2014-12-15 13:26:01 +01001527 /* Process a few tasks */
1528 process_runnable_tasks();
1529
Willy Tarreau29857942009-05-10 09:01:21 +02001530 /* check if we caught some signals and process them */
1531 signal_process_queue();
1532
Willy Tarreau58b458d2008-06-29 22:40:23 +02001533 /* Check if we can expire some tasks */
Thierry FOURNIER9cf7c4b2014-12-15 13:26:01 +01001534 next = wake_expired_tasks();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001535
Willy Tarreauaf7ad002010-08-31 15:39:26 +02001536 /* stop when there's nothing left to do */
1537 if (jobs == 0)
Willy Tarreau4f60f162007-04-08 16:39:58 +02001538 break;
1539
Willy Tarreau10146c92015-04-13 20:44:19 +02001540 /* expire immediately if events are pending */
Willy Tarreau3c595ac2015-04-19 09:59:31 +02001541 if (fd_cache_num || run_queue || signal_queue_len || !LIST_ISEMPTY(&applet_runq))
Willy Tarreau10146c92015-04-13 20:44:19 +02001542 next = now_ms;
1543
Willy Tarreau58b458d2008-06-29 22:40:23 +02001544 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001545 cur_poller.poll(&cur_poller, next);
Willy Tarreau033cd9d2014-01-25 19:24:15 +01001546 fd_process_cached_events();
Willy Tarreau3c595ac2015-04-19 09:59:31 +02001547 applet_run_active();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001548 }
1549}
1550
Willy Tarreaue9b26022011-08-01 20:57:55 +02001551/* This is the global management task for listeners. It enables listeners waiting
1552 * for global resources when there are enough free resource, or at least once in
1553 * a while. It is designed to be called as a task.
1554 */
1555static struct task *manage_global_listener_queue(struct task *t)
1556{
1557 int next = TICK_ETERNITY;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001558 /* queue is empty, nothing to do */
1559 if (LIST_ISEMPTY(&global_listener_queue))
1560 goto out;
1561
1562 /* If there are still too many concurrent connections, let's wait for
1563 * some of them to go away. We don't need to re-arm the timer because
1564 * each of them will scan the queue anyway.
1565 */
1566 if (unlikely(actconn >= global.maxconn))
1567 goto out;
1568
1569 /* We should periodically try to enable listeners waiting for a global
1570 * resource here, because it is possible, though very unlikely, that
1571 * they have been blocked by a temporary lack of global resource such
1572 * as a file descriptor or memory and that the temporary condition has
1573 * disappeared.
1574 */
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001575 dequeue_all_listeners(&global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +02001576
1577 out:
1578 t->expire = next;
1579 task_queue(t);
1580 return t;
1581}
Willy Tarreau4f60f162007-04-08 16:39:58 +02001582
Willy Tarreaubaaee002006-06-26 02:48:02 +02001583int main(int argc, char **argv)
1584{
1585 int err, retry;
1586 struct rlimit limit;
Emeric Bruncf20bf12010-10-22 16:06:11 +02001587 char errmsg[100];
Willy Tarreau269ab312012-09-05 08:02:48 +02001588 int pidfd = -1;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001589
Emeric Bruncf20bf12010-10-22 16:06:11 +02001590 init(argc, argv);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001591 signal_register_fct(SIGQUIT, dump, SIGQUIT);
1592 signal_register_fct(SIGUSR1, sig_soft_stop, SIGUSR1);
1593 signal_register_fct(SIGHUP, sig_dump_state, SIGHUP);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001594
Willy Tarreaue437c442010-03-17 18:02:46 +01001595 /* Always catch SIGPIPE even on platforms which define MSG_NOSIGNAL.
1596 * Some recent FreeBSD setups report broken pipes, and MSG_NOSIGNAL
1597 * was defined there, so let's stay on the safe side.
Willy Tarreaubaaee002006-06-26 02:48:02 +02001598 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001599 signal_register_fct(SIGPIPE, NULL, 0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001600
Willy Tarreaudc23a922011-02-16 11:10:36 +01001601 /* ulimits */
1602 if (!global.rlimit_nofile)
1603 global.rlimit_nofile = global.maxsock;
1604
1605 if (global.rlimit_nofile) {
1606 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
1607 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
1608 Warning("[%s.main()] Cannot raise FD limit to %d.\n", argv[0], global.rlimit_nofile);
1609 }
1610 }
1611
1612 if (global.rlimit_memmax) {
1613 limit.rlim_cur = limit.rlim_max =
1614 global.rlimit_memmax * 1048576 / global.nbproc;
1615#ifdef RLIMIT_AS
1616 if (setrlimit(RLIMIT_AS, &limit) == -1) {
1617 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1618 argv[0], global.rlimit_memmax);
1619 }
1620#else
1621 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
1622 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1623 argv[0], global.rlimit_memmax);
1624 }
1625#endif
1626 }
1627
Willy Tarreaubaaee002006-06-26 02:48:02 +02001628 /* We will loop at most 100 times with 10 ms delay each time.
1629 * That's at most 1 second. We only send a signal to old pids
1630 * if we cannot grab at least one port.
1631 */
1632 retry = MAX_START_RETRIES;
1633 err = ERR_NONE;
1634 while (retry >= 0) {
1635 struct timeval w;
1636 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +01001637 /* exit the loop on no error or fatal error */
1638 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001639 break;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001640 if (nb_oldpids == 0 || retry == 0)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001641 break;
1642
1643 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
1644 * listening sockets. So on those platforms, it would be wiser to
1645 * simply send SIGUSR1, which will not be undoable.
1646 */
Willy Tarreaubb545b42010-08-25 12:58:59 +02001647 if (tell_old_pids(SIGTTOU) == 0) {
1648 /* no need to wait if we can't contact old pids */
1649 retry = 0;
1650 continue;
1651 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001652 /* give some time to old processes to stop listening */
1653 w.tv_sec = 0;
1654 w.tv_usec = 10*1000;
1655 select(0, NULL, NULL, NULL, &w);
1656 retry--;
1657 }
1658
1659 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001660 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +02001661 if (retry != MAX_START_RETRIES && nb_oldpids) {
1662 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001663 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +02001664 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001665 exit(1);
1666 }
1667
1668 if (listeners == 0) {
1669 Alert("[%s.main()] No enabled listener found (check the <listen> keywords) ! Exiting.\n", argv[0]);
1670 /* Note: we don't have to send anything to the old pids because we
1671 * never stopped them. */
1672 exit(1);
1673 }
1674
Emeric Bruncf20bf12010-10-22 16:06:11 +02001675 err = protocol_bind_all(errmsg, sizeof(errmsg));
1676 if ((err & ~ERR_WARN) != ERR_NONE) {
1677 if ((err & ERR_ALERT) || (err & ERR_WARN))
1678 Alert("[%s.main()] %s.\n", argv[0], errmsg);
1679
Willy Tarreaudd815982007-10-16 12:25:14 +02001680 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1681 protocol_unbind_all(); /* cleanup everything we can */
1682 if (nb_oldpids)
1683 tell_old_pids(SIGTTIN);
1684 exit(1);
Emeric Bruncf20bf12010-10-22 16:06:11 +02001685 } else if (err & ERR_WARN) {
1686 Alert("[%s.main()] %s.\n", argv[0], errmsg);
Willy Tarreaudd815982007-10-16 12:25:14 +02001687 }
1688
Willy Tarreaubaaee002006-06-26 02:48:02 +02001689 /* prepare pause/play signals */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001690 signal_register_fct(SIGTTOU, sig_pause, SIGTTOU);
1691 signal_register_fct(SIGTTIN, sig_listen, SIGTTIN);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001692
Willy Tarreaubaaee002006-06-26 02:48:02 +02001693 /* MODE_QUIET can inhibit alerts and warnings below this line */
1694
1695 global.mode &= ~MODE_STARTING;
1696 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1697 /* detach from the tty */
1698 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001699 }
1700
1701 /* open log & pid files before the chroot */
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001702 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD) && global.pidfile != NULL) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001703 unlink(global.pidfile);
1704 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1705 if (pidfd < 0) {
1706 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1707 if (nb_oldpids)
1708 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001709 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001710 exit(1);
1711 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001712 }
1713
Willy Tarreaub38651a2007-03-24 17:24:39 +01001714#ifdef CONFIG_HAP_CTTPROXY
1715 if (global.last_checks & LSTCHK_CTTPROXY) {
1716 int ret;
1717
1718 ret = check_cttproxy_version();
1719 if (ret < 0) {
1720 Alert("[%s.main()] Cannot enable cttproxy.\n%s",
1721 argv[0],
1722 (ret == -1) ? " Incorrect module version.\n"
1723 : " Make sure you have enough permissions and that the module is loaded.\n");
Willy Tarreaudd815982007-10-16 12:25:14 +02001724 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001725 exit(1);
1726 }
1727 }
1728#endif
1729
1730 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1731 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001732 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001733 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001734 exit(1);
1735 }
1736
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001737 /* If the user is not root, we'll still let him try the configuration
1738 * but we inform him that unexpected behaviour may occur.
1739 */
1740 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1741 Warning("[%s.main()] Some options which require full privileges"
1742 " might not work well.\n"
1743 "", argv[0]);
1744
Willy Tarreauf223cc02007-10-15 18:57:08 +02001745 /* chroot if needed */
1746 if (global.chroot != NULL) {
Willy Tarreau21337822012-04-29 14:11:38 +02001747 if (chroot(global.chroot) == -1 || chdir("/") == -1) {
Willy Tarreauf223cc02007-10-15 18:57:08 +02001748 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1749 if (nb_oldpids)
1750 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001751 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001752 exit(1);
1753 }
Willy Tarreauf223cc02007-10-15 18:57:08 +02001754 }
1755
Willy Tarreaubaaee002006-06-26 02:48:02 +02001756 if (nb_oldpids)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001757 nb_oldpids = tell_old_pids(oldpids_sig);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001758
1759 /* Note that any error at this stage will be fatal because we will not
1760 * be able to restart the old pids.
1761 */
1762
1763 /* setgid / setuid */
Michael Schererab012dd2013-01-12 18:35:19 +01001764 if (global.gid) {
1765 if (getgroups(0, NULL) > 0 && setgroups(0, NULL) == -1)
1766 Warning("[%s.main()] Failed to drop supplementary groups. Using 'gid'/'group'"
1767 " without 'uid'/'user' is generally useless.\n", argv[0]);
1768
1769 if (setgid(global.gid) == -1) {
1770 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
1771 protocol_unbind_all();
1772 exit(1);
1773 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001774 }
1775
1776 if (global.uid && setuid(global.uid) == -1) {
1777 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001778 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001779 exit(1);
1780 }
1781
1782 /* check ulimits */
1783 limit.rlim_cur = limit.rlim_max = 0;
1784 getrlimit(RLIMIT_NOFILE, &limit);
1785 if (limit.rlim_cur < global.maxsock) {
1786 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 +02001787 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001788 }
1789
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001790 if (global.mode & (MODE_DAEMON | MODE_SYSTEMD)) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001791 struct proxy *px;
Willy Tarreauf83d3fe2015-05-01 19:13:41 +02001792 struct peers *curpeers;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001793 int ret = 0;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001794 int *children = calloc(global.nbproc, sizeof(int));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001795 int proc;
1796
1797 /* the father launches the required number of processes */
1798 for (proc = 0; proc < global.nbproc; proc++) {
1799 ret = fork();
1800 if (ret < 0) {
1801 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001802 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02001803 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001804 }
1805 else if (ret == 0) /* child breaks here */
1806 break;
Marc-Antoine Perennou992709b2013-02-12 10:53:52 +01001807 children[proc] = ret;
Willy Tarreau269ab312012-09-05 08:02:48 +02001808 if (pidfd >= 0) {
1809 char pidstr[100];
1810 snprintf(pidstr, sizeof(pidstr), "%d\n", ret);
Willy Tarreau89efaed2013-12-13 15:14:55 +01001811 shut_your_big_mouth_gcc(write(pidfd, pidstr, strlen(pidstr)));
Willy Tarreaubaaee002006-06-26 02:48:02 +02001812 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01001813 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001814 }
Willy Tarreaufc6c0322012-11-16 16:12:27 +01001815
1816#ifdef USE_CPU_AFFINITY
1817 if (proc < global.nbproc && /* child */
Willy Tarreaue7597492015-04-20 11:36:57 +02001818 proc < LONGBITS && /* only the first 32/64 processes may be pinned */
Willy Tarreaufc6c0322012-11-16 16:12:27 +01001819 global.cpu_map[proc]) /* only do this if the process has a CPU map */
1820 sched_setaffinity(0, sizeof(unsigned long), (void *)&global.cpu_map[proc]);
1821#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +02001822 /* close the pidfile both in children and father */
Willy Tarreau269ab312012-09-05 08:02:48 +02001823 if (pidfd >= 0) {
1824 //lseek(pidfd, 0, SEEK_SET); /* debug: emulate eglibc bug */
1825 close(pidfd);
1826 }
Willy Tarreaud137dd32010-08-25 12:49:05 +02001827
1828 /* We won't ever use this anymore */
1829 free(oldpids); oldpids = NULL;
1830 free(global.chroot); global.chroot = NULL;
1831 free(global.pidfile); global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001832
Willy Tarreauedaff0a2015-05-01 17:01:08 +02001833 if (proc == global.nbproc) {
1834 if (global.mode & MODE_SYSTEMD) {
1835 protocol_unbind_all();
1836 for (proc = 0; proc < global.nbproc; proc++)
1837 while (waitpid(children[proc], NULL, 0) == -1 && errno == EINTR);
1838 }
1839 exit(0); /* parent must leave */
1840 }
1841
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001842 /* we might have to unbind some proxies from some processes */
1843 px = proxy;
1844 while (px != NULL) {
1845 if (px->bind_proc && px->state != PR_STSTOPPED) {
Willy Tarreaua9db57e2013-01-18 11:29:29 +01001846 if (!(px->bind_proc & (1UL << proc)))
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001847 stop_proxy(px);
1848 }
1849 px = px->next;
1850 }
1851
Willy Tarreauf83d3fe2015-05-01 19:13:41 +02001852 /* we might have to unbind some peers sections from some processes */
1853 for (curpeers = peers; curpeers; curpeers = curpeers->next) {
1854 if (!curpeers->peers_fe)
1855 continue;
1856
1857 if (curpeers->peers_fe->bind_proc & (1UL << proc))
1858 continue;
1859
1860 stop_proxy(curpeers->peers_fe);
1861 /* disable this peer section so that it kills itself */
1862 curpeers->peers_fe = NULL;
1863 }
1864
Dirkjan Bussink07fcaaa2014-04-28 22:57:16 +00001865 free(children);
1866 children = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001867 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
1868 * that we can detach from the TTY. We MUST NOT do it in other cases since
1869 * it would have already be done, and 0-2 would have been affected to listening
1870 * sockets
1871 */
Willy Tarreau106cb762008-11-16 07:40:34 +01001872 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001873 /* detach from the tty */
1874 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01001875 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001876 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
1877 }
1878 pid = getpid(); /* update child's pid */
1879 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02001880 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001881 }
1882
Willy Tarreaudd815982007-10-16 12:25:14 +02001883 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001884 /*
1885 * That's it : the central polling loop. Run until we stop.
1886 */
1887 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001888
1889 /* Free all Hash Keys and all Hash elements */
1890 appsession_cleanup();
1891 /* Do some cleanup */
1892 deinit();
1893
1894 exit(0);
1895}
1896
1897
1898/*
1899 * Local variables:
1900 * c-indent-level: 8
1901 * c-basic-offset: 8
1902 * End:
1903 */