blob: c5558ca40da217687e57cb410f6de9c06cfabc47 [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * HA-Proxy : High Availability-enabled HTTP/TCP proxy
Willy Tarreaub4556912009-07-23 13:45:47 +02003 * Copyright 2000-2009 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 *
26 * TODO:
27 * - handle properly intermediate incomplete server headers. Done ?
28 * - handle hot-reconfiguration
29 * - fix client/server state transition when server is in connect or headers state
30 * and client suddenly disconnects. The server *should* switch to SHUT_WR, but
31 * still handle HTTP headers.
32 * - remove MAX_NEWHDR
33 * - cut this huge file into several ones
34 *
35 */
36
37#include <stdio.h>
38#include <stdlib.h>
39#include <unistd.h>
40#include <string.h>
41#include <ctype.h>
42#include <sys/time.h>
43#include <sys/types.h>
44#include <sys/socket.h>
45#include <netinet/tcp.h>
46#include <netinet/in.h>
47#include <arpa/inet.h>
48#include <netdb.h>
49#include <fcntl.h>
50#include <errno.h>
51#include <signal.h>
52#include <stdarg.h>
53#include <sys/resource.h>
54#include <time.h>
55#include <syslog.h>
56
57#ifdef DEBUG_FULL
58#include <assert.h>
59#endif
60
Willy Tarreau2dd0d472006-06-29 17:53:05 +020061#include <common/appsession.h>
62#include <common/base64.h>
63#include <common/cfgparse.h>
64#include <common/compat.h>
65#include <common/config.h>
66#include <common/defaults.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010067#include <common/errors.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020068#include <common/memory.h>
69#include <common/mini-clist.h>
70#include <common/regex.h>
71#include <common/standard.h>
72#include <common/time.h>
73#include <common/uri_auth.h>
74#include <common/version.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020075
76#include <types/capture.h>
77#include <types/global.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020078
Willy Tarreau0fc45a72007-06-17 00:36:03 +020079#include <proto/acl.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020080#include <proto/backend.h>
81#include <proto/buffers.h>
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +020082#include <proto/checks.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020083#include <proto/client.h>
84#include <proto/fd.h>
85#include <proto/log.h>
Willy Tarreaudd815982007-10-16 12:25:14 +020086#include <proto/protocols.h>
Willy Tarreau80587432006-12-24 17:47:20 +010087#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020088#include <proto/proxy.h>
89#include <proto/queue.h>
90#include <proto/server.h>
Willy Tarreauc6ca1a02007-05-13 19:43:47 +020091#include <proto/session.h>
Willy Tarreau29857942009-05-10 09:01:21 +020092#include <proto/signal.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020093#include <proto/stream_sock.h>
94#include <proto/task.h>
95
Willy Tarreaub38651a2007-03-24 17:24:39 +010096#ifdef CONFIG_HAP_CTTPROXY
97#include <proto/cttproxy.h>
98#endif
99
Willy Tarreaubaaee002006-06-26 02:48:02 +0200100/*********************************************************************/
101
102/*********************************************************************/
103
Willy Tarreau5d01a632009-06-22 16:02:30 +0200104static int cfg_nbcfgfiles; /* number of config files */
105static char *cfg_cfgfile[10]; /* configuration files, stop at NULL */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200106char *progname = NULL; /* program name */
107int pid; /* current process id */
Willy Tarreau28156642007-11-26 16:13:36 +0100108int relative_pid = 1; /* process id starting at 1 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200109
110/* global options */
111struct global global = {
112 logfac1 : -1,
113 logfac2 : -1,
114 loglev1 : 7, /* max syslog level : debug */
115 loglev2 : 7,
Willy Tarreau03f6d672007-10-18 15:15:57 +0200116 .stats_sock = {
Willy Tarreau03f6d672007-10-18 15:15:57 +0200117 .maxconn = 10, /* 10 concurrent stats connections */
118 .perm = {
119 .ux = {
120 .uid = -1,
121 .gid = -1,
122 .mode = 0,
123 }
124 }
Willy Tarreau27a674e2009-08-17 07:23:33 +0200125 },
126 .tune = {
127 .bufsize = BUFSIZE,
128 .maxrewrite = MAXREWRITE,
129 },
Willy Tarreaubaaee002006-06-26 02:48:02 +0200130 /* others NULL OK */
131};
132
133/*********************************************************************/
134
135int stopping; /* non zero means stopping in progress */
136
137/* Here we store informations about the pids of the processes we may pause
138 * or kill. We will send them a signal every 10 ms until we can bind to all
139 * our ports. With 200 retries, that's about 2 seconds.
140 */
141#define MAX_START_RETRIES 200
142static int nb_oldpids = 0;
143static int *oldpids = NULL;
144static int oldpids_sig; /* use USR1 or TERM */
145
146/* this is used to drain data, and as a temporary buffer for sprintf()... */
147char trash[BUFSIZE];
148
149const int zero = 0;
150const int one = 1;
Alexandre Cassen87ea5482007-10-11 20:48:58 +0200151const struct linger nolinger = { .l_onoff = 1, .l_linger = 0 };
Willy Tarreaubaaee002006-06-26 02:48:02 +0200152
Willy Tarreau3ad6a762009-08-16 10:08:02 +0200153char hostname[MAX_HOSTNAME_LEN] = "";
Willy Tarreaubaaee002006-06-26 02:48:02 +0200154
155
156/*********************************************************************/
157/* general purpose functions ***************************************/
158/*********************************************************************/
159
160void display_version()
161{
162 printf("HA-Proxy version " HAPROXY_VERSION " " HAPROXY_DATE"\n");
Willy Tarreaub4556912009-07-23 13:45:47 +0200163 printf("Copyright 2000-2009 Willy Tarreau <w@1wt.eu>\n\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200164}
165
Willy Tarreau7b066db2007-12-02 11:28:59 +0100166void display_build_opts()
167{
168 printf("Build options :"
169#ifdef BUILD_TARGET
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100170 "\n TARGET = " BUILD_TARGET
Willy Tarreau7b066db2007-12-02 11:28:59 +0100171#endif
172#ifdef BUILD_CPU
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100173 "\n CPU = " BUILD_CPU
Willy Tarreau7b066db2007-12-02 11:28:59 +0100174#endif
175#ifdef BUILD_CC
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100176 "\n CC = " BUILD_CC
177#endif
178#ifdef BUILD_CFLAGS
179 "\n CFLAGS = " BUILD_CFLAGS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100180#endif
Willy Tarreau9f2b7302008-01-02 20:48:34 +0100181#ifdef BUILD_OPTIONS
182 "\n OPTIONS = " BUILD_OPTIONS
Willy Tarreau7b066db2007-12-02 11:28:59 +0100183#endif
Willy Tarreau27a674e2009-08-17 07:23:33 +0200184 "\n\nDefault settings :"
185 "\n maxconn = %d, bufsize = %d, maxrewrite = %d, maxpollevents = %d"
186 "\n\n",
187 DEFAULT_MAXCONN, BUFSIZE, MAXREWRITE, MAX_POLL_EVENTS);
Willy Tarreaube5b6852009-10-03 18:57:08 +0200188
189 list_pollers(stdout);
190 putchar('\n');
Willy Tarreau7b066db2007-12-02 11:28:59 +0100191}
192
Willy Tarreaubaaee002006-06-26 02:48:02 +0200193/*
194 * This function prints the command line usage and exits
195 */
196void usage(char *name)
197{
198 display_version();
199 fprintf(stderr,
Willy Tarreau5d01a632009-06-22 16:02:30 +0200200 "Usage : %s [-f <cfgfile>]* [ -vdV"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200201 "D ] [ -n <maxconn> ] [ -N <maxpconn> ]\n"
202 " [ -p <pidfile> ] [ -m <max megs> ]\n"
Willy Tarreau7b066db2007-12-02 11:28:59 +0100203 " -v displays version ; -vv shows known build options.\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200204 " -d enters debug mode ; -db only disables background mode.\n"
205 " -V enters verbose mode (disables quiet mode)\n"
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200206 " -D goes daemon\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200207 " -q quiet mode : don't display messages\n"
Willy Tarreau5d01a632009-06-22 16:02:30 +0200208 " -c check mode : only check config files and exit\n"
Willy Tarreaubaaee002006-06-26 02:48:02 +0200209 " -n sets the maximum total # of connections (%d)\n"
210 " -m limits the usable amount of memory (in MB)\n"
211 " -N sets the default, per-proxy maximum # of connections (%d)\n"
212 " -p writes pids of all children to this file\n"
213#if defined(ENABLE_EPOLL)
214 " -de disables epoll() usage even when available\n"
215#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200216#if defined(ENABLE_SEPOLL)
217 " -ds disables speculative epoll() usage even when available\n"
218#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200219#if defined(ENABLE_KQUEUE)
220 " -dk disables kqueue() usage even when available\n"
221#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200222#if defined(ENABLE_POLL)
223 " -dp disables poll() usage even when available\n"
224#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200225#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100226 " -dS disables splice usage (broken on old kernels)\n"
227#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200228 " -sf/-st [pid ]* finishes/terminates old pids. Must be last arguments.\n"
229 "\n",
230 name, DEFAULT_MAXCONN, cfg_maxpconn);
231 exit(1);
232}
233
234
235
236/*********************************************************************/
237/* more specific functions ***************************************/
238/*********************************************************************/
239
240/*
241 * upon SIGUSR1, let's have a soft stop.
242 */
243void sig_soft_stop(int sig)
244{
245 soft_stop();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200246 pool_gc2();
Willy Tarreau01b3a532009-05-10 09:59:50 +0200247 signal_register(sig, SIG_IGN);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200248}
249
250/*
251 * upon SIGTTOU, we pause everything
252 */
253void sig_pause(int sig)
254{
255 pause_proxies();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200256 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200257}
258
259/*
260 * upon SIGTTIN, let's have a soft stop.
261 */
262void sig_listen(int sig)
263{
264 listen_proxies();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200265}
266
267/*
268 * this function dumps every server's state when the process receives SIGHUP.
269 */
270void sig_dump_state(int sig)
271{
272 struct proxy *p = proxy;
273
274 Warning("SIGHUP received, dumping servers states.\n");
275 while (p) {
276 struct server *s = p->srv;
277
278 send_log(p, LOG_NOTICE, "SIGHUP received, dumping servers states for proxy %s.\n", p->id);
279 while (s) {
280 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200281 "SIGHUP: Server %s/%s is %s. Conn: %d act, %d pend, %lld tot.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200282 p->id, s->id,
283 (s->state & SRV_RUNNING) ? "UP" : "DOWN",
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200284 s->cur_sess, s->nbpend, s->counters.cum_sess);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200285 Warning("%s\n", trash);
286 send_log(p, LOG_NOTICE, "%s\n", trash);
287 s = s->next;
288 }
289
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200290 /* FIXME: those info are a bit outdated. We should be able to distinguish between FE and BE. */
291 if (!p->srv) {
292 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200293 "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 +0200294 p->id,
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200295 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreau5fcc8f12007-09-17 11:27:09 +0200296 } else if (p->srv_act == 0) {
Willy Tarreaubaaee002006-06-26 02:48:02 +0200297 snprintf(trash, sizeof(trash),
Willy Tarreau3b88d442009-04-11 20:44:08 +0200298 "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 +0200299 p->id,
300 (p->srv_bck) ? "is running on backup servers" : "has no server available",
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200301 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200302 } else {
303 snprintf(trash, sizeof(trash),
304 "SIGHUP: Proxy %s has %d active servers and %d backup servers available."
Willy Tarreau3b88d442009-04-11 20:44:08 +0200305 " Conn: act(FE+BE): %d+%d, %d pend (%d unass), tot(FE+BE): %lld+%lld.",
Willy Tarreaubaaee002006-06-26 02:48:02 +0200306 p->id, p->srv_act, p->srv_bck,
Krzysztof Piotr Oledzki052d4fd2009-10-04 14:52:57 +0200307 p->feconn, p->beconn, p->totpend, p->nbpend, p->counters.cum_feconn, p->counters.cum_beconn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200308 }
309 Warning("%s\n", trash);
310 send_log(p, LOG_NOTICE, "%s\n", trash);
311
312 p = p->next;
313 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200314}
315
316void dump(int sig)
317{
Willy Tarreau96bcfd72007-04-29 10:41:56 +0200318#if 0
Willy Tarreau964c9362007-01-07 00:38:00 +0100319 struct task *t;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200320 struct session *s;
Willy Tarreau964c9362007-01-07 00:38:00 +0100321 struct rb_node *node;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200322
Willy Tarreau964c9362007-01-07 00:38:00 +0100323 for(node = rb_first(&wait_queue[0]);
324 node != NULL; node = rb_next(node)) {
325 t = rb_entry(node, struct task, rb_node);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200326 s = t->context;
327 qfprintf(stderr,"[dump] wq: task %p, still %ld ms, "
Willy Tarreau7e5067d2008-12-07 16:27:56 +0100328 "cli=%d, srv=%d, req=%d, rep=%d\n",
Willy Tarreau42aae5c2007-04-29 17:43:56 +0200329 s, tv_ms_remain(&now, &t->expire),
Willy Tarreau7e5067d2008-12-07 16:27:56 +0100330 s->si[0].state,
331 s->si[1].state,
332 s->req->l, s->rep?s->rep->l:0);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200333 }
Willy Tarreau96bcfd72007-04-29 10:41:56 +0200334#endif
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200335 /* dump memory usage then free everything possible */
336 dump_pools();
337 pool_gc2();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200338}
339
340#ifdef DEBUG_MEMORY
341static void fast_stop(void)
342{
343 struct proxy *p;
344 p = proxy;
345 while (p) {
346 p->grace = 0;
347 p = p->next;
348 }
349 soft_stop();
350}
351
352void sig_int(int sig)
353{
354 /* This would normally be a hard stop,
355 but we want to be sure about deallocation,
356 and so on, so we do a soft stop with
357 0 GRACE time
358 */
359 fast_stop();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200360 pool_gc2();
Willy Tarreau01b3a532009-05-10 09:59:50 +0200361 /* If we are killed twice, we decide to die */
362 signal_register(sig, SIG_DFL);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200363}
364
365void sig_term(int sig)
366{
367 /* This would normally be a hard stop,
368 but we want to be sure about deallocation,
369 and so on, so we do a soft stop with
370 0 GRACE time
371 */
372 fast_stop();
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200373 pool_gc2();
Willy Tarreau01b3a532009-05-10 09:59:50 +0200374 /* If we are killed twice, we decide to die */
375 signal_register(sig, SIG_DFL);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200376}
377#endif
378
379
380/*
381 * This function initializes all the necessary variables. It only returns
382 * if everything is OK. If something fails, it exits.
383 */
384void init(int argc, char **argv)
385{
386 int i;
387 int arg_mode = 0; /* MODE_DEBUG, ... */
388 char *old_argv = *argv;
389 char *tmp;
390 char *cfg_pidfile = NULL;
Willy Tarreau058e9072009-07-20 09:30:05 +0200391 int err_code = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200392
Willy Tarreaubaaee002006-06-26 02:48:02 +0200393 /*
394 * Initialize the previously static variables.
395 */
396
Willy Tarreau3eba98a2009-01-25 13:56:13 +0100397 totalconn = actconn = maxfd = listeners = stopping = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200398
399
400#ifdef HAPROXY_MEMMAX
401 global.rlimit_memmax = HAPROXY_MEMMAX;
402#endif
403
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200404 tv_update_date(-1,-1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200405 start_date = now;
406
Willy Tarreau29857942009-05-10 09:01:21 +0200407 signal_init();
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200408 init_task();
409 init_session();
Willy Tarreau8280d642009-09-23 23:37:52 +0200410 /* warning, we init buffers later */
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200411 init_pendconn();
Willy Tarreau80587432006-12-24 17:47:20 +0100412 init_proto_http();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200413
Willy Tarreau43b78992009-01-25 15:42:27 +0100414 global.tune.options |= GTUNE_USE_SELECT; /* select() is always available */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200415#if defined(ENABLE_POLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100416 global.tune.options |= GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200417#endif
418#if defined(ENABLE_EPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100419 global.tune.options |= GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200420#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200421#if defined(ENABLE_SEPOLL)
Willy Tarreau43b78992009-01-25 15:42:27 +0100422 global.tune.options |= GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200423#endif
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200424#if defined(ENABLE_KQUEUE)
Willy Tarreau43b78992009-01-25 15:42:27 +0100425 global.tune.options |= GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200426#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200427#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100428 global.tune.options |= GTUNE_USE_SPLICE;
429#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200430
431 pid = getpid();
432 progname = *argv;
433 while ((tmp = strchr(progname, '/')) != NULL)
434 progname = tmp + 1;
435
436 argc--; argv++;
437 while (argc > 0) {
438 char *flag;
439
440 if (**argv == '-') {
441 flag = *argv+1;
442
443 /* 1 arg */
444 if (*flag == 'v') {
445 display_version();
Willy Tarreau7b066db2007-12-02 11:28:59 +0100446 if (flag[1] == 'v') /* -vv */
447 display_build_opts();
Willy Tarreaubaaee002006-06-26 02:48:02 +0200448 exit(0);
449 }
450#if defined(ENABLE_EPOLL)
451 else if (*flag == 'd' && flag[1] == 'e')
Willy Tarreau43b78992009-01-25 15:42:27 +0100452 global.tune.options &= ~GTUNE_USE_EPOLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200453#endif
Willy Tarreaude99e992007-04-16 00:53:59 +0200454#if defined(ENABLE_SEPOLL)
455 else if (*flag == 'd' && flag[1] == 's')
Willy Tarreau43b78992009-01-25 15:42:27 +0100456 global.tune.options &= ~GTUNE_USE_SEPOLL;
Willy Tarreaude99e992007-04-16 00:53:59 +0200457#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200458#if defined(ENABLE_POLL)
459 else if (*flag == 'd' && flag[1] == 'p')
Willy Tarreau43b78992009-01-25 15:42:27 +0100460 global.tune.options &= ~GTUNE_USE_POLL;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200461#endif
Willy Tarreau69cad1a2007-04-10 22:45:11 +0200462#if defined(ENABLE_KQUEUE)
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200463 else if (*flag == 'd' && flag[1] == 'k')
Willy Tarreau43b78992009-01-25 15:42:27 +0100464 global.tune.options &= ~GTUNE_USE_KQUEUE;
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200465#endif
Willy Tarreaub55932d2009-08-16 13:20:32 +0200466#if defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreau3ab68cf2009-01-25 16:03:28 +0100467 else if (*flag == 'd' && flag[1] == 'S')
468 global.tune.options &= ~GTUNE_USE_SPLICE;
469#endif
Willy Tarreaubaaee002006-06-26 02:48:02 +0200470 else if (*flag == 'V')
471 arg_mode |= MODE_VERBOSE;
472 else if (*flag == 'd' && flag[1] == 'b')
473 arg_mode |= MODE_FOREGROUND;
474 else if (*flag == 'd')
475 arg_mode |= MODE_DEBUG;
476 else if (*flag == 'c')
477 arg_mode |= MODE_CHECK;
478 else if (*flag == 'D')
Willy Tarreau6bde87b2009-05-18 16:29:51 +0200479 arg_mode |= MODE_DAEMON;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200480 else if (*flag == 'q')
481 arg_mode |= MODE_QUIET;
482 else if (*flag == 's' && (flag[1] == 'f' || flag[1] == 't')) {
483 /* list of pids to finish ('f') or terminate ('t') */
484
485 if (flag[1] == 'f')
486 oldpids_sig = SIGUSR1; /* finish then exit */
487 else
488 oldpids_sig = SIGTERM; /* terminate immediately */
489 argv++; argc--;
490
491 if (argc > 0) {
492 oldpids = calloc(argc, sizeof(int));
493 while (argc > 0) {
494 oldpids[nb_oldpids] = atol(*argv);
495 if (oldpids[nb_oldpids] <= 0)
496 usage(old_argv);
497 argc--; argv++;
498 nb_oldpids++;
499 }
500 }
501 }
502 else { /* >=2 args */
503 argv++; argc--;
504 if (argc == 0)
505 usage(old_argv);
506
507 switch (*flag) {
508 case 'n' : cfg_maxconn = atol(*argv); break;
509 case 'm' : global.rlimit_memmax = atol(*argv); break;
510 case 'N' : cfg_maxpconn = atol(*argv); break;
Willy Tarreau5d01a632009-06-22 16:02:30 +0200511 case 'f' :
512 if (cfg_nbcfgfiles > MAX_CFG_FILES) {
513 Alert("Cannot load configuration file %s : too many configuration files (max %d).\n",
514 *argv, MAX_CFG_FILES);
515 exit(1);
516 }
517 cfg_cfgfile[cfg_nbcfgfiles++] = *argv;
518 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200519 case 'p' : cfg_pidfile = *argv; break;
520 default: usage(old_argv);
521 }
522 }
523 }
524 else
525 usage(old_argv);
526 argv++; argc--;
527 }
528
529 global.mode = MODE_STARTING | /* during startup, we want most of the alerts */
530 (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_VERBOSE
531 | MODE_QUIET | MODE_CHECK | MODE_DEBUG));
532
Willy Tarreau5d01a632009-06-22 16:02:30 +0200533 if (!cfg_nbcfgfiles)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200534 usage(old_argv);
535
536 gethostname(hostname, MAX_HOSTNAME_LEN);
537
538 have_appsession = 0;
539 global.maxsock = 10; /* reserve 10 fds ; will be incremented by socket eaters */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200540
541 init_default_instance();
542
Willy Tarreau5d01a632009-06-22 16:02:30 +0200543 for (i = 0; i < cfg_nbcfgfiles; i++) {
Willy Tarreauc4382422009-12-06 13:10:44 +0100544 int ret;
545
546 ret = readcfgfile(cfg_cfgfile[i]);
547 if (ret == -1) {
548 Alert("Could not open configuration file %s : %s\n",
549 cfg_cfgfile[i], strerror(errno));
550 exit(1);
551 }
552 err_code |= ret;
Willy Tarreau058e9072009-07-20 09:30:05 +0200553 if (err_code & (ERR_ABORT|ERR_FATAL))
554 Alert("Error(s) found in configuration file : %s\n", cfg_cfgfile[i]);
555 if (err_code & ERR_ABORT)
Willy Tarreau5d01a632009-06-22 16:02:30 +0200556 exit(1);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200557 }
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200558
Willy Tarreaubb925012009-07-23 13:36:36 +0200559 err_code |= check_config_validity();
560 if (err_code & (ERR_ABORT|ERR_FATAL)) {
561 Alert("Fatal errors found in configuration.\n");
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200562 exit(1);
563 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200564
565 if (global.mode & MODE_CHECK) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200566 qfprintf(stdout, "Configuration file is valid\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +0200567 exit(0);
568 }
569
Willy Tarreau8280d642009-09-23 23:37:52 +0200570 /* now we know the buffer size, we can initialize the buffers */
571 init_buffer();
572
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200573 if (have_appsession)
574 appsession_init();
575
Krzysztof Oledzkib304dc72007-10-14 23:40:01 +0200576 if (start_checks() < 0)
577 exit(1);
578
Willy Tarreaubaaee002006-06-26 02:48:02 +0200579 if (cfg_maxconn > 0)
580 global.maxconn = cfg_maxconn;
581
582 if (cfg_pidfile) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200583 free(global.pidfile);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200584 global.pidfile = strdup(cfg_pidfile);
585 }
586
587 if (global.maxconn == 0)
588 global.maxconn = DEFAULT_MAXCONN;
589
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100590 if (!global.maxpipes) {
591 /* maxpipes not specified. Count how many frontends and backends
592 * may be using splicing, and bound that to maxconn.
593 */
594 struct proxy *cur;
595 int nbfe = 0, nbbe = 0;
596
597 for (cur = proxy; cur; cur = cur->next) {
598 if (cur->options2 & (PR_O2_SPLIC_ANY)) {
599 if (cur->cap & PR_CAP_FE)
600 nbfe += cur->maxconn;
601 if (cur->cap & PR_CAP_BE)
Willy Tarreauafb48762009-01-25 10:42:05 +0100602 nbbe += cur->fullconn ? cur->fullconn : global.maxconn;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100603 }
604 }
605 global.maxpipes = MAX(nbfe, nbbe);
606 if (global.maxpipes > global.maxconn)
607 global.maxpipes = global.maxconn;
Willy Tarreau686ac822009-01-25 14:06:58 +0100608 global.maxpipes /= 4;
Willy Tarreau66aa61f2009-01-18 21:44:07 +0100609 }
610
611
Willy Tarreaubaaee002006-06-26 02:48:02 +0200612 global.maxsock += global.maxconn * 2; /* each connection needs two sockets */
Willy Tarreau3ec79b92009-01-18 20:39:42 +0100613 global.maxsock += global.maxpipes * 2; /* each pipe needs two FDs */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200614
Willy Tarreau1db37712007-06-03 17:16:49 +0200615 if (global.tune.maxpollevents <= 0)
616 global.tune.maxpollevents = MAX_POLL_EVENTS;
617
Willy Tarreauf49d1df2009-03-01 08:35:41 +0100618 if (global.tune.maxaccept == 0) {
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100619 if (global.nbproc > 1)
620 global.tune.maxaccept = 8; /* leave some conns to other processes */
621 else
Willy Tarreauf49d1df2009-03-01 08:35:41 +0100622 global.tune.maxaccept = 100; /* accept many incoming conns at once */
Willy Tarreaua0250ba2008-01-06 11:22:57 +0100623 }
624
Willy Tarreau6f4a82c2009-03-21 20:43:57 +0100625 if (global.tune.recv_enough == 0)
626 global.tune.recv_enough = MIN_RECV_AT_ONCE_ENOUGH;
627
Willy Tarreau27a674e2009-08-17 07:23:33 +0200628 if (global.tune.maxrewrite >= global.tune.bufsize / 2)
629 global.tune.maxrewrite = global.tune.bufsize / 2;
630
Willy Tarreaubaaee002006-06-26 02:48:02 +0200631 if (arg_mode & (MODE_DEBUG | MODE_FOREGROUND)) {
632 /* command line debug mode inhibits configuration mode */
633 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
634 }
635 global.mode |= (arg_mode & (MODE_DAEMON | MODE_FOREGROUND | MODE_QUIET |
Willy Tarreaufbee7132007-10-18 13:53:22 +0200636 MODE_VERBOSE | MODE_DEBUG ));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200637
638 if ((global.mode & MODE_DEBUG) && (global.mode & (MODE_DAEMON | MODE_QUIET))) {
639 Warning("<debug> mode incompatible with <quiet> and <daemon>. Keeping <debug> only.\n");
640 global.mode &= ~(MODE_DAEMON | MODE_QUIET);
641 }
642
643 if ((global.nbproc > 1) && !(global.mode & MODE_DAEMON)) {
644 if (!(global.mode & (MODE_FOREGROUND | MODE_DEBUG)))
645 Warning("<nbproc> is only meaningful in daemon mode. Setting limit to 1 process.\n");
646 global.nbproc = 1;
647 }
648
649 if (global.nbproc < 1)
650 global.nbproc = 1;
651
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200652 fdinfo = (struct fdinfo *)calloc(1,
653 sizeof(struct fdinfo) * (global.maxsock));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200654 fdtab = (struct fdtab *)calloc(1,
655 sizeof(struct fdtab) * (global.maxsock));
656 for (i = 0; i < global.maxsock; i++) {
657 fdtab[i].state = FD_STCLOSE;
658 }
Willy Tarreau4f60f162007-04-08 16:39:58 +0200659
Willy Tarreauef1d1f82007-04-16 00:25:25 +0200660 /*
661 * Note: we could register external pollers here.
662 * Built-in pollers have been registered before main().
663 */
Willy Tarreau4f60f162007-04-08 16:39:58 +0200664
Willy Tarreau43b78992009-01-25 15:42:27 +0100665 if (!(global.tune.options & GTUNE_USE_KQUEUE))
Willy Tarreau1e63130a2007-04-09 12:03:06 +0200666 disable_poller("kqueue");
667
Willy Tarreau43b78992009-01-25 15:42:27 +0100668 if (!(global.tune.options & GTUNE_USE_EPOLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200669 disable_poller("epoll");
670
Willy Tarreau43b78992009-01-25 15:42:27 +0100671 if (!(global.tune.options & GTUNE_USE_SEPOLL))
Willy Tarreaude99e992007-04-16 00:53:59 +0200672 disable_poller("sepoll");
673
Willy Tarreau43b78992009-01-25 15:42:27 +0100674 if (!(global.tune.options & GTUNE_USE_POLL))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200675 disable_poller("poll");
676
Willy Tarreau43b78992009-01-25 15:42:27 +0100677 if (!(global.tune.options & GTUNE_USE_SELECT))
Willy Tarreau4f60f162007-04-08 16:39:58 +0200678 disable_poller("select");
679
680 /* Note: we could disable any poller by name here */
681
Willy Tarreau2ff76222007-04-09 19:29:56 +0200682 if (global.mode & (MODE_VERBOSE|MODE_DEBUG))
683 list_pollers(stderr);
684
Willy Tarreau4f60f162007-04-08 16:39:58 +0200685 if (!init_pollers()) {
Willy Tarreau2ff76222007-04-09 19:29:56 +0200686 Alert("No polling mechanism available.\n");
Willy Tarreau4f60f162007-04-08 16:39:58 +0200687 exit(1);
688 }
Willy Tarreau2ff76222007-04-09 19:29:56 +0200689 if (global.mode & (MODE_VERBOSE|MODE_DEBUG)) {
690 printf("Using %s() as the polling mechanism.\n", cur_poller.name);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200691 }
692
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200693 if (!global.node)
694 global.node = strdup(hostname);
695
Willy Tarreaubaaee002006-06-26 02:48:02 +0200696}
697
698void deinit(void)
699{
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200700 struct proxy *p = proxy, *p0;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200701 struct cap_hdr *h,*h_next;
702 struct server *s,*s_next;
703 struct listener *l,*l_next;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200704 struct acl_cond *cond, *condb;
705 struct hdr_exp *exp, *expb;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200706 struct acl *acl, *aclb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200707 struct switching_rule *rule, *ruleb;
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200708 struct redirect_rule *rdr, *rdrb;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200709 struct uri_auth *uap, *ua = NULL;
710 struct user_auth *user;
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200711 int i;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200712
Willy Tarreaubaaee002006-06-26 02:48:02 +0200713 while (p) {
Willy Tarreaua534fea2008-08-03 12:19:50 +0200714 free(p->id);
715 free(p->check_req);
716 free(p->cookie_name);
717 free(p->cookie_domain);
718 free(p->url_param_name);
719 free(p->capture_name);
720 free(p->monitor_uri);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200721
Willy Tarreaua534fea2008-08-03 12:19:50 +0200722 for (i = 0; i < HTTP_ERR_SIZE; i++)
Krzysztof Piotr Oledzki78abe612009-09-27 13:23:20 +0200723 chunk_destroy(&p->errmsg[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200724
Willy Tarreaua534fea2008-08-03 12:19:50 +0200725 for (i = 0; i < p->nb_reqadd; i++)
726 free(p->req_add[i]);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200727
Willy Tarreaua534fea2008-08-03 12:19:50 +0200728 for (i = 0; i < p->nb_rspadd; i++)
729 free(p->rsp_add[i]);
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200730
731 list_for_each_entry_safe(cond, condb, &p->block_cond, list) {
732 LIST_DEL(&cond->list);
733 prune_acl_cond(cond);
734 free(cond);
735 }
736
Willy Tarreaub80c2302007-11-30 20:51:32 +0100737 list_for_each_entry_safe(cond, condb, &p->mon_fail_cond, list) {
738 LIST_DEL(&cond->list);
739 prune_acl_cond(cond);
740 free(cond);
741 }
742
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200743 for (exp = p->req_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200744 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200745 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200746 free((regex_t *)exp->preg);
747 }
748
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200749 if (exp->replace && exp->action != ACT_SETBE)
750 free((char *)exp->replace);
751 expb = exp;
752 exp = exp->next;
753 free(expb);
754 }
755
756 for (exp = p->rsp_exp; exp != NULL; ) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200757 if (exp->preg) {
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200758 regfree((regex_t *)exp->preg);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200759 free((regex_t *)exp->preg);
760 }
761
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200762 if (exp->replace && exp->action != ACT_SETBE)
763 free((char *)exp->replace);
764 expb = exp;
765 exp = exp->next;
766 free(expb);
767 }
768
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200769 /* build a list of unique uri_auths */
770 if (!ua)
771 ua = p->uri_auth;
772 else {
773 /* check if p->uri_auth is unique */
774 for (uap = ua; uap; uap=uap->next)
775 if (uap == p->uri_auth)
776 break;
777
Willy Tarreauaccc4e12008-06-24 11:14:45 +0200778 if (!uap && p->uri_auth) {
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200779 /* add it, if it is */
780 p->uri_auth->next = ua;
781 ua = p->uri_auth;
782 }
783 }
Willy Tarreau0fc45a72007-06-17 00:36:03 +0200784
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200785 list_for_each_entry_safe(acl, aclb, &p->acl, list) {
786 LIST_DEL(&acl->list);
787 prune_acl(acl);
788 free(acl);
789 }
790
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200791 list_for_each_entry_safe(rule, ruleb, &p->switching_rules, list) {
792 LIST_DEL(&rule->list);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200793 prune_acl_cond(rule->cond);
794 free(rule->cond);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200795 free(rule);
796 }
797
Willy Tarreaub463dfb2008-06-07 23:08:56 +0200798 list_for_each_entry_safe(rdr, rdrb, &p->redirect_rules, list) {
799 LIST_DEL(&rdr->list);
800 prune_acl_cond(rdr->cond);
801 free(rdr->cond);
802 free(rdr->rdr_str);
803 free(rdr);
804 }
805
Willy Tarreaua534fea2008-08-03 12:19:50 +0200806 free(p->appsession_name);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200807
808 h = p->req_cap;
809 while (h) {
810 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200811 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200812 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200813 free(h);
814 h = h_next;
815 }/* end while(h) */
816
817 h = p->rsp_cap;
818 while (h) {
819 h_next = h->next;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200820 free(h->name);
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200821 pool_destroy2(h->pool);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200822 free(h);
823 h = h_next;
824 }/* end while(h) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200825
Willy Tarreaubaaee002006-06-26 02:48:02 +0200826 s = p->srv;
827 while (s) {
828 s_next = s->next;
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200829
830 if (s->check) {
831 task_delete(s->check);
832 task_free(s->check);
833 }
834
Willy Tarreaua534fea2008-08-03 12:19:50 +0200835 free(s->id);
836 free(s->cookie);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200837 free(s);
838 s = s_next;
839 }/* end while(s) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200840
Willy Tarreaubaaee002006-06-26 02:48:02 +0200841 l = p->listen;
842 while (l) {
843 l_next = l->next;
844 free(l);
845 l = l_next;
846 }/* end while(l) */
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200847
Willy Tarreaucf7f3202007-05-13 22:46:04 +0200848 pool_destroy2(p->req_cap_pool);
849 pool_destroy2(p->rsp_cap_pool);
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200850 pool_destroy2(p->hdr_idx_pool);
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200851 p0 = p;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200852 p = p->next;
Willy Tarreau4d2d0982007-05-14 00:39:29 +0200853 free(p0);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200854 }/* end while(p) */
Willy Tarreaudd815982007-10-16 12:25:14 +0200855
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200856 while (ua) {
857 uap = ua;
858 ua = ua->next;
859
Willy Tarreaua534fea2008-08-03 12:19:50 +0200860 free(uap->uri_prefix);
861 free(uap->auth_realm);
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200862 free(uap->node);
863 free(uap->desc);
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200864
865 while (uap->users) {
866 user = uap->users;
867 uap->users = uap->users->next;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200868 free(user->user_pwd);
869 free(user);
870 }
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200871 free(uap);
872 }
873
Willy Tarreaudd815982007-10-16 12:25:14 +0200874 protocol_unbind_all();
875
Willy Tarreaua534fea2008-08-03 12:19:50 +0200876 free(global.chroot); global.chroot = NULL;
877 free(global.pidfile); global.pidfile = NULL;
Krzysztof Piotr Oledzki48cb2ae2009-10-02 22:51:14 +0200878 free(global.node); global.node = NULL;
879 free(global.desc); global.desc = NULL;
Willy Tarreaua534fea2008-08-03 12:19:50 +0200880 free(fdtab); fdtab = NULL;
881 free(oldpids); oldpids = NULL;
Krzysztof Piotr Oledzki8001d612008-05-31 13:53:23 +0200882
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200883 pool_destroy2(pool2_session);
Willy Tarreau7341d942007-05-13 19:56:02 +0200884 pool_destroy2(pool2_buffer);
Willy Tarreau332f8bf2007-05-13 21:36:56 +0200885 pool_destroy2(pool2_requri);
Willy Tarreauc6ca1a02007-05-13 19:43:47 +0200886 pool_destroy2(pool2_task);
Willy Tarreau086b3b42007-05-13 21:45:51 +0200887 pool_destroy2(pool2_capture);
Willy Tarreau63963c62007-05-13 21:29:55 +0200888 pool_destroy2(pool2_appsess);
Willy Tarreaue4d7e552007-05-13 20:19:55 +0200889 pool_destroy2(pool2_pendconn);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200890
891 if (have_appsession) {
Willy Tarreau63963c62007-05-13 21:29:55 +0200892 pool_destroy2(apools.serverid);
893 pool_destroy2(apools.sessid);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200894 }
Krzysztof Piotr Oledzkia643baf2008-05-29 23:53:44 +0200895
896 deinit_pollers();
897
Willy Tarreaubaaee002006-06-26 02:48:02 +0200898} /* end deinit() */
899
900/* sends the signal <sig> to all pids found in <oldpids> */
901static void tell_old_pids(int sig)
902{
903 int p;
904 for (p = 0; p < nb_oldpids; p++)
905 kill(oldpids[p], sig);
906}
907
Willy Tarreau4f60f162007-04-08 16:39:58 +0200908/*
909 * Runs the polling loop
910 *
911 * FIXME:
912 * - we still use 'listeners' to check whether we want to stop or not.
913 *
914 */
915void run_poll_loop()
916{
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200917 int next;
Willy Tarreau4f60f162007-04-08 16:39:58 +0200918
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200919 tv_update_date(0,1);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200920 while (1) {
Willy Tarreau29857942009-05-10 09:01:21 +0200921 /* check if we caught some signals and process them */
922 signal_process_queue();
923
Willy Tarreau58b458d2008-06-29 22:40:23 +0200924 /* Check if we can expire some tasks */
925 wake_expired_tasks(&next);
926
927 /* Process a few tasks */
Willy Tarreaud825eef2007-05-12 22:35:00 +0200928 process_runnable_tasks(&next);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200929
Willy Tarreau58b458d2008-06-29 22:40:23 +0200930 /* maintain all proxies in a consistent state. This should quickly
931 * become a task because it becomes expensive when there are huge
932 * numbers of proxies. */
933 maintain_proxies(&next);
934
Willy Tarreau4f60f162007-04-08 16:39:58 +0200935 /* stop when there's no connection left and we don't allow them anymore */
936 if (!actconn && listeners == 0)
937 break;
938
Willy Tarreau58b458d2008-06-29 22:40:23 +0200939 /* The poller will ensure it returns around <next> */
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200940 cur_poller.poll(&cur_poller, next);
Willy Tarreau4f60f162007-04-08 16:39:58 +0200941 }
942}
943
944
Willy Tarreaubaaee002006-06-26 02:48:02 +0200945int main(int argc, char **argv)
946{
947 int err, retry;
948 struct rlimit limit;
949 FILE *pidfile = NULL;
950 init(argc, argv);
951
Willy Tarreau01b3a532009-05-10 09:59:50 +0200952 signal_register(SIGQUIT, dump);
953 signal_register(SIGUSR1, sig_soft_stop);
954 signal_register(SIGHUP, sig_dump_state);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200955#ifdef DEBUG_MEMORY
Willy Tarreau01b3a532009-05-10 09:59:50 +0200956 signal_register(SIGINT, sig_int);
957 signal_register(SIGTERM, sig_term);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200958#endif
959
960 /* on very high loads, a sigpipe sometimes happen just between the
961 * getsockopt() which tells "it's OK to write", and the following write :-(
962 */
Willy Tarreaud6d06902009-08-19 11:22:33 +0200963#if !MSG_NOSIGNAL || defined(CONFIG_HAP_LINUX_SPLICE)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200964 signal(SIGPIPE, SIG_IGN);
965#endif
966
967 /* We will loop at most 100 times with 10 ms delay each time.
968 * That's at most 1 second. We only send a signal to old pids
969 * if we cannot grab at least one port.
970 */
971 retry = MAX_START_RETRIES;
972 err = ERR_NONE;
973 while (retry >= 0) {
974 struct timeval w;
975 err = start_proxies(retry == 0 || nb_oldpids == 0);
Willy Tarreaue13e9252007-12-20 23:05:50 +0100976 /* exit the loop on no error or fatal error */
977 if ((err & (ERR_RETRYABLE|ERR_FATAL)) != ERR_RETRYABLE)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200978 break;
979 if (nb_oldpids == 0)
980 break;
981
982 /* FIXME-20060514: Solaris and OpenBSD do not support shutdown() on
983 * listening sockets. So on those platforms, it would be wiser to
984 * simply send SIGUSR1, which will not be undoable.
985 */
986 tell_old_pids(SIGTTOU);
987 /* give some time to old processes to stop listening */
988 w.tv_sec = 0;
989 w.tv_usec = 10*1000;
990 select(0, NULL, NULL, NULL, &w);
991 retry--;
992 }
993
994 /* Note: start_proxies() sends an alert when it fails. */
Willy Tarreau0a3b9d92009-02-04 17:05:23 +0100995 if ((err & ~ERR_WARN) != ERR_NONE) {
Willy Tarreauf68da462009-06-09 14:36:00 +0200996 if (retry != MAX_START_RETRIES && nb_oldpids) {
997 protocol_unbind_all(); /* cleanup everything we can */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200998 tell_old_pids(SIGTTIN);
Willy Tarreauf68da462009-06-09 14:36:00 +0200999 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001000 exit(1);
1001 }
1002
1003 if (listeners == 0) {
1004 Alert("[%s.main()] No enabled listener found (check the <listen> keywords) ! Exiting.\n", argv[0]);
1005 /* Note: we don't have to send anything to the old pids because we
1006 * never stopped them. */
1007 exit(1);
1008 }
1009
Willy Tarreau0a3b9d92009-02-04 17:05:23 +01001010 if ((protocol_bind_all() & ~ERR_WARN) != ERR_NONE) {
Willy Tarreaudd815982007-10-16 12:25:14 +02001011 Alert("[%s.main()] Some protocols failed to start their listeners! Exiting.\n", argv[0]);
1012 protocol_unbind_all(); /* cleanup everything we can */
1013 if (nb_oldpids)
1014 tell_old_pids(SIGTTIN);
1015 exit(1);
1016 }
1017
Willy Tarreaubaaee002006-06-26 02:48:02 +02001018 /* prepare pause/play signals */
Willy Tarreau01b3a532009-05-10 09:59:50 +02001019 signal_register(SIGTTOU, sig_pause);
1020 signal_register(SIGTTIN, sig_listen);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001021
Willy Tarreaubaaee002006-06-26 02:48:02 +02001022 /* MODE_QUIET can inhibit alerts and warnings below this line */
1023
1024 global.mode &= ~MODE_STARTING;
1025 if ((global.mode & MODE_QUIET) && !(global.mode & MODE_VERBOSE)) {
1026 /* detach from the tty */
1027 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001028 }
1029
1030 /* open log & pid files before the chroot */
1031 if (global.mode & MODE_DAEMON && global.pidfile != NULL) {
1032 int pidfd;
1033 unlink(global.pidfile);
1034 pidfd = open(global.pidfile, O_CREAT | O_WRONLY | O_TRUNC, 0644);
1035 if (pidfd < 0) {
1036 Alert("[%s.main()] Cannot create pidfile %s\n", argv[0], global.pidfile);
1037 if (nb_oldpids)
1038 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001039 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001040 exit(1);
1041 }
1042 pidfile = fdopen(pidfd, "w");
1043 }
1044
Willy Tarreaubaaee002006-06-26 02:48:02 +02001045 /* ulimits */
1046 if (!global.rlimit_nofile)
1047 global.rlimit_nofile = global.maxsock;
1048
1049 if (global.rlimit_nofile) {
1050 limit.rlim_cur = limit.rlim_max = global.rlimit_nofile;
1051 if (setrlimit(RLIMIT_NOFILE, &limit) == -1) {
1052 Warning("[%s.main()] Cannot raise FD limit to %d.\n", argv[0], global.rlimit_nofile);
1053 }
1054 }
1055
1056 if (global.rlimit_memmax) {
1057 limit.rlim_cur = limit.rlim_max =
1058 global.rlimit_memmax * 1048576 / global.nbproc;
1059#ifdef RLIMIT_AS
1060 if (setrlimit(RLIMIT_AS, &limit) == -1) {
1061 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1062 argv[0], global.rlimit_memmax);
1063 }
1064#else
1065 if (setrlimit(RLIMIT_DATA, &limit) == -1) {
1066 Warning("[%s.main()] Cannot fix MEM limit to %d megs.\n",
1067 argv[0], global.rlimit_memmax);
1068 }
1069#endif
1070 }
Willy Tarreau6d1a9882007-01-07 02:03:04 +01001071
Willy Tarreaub38651a2007-03-24 17:24:39 +01001072#ifdef CONFIG_HAP_CTTPROXY
1073 if (global.last_checks & LSTCHK_CTTPROXY) {
1074 int ret;
1075
1076 ret = check_cttproxy_version();
1077 if (ret < 0) {
1078 Alert("[%s.main()] Cannot enable cttproxy.\n%s",
1079 argv[0],
1080 (ret == -1) ? " Incorrect module version.\n"
1081 : " Make sure you have enough permissions and that the module is loaded.\n");
Willy Tarreaudd815982007-10-16 12:25:14 +02001082 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001083 exit(1);
1084 }
1085 }
1086#endif
1087
1088 if ((global.last_checks & LSTCHK_NETADM) && global.uid) {
1089 Alert("[%s.main()] Some configuration options require full privileges, so global.uid cannot be changed.\n"
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001090 "", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001091 protocol_unbind_all();
Willy Tarreaub38651a2007-03-24 17:24:39 +01001092 exit(1);
1093 }
1094
Willy Tarreau4e30ed72009-02-04 18:02:48 +01001095 /* If the user is not root, we'll still let him try the configuration
1096 * but we inform him that unexpected behaviour may occur.
1097 */
1098 if ((global.last_checks & LSTCHK_NETADM) && getuid())
1099 Warning("[%s.main()] Some options which require full privileges"
1100 " might not work well.\n"
1101 "", argv[0]);
1102
Willy Tarreauf223cc02007-10-15 18:57:08 +02001103 /* chroot if needed */
1104 if (global.chroot != NULL) {
1105 if (chroot(global.chroot) == -1) {
1106 Alert("[%s.main()] Cannot chroot(%s).\n", argv[0], global.chroot);
1107 if (nb_oldpids)
1108 tell_old_pids(SIGTTIN);
Willy Tarreaudd815982007-10-16 12:25:14 +02001109 protocol_unbind_all();
Willy Tarreauf223cc02007-10-15 18:57:08 +02001110 exit(1);
1111 }
1112 chdir("/");
1113 }
1114
Willy Tarreaubaaee002006-06-26 02:48:02 +02001115 if (nb_oldpids)
1116 tell_old_pids(oldpids_sig);
1117
1118 /* Note that any error at this stage will be fatal because we will not
1119 * be able to restart the old pids.
1120 */
1121
1122 /* setgid / setuid */
1123 if (global.gid && setgid(global.gid) == -1) {
1124 Alert("[%s.main()] Cannot set gid %d.\n", argv[0], global.gid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001125 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001126 exit(1);
1127 }
1128
1129 if (global.uid && setuid(global.uid) == -1) {
1130 Alert("[%s.main()] Cannot set uid %d.\n", argv[0], global.uid);
Willy Tarreaudd815982007-10-16 12:25:14 +02001131 protocol_unbind_all();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001132 exit(1);
1133 }
1134
1135 /* check ulimits */
1136 limit.rlim_cur = limit.rlim_max = 0;
1137 getrlimit(RLIMIT_NOFILE, &limit);
1138 if (limit.rlim_cur < global.maxsock) {
1139 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 +02001140 argv[0], (int)limit.rlim_cur, global.maxconn, global.maxsock, global.maxsock);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001141 }
1142
1143 if (global.mode & MODE_DAEMON) {
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001144 struct proxy *px;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001145 int ret = 0;
1146 int proc;
1147
1148 /* the father launches the required number of processes */
1149 for (proc = 0; proc < global.nbproc; proc++) {
1150 ret = fork();
1151 if (ret < 0) {
1152 Alert("[%s.main()] Cannot fork.\n", argv[0]);
Willy Tarreaudd815982007-10-16 12:25:14 +02001153 protocol_unbind_all();
Willy Tarreaud6803712007-10-16 07:44:56 +02001154 exit(1); /* there has been an error */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001155 }
1156 else if (ret == 0) /* child breaks here */
1157 break;
1158 if (pidfile != NULL) {
1159 fprintf(pidfile, "%d\n", ret);
1160 fflush(pidfile);
1161 }
Willy Tarreaudcd47712007-11-04 23:35:08 +01001162 relative_pid++; /* each child will get a different one */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001163 }
1164 /* close the pidfile both in children and father */
1165 if (pidfile != NULL)
1166 fclose(pidfile);
1167 free(global.pidfile);
Krzysztof Oledzki56f1e8b2007-10-11 18:30:14 +02001168 global.pidfile = NULL;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001169
Willy Tarreau0b9c02c2009-02-04 22:05:05 +01001170 /* we might have to unbind some proxies from some processes */
1171 px = proxy;
1172 while (px != NULL) {
1173 if (px->bind_proc && px->state != PR_STSTOPPED) {
1174 if (!(px->bind_proc & (1 << proc)))
1175 stop_proxy(px);
1176 }
1177 px = px->next;
1178 }
1179
Willy Tarreaubaaee002006-06-26 02:48:02 +02001180 if (proc == global.nbproc)
1181 exit(0); /* parent must leave */
1182
1183 /* if we're NOT in QUIET mode, we should now close the 3 first FDs to ensure
1184 * that we can detach from the TTY. We MUST NOT do it in other cases since
1185 * it would have already be done, and 0-2 would have been affected to listening
1186 * sockets
1187 */
Willy Tarreau106cb762008-11-16 07:40:34 +01001188 if (!(global.mode & MODE_QUIET) || (global.mode & MODE_VERBOSE)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +02001189 /* detach from the tty */
1190 fclose(stdin); fclose(stdout); fclose(stderr);
Willy Tarreau106cb762008-11-16 07:40:34 +01001191 global.mode &= ~MODE_VERBOSE;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001192 global.mode |= MODE_QUIET; /* ensure that we won't say anything from now */
1193 }
1194 pid = getpid(); /* update child's pid */
1195 setsid();
Willy Tarreau2ff76222007-04-09 19:29:56 +02001196 fork_poller();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001197 }
1198
Willy Tarreaudd815982007-10-16 12:25:14 +02001199 protocol_enable_all();
Willy Tarreau4f60f162007-04-08 16:39:58 +02001200 /*
1201 * That's it : the central polling loop. Run until we stop.
1202 */
1203 run_poll_loop();
Willy Tarreaubaaee002006-06-26 02:48:02 +02001204
1205 /* Free all Hash Keys and all Hash elements */
1206 appsession_cleanup();
1207 /* Do some cleanup */
1208 deinit();
1209
1210 exit(0);
1211}
1212
1213
1214/*
1215 * Local variables:
1216 * c-indent-level: 8
1217 * c-basic-offset: 8
1218 * End:
1219 */