blob: f2272a402ee780ec52ca9bcc6b305b5489d2a04b [file] [log] [blame]
Willy Tarreaue6b98942007-10-29 01:09:36 +01001/*
2 * AF_INET/AF_INET6 SOCK_STREAM protocol layer (tcp)
3 *
Willy Tarreaud4c33c82013-01-07 21:59:07 +01004 * Copyright 2000-2013 Willy Tarreau <w@1wt.eu>
Willy Tarreaue6b98942007-10-29 01:09:36 +01005 *
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 <ctype.h>
14#include <errno.h>
15#include <fcntl.h>
16#include <stdio.h>
17#include <stdlib.h>
18#include <string.h>
19#include <time.h>
20
21#include <sys/param.h>
22#include <sys/socket.h>
23#include <sys/stat.h>
24#include <sys/types.h>
25#include <sys/un.h>
26
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +040027#include <netinet/tcp.h>
28
Willy Tarreaub6866442008-07-14 23:54:42 +020029#include <common/cfgparse.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010030#include <common/compat.h>
31#include <common/config.h>
32#include <common/debug.h>
33#include <common/errors.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010034#include <common/mini-clist.h>
35#include <common/standard.h>
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +010036#include <common/namespace.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010037
Willy Tarreaue6b98942007-10-29 01:09:36 +010038#include <types/global.h>
Willy Tarreau18bf01e2014-06-13 16:18:52 +020039#include <types/capture.h>
Willy Tarreau9650f372009-08-16 14:02:45 +020040#include <types/server.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010041
42#include <proto/acl.h>
Willy Tarreau9fcb9842012-04-20 14:45:49 +020043#include <proto/arg.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020044#include <proto/channel.h>
Willy Tarreaud2274c62012-07-06 14:29:45 +020045#include <proto/connection.h>
Willy Tarreaudd2f85e2012-09-02 22:34:23 +020046#include <proto/fd.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020047#include <proto/listener.h>
Willy Tarreau9650f372009-08-16 14:02:45 +020048#include <proto/log.h>
49#include <proto/port_range.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020050#include <proto/protocol.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010051#include <proto/proto_tcp.h>
Willy Tarreaub6866442008-07-14 23:54:42 +020052#include <proto/proxy.h>
Willy Tarreaucd3b0942012-04-27 21:52:18 +020053#include <proto/sample.h>
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +020054#include <proto/session.h>
Willy Tarreaua975b8f2010-06-05 19:13:27 +020055#include <proto/stick_table.h>
Willy Tarreaucc1e04b2013-09-11 23:20:29 +020056#include <proto/stream_interface.h>
Willy Tarreaua975b8f2010-06-05 19:13:27 +020057#include <proto/task.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010058
Willy Tarreaue8c66af2008-01-13 18:40:14 +010059#ifdef CONFIG_HAP_CTTPROXY
60#include <import/ip_tproxy.h>
61#endif
62
Emeric Bruncf20bf12010-10-22 16:06:11 +020063static int tcp_bind_listeners(struct protocol *proto, char *errmsg, int errlen);
64static int tcp_bind_listener(struct listener *listener, char *errmsg, int errlen);
Willy Tarreaue6b98942007-10-29 01:09:36 +010065
Thierry FOURNIERcc87a112014-12-12 19:41:33 +010066/* List head of all known action keywords for "tcp-request connection" */
67struct list tcp_req_conn_keywords = LIST_HEAD_INIT(tcp_req_conn_keywords);
68struct list tcp_req_cont_keywords = LIST_HEAD_INIT(tcp_req_cont_keywords);
69struct list tcp_res_cont_keywords = LIST_HEAD_INIT(tcp_res_cont_keywords);
70
Willy Tarreaue6b98942007-10-29 01:09:36 +010071/* Note: must not be declared <const> as its list will be overwritten */
72static struct protocol proto_tcpv4 = {
73 .name = "tcpv4",
74 .sock_domain = AF_INET,
75 .sock_type = SOCK_STREAM,
76 .sock_prot = IPPROTO_TCP,
77 .sock_family = AF_INET,
78 .sock_addrlen = sizeof(struct sockaddr_in),
79 .l3_addrlen = 32/8,
Willy Tarreaubbebbbf2012-05-07 21:22:09 +020080 .accept = &listener_accept,
Willy Tarreau26d8c592012-05-07 18:12:14 +020081 .connect = tcp_connect_server,
Emeric Bruncf20bf12010-10-22 16:06:11 +020082 .bind = tcp_bind_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +010083 .bind_all = tcp_bind_listeners,
84 .unbind_all = unbind_all_listeners,
85 .enable_all = enable_all_listeners,
Willy Tarreau59b94792012-05-11 16:16:40 +020086 .get_src = tcp_get_src,
87 .get_dst = tcp_get_dst,
Willy Tarreau2b57cb82013-06-10 19:56:38 +020088 .drain = tcp_drain,
Willy Tarreau092d8652014-07-07 20:22:12 +020089 .pause = tcp_pause_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +010090 .listeners = LIST_HEAD_INIT(proto_tcpv4.listeners),
91 .nb_listeners = 0,
92};
93
94/* Note: must not be declared <const> as its list will be overwritten */
95static struct protocol proto_tcpv6 = {
96 .name = "tcpv6",
97 .sock_domain = AF_INET6,
98 .sock_type = SOCK_STREAM,
99 .sock_prot = IPPROTO_TCP,
100 .sock_family = AF_INET6,
101 .sock_addrlen = sizeof(struct sockaddr_in6),
102 .l3_addrlen = 128/8,
Willy Tarreaubbebbbf2012-05-07 21:22:09 +0200103 .accept = &listener_accept,
Willy Tarreau26d8c592012-05-07 18:12:14 +0200104 .connect = tcp_connect_server,
Emeric Bruncf20bf12010-10-22 16:06:11 +0200105 .bind = tcp_bind_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +0100106 .bind_all = tcp_bind_listeners,
107 .unbind_all = unbind_all_listeners,
108 .enable_all = enable_all_listeners,
Willy Tarreau59b94792012-05-11 16:16:40 +0200109 .get_src = tcp_get_src,
110 .get_dst = tcp_get_dst,
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200111 .drain = tcp_drain,
Willy Tarreau092d8652014-07-07 20:22:12 +0200112 .pause = tcp_pause_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +0100113 .listeners = LIST_HEAD_INIT(proto_tcpv6.listeners),
114 .nb_listeners = 0,
115};
116
Thierry FOURNIERcc87a112014-12-12 19:41:33 +0100117/*
118 * Register keywords.
119 */
120void tcp_req_conn_keywords_register(struct tcp_action_kw_list *kw_list)
121{
122 LIST_ADDQ(&tcp_req_conn_keywords, &kw_list->list);
123}
124
125void tcp_req_cont_keywords_register(struct tcp_action_kw_list *kw_list)
126{
127 LIST_ADDQ(&tcp_req_cont_keywords, &kw_list->list);
128}
129
130void tcp_res_cont_keywords_register(struct tcp_action_kw_list *kw_list)
131{
132 LIST_ADDQ(&tcp_res_cont_keywords, &kw_list->list);
133}
134
135/*
136 * Return the struct http_req_action_kw associated to a keyword.
137 */
138static struct tcp_action_kw *tcp_req_conn_action(const char *kw)
139{
140 struct tcp_action_kw_list *kw_list;
141 int i;
142
143 if (LIST_ISEMPTY(&tcp_req_conn_keywords))
144 return NULL;
145
146 list_for_each_entry(kw_list, &tcp_req_conn_keywords, list) {
147 for (i = 0; kw_list->kw[i].kw != NULL; i++) {
148 if (!strcmp(kw, kw_list->kw[i].kw))
149 return &kw_list->kw[i];
150 }
151 }
152 return NULL;
153}
154
155static struct tcp_action_kw *tcp_req_cont_action(const char *kw)
156{
157 struct tcp_action_kw_list *kw_list;
158 int i;
159
160 if (LIST_ISEMPTY(&tcp_req_cont_keywords))
161 return NULL;
162
163 list_for_each_entry(kw_list, &tcp_req_cont_keywords, list) {
164 for (i = 0; kw_list->kw[i].kw != NULL; i++) {
165 if (!strcmp(kw, kw_list->kw[i].kw))
166 return &kw_list->kw[i];
167 }
168 }
169 return NULL;
170}
171
172static struct tcp_action_kw *tcp_res_cont_action(const char *kw)
173{
174 struct tcp_action_kw_list *kw_list;
175 int i;
176
177 if (LIST_ISEMPTY(&tcp_res_cont_keywords))
178 return NULL;
179
180 list_for_each_entry(kw_list, &tcp_res_cont_keywords, list) {
181 for (i = 0; kw_list->kw[i].kw != NULL; i++) {
182 if (!strcmp(kw, kw_list->kw[i].kw))
183 return &kw_list->kw[i];
184 }
185 }
186 return NULL;
187}
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100188
David du Colombier6f5ccb12011-03-10 22:26:24 +0100189/* Binds ipv4/ipv6 address <local> to socket <fd>, unless <flags> is set, in which
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100190 * case we try to bind <remote>. <flags> is a 2-bit field consisting of :
191 * - 0 : ignore remote address (may even be a NULL pointer)
192 * - 1 : use provided address
193 * - 2 : use provided port
194 * - 3 : use both
195 *
196 * The function supports multiple foreign binding methods :
197 * - linux_tproxy: we directly bind to the foreign address
198 * - cttproxy: we bind to a local address then nat.
199 * The second one can be used as a fallback for the first one.
200 * This function returns 0 when everything's OK, 1 if it could not bind, to the
201 * local address, 2 if it could not bind to the foreign address.
202 */
David du Colombier6f5ccb12011-03-10 22:26:24 +0100203int tcp_bind_socket(int fd, int flags, struct sockaddr_storage *local, struct sockaddr_storage *remote)
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100204{
David du Colombier6f5ccb12011-03-10 22:26:24 +0100205 struct sockaddr_storage bind_addr;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100206 int foreign_ok = 0;
207 int ret;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100208 static int ip_transp_working = 1;
David du Colombier65c17962012-07-13 14:34:59 +0200209 static int ip6_transp_working = 1;
Pieter Baauwd551fb52013-05-08 22:49:23 +0200210
David du Colombier65c17962012-07-13 14:34:59 +0200211 switch (local->ss_family) {
212 case AF_INET:
213 if (flags && ip_transp_working) {
Pieter Baauwd551fb52013-05-08 22:49:23 +0200214 /* This deserves some explanation. Some platforms will support
215 * multiple combinations of certain methods, so we try the
216 * supported ones until one succeeds.
217 */
218 if (0
219#if defined(IP_TRANSPARENT)
220 || (setsockopt(fd, SOL_IP, IP_TRANSPARENT, &one, sizeof(one)) == 0)
221#endif
222#if defined(IP_FREEBIND)
223 || (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == 0)
224#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200225#if defined(IP_BINDANY)
226 || (setsockopt(fd, IPPROTO_IP, IP_BINDANY, &one, sizeof(one)) == 0)
227#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200228#if defined(SO_BINDANY)
229 || (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == 0)
230#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200231 )
David du Colombier65c17962012-07-13 14:34:59 +0200232 foreign_ok = 1;
233 else
234 ip_transp_working = 0;
235 }
236 break;
237 case AF_INET6:
238 if (flags && ip6_transp_working) {
Pieter Baauwd551fb52013-05-08 22:49:23 +0200239 if (0
240#if defined(IPV6_TRANSPARENT)
241 || (setsockopt(fd, SOL_IPV6, IPV6_TRANSPARENT, &one, sizeof(one)) == 0)
242#endif
Lukas Tribus7640e722014-03-03 21:10:51 +0100243#if defined(IP_FREEBIND)
244 || (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == 0)
245#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200246#if defined(IPV6_BINDANY)
247 || (setsockopt(fd, IPPROTO_IPV6, IPV6_BINDANY, &one, sizeof(one)) == 0)
248#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200249#if defined(SO_BINDANY)
250 || (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == 0)
251#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200252 )
David du Colombier65c17962012-07-13 14:34:59 +0200253 foreign_ok = 1;
254 else
255 ip6_transp_working = 0;
256 }
257 break;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100258 }
Pieter Baauwd551fb52013-05-08 22:49:23 +0200259
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100260 if (flags) {
261 memset(&bind_addr, 0, sizeof(bind_addr));
Willy Tarreau96dd0792011-04-19 07:20:57 +0200262 bind_addr.ss_family = remote->ss_family;
David du Colombier6f5ccb12011-03-10 22:26:24 +0100263 switch (remote->ss_family) {
264 case AF_INET:
265 if (flags & 1)
266 ((struct sockaddr_in *)&bind_addr)->sin_addr = ((struct sockaddr_in *)remote)->sin_addr;
267 if (flags & 2)
268 ((struct sockaddr_in *)&bind_addr)->sin_port = ((struct sockaddr_in *)remote)->sin_port;
269 break;
270 case AF_INET6:
271 if (flags & 1)
272 ((struct sockaddr_in6 *)&bind_addr)->sin6_addr = ((struct sockaddr_in6 *)remote)->sin6_addr;
273 if (flags & 2)
274 ((struct sockaddr_in6 *)&bind_addr)->sin6_port = ((struct sockaddr_in6 *)remote)->sin6_port;
275 break;
Willy Tarreau5dc1e982011-12-16 21:25:11 +0100276 default:
277 /* we don't want to try to bind to an unknown address family */
278 foreign_ok = 0;
David du Colombier6f5ccb12011-03-10 22:26:24 +0100279 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100280 }
281
Simon Hormande072bd2011-06-24 15:11:37 +0900282 setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &one, sizeof(one));
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100283 if (foreign_ok) {
Willy Tarreau9cf8d3f2014-05-09 22:56:10 +0200284 if (is_inet_addr(&bind_addr)) {
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200285 ret = bind(fd, (struct sockaddr *)&bind_addr, get_addr_len(&bind_addr));
286 if (ret < 0)
287 return 2;
288 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100289 }
290 else {
Willy Tarreau9cf8d3f2014-05-09 22:56:10 +0200291 if (is_inet_addr(local)) {
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200292 ret = bind(fd, (struct sockaddr *)local, get_addr_len(local));
293 if (ret < 0)
294 return 1;
295 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100296 }
297
298 if (!flags)
299 return 0;
300
301#ifdef CONFIG_HAP_CTTPROXY
Willy Tarreau6f831b42011-03-20 14:03:54 +0100302 if (!foreign_ok && remote->ss_family == AF_INET) {
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100303 struct in_tproxy itp1, itp2;
304 memset(&itp1, 0, sizeof(itp1));
305
306 itp1.op = TPROXY_ASSIGN;
Willy Tarreau6f831b42011-03-20 14:03:54 +0100307 itp1.v.addr.faddr = ((struct sockaddr_in *)&bind_addr)->sin_addr;
308 itp1.v.addr.fport = ((struct sockaddr_in *)&bind_addr)->sin_port;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100309
310 /* set connect flag on socket */
311 itp2.op = TPROXY_FLAGS;
312 itp2.v.flags = ITP_CONNECT | ITP_ONCE;
313
314 if (setsockopt(fd, SOL_IP, IP_TPROXY, &itp1, sizeof(itp1)) != -1 &&
315 setsockopt(fd, SOL_IP, IP_TPROXY, &itp2, sizeof(itp2)) != -1) {
316 foreign_ok = 1;
317 }
318 }
319#endif
320 if (!foreign_ok)
321 /* we could not bind to a foreign address */
322 return 2;
323
324 return 0;
325}
Willy Tarreaue6b98942007-10-29 01:09:36 +0100326
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100327static int create_server_socket(struct connection *conn)
328{
Willy Tarreau529c1392014-12-24 13:47:55 +0100329 const struct netns_entry *ns = NULL;
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100330
Willy Tarreau529c1392014-12-24 13:47:55 +0100331#ifdef CONFIG_HAP_NS
332 if (objt_server(conn->target)) {
333 if (__objt_server(conn->target)->flags & SRV_F_USE_NS_FROM_PP)
334 ns = conn->proxy_netns;
335 else
336 ns = __objt_server(conn->target)->netns;
337 }
338#endif
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100339 return my_socketat(ns, conn->addr.to.ss_family, SOCK_STREAM, IPPROTO_TCP);
340}
Willy Tarreau9650f372009-08-16 14:02:45 +0200341
342/*
Willy Tarreau14f8e862012-08-30 22:23:13 +0200343 * This function initiates a TCP connection establishment to the target assigned
344 * to connection <conn> using (si->{target,addr.to}). A source address may be
345 * pointed to by conn->addr.from in case of transparent proxying. Normal source
346 * bind addresses are still determined locally (due to the possible need of a
347 * source port). conn->target may point either to a valid server or to a backend,
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100348 * depending on conn->target. Only OBJ_TYPE_PROXY and OBJ_TYPE_SERVER are
Willy Tarreauf0837b22012-11-24 10:24:27 +0100349 * supported. The <data> parameter is a boolean indicating whether there are data
350 * waiting for being sent or not, in order to adjust data write polling and on
351 * some platforms, the ability to avoid an empty initial ACK. The <delack> argument
352 * allows the caller to force using a delayed ACK when establishing the connection :
353 * - 0 = no delayed ACK unless data are advertised and backend has tcp-smart-connect
354 * - 1 = delayed ACK if backend has tcp-smart-connect, regardless of data
355 * - 2 = delayed ACK regardless of backend options
Willy Tarreaub1d67742010-03-29 19:36:59 +0200356 *
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200357 * Note that a pending send_proxy message accounts for data.
358 *
Willy Tarreau9650f372009-08-16 14:02:45 +0200359 * It can return one of :
360 * - SN_ERR_NONE if everything's OK
361 * - SN_ERR_SRVTO if there are no more servers
362 * - SN_ERR_SRVCL if the connection was refused by the server
363 * - SN_ERR_PRXCOND if the connection has been limited by the proxy (maxconn)
364 * - SN_ERR_RESOURCE if a system resource is lacking (eg: fd limits, ports, ...)
365 * - SN_ERR_INTERNAL for any other purely internal errors
366 * Additionnally, in the case of SN_ERR_RESOURCE, an emergency log will be emitted.
Willy Tarreau6b0a8502012-11-23 08:51:32 +0100367 *
368 * The connection's fd is inserted only when SN_ERR_NONE is returned, otherwise
369 * it's invalid and the caller has nothing to do.
Willy Tarreau9650f372009-08-16 14:02:45 +0200370 */
Willy Tarreauf1536862011-03-03 18:27:32 +0100371
Willy Tarreauf0837b22012-11-24 10:24:27 +0100372int tcp_connect_server(struct connection *conn, int data, int delack)
Willy Tarreau9650f372009-08-16 14:02:45 +0200373{
374 int fd;
Willy Tarreauac825402011-03-04 22:04:29 +0100375 struct server *srv;
376 struct proxy *be;
Willy Tarreaua4380b42012-12-08 22:49:11 +0100377 struct conn_src *src;
Willy Tarreauac825402011-03-04 22:04:29 +0100378
Willy Tarreau9ce70132014-01-24 16:08:19 +0100379 conn->flags = CO_FL_WAIT_L4_CONN; /* connection in progress */
380
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100381 switch (obj_type(conn->target)) {
382 case OBJ_TYPE_PROXY:
383 be = objt_proxy(conn->target);
Willy Tarreauac825402011-03-04 22:04:29 +0100384 srv = NULL;
385 break;
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100386 case OBJ_TYPE_SERVER:
387 srv = objt_server(conn->target);
Willy Tarreauac825402011-03-04 22:04:29 +0100388 be = srv->proxy;
389 break;
390 default:
Willy Tarreau9ce70132014-01-24 16:08:19 +0100391 conn->flags |= CO_FL_ERROR;
Willy Tarreauac825402011-03-04 22:04:29 +0100392 return SN_ERR_INTERNAL;
393 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200394
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100395 fd = conn->t.sock.fd = create_server_socket(conn);
396
397 if (fd == -1) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200398 qfprintf(stderr, "Cannot get a server socket.\n");
399
Willy Tarreau9ce70132014-01-24 16:08:19 +0100400 if (errno == ENFILE) {
401 conn->err_code = CO_ER_SYS_FDLIM;
Willy Tarreau9650f372009-08-16 14:02:45 +0200402 send_log(be, LOG_EMERG,
403 "Proxy %s reached system FD limit at %d. Please check system tunables.\n",
404 be->id, maxfd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100405 }
406 else if (errno == EMFILE) {
407 conn->err_code = CO_ER_PROC_FDLIM;
Willy Tarreau9650f372009-08-16 14:02:45 +0200408 send_log(be, LOG_EMERG,
409 "Proxy %s reached process FD limit at %d. Please check 'ulimit-n' and restart.\n",
410 be->id, maxfd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100411 }
412 else if (errno == ENOBUFS || errno == ENOMEM) {
413 conn->err_code = CO_ER_SYS_MEMLIM;
Willy Tarreau9650f372009-08-16 14:02:45 +0200414 send_log(be, LOG_EMERG,
415 "Proxy %s reached system memory limit at %d sockets. Please check system tunables.\n",
416 be->id, maxfd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100417 }
418 else if (errno == EAFNOSUPPORT || errno == EPROTONOSUPPORT) {
419 conn->err_code = CO_ER_NOPROTO;
420 }
421 else
422 conn->err_code = CO_ER_SOCK_ERR;
423
Willy Tarreau9650f372009-08-16 14:02:45 +0200424 /* this is a resource error */
Willy Tarreau9ce70132014-01-24 16:08:19 +0100425 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200426 return SN_ERR_RESOURCE;
427 }
428
429 if (fd >= global.maxsock) {
430 /* do not log anything there, it's a normal condition when this option
431 * is used to serialize connections to a server !
432 */
433 Alert("socket(): not enough free sockets. Raise -n argument. Giving up.\n");
434 close(fd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100435 conn->err_code = CO_ER_CONF_FDLIM;
436 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200437 return SN_ERR_PRXCOND; /* it is a configuration limit */
438 }
439
440 if ((fcntl(fd, F_SETFL, O_NONBLOCK)==-1) ||
Simon Hormande072bd2011-06-24 15:11:37 +0900441 (setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &one, sizeof(one)) == -1)) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200442 qfprintf(stderr,"Cannot set client socket to non blocking mode.\n");
443 close(fd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100444 conn->err_code = CO_ER_SOCK_ERR;
445 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200446 return SN_ERR_INTERNAL;
447 }
448
449 if (be->options & PR_O_TCP_SRV_KA)
Simon Hormande072bd2011-06-24 15:11:37 +0900450 setsockopt(fd, SOL_SOCKET, SO_KEEPALIVE, &one, sizeof(one));
Willy Tarreau9650f372009-08-16 14:02:45 +0200451
Willy Tarreau9650f372009-08-16 14:02:45 +0200452 /* allow specific binding :
453 * - server-specific at first
454 * - proxy-specific next
455 */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100456 if (srv && srv->conn_src.opts & CO_SRC_BIND)
457 src = &srv->conn_src;
458 else if (be->conn_src.opts & CO_SRC_BIND)
459 src = &be->conn_src;
460 else
461 src = NULL;
462
463 if (src) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200464 int ret, flags = 0;
465
Willy Tarreau9cf8d3f2014-05-09 22:56:10 +0200466 if (is_inet_addr(&conn->addr.from)) {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100467 switch (src->opts & CO_SRC_TPROXY_MASK) {
Willy Tarreauef9a3602012-12-08 22:29:20 +0100468 case CO_SRC_TPROXY_ADDR:
469 case CO_SRC_TPROXY_CLI:
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200470 flags = 3;
471 break;
Willy Tarreauef9a3602012-12-08 22:29:20 +0100472 case CO_SRC_TPROXY_CIP:
473 case CO_SRC_TPROXY_DYN:
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200474 flags = 1;
475 break;
476 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200477 }
Willy Tarreaub1d67742010-03-29 19:36:59 +0200478
Willy Tarreau9650f372009-08-16 14:02:45 +0200479#ifdef SO_BINDTODEVICE
480 /* Note: this might fail if not CAP_NET_RAW */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100481 if (src->iface_name)
482 setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE, src->iface_name, src->iface_len + 1);
Willy Tarreau9650f372009-08-16 14:02:45 +0200483#endif
484
Willy Tarreaua4380b42012-12-08 22:49:11 +0100485 if (src->sport_range) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200486 int attempts = 10; /* should be more than enough to find a spare port */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100487 struct sockaddr_storage sa;
Willy Tarreau9650f372009-08-16 14:02:45 +0200488
489 ret = 1;
Willy Tarreaua4380b42012-12-08 22:49:11 +0100490 sa = src->source_addr;
Willy Tarreau9650f372009-08-16 14:02:45 +0200491
492 do {
493 /* note: in case of retry, we may have to release a previously
494 * allocated port, hence this loop's construct.
495 */
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200496 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
497 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200498
499 if (!attempts)
500 break;
501 attempts--;
502
Willy Tarreaua4380b42012-12-08 22:49:11 +0100503 fdinfo[fd].local_port = port_range_alloc_port(src->sport_range);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100504 if (!fdinfo[fd].local_port) {
505 conn->err_code = CO_ER_PORT_RANGE;
Willy Tarreau9650f372009-08-16 14:02:45 +0200506 break;
Willy Tarreau9ce70132014-01-24 16:08:19 +0100507 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200508
Willy Tarreaua4380b42012-12-08 22:49:11 +0100509 fdinfo[fd].port_range = src->sport_range;
510 set_host_port(&sa, fdinfo[fd].local_port);
Willy Tarreau9650f372009-08-16 14:02:45 +0200511
Willy Tarreaua4380b42012-12-08 22:49:11 +0100512 ret = tcp_bind_socket(fd, flags, &sa, &conn->addr.from);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100513 if (ret != 0)
514 conn->err_code = CO_ER_CANT_BIND;
Willy Tarreau9650f372009-08-16 14:02:45 +0200515 } while (ret != 0); /* binding NOK */
516 }
517 else {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100518 ret = tcp_bind_socket(fd, flags, &src->source_addr, &conn->addr.from);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100519 if (ret != 0)
520 conn->err_code = CO_ER_CANT_BIND;
Willy Tarreau9650f372009-08-16 14:02:45 +0200521 }
522
Willy Tarreaua4380b42012-12-08 22:49:11 +0100523 if (unlikely(ret != 0)) {
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200524 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
525 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200526 close(fd);
527
Willy Tarreau9650f372009-08-16 14:02:45 +0200528 if (ret == 1) {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100529 Alert("Cannot bind to source address before connect() for backend %s. Aborting.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200530 be->id);
531 send_log(be, LOG_EMERG,
Willy Tarreaua4380b42012-12-08 22:49:11 +0100532 "Cannot bind to source address before connect() for backend %s.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200533 be->id);
534 } else {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100535 Alert("Cannot bind to tproxy source address before connect() for backend %s. Aborting.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200536 be->id);
537 send_log(be, LOG_EMERG,
Willy Tarreaua4380b42012-12-08 22:49:11 +0100538 "Cannot bind to tproxy source address before connect() for backend %s.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200539 be->id);
540 }
Willy Tarreau9ce70132014-01-24 16:08:19 +0100541 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200542 return SN_ERR_RESOURCE;
543 }
544 }
545
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400546#if defined(TCP_QUICKACK)
Willy Tarreau9650f372009-08-16 14:02:45 +0200547 /* disabling tcp quick ack now allows the first request to leave the
548 * machine with the first ACK. We only do this if there are pending
Willy Tarreauf0837b22012-11-24 10:24:27 +0100549 * data in the buffer.
Willy Tarreau9650f372009-08-16 14:02:45 +0200550 */
Willy Tarreaufb20e462014-10-24 12:02:24 +0200551 if (delack == 2 || ((delack || data || conn->send_proxy_ofs) && (be->options2 & PR_O2_SMARTCON)))
Simon Hormande072bd2011-06-24 15:11:37 +0900552 setsockopt(fd, IPPROTO_TCP, TCP_QUICKACK, &zero, sizeof(zero));
Willy Tarreau9650f372009-08-16 14:02:45 +0200553#endif
554
Willy Tarreaue803de22010-01-21 17:43:04 +0100555 if (global.tune.server_sndbuf)
556 setsockopt(fd, SOL_SOCKET, SO_SNDBUF, &global.tune.server_sndbuf, sizeof(global.tune.server_sndbuf));
557
558 if (global.tune.server_rcvbuf)
559 setsockopt(fd, SOL_SOCKET, SO_RCVBUF, &global.tune.server_rcvbuf, sizeof(global.tune.server_rcvbuf));
560
Willy Tarreau986a9d22012-08-30 21:11:38 +0200561 if ((connect(fd, (struct sockaddr *)&conn->addr.to, get_addr_len(&conn->addr.to)) == -1) &&
Willy Tarreau9650f372009-08-16 14:02:45 +0200562 (errno != EINPROGRESS) && (errno != EALREADY) && (errno != EISCONN)) {
563
Willy Tarreaub1719512012-12-08 23:03:28 +0100564 if (errno == EAGAIN || errno == EADDRINUSE || errno == EADDRNOTAVAIL) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200565 char *msg;
Willy Tarreau9ce70132014-01-24 16:08:19 +0100566 if (errno == EAGAIN || errno == EADDRNOTAVAIL) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200567 msg = "no free ports";
Willy Tarreau9ce70132014-01-24 16:08:19 +0100568 conn->err_code = CO_ER_FREE_PORTS;
569 }
570 else {
Willy Tarreau9650f372009-08-16 14:02:45 +0200571 msg = "local address already in use";
Willy Tarreau9ce70132014-01-24 16:08:19 +0100572 conn->err_code = CO_ER_ADDR_INUSE;
573 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200574
Willy Tarreaub1719512012-12-08 23:03:28 +0100575 qfprintf(stderr,"Connect() failed for backend %s: %s.\n", be->id, msg);
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200576 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
577 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200578 close(fd);
Willy Tarreaub1719512012-12-08 23:03:28 +0100579 send_log(be, LOG_ERR, "Connect() failed for backend %s: %s.\n", be->id, msg);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100580 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200581 return SN_ERR_RESOURCE;
582 } else if (errno == ETIMEDOUT) {
583 //qfprintf(stderr,"Connect(): ETIMEDOUT");
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200584 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
585 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200586 close(fd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100587 conn->err_code = CO_ER_SOCK_ERR;
588 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200589 return SN_ERR_SRVTO;
590 } else {
591 // (errno == ECONNREFUSED || errno == ENETUNREACH || errno == EACCES || errno == EPERM)
592 //qfprintf(stderr,"Connect(): %d", errno);
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200593 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
594 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200595 close(fd);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100596 conn->err_code = CO_ER_SOCK_ERR;
597 conn->flags |= CO_FL_ERROR;
Willy Tarreau9650f372009-08-16 14:02:45 +0200598 return SN_ERR_SRVCL;
599 }
600 }
601
Willy Tarreaufc8f1f02012-12-08 18:53:44 +0100602 conn->flags |= CO_FL_ADDR_TO_SET;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200603
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200604 /* Prepare to send a few handshakes related to the on-wire protocol. */
605 if (conn->send_proxy_ofs)
Willy Tarreau57cd3e42013-10-24 22:01:26 +0200606 conn->flags |= CO_FL_SEND_PROXY;
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200607
Willy Tarreauf79c8172013-10-21 16:30:56 +0200608 conn_ctrl_init(conn); /* registers the FD */
Willy Tarreauad38ace2013-12-15 14:19:38 +0100609 fdtab[fd].linger_risk = 1; /* close hard if needed */
Willy Tarreau986a9d22012-08-30 21:11:38 +0200610 conn_sock_want_send(conn); /* for connect status */
Willy Tarreau15678ef2012-08-31 13:54:11 +0200611
Willy Tarreauf7bc57c2012-10-03 00:19:48 +0200612 if (conn_xprt_init(conn) < 0) {
Willy Tarreauf79c8172013-10-21 16:30:56 +0200613 conn_force_close(conn);
Willy Tarreau9ce70132014-01-24 16:08:19 +0100614 conn->flags |= CO_FL_ERROR;
Willy Tarreau15678ef2012-08-31 13:54:11 +0200615 return SN_ERR_RESOURCE;
Willy Tarreau184636e2012-09-06 14:04:41 +0200616 }
Willy Tarreau15678ef2012-08-31 13:54:11 +0200617
Willy Tarreau14f8e862012-08-30 22:23:13 +0200618 if (data)
Willy Tarreau986a9d22012-08-30 21:11:38 +0200619 conn_data_want_send(conn); /* prepare to send data if any */
Willy Tarreau9650f372009-08-16 14:02:45 +0200620
Willy Tarreau9650f372009-08-16 14:02:45 +0200621 return SN_ERR_NONE; /* connection is OK */
622}
623
624
Willy Tarreau59b94792012-05-11 16:16:40 +0200625/*
626 * Retrieves the source address for the socket <fd>, with <dir> indicating
627 * if we're a listener (=0) or an initiator (!=0). It returns 0 in case of
628 * success, -1 in case of error. The socket's source address is stored in
629 * <sa> for <salen> bytes.
630 */
631int tcp_get_src(int fd, struct sockaddr *sa, socklen_t salen, int dir)
632{
633 if (dir)
634 return getsockname(fd, sa, &salen);
635 else
636 return getpeername(fd, sa, &salen);
637}
638
639
640/*
641 * Retrieves the original destination address for the socket <fd>, with <dir>
642 * indicating if we're a listener (=0) or an initiator (!=0). In the case of a
643 * listener, if the original destination address was translated, the original
644 * address is retrieved. It returns 0 in case of success, -1 in case of error.
645 * The socket's source address is stored in <sa> for <salen> bytes.
646 */
647int tcp_get_dst(int fd, struct sockaddr *sa, socklen_t salen, int dir)
648{
649 if (dir)
650 return getpeername(fd, sa, &salen);
Willy Tarreau5e0d0e02014-10-29 21:46:01 +0100651 else {
652 int ret = getsockname(fd, sa, &salen);
653
654 if (ret < 0)
655 return ret;
656
Willy Tarreau59b94792012-05-11 16:16:40 +0200657#if defined(TPROXY) && defined(SO_ORIGINAL_DST)
Willy Tarreau5e0d0e02014-10-29 21:46:01 +0100658 /* For TPROXY and Netfilter's NAT, we can retrieve the original
659 * IPv4 address before DNAT/REDIRECT. We must not do that with
660 * other families because v6-mapped IPv4 addresses are still
661 * reported as v4.
662 */
663 if (((struct sockaddr_storage *)sa)->ss_family == AF_INET
664 && getsockopt(fd, SOL_IP, SO_ORIGINAL_DST, sa, &salen) == 0)
665 return 0;
Willy Tarreau59b94792012-05-11 16:16:40 +0200666#endif
Willy Tarreau5e0d0e02014-10-29 21:46:01 +0100667 return ret;
668 }
Willy Tarreau59b94792012-05-11 16:16:40 +0200669}
670
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200671/* Tries to drain any pending incoming data from the socket to reach the
Willy Tarreau7f4bcc32014-01-20 11:26:12 +0100672 * receive shutdown. Returns positive if the shutdown was found, negative
673 * if EAGAIN was hit, otherwise zero. This is useful to decide whether we
674 * can close a connection cleanly are we must kill it hard.
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200675 */
676int tcp_drain(int fd)
677{
678 int turns = 2;
679 int len;
680
681 while (turns) {
682#ifdef MSG_TRUNC_CLEARS_INPUT
683 len = recv(fd, NULL, INT_MAX, MSG_DONTWAIT | MSG_NOSIGNAL | MSG_TRUNC);
684 if (len == -1 && errno == EFAULT)
685#endif
686 len = recv(fd, trash.str, trash.size, MSG_DONTWAIT | MSG_NOSIGNAL);
687
Willy Tarreau3bd3e572014-01-20 11:56:37 +0100688 if (len == 0) {
689 /* cool, shutdown received */
690 fdtab[fd].linger_risk = 0;
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200691 return 1;
Willy Tarreau3bd3e572014-01-20 11:56:37 +0100692 }
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200693
694 if (len < 0) {
Willy Tarreauf817e9f2014-01-10 16:58:45 +0100695 if (errno == EAGAIN) {
696 /* connection not closed yet */
697 fd_cant_recv(fd);
Willy Tarreau7f4bcc32014-01-20 11:26:12 +0100698 return -1;
Willy Tarreauf817e9f2014-01-10 16:58:45 +0100699 }
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200700 if (errno == EINTR) /* oops, try again */
701 continue;
702 /* other errors indicate a dead connection, fine. */
Willy Tarreau3bd3e572014-01-20 11:56:37 +0100703 fdtab[fd].linger_risk = 0;
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200704 return 1;
705 }
706 /* OK we read some data, let's try again once */
707 turns--;
708 }
709 /* some data are still present, give up */
710 return 0;
711}
712
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200713/* This is the callback which is set when a connection establishment is pending
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100714 * and we have nothing to send. It updates the FD polling status. It returns 0
715 * if it fails in a fatal way or needs to poll to go further, otherwise it
716 * returns non-zero and removes the CO_FL_WAIT_L4_CONN flag from the connection's
717 * flags. In case of error, it sets CO_FL_ERROR and leaves the error code in
718 * errno. The error checking is done in two passes in order to limit the number
719 * of syscalls in the normal case :
720 * - if POLL_ERR was reported by the poller, we check for a pending error on
721 * the socket before proceeding. If found, it's assigned to errno so that
722 * upper layers can see it.
723 * - otherwise connect() is used to check the connection state again, since
724 * the getsockopt return cannot reliably be used to know if the connection
725 * is still pending or ready. This one may often return an error as well,
726 * since we don't always have POLL_ERR (eg: OSX or cached events).
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200727 */
Willy Tarreau239d7182012-07-23 18:53:03 +0200728int tcp_connect_probe(struct connection *conn)
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200729{
Willy Tarreau239d7182012-07-23 18:53:03 +0200730 int fd = conn->t.sock.fd;
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100731 socklen_t lskerr;
732 int skerr;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200733
Willy Tarreau80184712012-07-06 14:54:49 +0200734 if (conn->flags & CO_FL_ERROR)
Willy Tarreauafad0e02012-08-09 14:45:22 +0200735 return 0;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200736
Willy Tarreau3c728722014-01-23 13:50:42 +0100737 if (!conn_ctrl_ready(conn))
Willy Tarreauf79c8172013-10-21 16:30:56 +0200738 return 0;
739
Willy Tarreau80184712012-07-06 14:54:49 +0200740 if (!(conn->flags & CO_FL_WAIT_L4_CONN))
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200741 return 1; /* strange we were called while ready */
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200742
Willy Tarreaufd803bb2014-01-20 15:13:07 +0100743 if (!fd_send_ready(fd))
744 return 0;
745
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100746 /* we might be the first witness of FD_POLL_ERR. Note that FD_POLL_HUP
747 * without FD_POLL_IN also indicates a hangup without input data meaning
748 * there was no connection.
749 */
750 if (fdtab[fd].ev & FD_POLL_ERR ||
751 (fdtab[fd].ev & (FD_POLL_IN|FD_POLL_HUP)) == FD_POLL_HUP) {
752 skerr = 0;
753 lskerr = sizeof(skerr);
754 getsockopt(fd, SOL_SOCKET, SO_ERROR, &skerr, &lskerr);
755 errno = skerr;
756 if (errno == EAGAIN)
757 errno = 0;
758 if (errno)
759 goto out_error;
760 }
Willy Tarreau2da156f2012-07-23 15:07:23 +0200761
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100762 /* Use connect() to check the state of the socket. This has the
763 * advantage of giving us the following info :
Willy Tarreau2c6be842012-07-06 17:12:34 +0200764 * - error
765 * - connecting (EALREADY, EINPROGRESS)
766 * - connected (EISCONN, 0)
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200767 */
Willy Tarreau986a9d22012-08-30 21:11:38 +0200768 if (connect(fd, (struct sockaddr *)&conn->addr.to, get_addr_len(&conn->addr.to)) < 0) {
Willy Tarreauf9dabec2012-08-17 17:33:53 +0200769 if (errno == EALREADY || errno == EINPROGRESS) {
Willy Tarreaud486ef52012-12-10 17:03:52 +0100770 __conn_sock_stop_recv(conn);
Willy Tarreaue1f50c42014-01-22 20:02:06 +0100771 fd_cant_send(fd);
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200772 return 0;
Willy Tarreauf9dabec2012-08-17 17:33:53 +0200773 }
Willy Tarreaua190d592012-05-20 18:35:19 +0200774
Willy Tarreau2c6be842012-07-06 17:12:34 +0200775 if (errno && errno != EISCONN)
Willy Tarreaua190d592012-05-20 18:35:19 +0200776 goto out_error;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200777
Willy Tarreau2c6be842012-07-06 17:12:34 +0200778 /* otherwise we're connected */
Willy Tarreaua190d592012-05-20 18:35:19 +0200779 }
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200780
Willy Tarreau076be252012-07-06 16:02:29 +0200781 /* The FD is ready now, we'll mark the connection as complete and
Willy Tarreauf7bc57c2012-10-03 00:19:48 +0200782 * forward the event to the transport layer which will notify the
783 * data layer.
Willy Tarreaua190d592012-05-20 18:35:19 +0200784 */
Willy Tarreau80184712012-07-06 14:54:49 +0200785 conn->flags &= ~CO_FL_WAIT_L4_CONN;
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200786 return 1;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200787
788 out_error:
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200789 /* Write error on the file descriptor. Report it to the connection
790 * and disable polling on this FD.
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200791 */
Willy Tarreau3bd3e572014-01-20 11:56:37 +0100792 fdtab[fd].linger_risk = 0;
Willy Tarreau26f4a042013-12-04 23:44:10 +0100793 conn->flags |= CO_FL_ERROR | CO_FL_SOCK_RD_SH | CO_FL_SOCK_WR_SH;
Willy Tarreaud486ef52012-12-10 17:03:52 +0100794 __conn_sock_stop_both(conn);
Willy Tarreauafad0e02012-08-09 14:45:22 +0200795 return 0;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200796}
797
Willy Tarreau59b94792012-05-11 16:16:40 +0200798
Willy Tarreaue6b98942007-10-29 01:09:36 +0100799/* This function tries to bind a TCPv4/v6 listener. It may return a warning or
Willy Tarreau8ab505b2013-01-24 01:41:38 +0100800 * an error message in <errmsg> if the message is at most <errlen> bytes long
801 * (including '\0'). Note that <errmsg> may be NULL if <errlen> is also zero.
802 * The return value is composed from ERR_ABORT, ERR_WARN,
Willy Tarreaue6b98942007-10-29 01:09:36 +0100803 * ERR_ALERT, ERR_RETRYABLE and ERR_FATAL. ERR_NONE indicates that everything
804 * was alright and that no message was returned. ERR_RETRYABLE means that an
805 * error occurred but that it may vanish after a retry (eg: port in use), and
Aman Guptad94991d2012-04-06 17:39:26 -0700806 * ERR_FATAL indicates a non-fixable error. ERR_WARN and ERR_ALERT do not alter
Willy Tarreaue6b98942007-10-29 01:09:36 +0100807 * the meaning of the error, but just indicate that a message is present which
808 * should be displayed with the respective level. Last, ERR_ABORT indicates
809 * that it's pointless to try to start other listeners. No error message is
810 * returned if errlen is NULL.
811 */
812int tcp_bind_listener(struct listener *listener, char *errmsg, int errlen)
813{
814 __label__ tcp_return, tcp_close_return;
815 int fd, err;
Willy Tarreau40aa0702013-03-10 23:51:38 +0100816 int ext, ready;
817 socklen_t ready_len;
Willy Tarreaue6b98942007-10-29 01:09:36 +0100818 const char *msg = NULL;
819
820 /* ensure we never return garbage */
Willy Tarreau8ab505b2013-01-24 01:41:38 +0100821 if (errlen)
Willy Tarreaue6b98942007-10-29 01:09:36 +0100822 *errmsg = 0;
823
824 if (listener->state != LI_ASSIGNED)
825 return ERR_NONE; /* already bound */
826
827 err = ERR_NONE;
828
Willy Tarreau40aa0702013-03-10 23:51:38 +0100829 /* if the listener already has an fd assigned, then we were offered the
830 * fd by an external process (most likely the parent), and we don't want
831 * to create a new socket. However we still want to set a few flags on
832 * the socket.
833 */
834 fd = listener->fd;
835 ext = (fd >= 0);
836
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +0100837 if (!ext) {
838 fd = my_socketat(listener->netns, listener->addr.ss_family, SOCK_STREAM, IPPROTO_TCP);
839
840 if (fd == -1) {
841 err |= ERR_RETRYABLE | ERR_ALERT;
842 msg = "cannot create listening socket";
843 goto tcp_return;
844 }
Willy Tarreaue6b98942007-10-29 01:09:36 +0100845 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100846
Willy Tarreaue6b98942007-10-29 01:09:36 +0100847 if (fd >= global.maxsock) {
848 err |= ERR_FATAL | ERR_ABORT | ERR_ALERT;
849 msg = "not enough free sockets (raise '-n' parameter)";
850 goto tcp_close_return;
851 }
852
Willy Tarreaufb14edc2009-06-14 15:24:37 +0200853 if (fcntl(fd, F_SETFL, O_NONBLOCK) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100854 err |= ERR_FATAL | ERR_ALERT;
855 msg = "cannot make socket non-blocking";
856 goto tcp_close_return;
857 }
858
Willy Tarreau40aa0702013-03-10 23:51:38 +0100859 if (!ext && setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &one, sizeof(one)) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100860 /* not fatal but should be reported */
861 msg = "cannot do so_reuseaddr";
862 err |= ERR_ALERT;
863 }
864
865 if (listener->options & LI_O_NOLINGER)
Simon Hormande072bd2011-06-24 15:11:37 +0900866 setsockopt(fd, SOL_SOCKET, SO_LINGER, &nolinger, sizeof(struct linger));
Willy Tarreauedcf6682008-11-30 23:15:34 +0100867
Willy Tarreaue6b98942007-10-29 01:09:36 +0100868#ifdef SO_REUSEPORT
869 /* OpenBSD supports this. As it's present in old libc versions of Linux,
870 * it might return an error that we will silently ignore.
871 */
Willy Tarreau40aa0702013-03-10 23:51:38 +0100872 if (!ext)
873 setsockopt(fd, SOL_SOCKET, SO_REUSEPORT, &one, sizeof(one));
Willy Tarreaue6b98942007-10-29 01:09:36 +0100874#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200875
Willy Tarreau40aa0702013-03-10 23:51:38 +0100876 if (!ext && (listener->options & LI_O_FOREIGN)) {
David du Colombier65c17962012-07-13 14:34:59 +0200877 switch (listener->addr.ss_family) {
878 case AF_INET:
Pieter Baauwd551fb52013-05-08 22:49:23 +0200879 if (1
880#if defined(IP_TRANSPARENT)
881 && (setsockopt(fd, SOL_IP, IP_TRANSPARENT, &one, sizeof(one)) == -1)
882#endif
883#if defined(IP_FREEBIND)
884 && (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == -1)
885#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200886#if defined(IP_BINDANY)
887 && (setsockopt(fd, IPPROTO_IP, IP_BINDANY, &one, sizeof(one)) == -1)
888#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200889#if defined(SO_BINDANY)
890 && (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == -1)
891#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200892 ) {
David du Colombier65c17962012-07-13 14:34:59 +0200893 msg = "cannot make listening socket transparent";
894 err |= ERR_ALERT;
895 }
896 break;
897 case AF_INET6:
Pieter Baauwd551fb52013-05-08 22:49:23 +0200898 if (1
899#if defined(IPV6_TRANSPARENT)
900 && (setsockopt(fd, SOL_IPV6, IPV6_TRANSPARENT, &one, sizeof(one)) == -1)
901#endif
Lukas Tribus7640e722014-03-03 21:10:51 +0100902#if defined(IP_FREEBIND)
903 && (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == -1)
904#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200905#if defined(IPV6_BINDANY)
906 && (setsockopt(fd, IPPROTO_IPV6, IPV6_BINDANY, &one, sizeof(one)) == -1)
907#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200908#if defined(SO_BINDANY)
909 && (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == -1)
910#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200911 ) {
David du Colombier65c17962012-07-13 14:34:59 +0200912 msg = "cannot make listening socket transparent";
913 err |= ERR_ALERT;
914 }
915 break;
916 }
Willy Tarreaub1e52e82008-01-13 14:49:51 +0100917 }
Pieter Baauwd551fb52013-05-08 22:49:23 +0200918
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100919#ifdef SO_BINDTODEVICE
920 /* Note: this might fail if not CAP_NET_RAW */
Willy Tarreau40aa0702013-03-10 23:51:38 +0100921 if (!ext && listener->interface) {
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100922 if (setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE,
Willy Tarreau604e8302009-03-06 00:48:23 +0100923 listener->interface, strlen(listener->interface) + 1) == -1) {
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100924 msg = "cannot bind listener to device";
925 err |= ERR_WARN;
926 }
927 }
928#endif
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400929#if defined(TCP_MAXSEG)
Willy Tarreau48a7e722010-12-24 15:26:39 +0100930 if (listener->maxseg > 0) {
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400931 if (setsockopt(fd, IPPROTO_TCP, TCP_MAXSEG,
Willy Tarreaube1b9182009-06-14 18:48:19 +0200932 &listener->maxseg, sizeof(listener->maxseg)) == -1) {
933 msg = "cannot set MSS";
934 err |= ERR_WARN;
935 }
936 }
937#endif
Willy Tarreau2af207a2015-02-04 00:45:58 +0100938#if defined(TCP_USER_TIMEOUT)
939 if (listener->tcp_ut) {
940 if (setsockopt(fd, IPPROTO_TCP, TCP_USER_TIMEOUT,
941 &listener->tcp_ut, sizeof(listener->tcp_ut)) == -1) {
942 msg = "cannot set TCP User Timeout";
943 err |= ERR_WARN;
944 }
945 }
946#endif
Willy Tarreaucb6cd432009-10-13 07:34:14 +0200947#if defined(TCP_DEFER_ACCEPT)
948 if (listener->options & LI_O_DEF_ACCEPT) {
949 /* defer accept by up to one second */
950 int accept_delay = 1;
951 if (setsockopt(fd, IPPROTO_TCP, TCP_DEFER_ACCEPT, &accept_delay, sizeof(accept_delay)) == -1) {
952 msg = "cannot enable DEFER_ACCEPT";
953 err |= ERR_WARN;
954 }
955 }
956#endif
Willy Tarreau1c862c52012-10-05 16:21:00 +0200957#if defined(TCP_FASTOPEN)
958 if (listener->options & LI_O_TCP_FO) {
959 /* TFO needs a queue length, let's use the configured backlog */
960 int qlen = listener->backlog ? listener->backlog : listener->maxconn;
961 if (setsockopt(fd, IPPROTO_TCP, TCP_FASTOPEN, &qlen, sizeof(qlen)) == -1) {
962 msg = "cannot enable TCP_FASTOPEN";
963 err |= ERR_WARN;
964 }
965 }
966#endif
Willy Tarreau9b6700f2012-11-24 11:55:28 +0100967#if defined(IPV6_V6ONLY)
968 if (listener->options & LI_O_V6ONLY)
969 setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, &one, sizeof(one));
Willy Tarreau77e3af92012-11-24 15:07:23 +0100970 else if (listener->options & LI_O_V4V6)
971 setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, &zero, sizeof(zero));
Willy Tarreau9b6700f2012-11-24 11:55:28 +0100972#endif
973
Willy Tarreau40aa0702013-03-10 23:51:38 +0100974 if (!ext && bind(fd, (struct sockaddr *)&listener->addr, listener->proto->sock_addrlen) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100975 err |= ERR_RETRYABLE | ERR_ALERT;
976 msg = "cannot bind socket";
977 goto tcp_close_return;
978 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100979
Willy Tarreau40aa0702013-03-10 23:51:38 +0100980 ready = 0;
981 ready_len = sizeof(ready);
982 if (getsockopt(fd, SOL_SOCKET, SO_ACCEPTCONN, &ready, &ready_len) == -1)
983 ready = 0;
984
985 if (!(ext && ready) && /* only listen if not already done by external process */
986 listen(fd, listener->backlog ? listener->backlog : listener->maxconn) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100987 err |= ERR_RETRYABLE | ERR_ALERT;
988 msg = "cannot listen to socket";
989 goto tcp_close_return;
990 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100991
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400992#if defined(TCP_QUICKACK)
Willy Tarreau9ea05a72009-06-14 12:07:01 +0200993 if (listener->options & LI_O_NOQUICKACK)
Simon Hormande072bd2011-06-24 15:11:37 +0900994 setsockopt(fd, IPPROTO_TCP, TCP_QUICKACK, &zero, sizeof(zero));
Willy Tarreau9ea05a72009-06-14 12:07:01 +0200995#endif
996
Willy Tarreaue6b98942007-10-29 01:09:36 +0100997 /* the socket is ready */
998 listener->fd = fd;
999 listener->state = LI_LISTEN;
1000
Willy Tarreaueabf3132008-08-29 23:36:51 +02001001 fdtab[fd].owner = listener; /* reference the listener instead of a task */
Willy Tarreauaece46a2012-07-06 12:25:58 +02001002 fdtab[fd].iocb = listener->proto->accept;
Willy Tarreaueb472682010-05-28 18:46:57 +02001003 fd_insert(fd);
1004
Willy Tarreaue6b98942007-10-29 01:09:36 +01001005 tcp_return:
Cyril Bonté43ba1b32010-11-01 19:26:01 +01001006 if (msg && errlen) {
1007 char pn[INET6_ADDRSTRLEN];
1008
Willy Tarreau631f01c2011-09-05 00:36:48 +02001009 addr_to_str(&listener->addr, pn, sizeof(pn));
1010 snprintf(errmsg, errlen, "%s [%s:%d]", msg, pn, get_host_port(&listener->addr));
Cyril Bonté43ba1b32010-11-01 19:26:01 +01001011 }
Willy Tarreaue6b98942007-10-29 01:09:36 +01001012 return err;
1013
1014 tcp_close_return:
1015 close(fd);
1016 goto tcp_return;
1017}
1018
1019/* This function creates all TCP sockets bound to the protocol entry <proto>.
1020 * It is intended to be used as the protocol's bind_all() function.
1021 * The sockets will be registered but not added to any fd_set, in order not to
1022 * loose them across the fork(). A call to enable_all_listeners() is needed
1023 * to complete initialization. The return value is composed from ERR_*.
1024 */
Emeric Bruncf20bf12010-10-22 16:06:11 +02001025static int tcp_bind_listeners(struct protocol *proto, char *errmsg, int errlen)
Willy Tarreaue6b98942007-10-29 01:09:36 +01001026{
1027 struct listener *listener;
1028 int err = ERR_NONE;
1029
1030 list_for_each_entry(listener, &proto->listeners, proto_list) {
Emeric Bruncf20bf12010-10-22 16:06:11 +02001031 err |= tcp_bind_listener(listener, errmsg, errlen);
1032 if (err & ERR_ABORT)
Willy Tarreaue6b98942007-10-29 01:09:36 +01001033 break;
1034 }
1035
1036 return err;
1037}
1038
1039/* Add listener to the list of tcpv4 listeners. The listener's state
1040 * is automatically updated from LI_INIT to LI_ASSIGNED. The number of
1041 * listeners is updated. This is the function to use to add a new listener.
1042 */
1043void tcpv4_add_listener(struct listener *listener)
1044{
1045 if (listener->state != LI_INIT)
1046 return;
1047 listener->state = LI_ASSIGNED;
1048 listener->proto = &proto_tcpv4;
1049 LIST_ADDQ(&proto_tcpv4.listeners, &listener->proto_list);
1050 proto_tcpv4.nb_listeners++;
1051}
1052
1053/* Add listener to the list of tcpv4 listeners. The listener's state
1054 * is automatically updated from LI_INIT to LI_ASSIGNED. The number of
1055 * listeners is updated. This is the function to use to add a new listener.
1056 */
1057void tcpv6_add_listener(struct listener *listener)
1058{
1059 if (listener->state != LI_INIT)
1060 return;
1061 listener->state = LI_ASSIGNED;
1062 listener->proto = &proto_tcpv6;
1063 LIST_ADDQ(&proto_tcpv6.listeners, &listener->proto_list);
1064 proto_tcpv6.nb_listeners++;
1065}
1066
Willy Tarreau092d8652014-07-07 20:22:12 +02001067/* Pause a listener. Returns < 0 in case of failure, 0 if the listener
1068 * was totally stopped, or > 0 if correctly paused.
1069 */
1070int tcp_pause_listener(struct listener *l)
1071{
1072 if (shutdown(l->fd, SHUT_WR) != 0)
1073 return -1; /* Solaris dies here */
1074
1075 if (listen(l->fd, l->backlog ? l->backlog : l->maxconn) != 0)
1076 return -1; /* OpenBSD dies here */
1077
1078 if (shutdown(l->fd, SHUT_RD) != 0)
1079 return -1; /* should always be OK */
1080 return 1;
1081}
1082
Willy Tarreauedcf6682008-11-30 23:15:34 +01001083/* This function performs the TCP request analysis on the current request. It
1084 * returns 1 if the processing can continue on next analysers, or zero if it
1085 * needs more data, encounters an error, or wants to immediately abort the
Willy Tarreaufb356202010-08-03 14:02:05 +02001086 * request. It relies on buffers flags, and updates s->req->analysers. The
1087 * function may be called for frontend rules and backend rules. It only relies
1088 * on the backend pointer so this works for both cases.
Willy Tarreauedcf6682008-11-30 23:15:34 +01001089 */
Willy Tarreau7421efb2012-07-02 15:11:27 +02001090int tcp_inspect_request(struct session *s, struct channel *req, int an_bit)
Willy Tarreauedcf6682008-11-30 23:15:34 +01001091{
1092 struct tcp_rule *rule;
Willy Tarreaud1f96522010-08-03 19:34:32 +02001093 struct stksess *ts;
1094 struct stktable *t;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001095 int partial;
1096
Willy Tarreau02d6cfc2012-03-01 18:19:58 +01001097 DPRINTF(stderr,"[%u] %s: session=%p b=%p, exp(r,w)=%u,%u bf=%08x bh=%d analysers=%02x\n",
Willy Tarreauedcf6682008-11-30 23:15:34 +01001098 now_ms, __FUNCTION__,
1099 s,
1100 req,
1101 req->rex, req->wex,
1102 req->flags,
Willy Tarreau9b28e032012-10-12 23:49:43 +02001103 req->buf->i,
Willy Tarreauedcf6682008-11-30 23:15:34 +01001104 req->analysers);
1105
Willy Tarreauedcf6682008-11-30 23:15:34 +01001106 /* We don't know whether we have enough data, so must proceed
1107 * this way :
1108 * - iterate through all rules in their declaration order
1109 * - if one rule returns MISS, it means the inspect delay is
1110 * not over yet, then return immediately, otherwise consider
1111 * it as a non-match.
1112 * - if one rule returns OK, then return OK
1113 * - if one rule returns KO, then return KO
1114 */
1115
Willy Tarreau9b28e032012-10-12 23:49:43 +02001116 if ((req->flags & CF_SHUTR) || buffer_full(req->buf, global.tune.maxrewrite) ||
Willy Tarreau3bf1b2b2012-08-27 20:46:07 +02001117 !s->be->tcp_req.inspect_delay || tick_is_expired(req->analyse_exp, now_ms))
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001118 partial = SMP_OPT_FINAL;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001119 else
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001120 partial = 0;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001121
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001122 /* If "the current_rule_list" match the executed rule list, we are in
1123 * resume condition. If a resume is needed it is always in the action
1124 * and never in the ACL or converters. In this case, we initialise the
1125 * current rule, and go to the action execution point.
1126 */
1127 if (s->current_rule_list == &s->be->tcp_req.inspect_rules) {
1128 rule = LIST_ELEM(s->current_rule, typeof(rule), list);
1129 goto resume_execution;
1130 }
1131 s->current_rule_list = &s->be->tcp_req.inspect_rules;
Willy Tarreaufb356202010-08-03 14:02:05 +02001132 list_for_each_entry(rule, &s->be->tcp_req.inspect_rules, list) {
Willy Tarreau0cba6072013-11-28 22:21:02 +01001133 enum acl_test_res ret = ACL_TEST_PASS;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001134
1135 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001136 ret = acl_exec_cond(rule->cond, s->be, s, &s->txn, SMP_OPT_DIR_REQ | partial);
Willy Tarreau18bf01e2014-06-13 16:18:52 +02001137 if (ret == ACL_TEST_MISS)
1138 goto missing_data;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001139
1140 ret = acl_pass(ret);
1141 if (rule->cond->pol == ACL_COND_UNLESS)
1142 ret = !ret;
1143 }
1144
1145 if (ret) {
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001146
1147resume_execution:
1148
Willy Tarreauedcf6682008-11-30 23:15:34 +01001149 /* we have a matching rule. */
1150 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau8263d2b2012-08-28 00:06:31 +02001151 channel_abort(req);
1152 channel_abort(s->rep);
Willy Tarreauedcf6682008-11-30 23:15:34 +01001153 req->analysers = 0;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +02001154
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001155 s->be->be_counters.denied_req++;
1156 s->fe->fe_counters.denied_req++;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +02001157 if (s->listener->counters)
Willy Tarreau23968d82010-05-23 23:50:44 +02001158 s->listener->counters->denied_req++;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +02001159
Willy Tarreauedcf6682008-11-30 23:15:34 +01001160 if (!(s->flags & SN_ERR_MASK))
1161 s->flags |= SN_ERR_PRXCOND;
1162 if (!(s->flags & SN_FINST_MASK))
1163 s->flags |= SN_FINST_R;
1164 return 0;
1165 }
Willy Tarreau44778ad2013-10-30 19:24:00 +01001166 else if (rule->action >= TCP_ACT_TRK_SC0 && rule->action <= TCP_ACT_TRK_SCMAX) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001167 /* Note: only the first valid tracking parameter of each
1168 * applies.
1169 */
1170 struct stktable_key *key;
Willy Tarreau1b71eb52014-06-25 17:01:56 +02001171 struct sample smp;
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001172
Willy Tarreaucc08d2c2014-01-28 23:18:23 +01001173 if (stkctr_entry(&s->stkctr[tcp_trk_idx(rule->action)]))
Willy Tarreau44778ad2013-10-30 19:24:00 +01001174 continue;
1175
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001176 t = rule->act_prm.trk_ctr.table.t;
Willy Tarreau1b71eb52014-06-25 17:01:56 +02001177 key = stktable_fetch_key(t, s->be, s, &s->txn, SMP_OPT_DIR_REQ | partial, rule->act_prm.trk_ctr.expr, &smp);
1178
Willy Tarreau6bcb0a82014-07-30 08:56:35 +02001179 if ((smp.flags & SMP_F_MAY_CHANGE) && !(partial & SMP_OPT_FINAL))
1180 goto missing_data; /* key might appear later */
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001181
1182 if (key && (ts = stktable_get_entry(t, key))) {
Willy Tarreaud5ca9ab2013-05-28 17:40:25 +02001183 session_track_stkctr(&s->stkctr[tcp_trk_idx(rule->action)], t, ts);
Willy Tarreaucc08d2c2014-01-28 23:18:23 +01001184 stkctr_set_flags(&s->stkctr[tcp_trk_idx(rule->action)], STKCTR_TRACK_CONTENT);
Willy Tarreaud5ca9ab2013-05-28 17:40:25 +02001185 if (s->fe != s->be)
Willy Tarreaucc08d2c2014-01-28 23:18:23 +01001186 stkctr_set_flags(&s->stkctr[tcp_trk_idx(rule->action)], STKCTR_TRACK_BACKEND);
Willy Tarreaud1f96522010-08-03 19:34:32 +02001187 }
1188 }
Willy Tarreau18bf01e2014-06-13 16:18:52 +02001189 else if (rule->action == TCP_ACT_CAPTURE) {
1190 struct sample *key;
1191 struct cap_hdr *h = rule->act_prm.cap.hdr;
1192 char **cap = s->txn.req.cap;
1193 int len;
1194
1195 key = sample_fetch_string(s->be, s, &s->txn, SMP_OPT_DIR_REQ | partial, rule->act_prm.cap.expr);
1196 if (!key)
1197 continue;
1198
1199 if (key->flags & SMP_F_MAY_CHANGE)
1200 goto missing_data;
1201
1202 if (cap[h->index] == NULL)
1203 cap[h->index] = pool_alloc2(h->pool);
1204
1205 if (cap[h->index] == NULL) /* no more capture memory */
1206 continue;
1207
1208 len = key->data.str.len;
1209 if (len > h->len)
1210 len = h->len;
1211
1212 memcpy(cap[h->index], key->data.str.str, len);
1213 cap[h->index][len] = 0;
1214 }
Willy Tarreaud1f96522010-08-03 19:34:32 +02001215 else {
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001216 /* Custom keywords. */
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001217 if (rule->action_ptr(rule, s->be, s) == 0) {
1218 s->current_rule = &rule->list;
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001219 goto missing_data;
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001220 }
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001221
Willy Tarreauedcf6682008-11-30 23:15:34 +01001222 /* otherwise accept */
Willy Tarreaud1f96522010-08-03 19:34:32 +02001223 break;
1224 }
Willy Tarreauedcf6682008-11-30 23:15:34 +01001225 }
1226 }
1227
1228 /* if we get there, it means we have no rule which matches, or
1229 * we have an explicit accept, so we apply the default accept.
1230 */
Willy Tarreau3a816292009-07-07 10:55:49 +02001231 req->analysers &= ~an_bit;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001232 req->analyse_exp = TICK_ETERNITY;
1233 return 1;
Willy Tarreau18bf01e2014-06-13 16:18:52 +02001234
1235 missing_data:
1236 channel_dont_connect(req);
1237 /* just set the request timeout once at the beginning of the request */
1238 if (!tick_isset(req->analyse_exp) && s->be->tcp_req.inspect_delay)
1239 req->analyse_exp = tick_add(now_ms, s->be->tcp_req.inspect_delay);
1240 return 0;
1241
Willy Tarreauedcf6682008-11-30 23:15:34 +01001242}
1243
Emeric Brun97679e72010-09-23 17:56:44 +02001244/* This function performs the TCP response analysis on the current response. It
1245 * returns 1 if the processing can continue on next analysers, or zero if it
1246 * needs more data, encounters an error, or wants to immediately abort the
1247 * response. It relies on buffers flags, and updates s->rep->analysers. The
1248 * function may be called for backend rules.
1249 */
Willy Tarreau7421efb2012-07-02 15:11:27 +02001250int tcp_inspect_response(struct session *s, struct channel *rep, int an_bit)
Emeric Brun97679e72010-09-23 17:56:44 +02001251{
1252 struct tcp_rule *rule;
1253 int partial;
1254
Willy Tarreau02d6cfc2012-03-01 18:19:58 +01001255 DPRINTF(stderr,"[%u] %s: session=%p b=%p, exp(r,w)=%u,%u bf=%08x bh=%d analysers=%02x\n",
Emeric Brun97679e72010-09-23 17:56:44 +02001256 now_ms, __FUNCTION__,
1257 s,
1258 rep,
1259 rep->rex, rep->wex,
1260 rep->flags,
Willy Tarreau9b28e032012-10-12 23:49:43 +02001261 rep->buf->i,
Emeric Brun97679e72010-09-23 17:56:44 +02001262 rep->analysers);
1263
1264 /* We don't know whether we have enough data, so must proceed
1265 * this way :
1266 * - iterate through all rules in their declaration order
1267 * - if one rule returns MISS, it means the inspect delay is
1268 * not over yet, then return immediately, otherwise consider
1269 * it as a non-match.
1270 * - if one rule returns OK, then return OK
1271 * - if one rule returns KO, then return KO
1272 */
1273
Willy Tarreau03cdb7c2012-08-27 23:14:58 +02001274 if (rep->flags & CF_SHUTR || tick_is_expired(rep->analyse_exp, now_ms))
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001275 partial = SMP_OPT_FINAL;
Emeric Brun97679e72010-09-23 17:56:44 +02001276 else
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001277 partial = 0;
Emeric Brun97679e72010-09-23 17:56:44 +02001278
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001279 /* If "the current_rule_list" match the executed rule list, we are in
1280 * resume condition. If a resume is needed it is always in the action
1281 * and never in the ACL or converters. In this case, we initialise the
1282 * current rule, and go to the action execution point.
1283 */
1284 if (s->current_rule_list == &s->be->tcp_rep.inspect_rules) {
1285 rule = LIST_ELEM(s->current_rule, typeof(rule), list);
1286 goto resume_execution;
1287 }
1288 s->current_rule_list = &s->be->tcp_rep.inspect_rules;
Emeric Brun97679e72010-09-23 17:56:44 +02001289 list_for_each_entry(rule, &s->be->tcp_rep.inspect_rules, list) {
Willy Tarreau0cba6072013-11-28 22:21:02 +01001290 enum acl_test_res ret = ACL_TEST_PASS;
Emeric Brun97679e72010-09-23 17:56:44 +02001291
1292 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001293 ret = acl_exec_cond(rule->cond, s->be, s, &s->txn, SMP_OPT_DIR_RES | partial);
Thierry FOURNIERa65b3432013-11-28 18:22:00 +01001294 if (ret == ACL_TEST_MISS) {
Emeric Brun97679e72010-09-23 17:56:44 +02001295 /* just set the analyser timeout once at the beginning of the response */
1296 if (!tick_isset(rep->analyse_exp) && s->be->tcp_rep.inspect_delay)
Willy Tarreau0bb166b2013-11-04 15:56:53 +01001297 rep->analyse_exp = tick_add(now_ms, s->be->tcp_rep.inspect_delay);
Emeric Brun97679e72010-09-23 17:56:44 +02001298 return 0;
1299 }
1300
1301 ret = acl_pass(ret);
1302 if (rule->cond->pol == ACL_COND_UNLESS)
1303 ret = !ret;
1304 }
1305
1306 if (ret) {
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001307
1308resume_execution:
1309
Emeric Brun97679e72010-09-23 17:56:44 +02001310 /* we have a matching rule. */
1311 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau8263d2b2012-08-28 00:06:31 +02001312 channel_abort(rep);
1313 channel_abort(s->req);
Emeric Brun97679e72010-09-23 17:56:44 +02001314 rep->analysers = 0;
1315
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001316 s->be->be_counters.denied_resp++;
1317 s->fe->fe_counters.denied_resp++;
Emeric Brun97679e72010-09-23 17:56:44 +02001318 if (s->listener->counters)
1319 s->listener->counters->denied_resp++;
1320
1321 if (!(s->flags & SN_ERR_MASK))
1322 s->flags |= SN_ERR_PRXCOND;
1323 if (!(s->flags & SN_FINST_MASK))
1324 s->flags |= SN_FINST_D;
1325 return 0;
1326 }
Willy Tarreaucc1e04b2013-09-11 23:20:29 +02001327 else if (rule->action == TCP_ACT_CLOSE) {
1328 rep->prod->flags |= SI_FL_NOLINGER | SI_FL_NOHALF;
1329 si_shutr(rep->prod);
1330 si_shutw(rep->prod);
1331 break;
1332 }
Emeric Brun97679e72010-09-23 17:56:44 +02001333 else {
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001334 /* Custom keywords. */
Thierry FOURNIERbc4c1ac2015-02-25 13:36:14 +01001335 if (!rule->action_ptr(rule, s->be, s)) {
1336 channel_dont_close(rep);
1337 s->current_rule = &rule->list;
1338 return 0;
1339 }
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001340
Emeric Brun97679e72010-09-23 17:56:44 +02001341 /* otherwise accept */
1342 break;
1343 }
1344 }
1345 }
1346
1347 /* if we get there, it means we have no rule which matches, or
1348 * we have an explicit accept, so we apply the default accept.
1349 */
1350 rep->analysers &= ~an_bit;
1351 rep->analyse_exp = TICK_ETERNITY;
1352 return 1;
1353}
1354
1355
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001356/* This function performs the TCP layer4 analysis on the current request. It
1357 * returns 0 if a reject rule matches, otherwise 1 if either an accept rule
1358 * matches or if no more rule matches. It can only use rules which don't need
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001359 * any data. This only works on connection-based client-facing stream interfaces.
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001360 */
1361int tcp_exec_req_rules(struct session *s)
1362{
1363 struct tcp_rule *rule;
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001364 struct stksess *ts;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001365 struct stktable *t = NULL;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001366 struct connection *conn = objt_conn(s->si[0].end);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001367 int result = 1;
Willy Tarreau0cba6072013-11-28 22:21:02 +01001368 enum acl_test_res ret;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001369
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001370 if (!conn)
1371 return result;
1372
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001373 list_for_each_entry(rule, &s->fe->tcp_req.l4_rules, list) {
Thierry FOURNIERa65b3432013-11-28 18:22:00 +01001374 ret = ACL_TEST_PASS;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001375
1376 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001377 ret = acl_exec_cond(rule->cond, s->fe, s, NULL, SMP_OPT_DIR_REQ|SMP_OPT_FINAL);
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001378 ret = acl_pass(ret);
1379 if (rule->cond->pol == ACL_COND_UNLESS)
1380 ret = !ret;
1381 }
1382
1383 if (ret) {
1384 /* we have a matching rule. */
1385 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001386 s->fe->fe_counters.denied_conn++;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001387 if (s->listener->counters)
Willy Tarreau2799e982010-06-05 15:43:21 +02001388 s->listener->counters->denied_conn++;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001389
1390 if (!(s->flags & SN_ERR_MASK))
1391 s->flags |= SN_ERR_PRXCOND;
1392 if (!(s->flags & SN_FINST_MASK))
1393 s->flags |= SN_FINST_R;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001394 result = 0;
1395 break;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001396 }
Willy Tarreau44778ad2013-10-30 19:24:00 +01001397 else if (rule->action >= TCP_ACT_TRK_SC0 && rule->action <= TCP_ACT_TRK_SCMAX) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001398 /* Note: only the first valid tracking parameter of each
1399 * applies.
1400 */
1401 struct stktable_key *key;
1402
Willy Tarreaucc08d2c2014-01-28 23:18:23 +01001403 if (stkctr_entry(&s->stkctr[tcp_trk_idx(rule->action)]))
Willy Tarreau44778ad2013-10-30 19:24:00 +01001404 continue;
1405
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001406 t = rule->act_prm.trk_ctr.table.t;
Willy Tarreaub5975de2014-06-25 16:20:53 +02001407 key = stktable_fetch_key(t, s->be, s, &s->txn, SMP_OPT_DIR_REQ|SMP_OPT_FINAL, rule->act_prm.trk_ctr.expr, NULL);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001408
Willy Tarreaud5ca9ab2013-05-28 17:40:25 +02001409 if (key && (ts = stktable_get_entry(t, key)))
1410 session_track_stkctr(&s->stkctr[tcp_trk_idx(rule->action)], t, ts);
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001411 }
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001412 else if (rule->action == TCP_ACT_EXPECT_PX) {
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001413 conn->flags |= CO_FL_ACCEPT_PROXY;
1414 conn_sock_want_recv(conn);
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001415 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001416 else {
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001417 /* Custom keywords. */
1418 rule->action_ptr(rule, s->fe, s);
1419
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001420 /* otherwise it's an accept */
1421 break;
1422 }
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001423 }
1424 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001425 return result;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001426}
1427
Emeric Brun97679e72010-09-23 17:56:44 +02001428/* Parse a tcp-response rule. Return a negative value in case of failure */
1429static int tcp_parse_response_rule(char **args, int arg, int section_type,
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001430 struct proxy *curpx, struct proxy *defpx,
1431 struct tcp_rule *rule, char **err,
1432 unsigned int where,
1433 const char *file, int line)
Emeric Brun97679e72010-09-23 17:56:44 +02001434{
1435 if (curpx == defpx || !(curpx->cap & PR_CAP_BE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001436 memprintf(err, "%s %s is only allowed in 'backend' sections",
1437 args[0], args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001438 return -1;
1439 }
1440
1441 if (strcmp(args[arg], "accept") == 0) {
1442 arg++;
1443 rule->action = TCP_ACT_ACCEPT;
1444 }
1445 else if (strcmp(args[arg], "reject") == 0) {
1446 arg++;
1447 rule->action = TCP_ACT_REJECT;
1448 }
Willy Tarreaucc1e04b2013-09-11 23:20:29 +02001449 else if (strcmp(args[arg], "close") == 0) {
1450 arg++;
1451 rule->action = TCP_ACT_CLOSE;
1452 }
Emeric Brun97679e72010-09-23 17:56:44 +02001453 else {
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001454 struct tcp_action_kw *kw;
1455 kw = tcp_res_cont_action(args[arg]);
1456 if (kw) {
1457 arg++;
1458 if (!kw->parse((const char **)args, &arg, curpx, rule, err))
1459 return -1;
1460 } else {
1461 memprintf(err,
1462 "'%s %s' expects 'accept', 'close' or 'reject' in %s '%s' (got '%s')",
1463 args[0], args[1], proxy_type_str(curpx), curpx->id, args[arg]);
1464 return -1;
1465 }
Emeric Brun97679e72010-09-23 17:56:44 +02001466 }
1467
1468 if (strcmp(args[arg], "if") == 0 || strcmp(args[arg], "unless") == 0) {
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001469 if ((rule->cond = build_acl_cond(file, line, curpx, (const char **)args+arg, err)) == NULL) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001470 memprintf(err,
1471 "'%s %s %s' : error detected in %s '%s' while parsing '%s' condition : %s",
1472 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg], *err);
Emeric Brun97679e72010-09-23 17:56:44 +02001473 return -1;
1474 }
1475 }
1476 else if (*args[arg]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001477 memprintf(err,
1478 "'%s %s %s' only accepts 'if' or 'unless', in %s '%s' (got '%s')",
Emeric Brun97679e72010-09-23 17:56:44 +02001479 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg]);
1480 return -1;
1481 }
1482 return 0;
1483}
1484
1485
1486
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001487/* Parse a tcp-request rule. Return a negative value in case of failure */
1488static int tcp_parse_request_rule(char **args, int arg, int section_type,
Willy Tarreau80aca902013-01-07 15:42:20 +01001489 struct proxy *curpx, struct proxy *defpx,
1490 struct tcp_rule *rule, char **err,
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001491 unsigned int where, const char *file, int line)
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001492{
1493 if (curpx == defpx) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001494 memprintf(err, "%s %s is not allowed in 'defaults' sections",
1495 args[0], args[1]);
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001496 return -1;
1497 }
1498
1499 if (!strcmp(args[arg], "accept")) {
1500 arg++;
1501 rule->action = TCP_ACT_ACCEPT;
1502 }
1503 else if (!strcmp(args[arg], "reject")) {
1504 arg++;
1505 rule->action = TCP_ACT_REJECT;
1506 }
Willy Tarreau18bf01e2014-06-13 16:18:52 +02001507 else if (strcmp(args[arg], "capture") == 0) {
1508 struct sample_expr *expr;
1509 struct cap_hdr *hdr;
1510 int kw = arg;
1511 int len = 0;
1512
1513 if (!(curpx->cap & PR_CAP_FE)) {
1514 memprintf(err,
1515 "'%s %s %s' : proxy '%s' has no frontend capability",
1516 args[0], args[1], args[kw], curpx->id);
1517 return -1;
1518 }
1519
1520 if (!(where & SMP_VAL_FE_REQ_CNT)) {
1521 memprintf(err,
1522 "'%s %s' is not allowed in '%s %s' rules in %s '%s'",
1523 args[arg], args[arg+1], args[0], args[1], proxy_type_str(curpx), curpx->id);
1524 return -1;
1525 }
1526
1527 arg++;
1528
1529 curpx->conf.args.ctx = ARGC_CAP;
1530 expr = sample_parse_expr(args, &arg, file, line, err, &curpx->conf.args);
1531 if (!expr) {
1532 memprintf(err,
1533 "'%s %s %s' : %s",
1534 args[0], args[1], args[kw], *err);
1535 return -1;
1536 }
1537
1538 if (!(expr->fetch->val & where)) {
1539 memprintf(err,
1540 "'%s %s %s' : fetch method '%s' extracts information from '%s', none of which is available here",
1541 args[0], args[1], args[kw], args[arg-1], sample_src_names(expr->fetch->use));
1542 free(expr);
1543 return -1;
1544 }
1545
1546 if (strcmp(args[arg], "len") == 0) {
1547 arg++;
1548 if (!args[arg]) {
1549 memprintf(err,
1550 "'%s %s %s' : missing length value",
1551 args[0], args[1], args[kw]);
1552 free(expr);
1553 return -1;
1554 }
1555 /* we copy the table name for now, it will be resolved later */
1556 len = atoi(args[arg]);
1557 if (len <= 0) {
1558 memprintf(err,
1559 "'%s %s %s' : length must be > 0",
1560 args[0], args[1], args[kw]);
1561 free(expr);
1562 return -1;
1563 }
1564 arg++;
1565 }
1566
1567 if (!len) {
1568 memprintf(err,
1569 "'%s %s %s' : a positive 'len' argument is mandatory",
1570 args[0], args[1], args[kw]);
1571 free(expr);
1572 return -1;
1573 }
1574
1575 hdr = calloc(sizeof(struct cap_hdr), 1);
1576 hdr->next = curpx->req_cap;
1577 hdr->name = NULL; /* not a header capture */
1578 hdr->namelen = 0;
1579 hdr->len = len;
1580 hdr->pool = create_pool("caphdr", hdr->len + 1, MEM_F_SHARED);
1581 hdr->index = curpx->nb_req_cap++;
1582
1583 curpx->req_cap = hdr;
1584 curpx->to_log |= LW_REQHDR;
1585
1586 /* check if we need to allocate an hdr_idx struct for HTTP parsing */
1587 curpx->http_needed |= !!(expr->fetch->use & SMP_USE_HTTP_ANY);
1588
1589 rule->act_prm.cap.expr = expr;
1590 rule->act_prm.cap.hdr = hdr;
1591 rule->action = TCP_ACT_CAPTURE;
1592 }
Willy Tarreaub4c84932013-07-23 19:15:30 +02001593 else if (strncmp(args[arg], "track-sc", 8) == 0 &&
1594 args[arg][9] == '\0' && args[arg][8] >= '0' &&
Willy Tarreaue1cfc1f2014-10-17 11:53:05 +02001595 args[arg][8] < '0' + MAX_SESS_STKCTR) { /* track-sc 0..9 */
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001596 struct sample_expr *expr;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001597 int kw = arg;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001598
1599 arg++;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001600
Willy Tarreaua4312fa2013-04-02 16:34:32 +02001601 curpx->conf.args.ctx = ARGC_TRK;
Thierry FOURNIEReeaa9512014-02-11 14:00:19 +01001602 expr = sample_parse_expr(args, &arg, file, line, err, &curpx->conf.args);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001603 if (!expr) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001604 memprintf(err,
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001605 "'%s %s %s' : %s",
Willy Tarreau975c1782013-12-12 23:16:54 +01001606 args[0], args[1], args[kw], *err);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001607 return -1;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001608 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001609
Willy Tarreau80aca902013-01-07 15:42:20 +01001610 if (!(expr->fetch->val & where)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001611 memprintf(err,
Willy Tarreau80aca902013-01-07 15:42:20 +01001612 "'%s %s %s' : fetch method '%s' extracts information from '%s', none of which is available here",
Willy Tarreau33c60de2013-04-12 08:26:32 +02001613 args[0], args[1], args[kw], args[arg-1], sample_src_names(expr->fetch->use));
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001614 free(expr);
1615 return -1;
1616 }
1617
1618 /* check if we need to allocate an hdr_idx struct for HTTP parsing */
Willy Tarreau25320b22013-03-24 07:22:08 +01001619 curpx->http_needed |= !!(expr->fetch->use & SMP_USE_HTTP_ANY);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001620
1621 if (strcmp(args[arg], "table") == 0) {
Willy Tarreau598718a2012-12-09 16:57:27 +01001622 arg++;
1623 if (!args[arg]) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001624 memprintf(err,
1625 "'%s %s %s' : missing table name",
1626 args[0], args[1], args[kw]);
1627 free(expr);
1628 return -1;
1629 }
1630 /* we copy the table name for now, it will be resolved later */
Willy Tarreau598718a2012-12-09 16:57:27 +01001631 rule->act_prm.trk_ctr.table.n = strdup(args[arg]);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001632 arg++;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001633 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001634 rule->act_prm.trk_ctr.expr = expr;
Willy Tarreaube4a3ef2013-06-17 15:04:07 +02001635 rule->action = TCP_ACT_TRK_SC0 + args[kw][8] - '0';
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001636 }
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001637 else if (strcmp(args[arg], "expect-proxy") == 0) {
1638 if (strcmp(args[arg+1], "layer4") != 0) {
1639 memprintf(err,
1640 "'%s %s %s' only supports 'layer4' in %s '%s' (got '%s')",
1641 args[0], args[1], args[arg], proxy_type_str(curpx), curpx->id, args[arg+1]);
1642 return -1;
1643 }
1644
1645 if (!(where & SMP_VAL_FE_CON_ACC)) {
1646 memprintf(err,
1647 "'%s %s' is not allowed in '%s %s' rules in %s '%s'",
1648 args[arg], args[arg+1], args[0], args[1], proxy_type_str(curpx), curpx->id);
1649 return -1;
1650 }
1651
1652 arg += 2;
1653 rule->action = TCP_ACT_EXPECT_PX;
1654 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001655 else {
Thierry FOURNIERcc87a112014-12-12 19:41:33 +01001656 struct tcp_action_kw *kw;
1657 if (where & SMP_VAL_FE_CON_ACC)
1658 kw = tcp_req_conn_action(args[arg]);
1659 else
1660 kw = tcp_req_cont_action(args[arg]);
1661 if (kw) {
1662 arg++;
1663 if (!kw->parse((const char **)args, &arg, curpx, rule, err))
1664 return -1;
1665 } else {
1666 memprintf(err,
1667 "'%s %s' expects 'accept', 'reject', 'track-sc0' ... 'track-sc%d' "
1668 " in %s '%s' (got '%s')",
1669 args[0], args[1], MAX_SESS_STKCTR-1, proxy_type_str(curpx),
1670 curpx->id, args[arg]);
1671 return -1;
1672 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001673 }
1674
1675 if (strcmp(args[arg], "if") == 0 || strcmp(args[arg], "unless") == 0) {
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001676 if ((rule->cond = build_acl_cond(file, line, curpx, (const char **)args+arg, err)) == NULL) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001677 memprintf(err,
1678 "'%s %s %s' : error detected in %s '%s' while parsing '%s' condition : %s",
1679 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg], *err);
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001680 return -1;
1681 }
1682 }
1683 else if (*args[arg]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001684 memprintf(err,
1685 "'%s %s %s' only accepts 'if' or 'unless', in %s '%s' (got '%s')",
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001686 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg]);
1687 return -1;
1688 }
1689 return 0;
1690}
1691
Emeric Brun97679e72010-09-23 17:56:44 +02001692/* This function should be called to parse a line starting with the "tcp-response"
1693 * keyword.
1694 */
1695static int tcp_parse_tcp_rep(char **args, int section_type, struct proxy *curpx,
Willy Tarreau28a47d62012-09-18 20:02:48 +02001696 struct proxy *defpx, const char *file, int line,
1697 char **err)
Emeric Brun97679e72010-09-23 17:56:44 +02001698{
1699 const char *ptr = NULL;
1700 unsigned int val;
Emeric Brun97679e72010-09-23 17:56:44 +02001701 int warn = 0;
1702 int arg;
1703 struct tcp_rule *rule;
Willy Tarreau80aca902013-01-07 15:42:20 +01001704 unsigned int where;
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001705 const struct acl *acl;
Willy Tarreau93fddf12013-03-31 22:59:32 +02001706 const char *kw;
Emeric Brun97679e72010-09-23 17:56:44 +02001707
1708 if (!*args[1]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001709 memprintf(err, "missing argument for '%s' in %s '%s'",
1710 args[0], proxy_type_str(curpx), curpx->id);
Emeric Brun97679e72010-09-23 17:56:44 +02001711 return -1;
1712 }
1713
1714 if (strcmp(args[1], "inspect-delay") == 0) {
1715 if (curpx == defpx || !(curpx->cap & PR_CAP_BE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001716 memprintf(err, "%s %s is only allowed in 'backend' sections",
1717 args[0], args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001718 return -1;
1719 }
1720
1721 if (!*args[2] || (ptr = parse_time_err(args[2], &val, TIME_UNIT_MS))) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001722 memprintf(err,
1723 "'%s %s' expects a positive delay in milliseconds, in %s '%s'",
1724 args[0], args[1], proxy_type_str(curpx), curpx->id);
1725 if (ptr)
1726 memprintf(err, "%s (unexpected character '%c')", *err, *ptr);
Emeric Brun97679e72010-09-23 17:56:44 +02001727 return -1;
1728 }
1729
1730 if (curpx->tcp_rep.inspect_delay) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001731 memprintf(err, "ignoring %s %s (was already defined) in %s '%s'",
1732 args[0], args[1], proxy_type_str(curpx), curpx->id);
Emeric Brun97679e72010-09-23 17:56:44 +02001733 return 1;
1734 }
1735 curpx->tcp_rep.inspect_delay = val;
1736 return 0;
1737 }
1738
Simon Hormande072bd2011-06-24 15:11:37 +09001739 rule = calloc(1, sizeof(*rule));
Emeric Brun97679e72010-09-23 17:56:44 +02001740 LIST_INIT(&rule->list);
1741 arg = 1;
Willy Tarreau80aca902013-01-07 15:42:20 +01001742 where = 0;
Emeric Brun97679e72010-09-23 17:56:44 +02001743
1744 if (strcmp(args[1], "content") == 0) {
1745 arg++;
Willy Tarreau80aca902013-01-07 15:42:20 +01001746
1747 if (curpx->cap & PR_CAP_FE)
1748 where |= SMP_VAL_FE_RES_CNT;
1749 if (curpx->cap & PR_CAP_BE)
1750 where |= SMP_VAL_BE_RES_CNT;
1751
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001752 if (tcp_parse_response_rule(args, arg, section_type, curpx, defpx, rule, err, where, file, line) < 0)
Emeric Brun97679e72010-09-23 17:56:44 +02001753 goto error;
1754
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001755 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1756 if (acl) {
1757 if (acl->name && *acl->name)
1758 memprintf(err,
1759 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1760 acl->name, args[0], args[1], sample_ckp_names(where));
1761 else
1762 memprintf(err,
1763 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1764 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001765 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001766 sample_ckp_names(where));
Emeric Brun97679e72010-09-23 17:56:44 +02001767
Emeric Brun97679e72010-09-23 17:56:44 +02001768 warn++;
1769 }
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001770 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1771 if (acl->name && *acl->name)
1772 memprintf(err,
1773 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001774 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001775 else
1776 memprintf(err,
1777 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001778 kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001779 warn++;
1780 }
Emeric Brun97679e72010-09-23 17:56:44 +02001781
1782 LIST_ADDQ(&curpx->tcp_rep.inspect_rules, &rule->list);
1783 }
1784 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001785 memprintf(err,
1786 "'%s' expects 'inspect-delay' or 'content' in %s '%s' (got '%s')",
1787 args[0], proxy_type_str(curpx), curpx->id, args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001788 goto error;
1789 }
1790
1791 return warn;
1792 error:
1793 free(rule);
1794 return -1;
1795}
1796
1797
Willy Tarreaub6866442008-07-14 23:54:42 +02001798/* This function should be called to parse a line starting with the "tcp-request"
1799 * keyword.
1800 */
1801static int tcp_parse_tcp_req(char **args, int section_type, struct proxy *curpx,
Willy Tarreau28a47d62012-09-18 20:02:48 +02001802 struct proxy *defpx, const char *file, int line,
1803 char **err)
Willy Tarreaub6866442008-07-14 23:54:42 +02001804{
1805 const char *ptr = NULL;
Willy Tarreauc7e961e2008-08-17 17:13:47 +02001806 unsigned int val;
Willy Tarreau1a687942010-05-23 22:40:30 +02001807 int warn = 0;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001808 int arg;
Willy Tarreau1a687942010-05-23 22:40:30 +02001809 struct tcp_rule *rule;
Willy Tarreau80aca902013-01-07 15:42:20 +01001810 unsigned int where;
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001811 const struct acl *acl;
Willy Tarreau93fddf12013-03-31 22:59:32 +02001812 const char *kw;
Willy Tarreaub6866442008-07-14 23:54:42 +02001813
1814 if (!*args[1]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001815 if (curpx == defpx)
1816 memprintf(err, "missing argument for '%s' in defaults section", args[0]);
1817 else
1818 memprintf(err, "missing argument for '%s' in %s '%s'",
1819 args[0], proxy_type_str(curpx), curpx->id);
Willy Tarreaub6866442008-07-14 23:54:42 +02001820 return -1;
1821 }
1822
1823 if (!strcmp(args[1], "inspect-delay")) {
1824 if (curpx == defpx) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001825 memprintf(err, "%s %s is not allowed in 'defaults' sections",
1826 args[0], args[1]);
Willy Tarreaub6866442008-07-14 23:54:42 +02001827 return -1;
1828 }
1829
Willy Tarreaub6866442008-07-14 23:54:42 +02001830 if (!*args[2] || (ptr = parse_time_err(args[2], &val, TIME_UNIT_MS))) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001831 memprintf(err,
1832 "'%s %s' expects a positive delay in milliseconds, in %s '%s'",
1833 args[0], args[1], proxy_type_str(curpx), curpx->id);
1834 if (ptr)
1835 memprintf(err, "%s (unexpected character '%c')", *err, *ptr);
Willy Tarreaub6866442008-07-14 23:54:42 +02001836 return -1;
1837 }
1838
1839 if (curpx->tcp_req.inspect_delay) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001840 memprintf(err, "ignoring %s %s (was already defined) in %s '%s'",
1841 args[0], args[1], proxy_type_str(curpx), curpx->id);
Willy Tarreaub6866442008-07-14 23:54:42 +02001842 return 1;
1843 }
1844 curpx->tcp_req.inspect_delay = val;
1845 return 0;
1846 }
1847
Simon Hormande072bd2011-06-24 15:11:37 +09001848 rule = calloc(1, sizeof(*rule));
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001849 LIST_INIT(&rule->list);
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001850 arg = 1;
Willy Tarreau80aca902013-01-07 15:42:20 +01001851 where = 0;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001852
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001853 if (strcmp(args[1], "content") == 0) {
Willy Tarreaud1f96522010-08-03 19:34:32 +02001854 arg++;
Willy Tarreau80aca902013-01-07 15:42:20 +01001855
1856 if (curpx->cap & PR_CAP_FE)
1857 where |= SMP_VAL_FE_REQ_CNT;
1858 if (curpx->cap & PR_CAP_BE)
1859 where |= SMP_VAL_BE_REQ_CNT;
1860
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001861 if (tcp_parse_request_rule(args, arg, section_type, curpx, defpx, rule, err, where, file, line) < 0)
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001862 goto error;
Willy Tarreaub6866442008-07-14 23:54:42 +02001863
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001864 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1865 if (acl) {
1866 if (acl->name && *acl->name)
1867 memprintf(err,
1868 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1869 acl->name, args[0], args[1], sample_ckp_names(where));
1870 else
1871 memprintf(err,
1872 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1873 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001874 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001875 sample_ckp_names(where));
Willy Tarreaudd64f8d2008-07-27 22:02:32 +02001876
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001877 warn++;
1878 }
1879 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1880 if (acl->name && *acl->name)
1881 memprintf(err,
1882 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001883 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001884 else
1885 memprintf(err,
1886 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001887 kw, sample_ckp_names(where));
Willy Tarreaudd64f8d2008-07-27 22:02:32 +02001888 warn++;
1889 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001890
Willy Tarreau3986b9c2014-09-16 15:39:51 +02001891 /* the following function directly emits the warning */
1892 warnif_misplaced_tcp_cont(curpx, file, line, args[0]);
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001893 LIST_ADDQ(&curpx->tcp_req.inspect_rules, &rule->list);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001894 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001895 else if (strcmp(args[1], "connection") == 0) {
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001896 arg++;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001897
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001898 if (!(curpx->cap & PR_CAP_FE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001899 memprintf(err, "%s %s is not allowed because %s %s is not a frontend",
1900 args[0], args[1], proxy_type_str(curpx), curpx->id);
Simon Horman6c54d8b2011-07-15 13:14:06 +09001901 goto error;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001902 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001903
Willy Tarreau80aca902013-01-07 15:42:20 +01001904 where |= SMP_VAL_FE_CON_ACC;
1905
Thierry FOURNIER0d6ba512014-02-11 03:31:34 +01001906 if (tcp_parse_request_rule(args, arg, section_type, curpx, defpx, rule, err, where, file, line) < 0)
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001907 goto error;
1908
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001909 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1910 if (acl) {
1911 if (acl->name && *acl->name)
1912 memprintf(err,
1913 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1914 acl->name, args[0], args[1], sample_ckp_names(where));
1915 else
1916 memprintf(err,
1917 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1918 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001919 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001920 sample_ckp_names(where));
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001921
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001922 warn++;
1923 }
1924 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1925 if (acl->name && *acl->name)
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001926 memprintf(err,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001927 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001928 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001929 else
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001930 memprintf(err,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001931 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001932 kw, sample_ckp_names(where));
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001933 warn++;
1934 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001935
Willy Tarreau3986b9c2014-09-16 15:39:51 +02001936 /* the following function directly emits the warning */
1937 warnif_misplaced_tcp_conn(curpx, file, line, args[0]);
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001938 LIST_ADDQ(&curpx->tcp_req.l4_rules, &rule->list);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001939 }
Willy Tarreau1a687942010-05-23 22:40:30 +02001940 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001941 if (curpx == defpx)
1942 memprintf(err,
1943 "'%s' expects 'inspect-delay', 'connection', or 'content' in defaults section (got '%s')",
1944 args[0], args[1]);
1945 else
1946 memprintf(err,
1947 "'%s' expects 'inspect-delay', 'connection', or 'content' in %s '%s' (got '%s')",
Willy Tarreaudeaec2f2013-04-10 16:31:11 +02001948 args[0], proxy_type_str(curpx), curpx->id, args[1]);
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001949 goto error;
Willy Tarreau1a687942010-05-23 22:40:30 +02001950 }
1951
Willy Tarreau1a687942010-05-23 22:40:30 +02001952 return warn;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001953 error:
1954 free(rule);
1955 return -1;
Willy Tarreaub6866442008-07-14 23:54:42 +02001956}
1957
Willy Tarreau645513a2010-05-24 20:55:15 +02001958
1959/************************************************************************/
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001960/* All supported sample fetch functions must be declared here */
Willy Tarreau32389b72012-04-23 23:13:20 +02001961/************************************************************************/
1962
Willy Tarreau4a129812012-04-25 17:31:42 +02001963/* fetch the connection's source IPv4/IPv6 address */
Willy Tarreau645513a2010-05-24 20:55:15 +02001964static int
Willy Tarreau4a129812012-04-25 17:31:42 +02001965smp_fetch_src(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Thierry FOURNIERf41a8092014-12-07 18:37:57 +01001966 const struct arg *args, struct sample *smp, const char *kw, void *private)
Willy Tarreau645513a2010-05-24 20:55:15 +02001967{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001968 struct connection *cli_conn = objt_conn(l4->si[0].end);
1969
1970 if (!cli_conn)
1971 return 0;
1972
1973 switch (cli_conn->addr.from.ss_family) {
Willy Tarreauf4362b32011-12-16 17:49:52 +01001974 case AF_INET:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001975 smp->data.ipv4 = ((struct sockaddr_in *)&cli_conn->addr.from)->sin_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001976 smp->type = SMP_T_IPV4;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001977 break;
1978 case AF_INET6:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001979 smp->data.ipv6 = ((struct sockaddr_in6 *)&cli_conn->addr.from)->sin6_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001980 smp->type = SMP_T_IPV6;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001981 break;
1982 default:
Emeric Brunf769f512010-10-22 17:14:01 +02001983 return 0;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001984 }
Emeric Brunf769f512010-10-22 17:14:01 +02001985
Willy Tarreau37406352012-04-23 16:16:37 +02001986 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02001987 return 1;
1988}
1989
Willy Tarreaua5e37562011-12-16 17:06:15 +01001990/* set temp integer to the connection's source port */
Willy Tarreau645513a2010-05-24 20:55:15 +02001991static int
Willy Tarreau25c1ebc2012-04-25 16:21:44 +02001992smp_fetch_sport(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Thierry FOURNIERf41a8092014-12-07 18:37:57 +01001993 const struct arg *args, struct sample *smp, const char *k, void *private)
Willy Tarreau645513a2010-05-24 20:55:15 +02001994{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001995 struct connection *cli_conn = objt_conn(l4->si[0].end);
1996
1997 if (!cli_conn)
1998 return 0;
1999
Willy Tarreauf853c462012-04-23 18:53:56 +02002000 smp->type = SMP_T_UINT;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002001 if (!(smp->data.uint = get_host_port(&cli_conn->addr.from)))
Emeric Brunf769f512010-10-22 17:14:01 +02002002 return 0;
2003
Willy Tarreau37406352012-04-23 16:16:37 +02002004 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02002005 return 1;
2006}
2007
Willy Tarreau4a129812012-04-25 17:31:42 +02002008/* fetch the connection's destination IPv4/IPv6 address */
Willy Tarreau645513a2010-05-24 20:55:15 +02002009static int
Willy Tarreau4a129812012-04-25 17:31:42 +02002010smp_fetch_dst(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Thierry FOURNIERf41a8092014-12-07 18:37:57 +01002011 const struct arg *args, struct sample *smp, const char *kw, void *private)
Willy Tarreau645513a2010-05-24 20:55:15 +02002012{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002013 struct connection *cli_conn = objt_conn(l4->si[0].end);
Willy Tarreau645513a2010-05-24 20:55:15 +02002014
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002015 if (!cli_conn)
2016 return 0;
2017
2018 conn_get_to_addr(cli_conn);
2019
2020 switch (cli_conn->addr.to.ss_family) {
Willy Tarreauf4362b32011-12-16 17:49:52 +01002021 case AF_INET:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002022 smp->data.ipv4 = ((struct sockaddr_in *)&cli_conn->addr.to)->sin_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02002023 smp->type = SMP_T_IPV4;
Willy Tarreauf4362b32011-12-16 17:49:52 +01002024 break;
2025 case AF_INET6:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002026 smp->data.ipv6 = ((struct sockaddr_in6 *)&cli_conn->addr.to)->sin6_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02002027 smp->type = SMP_T_IPV6;
Willy Tarreauf4362b32011-12-16 17:49:52 +01002028 break;
2029 default:
Emeric Brunf769f512010-10-22 17:14:01 +02002030 return 0;
Willy Tarreauf4362b32011-12-16 17:49:52 +01002031 }
Emeric Brunf769f512010-10-22 17:14:01 +02002032
Willy Tarreau37406352012-04-23 16:16:37 +02002033 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02002034 return 1;
2035}
2036
Willy Tarreaua5e37562011-12-16 17:06:15 +01002037/* set temp integer to the frontend connexion's destination port */
Willy Tarreau645513a2010-05-24 20:55:15 +02002038static int
Willy Tarreau25c1ebc2012-04-25 16:21:44 +02002039smp_fetch_dport(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Thierry FOURNIERf41a8092014-12-07 18:37:57 +01002040 const struct arg *args, struct sample *smp, const char *kw, void *private)
Willy Tarreau645513a2010-05-24 20:55:15 +02002041{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002042 struct connection *cli_conn = objt_conn(l4->si[0].end);
2043
2044 if (!cli_conn)
2045 return 0;
2046
2047 conn_get_to_addr(cli_conn);
Willy Tarreau645513a2010-05-24 20:55:15 +02002048
Willy Tarreauf853c462012-04-23 18:53:56 +02002049 smp->type = SMP_T_UINT;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02002050 if (!(smp->data.uint = get_host_port(&cli_conn->addr.to)))
Emeric Brunf769f512010-10-22 17:14:01 +02002051 return 0;
2052
Willy Tarreau37406352012-04-23 16:16:37 +02002053 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02002054 return 1;
Emericf2d7cae2010-11-05 18:13:50 +01002055}
2056
Willy Tarreau9b6700f2012-11-24 11:55:28 +01002057#ifdef IPV6_V6ONLY
Willy Tarreau77e3af92012-11-24 15:07:23 +01002058/* parse the "v4v6" bind keyword */
2059static int bind_parse_v4v6(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
2060{
2061 struct listener *l;
2062
2063 list_for_each_entry(l, &conf->listeners, by_bind) {
2064 if (l->addr.ss_family == AF_INET6)
2065 l->options |= LI_O_V4V6;
2066 }
2067
2068 return 0;
2069}
2070
Willy Tarreau9b6700f2012-11-24 11:55:28 +01002071/* parse the "v6only" bind keyword */
2072static int bind_parse_v6only(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
2073{
2074 struct listener *l;
2075
2076 list_for_each_entry(l, &conf->listeners, by_bind) {
2077 if (l->addr.ss_family == AF_INET6)
2078 l->options |= LI_O_V6ONLY;
2079 }
2080
2081 return 0;
2082}
2083#endif
2084
Pieter Baauwd551fb52013-05-08 22:49:23 +02002085#ifdef CONFIG_HAP_TRANSPARENT
Willy Tarreau44791242012-09-12 23:27:21 +02002086/* parse the "transparent" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02002087static int bind_parse_transparent(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
Willy Tarreau44791242012-09-12 23:27:21 +02002088{
2089 struct listener *l;
2090
Willy Tarreau4348fad2012-09-20 16:48:07 +02002091 list_for_each_entry(l, &conf->listeners, by_bind) {
2092 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2093 l->options |= LI_O_FOREIGN;
Willy Tarreau44791242012-09-12 23:27:21 +02002094 }
2095
Willy Tarreau44791242012-09-12 23:27:21 +02002096 return 0;
2097}
2098#endif
2099
2100#ifdef TCP_DEFER_ACCEPT
2101/* parse the "defer-accept" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02002102static int bind_parse_defer_accept(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
Willy Tarreau44791242012-09-12 23:27:21 +02002103{
2104 struct listener *l;
2105
Willy Tarreau4348fad2012-09-20 16:48:07 +02002106 list_for_each_entry(l, &conf->listeners, by_bind) {
2107 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2108 l->options |= LI_O_DEF_ACCEPT;
Willy Tarreau44791242012-09-12 23:27:21 +02002109 }
2110
Willy Tarreau44791242012-09-12 23:27:21 +02002111 return 0;
2112}
2113#endif
2114
Willy Tarreau1c862c52012-10-05 16:21:00 +02002115#ifdef TCP_FASTOPEN
Lukas Tribus0defb902013-02-13 23:35:39 +01002116/* parse the "tfo" bind keyword */
Willy Tarreau1c862c52012-10-05 16:21:00 +02002117static int bind_parse_tfo(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
2118{
2119 struct listener *l;
2120
2121 list_for_each_entry(l, &conf->listeners, by_bind) {
2122 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2123 l->options |= LI_O_TCP_FO;
2124 }
2125
2126 return 0;
2127}
2128#endif
2129
Willy Tarreau44791242012-09-12 23:27:21 +02002130#ifdef TCP_MAXSEG
2131/* parse the "mss" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02002132static int bind_parse_mss(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
Willy Tarreau44791242012-09-12 23:27:21 +02002133{
2134 struct listener *l;
2135 int mss;
2136
Willy Tarreau44791242012-09-12 23:27:21 +02002137 if (!*args[cur_arg + 1]) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02002138 memprintf(err, "'%s' : missing MSS value", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02002139 return ERR_ALERT | ERR_FATAL;
2140 }
2141
2142 mss = atoi(args[cur_arg + 1]);
2143 if (!mss || abs(mss) > 65535) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02002144 memprintf(err, "'%s' : expects an MSS with and absolute value between 1 and 65535", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02002145 return ERR_ALERT | ERR_FATAL;
2146 }
2147
Willy Tarreau4348fad2012-09-20 16:48:07 +02002148 list_for_each_entry(l, &conf->listeners, by_bind) {
2149 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2150 l->maxseg = mss;
2151 }
Willy Tarreau44791242012-09-12 23:27:21 +02002152
2153 return 0;
2154}
2155#endif
2156
Willy Tarreau2af207a2015-02-04 00:45:58 +01002157#ifdef TCP_USER_TIMEOUT
2158/* parse the "tcp-ut" bind keyword */
2159static int bind_parse_tcp_ut(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
2160{
2161 const char *ptr = NULL;
2162 struct listener *l;
2163 unsigned int timeout;
2164
2165 if (!*args[cur_arg + 1]) {
2166 memprintf(err, "'%s' : missing TCP User Timeout value", args[cur_arg]);
2167 return ERR_ALERT | ERR_FATAL;
2168 }
2169
2170 ptr = parse_time_err(args[cur_arg + 1], &timeout, TIME_UNIT_MS);
2171 if (ptr) {
2172 memprintf(err, "'%s' : expects a positive delay in milliseconds", args[cur_arg]);
2173 return ERR_ALERT | ERR_FATAL;
2174 }
2175
2176 list_for_each_entry(l, &conf->listeners, by_bind) {
2177 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2178 l->tcp_ut = timeout;
2179 }
2180
2181 return 0;
2182}
2183#endif
2184
Willy Tarreau44791242012-09-12 23:27:21 +02002185#ifdef SO_BINDTODEVICE
Willy Tarreau2af207a2015-02-04 00:45:58 +01002186/* parse the "interface" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02002187static int bind_parse_interface(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
Willy Tarreau44791242012-09-12 23:27:21 +02002188{
2189 struct listener *l;
2190
Willy Tarreau44791242012-09-12 23:27:21 +02002191 if (!*args[cur_arg + 1]) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02002192 memprintf(err, "'%s' : missing interface name", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02002193 return ERR_ALERT | ERR_FATAL;
2194 }
2195
Willy Tarreau4348fad2012-09-20 16:48:07 +02002196 list_for_each_entry(l, &conf->listeners, by_bind) {
2197 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
2198 l->interface = strdup(args[cur_arg + 1]);
2199 }
Willy Tarreau44791242012-09-12 23:27:21 +02002200
2201 global.last_checks |= LSTCHK_NETADM;
2202 return 0;
2203}
2204#endif
2205
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +01002206#ifdef CONFIG_HAP_NS
2207/* parse the "namespace" bind keyword */
2208static int bind_parse_namespace(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
2209{
2210 struct listener *l;
2211 char *namespace = NULL;
2212
2213 if (!*args[cur_arg + 1]) {
2214 memprintf(err, "'%s' : missing namespace id", args[cur_arg]);
2215 return ERR_ALERT | ERR_FATAL;
2216 }
2217 namespace = args[cur_arg + 1];
2218
2219 list_for_each_entry(l, &conf->listeners, by_bind) {
2220 l->netns = netns_store_lookup(namespace, strlen(namespace));
2221
2222 if (l->netns == NULL)
2223 l->netns = netns_store_insert(namespace);
2224
2225 if (l->netns == NULL) {
2226 Alert("Cannot open namespace '%s'.\n", args[cur_arg + 1]);
2227 return ERR_ALERT | ERR_FATAL;
2228 }
2229 }
2230 return 0;
2231}
2232#endif
2233
Willy Tarreaudc13c112013-06-21 23:16:39 +02002234static struct cfg_kw_list cfg_kws = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01002235 { CFG_LISTEN, "tcp-request", tcp_parse_tcp_req },
Emeric Brun97679e72010-09-23 17:56:44 +02002236 { CFG_LISTEN, "tcp-response", tcp_parse_tcp_rep },
Willy Tarreaub6866442008-07-14 23:54:42 +02002237 { 0, NULL, NULL },
2238}};
2239
Willy Tarreaud4c33c82013-01-07 21:59:07 +01002240
Willy Tarreau61612d42012-04-19 18:42:05 +02002241/* Note: must not be declared <const> as its list will be overwritten.
2242 * Please take care of keeping this list alphabetically sorted.
2243 */
Willy Tarreaudc13c112013-06-21 23:16:39 +02002244static struct acl_kw_list acl_kws = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01002245 { /* END */ },
Willy Tarreaub6866442008-07-14 23:54:42 +02002246}};
2247
Willy Tarreaud4c33c82013-01-07 21:59:07 +01002248
Willy Tarreau4a129812012-04-25 17:31:42 +02002249/* Note: must not be declared <const> as its list will be overwritten.
2250 * Note: fetches that may return multiple types must be declared as the lowest
2251 * common denominator, the type that can be casted into all other ones. For
2252 * instance v4/v6 must be declared v4.
2253 */
Willy Tarreaudc13c112013-06-21 23:16:39 +02002254static struct sample_fetch_kw_list sample_fetch_keywords = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01002255 { "dst", smp_fetch_dst, 0, NULL, SMP_T_IPV4, SMP_USE_L4CLI },
2256 { "dst_port", smp_fetch_dport, 0, NULL, SMP_T_UINT, SMP_USE_L4CLI },
2257 { "src", smp_fetch_src, 0, NULL, SMP_T_IPV4, SMP_USE_L4CLI },
2258 { "src_port", smp_fetch_sport, 0, NULL, SMP_T_UINT, SMP_USE_L4CLI },
2259 { /* END */ },
Willy Tarreau645513a2010-05-24 20:55:15 +02002260}};
2261
Willy Tarreau44791242012-09-12 23:27:21 +02002262/************************************************************************/
2263/* All supported bind keywords must be declared here. */
2264/************************************************************************/
2265
2266/* Note: must not be declared <const> as its list will be overwritten.
2267 * Please take care of keeping this list alphabetically sorted, doing so helps
2268 * all code contributors.
2269 * Optional keywords are also declared with a NULL ->parse() function so that
2270 * the config parser can report an appropriate error when a known keyword was
2271 * not enabled.
2272 */
Willy Tarreau51fb7652012-09-18 18:24:39 +02002273static struct bind_kw_list bind_kws = { "TCP", { }, {
Willy Tarreau44791242012-09-12 23:27:21 +02002274#ifdef TCP_DEFER_ACCEPT
2275 { "defer-accept", bind_parse_defer_accept, 0 }, /* wait for some data for 1 second max before doing accept */
2276#endif
2277#ifdef SO_BINDTODEVICE
2278 { "interface", bind_parse_interface, 1 }, /* specifically bind to this interface */
2279#endif
2280#ifdef TCP_MAXSEG
2281 { "mss", bind_parse_mss, 1 }, /* set MSS of listening socket */
2282#endif
Willy Tarreau2af207a2015-02-04 00:45:58 +01002283#ifdef TCP_USER_TIMEOUT
2284 { "tcp-ut", bind_parse_tcp_ut, 1 }, /* set User Timeout on listening socket */
2285#endif
Willy Tarreau1c862c52012-10-05 16:21:00 +02002286#ifdef TCP_FASTOPEN
2287 { "tfo", bind_parse_tfo, 0 }, /* enable TCP_FASTOPEN of listening socket */
2288#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +02002289#ifdef CONFIG_HAP_TRANSPARENT
Willy Tarreau44791242012-09-12 23:27:21 +02002290 { "transparent", bind_parse_transparent, 0 }, /* transparently bind to the specified addresses */
2291#endif
Willy Tarreau9b6700f2012-11-24 11:55:28 +01002292#ifdef IPV6_V6ONLY
Willy Tarreau77e3af92012-11-24 15:07:23 +01002293 { "v4v6", bind_parse_v4v6, 0 }, /* force socket to bind to IPv4+IPv6 */
Willy Tarreau9b6700f2012-11-24 11:55:28 +01002294 { "v6only", bind_parse_v6only, 0 }, /* force socket to bind to IPv6 only */
2295#endif
KOVACS Krisztianb3e54fe2014-11-17 15:11:45 +01002296#ifdef CONFIG_HAP_NS
2297 { "namespace", bind_parse_namespace, 1 },
2298#endif
Willy Tarreau44791242012-09-12 23:27:21 +02002299 /* the versions with the NULL parse function*/
2300 { "defer-accept", NULL, 0 },
2301 { "interface", NULL, 1 },
2302 { "mss", NULL, 1 },
2303 { "transparent", NULL, 0 },
Willy Tarreau77e3af92012-11-24 15:07:23 +01002304 { "v4v6", NULL, 0 },
Willy Tarreau9b6700f2012-11-24 11:55:28 +01002305 { "v6only", NULL, 0 },
Willy Tarreau44791242012-09-12 23:27:21 +02002306 { NULL, NULL, 0 },
2307}};
2308
Willy Tarreaue6b98942007-10-29 01:09:36 +01002309__attribute__((constructor))
2310static void __tcp_protocol_init(void)
2311{
2312 protocol_register(&proto_tcpv4);
2313 protocol_register(&proto_tcpv6);
Willy Tarreau12785782012-04-27 21:37:17 +02002314 sample_register_fetches(&sample_fetch_keywords);
Willy Tarreaub6866442008-07-14 23:54:42 +02002315 cfg_register_keywords(&cfg_kws);
2316 acl_register_keywords(&acl_kws);
Willy Tarreau44791242012-09-12 23:27:21 +02002317 bind_register_keywords(&bind_kws);
Willy Tarreaue6b98942007-10-29 01:09:36 +01002318}
2319
2320
2321/*
2322 * Local variables:
2323 * c-indent-level: 8
2324 * c-basic-offset: 8
2325 * End:
2326 */