blob: d1f71950c6b326119ec54f8dc5f0c0932bbea44d [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreaudeb9ed82010-01-03 21:03:22 +01003 * Copyright 2000-2010 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>
55#include <common/compat.h>
56#include <common/config.h>
57#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010058#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020059#include <common/memory.h>
60#include <common/mini-clist.h>
61#include <common/regex.h>
62#include <common/standard.h>
63#include <common/time.h>
64#include <common/uri_auth.h>
65#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020066
67#include <types/capture.h>
68#include <types/global.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020069
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +010070#include <proto/auth.h>
Willy Tarreau0fc45a72007-06-17 00:36:03 +020071#include <proto/acl.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020072#include <proto/backend.h>
73#include <proto/buffers.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020074#include <proto/checks.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020075#include <proto/fd.h>
76#include <proto/log.h>
Willy Tarreaudd815982007-10-16 12:25:14 +020077#include <proto/protocols.h>
Willy Tarreau80587432006-12-24 17:47:20 +010078#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020079#include <proto/proxy.h>
80#include <proto/queue.h>
81#include <proto/server.h>
Willy Tarreauc6ca1a02007-05-13 19:43:47 +020082#include <proto/session.h>
Willy Tarreau29857942009-05-10 09:01:21 +020083#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020084#include <proto/stream_sock.h>
85#include <proto/task.h>
86
Willy Tarreaub38651a2007-03-24 17:24:39 +010087#ifdef CONFIG_HAP_CTTPROXY
88#include <proto/cttproxy.h>
89#endif
90
Willy Tarreaubaaee002006-06-26 02:48:02 +020091/*********************************************************************/
92
93/*********************************************************************/
94
Willy Tarreau477ecd82010-01-03 21:12:30 +010095/* list of config files */
96static struct list cfg_cfgfiles = LIST_HEAD_INIT(cfg_cfgfiles);
Willy Tarreaubaaee002006-06-26 02:48:02 +020097int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +010098int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +020099
100/* global options */
101struct global global = {
102 logfac1 : -1,
103 logfac2 : -1,
104 loglev1 : 7, /* max syslog level : debug */
105 loglev2 : 7,
Willy Tarreau03f6d672007-10-18 15:15:57 +0200106 .stats_sock = {
Willy Tarreau03f6d672007-10-18 15:15:57 +0200107 .maxconn = 10, /* 10 concurrent stats connections */
108 .perm = {
109 .ux = {
110 .uid = -1,
111 .gid = -1,
112 .mode = 0,
113 }
114 }
Willy Tarreau27a674e2009-08-17 07:23:33 +0200115 },
Emeric Bruned760922010-10-22 17:59:25 +0200116 .unix_bind = {
117 .ux = {
118 .uid = -1,
119 .gid = -1,
120 .mode = 0,
121 }
122 },
Willy Tarreau27a674e2009-08-17 07:23:33 +0200123 .tune = {
124 .bufsize = BUFSIZE,
125 .maxrewrite = MAXREWRITE,
Willy Tarreau43961d52010-10-04 20:39:20 +0200126 .chksize = BUFSIZE,
Willy Tarreau27a674e2009-08-17 07:23:33 +0200127 },
Willy Tarreaubaaee002006-06-26 02:48:02 +0200128 /* others NULL OK */
129};
130
131/*********************************************************************/
132
133int stopping; /* non zero means stopping in progress */
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200134int jobs = 0; /* number of active jobs (conns, listeners, active tasks, ...) */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200135
136/* Here we store informations about the pids of the processes we may pause
137 * or kill. We will send them a signal every 10 ms until we can bind to all
138 * our ports. With 200 retries, that's about 2 seconds.
139 */
140#define MAX_START_RETRIES 200
Willy Tarreaubaaee002006-06-26 02:48:02 +0200141static int *oldpids = NULL;
142static int oldpids_sig; /* use USR1 or TERM */
143
144/* this is used to drain data, and as a temporary buffer for sprintf()... */
145char trash[BUFSIZE];
146
Willy Tarreau8096de92010-02-26 11:12:27 +0100147/* this buffer is always the same size as standard buffers and is used for
148 * swapping data inside a buffer.
149 */
150char *swap_buffer = NULL;
151
Willy Tarreaubb545b42010-08-25 12:58:59 +0200152int nb_oldpids = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200153const int zero = 0;
154const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200155const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200156
Willy Tarreau1d21e0a2010-03-12 21:58:54 +0100157char hostname[MAX_HOSTNAME_LEN];
Emeric Brun2b920a12010-09-23 18:30:22 +0200158char localpeer[MAX_HOSTNAME_LEN];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200159
160
161/*********************************************************************/
162/* general purpose functions ***************************************/
163/*********************************************************************/
164
165void display_version()
166{
167 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreaub05613d2010-02-02 10:18:28 +0100168 printf("Copyright 2000-2010 Willy Tarreau <w@1wt.eu>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200169}
170
Willy Tarreau7b066db2007-12-02 11:28:59 +0100171void display_build_opts()
172{
173 printf("Build options :"
174#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100175 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100176#endif
177#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100178 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100179#endif
180#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100181 "\n CC = " BUILD_CC
182#endif
183#ifdef BUILD_CFLAGS
184 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100185#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100186#ifdef BUILD_OPTIONS
187 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100188#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200189 "\n\nDefault settings :"
190 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
191 "\n\n",
192 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200193
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100194 printf("Encrypted password support via crypt(3): "
195#ifdef CONFIG_HAP_CRYPT
196 "yes"
197#else
198 "no"
199#endif
200 "\n");
201
202 putchar('\n');
203
Willy Tarreaube5b6852009-10-03 18:57:08 +0200204 list_pollers(stdout);
205 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100206}
207
Willy Tarreaubaaee002006-06-26 02:48:02 +0200208/*
209 * This function prints the command line usage and exits
210 */
211void usage(char *name)
212{
213 display_version();
214 fprintf(stderr,
Willy Tarreau5d01a632009-06-22 16:02:30 +0200215 "Usage : %s [-f <cfgfile>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200216 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
217 " [ -p <pidfile> ] [ -m <max megs> ]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100218 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200219 " -d enters debug mode ; -db only disables background mode.\n"
220 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200221 " -D goes daemon\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200222 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200223 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200224 " -n sets the maximum total # of connections (%d)\n"
225 " -m limits the usable amount of memory (in MB)\n"
226 " -N sets the default, per-proxy maximum # of connections (%d)\n"
Emeric Brun2b920a12010-09-23 18:30:22 +0200227 " -L set local peer name (default to hostname)\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200228 " -p writes pids of all children to this file\n"
229#if defined(ENABLE_EPOLL)
230 " -de disables epoll() usage even when available\n"
231#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200232#if defined(ENABLE_SEPOLL)
233 " -ds disables speculative epoll() usage even when available\n"
234#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200235#if defined(ENABLE_KQUEUE)
236 " -dk disables kqueue() usage even when available\n"
237#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200238#if defined(ENABLE_POLL)
239 " -dp disables poll() usage even when available\n"
240#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200241#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100242 " -dS disables splice usage (broken on old kernels)\n"
243#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200244 " -sf/-st [pid ]* finishes/terminates old pids. Must be last arguments.\n"
245 "\n",
246 name, DEFAULT_MAXCONN, cfg_maxpconn);
247 exit(1);
248}
249
250
251
252/*********************************************************************/
253/* more specific functions ***************************************/
254/*********************************************************************/
255
256/*
Willy Tarreaud0807c32010-08-27 18:26:11 +0200257 * upon SIGUSR1, let's have a soft stop. Note that soft_stop() broadcasts
258 * a signal zero to all subscribers. This means that it's as easy as
259 * subscribing to signal 0 to get informed about an imminent shutdown.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200260 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200261void sig_soft_stop(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200262{
263 soft_stop();
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200264 signal_unregister_handler(sh);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200265 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200266}
267
268/*
269 * upon SIGTTOU, we pause everything
270 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200271void sig_pause(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200272{
273 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200274 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200275}
276
277/*
278 * upon SIGTTIN, let's have a soft stop.
279 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200280void sig_listen(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200281{
282 listen_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200283}
284
285/*
286 * this function dumps every server's state when the process receives SIGHUP.
287 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200288void sig_dump_state(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200289{
290 struct proxy *p = proxy;
291
292 Warning("SIGHUP received, dumping servers states.\n");
293 while (p) {
294 struct server *s = p->srv;
295
296 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
297 while (s) {
298 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200299 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200300 p->id, s->id,
301 (s->state & SRV_RUNNING) ? "UP" : "DOWN",
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200302 s->cur_sess, s->nbpend, s->counters.cum_sess);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200303 Warning("%s\n", trash);
304 send_log(p, LOG_NOTICE, "%s\n", trash);
305 s = s->next;
306 }
307
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200308 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
309 if (!p->srv) {
310 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200311 "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 +0200312 p->id,
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200313 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200314 } else if (p->srv_act == 0) {
Willy Tarreaubaaee002006-06-26 02:48:02 +0200315 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200316 "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 +0200317 p->id,
318 (p->srv_bck) ? "is running on backup servers" : "has no server available",
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200319 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200320 } else {
321 snprintf(trash, sizeof(trash),
322 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
Willy Tarreau3b88d442009-04-11 20:44:08 +0200323 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200324 p->id, p->srv_act, p->srv_bck,
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200325 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200326 }
327 Warning("%s\n", trash);
328 send_log(p, LOG_NOTICE, "%s\n", trash);
329
330 p = p->next;
331 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200332}
333
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200334void dump(struct sig_handler *sh)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200335{
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200336 /* dump memory usage then free everything possible */
337 dump_pools();
338 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200339}
340
Willy Tarreaubaaee002006-06-26 02:48:02 +0200341/*
342 * This function initializes all the necessary variables. It only returns
343 * if everything is OK. If something fails, it exits.
344 */
345void init(int argc, char **argv)
346{
347 int i;
348 int arg_mode = 0; /* MODE_DEBUG, ... */
349 char *old_argv = *argv;
350 char *tmp;
351 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200352 int err_code = 0;
Willy Tarreau477ecd82010-01-03 21:12:30 +0100353 struct wordlist *wl;
Kevinm48936af2010-12-22 16:08:21 +0000354 char *progname;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200355
Emeric Brun2b920a12010-09-23 18:30:22 +0200356 /* NB: POSIX does not make it mandatory for gethostname() to NULL-terminate
357 * the string in case of truncation, and at least FreeBSD appears not to do
358 * it.
359 */
360 memset(hostname, 0, sizeof(hostname));
361 gethostname(hostname, sizeof(hostname) - 1);
362 memset(localpeer, 0, sizeof(localpeer));
363 memcpy(localpeer, hostname, (sizeof(hostname) > sizeof(localpeer) ? sizeof(localpeer) : sizeof(hostname)) - 1);
364
Willy Tarreaubaaee002006-06-26 02:48:02 +0200365 /*
366 * Initialize the previously static variables.
367 */
368
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100369 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200370
371
372#ifdef HAPROXY_MEMMAX
373 global.rlimit_memmax = HAPROXY_MEMMAX;
374#endif
375
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200376 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200377 start_date = now;
378
Willy Tarreau29857942009-05-10 09:01:21 +0200379 signal_init();
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200380 init_task();
381 init_session();
Willy Tarreau8280d642009-09-23 23:37:52 +0200382 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200383 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100384 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200385
Willy Tarreau43b78992009-01-25 15:42:27 +0100386 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200387#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100388 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200389#endif
390#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100391 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200392#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200393#if defined(ENABLE_SEPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100394 global.tune.options |= GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200395#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200396#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100397 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200398#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200399#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100400 global.tune.options |= GTUNE_USE_SPLICE;
401#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200402
403 pid = getpid();
404 progname = *argv;
405 while ((tmp = strchr(progname, '/')) != NULL)
406 progname = tmp + 1;
407
Kevinm48936af2010-12-22 16:08:21 +0000408 /* the process name is used for the logs only */
409 global.log_tag = strdup(progname);
410
Willy Tarreaubaaee002006-06-26 02:48:02 +0200411 argc--; argv++;
412 while (argc > 0) {
413 char *flag;
414
415 if (**argv == '-') {
416 flag = *argv+1;
417
418 /* 1 arg */
419 if (*flag == 'v') {
420 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100421 if (flag[1] == 'v') /* -vv */
422 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200423 exit(0);
424 }
425#if defined(ENABLE_EPOLL)
426 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100427 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200428#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200429#if defined(ENABLE_SEPOLL)
430 else if (*flag == 'd' && flag[1] == 's')
Willy Tarreau43b78992009-01-25 15:42:27 +0100431 global.tune.options &= ~GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200432#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200433#if defined(ENABLE_POLL)
434 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100435 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200436#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200437#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200438 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100439 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200440#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200441#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100442 else if (*flag == 'd' && flag[1] == 'S')
443 global.tune.options &= ~GTUNE_USE_SPLICE;
444#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200445 else if (*flag == 'V')
446 arg_mode |= MODE_VERBOSE;
447 else if (*flag == 'd' && flag[1] == 'b')
448 arg_mode |= MODE_FOREGROUND;
449 else if (*flag == 'd')
450 arg_mode |= MODE_DEBUG;
451 else if (*flag == 'c')
452 arg_mode |= MODE_CHECK;
453 else if (*flag == 'D')
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200454 arg_mode |= MODE_DAEMON;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200455 else if (*flag == 'q')
456 arg_mode |= MODE_QUIET;
457 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
458 /* list of pids to finish ('f') or terminate ('t') */
459
460 if (flag[1] == 'f')
461 oldpids_sig = SIGUSR1; /* finish then exit */
462 else
463 oldpids_sig = SIGTERM; /* terminate immediately */
464 argv++; argc--;
465
466 if (argc > 0) {
467 oldpids = calloc(argc, sizeof(int));
468 while (argc > 0) {
469 oldpids[nb_oldpids] = atol(*argv);
470 if (oldpids[nb_oldpids] <= 0)
471 usage(old_argv);
472 argc--; argv++;
473 nb_oldpids++;
474 }
475 }
476 }
477 else { /* >=2 args */
478 argv++; argc--;
479 if (argc == 0)
480 usage(old_argv);
481
482 switch (*flag) {
483 case 'n' : cfg_maxconn = atol(*argv); break;
484 case 'm' : global.rlimit_memmax = atol(*argv); break;
485 case 'N' : cfg_maxpconn = atol(*argv); break;
Emeric Brun2b920a12010-09-23 18:30:22 +0200486 case 'L' : strncpy(localpeer, *argv, sizeof(localpeer) - 1); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200487 case 'f' :
Willy Tarreau477ecd82010-01-03 21:12:30 +0100488 wl = (struct wordlist *)calloc(1, sizeof(*wl));
489 if (!wl) {
490 Alert("Cannot load configuration file %s : out of memory.\n", *argv);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200491 exit(1);
492 }
Willy Tarreau477ecd82010-01-03 21:12:30 +0100493 wl->s = *argv;
494 LIST_ADDQ(&cfg_cfgfiles, &wl->list);
Willy Tarreau5d01a632009-06-22 16:02:30 +0200495 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200496 case 'p' : cfg_pidfile = *argv; break;
497 default: usage(old_argv);
498 }
499 }
500 }
501 else
502 usage(old_argv);
503 argv++; argc--;
504 }
505
506 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
507 (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_VERBOSE
508 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
509
Willy Tarreau477ecd82010-01-03 21:12:30 +0100510 if (LIST_ISEMPTY(&cfg_cfgfiles))
Willy Tarreaubaaee002006-06-26 02:48:02 +0200511 usage(old_argv);
512
Willy Tarreaubaaee002006-06-26 02:48:02 +0200513 have_appsession = 0;
514 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200515
516 init_default_instance();
517
Willy Tarreau477ecd82010-01-03 21:12:30 +0100518 list_for_each_entry(wl, &cfg_cfgfiles, list) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100519 int ret;
520
Willy Tarreau477ecd82010-01-03 21:12:30 +0100521 ret = readcfgfile(wl->s);
Willy Tarreauc4382422009-12-06 13:10:44 +0100522 if (ret == -1) {
523 Alert("Could not open configuration file %s : %s\n",
Willy Tarreau477ecd82010-01-03 21:12:30 +0100524 wl->s, strerror(errno));
Willy Tarreauc4382422009-12-06 13:10:44 +0100525 exit(1);
526 }
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100527 if (ret & (ERR_ABORT|ERR_FATAL))
Willy Tarreau477ecd82010-01-03 21:12:30 +0100528 Alert("Error(s) found in configuration file : %s\n", wl->s);
Willy Tarreau25a67fa2009-12-15 21:46:25 +0100529 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200530 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200531 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200532 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200533
Willy Tarreaubb925012009-07-23 13:36:36 +0200534 err_code |= check_config_validity();
535 if (err_code & (ERR_ABORT|ERR_FATAL)) {
536 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200537 exit(1);
538 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200539
540 if (global.mode & MODE_CHECK) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200541 qfprintf(stdout, "Configuration file is valid\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200542 exit(0);
543 }
544
Willy Tarreau8280d642009-09-23 23:37:52 +0200545 /* now we know the buffer size, we can initialize the buffers */
546 init_buffer();
547
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200548 if (have_appsession)
549 appsession_init();
550
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200551 if (start_checks() < 0)
552 exit(1);
553
Willy Tarreaubaaee002006-06-26 02:48:02 +0200554 if (cfg_maxconn > 0)
555 global.maxconn = cfg_maxconn;
556
557 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200558 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200559 global.pidfile = strdup(cfg_pidfile);
560 }
561
562 if (global.maxconn == 0)
563 global.maxconn = DEFAULT_MAXCONN;
564
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100565 if (!global.maxpipes) {
566 /* maxpipes not specified. Count how many frontends and backends
567 * may be using splicing, and bound that to maxconn.
568 */
569 struct proxy *cur;
570 int nbfe = 0, nbbe = 0;
571
572 for (cur = proxy; cur; cur = cur->next) {
573 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
574 if (cur->cap & PR_CAP_FE)
575 nbfe += cur->maxconn;
576 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +0100577 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100578 }
579 }
580 global.maxpipes = MAX(nbfe, nbbe);
581 if (global.maxpipes > global.maxconn)
582 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +0100583 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100584 }
585
586
Willy Tarreaubaaee002006-06-26 02:48:02 +0200587 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +0100588 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200589
Willy Tarreau1db37712007-06-03 17:16:49 +0200590 if (global.tune.maxpollevents <= 0)
591 global.tune.maxpollevents = MAX_POLL_EVENTS;
592
Willy Tarreauf49d1df2009-03-01 08:35:41 +0100593 if (global.tune.maxaccept == 0) {
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100594 if (global.nbproc > 1)
595 global.tune.maxaccept = 8; /* leave some conns to other processes */
596 else
Willy Tarreauf49d1df2009-03-01 08:35:41 +0100597 global.tune.maxaccept = 100; /* accept many incoming conns at once */
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100598 }
599
Willy Tarreau6f4a82c2009-03-21 20:43:57 +0100600 if (global.tune.recv_enough == 0)
601 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
602
Willy Tarreau27a674e2009-08-17 07:23:33 +0200603 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
604 global.tune.maxrewrite = global.tune.bufsize / 2;
605
Willy Tarreaubaaee002006-06-26 02:48:02 +0200606 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
607 /* command line debug mode inhibits configuration mode */
608 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
609 }
610 global.mode |= (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_QUIET |
Willy Tarreaufbee7132007-10-18 13:53:22 +0200611 MODE_VERBOSE | MODE_DEBUG ));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200612
613 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_QUIET))) {
614 Warning("<debug> mode incompatible with <quiet> and <daemon>. Keeping <debug> only.\n");
615 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
616 }
617
618 if ((global.nbproc > 1) && !(global.mode & MODE_DAEMON)) {
619 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
620 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
621 global.nbproc = 1;
622 }
623
624 if (global.nbproc < 1)
625 global.nbproc = 1;
626
Willy Tarreau8096de92010-02-26 11:12:27 +0100627 swap_buffer = (char *)calloc(1, global.tune.bufsize);
628
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200629 fdinfo = (struct fdinfo *)calloc(1,
630 sizeof(struct fdinfo) * (global.maxsock));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200631 fdtab = (struct fdtab *)calloc(1,
632 sizeof(struct fdtab) * (global.maxsock));
633 for (i = 0; i < global.maxsock; i++) {
634 fdtab[i].state = FD_STCLOSE;
635 }
Willy Tarreau4f60f162007-04-08 16:39:58 +0200636
Willy Tarreauef1d1f82007-04-16 00:25:25 +0200637 /*
638 * Note: we could register external pollers here.
639 * Built-in pollers have been registered before main().
640 */
Willy Tarreau4f60f162007-04-08 16:39:58 +0200641
Willy Tarreau43b78992009-01-25 15:42:27 +0100642 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200643 disable_poller("kqueue");
644
Willy Tarreau43b78992009-01-25 15:42:27 +0100645 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200646 disable_poller("epoll");
647
Willy Tarreau43b78992009-01-25 15:42:27 +0100648 if (!(global.tune.options & GTUNE_USE_SEPOLL))
Willy Tarreaude99e992007-04-16 00:53:59 +0200649 disable_poller("sepoll");
650
Willy Tarreau43b78992009-01-25 15:42:27 +0100651 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200652 disable_poller("poll");
653
Willy Tarreau43b78992009-01-25 15:42:27 +0100654 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200655 disable_poller("select");
656
657 /* Note: we could disable any poller by name here */
658
Willy Tarreau2ff76222007-04-09 19:29:56 +0200659 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
660 list_pollers(stderr);
661
Willy Tarreau4f60f162007-04-08 16:39:58 +0200662 if (!init_pollers()) {
Willy Tarreau2ff76222007-04-09 19:29:56 +0200663 Alert("No polling mechanism available.\n");
Willy Tarreau4f60f162007-04-08 16:39:58 +0200664 exit(1);
665 }
Willy Tarreau2ff76222007-04-09 19:29:56 +0200666 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
667 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200668 }
669
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200670 if (!global.node)
671 global.node = strdup(hostname);
672
Willy Tarreaubaaee002006-06-26 02:48:02 +0200673}
674
675void deinit(void)
676{
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200677 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200678 struct cap_hdr *h,*h_next;
679 struct server *s,*s_next;
680 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200681 struct acl_cond *cond, *condb;
682 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200683 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200684 struct switching_rule *rule, *ruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200685 struct redirect_rule *rdr, *rdrb;
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100686 struct wordlist *wl, *wlb;
Willy Tarreauf4f04122010-01-28 18:10:50 +0100687 struct cond_wordlist *cwl, *cwlb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200688 struct uri_auth *uap, *ua = NULL;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200689 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200690
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200691 deinit_signals();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200692 while (p) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200693 free(p->id);
694 free(p->check_req);
695 free(p->cookie_name);
696 free(p->cookie_domain);
697 free(p->url_param_name);
698 free(p->capture_name);
699 free(p->monitor_uri);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200700
Willy Tarreaua534fea2008-08-03 12:19:50 +0200701 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +0200702 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200703
Willy Tarreauf4f04122010-01-28 18:10:50 +0100704 list_for_each_entry_safe(cwl, cwlb, &p->req_add, list) {
705 LIST_DEL(&cwl->list);
706 free(cwl->s);
707 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100708 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200709
Willy Tarreauf4f04122010-01-28 18:10:50 +0100710 list_for_each_entry_safe(cwl, cwlb, &p->rsp_add, list) {
711 LIST_DEL(&cwl->list);
712 free(cwl->s);
713 free(cwl);
Willy Tarreaudeb9ed82010-01-03 21:03:22 +0100714 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200715
716 list_for_each_entry_safe(cond, condb, &p->block_cond, list) {
717 LIST_DEL(&cond->list);
718 prune_acl_cond(cond);
719 free(cond);
720 }
721
Willy Tarreaub80c2302007-11-30 20:51:32 +0100722 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
723 LIST_DEL(&cond->list);
724 prune_acl_cond(cond);
725 free(cond);
726 }
727
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200728 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200729 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200730 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200731 free((regex_t *)exp->preg);
732 }
733
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200734 if (exp->replace && exp->action != ACT_SETBE)
735 free((char *)exp->replace);
736 expb = exp;
737 exp = exp->next;
738 free(expb);
739 }
740
741 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200742 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200743 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200744 free((regex_t *)exp->preg);
745 }
746
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200747 if (exp->replace && exp->action != ACT_SETBE)
748 free((char *)exp->replace);
749 expb = exp;
750 exp = exp->next;
751 free(expb);
752 }
753
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200754 /* build a list of unique uri_auths */
755 if (!ua)
756 ua = p->uri_auth;
757 else {
758 /* check if p->uri_auth is unique */
759 for (uap = ua; uap; uap=uap->next)
760 if (uap == p->uri_auth)
761 break;
762
Willy Tarreauaccc4e12008-06-24 11:14:45 +0200763 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200764 /* add it, if it is */
765 p->uri_auth->next = ua;
766 ua = p->uri_auth;
767 }
768 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200769
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200770 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
771 LIST_DEL(&acl->list);
772 prune_acl(acl);
773 free(acl);
774 }
775
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200776 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
777 LIST_DEL(&rule->list);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200778 prune_acl_cond(rule->cond);
779 free(rule->cond);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200780 free(rule);
781 }
782
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200783 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
784 LIST_DEL(&rdr->list);
Willy Tarreauf285f542010-01-03 20:03:03 +0100785 if (rdr->cond) {
786 prune_acl_cond(rdr->cond);
787 free(rdr->cond);
788 }
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200789 free(rdr->rdr_str);
790 free(rdr);
791 }
792
Willy Tarreaua534fea2008-08-03 12:19:50 +0200793 free(p->appsession_name);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200794
795 h = p->req_cap;
796 while (h) {
797 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200798 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200799 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200800 free(h);
801 h = h_next;
802 }/* end while(h) */
803
804 h = p->rsp_cap;
805 while (h) {
806 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200807 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200808 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200809 free(h);
810 h = h_next;
811 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200812
Willy Tarreaubaaee002006-06-26 02:48:02 +0200813 s = p->srv;
814 while (s) {
815 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200816
817 if (s->check) {
818 task_delete(s->check);
819 task_free(s->check);
820 }
821
Willy Tarreaua534fea2008-08-03 12:19:50 +0200822 free(s->id);
823 free(s->cookie);
Nick Chalk57b1bf72010-03-16 15:50:46 +0000824 free(s->check_data);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200825 free(s);
826 s = s_next;
827 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200828
Willy Tarreaubaaee002006-06-26 02:48:02 +0200829 l = p->listen;
830 while (l) {
831 l_next = l->next;
Willy Tarreauf6e2cc72010-09-03 10:38:17 +0200832 unbind_listener(l);
833 delete_listener(l);
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +0100834 free(l->name);
835 free(l->counters);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200836 free(l);
837 l = l_next;
838 }/* end while(l) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200839
Krzysztof Piotr Oledzkiaff01ea2010-02-05 20:31:44 +0100840 free(p->desc);
841 free(p->fwdfor_hdr_name);
842
Krzysztof Piotr Oledzki59bb2182010-01-29 17:58:21 +0100843 req_acl_free(&p->req_acl);
844
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200845 pool_destroy2(p->req_cap_pool);
846 pool_destroy2(p->rsp_cap_pool);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200847 pool_destroy2(p->hdr_idx_pool);
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100848
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200849 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200850 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200851 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200852 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +0200853
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200854 while (ua) {
855 uap = ua;
856 ua = ua->next;
857
Willy Tarreaua534fea2008-08-03 12:19:50 +0200858 free(uap->uri_prefix);
859 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200860 free(uap->node);
861 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200862
Krzysztof Piotr Oledzki8c8bd452010-01-29 19:29:32 +0100863 userlist_free(uap->userlist);
864 req_acl_free(&uap->req_acl);
865
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200866 free(uap);
867 }
868
Krzysztof Piotr Oledzki96105042010-01-29 17:50:44 +0100869 userlist_free(userlist);
870
Willy Tarreaudd815982007-10-16 12:25:14 +0200871 protocol_unbind_all();
872
Joe Williamsdf5b38f2010-12-29 17:05:48 +0100873 free(global.log_send_hostname); global.log_send_hostname = NULL;
Kevinm48936af2010-12-22 16:08:21 +0000874 free(global.log_tag); global.log_tag = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200875 free(global.chroot); global.chroot = NULL;
876 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200877 free(global.node); global.node = NULL;
878 free(global.desc); global.desc = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200879 free(fdtab); fdtab = NULL;
880 free(oldpids); oldpids = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200881
Willy Tarreau477ecd82010-01-03 21:12:30 +0100882 list_for_each_entry_safe(wl, wlb, &cfg_cfgfiles, list) {
883 LIST_DEL(&wl->list);
884 free(wl);
885 }
886
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200887 pool_destroy2(pool2_session);
Willy Tarreau7341d942007-05-13 19:56:02 +0200888 pool_destroy2(pool2_buffer);
Willy Tarreau332f8bf2007-05-13 21:36:56 +0200889 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200890 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +0200891 pool_destroy2(pool2_capture);
Willy Tarreau63963c62007-05-13 21:29:55 +0200892 pool_destroy2(pool2_appsess);
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200893 pool_destroy2(pool2_pendconn);
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200894 pool_destroy2(pool2_sig_handlers);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200895
896 if (have_appsession) {
Willy Tarreau63963c62007-05-13 21:29:55 +0200897 pool_destroy2(apools.serverid);
898 pool_destroy2(apools.sessid);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200899 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200900
901 deinit_pollers();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200902} /* end deinit() */
903
Willy Tarreaubb545b42010-08-25 12:58:59 +0200904/* sends the signal <sig> to all pids found in <oldpids>. Returns the number of
905 * pids the signal was correctly delivered to.
906 */
907static int tell_old_pids(int sig)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200908{
909 int p;
Willy Tarreaubb545b42010-08-25 12:58:59 +0200910 int ret = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200911 for (p = 0; p < nb_oldpids; p++)
Willy Tarreaubb545b42010-08-25 12:58:59 +0200912 if (kill(oldpids[p], sig) == 0)
913 ret++;
914 return ret;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200915}
916
Willy Tarreau4f60f162007-04-08 16:39:58 +0200917/*
918 * Runs the polling loop
919 *
920 * FIXME:
921 * - we still use 'listeners' to check whether we want to stop or not.
922 *
923 */
924void run_poll_loop()
925{
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200926 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +0200927
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200928 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200929 while (1) {
Willy Tarreau29857942009-05-10 09:01:21 +0200930 /* check if we caught some signals and process them */
931 signal_process_queue();
932
Willy Tarreau58b458d2008-06-29 22:40:23 +0200933 /* Check if we can expire some tasks */
934 wake_expired_tasks(&next);
935
936 /* Process a few tasks */
Willy Tarreaud825eef2007-05-12 22:35:00 +0200937 process_runnable_tasks(&next);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200938
Willy Tarreau58b458d2008-06-29 22:40:23 +0200939 /* maintain all proxies in a consistent state. This should quickly
940 * become a task because it becomes expensive when there are huge
941 * numbers of proxies. */
942 maintain_proxies(&next);
943
Willy Tarreauaf7ad002010-08-31 15:39:26 +0200944 /* stop when there's nothing left to do */
945 if (jobs == 0)
Willy Tarreau4f60f162007-04-08 16:39:58 +0200946 break;
947
Willy Tarreau58b458d2008-06-29 22:40:23 +0200948 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200949 cur_poller.poll(&cur_poller, next);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200950 }
951}
952
953
Willy Tarreaubaaee002006-06-26 02:48:02 +0200954int main(int argc, char **argv)
955{
956 int err, retry;
957 struct rlimit limit;
958 FILE *pidfile = NULL;
Emeric Bruncf20bf12010-10-22 16:06:11 +0200959 char errmsg[100];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200960
Emeric Bruncf20bf12010-10-22 16:06:11 +0200961 init(argc, argv);
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200962 signal_register_fct(SIGQUIT, dump, SIGQUIT);
963 signal_register_fct(SIGUSR1, sig_soft_stop, SIGUSR1);
964 signal_register_fct(SIGHUP, sig_dump_state, SIGHUP);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200965
Willy Tarreaue437c442010-03-17 18:02:46 +0100966 /* Always catch SIGPIPE even on platforms which define MSG_NOSIGNAL.
967 * Some recent FreeBSD setups report broken pipes, and MSG_NOSIGNAL
968 * was defined there, so let's stay on the safe side.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200969 */
Willy Tarreau24f4efa2010-08-27 17:56:48 +0200970 signal_register_fct(SIGPIPE, NULL, 0);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200971
Willy Tarreaudc23a922011-02-16 11:10:36 +0100972 /* ulimits */
973 if (!global.rlimit_nofile)
974 global.rlimit_nofile = global.maxsock;
975
976 if (global.rlimit_nofile) {
977 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
978 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
979 Warning("[%s.main()] Cannot raise FD limit to %d.\n", argv[0], global.rlimit_nofile);
980 }
981 }
982
983 if (global.rlimit_memmax) {
984 limit.rlim_cur = limit.rlim_max =
985 global.rlimit_memmax * 1048576 / global.nbproc;
986#ifdef RLIMIT_AS
987 if (setrlimit(RLIMIT_AS, &limit) == -1) {
988 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
989 argv[0], global.rlimit_memmax);
990 }
991#else
992 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
993 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
994 argv[0], global.rlimit_memmax);
995 }
996#endif
997 }
998
Willy Tarreaubaaee002006-06-26 02:48:02 +0200999 /* We will loop at most 100 times with 10 ms delay each time.
1000 * That's at most 1 second. We only send a signal to old pids
1001 * if we cannot grab at least one port.
1002 */
1003 retry = MAX_START_RETRIES;
1004 err = ERR_NONE;
1005 while (retry >= 0) {
1006 struct timeval w;
1007 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +01001008 /* exit the loop on no error or fatal error */
1009 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001010 break;
Willy Tarreaubb545b42010-08-25 12:58:59 +02001011 if (nb_oldpids == 0 || retry == 0)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001012 break;
1013
1014 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
1015 * listening sockets. So on those platforms, it would be wiser to
1016 * simply send SIGUSR1, which will not be undoable.
1017 */
Willy Tarreaubb545b42010-08-25 12:58:59 +02001018 if (tell_old_pids(SIGTTOU) == 0) {
1019 /* no need to wait if we can't contact old pids */
1020 retry = 0;
1021 continue;
1022 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001023 /* give some time to old processes to stop listening */
1024 w.tv_sec = 0;
1025 w.tv_usec = 10*1000;
1026 select(0, NULL, NULL, NULL, &w);
1027 retry--;
1028 }
1029
1030 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001031 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +02001032 if (retry != MAX_START_RETRIES && nb_oldpids) {
1033 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001034 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +02001035 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001036 exit(1);
1037 }
1038
1039 if (listeners == 0) {
1040 Alert("[%s.main()] No enabled listener found (check the <listen> keywords) ! Exiting.\n", argv[0]);
1041 /* Note: we don't have to send anything to the old pids because we
1042 * never stopped them. */
1043 exit(1);
1044 }
1045
Emeric Bruncf20bf12010-10-22 16:06:11 +02001046 err = protocol_bind_all(errmsg, sizeof(errmsg));
1047 if ((err & ~ERR_WARN) != ERR_NONE) {
1048 if ((err & ERR_ALERT) || (err & ERR_WARN))
1049 Alert("[%s.main()] %s.\n", argv[0], errmsg);
1050
Willy Tarreaudd815982007-10-16 12:25:14 +02001051 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1052 protocol_unbind_all(); /* cleanup everything we can */
1053 if (nb_oldpids)
1054 tell_old_pids(SIGTTIN);
1055 exit(1);
Emeric Bruncf20bf12010-10-22 16:06:11 +02001056 } else if (err & ERR_WARN) {
1057 Alert("[%s.main()] %s.\n", argv[0], errmsg);
Willy Tarreaudd815982007-10-16 12:25:14 +02001058 }
1059
Willy Tarreaubaaee002006-06-26 02:48:02 +02001060 /* prepare pause/play signals */
Willy Tarreau24f4efa2010-08-27 17:56:48 +02001061 signal_register_fct(SIGTTOU, sig_pause, SIGTTOU);
1062 signal_register_fct(SIGTTIN, sig_listen, SIGTTIN);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001063
Willy Tarreaubaaee002006-06-26 02:48:02 +02001064 /* MODE_QUIET can inhibit alerts and warnings below this line */
1065
1066 global.mode &= ~MODE_STARTING;
1067 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1068 /* detach from the tty */
1069 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001070 }
1071
1072 /* open log & pid files before the chroot */
1073 if (global.mode & MODE_DAEMON && global.pidfile != NULL) {
1074 int pidfd;
1075 unlink(global.pidfile);
1076 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1077 if (pidfd < 0) {
1078 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1079 if (nb_oldpids)
1080 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001081 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001082 exit(1);
1083 }
1084 pidfile = fdopen(pidfd, "w");
1085 }
1086
Willy Tarreaub38651a2007-03-24 17:24:39 +01001087#ifdef CONFIG_HAP_CTTPROXY
1088 if (global.last_checks & LSTCHK_CTTPROXY) {
1089 int ret;
1090
1091 ret = check_cttproxy_version();
1092 if (ret < 0) {
1093 Alert("[%s.main()] Cannot enable cttproxy.\n%s",
1094 argv[0],
1095 (ret == -1) ? " Incorrect module version.\n"
1096 : " Make sure you have enough permissions and that the module is loaded.\n");
Willy Tarreaudd815982007-10-16 12:25:14 +02001097 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001098 exit(1);
1099 }
1100 }
1101#endif
1102
1103 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1104 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001105 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001106 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001107 exit(1);
1108 }
1109
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001110 /* If the user is not root, we'll still let him try the configuration
1111 * but we inform him that unexpected behaviour may occur.
1112 */
1113 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1114 Warning("[%s.main()] Some options which require full privileges"
1115 " might not work well.\n"
1116 "", argv[0]);
1117
Willy Tarreauf223cc02007-10-15 18:57:08 +02001118 /* chroot if needed */
1119 if (global.chroot != NULL) {
1120 if (chroot(global.chroot) == -1) {
1121 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1122 if (nb_oldpids)
1123 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001124 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001125 exit(1);
1126 }
1127 chdir("/");
1128 }
1129
Willy Tarreaubaaee002006-06-26 02:48:02 +02001130 if (nb_oldpids)
Willy Tarreaubb545b42010-08-25 12:58:59 +02001131 nb_oldpids = tell_old_pids(oldpids_sig);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001132
1133 /* Note that any error at this stage will be fatal because we will not
1134 * be able to restart the old pids.
1135 */
1136
1137 /* setgid / setuid */
1138 if (global.gid && setgid(global.gid) == -1) {
1139 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001140 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001141 exit(1);
1142 }
1143
1144 if (global.uid && setuid(global.uid) == -1) {
1145 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001146 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001147 exit(1);
1148 }
1149
1150 /* check ulimits */
1151 limit.rlim_cur = limit.rlim_max = 0;
1152 getrlimit(RLIMIT_NOFILE, &limit);
1153 if (limit.rlim_cur < global.maxsock) {
1154 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 +02001155 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001156 }
1157
1158 if (global.mode & MODE_DAEMON) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001159 struct proxy *px;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001160 int ret = 0;
1161 int proc;
1162
1163 /* the father launches the required number of processes */
1164 for (proc = 0; proc < global.nbproc; proc++) {
1165 ret = fork();
1166 if (ret < 0) {
1167 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001168 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02001169 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001170 }
1171 else if (ret == 0) /* child breaks here */
1172 break;
1173 if (pidfile != NULL) {
1174 fprintf(pidfile, "%d\n", ret);
1175 fflush(pidfile);
1176 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01001177 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001178 }
1179 /* close the pidfile both in children and father */
1180 if (pidfile != NULL)
1181 fclose(pidfile);
Willy Tarreaud137dd32010-08-25 12:49:05 +02001182
1183 /* We won't ever use this anymore */
1184 free(oldpids); oldpids = NULL;
1185 free(global.chroot); global.chroot = NULL;
1186 free(global.pidfile); global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001187
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001188 /* we might have to unbind some proxies from some processes */
1189 px = proxy;
1190 while (px != NULL) {
1191 if (px->bind_proc && px->state != PR_STSTOPPED) {
1192 if (!(px->bind_proc & (1 << proc)))
1193 stop_proxy(px);
1194 }
1195 px = px->next;
1196 }
1197
Willy Tarreaubaaee002006-06-26 02:48:02 +02001198 if (proc == global.nbproc)
1199 exit(0); /* parent must leave */
1200
1201 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
1202 * that we can detach from the TTY. We MUST NOT do it in other cases since
1203 * it would have already be done, and 0-2 would have been affected to listening
1204 * sockets
1205 */
Willy Tarreau106cb762008-11-16 07:40:34 +01001206 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001207 /* detach from the tty */
1208 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01001209 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001210 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
1211 }
1212 pid = getpid(); /* update child's pid */
1213 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02001214 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001215 }
1216
Willy Tarreaudd815982007-10-16 12:25:14 +02001217 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001218 /*
1219 * That's it : the central polling loop. Run until we stop.
1220 */
1221 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001222
1223 /* Free all Hash Keys and all Hash elements */
1224 appsession_cleanup();
1225 /* Do some cleanup */
1226 deinit();
1227
1228 exit(0);
1229}
1230
1231
1232/*
1233 * Local variables:
1234 * c-indent-level: 8
1235 * c-basic-offset: 8
1236 * End:
1237 */