blob: 2014c739e4c9fbac3e4be89eb6e5415e5f7fc120 [file] [log] [blame]
Willy Tarreaubaaee002006-06-26 02:48:02 +02001/*
2 * Proxy variables and functions.
3 *
Willy Tarreau3a7d2072009-03-05 23:48:25 +01004 * Copyright 2000-2009 Willy Tarreau <w@1wt.eu>
Willy Tarreaubaaee002006-06-26 02:48:02 +02005 *
6 * This program is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU General Public License
8 * as published by the Free Software Foundation; either version
9 * 2 of the License, or (at your option) any later version.
10 *
11 */
12
13#include <fcntl.h>
14#include <unistd.h>
Willy Tarreauc8f24f82007-11-30 18:38:35 +010015#include <string.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020016#include <sys/types.h>
17#include <sys/socket.h>
18#include <sys/stat.h>
19
Willy Tarreau2dd0d472006-06-29 17:53:05 +020020#include <common/defaults.h>
Willy Tarreau9de1bbd2008-07-09 20:34:27 +020021#include <common/cfgparse.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020022#include <common/compat.h>
Willy Tarreaue3ba5f02006-06-29 18:54:54 +020023#include <common/config.h>
Willy Tarreaud740bab2007-10-28 11:14:07 +010024#include <common/errors.h>
Willy Tarreau4d2d0982007-05-14 00:39:29 +020025#include <common/memory.h>
Willy Tarreau2dd0d472006-06-29 17:53:05 +020026#include <common/time.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020027
Willy Tarreaucfd837f2014-03-15 07:43:51 +010028#include <eb32tree.h>
29#include <ebistree.h>
30
Thierry FOURNIERa0a1b752015-05-26 17:44:32 +020031#include <types/capture.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020032#include <types/global.h>
Willy Tarreau3fdb3662012-11-12 00:42:33 +010033#include <types/obj_type.h>
Emeric Brun5a8c0a92010-09-23 18:44:36 +020034#include <types/peers.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020035
Alexandre Cassen87ea5482007-10-11 20:48:58 +020036#include <proto/backend.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020037#include <proto/fd.h>
Christopher Fauletd7c91962015-04-30 11:48:27 +020038#include <proto/filters.h>
Willy Tarreau51aecc72009-07-12 09:47:04 +020039#include <proto/hdr_idx.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020040#include <proto/listener.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020041#include <proto/log.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010042#include <proto/proto_tcp.h>
Willy Tarreau39e4f622010-05-31 17:01:36 +020043#include <proto/proto_http.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020044#include <proto/proxy.h>
Willy Tarreaud0807c32010-08-27 18:26:11 +020045#include <proto/signal.h>
Willy Tarreaufb0afa72015-04-03 14:46:27 +020046#include <proto/stream.h>
Emeric Brun5a8c0a92010-09-23 18:44:36 +020047#include <proto/task.h>
Willy Tarreaubaaee002006-06-26 02:48:02 +020048
49
Willy Tarreau918ff602011-07-25 16:33:49 +020050int listeners; /* # of proxy listeners, set by cfgparse */
Willy Tarreaubaaee002006-06-26 02:48:02 +020051struct proxy *proxy = NULL; /* list of all existing proxies */
Willy Tarreau53fb4ae2009-10-04 23:04:08 +020052struct eb_root used_proxy_id = EB_ROOT; /* list of proxy IDs in use */
Willy Tarreauf79d9502014-03-15 07:22:35 +010053struct eb_root proxy_by_name = EB_ROOT; /* tree of proxies sorted by name */
Willy Tarreau10479e42010-12-12 14:00:34 +010054unsigned int error_snapshot_id = 0; /* global ID assigned to each error then incremented */
Willy Tarreaubaaee002006-06-26 02:48:02 +020055
Willy Tarreau977b8e42006-12-29 14:19:17 +010056/*
Willy Tarreau816eb542007-11-04 07:04:43 +010057 * This function returns a string containing a name describing capabilities to
58 * report comprehensible error messages. Specifically, it will return the words
59 * "frontend", "backend", "ruleset" when appropriate, or "proxy" for all other
60 * cases including the proxies declared in "listen" mode.
Willy Tarreau977b8e42006-12-29 14:19:17 +010061 */
Willy Tarreau816eb542007-11-04 07:04:43 +010062const char *proxy_cap_str(int cap)
Willy Tarreau977b8e42006-12-29 14:19:17 +010063{
Willy Tarreau816eb542007-11-04 07:04:43 +010064 if ((cap & PR_CAP_LISTEN) != PR_CAP_LISTEN) {
65 if (cap & PR_CAP_FE)
66 return "frontend";
67 else if (cap & PR_CAP_BE)
68 return "backend";
69 else if (cap & PR_CAP_RS)
70 return "ruleset";
71 }
72 return "proxy";
Willy Tarreau977b8e42006-12-29 14:19:17 +010073}
74
Krzysztof Piotr Oledzki6eb730d2007-11-03 23:41:58 +010075/*
76 * This function returns a string containing the mode of the proxy in a format
77 * suitable for error messages.
78 */
Krzysztof Piotr Oledzki6eb730d2007-11-03 23:41:58 +010079const char *proxy_mode_str(int mode) {
80
81 if (mode == PR_MODE_TCP)
82 return "tcp";
83 else if (mode == PR_MODE_HTTP)
84 return "http";
85 else if (mode == PR_MODE_HEALTH)
86 return "health";
87 else
88 return "unknown";
89}
90
Willy Tarreauf3950172009-10-10 18:35:51 +020091/*
92 * This function scans the list of backends and servers to retrieve the first
93 * backend and the first server with the given names, and sets them in both
94 * parameters. It returns zero if either is not found, or non-zero and sets
95 * the ones it did not found to NULL. If a NULL pointer is passed for the
96 * backend, only the pointer to the server will be updated.
97 */
98int get_backend_server(const char *bk_name, const char *sv_name,
99 struct proxy **bk, struct server **sv)
100{
101 struct proxy *p;
102 struct server *s;
Willy Tarreau7ecc4202014-03-15 07:57:11 +0100103 int sid;
Willy Tarreauf3950172009-10-10 18:35:51 +0200104
105 *sv = NULL;
106
Willy Tarreau050536d2012-10-04 08:47:34 +0200107 sid = -1;
Willy Tarreaucfeaa472009-10-10 22:33:08 +0200108 if (*sv_name == '#')
109 sid = atoi(sv_name + 1);
110
Willy Tarreau9e0bb102015-05-26 11:24:42 +0200111 p = proxy_be_by_name(bk_name);
Willy Tarreauf3950172009-10-10 18:35:51 +0200112 if (bk)
113 *bk = p;
114 if (!p)
115 return 0;
116
117 for (s = p->srv; s; s = s->next)
Willy Tarreau4055a102012-11-15 00:15:18 +0100118 if ((sid >= 0 && s->puid == sid) ||
119 (sid < 0 && strcmp(s->id, sv_name) == 0))
Willy Tarreauf3950172009-10-10 18:35:51 +0200120 break;
121 *sv = s;
122 if (!s)
123 return 0;
124 return 1;
125}
126
Willy Tarreaue219db72007-12-03 01:30:13 +0100127/* This function parses a "timeout" statement in a proxy section. It returns
128 * -1 if there is any error, 1 for a warning, otherwise zero. If it does not
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200129 * return zero, it will write an error or warning message into a preallocated
130 * buffer returned at <err>. The trailing is not be written. The function must
131 * be called with <args> pointing to the first command line word, with <proxy>
132 * pointing to the proxy being parsed, and <defpx> to the default proxy or NULL.
133 * As a special case for compatibility with older configs, it also accepts
134 * "{cli|srv|con}timeout" in args[0].
Willy Tarreaue219db72007-12-03 01:30:13 +0100135 */
Willy Tarreau9de1bbd2008-07-09 20:34:27 +0200136static int proxy_parse_timeout(char **args, int section, struct proxy *proxy,
Willy Tarreau28a47d62012-09-18 20:02:48 +0200137 struct proxy *defpx, const char *file, int line,
138 char **err)
Willy Tarreaue219db72007-12-03 01:30:13 +0100139{
140 unsigned timeout;
141 int retval, cap;
142 const char *res, *name;
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200143 int *tv = NULL;
144 int *td = NULL;
Willy Tarreaued446492014-04-28 22:56:38 +0200145 int warn = 0;
Willy Tarreaue219db72007-12-03 01:30:13 +0100146
147 retval = 0;
Willy Tarreau9de1bbd2008-07-09 20:34:27 +0200148
149 /* simply skip "timeout" but remain compatible with old form */
150 if (strcmp(args[0], "timeout") == 0)
151 args++;
152
Willy Tarreaue219db72007-12-03 01:30:13 +0100153 name = args[0];
Willy Tarreaued446492014-04-28 22:56:38 +0200154 if (!strcmp(args[0], "client") || (!strcmp(args[0], "clitimeout") && (warn = WARN_CLITO_DEPRECATED))) {
Willy Tarreaue219db72007-12-03 01:30:13 +0100155 name = "client";
Willy Tarreaud7c30f92007-12-03 01:38:36 +0100156 tv = &proxy->timeout.client;
157 td = &defpx->timeout.client;
Willy Tarreaue219db72007-12-03 01:30:13 +0100158 cap = PR_CAP_FE;
159 } else if (!strcmp(args[0], "tarpit")) {
160 tv = &proxy->timeout.tarpit;
161 td = &defpx->timeout.tarpit;
Willy Tarreau51c9bde2008-01-06 13:40:03 +0100162 cap = PR_CAP_FE | PR_CAP_BE;
Willy Tarreaub16a5742010-01-10 14:46:16 +0100163 } else if (!strcmp(args[0], "http-keep-alive")) {
164 tv = &proxy->timeout.httpka;
165 td = &defpx->timeout.httpka;
166 cap = PR_CAP_FE | PR_CAP_BE;
Willy Tarreau036fae02008-01-06 13:24:40 +0100167 } else if (!strcmp(args[0], "http-request")) {
168 tv = &proxy->timeout.httpreq;
169 td = &defpx->timeout.httpreq;
Willy Tarreaucd7afc02009-07-12 10:03:17 +0200170 cap = PR_CAP_FE | PR_CAP_BE;
Willy Tarreaued446492014-04-28 22:56:38 +0200171 } else if (!strcmp(args[0], "server") || (!strcmp(args[0], "srvtimeout") && (warn = WARN_SRVTO_DEPRECATED))) {
Willy Tarreaue219db72007-12-03 01:30:13 +0100172 name = "server";
Willy Tarreaud7c30f92007-12-03 01:38:36 +0100173 tv = &proxy->timeout.server;
174 td = &defpx->timeout.server;
Willy Tarreaue219db72007-12-03 01:30:13 +0100175 cap = PR_CAP_BE;
Willy Tarreaued446492014-04-28 22:56:38 +0200176 } else if (!strcmp(args[0], "connect") || (!strcmp(args[0], "contimeout") && (warn = WARN_CONTO_DEPRECATED))) {
Willy Tarreaue219db72007-12-03 01:30:13 +0100177 name = "connect";
Willy Tarreaud7c30f92007-12-03 01:38:36 +0100178 tv = &proxy->timeout.connect;
179 td = &defpx->timeout.connect;
Willy Tarreaue219db72007-12-03 01:30:13 +0100180 cap = PR_CAP_BE;
Krzysztof Piotr Oledzki5259dfe2008-01-21 01:54:06 +0100181 } else if (!strcmp(args[0], "check")) {
182 tv = &proxy->timeout.check;
183 td = &defpx->timeout.check;
184 cap = PR_CAP_BE;
Willy Tarreaue219db72007-12-03 01:30:13 +0100185 } else if (!strcmp(args[0], "queue")) {
186 tv = &proxy->timeout.queue;
187 td = &defpx->timeout.queue;
188 cap = PR_CAP_BE;
Willy Tarreauce887fd2012-05-12 12:50:00 +0200189 } else if (!strcmp(args[0], "tunnel")) {
190 tv = &proxy->timeout.tunnel;
191 td = &defpx->timeout.tunnel;
192 cap = PR_CAP_BE;
Willy Tarreau05cdd962014-05-10 14:30:07 +0200193 } else if (!strcmp(args[0], "client-fin")) {
194 tv = &proxy->timeout.clientfin;
195 td = &defpx->timeout.clientfin;
196 cap = PR_CAP_FE;
197 } else if (!strcmp(args[0], "server-fin")) {
198 tv = &proxy->timeout.serverfin;
199 td = &defpx->timeout.serverfin;
200 cap = PR_CAP_BE;
Willy Tarreaue219db72007-12-03 01:30:13 +0100201 } else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200202 memprintf(err,
203 "'timeout' supports 'client', 'server', 'connect', 'check', "
Willy Tarreau05cdd962014-05-10 14:30:07 +0200204 "'queue', 'http-keep-alive', 'http-request', 'tunnel', 'tarpit', "
205 "'client-fin' and 'server-fin' (got '%s')",
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200206 args[0]);
Willy Tarreaue219db72007-12-03 01:30:13 +0100207 return -1;
208 }
209
210 if (*args[1] == 0) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200211 memprintf(err, "'timeout %s' expects an integer value (in milliseconds)", name);
Willy Tarreaue219db72007-12-03 01:30:13 +0100212 return -1;
213 }
214
215 res = parse_time_err(args[1], &timeout, TIME_UNIT_MS);
216 if (res) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200217 memprintf(err, "unexpected character '%c' in 'timeout %s'", *res, name);
Willy Tarreaue219db72007-12-03 01:30:13 +0100218 return -1;
219 }
220
221 if (!(proxy->cap & cap)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200222 memprintf(err, "'timeout %s' will be ignored because %s '%s' has no %s capability",
223 name, proxy_type_str(proxy), proxy->id,
224 (cap & PR_CAP_BE) ? "backend" : "frontend");
Willy Tarreaue219db72007-12-03 01:30:13 +0100225 retval = 1;
226 }
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200227 else if (defpx && *tv != *td) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200228 memprintf(err, "overwriting 'timeout %s' which was already specified", name);
Willy Tarreaue219db72007-12-03 01:30:13 +0100229 retval = 1;
230 }
Willy Tarreaued446492014-04-28 22:56:38 +0200231 else if (warn) {
232 if (!already_warned(warn)) {
233 memprintf(err, "the '%s' directive is now deprecated in favor of 'timeout %s', and will not be supported in future versions.",
234 args[0], name);
235 retval = 1;
236 }
237 }
Willy Tarreaue219db72007-12-03 01:30:13 +0100238
Willy Tarreaufac5b592014-05-22 08:24:46 +0200239 if (*args[2] != 0) {
240 memprintf(err, "'timeout %s' : unexpected extra argument '%s' after value '%s'.", name, args[2], args[1]);
241 retval = -1;
242 }
243
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200244 *tv = MS_TO_TICKS(timeout);
Willy Tarreaue219db72007-12-03 01:30:13 +0100245 return retval;
246}
247
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100248/* This function parses a "rate-limit" statement in a proxy section. It returns
249 * -1 if there is any error, 1 for a warning, otherwise zero. If it does not
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200250 * return zero, it will write an error or warning message into a preallocated
251 * buffer returned at <err>. The function must be called with <args> pointing
252 * to the first command line word, with <proxy> pointing to the proxy being
253 * parsed, and <defpx> to the default proxy or NULL.
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100254 */
255static int proxy_parse_rate_limit(char **args, int section, struct proxy *proxy,
Willy Tarreau28a47d62012-09-18 20:02:48 +0200256 struct proxy *defpx, const char *file, int line,
257 char **err)
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100258{
259 int retval, cap;
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200260 char *res;
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100261 unsigned int *tv = NULL;
262 unsigned int *td = NULL;
263 unsigned int val;
264
265 retval = 0;
266
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200267 if (strcmp(args[1], "sessions") == 0) {
Willy Tarreau13a34bd2009-05-10 18:52:49 +0200268 tv = &proxy->fe_sps_lim;
269 td = &defpx->fe_sps_lim;
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100270 cap = PR_CAP_FE;
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200271 }
272 else {
273 memprintf(err, "'%s' only supports 'sessions' (got '%s')", args[0], args[1]);
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100274 return -1;
275 }
276
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200277 if (*args[2] == 0) {
278 memprintf(err, "'%s %s' expects expects an integer value (in sessions/second)", args[0], args[1]);
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100279 return -1;
280 }
281
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200282 val = strtoul(args[2], &res, 0);
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100283 if (*res) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200284 memprintf(err, "'%s %s' : unexpected character '%c' in integer value '%s'", args[0], args[1], *res, args[2]);
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100285 return -1;
286 }
287
288 if (!(proxy->cap & cap)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200289 memprintf(err, "%s %s will be ignored because %s '%s' has no %s capability",
290 args[0], args[1], proxy_type_str(proxy), proxy->id,
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100291 (cap & PR_CAP_BE) ? "backend" : "frontend");
292 retval = 1;
293 }
294 else if (defpx && *tv != *td) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +0200295 memprintf(err, "overwriting %s %s which was already specified", args[0], args[1]);
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100296 retval = 1;
297 }
298
299 *tv = val;
300 return retval;
301}
302
Willy Tarreauc35362a2014-04-25 13:58:37 +0200303/* This function parses a "max-keep-alive-queue" statement in a proxy section.
304 * It returns -1 if there is any error, 1 for a warning, otherwise zero. If it
305 * does not return zero, it will write an error or warning message into a
306 * preallocated buffer returned at <err>. The function must be called with
307 * <args> pointing to the first command line word, with <proxy> pointing to
308 * the proxy being parsed, and <defpx> to the default proxy or NULL.
309 */
310static int proxy_parse_max_ka_queue(char **args, int section, struct proxy *proxy,
311 struct proxy *defpx, const char *file, int line,
312 char **err)
313{
314 int retval;
315 char *res;
316 unsigned int val;
317
318 retval = 0;
319
320 if (*args[1] == 0) {
321 memprintf(err, "'%s' expects expects an integer value (or -1 to disable)", args[0]);
322 return -1;
323 }
324
325 val = strtol(args[1], &res, 0);
326 if (*res) {
327 memprintf(err, "'%s' : unexpected character '%c' in integer value '%s'", args[0], *res, args[1]);
328 return -1;
329 }
330
331 if (!(proxy->cap & PR_CAP_BE)) {
332 memprintf(err, "%s will be ignored because %s '%s' has no backend capability",
333 args[0], proxy_type_str(proxy), proxy->id);
334 retval = 1;
335 }
336
337 /* we store <val+1> so that a user-facing value of -1 is stored as zero (default) */
338 proxy->max_ka_queue = val + 1;
339 return retval;
340}
341
Thierry FOURNIERa0a1b752015-05-26 17:44:32 +0200342/* This function parses a "declare" statement in a proxy section. It returns -1
343 * if there is any error, 1 for warning, otherwise 0. If it does not return zero,
344 * it will write an error or warning message into a preallocated buffer returned
345 * at <err>. The function must be called with <args> pointing to the first command
346 * line word, with <proxy> pointing to the proxy being parsed, and <defpx> to the
347 * default proxy or NULL.
348 */
349static int proxy_parse_declare(char **args, int section, struct proxy *curpx,
350 struct proxy *defpx, const char *file, int line,
351 char **err)
352{
353 /* Capture keyword wannot be declared in a default proxy. */
354 if (curpx == defpx) {
355 memprintf(err, "'%s' not avalaible in default section", args[0]);
356 return -1;
357 }
358
359 /* Capture keywork is only avalaible in frontend. */
360 if (!(curpx->cap & PR_CAP_FE)) {
361 memprintf(err, "'%s' only avalaible in frontend or listen section", args[0]);
362 return -1;
363 }
364
365 /* Check mandatory second keyword. */
366 if (!args[1] || !*args[1]) {
367 memprintf(err, "'%s' needs a second keyword that specify the type of declaration ('capture')", args[0]);
368 return -1;
369 }
370
371 /* Actually, declare is only avalaible for declaring capture
372 * slot, but in the future it can declare maps or variables.
373 * So, this section permits to check and switch acording with
374 * the second keyword.
375 */
376 if (strcmp(args[1], "capture") == 0) {
377 char *error = NULL;
378 long len;
379 struct cap_hdr *hdr;
380
381 /* Check the next keyword. */
382 if (!args[2] || !*args[2] ||
383 (strcmp(args[2], "response") != 0 &&
384 strcmp(args[2], "request") != 0)) {
385 memprintf(err, "'%s %s' requires a direction ('request' or 'response')", args[0], args[1]);
386 return -1;
387 }
388
389 /* Check the 'len' keyword. */
390 if (!args[3] || !*args[3] || strcmp(args[3], "len") != 0) {
391 memprintf(err, "'%s %s' requires a capture length ('len')", args[0], args[1]);
392 return -1;
393 }
394
395 /* Check the length value. */
396 if (!args[4] || !*args[4]) {
397 memprintf(err, "'%s %s': 'len' requires a numeric value that represents the "
398 "capture length",
399 args[0], args[1]);
400 return -1;
401 }
402
403 /* convert the length value. */
404 len = strtol(args[4], &error, 10);
405 if (*error != '\0') {
406 memprintf(err, "'%s %s': cannot parse the length '%s'.",
407 args[0], args[1], args[3]);
408 return -1;
409 }
410
411 /* check length. */
412 if (len <= 0) {
413 memprintf(err, "length must be > 0");
414 return -1;
415 }
416
417 /* register the capture. */
David CARLIER087ca282015-11-25 15:27:36 +0000418 hdr = calloc(1, sizeof(struct cap_hdr));
Thierry FOURNIERa0a1b752015-05-26 17:44:32 +0200419 hdr->name = NULL; /* not a header capture */
420 hdr->namelen = 0;
421 hdr->len = len;
422 hdr->pool = create_pool("caphdr", hdr->len + 1, MEM_F_SHARED);
423
424 if (strcmp(args[2], "request") == 0) {
425 hdr->next = curpx->req_cap;
426 hdr->index = curpx->nb_req_cap++;
427 curpx->req_cap = hdr;
428 }
429 if (strcmp(args[2], "response") == 0) {
430 hdr->next = curpx->rsp_cap;
431 hdr->index = curpx->nb_rsp_cap++;
432 curpx->rsp_cap = hdr;
433 }
434 return 0;
435 }
436 else {
437 memprintf(err, "unknown declaration type '%s' (supports 'capture')", args[1]);
438 return -1;
439 }
440}
441
Willy Tarreauf79d9502014-03-15 07:22:35 +0100442/* This function inserts proxy <px> into the tree of known proxies. The proxy's
443 * name is used as the storing key so it must already have been initialized.
444 */
445void proxy_store_name(struct proxy *px)
446{
447 px->conf.by_name.key = px->id;
448 ebis_insert(&proxy_by_name, &px->conf.by_name);
449}
450
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200451/* Returns a pointer to the first proxy matching capabilities <cap> and id
452 * <id>. NULL is returned if no match is found. If <table> is non-zero, it
453 * only considers proxies having a table.
Willy Tarreaubc216c42011-08-02 11:25:54 +0200454 */
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200455struct proxy *proxy_find_by_id(int id, int cap, int table)
Willy Tarreau9e0bb102015-05-26 11:24:42 +0200456{
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200457 struct eb32_node *n;
Willy Tarreaubc216c42011-08-02 11:25:54 +0200458
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200459 for (n = eb32_lookup(&used_proxy_id, id); n; n = eb32_next(n)) {
460 struct proxy *px = container_of(n, struct proxy, conf.id);
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100461
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200462 if (px->uuid != id)
463 break;
Alex Williams96532db2009-11-01 21:27:13 -0500464
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200465 if ((px->cap & cap) != cap)
466 continue;
Alex Williams96532db2009-11-01 21:27:13 -0500467
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200468 if (table && !px->table.size)
469 continue;
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100470
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200471 return px;
472 }
473 return NULL;
474}
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100475
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200476/* Returns a pointer to the first proxy matching either name <name>, or id
477 * <name> if <name> begins with a '#'. NULL is returned if no match is found.
478 * If <table> is non-zero, it only considers proxies having a table.
479 */
480struct proxy *proxy_find_by_name(const char *name, int cap, int table)
481{
482 struct proxy *curproxy;
Willy Tarreau9e0bb102015-05-26 11:24:42 +0200483
Willy Tarreau3c56a7d2015-05-26 15:25:32 +0200484 if (*name == '#') {
485 curproxy = proxy_find_by_id(atoi(name + 1), cap, table);
486 if (curproxy)
Willy Tarreauc739aa82015-05-26 11:35:41 +0200487 return curproxy;
Alex Williams96532db2009-11-01 21:27:13 -0500488 }
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100489 else {
490 struct ebpt_node *node;
491
492 for (node = ebis_lookup(&proxy_by_name, name); node; node = ebpt_next(node)) {
493 curproxy = container_of(node, struct proxy, conf.by_name);
Alex Williams96532db2009-11-01 21:27:13 -0500494
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100495 if (strcmp(curproxy->id, name) != 0)
496 break;
497
498 if ((curproxy->cap & cap) != cap)
499 continue;
500
Willy Tarreau9e0bb102015-05-26 11:24:42 +0200501 if (table && !curproxy->table.size)
502 continue;
503
Willy Tarreauc739aa82015-05-26 11:35:41 +0200504 return curproxy;
Willy Tarreaucfd837f2014-03-15 07:43:51 +0100505 }
506 }
Willy Tarreauc739aa82015-05-26 11:35:41 +0200507 return NULL;
Alex Williams96532db2009-11-01 21:27:13 -0500508}
509
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200510/* Finds the best match for a proxy with capabilities <cap>, name <name> and id
511 * <id>. At most one of <id> or <name> may be different provided that <cap> is
512 * valid. Either <id> or <name> may be left unspecified (0). The purpose is to
513 * find a proxy based on some information from a previous configuration, across
514 * reloads or during information exchange between peers.
515 *
516 * Names are looked up first if present, then IDs are compared if present. In
517 * case of an inexact match whatever is forced in the configuration has
518 * precedence in the following order :
519 * - 1) forced ID (proves a renaming / change of proxy type)
520 * - 2) proxy name+type (may indicate a move if ID differs)
521 * - 3) automatic ID+type (may indicate a renaming)
522 *
523 * Depending on what is found, we can end up in the following situations :
524 *
525 * name id cap | possible causes
526 * -------------+-----------------
527 * -- -- -- | nothing found
528 * -- -- ok | nothing found
529 * -- ok -- | proxy deleted, ID points to next one
530 * -- ok ok | proxy renamed, or deleted with ID pointing to next one
531 * ok -- -- | proxy deleted, but other half with same name still here (before)
532 * ok -- ok | proxy's ID changed (proxy moved in the config file)
533 * ok ok -- | proxy deleted, but other half with same name still here (after)
534 * ok ok ok | perfect match
535 *
536 * Upon return if <diff> is not NULL, it is zeroed then filled with up to 3 bits :
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200537 * - PR_FBM_MISMATCH_ID : proxy was found but ID differs
538 * (and ID was not zero)
539 * - PR_FBM_MISMATCH_NAME : proxy was found by ID but name differs
540 * (and name was not NULL)
541 * - PR_FBM_MISMATCH_PROXYTYPE : a proxy of different type was found with
542 * the same name and/or id
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200543 *
544 * Only a valid proxy is returned. If capabilities do not match, NULL is
545 * returned. The caller can check <diff> to report detailed warnings / errors,
546 * and decide whether or not to use what was found.
547 */
548struct proxy *proxy_find_best_match(int cap, const char *name, int id, int *diff)
549{
550 struct proxy *byname;
551 struct proxy *byid;
552
553 if (!name && !id)
554 return NULL;
555
556 if (diff)
557 *diff = 0;
558
559 byname = byid = NULL;
560
561 if (name) {
562 byname = proxy_find_by_name(name, cap, 0);
563 if (byname && (!id || byname->uuid == id))
564 return byname;
565 }
566
567 /* remaining possiblities :
568 * - name not set
569 * - name set but not found
570 * - name found, but ID doesn't match.
571 */
572 if (id) {
573 byid = proxy_find_by_id(id, cap, 0);
574 if (byid) {
575 if (byname) {
576 /* id+type found, name+type found, but not all 3.
577 * ID wins only if forced, otherwise name wins.
578 */
579 if (byid->options & PR_O_FORCED_ID) {
580 if (diff)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200581 *diff |= PR_FBM_MISMATCH_NAME;
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200582 return byid;
583 }
584 else {
585 if (diff)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200586 *diff |= PR_FBM_MISMATCH_ID;
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200587 return byname;
588 }
589 }
590
591 /* remaining possiblities :
592 * - name not set
593 * - name set but not found
594 */
595 if (name && diff)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200596 *diff |= PR_FBM_MISMATCH_NAME;
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200597 return byid;
598 }
599
600 /* ID not found */
601 if (byname) {
602 if (diff)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200603 *diff |= PR_FBM_MISMATCH_ID;
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200604 return byname;
605 }
606 }
607
608 /* All remaining possiblities will lead to NULL. If we can report more
609 * detailed information to the caller about changed types and/or name,
610 * we'll do it. For example, we could detect that "listen foo" was
611 * split into "frontend foo_ft" and "backend foo_bk" if IDs are forced.
612 * - name not set, ID not found
613 * - name not found, ID not set
614 * - name not found, ID not found
615 */
616 if (!diff)
617 return NULL;
618
619 if (name) {
620 byname = proxy_find_by_name(name, 0, 0);
621 if (byname && (!id || byname->uuid == id))
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200622 *diff |= PR_FBM_MISMATCH_PROXYTYPE;
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200623 }
624
625 if (id) {
626 byid = proxy_find_by_id(id, 0, 0);
627 if (byid) {
628 if (!name)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200629 *diff |= PR_FBM_MISMATCH_PROXYTYPE; /* only type changed */
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200630 else if (byid->options & PR_O_FORCED_ID)
Baptiste Assmann8a027cc2015-07-03 11:03:33 +0200631 *diff |= PR_FBM_MISMATCH_NAME | PR_FBM_MISMATCH_PROXYTYPE; /* name and type changed */
Willy Tarreaueb3e3482015-05-27 16:46:26 +0200632 /* otherwise it's a different proxy that was returned */
633 }
634 }
635 return NULL;
636}
637
Willy Tarreaubaaee002006-06-26 02:48:02 +0200638/*
Krzysztof Piotr Oledzkic8b16fc2008-02-18 01:26:35 +0100639 * This function finds a server with matching name within selected proxy.
640 * It also checks if there are more matching servers with
641 * requested name as this often leads into unexpected situations.
642 */
643
644struct server *findserver(const struct proxy *px, const char *name) {
645
646 struct server *cursrv, *target = NULL;
647
648 if (!px)
649 return NULL;
650
651 for (cursrv = px->srv; cursrv; cursrv = cursrv->next) {
652 if (strcmp(cursrv->id, name))
653 continue;
654
655 if (!target) {
656 target = cursrv;
657 continue;
658 }
659
Cyril Bonté0bb519e2012-04-04 12:57:19 +0200660 Alert("Refusing to use duplicated server '%s' found in proxy: %s!\n",
Krzysztof Piotr Oledzkic8b16fc2008-02-18 01:26:35 +0100661 name, px->id);
662
663 return NULL;
664 }
665
666 return target;
667}
668
Willy Tarreauff01a212009-03-15 13:46:16 +0100669/* This function checks that the designated proxy has no http directives
670 * enabled. It will output a warning if there are, and will fix some of them.
671 * It returns the number of fatal errors encountered. This should be called
672 * at the end of the configuration parsing if the proxy is not in http mode.
673 * The <file> argument is used to construct the error message.
674 */
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200675int proxy_cfg_ensure_no_http(struct proxy *curproxy)
Willy Tarreauff01a212009-03-15 13:46:16 +0100676{
677 if (curproxy->cookie_name != NULL) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200678 Warning("config : cookie will be ignored for %s '%s' (needs 'mode http').\n",
679 proxy_type_str(curproxy), curproxy->id);
Willy Tarreauff01a212009-03-15 13:46:16 +0100680 }
681 if (curproxy->rsp_exp != NULL) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200682 Warning("config : server regular expressions will be ignored for %s '%s' (needs 'mode http').\n",
683 proxy_type_str(curproxy), curproxy->id);
Willy Tarreauff01a212009-03-15 13:46:16 +0100684 }
685 if (curproxy->req_exp != NULL) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200686 Warning("config : client regular expressions will be ignored for %s '%s' (needs 'mode http').\n",
687 proxy_type_str(curproxy), curproxy->id);
Willy Tarreauff01a212009-03-15 13:46:16 +0100688 }
689 if (curproxy->monitor_uri != NULL) {
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200690 Warning("config : monitor-uri will be ignored for %s '%s' (needs 'mode http').\n",
691 proxy_type_str(curproxy), curproxy->id);
Willy Tarreauff01a212009-03-15 13:46:16 +0100692 }
Willy Tarreauf3e49f92009-10-03 12:21:20 +0200693 if (curproxy->lbprm.algo & BE_LB_NEED_HTTP) {
Willy Tarreauff01a212009-03-15 13:46:16 +0100694 curproxy->lbprm.algo &= ~BE_LB_ALGO;
695 curproxy->lbprm.algo |= BE_LB_ALGO_RR;
Willy Tarreau915e1eb2009-06-22 15:48:36 +0200696 Warning("config : Layer 7 hash not possible for %s '%s' (needs 'mode http'). Falling back to round robin.\n",
697 proxy_type_str(curproxy), curproxy->id);
Willy Tarreauff01a212009-03-15 13:46:16 +0100698 }
Willy Tarreau17804162009-11-09 21:27:51 +0100699 if (curproxy->to_log & (LW_REQ | LW_RESP)) {
700 curproxy->to_log &= ~(LW_REQ | LW_RESP);
Willy Tarreau59ad1a22014-01-29 14:39:58 +0100701 Warning("parsing [%s:%d] : HTTP log/header format not usable with %s '%s' (needs 'mode http').\n",
Willy Tarreaub1f3af22013-04-12 18:30:32 +0200702 curproxy->conf.lfs_file, curproxy->conf.lfs_line,
Willy Tarreau17804162009-11-09 21:27:51 +0100703 proxy_type_str(curproxy), curproxy->id);
704 }
Willy Tarreau62a61232013-04-12 18:13:46 +0200705 if (curproxy->conf.logformat_string == default_http_log_format ||
706 curproxy->conf.logformat_string == clf_http_log_format) {
707 /* Note: we don't change the directive's file:line number */
708 curproxy->conf.logformat_string = default_tcp_log_format;
709 Warning("parsing [%s:%d] : 'option httplog' not usable with %s '%s' (needs 'mode http'). Falling back to 'option tcplog'.\n",
710 curproxy->conf.lfs_file, curproxy->conf.lfs_line,
Willy Tarreau196729e2012-05-31 19:30:26 +0200711 proxy_type_str(curproxy), curproxy->id);
712 }
713
Willy Tarreauff01a212009-03-15 13:46:16 +0100714 return 0;
715}
716
Willy Tarreau237250c2011-07-29 01:49:03 +0200717/* Perform the most basic initialization of a proxy :
718 * memset(), list_init(*), reset_timeouts(*).
Willy Tarreaub249e842011-09-07 18:41:08 +0200719 * Any new proxy or peer should be initialized via this function.
Willy Tarreau237250c2011-07-29 01:49:03 +0200720 */
721void init_new_proxy(struct proxy *p)
722{
723 memset(p, 0, sizeof(struct proxy));
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100724 p->obj_type = OBJ_TYPE_PROXY;
Willy Tarreau237250c2011-07-29 01:49:03 +0200725 LIST_INIT(&p->pendconns);
726 LIST_INIT(&p->acl);
727 LIST_INIT(&p->http_req_rules);
Willy Tarreaue365c0b2013-06-11 16:06:12 +0200728 LIST_INIT(&p->http_res_rules);
Willy Tarreau353bc9f2014-04-28 22:05:31 +0200729 LIST_INIT(&p->block_rules);
Willy Tarreau237250c2011-07-29 01:49:03 +0200730 LIST_INIT(&p->redirect_rules);
731 LIST_INIT(&p->mon_fail_cond);
732 LIST_INIT(&p->switching_rules);
Willy Tarreau4a5cade2012-04-05 21:09:48 +0200733 LIST_INIT(&p->server_rules);
Willy Tarreau237250c2011-07-29 01:49:03 +0200734 LIST_INIT(&p->persist_rules);
735 LIST_INIT(&p->sticking_rules);
736 LIST_INIT(&p->storersp_rules);
737 LIST_INIT(&p->tcp_req.inspect_rules);
738 LIST_INIT(&p->tcp_rep.inspect_rules);
739 LIST_INIT(&p->tcp_req.l4_rules);
740 LIST_INIT(&p->req_add);
741 LIST_INIT(&p->rsp_add);
742 LIST_INIT(&p->listener_queue);
William Lallemand0f99e342011-10-12 17:50:54 +0200743 LIST_INIT(&p->logsrvs);
William Lallemand723b73a2012-02-08 16:37:49 +0100744 LIST_INIT(&p->logformat);
Dragan Dosen0b85ece2015-09-25 19:17:44 +0200745 LIST_INIT(&p->logformat_sd);
William Lallemanda73203e2012-03-12 12:48:57 +0100746 LIST_INIT(&p->format_unique_id);
Willy Tarreau2a65ff02012-09-13 17:54:29 +0200747 LIST_INIT(&p->conf.bind);
Willy Tarreau4348fad2012-09-20 16:48:07 +0200748 LIST_INIT(&p->conf.listeners);
Willy Tarreaua4312fa2013-04-02 16:34:32 +0200749 LIST_INIT(&p->conf.args.list);
Baptiste Assmann5ecb77f2013-10-06 23:24:13 +0200750 LIST_INIT(&p->tcpcheck_rules);
Christopher Fauletd7c91962015-04-30 11:48:27 +0200751 LIST_INIT(&p->filters);
Willy Tarreau237250c2011-07-29 01:49:03 +0200752
753 /* Timeouts are defined as -1 */
754 proxy_reset_timeouts(p);
755 p->tcp_rep.inspect_delay = TICK_ETERNITY;
Willy Tarreau050536d2012-10-04 08:47:34 +0200756
757 /* initial uuid is unassigned (-1) */
758 p->uuid = -1;
Willy Tarreau237250c2011-07-29 01:49:03 +0200759}
760
Krzysztof Piotr Oledzkic8b16fc2008-02-18 01:26:35 +0100761/*
Willy Tarreau2ff76222007-04-09 19:29:56 +0200762 * This function creates all proxy sockets. It should be done very early,
763 * typically before privileges are dropped. The sockets will be registered
764 * but not added to any fd_set, in order not to loose them across the fork().
Willy Tarreau562515c2011-07-25 08:11:52 +0200765 * The proxies also start in READY state because they all have their listeners
Willy Tarreauf3f8c702011-07-25 07:37:28 +0200766 * bound.
Willy Tarreau2ff76222007-04-09 19:29:56 +0200767 *
768 * Its return value is composed from ERR_NONE, ERR_RETRYABLE and ERR_FATAL.
769 * Retryable errors will only be printed if <verbose> is not zero.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200770 */
771int start_proxies(int verbose)
772{
773 struct proxy *curproxy;
774 struct listener *listener;
Willy Tarreaue6b98942007-10-29 01:09:36 +0100775 int lerr, err = ERR_NONE;
776 int pxerr;
777 char msg[100];
Willy Tarreaubaaee002006-06-26 02:48:02 +0200778
779 for (curproxy = proxy; curproxy != NULL; curproxy = curproxy->next) {
780 if (curproxy->state != PR_STNEW)
781 continue; /* already initialized */
782
783 pxerr = 0;
Willy Tarreau4348fad2012-09-20 16:48:07 +0200784 list_for_each_entry(listener, &curproxy->conf.listeners, by_fe) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100785 if (listener->state != LI_ASSIGNED)
786 continue; /* already started */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200787
Emeric Bruncf20bf12010-10-22 16:06:11 +0200788 lerr = listener->proto->bind(listener, msg, sizeof(msg));
Willy Tarreaubaaee002006-06-26 02:48:02 +0200789
Willy Tarreaue6b98942007-10-29 01:09:36 +0100790 /* errors are reported if <verbose> is set or if they are fatal */
791 if (verbose || (lerr & (ERR_FATAL | ERR_ABORT))) {
792 if (lerr & ERR_ALERT)
793 Alert("Starting %s %s: %s\n",
794 proxy_type_str(curproxy), curproxy->id, msg);
795 else if (lerr & ERR_WARN)
796 Warning("Starting %s %s: %s\n",
797 proxy_type_str(curproxy), curproxy->id, msg);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200798 }
799
Willy Tarreaue6b98942007-10-29 01:09:36 +0100800 err |= lerr;
801 if (lerr & (ERR_ABORT | ERR_FATAL)) {
Willy Tarreaubaaee002006-06-26 02:48:02 +0200802 pxerr |= 1;
Willy Tarreaue6b98942007-10-29 01:09:36 +0100803 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200804 }
Willy Tarreaue6b98942007-10-29 01:09:36 +0100805 else if (lerr & ERR_CODE) {
Willy Tarreaubaaee002006-06-26 02:48:02 +0200806 pxerr |= 1;
807 continue;
808 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200809 }
810
811 if (!pxerr) {
Willy Tarreau562515c2011-07-25 08:11:52 +0200812 curproxy->state = PR_STREADY;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200813 send_log(curproxy, LOG_NOTICE, "Proxy %s started.\n", curproxy->id);
814 }
Willy Tarreaue6b98942007-10-29 01:09:36 +0100815
816 if (err & ERR_ABORT)
817 break;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200818 }
819
820 return err;
821}
822
823
824/*
Willy Tarreau918ff602011-07-25 16:33:49 +0200825 * This is the proxy management task. It enables proxies when there are enough
Willy Tarreau87b09662015-04-03 00:22:06 +0200826 * free streams, or stops them when the table is full. It is designed to be
Willy Tarreau918ff602011-07-25 16:33:49 +0200827 * called as a task which is woken up upon stopping or when rate limiting must
828 * be enforced.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200829 */
Willy Tarreau918ff602011-07-25 16:33:49 +0200830struct task *manage_proxy(struct task *t)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200831{
Willy Tarreau918ff602011-07-25 16:33:49 +0200832 struct proxy *p = t->context;
833 int next = TICK_ETERNITY;
Willy Tarreau79584222009-03-06 09:18:27 +0100834 unsigned int wait;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200835
Willy Tarreau918ff602011-07-25 16:33:49 +0200836 /* We should periodically try to enable listeners waiting for a
837 * global resource here.
838 */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200839
Willy Tarreau918ff602011-07-25 16:33:49 +0200840 /* first, let's check if we need to stop the proxy */
841 if (unlikely(stopping && p->state != PR_STSTOPPED)) {
842 int t;
843 t = tick_remain(now_ms, p->stop_time);
844 if (t == 0) {
845 Warning("Proxy %s stopped (FE: %lld conns, BE: %lld conns).\n",
846 p->id, p->fe_counters.cum_conn, p->be_counters.cum_conn);
847 send_log(p, LOG_WARNING, "Proxy %s stopped (FE: %lld conns, BE: %lld conns).\n",
848 p->id, p->fe_counters.cum_conn, p->be_counters.cum_conn);
849 stop_proxy(p);
850 /* try to free more memory */
851 pool_gc2();
852 }
853 else {
854 next = tick_first(next, p->stop_time);
855 }
856 }
Willy Tarreauf3f8c702011-07-25 07:37:28 +0200857
Willy Tarreau3a925c12013-09-04 17:54:01 +0200858 /* If the proxy holds a stick table, we need to purge all unused
859 * entries. These are all the ones in the table with ref_cnt == 0
860 * and all the ones in the pool used to allocate new entries. Any
Willy Tarreau87b09662015-04-03 00:22:06 +0200861 * entry attached to an existing stream waiting for a store will
Willy Tarreau3a925c12013-09-04 17:54:01 +0200862 * be in neither list. Any entry being dumped will have ref_cnt > 0.
863 * However we protect tables that are being synced to peers.
864 */
865 if (unlikely(stopping && p->state == PR_STSTOPPED && p->table.current)) {
866 if (!p->table.syncing) {
867 stktable_trash_oldest(&p->table, p->table.current);
868 pool_gc2();
869 }
870 if (p->table.current) {
871 /* some entries still remain, let's recheck in one second */
872 next = tick_first(next, tick_add(now_ms, 1000));
873 }
874 }
875
Willy Tarreau918ff602011-07-25 16:33:49 +0200876 /* the rest below is just for frontends */
877 if (!(p->cap & PR_CAP_FE))
878 goto out;
Willy Tarreauf3f8c702011-07-25 07:37:28 +0200879
Willy Tarreau918ff602011-07-25 16:33:49 +0200880 /* check the various reasons we may find to block the frontend */
881 if (unlikely(p->feconn >= p->maxconn)) {
882 if (p->state == PR_STREADY)
883 p->state = PR_STFULL;
884 goto out;
885 }
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100886
Willy Tarreau918ff602011-07-25 16:33:49 +0200887 /* OK we have no reason to block, so let's unblock if we were blocking */
888 if (p->state == PR_STFULL)
889 p->state = PR_STREADY;
Willy Tarreau3a7d2072009-03-05 23:48:25 +0100890
Willy Tarreau918ff602011-07-25 16:33:49 +0200891 if (p->fe_sps_lim &&
892 (wait = next_event_delay(&p->fe_sess_per_sec, p->fe_sps_lim, 0))) {
893 /* we're blocking because a limit was reached on the number of
894 * requests/s on the frontend. We want to re-check ASAP, which
895 * means in 1 ms before estimated expiration date, because the
896 * timer will have settled down.
897 */
898 next = tick_first(next, tick_add(now_ms, wait));
899 goto out;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200900 }
Willy Tarreau918ff602011-07-25 16:33:49 +0200901
902 /* The proxy is not limited so we can re-enable any waiting listener */
903 if (!LIST_ISEMPTY(&p->listener_queue))
904 dequeue_all_listeners(&p->listener_queue);
905 out:
906 t->expire = next;
907 task_queue(t);
908 return t;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200909}
910
911
912/*
913 * this function disables health-check servers so that the process will quickly be ignored
914 * by load balancers. Note that if a proxy was already in the PAUSED state, then its grace
915 * time will not be used since it would already not listen anymore to the socket.
916 */
917void soft_stop(void)
918{
919 struct proxy *p;
Willy Tarreaubbe11b12011-07-25 11:16:24 +0200920 struct peers *prs;
Willy Tarreaubaaee002006-06-26 02:48:02 +0200921
922 stopping = 1;
923 p = proxy;
Willy Tarreaub0b37bc2008-06-23 14:00:57 +0200924 tv_update_date(0,1); /* else, the old time before select will be used */
Willy Tarreaubaaee002006-06-26 02:48:02 +0200925 while (p) {
926 if (p->state != PR_STSTOPPED) {
Willy Tarreauf8fbcef2008-10-10 17:51:34 +0200927 Warning("Stopping %s %s in %d ms.\n", proxy_cap_str(p->cap), p->id, p->grace);
928 send_log(p, LOG_WARNING, "Stopping %s %s in %d ms.\n", proxy_cap_str(p->cap), p->id, p->grace);
Willy Tarreau0c303ee2008-07-07 00:09:58 +0200929 p->stop_time = tick_add(now_ms, p->grace);
Emeric Brun5a8c0a92010-09-23 18:44:36 +0200930
Willy Tarreau20b7afb2015-09-28 16:35:04 +0200931 /* Note: do not wake up stopped proxies' task nor their tables'
932 * tasks as these ones might point to already released entries.
933 */
934 if (p->table.size && p->table.sync_task)
935 task_wakeup(p->table.sync_task, TASK_WOKEN_MSG);
936
937 if (p->task)
938 task_wakeup(p->task, TASK_WOKEN_MSG);
939 }
Willy Tarreaubaaee002006-06-26 02:48:02 +0200940 p = p->next;
941 }
Willy Tarreaubbe11b12011-07-25 11:16:24 +0200942
943 prs = peers;
944 while (prs) {
Willy Tarreau337a6662015-09-28 16:27:44 +0200945 if (prs->peers_fe)
946 stop_proxy(prs->peers_fe);
Willy Tarreaubbe11b12011-07-25 11:16:24 +0200947 prs = prs->next;
948 }
Willy Tarreaud0807c32010-08-27 18:26:11 +0200949 /* signal zero is used to broadcast the "stopping" event */
950 signal_handler(0);
Willy Tarreaubaaee002006-06-26 02:48:02 +0200951}
952
953
Willy Tarreaube58c382011-07-24 18:28:10 +0200954/* Temporarily disables listening on all of the proxy's listeners. Upon
955 * success, the proxy enters the PR_PAUSED state. If disabling at least one
956 * listener returns an error, then the proxy state is set to PR_STERROR
Willy Tarreauce8fe252011-09-07 19:14:57 +0200957 * because we don't know how to resume from this. The function returns 0
958 * if it fails, or non-zero on success.
Willy Tarreaubaaee002006-06-26 02:48:02 +0200959 */
Willy Tarreauce8fe252011-09-07 19:14:57 +0200960int pause_proxy(struct proxy *p)
Willy Tarreaubaaee002006-06-26 02:48:02 +0200961{
962 struct listener *l;
Willy Tarreauce8fe252011-09-07 19:14:57 +0200963
964 if (!(p->cap & PR_CAP_FE) || p->state == PR_STERROR ||
965 p->state == PR_STSTOPPED || p->state == PR_STPAUSED)
966 return 1;
967
968 Warning("Pausing %s %s.\n", proxy_cap_str(p->cap), p->id);
969 send_log(p, LOG_WARNING, "Pausing %s %s.\n", proxy_cap_str(p->cap), p->id);
970
Willy Tarreau4348fad2012-09-20 16:48:07 +0200971 list_for_each_entry(l, &p->conf.listeners, by_fe) {
Willy Tarreaube58c382011-07-24 18:28:10 +0200972 if (!pause_listener(l))
Willy Tarreaubaaee002006-06-26 02:48:02 +0200973 p->state = PR_STERROR;
974 }
Willy Tarreauce8fe252011-09-07 19:14:57 +0200975
976 if (p->state == PR_STERROR) {
977 Warning("%s %s failed to enter pause mode.\n", proxy_cap_str(p->cap), p->id);
978 send_log(p, LOG_WARNING, "%s %s failed to enter pause mode.\n", proxy_cap_str(p->cap), p->id);
979 return 0;
980 }
981
982 p->state = PR_STPAUSED;
983 return 1;
Willy Tarreauda250db2008-10-12 12:07:48 +0200984}
985
986
987/*
988 * This function completely stops a proxy and releases its listeners. It has
989 * to be called when going down in order to release the ports so that another
990 * process may bind to them. It must also be called on disabled proxies at the
991 * end of start-up. When all listeners are closed, the proxy is set to the
992 * PR_STSTOPPED state.
993 */
994void stop_proxy(struct proxy *p)
995{
996 struct listener *l;
997
Willy Tarreau4348fad2012-09-20 16:48:07 +0200998 list_for_each_entry(l, &p->conf.listeners, by_fe) {
Willy Tarreauda250db2008-10-12 12:07:48 +0200999 unbind_listener(l);
1000 if (l->state >= LI_ASSIGNED) {
1001 delete_listener(l);
1002 listeners--;
Willy Tarreauaf7ad002010-08-31 15:39:26 +02001003 jobs--;
Willy Tarreauda250db2008-10-12 12:07:48 +02001004 }
1005 }
1006 p->state = PR_STSTOPPED;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001007}
1008
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001009/* This function resumes listening on the specified proxy. It scans all of its
1010 * listeners and tries to enable them all. If any of them fails, the proxy is
1011 * put back to the paused state. It returns 1 upon success, or zero if an error
1012 * is encountered.
1013 */
1014int resume_proxy(struct proxy *p)
1015{
1016 struct listener *l;
1017 int fail;
1018
1019 if (p->state != PR_STPAUSED)
1020 return 1;
1021
1022 Warning("Enabling %s %s.\n", proxy_cap_str(p->cap), p->id);
1023 send_log(p, LOG_WARNING, "Enabling %s %s.\n", proxy_cap_str(p->cap), p->id);
1024
1025 fail = 0;
Willy Tarreau4348fad2012-09-20 16:48:07 +02001026 list_for_each_entry(l, &p->conf.listeners, by_fe) {
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001027 if (!resume_listener(l)) {
1028 int port;
1029
1030 port = get_host_port(&l->addr);
1031 if (port) {
1032 Warning("Port %d busy while trying to enable %s %s.\n",
1033 port, proxy_cap_str(p->cap), p->id);
1034 send_log(p, LOG_WARNING, "Port %d busy while trying to enable %s %s.\n",
1035 port, proxy_cap_str(p->cap), p->id);
1036 }
1037 else {
1038 Warning("Bind on socket %d busy while trying to enable %s %s.\n",
1039 l->luid, proxy_cap_str(p->cap), p->id);
1040 send_log(p, LOG_WARNING, "Bind on socket %d busy while trying to enable %s %s.\n",
1041 l->luid, proxy_cap_str(p->cap), p->id);
1042 }
1043
1044 /* Another port might have been enabled. Let's stop everything. */
1045 fail = 1;
1046 break;
1047 }
1048 }
1049
1050 p->state = PR_STREADY;
1051 if (fail) {
1052 pause_proxy(p);
1053 return 0;
1054 }
1055 return 1;
1056}
1057
Willy Tarreaubaaee002006-06-26 02:48:02 +02001058/*
1059 * This function temporarily disables listening so that another new instance
1060 * can start listening. It is designed to be called upon reception of a
1061 * SIGTTOU, after which either a SIGUSR1 can be sent to completely stop
1062 * the proxy, or a SIGTTIN can be sent to listen again.
1063 */
1064void pause_proxies(void)
1065{
1066 int err;
1067 struct proxy *p;
Emeric Brun5a8c0a92010-09-23 18:44:36 +02001068 struct peers *prs;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001069
1070 err = 0;
1071 p = proxy;
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001072 tv_update_date(0,1); /* else, the old time before select will be used */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001073 while (p) {
Willy Tarreauce8fe252011-09-07 19:14:57 +02001074 err |= !pause_proxy(p);
Willy Tarreaubaaee002006-06-26 02:48:02 +02001075 p = p->next;
1076 }
Emeric Brun5a8c0a92010-09-23 18:44:36 +02001077
1078 prs = peers;
1079 while (prs) {
Willy Tarreau337a6662015-09-28 16:27:44 +02001080 if (prs->peers_fe)
1081 err |= !pause_proxy(prs->peers_fe);
Willy Tarreauce8fe252011-09-07 19:14:57 +02001082 prs = prs->next;
Emeric Brun5a8c0a92010-09-23 18:44:36 +02001083 }
1084
Willy Tarreaubaaee002006-06-26 02:48:02 +02001085 if (err) {
1086 Warning("Some proxies refused to pause, performing soft stop now.\n");
1087 send_log(p, LOG_WARNING, "Some proxies refused to pause, performing soft stop now.\n");
1088 soft_stop();
1089 }
1090}
1091
1092
1093/*
1094 * This function reactivates listening. This can be used after a call to
1095 * sig_pause(), for example when a new instance has failed starting up.
1096 * It is designed to be called upon reception of a SIGTTIN.
1097 */
Willy Tarreaube58c382011-07-24 18:28:10 +02001098void resume_proxies(void)
Willy Tarreaubaaee002006-06-26 02:48:02 +02001099{
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001100 int err;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001101 struct proxy *p;
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001102 struct peers *prs;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001103
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001104 err = 0;
Willy Tarreaubaaee002006-06-26 02:48:02 +02001105 p = proxy;
Willy Tarreaub0b37bc2008-06-23 14:00:57 +02001106 tv_update_date(0,1); /* else, the old time before select will be used */
Willy Tarreaubaaee002006-06-26 02:48:02 +02001107 while (p) {
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001108 err |= !resume_proxy(p);
1109 p = p->next;
1110 }
Willy Tarreaubaaee002006-06-26 02:48:02 +02001111
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001112 prs = peers;
1113 while (prs) {
Willy Tarreau337a6662015-09-28 16:27:44 +02001114 if (prs->peers_fe)
1115 err |= !resume_proxy(prs->peers_fe);
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001116 prs = prs->next;
1117 }
Willy Tarreaube58c382011-07-24 18:28:10 +02001118
Willy Tarreauc03ebbf2011-09-07 21:33:14 +02001119 if (err) {
1120 Warning("Some proxies refused to resume, a restart is probably needed to resume safe operations.\n");
1121 send_log(p, LOG_WARNING, "Some proxies refused to resume, a restart is probably needed to resume safe operations.\n");
Willy Tarreaubaaee002006-06-26 02:48:02 +02001122 }
1123}
1124
Willy Tarreau87b09662015-04-03 00:22:06 +02001125/* Set current stream's backend to <be>. Nothing is done if the
1126 * stream already had a backend assigned, which is indicated by
Willy Tarreaue7dff022015-04-03 01:14:29 +02001127 * s->flags & SF_BE_ASSIGNED.
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001128 * All flags, stats and counters which need be updated are updated.
Willy Tarreaubedb9ba2009-07-12 08:27:39 +02001129 * Returns 1 if done, 0 in case of internal error, eg: lack of resource.
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001130 */
Willy Tarreau87b09662015-04-03 00:22:06 +02001131int stream_set_backend(struct stream *s, struct proxy *be)
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001132{
Christopher Fauletd7c91962015-04-30 11:48:27 +02001133 struct filter *filter;
1134
Willy Tarreaue7dff022015-04-03 01:14:29 +02001135 if (s->flags & SF_BE_ASSIGNED)
Willy Tarreaubedb9ba2009-07-12 08:27:39 +02001136 return 1;
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001137 s->be = be;
1138 be->beconn++;
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001139 if (be->beconn > be->be_counters.conn_max)
1140 be->be_counters.conn_max = be->beconn;
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001141 proxy_inc_be_ctr(be);
1142
Christopher Fauletd7c91962015-04-30 11:48:27 +02001143 if (strm_fe(s) != be) {
1144 list_for_each_entry(filter, &be->filters, list) {
1145 struct filter *f = pool_alloc2(pool2_filter);
1146 if (!f)
1147 return 0; /* not enough memory */
1148 memset(f, 0, sizeof(*f));
1149 f->id = filter->id;
1150 f->ops = filter->ops;
1151 f->conf = filter->conf;
1152 f->is_backend_filter = 1;
1153 LIST_ADDQ(&s->strm_flt.filters, &f->list);
1154 }
1155 }
1156
Willy Tarreau87b09662015-04-03 00:22:06 +02001157 /* assign new parameters to the stream from the new backend */
Willy Tarreauf27b5ea2009-10-03 22:01:18 +02001158 s->si[1].flags &= ~SI_FL_INDEP_STR;
1159 if (be->options2 & PR_O2_INDEPSTR)
1160 s->si[1].flags |= SI_FL_INDEP_STR;
1161
Willy Tarreau9fbe18e2015-05-01 22:42:08 +02001162 /* We want to enable the backend-specific analysers except those which
1163 * were already run as part of the frontend/listener. Note that it would
1164 * be more reliable to store the list of analysers that have been run,
1165 * but what we do here is OK for now.
1166 */
Christopher Fauletd7c91962015-04-30 11:48:27 +02001167 s->req.analysers |= be->be_req_ana & (strm_li(s) ? ~strm_li(s)->analysers : 0);
Willy Tarreau9fbe18e2015-05-01 22:42:08 +02001168
Willy Tarreau51aecc72009-07-12 09:47:04 +02001169 /* If the target backend requires HTTP processing, we have to allocate
Willy Tarreaueee5b512015-04-03 23:46:31 +02001170 * the HTTP transaction and hdr_idx if we did not have one.
Willy Tarreau51aecc72009-07-12 09:47:04 +02001171 */
Willy Tarreaueee5b512015-04-03 23:46:31 +02001172 if (unlikely(!s->txn && be->http_needed)) {
1173 if (unlikely(!http_alloc_txn(s)))
Willy Tarreau51aecc72009-07-12 09:47:04 +02001174 return 0; /* not enough memory */
Willy Tarreau39e4f622010-05-31 17:01:36 +02001175
1176 /* and now initialize the HTTP transaction state */
1177 http_init_txn(s);
Willy Tarreau51aecc72009-07-12 09:47:04 +02001178 }
1179
Willy Tarreaueee5b512015-04-03 23:46:31 +02001180 if (s->txn) {
1181 if (be->options2 & PR_O2_RSPBUG_OK)
1182 s->txn->rsp.err_pos = -1; /* let buggy responses pass */
Willy Tarreau4e21ff92014-09-30 18:44:22 +02001183
Willy Tarreaueee5b512015-04-03 23:46:31 +02001184 /* If we chain to an HTTP backend running a different HTTP mode, we
1185 * have to re-adjust the desired keep-alive/close mode to accommodate
1186 * both the frontend's and the backend's modes.
1187 */
Willy Tarreaud0d8da92015-04-04 02:10:38 +02001188 if (strm_fe(s)->mode == PR_MODE_HTTP && be->mode == PR_MODE_HTTP &&
1189 ((strm_fe(s)->options & PR_O_HTTP_MODE) != (be->options & PR_O_HTTP_MODE)))
Willy Tarreaueee5b512015-04-03 23:46:31 +02001190 http_adjust_conn_mode(s, s->txn, &s->txn->req);
Willy Tarreau80a92c02014-03-12 10:41:13 +01001191
Willy Tarreaueee5b512015-04-03 23:46:31 +02001192 /* If an LB algorithm needs to access some pre-parsed body contents,
1193 * we must not start to forward anything until the connection is
1194 * confirmed otherwise we'll lose the pointer to these data and
1195 * prevent the hash from being doable again after a redispatch.
1196 */
1197 if (be->mode == PR_MODE_HTTP &&
1198 (be->lbprm.algo & (BE_LB_KIND | BE_LB_PARM)) == (BE_LB_KIND_HI | BE_LB_HASH_PRM))
1199 s->txn->req.flags |= HTTP_MSGF_WAIT_CONN;
Willy Tarreau9fbe18e2015-05-01 22:42:08 +02001200
1201 /* we may request to parse a request body */
1202 if ((be->options & PR_O_WREQ_BODY) &&
1203 (s->txn->req.body_len || (s->txn->req.flags & HTTP_MSGF_TE_CHNK)))
1204 s->req.analysers |= AN_REQ_HTTP_BODY;
Willy Tarreaueee5b512015-04-03 23:46:31 +02001205 }
1206
1207 s->flags |= SF_BE_ASSIGNED;
Willy Tarreau96e31212011-05-30 18:10:30 +02001208 if (be->options2 & PR_O2_NODELAY) {
Willy Tarreau22ec1ea2014-11-27 20:45:39 +01001209 s->req.flags |= CF_NEVER_WAIT;
1210 s->res.flags |= CF_NEVER_WAIT;
Willy Tarreau96e31212011-05-30 18:10:30 +02001211 }
1212
Willy Tarreaubedb9ba2009-07-12 08:27:39 +02001213 return 1;
Willy Tarreau1d0dfb12009-07-07 15:10:31 +02001214}
1215
Willy Tarreaudc13c112013-06-21 23:16:39 +02001216static struct cfg_kw_list cfg_kws = {ILH, {
Willy Tarreau9de1bbd2008-07-09 20:34:27 +02001217 { CFG_LISTEN, "timeout", proxy_parse_timeout },
1218 { CFG_LISTEN, "clitimeout", proxy_parse_timeout },
1219 { CFG_LISTEN, "contimeout", proxy_parse_timeout },
1220 { CFG_LISTEN, "srvtimeout", proxy_parse_timeout },
Willy Tarreau3a7d2072009-03-05 23:48:25 +01001221 { CFG_LISTEN, "rate-limit", proxy_parse_rate_limit },
Willy Tarreauc35362a2014-04-25 13:58:37 +02001222 { CFG_LISTEN, "max-keep-alive-queue", proxy_parse_max_ka_queue },
Thierry FOURNIERa0a1b752015-05-26 17:44:32 +02001223 { CFG_LISTEN, "declare", proxy_parse_declare },
Willy Tarreau9de1bbd2008-07-09 20:34:27 +02001224 { 0, NULL, NULL },
1225}};
1226
1227__attribute__((constructor))
1228static void __proxy_module_init(void)
1229{
1230 cfg_register_keywords(&cfg_kws);
1231}
Willy Tarreaubaaee002006-06-26 02:48:02 +02001232
1233/*
1234 * Local variables:
1235 * c-indent-level: 8
1236 * c-basic-offset: 8
1237 * End:
1238 */