blob: 1cad8e4cc39869f7979cf7d2473d6345e78385fe [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01003 * Copyright 2000-2011 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>
45#include <time.h>
46#include <syslog.h>
47
48#ifdef DEBUG_FULL
49#include <assert.h>
50#endif
51
Willy Tarreau2dd0d472006-06-29 17:53:05 +020052#include <common/appsession.h>
53#include <common/base64.h>
54#include <common/cfgparse.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020055#include <common/chunk.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020056#include <common/compat.h>
57#include <common/config.h>
58#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010059#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020060#include <common/memory.h>
61#include <common/mini-clist.h>
62#include <common/regex.h>
63#include <common/standard.h>
64#include <common/time.h>
65#include <common/uri_auth.h>
66#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020067
68#include <types/capture.h>
69#include <types/global.h>
Simon Hormanac821422011-07-15 13:14:09 +090070#include <types/proto_tcp.h>
71#include <types/acl.h>
Willy Tarreau3c63fd82011-09-07 18:00:47 +020072#include <types/peers.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020073
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +010074#include <proto/auth.h>
Willy Tarreau0fc45a72007-06-17 00:36:03 +020075#include <proto/acl.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020076#include <proto/backend.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020077#include <proto/channel.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020078#include <proto/checks.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020079#include <proto/fd.h>
Willy Tarreau34eb6712011-10-24 18:15:04 +020080#include <proto/hdr_idx.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020081#include <proto/listener.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020082#include <proto/log.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020083#include <proto/protocol.h>
Willy Tarreau80587432006-12-24 17:47:20 +010084#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020085#include <proto/proxy.h>
86#include <proto/queue.h>
87#include <proto/server.h>
Willy Tarreauc6ca1a02007-05-13 19:43:47 +020088#include <proto/session.h>
Willy Tarreau29857942009-05-10 09:01:21 +020089#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020090#include <proto/task.h>
91
Willy Tarreaub38651a2007-03-24 17:24:39 +010092#ifdef CONFIG_HAP_CTTPROXY
93#include <proto/cttproxy.h>
94#endif
95
Emeric Brunfc0421f2012-09-07 17:30:07 +020096#ifdef USE_OPENSSL
97#include <proto/ssl_sock.h>
98#endif
99
Willy Tarreaubaaee002006-06-26 02:48:02 +0200100/*********************************************************************/
101
102/*********************************************************************/
103
Willy Tarreau477ecd82010-01-03 21:12:30 +0100104/* list of config files */
105static struct list cfg_cfgfiles = LIST_HEAD_INIT(cfg_cfgfiles);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200106int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +0100107int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200108
109/* global options */
110struct global global = {
William Lallemand5f232402012-04-05 18:02:55 +0200111 .req_count = 0,
William Lallemand0f99e342011-10-12 17:50:54 +0200112 .logsrvs = LIST_HEAD_INIT(global.logsrvs),
Emeric Bruned760922010-10-22 17:59:25 +0200113 .unix_bind = {
114 .ux = {
115 .uid = -1,
116 .gid = -1,
117 .mode = 0,
118 }
119 },
Willy Tarreau27a674e2009-08-17 07:23:33 +0200120 .tune = {
121 .bufsize = BUFSIZE,
122 .maxrewrite = MAXREWRITE,
Willy Tarreau43961d52010-10-04 20:39:20 +0200123 .chksize = BUFSIZE,
Emeric Brunfc32aca2012-09-03 12:10:29 +0200124#ifdef USE_OPENSSL
125 .sslcachesize = 20000,
126#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200127 },
Emeric Brun76d88952012-10-05 15:47:31 +0200128#ifdef USE_OPENSSL
129#ifdef DEFAULT_MAXSSLCONN
Willy Tarreau403edff2012-09-06 11:58:37 +0200130 .maxsslconn = DEFAULT_MAXSSLCONN,
131#endif
Emeric Brun76d88952012-10-05 15:47:31 +0200132#ifdef LISTEN_DEFAULT_CIPHERS
133 .listen_default_ciphers = LISTEN_DEFAULT_CIPHERS,
134#endif
135#ifdef CONNECT_DEFAULT_CIPHERS
136 .connect_default_ciphers = CONNECT_DEFAULT_CIPHERS,
137#endif
138#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200139 /* others NULL OK */
140};
141
142/*********************************************************************/
143
144int stopping; /* non zero means stopping in progress */
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200145int jobs = 0; /* number of active jobs (conns, listeners, active tasks, ...) */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200146
147/* Here we store informations about the pids of the processes we may pause
148 * or kill. We will send them a signal every 10 ms until we can bind to all
149 * our ports. With 200 retries, that's about 2 seconds.
150 */
151#define MAX_START_RETRIES 200
Willy Tarreaubaaee002006-06-26 02:48:02 +0200152static int *oldpids = NULL;
153static int oldpids_sig; /* use USR1 or TERM */
154
155/* this is used to drain data, and as a temporary buffer for sprintf()... */
David du Colombier7af46052012-05-16 14:16:48 +0200156char *trash = NULL;
157int trashlen = BUFSIZE;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200158
Willy Tarreau8096de92010-02-26 11:12:27 +0100159/* this buffer is always the same size as standard buffers and is used for
160 * swapping data inside a buffer.
161 */
162char *swap_buffer = NULL;
163
Willy Tarreaubb545b42010-08-25 12:58:59 +0200164int nb_oldpids = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200165const int zero = 0;
166const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200167const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200168
Willy Tarreau1d21e0a2010-03-12 21:58:54 +0100169char hostname[MAX_HOSTNAME_LEN];
Emeric Brun2b920a12010-09-23 18:30:22 +0200170char localpeer[MAX_HOSTNAME_LEN];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200171
Willy Tarreau08ceb102011-07-24 22:58:00 +0200172/* list of the temporarily limited listeners because of lack of resource */
173struct list global_listener_queue = LIST_HEAD_INIT(global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +0200174struct task *global_listener_queue_task;
175static struct task *manage_global_listener_queue(struct task *t);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200176
177/*********************************************************************/
178/* general purpose functions ***************************************/
179/*********************************************************************/
180
181void display_version()
182{
183 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreau9eeb57b2012-03-26 06:15:29 +0200184 printf("Copyright 2000-2012 Willy Tarreau <w@1wt.eu>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200185}
186
Willy Tarreau7b066db2007-12-02 11:28:59 +0100187void display_build_opts()
188{
189 printf("Build options :"
190#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100191 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100192#endif
193#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100194 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100195#endif
196#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100197 "\n CC = " BUILD_CC
198#endif
199#ifdef BUILD_CFLAGS
200 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100201#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100202#ifdef BUILD_OPTIONS
203 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100204#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200205 "\n\nDefault settings :"
206 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
207 "\n\n",
208 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200209
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100210 printf("Encrypted password support via crypt(3): "
211#ifdef CONFIG_HAP_CRYPT
212 "yes"
213#else
214 "no"
215#endif
216 "\n");
217
Willy Tarreau1ee0e302012-09-10 07:16:05 +0200218#ifdef USE_OPENSSL
219 printf("Built with OpenSSL version : " OPENSSL_VERSION_TEXT "\n");
220 printf("OpenSSL library supports TLS extensions : "
221#if OPENSSL_VERSION_NUMBER < 0x00907000L
222 "no (library version too old)"
223#elif defined(OPENSSL_NO_TLSEXT)
224 "no (disabled via OPENSSL_NO_TLSEXT)"
225#else
226 "yes"
227#endif
228 "\n");
229 printf("OpenSSL library supports SNI : "
230#ifdef SSL_CTRL_SET_TLSEXT_HOSTNAME
231 "yes"
232#else
233#ifdef OPENSSL_NO_TLSEXT
234 "no (because of OPENSSL_NO_TLSEXT)"
235#else
236 "no (version might be too old, 0.9.8f min needed)"
237#endif
238#endif
239 "\n");
240 printf("OpenSSL library supports prefer-server-ciphers : "
241#ifdef SSL_OP_CIPHER_SERVER_PREFERENCE
242 "yes"
243#else
244 "no (0.9.7 or later needed)"
245#endif
246 "\n");
247#else /* USE_OPENSSL */
248 printf("Built without OpenSSL support (USE_OPENSSL not set)\n");
249#endif
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100250 putchar('\n');
251
Willy Tarreaube5b6852009-10-03 18:57:08 +0200252 list_pollers(stdout);
253 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100254}
255
Willy Tarreaubaaee002006-06-26 02:48:02 +0200256/*
257 * This function prints the command line usage and exits
258 */
259void usage(char *name)
260{
261 display_version();
262 fprintf(stderr,
Willy Tarreau5d01a632009-06-22 16:02:30 +0200263 "Usage : %s [-f <cfgfile>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200264 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200265 " [ -p <pidfile> ] [ -m <max megs> ] [ -C <dir> ]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100266 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200267 " -d enters debug mode ; -db only disables background mode.\n"
Willy Tarreau6e064432012-05-08 15:40:42 +0200268 " -dM[<byte>] poisons memory with <byte> (defaults to 0x50)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200269 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau576132e2011-09-10 19:26:56 +0200270 " -D goes daemon ; -C changes to <dir> before loading files.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200271 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200272 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200273 " -n sets the maximum total # of connections (%d)\n"
274 " -m limits the usable amount of memory (in MB)\n"
275 " -N sets the default, per-proxy maximum # of connections (%d)\n"
Emeric Brun2b920a12010-09-23 18:30:22 +0200276 " -L set local peer name (default to hostname)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200277 " -p writes pids of all children to this file\n"
278#if defined(ENABLE_EPOLL)
279 " -de disables epoll() usage even when available\n"
280#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200281#if defined(ENABLE_SEPOLL)
282 " -ds disables speculative epoll() usage even when available\n"
283#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200284#if defined(ENABLE_KQUEUE)
285 " -dk disables kqueue() usage even when available\n"
286#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200287#if defined(ENABLE_POLL)
288 " -dp disables poll() usage even when available\n"
289#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200290#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100291 " -dS disables splice usage (broken on old kernels)\n"
292#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200293 " -sf/-st [pid ]* finishes/terminates old pids. Must be last arguments.\n"
294 "\n",
295 name, DEFAULT_MAXCONN, cfg_maxpconn);
296 exit(1);
297}
298
299
300
301/*********************************************************************/
302/* more specific functions ***************************************/
303/*********************************************************************/
304
305/*
Willy Tarreaud0807c32010-08-27 18:26:11 +0200306 * upon SIGUSR1, let's have a soft stop. Note that soft_stop() broadcasts
307 * a signal zero to all subscribers. This means that it's as easy as
308 * subscribing to signal 0 to get informed about an imminent shutdown.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200309 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200310void sig_soft_stop(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200311{
312 soft_stop();
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200313 signal_unregister_handler(sh);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200314 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200315}
316
317/*
318 * upon SIGTTOU, we pause everything
319 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200320void sig_pause(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200321{
322 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200323 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200324}
325
326/*
327 * upon SIGTTIN, let's have a soft stop.
328 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200329void sig_listen(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200330{
Willy Tarreaube58c382011-07-24 18:28:10 +0200331 resume_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200332}
333
334/*
335 * this function dumps every server's state when the process receives SIGHUP.
336 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200337void sig_dump_state(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200338{
339 struct proxy *p = proxy;
340
341 Warning("SIGHUP received, dumping servers states.\n");
342 while (p) {
343 struct server *s = p->srv;
344
345 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
346 while (s) {
David du Colombier7af46052012-05-16 14:16:48 +0200347 snprintf(trash, trashlen,
Willy Tarreau3b88d442009-04-11 20:44:08 +0200348 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200349 p->id, s->id,
350 (s->state & SRV_RUNNING) ? "UP" : "DOWN",
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200351 s->cur_sess, s->nbpend, s->counters.cum_sess);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200352 Warning("%s\n", trash);
353 send_log(p, LOG_NOTICE, "%s\n", trash);
354 s = s->next;
355 }
356
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200357 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
358 if (!p->srv) {
David du Colombier7af46052012-05-16 14:16:48 +0200359 snprintf(trash, trashlen,
Willy Tarreau3b88d442009-04-11 20:44:08 +0200360 "SIGHUP: Proxy %s has no servers. Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200361 p->id,
Willy Tarreau7d0aaf32011-03-10 23:25:56 +0100362 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 +0200363 } else if (p->srv_act == 0) {
David du Colombier7af46052012-05-16 14:16:48 +0200364 snprintf(trash, trashlen,
Willy Tarreau3b88d442009-04-11 20:44:08 +0200365 "SIGHUP: Proxy %s %s ! Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200366 p->id,
367 (p->srv_bck) ? "is running on backup servers" : "has no server available",
Willy Tarreau7d0aaf32011-03-10 23:25:56 +0100368 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 +0200369 } else {
David du Colombier7af46052012-05-16 14:16:48 +0200370 snprintf(trash, trashlen,
Willy Tarreaubaaee002006-06-26 02:48:02 +0200371 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
Willy Tarreau3b88d442009-04-11 20:44:08 +0200372 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200373 p->id, p->srv_act, p->srv_bck,
Willy Tarreau7d0aaf32011-03-10 23:25:56 +0100374 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 +0200375 }
376 Warning("%s\n", trash);
377 send_log(p, LOG_NOTICE, "%s\n", trash);
378
379 p = p->next;
380 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200381}
382
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200383void dump(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200384{
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200385 /* dump memory usage then free everything possible */
386 dump_pools();
387 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200388}
389
Willy Tarreaubaaee002006-06-26 02:48:02 +0200390/*
391 * This function initializes all the necessary variables. It only returns
392 * if everything is OK. If something fails, it exits.
393 */
394void init(int argc, char **argv)
395{
Willy Tarreaubaaee002006-06-26 02:48:02 +0200396 int arg_mode = 0; /* MODE_DEBUG, ... */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200397 char *tmp;
398 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200399 int err_code = 0;
Willy Tarreau477ecd82010-01-03 21:12:30 +0100400 struct wordlist *wl;
Kevinm48936af2010-12-22 16:08:21 +0000401 char *progname;
Willy Tarreau576132e2011-09-10 19:26:56 +0200402 char *change_dir = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200403
David du Colombier7af46052012-05-16 14:16:48 +0200404 trash = malloc(trashlen);
405
Emeric Brun2b920a12010-09-23 18:30:22 +0200406 /* NB: POSIX does not make it mandatory for gethostname() to NULL-terminate
407 * the string in case of truncation, and at least FreeBSD appears not to do
408 * it.
409 */
410 memset(hostname, 0, sizeof(hostname));
411 gethostname(hostname, sizeof(hostname) - 1);
412 memset(localpeer, 0, sizeof(localpeer));
413 memcpy(localpeer, hostname, (sizeof(hostname) > sizeof(localpeer) ? sizeof(localpeer) : sizeof(hostname)) - 1);
414
Willy Tarreaubaaee002006-06-26 02:48:02 +0200415 /*
416 * Initialize the previously static variables.
417 */
418
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100419 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200420
421
422#ifdef HAPROXY_MEMMAX
423 global.rlimit_memmax = HAPROXY_MEMMAX;
424#endif
425
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200426 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200427 start_date = now;
428
Willy Tarreau29857942009-05-10 09:01:21 +0200429 signal_init();
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200430 init_task();
431 init_session();
Willy Tarreau8280d642009-09-23 23:37:52 +0200432 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200433 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100434 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200435
Willy Tarreau43b78992009-01-25 15:42:27 +0100436 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200437#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100438 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200439#endif
440#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100441 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200442#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200443#if defined(ENABLE_SEPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100444 global.tune.options |= GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200445#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200446#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100447 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200448#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200449#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100450 global.tune.options |= GTUNE_USE_SPLICE;
451#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200452
453 pid = getpid();
454 progname = *argv;
455 while ((tmp = strchr(progname, '/')) != NULL)
456 progname = tmp + 1;
457
Kevinm48936af2010-12-22 16:08:21 +0000458 /* the process name is used for the logs only */
459 global.log_tag = strdup(progname);
460
Willy Tarreaubaaee002006-06-26 02:48:02 +0200461 argc--; argv++;
462 while (argc > 0) {
463 char *flag;
464
465 if (**argv == '-') {
466 flag = *argv+1;
467
468 /* 1 arg */
469 if (*flag == 'v') {
470 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100471 if (flag[1] == 'v') /* -vv */
472 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200473 exit(0);
474 }
475#if defined(ENABLE_EPOLL)
476 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100477 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200478#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200479#if defined(ENABLE_SEPOLL)
480 else if (*flag == 'd' && flag[1] == 's')
Willy Tarreau43b78992009-01-25 15:42:27 +0100481 global.tune.options &= ~GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200482#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200483#if defined(ENABLE_POLL)
484 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100485 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200486#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200487#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200488 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100489 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200490#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200491#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100492 else if (*flag == 'd' && flag[1] == 'S')
493 global.tune.options &= ~GTUNE_USE_SPLICE;
494#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200495 else if (*flag == 'V')
496 arg_mode |= MODE_VERBOSE;
497 else if (*flag == 'd' && flag[1] == 'b')
498 arg_mode |= MODE_FOREGROUND;
Willy Tarreau6e064432012-05-08 15:40:42 +0200499 else if (*flag == 'd' && flag[1] == 'M')
500 mem_poison_byte = flag[2] ? strtol(flag + 2, NULL, 0) : 'P';
Willy Tarreaubaaee002006-06-26 02:48:02 +0200501 else if (*flag == 'd')
502 arg_mode |= MODE_DEBUG;
503 else if (*flag == 'c')
504 arg_mode |= MODE_CHECK;
505 else if (*flag == 'D')
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200506 arg_mode |= MODE_DAEMON;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200507 else if (*flag == 'q')
508 arg_mode |= MODE_QUIET;
509 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
510 /* list of pids to finish ('f') or terminate ('t') */
511
512 if (flag[1] == 'f')
513 oldpids_sig = SIGUSR1; /* finish then exit */
514 else
515 oldpids_sig = SIGTERM; /* terminate immediately */
516 argv++; argc--;
517
518 if (argc > 0) {
519 oldpids = calloc(argc, sizeof(int));
520 while (argc > 0) {
521 oldpids[nb_oldpids] = atol(*argv);
522 if (oldpids[nb_oldpids] <= 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200523 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200524 argc--; argv++;
525 nb_oldpids++;
526 }
527 }
528 }
529 else { /* >=2 args */
530 argv++; argc--;
531 if (argc == 0)
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200532 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200533
534 switch (*flag) {
Willy Tarreau576132e2011-09-10 19:26:56 +0200535 case 'C' : change_dir = *argv; break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200536 case 'n' : cfg_maxconn = atol(*argv); break;
537 case 'm' : global.rlimit_memmax = atol(*argv); break;
538 case 'N' : cfg_maxpconn = atol(*argv); break;
Emeric Brun2b920a12010-09-23 18:30:22 +0200539 case 'L' : strncpy(localpeer, *argv, sizeof(localpeer) - 1); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200540 case 'f' :
Willy Tarreau477ecd82010-01-03 21:12:30 +0100541 wl = (struct wordlist *)calloc(1, sizeof(*wl));
542 if (!wl) {
543 Alert("Cannot load configuration file %s : out of memory.\n", *argv);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200544 exit(1);
545 }
Willy Tarreau477ecd82010-01-03 21:12:30 +0100546 wl->s = *argv;
547 LIST_ADDQ(&cfg_cfgfiles, &wl->list);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200548 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200549 case 'p' : cfg_pidfile = *argv; break;
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200550 default: usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200551 }
552 }
553 }
554 else
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200555 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200556 argv++; argc--;
557 }
558
559 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
560 (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_VERBOSE
561 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
562
Willy Tarreau477ecd82010-01-03 21:12:30 +0100563 if (LIST_ISEMPTY(&cfg_cfgfiles))
Willy Tarreau3bafcdc2011-09-10 19:20:23 +0200564 usage(progname);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200565
Willy Tarreau576132e2011-09-10 19:26:56 +0200566 if (change_dir && chdir(change_dir) < 0) {
567 Alert("Could not change to directory %s : %s\n", change_dir, strerror(errno));
568 exit(1);
569 }
570
Willy Tarreaubaaee002006-06-26 02:48:02 +0200571 have_appsession = 0;
572 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200573
574 init_default_instance();
575
Willy Tarreau477ecd82010-01-03 21:12:30 +0100576 list_for_each_entry(wl, &cfg_cfgfiles, list) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100577 int ret;
578
Willy Tarreau477ecd82010-01-03 21:12:30 +0100579 ret = readcfgfile(wl->s);
Willy Tarreauc4382422009-12-06 13:10:44 +0100580 if (ret == -1) {
581 Alert("Could not open configuration file %s : %s\n",
Willy Tarreau477ecd82010-01-03 21:12:30 +0100582 wl->s, strerror(errno));
Willy Tarreauc4382422009-12-06 13:10:44 +0100583 exit(1);
584 }
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100585 if (ret & (ERR_ABORT|ERR_FATAL))
Willy Tarreau477ecd82010-01-03 21:12:30 +0100586 Alert("Error(s) found in configuration file : %s\n", wl->s);
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100587 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200588 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200589 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200590 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200591
Willy Tarreaubb925012009-07-23 13:36:36 +0200592 err_code |= check_config_validity();
593 if (err_code & (ERR_ABORT|ERR_FATAL)) {
594 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200595 exit(1);
596 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200597
598 if (global.mode & MODE_CHECK) {
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100599 struct peers *pr;
600 struct proxy *px;
601
602 for (pr = peers; pr; pr = pr->next)
603 if (pr->peers_fe)
604 break;
605
606 for (px = proxy; px; px = px->next)
Willy Tarreau4348fad2012-09-20 16:48:07 +0200607 if (px->state == PR_STNEW && !LIST_ISEMPTY(&px->conf.listeners))
Willy Tarreau8b15ba12012-02-02 17:48:18 +0100608 break;
609
610 if (pr || px) {
611 /* At least one peer or one listener has been found */
612 qfprintf(stdout, "Configuration file is valid\n");
613 exit(0);
614 }
615 qfprintf(stdout, "Configuration file has no error but will not start (no listener) => exit(2).\n");
616 exit(2);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200617 }
618
Willy Tarreaue9b26022011-08-01 20:57:55 +0200619 global_listener_queue_task = task_new();
620 if (!global_listener_queue_task) {
621 Alert("Out of memory when initializing global task\n");
622 exit(1);
623 }
624 /* very simple initialization, users will queue the task if needed */
625 global_listener_queue_task->context = NULL; /* not even a context! */
626 global_listener_queue_task->process = manage_global_listener_queue;
627 global_listener_queue_task->expire = TICK_ETERNITY;
628
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200629 /* now we know the buffer size, we can initialize the channels and buffers */
630 init_channel();
Willy Tarreau8280d642009-09-23 23:37:52 +0200631
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200632 if (have_appsession)
633 appsession_init();
634
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200635 if (start_checks() < 0)
636 exit(1);
637
Willy Tarreaubaaee002006-06-26 02:48:02 +0200638 if (cfg_maxconn > 0)
639 global.maxconn = cfg_maxconn;
640
641 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200642 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200643 global.pidfile = strdup(cfg_pidfile);
644 }
645
646 if (global.maxconn == 0)
647 global.maxconn = DEFAULT_MAXCONN;
648
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100649 if (!global.maxpipes) {
650 /* maxpipes not specified. Count how many frontends and backends
651 * may be using splicing, and bound that to maxconn.
652 */
653 struct proxy *cur;
654 int nbfe = 0, nbbe = 0;
655
656 for (cur = proxy; cur; cur = cur->next) {
657 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
658 if (cur->cap & PR_CAP_FE)
659 nbfe += cur->maxconn;
660 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +0100661 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100662 }
663 }
664 global.maxpipes = MAX(nbfe, nbbe);
665 if (global.maxpipes > global.maxconn)
666 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +0100667 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100668 }
669
670
Willy Tarreauabacc2c2011-09-07 14:26:33 +0200671 global.hardmaxconn = global.maxconn; /* keep this max value */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200672 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +0100673 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200674
Willy Tarreau3c63fd82011-09-07 18:00:47 +0200675 if (global.stats_fe)
676 global.maxsock += global.stats_fe->maxconn;
677
678 if (peers) {
679 /* peers also need to bypass global maxconn */
680 struct peers *p = peers;
681
682 for (p = peers; p; p = p->next)
683 if (p->peers_fe)
684 global.maxsock += p->peers_fe->maxconn;
685 }
686
Willy Tarreau1db37712007-06-03 17:16:49 +0200687 if (global.tune.maxpollevents <= 0)
688 global.tune.maxpollevents = MAX_POLL_EVENTS;
689
Willy Tarreauf49d1df2009-03-01 08:35:41 +0100690 if (global.tune.maxaccept == 0) {
Willy Tarreau4827fd22011-07-22 21:59:59 +0200691 /* Note: we should not try to accept too many connections at once,
692 * because past one point we're significantly reducing the cache
693 * efficiency and the highest session rate significantly drops.
694 * Values between 15 and 35 seem fine on a Core i5 with 4M L3 cache.
695 */
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100696 if (global.nbproc > 1)
697 global.tune.maxaccept = 8; /* leave some conns to other processes */
698 else
Willy Tarreau4827fd22011-07-22 21:59:59 +0200699 global.tune.maxaccept = 32; /* accept more incoming conns at once */
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100700 }
701
Willy Tarreau6f4a82c2009-03-21 20:43:57 +0100702 if (global.tune.recv_enough == 0)
703 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
704
Willy Tarreau27a674e2009-08-17 07:23:33 +0200705 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
706 global.tune.maxrewrite = global.tune.bufsize / 2;
707
Willy Tarreaubaaee002006-06-26 02:48:02 +0200708 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
709 /* command line debug mode inhibits configuration mode */
710 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
711 }
712 global.mode |= (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_QUIET |
Willy Tarreaufbee7132007-10-18 13:53:22 +0200713 MODE_VERBOSE | MODE_DEBUG ));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200714
715 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_QUIET))) {
716 Warning("<debug> mode incompatible with <quiet> and <daemon>. Keeping <debug> only.\n");
717 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
718 }
719
720 if ((global.nbproc > 1) && !(global.mode & MODE_DAEMON)) {
721 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
722 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
723 global.nbproc = 1;
724 }
725
726 if (global.nbproc < 1)
727 global.nbproc = 1;
728
Willy Tarreau8096de92010-02-26 11:12:27 +0100729 swap_buffer = (char *)calloc(1, global.tune.bufsize);
730
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200731 fdinfo = (struct fdinfo *)calloc(1,
732 sizeof(struct fdinfo) * (global.maxsock));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200733 fdtab = (struct fdtab *)calloc(1,
734 sizeof(struct fdtab) * (global.maxsock));
Willy Tarreauef1d1f82007-04-16 00:25:25 +0200735 /*
736 * Note: we could register external pollers here.
737 * Built-in pollers have been registered before main().
738 */
Willy Tarreau4f60f162007-04-08 16:39:58 +0200739
Willy Tarreau43b78992009-01-25 15:42:27 +0100740 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200741 disable_poller("kqueue");
742
Willy Tarreau43b78992009-01-25 15:42:27 +0100743 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200744 disable_poller("epoll");
745
Willy Tarreau43b78992009-01-25 15:42:27 +0100746 if (!(global.tune.options & GTUNE_USE_SEPOLL))
Willy Tarreaude99e992007-04-16 00:53:59 +0200747 disable_poller("sepoll");
748
Willy Tarreau43b78992009-01-25 15:42:27 +0100749 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200750 disable_poller("poll");
751
Willy Tarreau43b78992009-01-25 15:42:27 +0100752 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200753 disable_poller("select");
754
755 /* Note: we could disable any poller by name here */
756
Willy Tarreau2ff76222007-04-09 19:29:56 +0200757 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
758 list_pollers(stderr);
759
Willy Tarreau4f60f162007-04-08 16:39:58 +0200760 if (!init_pollers()) {
Willy Tarreau2ff76222007-04-09 19:29:56 +0200761 Alert("No polling mechanism available.\n");
Willy Tarreau4f60f162007-04-08 16:39:58 +0200762 exit(1);
763 }
Willy Tarreau2ff76222007-04-09 19:29:56 +0200764 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
765 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200766 }
767
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200768 if (!global.node)
769 global.node = strdup(hostname);
770
Willy Tarreaubaaee002006-06-26 02:48:02 +0200771}
772
Simon Horman6fb82592011-07-15 13:14:11 +0900773static void deinit_acl_cond(struct acl_cond *cond)
Simon Hormanac821422011-07-15 13:14:09 +0900774{
Simon Hormanac821422011-07-15 13:14:09 +0900775 struct acl_term_suite *suite, *suiteb;
776 struct acl_term *term, *termb;
777
Simon Horman6fb82592011-07-15 13:14:11 +0900778 if (!cond)
779 return;
780
781 list_for_each_entry_safe(suite, suiteb, &cond->suites, list) {
782 list_for_each_entry_safe(term, termb, &suite->terms, list) {
783 LIST_DEL(&term->list);
784 free(term);
Simon Hormanac821422011-07-15 13:14:09 +0900785 }
Simon Horman6fb82592011-07-15 13:14:11 +0900786 LIST_DEL(&suite->list);
787 free(suite);
788 }
789
790 free(cond);
791}
792
793static void deinit_tcp_rules(struct list *rules)
794{
795 struct tcp_rule *trule, *truleb;
796
797 list_for_each_entry_safe(trule, truleb, rules, list) {
Simon Hormanac821422011-07-15 13:14:09 +0900798 LIST_DEL(&trule->list);
Simon Horman6fb82592011-07-15 13:14:11 +0900799 deinit_acl_cond(trule->cond);
Simon Hormanac821422011-07-15 13:14:09 +0900800 free(trule);
801 }
802}
803
Willy Tarreau12785782012-04-27 21:37:17 +0200804static void deinit_sample_arg(struct arg *p)
Simon Horman6fb82592011-07-15 13:14:11 +0900805{
Willy Tarreauf9954102012-04-20 14:03:29 +0200806 struct arg *p_back = p;
807
Simon Horman6fb82592011-07-15 13:14:11 +0900808 if (!p)
809 return;
810
Willy Tarreauf9954102012-04-20 14:03:29 +0200811 while (p->type != ARGT_STOP) {
Willy Tarreau496aa012012-06-01 10:38:29 +0200812 if (p->type == ARGT_STR || p->unresolved) {
Willy Tarreauf9954102012-04-20 14:03:29 +0200813 free(p->data.str.str);
814 p->data.str.str = NULL;
Willy Tarreau496aa012012-06-01 10:38:29 +0200815 p->unresolved = 0;
Willy Tarreauecfb8e82012-04-20 12:29:52 +0200816 }
Willy Tarreauf9954102012-04-20 14:03:29 +0200817 p++;
Willy Tarreauecfb8e82012-04-20 12:29:52 +0200818 }
Simon Horman6fb82592011-07-15 13:14:11 +0900819
Willy Tarreauf9954102012-04-20 14:03:29 +0200820 free(p_back);
Simon Horman6fb82592011-07-15 13:14:11 +0900821}
822
823static void deinit_stick_rules(struct list *rules)
824{
825 struct sticking_rule *rule, *ruleb;
826
827 list_for_each_entry_safe(rule, ruleb, rules, list) {
828 LIST_DEL(&rule->list);
829 deinit_acl_cond(rule->cond);
830 if (rule->expr) {
Willy Tarreau12785782012-04-27 21:37:17 +0200831 struct sample_conv_expr *conv_expr, *conv_exprb;
Simon Horman6fb82592011-07-15 13:14:11 +0900832 list_for_each_entry_safe(conv_expr, conv_exprb, &rule->expr->conv_exprs, list)
Willy Tarreau12785782012-04-27 21:37:17 +0200833 deinit_sample_arg(conv_expr->arg_p);
834 deinit_sample_arg(rule->expr->arg_p);
Simon Horman6fb82592011-07-15 13:14:11 +0900835 free(rule->expr);
836 }
837 free(rule);
838 }
839}
840
Willy Tarreaubaaee002006-06-26 02:48:02 +0200841void deinit(void)
842{
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200843 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200844 struct cap_hdr *h,*h_next;
845 struct server *s,*s_next;
846 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200847 struct acl_cond *cond, *condb;
848 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200849 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200850 struct switching_rule *rule, *ruleb;
Willy Tarreau4a5cade2012-04-05 21:09:48 +0200851 struct server_rule *srule, *sruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200852 struct redirect_rule *rdr, *rdrb;
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100853 struct wordlist *wl, *wlb;
Willy Tarreauf4f04122010-01-28 18:10:50 +0100854 struct cond_wordlist *cwl, *cwlb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200855 struct uri_auth *uap, *ua = NULL;
William Lallemand0f99e342011-10-12 17:50:54 +0200856 struct logsrv *log, *logb;
William Lallemand723b73a2012-02-08 16:37:49 +0100857 struct logformat_node *lf, *lfb;
Willy Tarreau2a65ff02012-09-13 17:54:29 +0200858 struct bind_conf *bind_conf, *bind_back;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200859 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200860
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200861 deinit_signals();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200862 while (p) {
Willy Tarreau8113a5d2012-10-04 08:01:43 +0200863 free(p->conf.file);
Willy Tarreaua534fea2008-08-03 12:19:50 +0200864 free(p->id);
865 free(p->check_req);
866 free(p->cookie_name);
867 free(p->cookie_domain);
868 free(p->url_param_name);
869 free(p->capture_name);
870 free(p->monitor_uri);
Simon Hormana31c7f72011-07-15 13:14:08 +0900871 free(p->rdp_cookie_name);
Willy Tarreau39b06652012-06-01 10:58:06 +0200872 if (p->logformat_string != default_http_log_format &&
873 p->logformat_string != default_tcp_log_format &&
874 p->logformat_string != clf_http_log_format)
Willy Tarreau196729e2012-05-31 19:30:26 +0200875 free(p->logformat_string);
876
877 free(p->uniqueid_format_string);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200878
Willy Tarreaua534fea2008-08-03 12:19:50 +0200879 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +0200880 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200881
Willy Tarreauf4f04122010-01-28 18:10:50 +0100882 list_for_each_entry_safe(cwl, cwlb, &p->req_add, list) {
883 LIST_DEL(&cwl->list);
884 free(cwl->s);
885 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100886 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200887
Willy Tarreauf4f04122010-01-28 18:10:50 +0100888 list_for_each_entry_safe(cwl, cwlb, &p->rsp_add, list) {
889 LIST_DEL(&cwl->list);
890 free(cwl->s);
891 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100892 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200893
894 list_for_each_entry_safe(cond, condb, &p->block_cond, list) {
895 LIST_DEL(&cond->list);
896 prune_acl_cond(cond);
897 free(cond);
898 }
899
Willy Tarreaub80c2302007-11-30 20:51:32 +0100900 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
901 LIST_DEL(&cond->list);
902 prune_acl_cond(cond);
903 free(cond);
904 }
905
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200906 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200907 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200908 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200909 free((regex_t *)exp->preg);
910 }
911
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200912 if (exp->replace && exp->action != ACT_SETBE)
913 free((char *)exp->replace);
914 expb = exp;
915 exp = exp->next;
916 free(expb);
917 }
918
919 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200920 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200921 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200922 free((regex_t *)exp->preg);
923 }
924
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200925 if (exp->replace && exp->action != ACT_SETBE)
926 free((char *)exp->replace);
927 expb = exp;
928 exp = exp->next;
929 free(expb);
930 }
931
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200932 /* build a list of unique uri_auths */
933 if (!ua)
934 ua = p->uri_auth;
935 else {
936 /* check if p->uri_auth is unique */
937 for (uap = ua; uap; uap=uap->next)
938 if (uap == p->uri_auth)
939 break;
940
Willy Tarreauaccc4e12008-06-24 11:14:45 +0200941 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200942 /* add it, if it is */
943 p->uri_auth->next = ua;
944 ua = p->uri_auth;
945 }
946 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200947
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200948 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
949 LIST_DEL(&acl->list);
950 prune_acl(acl);
951 free(acl);
952 }
953
Willy Tarreau4a5cade2012-04-05 21:09:48 +0200954 list_for_each_entry_safe(srule, sruleb, &p->server_rules, list) {
955 LIST_DEL(&srule->list);
956 prune_acl_cond(srule->cond);
957 free(srule->cond);
958 free(srule);
959 }
960
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200961 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
962 LIST_DEL(&rule->list);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200963 prune_acl_cond(rule->cond);
964 free(rule->cond);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200965 free(rule);
966 }
967
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200968 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
969 LIST_DEL(&rdr->list);
Willy Tarreauf285f542010-01-03 20:03:03 +0100970 if (rdr->cond) {
971 prune_acl_cond(rdr->cond);
972 free(rdr->cond);
973 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200974 free(rdr->rdr_str);
975 free(rdr);
976 }
977
William Lallemand0f99e342011-10-12 17:50:54 +0200978 list_for_each_entry_safe(log, logb, &p->logsrvs, list) {
979 LIST_DEL(&log->list);
980 free(log);
981 }
982
William Lallemand723b73a2012-02-08 16:37:49 +0100983 list_for_each_entry_safe(lf, lfb, &p->logformat, list) {
984 LIST_DEL(&lf->list);
985 free(lf);
986 }
987
Simon Hormanac821422011-07-15 13:14:09 +0900988 deinit_tcp_rules(&p->tcp_req.inspect_rules);
989 deinit_tcp_rules(&p->tcp_req.l4_rules);
990
Simon Horman6fb82592011-07-15 13:14:11 +0900991 deinit_stick_rules(&p->storersp_rules);
992 deinit_stick_rules(&p->sticking_rules);
993
Willy Tarreaua534fea2008-08-03 12:19:50 +0200994 free(p->appsession_name);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200995
996 h = p->req_cap;
997 while (h) {
998 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200999 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001000 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001001 free(h);
1002 h = h_next;
1003 }/* end while(h) */
1004
1005 h = p->rsp_cap;
1006 while (h) {
1007 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001008 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001009 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001010 free(h);
1011 h = h_next;
1012 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001013
Willy Tarreaubaaee002006-06-26 02:48:02 +02001014 s = p->srv;
1015 while (s) {
1016 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001017
Willy Tarreau5b3a2022012-09-28 15:01:02 +02001018 if (s->check.task) {
1019 task_delete(s->check.task);
1020 task_free(s->check.task);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001021 }
1022
Willy Tarreau2e993902011-10-31 11:53:20 +01001023 if (s->warmup) {
1024 task_delete(s->warmup);
1025 task_free(s->warmup);
1026 }
1027
Willy Tarreaua534fea2008-08-03 12:19:50 +02001028 free(s->id);
1029 free(s->cookie);
Willy Tarreau1ae1b7b2012-09-28 15:28:30 +02001030 free(s->check.bi);
1031 free(s->check.bo);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001032 free(s);
1033 s = s_next;
1034 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001035
Willy Tarreau4348fad2012-09-20 16:48:07 +02001036 list_for_each_entry_safe(l, l_next, &p->conf.listeners, by_fe) {
Willy Tarreauf6e2cc72010-09-03 10:38:17 +02001037 unbind_listener(l);
1038 delete_listener(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001039 LIST_DEL(&l->by_fe);
1040 LIST_DEL(&l->by_bind);
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001041 free(l->name);
1042 free(l->counters);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001043 free(l);
Willy Tarreau4348fad2012-09-20 16:48:07 +02001044 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001045
Willy Tarreau4348fad2012-09-20 16:48:07 +02001046 /* Release unused SSL configs. */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001047 list_for_each_entry_safe(bind_conf, bind_back, &p->conf.bind, by_fe) {
1048#ifdef USE_OPENSSL
1049 ssl_sock_free_all_ctx(bind_conf);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001050 free(bind_conf->ca_file);
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001051 free(bind_conf->ciphers);
Emeric Brun2b58d042012-09-20 17:10:03 +02001052 free(bind_conf->ecdhe);
Emeric Brunfb510ea2012-10-05 12:00:26 +02001053 free(bind_conf->crl_file);
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001054#endif /* USE_OPENSSL */
Willy Tarreau2a65ff02012-09-13 17:54:29 +02001055 free(bind_conf->file);
1056 free(bind_conf->arg);
1057 LIST_DEL(&bind_conf->by_fe);
1058 free(bind_conf);
1059 }
Willy Tarreauf5ae8f72012-09-07 16:58:00 +02001060
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +01001061 free(p->desc);
1062 free(p->fwdfor_hdr_name);
1063
Willy Tarreauff011f22011-01-06 17:51:27 +01001064 free_http_req_rules(&p->http_req_rules);
Willy Tarreau918ff602011-07-25 16:33:49 +02001065 free(p->task);
Krzysztof Piotr Oledzki59bb2182010-01-29 17:58:21 +01001066
Willy Tarreaucf7f3202007-05-13 22:46:04 +02001067 pool_destroy2(p->req_cap_pool);
1068 pool_destroy2(p->rsp_cap_pool);
Simon Hormanb08584a2011-07-15 13:14:10 +09001069 pool_destroy2(p->table.pool);
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001070
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001071 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001072 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +02001073 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001074 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +02001075
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001076 while (ua) {
1077 uap = ua;
1078 ua = ua->next;
1079
Willy Tarreaua534fea2008-08-03 12:19:50 +02001080 free(uap->uri_prefix);
1081 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001082 free(uap->node);
1083 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001084
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001085 userlist_free(uap->userlist);
Willy Tarreauff011f22011-01-06 17:51:27 +01001086 free_http_req_rules(&uap->http_req_rules);
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +01001087
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001088 free(uap);
1089 }
1090
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +01001091 userlist_free(userlist);
1092
Willy Tarreaudd815982007-10-16 12:25:14 +02001093 protocol_unbind_all();
1094
Joe Williamsdf5b38f2010-12-29 17:05:48 +01001095 free(global.log_send_hostname); global.log_send_hostname = NULL;
Kevinm48936af2010-12-22 16:08:21 +00001096 free(global.log_tag); global.log_tag = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001097 free(global.chroot); global.chroot = NULL;
1098 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +02001099 free(global.node); global.node = NULL;
1100 free(global.desc); global.desc = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +02001101 free(fdtab); fdtab = NULL;
1102 free(oldpids); oldpids = NULL;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001103 free(global_listener_queue_task); global_listener_queue_task = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +02001104
William Lallemand0f99e342011-10-12 17:50:54 +02001105 list_for_each_entry_safe(log, logb, &global.logsrvs, list) {
1106 LIST_DEL(&log->list);
1107 free(log);
1108 }
Willy Tarreau477ecd82010-01-03 21:12:30 +01001109 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
1110 LIST_DEL(&wl->list);
1111 free(wl);
1112 }
1113
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001114 pool_destroy2(pool2_session);
Willy Tarreau8263d2b2012-08-28 00:06:31 +02001115 pool_destroy2(pool2_channel);
Willy Tarreau332f8bf2007-05-13 21:36:56 +02001116 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +02001117 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +02001118 pool_destroy2(pool2_capture);
Willy Tarreau63963c62007-05-13 21:29:55 +02001119 pool_destroy2(pool2_appsess);
Willy Tarreaue4d7e552007-05-13 20:19:55 +02001120 pool_destroy2(pool2_pendconn);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001121 pool_destroy2(pool2_sig_handlers);
Willy Tarreau34eb6712011-10-24 18:15:04 +02001122 pool_destroy2(pool2_hdr_idx);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001123
1124 if (have_appsession) {
Willy Tarreau63963c62007-05-13 21:29:55 +02001125 pool_destroy2(apools.serverid);
1126 pool_destroy2(apools.sessid);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001127 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +02001128
1129 deinit_pollers();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001130} /* end deinit() */
1131
Willy Tarreaubb545b42010-08-25 12:58:59 +02001132/* sends the signal <sig> to all pids found in <oldpids>. Returns the number of
1133 * pids the signal was correctly delivered to.
1134 */
1135static int tell_old_pids(int sig)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001136{
1137 int p;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001138 int ret = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001139 for (p = 0; p < nb_oldpids; p++)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001140 if (kill(oldpids[p], sig) == 0)
1141 ret++;
1142 return ret;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001143}
1144
Willy Tarreau918ff602011-07-25 16:33:49 +02001145/* Runs the polling loop */
Willy Tarreau4f60f162007-04-08 16:39:58 +02001146void run_poll_loop()
1147{
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001148 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +02001149
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001150 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001151 while (1) {
Willy Tarreau29857942009-05-10 09:01:21 +02001152 /* check if we caught some signals and process them */
1153 signal_process_queue();
1154
Willy Tarreau58b458d2008-06-29 22:40:23 +02001155 /* Check if we can expire some tasks */
1156 wake_expired_tasks(&next);
1157
1158 /* Process a few tasks */
Willy Tarreaud825eef2007-05-12 22:35:00 +02001159 process_runnable_tasks(&next);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001160
Willy Tarreauaf7ad002010-08-31 15:39:26 +02001161 /* stop when there's nothing left to do */
1162 if (jobs == 0)
Willy Tarreau4f60f162007-04-08 16:39:58 +02001163 break;
1164
Willy Tarreau58b458d2008-06-29 22:40:23 +02001165 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +02001166 cur_poller.poll(&cur_poller, next);
Willy Tarreau4f60f162007-04-08 16:39:58 +02001167 }
1168}
1169
Willy Tarreaue9b26022011-08-01 20:57:55 +02001170/* This is the global management task for listeners. It enables listeners waiting
1171 * for global resources when there are enough free resource, or at least once in
1172 * a while. It is designed to be called as a task.
1173 */
1174static struct task *manage_global_listener_queue(struct task *t)
1175{
1176 int next = TICK_ETERNITY;
Willy Tarreaue9b26022011-08-01 20:57:55 +02001177 /* queue is empty, nothing to do */
1178 if (LIST_ISEMPTY(&global_listener_queue))
1179 goto out;
1180
1181 /* If there are still too many concurrent connections, let's wait for
1182 * some of them to go away. We don't need to re-arm the timer because
1183 * each of them will scan the queue anyway.
1184 */
1185 if (unlikely(actconn >= global.maxconn))
1186 goto out;
1187
1188 /* We should periodically try to enable listeners waiting for a global
1189 * resource here, because it is possible, though very unlikely, that
1190 * they have been blocked by a temporary lack of global resource such
1191 * as a file descriptor or memory and that the temporary condition has
1192 * disappeared.
1193 */
Willy Tarreauabacc2c2011-09-07 14:26:33 +02001194 dequeue_all_listeners(&global_listener_queue);
Willy Tarreaue9b26022011-08-01 20:57:55 +02001195
1196 out:
1197 t->expire = next;
1198 task_queue(t);
1199 return t;
1200}
Willy Tarreau4f60f162007-04-08 16:39:58 +02001201
Willy Tarreaubaaee002006-06-26 02:48:02 +02001202int main(int argc, char **argv)
1203{
1204 int err, retry;
1205 struct rlimit limit;
Emeric Bruncf20bf12010-10-22 16:06:11 +02001206 char errmsg[100];
Willy Tarreau269ab312012-09-05 08:02:48 +02001207 int pidfd = -1;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001208
Emeric Bruncf20bf12010-10-22 16:06:11 +02001209 init(argc, argv);
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001210 signal_register_fct(SIGQUIT, dump, SIGQUIT);
1211 signal_register_fct(SIGUSR1, sig_soft_stop, SIGUSR1);
1212 signal_register_fct(SIGHUP, sig_dump_state, SIGHUP);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001213
Willy Tarreaue437c442010-03-17 18:02:46 +01001214 /* Always catch SIGPIPE even on platforms which define MSG_NOSIGNAL.
1215 * Some recent FreeBSD setups report broken pipes, and MSG_NOSIGNAL
1216 * was defined there, so let's stay on the safe side.
Willy Tarreaubaaee002006-06-26 02:48:02 +02001217 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001218 signal_register_fct(SIGPIPE, NULL, 0);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001219
Willy Tarreaudc23a922011-02-16 11:10:36 +01001220 /* ulimits */
1221 if (!global.rlimit_nofile)
1222 global.rlimit_nofile = global.maxsock;
1223
1224 if (global.rlimit_nofile) {
1225 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
1226 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
1227 Warning("[%s.main()] Cannot raise FD limit to %d.\n", argv[0], global.rlimit_nofile);
1228 }
1229 }
1230
1231 if (global.rlimit_memmax) {
1232 limit.rlim_cur = limit.rlim_max =
1233 global.rlimit_memmax * 1048576 / global.nbproc;
1234#ifdef RLIMIT_AS
1235 if (setrlimit(RLIMIT_AS, &limit) == -1) {
1236 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1237 argv[0], global.rlimit_memmax);
1238 }
1239#else
1240 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
1241 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1242 argv[0], global.rlimit_memmax);
1243 }
1244#endif
1245 }
1246
Willy Tarreaubaaee002006-06-26 02:48:02 +02001247 /* We will loop at most 100 times with 10 ms delay each time.
1248 * That's at most 1 second. We only send a signal to old pids
1249 * if we cannot grab at least one port.
1250 */
1251 retry = MAX_START_RETRIES;
1252 err = ERR_NONE;
1253 while (retry >= 0) {
1254 struct timeval w;
1255 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +01001256 /* exit the loop on no error or fatal error */
1257 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001258 break;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001259 if (nb_oldpids == 0 || retry == 0)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001260 break;
1261
1262 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
1263 * listening sockets. So on those platforms, it would be wiser to
1264 * simply send SIGUSR1, which will not be undoable.
1265 */
Willy Tarreaubb545b42010-08-25 12:58:59 +02001266 if (tell_old_pids(SIGTTOU) == 0) {
1267 /* no need to wait if we can't contact old pids */
1268 retry = 0;
1269 continue;
1270 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001271 /* give some time to old processes to stop listening */
1272 w.tv_sec = 0;
1273 w.tv_usec = 10*1000;
1274 select(0, NULL, NULL, NULL, &w);
1275 retry--;
1276 }
1277
1278 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001279 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +02001280 if (retry != MAX_START_RETRIES && nb_oldpids) {
1281 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001282 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +02001283 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001284 exit(1);
1285 }
1286
1287 if (listeners == 0) {
1288 Alert("[%s.main()] No enabled listener found (check the <listen> keywords) ! Exiting.\n", argv[0]);
1289 /* Note: we don't have to send anything to the old pids because we
1290 * never stopped them. */
1291 exit(1);
1292 }
1293
Emeric Bruncf20bf12010-10-22 16:06:11 +02001294 err = protocol_bind_all(errmsg, sizeof(errmsg));
1295 if ((err & ~ERR_WARN) != ERR_NONE) {
1296 if ((err & ERR_ALERT) || (err & ERR_WARN))
1297 Alert("[%s.main()] %s.\n", argv[0], errmsg);
1298
Willy Tarreaudd815982007-10-16 12:25:14 +02001299 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1300 protocol_unbind_all(); /* cleanup everything we can */
1301 if (nb_oldpids)
1302 tell_old_pids(SIGTTIN);
1303 exit(1);
Emeric Bruncf20bf12010-10-22 16:06:11 +02001304 } else if (err & ERR_WARN) {
1305 Alert("[%s.main()] %s.\n", argv[0], errmsg);
Willy Tarreaudd815982007-10-16 12:25:14 +02001306 }
1307
Willy Tarreaubaaee002006-06-26 02:48:02 +02001308 /* prepare pause/play signals */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001309 signal_register_fct(SIGTTOU, sig_pause, SIGTTOU);
1310 signal_register_fct(SIGTTIN, sig_listen, SIGTTIN);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001311
Willy Tarreaubaaee002006-06-26 02:48:02 +02001312 /* MODE_QUIET can inhibit alerts and warnings below this line */
1313
1314 global.mode &= ~MODE_STARTING;
1315 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1316 /* detach from the tty */
1317 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001318 }
1319
1320 /* open log & pid files before the chroot */
1321 if (global.mode & MODE_DAEMON && global.pidfile != NULL) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001322 unlink(global.pidfile);
1323 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1324 if (pidfd < 0) {
1325 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1326 if (nb_oldpids)
1327 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001328 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001329 exit(1);
1330 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001331 }
1332
Willy Tarreaub38651a2007-03-24 17:24:39 +01001333#ifdef CONFIG_HAP_CTTPROXY
1334 if (global.last_checks & LSTCHK_CTTPROXY) {
1335 int ret;
1336
1337 ret = check_cttproxy_version();
1338 if (ret < 0) {
1339 Alert("[%s.main()] Cannot enable cttproxy.\n%s",
1340 argv[0],
1341 (ret == -1) ? " Incorrect module version.\n"
1342 : " Make sure you have enough permissions and that the module is loaded.\n");
Willy Tarreaudd815982007-10-16 12:25:14 +02001343 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001344 exit(1);
1345 }
1346 }
1347#endif
1348
1349 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1350 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001351 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001352 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001353 exit(1);
1354 }
1355
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001356 /* If the user is not root, we'll still let him try the configuration
1357 * but we inform him that unexpected behaviour may occur.
1358 */
1359 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1360 Warning("[%s.main()] Some options which require full privileges"
1361 " might not work well.\n"
1362 "", argv[0]);
1363
Willy Tarreauf223cc02007-10-15 18:57:08 +02001364 /* chroot if needed */
1365 if (global.chroot != NULL) {
Willy Tarreau21337822012-04-29 14:11:38 +02001366 if (chroot(global.chroot) == -1 || chdir("/") == -1) {
Willy Tarreauf223cc02007-10-15 18:57:08 +02001367 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1368 if (nb_oldpids)
1369 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001370 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001371 exit(1);
1372 }
Willy Tarreauf223cc02007-10-15 18:57:08 +02001373 }
1374
Willy Tarreaubaaee002006-06-26 02:48:02 +02001375 if (nb_oldpids)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001376 nb_oldpids = tell_old_pids(oldpids_sig);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001377
1378 /* Note that any error at this stage will be fatal because we will not
1379 * be able to restart the old pids.
1380 */
1381
1382 /* setgid / setuid */
1383 if (global.gid && setgid(global.gid) == -1) {
1384 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001385 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001386 exit(1);
1387 }
1388
1389 if (global.uid && setuid(global.uid) == -1) {
1390 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001391 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001392 exit(1);
1393 }
1394
1395 /* check ulimits */
1396 limit.rlim_cur = limit.rlim_max = 0;
1397 getrlimit(RLIMIT_NOFILE, &limit);
1398 if (limit.rlim_cur < global.maxsock) {
1399 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 +02001400 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001401 }
1402
1403 if (global.mode & MODE_DAEMON) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001404 struct proxy *px;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001405 int ret = 0;
1406 int proc;
1407
1408 /* the father launches the required number of processes */
1409 for (proc = 0; proc < global.nbproc; proc++) {
1410 ret = fork();
1411 if (ret < 0) {
1412 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001413 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02001414 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001415 }
1416 else if (ret == 0) /* child breaks here */
1417 break;
Willy Tarreau269ab312012-09-05 08:02:48 +02001418 if (pidfd >= 0) {
1419 char pidstr[100];
1420 snprintf(pidstr, sizeof(pidstr), "%d\n", ret);
Willy Tarreauaa52bef2012-09-07 22:18:59 +02001421 if (write(pidfd, pidstr, strlen(pidstr)) < 0) /* shut gcc warning */;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001422 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01001423 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001424 }
1425 /* close the pidfile both in children and father */
Willy Tarreau269ab312012-09-05 08:02:48 +02001426 if (pidfd >= 0) {
1427 //lseek(pidfd, 0, SEEK_SET); /* debug: emulate eglibc bug */
1428 close(pidfd);
1429 }
Willy Tarreaud137dd32010-08-25 12:49:05 +02001430
1431 /* We won't ever use this anymore */
1432 free(oldpids); oldpids = NULL;
1433 free(global.chroot); global.chroot = NULL;
1434 free(global.pidfile); global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001435
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001436 /* we might have to unbind some proxies from some processes */
1437 px = proxy;
1438 while (px != NULL) {
1439 if (px->bind_proc && px->state != PR_STSTOPPED) {
1440 if (!(px->bind_proc & (1 << proc)))
1441 stop_proxy(px);
1442 }
1443 px = px->next;
1444 }
1445
Willy Tarreaubaaee002006-06-26 02:48:02 +02001446 if (proc == global.nbproc)
1447 exit(0); /* parent must leave */
1448
1449 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
1450 * that we can detach from the TTY. We MUST NOT do it in other cases since
1451 * it would have already be done, and 0-2 would have been affected to listening
1452 * sockets
1453 */
Willy Tarreau106cb762008-11-16 07:40:34 +01001454 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001455 /* detach from the tty */
1456 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01001457 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001458 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
1459 }
1460 pid = getpid(); /* update child's pid */
1461 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02001462 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001463 }
1464
Willy Tarreaudd815982007-10-16 12:25:14 +02001465 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001466 /*
1467 * That's it : the central polling loop. Run until we stop.
1468 */
1469 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001470
1471 /* Free all Hash Keys and all Hash elements */
1472 appsession_cleanup();
1473 /* Do some cleanup */
1474 deinit();
1475
1476 exit(0);
1477}
1478
1479
1480/*
1481 * Local variables:
1482 * c-indent-level: 8
1483 * c-basic-offset: 8
1484 * End:
1485 */