blob: 6593ce17fef73ba66192e0c8472bcaf23a5fa1c7 [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>
Willy Tarreaue6b98942007-10-29 01:09:36 +010036
Willy Tarreaue6b98942007-10-29 01:09:36 +010037#include <types/global.h>
Willy Tarreau9650f372009-08-16 14:02:45 +020038#include <types/server.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010039
40#include <proto/acl.h>
Willy Tarreau9fcb9842012-04-20 14:45:49 +020041#include <proto/arg.h>
Willy Tarreauc7e42382012-08-24 19:22:53 +020042#include <proto/channel.h>
Willy Tarreaud2274c62012-07-06 14:29:45 +020043#include <proto/connection.h>
Willy Tarreaudd2f85e2012-09-02 22:34:23 +020044#include <proto/fd.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020045#include <proto/listener.h>
Willy Tarreau9650f372009-08-16 14:02:45 +020046#include <proto/log.h>
47#include <proto/port_range.h>
Willy Tarreaud1d54542012-09-12 22:58:11 +020048#include <proto/protocol.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010049#include <proto/proto_tcp.h>
Willy Tarreaub6866442008-07-14 23:54:42 +020050#include <proto/proxy.h>
Willy Tarreaucd3b0942012-04-27 21:52:18 +020051#include <proto/sample.h>
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +020052#include <proto/session.h>
Willy Tarreaua975b8f2010-06-05 19:13:27 +020053#include <proto/stick_table.h>
Willy Tarreaucc1e04b2013-09-11 23:20:29 +020054#include <proto/stream_interface.h>
Willy Tarreaua975b8f2010-06-05 19:13:27 +020055#include <proto/task.h>
Willy Tarreaue6b98942007-10-29 01:09:36 +010056
Willy Tarreaue8c66af2008-01-13 18:40:14 +010057#ifdef CONFIG_HAP_CTTPROXY
58#include <import/ip_tproxy.h>
59#endif
60
Emeric Bruncf20bf12010-10-22 16:06:11 +020061static int tcp_bind_listeners(struct protocol *proto, char *errmsg, int errlen);
62static int tcp_bind_listener(struct listener *listener, char *errmsg, int errlen);
Willy Tarreaue6b98942007-10-29 01:09:36 +010063
64/* Note: must not be declared <const> as its list will be overwritten */
65static struct protocol proto_tcpv4 = {
66 .name = "tcpv4",
67 .sock_domain = AF_INET,
68 .sock_type = SOCK_STREAM,
69 .sock_prot = IPPROTO_TCP,
70 .sock_family = AF_INET,
71 .sock_addrlen = sizeof(struct sockaddr_in),
72 .l3_addrlen = 32/8,
Willy Tarreaubbebbbf2012-05-07 21:22:09 +020073 .accept = &listener_accept,
Willy Tarreau26d8c592012-05-07 18:12:14 +020074 .connect = tcp_connect_server,
Emeric Bruncf20bf12010-10-22 16:06:11 +020075 .bind = tcp_bind_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +010076 .bind_all = tcp_bind_listeners,
77 .unbind_all = unbind_all_listeners,
78 .enable_all = enable_all_listeners,
Willy Tarreau59b94792012-05-11 16:16:40 +020079 .get_src = tcp_get_src,
80 .get_dst = tcp_get_dst,
Willy Tarreau2b57cb82013-06-10 19:56:38 +020081 .drain = tcp_drain,
Willy Tarreaue6b98942007-10-29 01:09:36 +010082 .listeners = LIST_HEAD_INIT(proto_tcpv4.listeners),
83 .nb_listeners = 0,
84};
85
86/* Note: must not be declared <const> as its list will be overwritten */
87static struct protocol proto_tcpv6 = {
88 .name = "tcpv6",
89 .sock_domain = AF_INET6,
90 .sock_type = SOCK_STREAM,
91 .sock_prot = IPPROTO_TCP,
92 .sock_family = AF_INET6,
93 .sock_addrlen = sizeof(struct sockaddr_in6),
94 .l3_addrlen = 128/8,
Willy Tarreaubbebbbf2012-05-07 21:22:09 +020095 .accept = &listener_accept,
Willy Tarreau26d8c592012-05-07 18:12:14 +020096 .connect = tcp_connect_server,
Emeric Bruncf20bf12010-10-22 16:06:11 +020097 .bind = tcp_bind_listener,
Willy Tarreaue6b98942007-10-29 01:09:36 +010098 .bind_all = tcp_bind_listeners,
99 .unbind_all = unbind_all_listeners,
100 .enable_all = enable_all_listeners,
Willy Tarreau59b94792012-05-11 16:16:40 +0200101 .get_src = tcp_get_src,
102 .get_dst = tcp_get_dst,
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200103 .drain = tcp_drain,
Willy Tarreaue6b98942007-10-29 01:09:36 +0100104 .listeners = LIST_HEAD_INIT(proto_tcpv6.listeners),
105 .nb_listeners = 0,
106};
107
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100108
David du Colombier6f5ccb12011-03-10 22:26:24 +0100109/* Binds ipv4/ipv6 address <local> to socket <fd>, unless <flags> is set, in which
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100110 * case we try to bind <remote>. <flags> is a 2-bit field consisting of :
111 * - 0 : ignore remote address (may even be a NULL pointer)
112 * - 1 : use provided address
113 * - 2 : use provided port
114 * - 3 : use both
115 *
116 * The function supports multiple foreign binding methods :
117 * - linux_tproxy: we directly bind to the foreign address
118 * - cttproxy: we bind to a local address then nat.
119 * The second one can be used as a fallback for the first one.
120 * This function returns 0 when everything's OK, 1 if it could not bind, to the
121 * local address, 2 if it could not bind to the foreign address.
122 */
David du Colombier6f5ccb12011-03-10 22:26:24 +0100123int tcp_bind_socket(int fd, int flags, struct sockaddr_storage *local, struct sockaddr_storage *remote)
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100124{
David du Colombier6f5ccb12011-03-10 22:26:24 +0100125 struct sockaddr_storage bind_addr;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100126 int foreign_ok = 0;
127 int ret;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100128 static int ip_transp_working = 1;
David du Colombier65c17962012-07-13 14:34:59 +0200129 static int ip6_transp_working = 1;
Pieter Baauwd551fb52013-05-08 22:49:23 +0200130
David du Colombier65c17962012-07-13 14:34:59 +0200131 switch (local->ss_family) {
132 case AF_INET:
133 if (flags && ip_transp_working) {
Pieter Baauwd551fb52013-05-08 22:49:23 +0200134 /* This deserves some explanation. Some platforms will support
135 * multiple combinations of certain methods, so we try the
136 * supported ones until one succeeds.
137 */
138 if (0
139#if defined(IP_TRANSPARENT)
140 || (setsockopt(fd, SOL_IP, IP_TRANSPARENT, &one, sizeof(one)) == 0)
141#endif
142#if defined(IP_FREEBIND)
143 || (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == 0)
144#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200145#if defined(IP_BINDANY)
146 || (setsockopt(fd, IPPROTO_IP, IP_BINDANY, &one, sizeof(one)) == 0)
147#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200148#if defined(SO_BINDANY)
149 || (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == 0)
150#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200151 )
David du Colombier65c17962012-07-13 14:34:59 +0200152 foreign_ok = 1;
153 else
154 ip_transp_working = 0;
155 }
156 break;
157 case AF_INET6:
158 if (flags && ip6_transp_working) {
Pieter Baauwd551fb52013-05-08 22:49:23 +0200159 if (0
160#if defined(IPV6_TRANSPARENT)
161 || (setsockopt(fd, SOL_IPV6, IPV6_TRANSPARENT, &one, sizeof(one)) == 0)
162#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200163#if defined(IPV6_BINDANY)
164 || (setsockopt(fd, IPPROTO_IPV6, IPV6_BINDANY, &one, sizeof(one)) == 0)
165#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200166#if defined(SO_BINDANY)
167 || (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == 0)
168#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200169 )
David du Colombier65c17962012-07-13 14:34:59 +0200170 foreign_ok = 1;
171 else
172 ip6_transp_working = 0;
173 }
174 break;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100175 }
Pieter Baauwd551fb52013-05-08 22:49:23 +0200176
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100177 if (flags) {
178 memset(&bind_addr, 0, sizeof(bind_addr));
Willy Tarreau96dd0792011-04-19 07:20:57 +0200179 bind_addr.ss_family = remote->ss_family;
David du Colombier6f5ccb12011-03-10 22:26:24 +0100180 switch (remote->ss_family) {
181 case AF_INET:
182 if (flags & 1)
183 ((struct sockaddr_in *)&bind_addr)->sin_addr = ((struct sockaddr_in *)remote)->sin_addr;
184 if (flags & 2)
185 ((struct sockaddr_in *)&bind_addr)->sin_port = ((struct sockaddr_in *)remote)->sin_port;
186 break;
187 case AF_INET6:
188 if (flags & 1)
189 ((struct sockaddr_in6 *)&bind_addr)->sin6_addr = ((struct sockaddr_in6 *)remote)->sin6_addr;
190 if (flags & 2)
191 ((struct sockaddr_in6 *)&bind_addr)->sin6_port = ((struct sockaddr_in6 *)remote)->sin6_port;
192 break;
Willy Tarreau5dc1e982011-12-16 21:25:11 +0100193 default:
194 /* we don't want to try to bind to an unknown address family */
195 foreign_ok = 0;
David du Colombier6f5ccb12011-03-10 22:26:24 +0100196 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100197 }
198
Simon Hormande072bd2011-06-24 15:11:37 +0900199 setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &one, sizeof(one));
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100200 if (foreign_ok) {
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200201 if (is_addr(&bind_addr)) {
202 ret = bind(fd, (struct sockaddr *)&bind_addr, get_addr_len(&bind_addr));
203 if (ret < 0)
204 return 2;
205 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100206 }
207 else {
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200208 if (is_addr(local)) {
209 ret = bind(fd, (struct sockaddr *)local, get_addr_len(local));
210 if (ret < 0)
211 return 1;
212 }
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100213 }
214
215 if (!flags)
216 return 0;
217
218#ifdef CONFIG_HAP_CTTPROXY
Willy Tarreau6f831b42011-03-20 14:03:54 +0100219 if (!foreign_ok && remote->ss_family == AF_INET) {
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100220 struct in_tproxy itp1, itp2;
221 memset(&itp1, 0, sizeof(itp1));
222
223 itp1.op = TPROXY_ASSIGN;
Willy Tarreau6f831b42011-03-20 14:03:54 +0100224 itp1.v.addr.faddr = ((struct sockaddr_in *)&bind_addr)->sin_addr;
225 itp1.v.addr.fport = ((struct sockaddr_in *)&bind_addr)->sin_port;
Willy Tarreaue8c66af2008-01-13 18:40:14 +0100226
227 /* set connect flag on socket */
228 itp2.op = TPROXY_FLAGS;
229 itp2.v.flags = ITP_CONNECT | ITP_ONCE;
230
231 if (setsockopt(fd, SOL_IP, IP_TPROXY, &itp1, sizeof(itp1)) != -1 &&
232 setsockopt(fd, SOL_IP, IP_TPROXY, &itp2, sizeof(itp2)) != -1) {
233 foreign_ok = 1;
234 }
235 }
236#endif
237 if (!foreign_ok)
238 /* we could not bind to a foreign address */
239 return 2;
240
241 return 0;
242}
Willy Tarreaue6b98942007-10-29 01:09:36 +0100243
Willy Tarreau9650f372009-08-16 14:02:45 +0200244
245/*
Willy Tarreau14f8e862012-08-30 22:23:13 +0200246 * This function initiates a TCP connection establishment to the target assigned
247 * to connection <conn> using (si->{target,addr.to}). A source address may be
248 * pointed to by conn->addr.from in case of transparent proxying. Normal source
249 * bind addresses are still determined locally (due to the possible need of a
250 * source port). conn->target may point either to a valid server or to a backend,
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100251 * depending on conn->target. Only OBJ_TYPE_PROXY and OBJ_TYPE_SERVER are
Willy Tarreauf0837b22012-11-24 10:24:27 +0100252 * supported. The <data> parameter is a boolean indicating whether there are data
253 * waiting for being sent or not, in order to adjust data write polling and on
254 * some platforms, the ability to avoid an empty initial ACK. The <delack> argument
255 * allows the caller to force using a delayed ACK when establishing the connection :
256 * - 0 = no delayed ACK unless data are advertised and backend has tcp-smart-connect
257 * - 1 = delayed ACK if backend has tcp-smart-connect, regardless of data
258 * - 2 = delayed ACK regardless of backend options
Willy Tarreaub1d67742010-03-29 19:36:59 +0200259 *
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200260 * Note that a pending send_proxy message accounts for data.
261 *
Willy Tarreau9650f372009-08-16 14:02:45 +0200262 * It can return one of :
263 * - SN_ERR_NONE if everything's OK
264 * - SN_ERR_SRVTO if there are no more servers
265 * - SN_ERR_SRVCL if the connection was refused by the server
266 * - SN_ERR_PRXCOND if the connection has been limited by the proxy (maxconn)
267 * - SN_ERR_RESOURCE if a system resource is lacking (eg: fd limits, ports, ...)
268 * - SN_ERR_INTERNAL for any other purely internal errors
269 * Additionnally, in the case of SN_ERR_RESOURCE, an emergency log will be emitted.
Willy Tarreau6b0a8502012-11-23 08:51:32 +0100270 *
271 * The connection's fd is inserted only when SN_ERR_NONE is returned, otherwise
272 * it's invalid and the caller has nothing to do.
Willy Tarreau9650f372009-08-16 14:02:45 +0200273 */
Willy Tarreauf1536862011-03-03 18:27:32 +0100274
Willy Tarreauf0837b22012-11-24 10:24:27 +0100275int tcp_connect_server(struct connection *conn, int data, int delack)
Willy Tarreau9650f372009-08-16 14:02:45 +0200276{
277 int fd;
Willy Tarreauac825402011-03-04 22:04:29 +0100278 struct server *srv;
279 struct proxy *be;
Willy Tarreaua4380b42012-12-08 22:49:11 +0100280 struct conn_src *src;
Willy Tarreauac825402011-03-04 22:04:29 +0100281
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100282 switch (obj_type(conn->target)) {
283 case OBJ_TYPE_PROXY:
284 be = objt_proxy(conn->target);
Willy Tarreauac825402011-03-04 22:04:29 +0100285 srv = NULL;
286 break;
Willy Tarreau3fdb3662012-11-12 00:42:33 +0100287 case OBJ_TYPE_SERVER:
288 srv = objt_server(conn->target);
Willy Tarreauac825402011-03-04 22:04:29 +0100289 be = srv->proxy;
290 break;
291 default:
292 return SN_ERR_INTERNAL;
293 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200294
Willy Tarreau986a9d22012-08-30 21:11:38 +0200295 if ((fd = conn->t.sock.fd = socket(conn->addr.to.ss_family, SOCK_STREAM, IPPROTO_TCP)) == -1) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200296 qfprintf(stderr, "Cannot get a server socket.\n");
297
298 if (errno == ENFILE)
299 send_log(be, LOG_EMERG,
300 "Proxy %s reached system FD limit at %d. Please check system tunables.\n",
301 be->id, maxfd);
302 else if (errno == EMFILE)
303 send_log(be, LOG_EMERG,
304 "Proxy %s reached process FD limit at %d. Please check 'ulimit-n' and restart.\n",
305 be->id, maxfd);
306 else if (errno == ENOBUFS || errno == ENOMEM)
307 send_log(be, LOG_EMERG,
308 "Proxy %s reached system memory limit at %d sockets. Please check system tunables.\n",
309 be->id, maxfd);
310 /* this is a resource error */
311 return SN_ERR_RESOURCE;
312 }
313
314 if (fd >= global.maxsock) {
315 /* do not log anything there, it's a normal condition when this option
316 * is used to serialize connections to a server !
317 */
318 Alert("socket(): not enough free sockets. Raise -n argument. Giving up.\n");
319 close(fd);
320 return SN_ERR_PRXCOND; /* it is a configuration limit */
321 }
322
323 if ((fcntl(fd, F_SETFL, O_NONBLOCK)==-1) ||
Simon Hormande072bd2011-06-24 15:11:37 +0900324 (setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &one, sizeof(one)) == -1)) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200325 qfprintf(stderr,"Cannot set client socket to non blocking mode.\n");
326 close(fd);
327 return SN_ERR_INTERNAL;
328 }
329
330 if (be->options & PR_O_TCP_SRV_KA)
Simon Hormande072bd2011-06-24 15:11:37 +0900331 setsockopt(fd, SOL_SOCKET, SO_KEEPALIVE, &one, sizeof(one));
Willy Tarreau9650f372009-08-16 14:02:45 +0200332
Willy Tarreau9650f372009-08-16 14:02:45 +0200333 /* allow specific binding :
334 * - server-specific at first
335 * - proxy-specific next
336 */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100337 if (srv && srv->conn_src.opts & CO_SRC_BIND)
338 src = &srv->conn_src;
339 else if (be->conn_src.opts & CO_SRC_BIND)
340 src = &be->conn_src;
341 else
342 src = NULL;
343
344 if (src) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200345 int ret, flags = 0;
346
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200347 if (is_addr(&conn->addr.from)) {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100348 switch (src->opts & CO_SRC_TPROXY_MASK) {
Willy Tarreauef9a3602012-12-08 22:29:20 +0100349 case CO_SRC_TPROXY_ADDR:
350 case CO_SRC_TPROXY_CLI:
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200351 flags = 3;
352 break;
Willy Tarreauef9a3602012-12-08 22:29:20 +0100353 case CO_SRC_TPROXY_CIP:
354 case CO_SRC_TPROXY_DYN:
Willy Tarreau5f2877a2012-10-26 19:57:58 +0200355 flags = 1;
356 break;
357 }
Willy Tarreau9650f372009-08-16 14:02:45 +0200358 }
Willy Tarreaub1d67742010-03-29 19:36:59 +0200359
Willy Tarreau9650f372009-08-16 14:02:45 +0200360#ifdef SO_BINDTODEVICE
361 /* Note: this might fail if not CAP_NET_RAW */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100362 if (src->iface_name)
363 setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE, src->iface_name, src->iface_len + 1);
Willy Tarreau9650f372009-08-16 14:02:45 +0200364#endif
365
Willy Tarreaua4380b42012-12-08 22:49:11 +0100366 if (src->sport_range) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200367 int attempts = 10; /* should be more than enough to find a spare port */
Willy Tarreaua4380b42012-12-08 22:49:11 +0100368 struct sockaddr_storage sa;
Willy Tarreau9650f372009-08-16 14:02:45 +0200369
370 ret = 1;
Willy Tarreaua4380b42012-12-08 22:49:11 +0100371 sa = src->source_addr;
Willy Tarreau9650f372009-08-16 14:02:45 +0200372
373 do {
374 /* note: in case of retry, we may have to release a previously
375 * allocated port, hence this loop's construct.
376 */
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200377 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
378 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200379
380 if (!attempts)
381 break;
382 attempts--;
383
Willy Tarreaua4380b42012-12-08 22:49:11 +0100384 fdinfo[fd].local_port = port_range_alloc_port(src->sport_range);
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200385 if (!fdinfo[fd].local_port)
Willy Tarreau9650f372009-08-16 14:02:45 +0200386 break;
387
Willy Tarreaua4380b42012-12-08 22:49:11 +0100388 fdinfo[fd].port_range = src->sport_range;
389 set_host_port(&sa, fdinfo[fd].local_port);
Willy Tarreau9650f372009-08-16 14:02:45 +0200390
Willy Tarreaua4380b42012-12-08 22:49:11 +0100391 ret = tcp_bind_socket(fd, flags, &sa, &conn->addr.from);
Willy Tarreau9650f372009-08-16 14:02:45 +0200392 } while (ret != 0); /* binding NOK */
393 }
394 else {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100395 ret = tcp_bind_socket(fd, flags, &src->source_addr, &conn->addr.from);
Willy Tarreau9650f372009-08-16 14:02:45 +0200396 }
397
Willy Tarreaua4380b42012-12-08 22:49:11 +0100398 if (unlikely(ret != 0)) {
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200399 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
400 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200401 close(fd);
402
Willy Tarreau9650f372009-08-16 14:02:45 +0200403 if (ret == 1) {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100404 Alert("Cannot bind to source address before connect() for backend %s. Aborting.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200405 be->id);
406 send_log(be, LOG_EMERG,
Willy Tarreaua4380b42012-12-08 22:49:11 +0100407 "Cannot bind to source address before connect() for backend %s.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200408 be->id);
409 } else {
Willy Tarreaua4380b42012-12-08 22:49:11 +0100410 Alert("Cannot bind to tproxy source address before connect() for backend %s. Aborting.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200411 be->id);
412 send_log(be, LOG_EMERG,
Willy Tarreaua4380b42012-12-08 22:49:11 +0100413 "Cannot bind to tproxy source address before connect() for backend %s.\n",
Willy Tarreau9650f372009-08-16 14:02:45 +0200414 be->id);
415 }
416 return SN_ERR_RESOURCE;
417 }
418 }
419
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200420 /* if a send_proxy is there, there are data */
421 data |= conn->send_proxy_ofs;
422
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400423#if defined(TCP_QUICKACK)
Willy Tarreau9650f372009-08-16 14:02:45 +0200424 /* disabling tcp quick ack now allows the first request to leave the
425 * machine with the first ACK. We only do this if there are pending
Willy Tarreauf0837b22012-11-24 10:24:27 +0100426 * data in the buffer.
Willy Tarreau9650f372009-08-16 14:02:45 +0200427 */
Willy Tarreauf0837b22012-11-24 10:24:27 +0100428 if (delack == 2 || ((delack || data) && (be->options2 & PR_O2_SMARTCON)))
Simon Hormande072bd2011-06-24 15:11:37 +0900429 setsockopt(fd, IPPROTO_TCP, TCP_QUICKACK, &zero, sizeof(zero));
Willy Tarreau9650f372009-08-16 14:02:45 +0200430#endif
431
Willy Tarreaue803de22010-01-21 17:43:04 +0100432 if (global.tune.server_sndbuf)
433 setsockopt(fd, SOL_SOCKET, SO_SNDBUF, &global.tune.server_sndbuf, sizeof(global.tune.server_sndbuf));
434
435 if (global.tune.server_rcvbuf)
436 setsockopt(fd, SOL_SOCKET, SO_RCVBUF, &global.tune.server_rcvbuf, sizeof(global.tune.server_rcvbuf));
437
Willy Tarreau986a9d22012-08-30 21:11:38 +0200438 if ((connect(fd, (struct sockaddr *)&conn->addr.to, get_addr_len(&conn->addr.to)) == -1) &&
Willy Tarreau9650f372009-08-16 14:02:45 +0200439 (errno != EINPROGRESS) && (errno != EALREADY) && (errno != EISCONN)) {
440
Willy Tarreaub1719512012-12-08 23:03:28 +0100441 if (errno == EAGAIN || errno == EADDRINUSE || errno == EADDRNOTAVAIL) {
Willy Tarreau9650f372009-08-16 14:02:45 +0200442 char *msg;
Willy Tarreaub1719512012-12-08 23:03:28 +0100443 if (errno == EAGAIN || errno == EADDRNOTAVAIL)
Willy Tarreau9650f372009-08-16 14:02:45 +0200444 msg = "no free ports";
445 else
446 msg = "local address already in use";
447
Willy Tarreaub1719512012-12-08 23:03:28 +0100448 qfprintf(stderr,"Connect() failed for backend %s: %s.\n", be->id, msg);
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200449 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
450 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200451 close(fd);
Willy Tarreaub1719512012-12-08 23:03:28 +0100452 send_log(be, LOG_ERR, "Connect() failed for backend %s: %s.\n", be->id, msg);
Willy Tarreau9650f372009-08-16 14:02:45 +0200453 return SN_ERR_RESOURCE;
454 } else if (errno == ETIMEDOUT) {
455 //qfprintf(stderr,"Connect(): ETIMEDOUT");
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200456 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
457 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200458 close(fd);
459 return SN_ERR_SRVTO;
460 } else {
461 // (errno == ECONNREFUSED || errno == ENETUNREACH || errno == EACCES || errno == EPERM)
462 //qfprintf(stderr,"Connect(): %d", errno);
Willy Tarreau8d5d77e2009-10-18 07:25:52 +0200463 port_range_release_port(fdinfo[fd].port_range, fdinfo[fd].local_port);
464 fdinfo[fd].port_range = NULL;
Willy Tarreau9650f372009-08-16 14:02:45 +0200465 close(fd);
466 return SN_ERR_SRVCL;
467 }
468 }
469
Willy Tarreau986a9d22012-08-30 21:11:38 +0200470 conn->flags = CO_FL_WAIT_L4_CONN; /* connection in progress */
Willy Tarreaufc8f1f02012-12-08 18:53:44 +0100471 conn->flags |= CO_FL_ADDR_TO_SET;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200472
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200473 /* Prepare to send a few handshakes related to the on-wire protocol. */
474 if (conn->send_proxy_ofs)
Willy Tarreau57cd3e42013-10-24 22:01:26 +0200475 conn->flags |= CO_FL_SEND_PROXY;
Willy Tarreau1ec74bf2013-10-24 21:45:00 +0200476
Willy Tarreauf79c8172013-10-21 16:30:56 +0200477 conn_ctrl_init(conn); /* registers the FD */
Willy Tarreau986a9d22012-08-30 21:11:38 +0200478 conn_sock_want_send(conn); /* for connect status */
Willy Tarreau15678ef2012-08-31 13:54:11 +0200479
Willy Tarreauf7bc57c2012-10-03 00:19:48 +0200480 if (conn_xprt_init(conn) < 0) {
Willy Tarreauf79c8172013-10-21 16:30:56 +0200481 conn_force_close(conn);
Willy Tarreau15678ef2012-08-31 13:54:11 +0200482 return SN_ERR_RESOURCE;
Willy Tarreau184636e2012-09-06 14:04:41 +0200483 }
Willy Tarreau15678ef2012-08-31 13:54:11 +0200484
Willy Tarreau14f8e862012-08-30 22:23:13 +0200485 if (data)
Willy Tarreau986a9d22012-08-30 21:11:38 +0200486 conn_data_want_send(conn); /* prepare to send data if any */
Willy Tarreau9650f372009-08-16 14:02:45 +0200487
Willy Tarreau9650f372009-08-16 14:02:45 +0200488 return SN_ERR_NONE; /* connection is OK */
489}
490
491
Willy Tarreau59b94792012-05-11 16:16:40 +0200492/*
493 * Retrieves the source address for the socket <fd>, with <dir> indicating
494 * if we're a listener (=0) or an initiator (!=0). It returns 0 in case of
495 * success, -1 in case of error. The socket's source address is stored in
496 * <sa> for <salen> bytes.
497 */
498int tcp_get_src(int fd, struct sockaddr *sa, socklen_t salen, int dir)
499{
500 if (dir)
501 return getsockname(fd, sa, &salen);
502 else
503 return getpeername(fd, sa, &salen);
504}
505
506
507/*
508 * Retrieves the original destination address for the socket <fd>, with <dir>
509 * indicating if we're a listener (=0) or an initiator (!=0). In the case of a
510 * listener, if the original destination address was translated, the original
511 * address is retrieved. It returns 0 in case of success, -1 in case of error.
512 * The socket's source address is stored in <sa> for <salen> bytes.
513 */
514int tcp_get_dst(int fd, struct sockaddr *sa, socklen_t salen, int dir)
515{
516 if (dir)
517 return getpeername(fd, sa, &salen);
518#if defined(TPROXY) && defined(SO_ORIGINAL_DST)
519 else if (getsockopt(fd, SOL_IP, SO_ORIGINAL_DST, sa, &salen) == 0)
520 return 0;
521#endif
522 else
523 return getsockname(fd, sa, &salen);
524}
525
Willy Tarreau2b57cb82013-06-10 19:56:38 +0200526/* Tries to drain any pending incoming data from the socket to reach the
527 * receive shutdown. Returns non-zero if the shutdown was found, otherwise
528 * zero. This is useful to decide whether we can close a connection cleanly
529 * are we must kill it hard.
530 */
531int tcp_drain(int fd)
532{
533 int turns = 2;
534 int len;
535
536 while (turns) {
537#ifdef MSG_TRUNC_CLEARS_INPUT
538 len = recv(fd, NULL, INT_MAX, MSG_DONTWAIT | MSG_NOSIGNAL | MSG_TRUNC);
539 if (len == -1 && errno == EFAULT)
540#endif
541 len = recv(fd, trash.str, trash.size, MSG_DONTWAIT | MSG_NOSIGNAL);
542
543 if (len == 0) /* cool, shutdown received */
544 return 1;
545
546 if (len < 0) {
547 if (errno == EAGAIN) /* connection not closed yet */
548 return 0;
549 if (errno == EINTR) /* oops, try again */
550 continue;
551 /* other errors indicate a dead connection, fine. */
552 return 1;
553 }
554 /* OK we read some data, let's try again once */
555 turns--;
556 }
557 /* some data are still present, give up */
558 return 0;
559}
560
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200561/* This is the callback which is set when a connection establishment is pending
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100562 * and we have nothing to send. It updates the FD polling status. It returns 0
563 * if it fails in a fatal way or needs to poll to go further, otherwise it
564 * returns non-zero and removes the CO_FL_WAIT_L4_CONN flag from the connection's
565 * flags. In case of error, it sets CO_FL_ERROR and leaves the error code in
566 * errno. The error checking is done in two passes in order to limit the number
567 * of syscalls in the normal case :
568 * - if POLL_ERR was reported by the poller, we check for a pending error on
569 * the socket before proceeding. If found, it's assigned to errno so that
570 * upper layers can see it.
571 * - otherwise connect() is used to check the connection state again, since
572 * the getsockopt return cannot reliably be used to know if the connection
573 * is still pending or ready. This one may often return an error as well,
574 * since we don't always have POLL_ERR (eg: OSX or cached events).
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200575 */
Willy Tarreau239d7182012-07-23 18:53:03 +0200576int tcp_connect_probe(struct connection *conn)
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200577{
Willy Tarreau239d7182012-07-23 18:53:03 +0200578 int fd = conn->t.sock.fd;
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100579 socklen_t lskerr;
580 int skerr;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200581
Willy Tarreau80184712012-07-06 14:54:49 +0200582 if (conn->flags & CO_FL_ERROR)
Willy Tarreauafad0e02012-08-09 14:45:22 +0200583 return 0;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200584
Willy Tarreauf79c8172013-10-21 16:30:56 +0200585 if (!(conn->flags & CO_FL_CTRL_READY))
586 return 0;
587
Willy Tarreau80184712012-07-06 14:54:49 +0200588 if (!(conn->flags & CO_FL_WAIT_L4_CONN))
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200589 return 1; /* strange we were called while ready */
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200590
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100591 /* we might be the first witness of FD_POLL_ERR. Note that FD_POLL_HUP
592 * without FD_POLL_IN also indicates a hangup without input data meaning
593 * there was no connection.
594 */
595 if (fdtab[fd].ev & FD_POLL_ERR ||
596 (fdtab[fd].ev & (FD_POLL_IN|FD_POLL_HUP)) == FD_POLL_HUP) {
597 skerr = 0;
598 lskerr = sizeof(skerr);
599 getsockopt(fd, SOL_SOCKET, SO_ERROR, &skerr, &lskerr);
600 errno = skerr;
601 if (errno == EAGAIN)
602 errno = 0;
603 if (errno)
604 goto out_error;
605 }
Willy Tarreau2da156f2012-07-23 15:07:23 +0200606
Willy Tarreauf12a20e2013-12-04 16:11:04 +0100607 /* Use connect() to check the state of the socket. This has the
608 * advantage of giving us the following info :
Willy Tarreau2c6be842012-07-06 17:12:34 +0200609 * - error
610 * - connecting (EALREADY, EINPROGRESS)
611 * - connected (EISCONN, 0)
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200612 */
Willy Tarreau986a9d22012-08-30 21:11:38 +0200613 if (connect(fd, (struct sockaddr *)&conn->addr.to, get_addr_len(&conn->addr.to)) < 0) {
Willy Tarreauf9dabec2012-08-17 17:33:53 +0200614 if (errno == EALREADY || errno == EINPROGRESS) {
Willy Tarreaud486ef52012-12-10 17:03:52 +0100615 __conn_sock_stop_recv(conn);
616 __conn_sock_poll_send(conn);
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200617 return 0;
Willy Tarreauf9dabec2012-08-17 17:33:53 +0200618 }
Willy Tarreaua190d592012-05-20 18:35:19 +0200619
Willy Tarreau2c6be842012-07-06 17:12:34 +0200620 if (errno && errno != EISCONN)
Willy Tarreaua190d592012-05-20 18:35:19 +0200621 goto out_error;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200622
Willy Tarreau2c6be842012-07-06 17:12:34 +0200623 /* otherwise we're connected */
Willy Tarreaua190d592012-05-20 18:35:19 +0200624 }
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200625
Willy Tarreau076be252012-07-06 16:02:29 +0200626 /* The FD is ready now, we'll mark the connection as complete and
Willy Tarreauf7bc57c2012-10-03 00:19:48 +0200627 * forward the event to the transport layer which will notify the
628 * data layer.
Willy Tarreaua190d592012-05-20 18:35:19 +0200629 */
Willy Tarreau80184712012-07-06 14:54:49 +0200630 conn->flags &= ~CO_FL_WAIT_L4_CONN;
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200631 return 1;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200632
633 out_error:
Willy Tarreau0b0c0972012-07-23 20:05:00 +0200634 /* Write error on the file descriptor. Report it to the connection
635 * and disable polling on this FD.
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200636 */
637
Willy Tarreau26f4a042013-12-04 23:44:10 +0100638 conn->flags |= CO_FL_ERROR | CO_FL_SOCK_RD_SH | CO_FL_SOCK_WR_SH;
Willy Tarreaud486ef52012-12-10 17:03:52 +0100639 __conn_sock_stop_both(conn);
Willy Tarreauafad0e02012-08-09 14:45:22 +0200640 return 0;
Willy Tarreaueeda90e2012-05-11 19:53:32 +0200641}
642
Willy Tarreau59b94792012-05-11 16:16:40 +0200643
Willy Tarreaue6b98942007-10-29 01:09:36 +0100644/* This function tries to bind a TCPv4/v6 listener. It may return a warning or
Willy Tarreau8ab505b2013-01-24 01:41:38 +0100645 * an error message in <errmsg> if the message is at most <errlen> bytes long
646 * (including '\0'). Note that <errmsg> may be NULL if <errlen> is also zero.
647 * The return value is composed from ERR_ABORT, ERR_WARN,
Willy Tarreaue6b98942007-10-29 01:09:36 +0100648 * ERR_ALERT, ERR_RETRYABLE and ERR_FATAL. ERR_NONE indicates that everything
649 * was alright and that no message was returned. ERR_RETRYABLE means that an
650 * error occurred but that it may vanish after a retry (eg: port in use), and
Aman Guptad94991d2012-04-06 17:39:26 -0700651 * ERR_FATAL indicates a non-fixable error. ERR_WARN and ERR_ALERT do not alter
Willy Tarreaue6b98942007-10-29 01:09:36 +0100652 * the meaning of the error, but just indicate that a message is present which
653 * should be displayed with the respective level. Last, ERR_ABORT indicates
654 * that it's pointless to try to start other listeners. No error message is
655 * returned if errlen is NULL.
656 */
657int tcp_bind_listener(struct listener *listener, char *errmsg, int errlen)
658{
659 __label__ tcp_return, tcp_close_return;
660 int fd, err;
Willy Tarreau40aa0702013-03-10 23:51:38 +0100661 int ext, ready;
662 socklen_t ready_len;
Willy Tarreaue6b98942007-10-29 01:09:36 +0100663 const char *msg = NULL;
664
665 /* ensure we never return garbage */
Willy Tarreau8ab505b2013-01-24 01:41:38 +0100666 if (errlen)
Willy Tarreaue6b98942007-10-29 01:09:36 +0100667 *errmsg = 0;
668
669 if (listener->state != LI_ASSIGNED)
670 return ERR_NONE; /* already bound */
671
672 err = ERR_NONE;
673
Willy Tarreau40aa0702013-03-10 23:51:38 +0100674 /* if the listener already has an fd assigned, then we were offered the
675 * fd by an external process (most likely the parent), and we don't want
676 * to create a new socket. However we still want to set a few flags on
677 * the socket.
678 */
679 fd = listener->fd;
680 ext = (fd >= 0);
681
682 if (!ext && (fd = socket(listener->addr.ss_family, SOCK_STREAM, IPPROTO_TCP)) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100683 err |= ERR_RETRYABLE | ERR_ALERT;
684 msg = "cannot create listening socket";
685 goto tcp_return;
686 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100687
Willy Tarreaue6b98942007-10-29 01:09:36 +0100688 if (fd >= global.maxsock) {
689 err |= ERR_FATAL | ERR_ABORT | ERR_ALERT;
690 msg = "not enough free sockets (raise '-n' parameter)";
691 goto tcp_close_return;
692 }
693
Willy Tarreaufb14edc2009-06-14 15:24:37 +0200694 if (fcntl(fd, F_SETFL, O_NONBLOCK) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100695 err |= ERR_FATAL | ERR_ALERT;
696 msg = "cannot make socket non-blocking";
697 goto tcp_close_return;
698 }
699
Willy Tarreau40aa0702013-03-10 23:51:38 +0100700 if (!ext && setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, &one, sizeof(one)) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100701 /* not fatal but should be reported */
702 msg = "cannot do so_reuseaddr";
703 err |= ERR_ALERT;
704 }
705
706 if (listener->options & LI_O_NOLINGER)
Simon Hormande072bd2011-06-24 15:11:37 +0900707 setsockopt(fd, SOL_SOCKET, SO_LINGER, &nolinger, sizeof(struct linger));
Willy Tarreauedcf6682008-11-30 23:15:34 +0100708
Willy Tarreaue6b98942007-10-29 01:09:36 +0100709#ifdef SO_REUSEPORT
710 /* OpenBSD supports this. As it's present in old libc versions of Linux,
711 * it might return an error that we will silently ignore.
712 */
Willy Tarreau40aa0702013-03-10 23:51:38 +0100713 if (!ext)
714 setsockopt(fd, SOL_SOCKET, SO_REUSEPORT, &one, sizeof(one));
Willy Tarreaue6b98942007-10-29 01:09:36 +0100715#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200716
Willy Tarreau40aa0702013-03-10 23:51:38 +0100717 if (!ext && (listener->options & LI_O_FOREIGN)) {
David du Colombier65c17962012-07-13 14:34:59 +0200718 switch (listener->addr.ss_family) {
719 case AF_INET:
Pieter Baauwd551fb52013-05-08 22:49:23 +0200720 if (1
721#if defined(IP_TRANSPARENT)
722 && (setsockopt(fd, SOL_IP, IP_TRANSPARENT, &one, sizeof(one)) == -1)
723#endif
724#if defined(IP_FREEBIND)
725 && (setsockopt(fd, SOL_IP, IP_FREEBIND, &one, sizeof(one)) == -1)
726#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200727#if defined(IP_BINDANY)
728 && (setsockopt(fd, IPPROTO_IP, IP_BINDANY, &one, sizeof(one)) == -1)
729#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200730#if defined(SO_BINDANY)
731 && (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == -1)
732#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200733 ) {
David du Colombier65c17962012-07-13 14:34:59 +0200734 msg = "cannot make listening socket transparent";
735 err |= ERR_ALERT;
736 }
737 break;
738 case AF_INET6:
Pieter Baauwd551fb52013-05-08 22:49:23 +0200739 if (1
740#if defined(IPV6_TRANSPARENT)
741 && (setsockopt(fd, SOL_IPV6, IPV6_TRANSPARENT, &one, sizeof(one)) == -1)
742#endif
Pieter Baauwff30b662013-05-08 23:22:39 +0200743#if defined(IPV6_BINDANY)
744 && (setsockopt(fd, IPPROTO_IPV6, IPV6_BINDANY, &one, sizeof(one)) == -1)
745#endif
Pieter Baauw1eb75922013-05-08 23:30:23 +0200746#if defined(SO_BINDANY)
747 && (setsockopt(fd, SOL_SOCKET, SO_BINDANY, &one, sizeof(one)) == -1)
748#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +0200749 ) {
David du Colombier65c17962012-07-13 14:34:59 +0200750 msg = "cannot make listening socket transparent";
751 err |= ERR_ALERT;
752 }
753 break;
754 }
Willy Tarreaub1e52e82008-01-13 14:49:51 +0100755 }
Pieter Baauwd551fb52013-05-08 22:49:23 +0200756
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100757#ifdef SO_BINDTODEVICE
758 /* Note: this might fail if not CAP_NET_RAW */
Willy Tarreau40aa0702013-03-10 23:51:38 +0100759 if (!ext && listener->interface) {
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100760 if (setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE,
Willy Tarreau604e8302009-03-06 00:48:23 +0100761 listener->interface, strlen(listener->interface) + 1) == -1) {
Willy Tarreau5e6e2042009-02-04 17:19:29 +0100762 msg = "cannot bind listener to device";
763 err |= ERR_WARN;
764 }
765 }
766#endif
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400767#if defined(TCP_MAXSEG)
Willy Tarreau48a7e722010-12-24 15:26:39 +0100768 if (listener->maxseg > 0) {
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400769 if (setsockopt(fd, IPPROTO_TCP, TCP_MAXSEG,
Willy Tarreaube1b9182009-06-14 18:48:19 +0200770 &listener->maxseg, sizeof(listener->maxseg)) == -1) {
771 msg = "cannot set MSS";
772 err |= ERR_WARN;
773 }
774 }
775#endif
Willy Tarreaucb6cd432009-10-13 07:34:14 +0200776#if defined(TCP_DEFER_ACCEPT)
777 if (listener->options & LI_O_DEF_ACCEPT) {
778 /* defer accept by up to one second */
779 int accept_delay = 1;
780 if (setsockopt(fd, IPPROTO_TCP, TCP_DEFER_ACCEPT, &accept_delay, sizeof(accept_delay)) == -1) {
781 msg = "cannot enable DEFER_ACCEPT";
782 err |= ERR_WARN;
783 }
784 }
785#endif
Willy Tarreau1c862c52012-10-05 16:21:00 +0200786#if defined(TCP_FASTOPEN)
787 if (listener->options & LI_O_TCP_FO) {
788 /* TFO needs a queue length, let's use the configured backlog */
789 int qlen = listener->backlog ? listener->backlog : listener->maxconn;
790 if (setsockopt(fd, IPPROTO_TCP, TCP_FASTOPEN, &qlen, sizeof(qlen)) == -1) {
791 msg = "cannot enable TCP_FASTOPEN";
792 err |= ERR_WARN;
793 }
794 }
795#endif
Willy Tarreau9b6700f2012-11-24 11:55:28 +0100796#if defined(IPV6_V6ONLY)
797 if (listener->options & LI_O_V6ONLY)
798 setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, &one, sizeof(one));
Willy Tarreau77e3af92012-11-24 15:07:23 +0100799 else if (listener->options & LI_O_V4V6)
800 setsockopt(fd, IPPROTO_IPV6, IPV6_V6ONLY, &zero, sizeof(zero));
Willy Tarreau9b6700f2012-11-24 11:55:28 +0100801#endif
802
Willy Tarreau40aa0702013-03-10 23:51:38 +0100803 if (!ext && bind(fd, (struct sockaddr *)&listener->addr, listener->proto->sock_addrlen) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100804 err |= ERR_RETRYABLE | ERR_ALERT;
805 msg = "cannot bind socket";
806 goto tcp_close_return;
807 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100808
Willy Tarreau40aa0702013-03-10 23:51:38 +0100809 ready = 0;
810 ready_len = sizeof(ready);
811 if (getsockopt(fd, SOL_SOCKET, SO_ACCEPTCONN, &ready, &ready_len) == -1)
812 ready = 0;
813
814 if (!(ext && ready) && /* only listen if not already done by external process */
815 listen(fd, listener->backlog ? listener->backlog : listener->maxconn) == -1) {
Willy Tarreaue6b98942007-10-29 01:09:36 +0100816 err |= ERR_RETRYABLE | ERR_ALERT;
817 msg = "cannot listen to socket";
818 goto tcp_close_return;
819 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100820
Dmitry Sivachenkocaf58982009-08-24 15:11:06 +0400821#if defined(TCP_QUICKACK)
Willy Tarreau9ea05a72009-06-14 12:07:01 +0200822 if (listener->options & LI_O_NOQUICKACK)
Simon Hormande072bd2011-06-24 15:11:37 +0900823 setsockopt(fd, IPPROTO_TCP, TCP_QUICKACK, &zero, sizeof(zero));
Willy Tarreau9ea05a72009-06-14 12:07:01 +0200824#endif
825
Willy Tarreaue6b98942007-10-29 01:09:36 +0100826 /* the socket is ready */
827 listener->fd = fd;
828 listener->state = LI_LISTEN;
829
Willy Tarreaueabf3132008-08-29 23:36:51 +0200830 fdtab[fd].owner = listener; /* reference the listener instead of a task */
Willy Tarreauaece46a2012-07-06 12:25:58 +0200831 fdtab[fd].iocb = listener->proto->accept;
Willy Tarreaueb472682010-05-28 18:46:57 +0200832 fd_insert(fd);
833
Willy Tarreaue6b98942007-10-29 01:09:36 +0100834 tcp_return:
Cyril Bonté43ba1b32010-11-01 19:26:01 +0100835 if (msg && errlen) {
836 char pn[INET6_ADDRSTRLEN];
837
Willy Tarreau631f01c2011-09-05 00:36:48 +0200838 addr_to_str(&listener->addr, pn, sizeof(pn));
839 snprintf(errmsg, errlen, "%s [%s:%d]", msg, pn, get_host_port(&listener->addr));
Cyril Bonté43ba1b32010-11-01 19:26:01 +0100840 }
Willy Tarreaue6b98942007-10-29 01:09:36 +0100841 return err;
842
843 tcp_close_return:
844 close(fd);
845 goto tcp_return;
846}
847
848/* This function creates all TCP sockets bound to the protocol entry <proto>.
849 * It is intended to be used as the protocol's bind_all() function.
850 * The sockets will be registered but not added to any fd_set, in order not to
851 * loose them across the fork(). A call to enable_all_listeners() is needed
852 * to complete initialization. The return value is composed from ERR_*.
853 */
Emeric Bruncf20bf12010-10-22 16:06:11 +0200854static int tcp_bind_listeners(struct protocol *proto, char *errmsg, int errlen)
Willy Tarreaue6b98942007-10-29 01:09:36 +0100855{
856 struct listener *listener;
857 int err = ERR_NONE;
858
859 list_for_each_entry(listener, &proto->listeners, proto_list) {
Emeric Bruncf20bf12010-10-22 16:06:11 +0200860 err |= tcp_bind_listener(listener, errmsg, errlen);
861 if (err & ERR_ABORT)
Willy Tarreaue6b98942007-10-29 01:09:36 +0100862 break;
863 }
864
865 return err;
866}
867
868/* Add listener to the list of tcpv4 listeners. The listener's state
869 * is automatically updated from LI_INIT to LI_ASSIGNED. The number of
870 * listeners is updated. This is the function to use to add a new listener.
871 */
872void tcpv4_add_listener(struct listener *listener)
873{
874 if (listener->state != LI_INIT)
875 return;
876 listener->state = LI_ASSIGNED;
877 listener->proto = &proto_tcpv4;
878 LIST_ADDQ(&proto_tcpv4.listeners, &listener->proto_list);
879 proto_tcpv4.nb_listeners++;
880}
881
882/* Add listener to the list of tcpv4 listeners. The listener's state
883 * is automatically updated from LI_INIT to LI_ASSIGNED. The number of
884 * listeners is updated. This is the function to use to add a new listener.
885 */
886void tcpv6_add_listener(struct listener *listener)
887{
888 if (listener->state != LI_INIT)
889 return;
890 listener->state = LI_ASSIGNED;
891 listener->proto = &proto_tcpv6;
892 LIST_ADDQ(&proto_tcpv6.listeners, &listener->proto_list);
893 proto_tcpv6.nb_listeners++;
894}
895
Willy Tarreauedcf6682008-11-30 23:15:34 +0100896/* This function performs the TCP request analysis on the current request. It
897 * returns 1 if the processing can continue on next analysers, or zero if it
898 * needs more data, encounters an error, or wants to immediately abort the
Willy Tarreaufb356202010-08-03 14:02:05 +0200899 * request. It relies on buffers flags, and updates s->req->analysers. The
900 * function may be called for frontend rules and backend rules. It only relies
901 * on the backend pointer so this works for both cases.
Willy Tarreauedcf6682008-11-30 23:15:34 +0100902 */
Willy Tarreau7421efb2012-07-02 15:11:27 +0200903int tcp_inspect_request(struct session *s, struct channel *req, int an_bit)
Willy Tarreauedcf6682008-11-30 23:15:34 +0100904{
905 struct tcp_rule *rule;
Willy Tarreaud1f96522010-08-03 19:34:32 +0200906 struct stksess *ts;
907 struct stktable *t;
Willy Tarreauedcf6682008-11-30 23:15:34 +0100908 int partial;
909
Willy Tarreau02d6cfc2012-03-01 18:19:58 +0100910 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 +0100911 now_ms, __FUNCTION__,
912 s,
913 req,
914 req->rex, req->wex,
915 req->flags,
Willy Tarreau9b28e032012-10-12 23:49:43 +0200916 req->buf->i,
Willy Tarreauedcf6682008-11-30 23:15:34 +0100917 req->analysers);
918
Willy Tarreauedcf6682008-11-30 23:15:34 +0100919 /* We don't know whether we have enough data, so must proceed
920 * this way :
921 * - iterate through all rules in their declaration order
922 * - if one rule returns MISS, it means the inspect delay is
923 * not over yet, then return immediately, otherwise consider
924 * it as a non-match.
925 * - if one rule returns OK, then return OK
926 * - if one rule returns KO, then return KO
927 */
928
Willy Tarreau9b28e032012-10-12 23:49:43 +0200929 if ((req->flags & CF_SHUTR) || buffer_full(req->buf, global.tune.maxrewrite) ||
Willy Tarreau3bf1b2b2012-08-27 20:46:07 +0200930 !s->be->tcp_req.inspect_delay || tick_is_expired(req->analyse_exp, now_ms))
Willy Tarreau32a6f2e2012-04-25 10:13:36 +0200931 partial = SMP_OPT_FINAL;
Willy Tarreauedcf6682008-11-30 23:15:34 +0100932 else
Willy Tarreau32a6f2e2012-04-25 10:13:36 +0200933 partial = 0;
Willy Tarreauedcf6682008-11-30 23:15:34 +0100934
Willy Tarreaufb356202010-08-03 14:02:05 +0200935 list_for_each_entry(rule, &s->be->tcp_req.inspect_rules, list) {
Willy Tarreau0cba6072013-11-28 22:21:02 +0100936 enum acl_test_res ret = ACL_TEST_PASS;
Willy Tarreauedcf6682008-11-30 23:15:34 +0100937
938 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +0200939 ret = acl_exec_cond(rule->cond, s->be, s, &s->txn, SMP_OPT_DIR_REQ | partial);
Thierry FOURNIERa65b3432013-11-28 18:22:00 +0100940 if (ret == ACL_TEST_MISS) {
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200941 channel_dont_connect(req);
Willy Tarreauedcf6682008-11-30 23:15:34 +0100942 /* just set the request timeout once at the beginning of the request */
Willy Tarreaufb356202010-08-03 14:02:05 +0200943 if (!tick_isset(req->analyse_exp) && s->be->tcp_req.inspect_delay)
Willy Tarreau0bb166b2013-11-04 15:56:53 +0100944 req->analyse_exp = tick_add(now_ms, s->be->tcp_req.inspect_delay);
Willy Tarreauedcf6682008-11-30 23:15:34 +0100945 return 0;
946 }
947
948 ret = acl_pass(ret);
949 if (rule->cond->pol == ACL_COND_UNLESS)
950 ret = !ret;
951 }
952
953 if (ret) {
954 /* we have a matching rule. */
955 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau8263d2b2012-08-28 00:06:31 +0200956 channel_abort(req);
957 channel_abort(s->rep);
Willy Tarreauedcf6682008-11-30 23:15:34 +0100958 req->analysers = 0;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +0200959
Willy Tarreau7d0aaf32011-03-10 23:25:56 +0100960 s->be->be_counters.denied_req++;
961 s->fe->fe_counters.denied_req++;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +0200962 if (s->listener->counters)
Willy Tarreau23968d82010-05-23 23:50:44 +0200963 s->listener->counters->denied_req++;
Krzysztof Piotr Oledzkiaeebf9b2009-10-04 15:43:17 +0200964
Willy Tarreauedcf6682008-11-30 23:15:34 +0100965 if (!(s->flags & SN_ERR_MASK))
966 s->flags |= SN_ERR_PRXCOND;
967 if (!(s->flags & SN_FINST_MASK))
968 s->flags |= SN_FINST_R;
969 return 0;
970 }
Willy Tarreau44778ad2013-10-30 19:24:00 +0100971 else if (rule->action >= TCP_ACT_TRK_SC0 && rule->action <= TCP_ACT_TRK_SCMAX) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +0100972 /* Note: only the first valid tracking parameter of each
973 * applies.
974 */
975 struct stktable_key *key;
976
Willy Tarreau44778ad2013-10-30 19:24:00 +0100977 if (s->stkctr[tcp_trk_idx(rule->action)].entry)
978 continue;
979
Willy Tarreau5d5b5d82012-12-09 12:00:04 +0100980 t = rule->act_prm.trk_ctr.table.t;
981 key = stktable_fetch_key(t, s->be, s, &s->txn, SMP_OPT_DIR_REQ|SMP_OPT_FINAL, rule->act_prm.trk_ctr.expr);
982
983 if (key && (ts = stktable_get_entry(t, key))) {
Willy Tarreaud5ca9ab2013-05-28 17:40:25 +0200984 session_track_stkctr(&s->stkctr[tcp_trk_idx(rule->action)], t, ts);
985 if (s->fe != s->be)
Willy Tarreaube4a3ef2013-06-17 15:04:07 +0200986 s->flags |= SN_BE_TRACK_SC0 << tcp_trk_idx(rule->action);
Willy Tarreaud1f96522010-08-03 19:34:32 +0200987 }
988 }
989 else {
Willy Tarreauedcf6682008-11-30 23:15:34 +0100990 /* otherwise accept */
Willy Tarreaud1f96522010-08-03 19:34:32 +0200991 break;
992 }
Willy Tarreauedcf6682008-11-30 23:15:34 +0100993 }
994 }
995
996 /* if we get there, it means we have no rule which matches, or
997 * we have an explicit accept, so we apply the default accept.
998 */
Willy Tarreau3a816292009-07-07 10:55:49 +0200999 req->analysers &= ~an_bit;
Willy Tarreauedcf6682008-11-30 23:15:34 +01001000 req->analyse_exp = TICK_ETERNITY;
1001 return 1;
1002}
1003
Emeric Brun97679e72010-09-23 17:56:44 +02001004/* This function performs the TCP response analysis on the current response. It
1005 * returns 1 if the processing can continue on next analysers, or zero if it
1006 * needs more data, encounters an error, or wants to immediately abort the
1007 * response. It relies on buffers flags, and updates s->rep->analysers. The
1008 * function may be called for backend rules.
1009 */
Willy Tarreau7421efb2012-07-02 15:11:27 +02001010int tcp_inspect_response(struct session *s, struct channel *rep, int an_bit)
Emeric Brun97679e72010-09-23 17:56:44 +02001011{
1012 struct tcp_rule *rule;
1013 int partial;
1014
Willy Tarreau02d6cfc2012-03-01 18:19:58 +01001015 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 +02001016 now_ms, __FUNCTION__,
1017 s,
1018 rep,
1019 rep->rex, rep->wex,
1020 rep->flags,
Willy Tarreau9b28e032012-10-12 23:49:43 +02001021 rep->buf->i,
Emeric Brun97679e72010-09-23 17:56:44 +02001022 rep->analysers);
1023
1024 /* We don't know whether we have enough data, so must proceed
1025 * this way :
1026 * - iterate through all rules in their declaration order
1027 * - if one rule returns MISS, it means the inspect delay is
1028 * not over yet, then return immediately, otherwise consider
1029 * it as a non-match.
1030 * - if one rule returns OK, then return OK
1031 * - if one rule returns KO, then return KO
1032 */
1033
Willy Tarreau03cdb7c2012-08-27 23:14:58 +02001034 if (rep->flags & CF_SHUTR || tick_is_expired(rep->analyse_exp, now_ms))
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001035 partial = SMP_OPT_FINAL;
Emeric Brun97679e72010-09-23 17:56:44 +02001036 else
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001037 partial = 0;
Emeric Brun97679e72010-09-23 17:56:44 +02001038
1039 list_for_each_entry(rule, &s->be->tcp_rep.inspect_rules, list) {
Willy Tarreau0cba6072013-11-28 22:21:02 +01001040 enum acl_test_res ret = ACL_TEST_PASS;
Emeric Brun97679e72010-09-23 17:56:44 +02001041
1042 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001043 ret = acl_exec_cond(rule->cond, s->be, s, &s->txn, SMP_OPT_DIR_RES | partial);
Thierry FOURNIERa65b3432013-11-28 18:22:00 +01001044 if (ret == ACL_TEST_MISS) {
Emeric Brun97679e72010-09-23 17:56:44 +02001045 /* just set the analyser timeout once at the beginning of the response */
1046 if (!tick_isset(rep->analyse_exp) && s->be->tcp_rep.inspect_delay)
Willy Tarreau0bb166b2013-11-04 15:56:53 +01001047 rep->analyse_exp = tick_add(now_ms, s->be->tcp_rep.inspect_delay);
Emeric Brun97679e72010-09-23 17:56:44 +02001048 return 0;
1049 }
1050
1051 ret = acl_pass(ret);
1052 if (rule->cond->pol == ACL_COND_UNLESS)
1053 ret = !ret;
1054 }
1055
1056 if (ret) {
1057 /* we have a matching rule. */
1058 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau8263d2b2012-08-28 00:06:31 +02001059 channel_abort(rep);
1060 channel_abort(s->req);
Emeric Brun97679e72010-09-23 17:56:44 +02001061 rep->analysers = 0;
1062
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001063 s->be->be_counters.denied_resp++;
1064 s->fe->fe_counters.denied_resp++;
Emeric Brun97679e72010-09-23 17:56:44 +02001065 if (s->listener->counters)
1066 s->listener->counters->denied_resp++;
1067
1068 if (!(s->flags & SN_ERR_MASK))
1069 s->flags |= SN_ERR_PRXCOND;
1070 if (!(s->flags & SN_FINST_MASK))
1071 s->flags |= SN_FINST_D;
1072 return 0;
1073 }
Willy Tarreaucc1e04b2013-09-11 23:20:29 +02001074 else if (rule->action == TCP_ACT_CLOSE) {
1075 rep->prod->flags |= SI_FL_NOLINGER | SI_FL_NOHALF;
1076 si_shutr(rep->prod);
1077 si_shutw(rep->prod);
1078 break;
1079 }
Emeric Brun97679e72010-09-23 17:56:44 +02001080 else {
1081 /* otherwise accept */
1082 break;
1083 }
1084 }
1085 }
1086
1087 /* if we get there, it means we have no rule which matches, or
1088 * we have an explicit accept, so we apply the default accept.
1089 */
1090 rep->analysers &= ~an_bit;
1091 rep->analyse_exp = TICK_ETERNITY;
1092 return 1;
1093}
1094
1095
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001096/* This function performs the TCP layer4 analysis on the current request. It
1097 * returns 0 if a reject rule matches, otherwise 1 if either an accept rule
1098 * matches or if no more rule matches. It can only use rules which don't need
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001099 * any data. This only works on connection-based client-facing stream interfaces.
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001100 */
1101int tcp_exec_req_rules(struct session *s)
1102{
1103 struct tcp_rule *rule;
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001104 struct stksess *ts;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001105 struct stktable *t = NULL;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001106 struct connection *conn = objt_conn(s->si[0].end);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001107 int result = 1;
Willy Tarreau0cba6072013-11-28 22:21:02 +01001108 enum acl_test_res ret;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001109
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001110 if (!conn)
1111 return result;
1112
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001113 list_for_each_entry(rule, &s->fe->tcp_req.l4_rules, list) {
Thierry FOURNIERa65b3432013-11-28 18:22:00 +01001114 ret = ACL_TEST_PASS;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001115
1116 if (rule->cond) {
Willy Tarreau32a6f2e2012-04-25 10:13:36 +02001117 ret = acl_exec_cond(rule->cond, s->fe, s, NULL, SMP_OPT_DIR_REQ|SMP_OPT_FINAL);
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001118 ret = acl_pass(ret);
1119 if (rule->cond->pol == ACL_COND_UNLESS)
1120 ret = !ret;
1121 }
1122
1123 if (ret) {
1124 /* we have a matching rule. */
1125 if (rule->action == TCP_ACT_REJECT) {
Willy Tarreau7d0aaf32011-03-10 23:25:56 +01001126 s->fe->fe_counters.denied_conn++;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001127 if (s->listener->counters)
Willy Tarreau2799e982010-06-05 15:43:21 +02001128 s->listener->counters->denied_conn++;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001129
1130 if (!(s->flags & SN_ERR_MASK))
1131 s->flags |= SN_ERR_PRXCOND;
1132 if (!(s->flags & SN_FINST_MASK))
1133 s->flags |= SN_FINST_R;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001134 result = 0;
1135 break;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001136 }
Willy Tarreau44778ad2013-10-30 19:24:00 +01001137 else if (rule->action >= TCP_ACT_TRK_SC0 && rule->action <= TCP_ACT_TRK_SCMAX) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001138 /* Note: only the first valid tracking parameter of each
1139 * applies.
1140 */
1141 struct stktable_key *key;
1142
Willy Tarreau44778ad2013-10-30 19:24:00 +01001143 if (s->stkctr[tcp_trk_idx(rule->action)].entry)
1144 continue;
1145
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001146 t = rule->act_prm.trk_ctr.table.t;
1147 key = stktable_fetch_key(t, s->be, s, &s->txn, SMP_OPT_DIR_REQ|SMP_OPT_FINAL, rule->act_prm.trk_ctr.expr);
1148
Willy Tarreaud5ca9ab2013-05-28 17:40:25 +02001149 if (key && (ts = stktable_get_entry(t, key)))
1150 session_track_stkctr(&s->stkctr[tcp_trk_idx(rule->action)], t, ts);
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001151 }
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001152 else if (rule->action == TCP_ACT_EXPECT_PX) {
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001153 conn->flags |= CO_FL_ACCEPT_PROXY;
1154 conn_sock_want_recv(conn);
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001155 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001156 else {
1157 /* otherwise it's an accept */
1158 break;
1159 }
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001160 }
1161 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001162 return result;
Willy Tarreaua5c0ab22010-05-31 10:30:33 +02001163}
1164
Emeric Brun97679e72010-09-23 17:56:44 +02001165/* Parse a tcp-response rule. Return a negative value in case of failure */
1166static int tcp_parse_response_rule(char **args, int arg, int section_type,
1167 struct proxy *curpx, struct proxy *defpx,
Willy Tarreau80aca902013-01-07 15:42:20 +01001168 struct tcp_rule *rule, char **err,
1169 unsigned int where)
Emeric Brun97679e72010-09-23 17:56:44 +02001170{
1171 if (curpx == defpx || !(curpx->cap & PR_CAP_BE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001172 memprintf(err, "%s %s is only allowed in 'backend' sections",
1173 args[0], args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001174 return -1;
1175 }
1176
1177 if (strcmp(args[arg], "accept") == 0) {
1178 arg++;
1179 rule->action = TCP_ACT_ACCEPT;
1180 }
1181 else if (strcmp(args[arg], "reject") == 0) {
1182 arg++;
1183 rule->action = TCP_ACT_REJECT;
1184 }
Willy Tarreaucc1e04b2013-09-11 23:20:29 +02001185 else if (strcmp(args[arg], "close") == 0) {
1186 arg++;
1187 rule->action = TCP_ACT_CLOSE;
1188 }
Emeric Brun97679e72010-09-23 17:56:44 +02001189 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001190 memprintf(err,
Willy Tarreaucc1e04b2013-09-11 23:20:29 +02001191 "'%s %s' expects 'accept', 'close' or 'reject' in %s '%s' (got '%s')",
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001192 args[0], args[1], proxy_type_str(curpx), curpx->id, args[arg]);
Emeric Brun97679e72010-09-23 17:56:44 +02001193 return -1;
1194 }
1195
1196 if (strcmp(args[arg], "if") == 0 || strcmp(args[arg], "unless") == 0) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001197 if ((rule->cond = build_acl_cond(NULL, 0, curpx, (const char **)args+arg, err)) == NULL) {
1198 memprintf(err,
1199 "'%s %s %s' : error detected in %s '%s' while parsing '%s' condition : %s",
1200 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg], *err);
Emeric Brun97679e72010-09-23 17:56:44 +02001201 return -1;
1202 }
1203 }
1204 else if (*args[arg]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001205 memprintf(err,
1206 "'%s %s %s' only accepts 'if' or 'unless', in %s '%s' (got '%s')",
Emeric Brun97679e72010-09-23 17:56:44 +02001207 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg]);
1208 return -1;
1209 }
1210 return 0;
1211}
1212
1213
1214
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001215/* Parse a tcp-request rule. Return a negative value in case of failure */
1216static int tcp_parse_request_rule(char **args, int arg, int section_type,
Willy Tarreau80aca902013-01-07 15:42:20 +01001217 struct proxy *curpx, struct proxy *defpx,
1218 struct tcp_rule *rule, char **err,
1219 unsigned int where)
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001220{
1221 if (curpx == defpx) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001222 memprintf(err, "%s %s is not allowed in 'defaults' sections",
1223 args[0], args[1]);
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001224 return -1;
1225 }
1226
1227 if (!strcmp(args[arg], "accept")) {
1228 arg++;
1229 rule->action = TCP_ACT_ACCEPT;
1230 }
1231 else if (!strcmp(args[arg], "reject")) {
1232 arg++;
1233 rule->action = TCP_ACT_REJECT;
1234 }
Willy Tarreaub4c84932013-07-23 19:15:30 +02001235 else if (strncmp(args[arg], "track-sc", 8) == 0 &&
1236 args[arg][9] == '\0' && args[arg][8] >= '0' &&
1237 args[arg][8] <= '0' + MAX_SESS_STKCTR) { /* track-sc 0..9 */
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001238 struct sample_expr *expr;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001239 int kw = arg;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001240
1241 arg++;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001242
Willy Tarreaua4312fa2013-04-02 16:34:32 +02001243 curpx->conf.args.ctx = ARGC_TRK;
1244 expr = sample_parse_expr(args, &arg, trash.str, trash.size, &curpx->conf.args);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001245 if (!expr) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001246 memprintf(err,
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001247 "'%s %s %s' : %s",
1248 args[0], args[1], args[kw], trash.str);
1249 return -1;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001250 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001251
Willy Tarreau80aca902013-01-07 15:42:20 +01001252 if (!(expr->fetch->val & where)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001253 memprintf(err,
Willy Tarreau80aca902013-01-07 15:42:20 +01001254 "'%s %s %s' : fetch method '%s' extracts information from '%s', none of which is available here",
Willy Tarreau33c60de2013-04-12 08:26:32 +02001255 args[0], args[1], args[kw], args[arg-1], sample_src_names(expr->fetch->use));
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001256 free(expr);
1257 return -1;
1258 }
1259
1260 /* check if we need to allocate an hdr_idx struct for HTTP parsing */
Willy Tarreau25320b22013-03-24 07:22:08 +01001261 curpx->http_needed |= !!(expr->fetch->use & SMP_USE_HTTP_ANY);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001262
1263 if (strcmp(args[arg], "table") == 0) {
Willy Tarreau598718a2012-12-09 16:57:27 +01001264 arg++;
1265 if (!args[arg]) {
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001266 memprintf(err,
1267 "'%s %s %s' : missing table name",
1268 args[0], args[1], args[kw]);
1269 free(expr);
1270 return -1;
1271 }
1272 /* we copy the table name for now, it will be resolved later */
Willy Tarreau598718a2012-12-09 16:57:27 +01001273 rule->act_prm.trk_ctr.table.n = strdup(args[arg]);
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001274 arg++;
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001275 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001276 rule->act_prm.trk_ctr.expr = expr;
Willy Tarreaube4a3ef2013-06-17 15:04:07 +02001277 rule->action = TCP_ACT_TRK_SC0 + args[kw][8] - '0';
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001278 }
Willy Tarreau4f0d9192013-06-11 20:40:55 +02001279 else if (strcmp(args[arg], "expect-proxy") == 0) {
1280 if (strcmp(args[arg+1], "layer4") != 0) {
1281 memprintf(err,
1282 "'%s %s %s' only supports 'layer4' in %s '%s' (got '%s')",
1283 args[0], args[1], args[arg], proxy_type_str(curpx), curpx->id, args[arg+1]);
1284 return -1;
1285 }
1286
1287 if (!(where & SMP_VAL_FE_CON_ACC)) {
1288 memprintf(err,
1289 "'%s %s' is not allowed in '%s %s' rules in %s '%s'",
1290 args[arg], args[arg+1], args[0], args[1], proxy_type_str(curpx), curpx->id);
1291 return -1;
1292 }
1293
1294 arg += 2;
1295 rule->action = TCP_ACT_EXPECT_PX;
1296 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001297 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001298 memprintf(err,
Willy Tarreaub4c84932013-07-23 19:15:30 +02001299 "'%s %s' expects 'accept', 'reject', 'track-sc0' ... 'track-sc%d' "
1300 " in %s '%s' (got '%s')",
1301 args[0], args[1], MAX_SESS_STKCTR, proxy_type_str(curpx), curpx->id, args[arg]);
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001302 return -1;
1303 }
1304
1305 if (strcmp(args[arg], "if") == 0 || strcmp(args[arg], "unless") == 0) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001306 if ((rule->cond = build_acl_cond(NULL, 0, curpx, (const char **)args+arg, err)) == NULL) {
1307 memprintf(err,
1308 "'%s %s %s' : error detected in %s '%s' while parsing '%s' condition : %s",
1309 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg], *err);
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001310 return -1;
1311 }
1312 }
1313 else if (*args[arg]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001314 memprintf(err,
1315 "'%s %s %s' only accepts 'if' or 'unless', in %s '%s' (got '%s')",
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001316 args[0], args[1], args[2], proxy_type_str(curpx), curpx->id, args[arg]);
1317 return -1;
1318 }
1319 return 0;
1320}
1321
Emeric Brun97679e72010-09-23 17:56:44 +02001322/* This function should be called to parse a line starting with the "tcp-response"
1323 * keyword.
1324 */
1325static int tcp_parse_tcp_rep(char **args, int section_type, struct proxy *curpx,
Willy Tarreau28a47d62012-09-18 20:02:48 +02001326 struct proxy *defpx, const char *file, int line,
1327 char **err)
Emeric Brun97679e72010-09-23 17:56:44 +02001328{
1329 const char *ptr = NULL;
1330 unsigned int val;
Emeric Brun97679e72010-09-23 17:56:44 +02001331 int warn = 0;
1332 int arg;
1333 struct tcp_rule *rule;
Willy Tarreau80aca902013-01-07 15:42:20 +01001334 unsigned int where;
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001335 const struct acl *acl;
Willy Tarreau93fddf12013-03-31 22:59:32 +02001336 const char *kw;
Emeric Brun97679e72010-09-23 17:56:44 +02001337
1338 if (!*args[1]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001339 memprintf(err, "missing argument for '%s' in %s '%s'",
1340 args[0], proxy_type_str(curpx), curpx->id);
Emeric Brun97679e72010-09-23 17:56:44 +02001341 return -1;
1342 }
1343
1344 if (strcmp(args[1], "inspect-delay") == 0) {
1345 if (curpx == defpx || !(curpx->cap & PR_CAP_BE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001346 memprintf(err, "%s %s is only allowed in 'backend' sections",
1347 args[0], args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001348 return -1;
1349 }
1350
1351 if (!*args[2] || (ptr = parse_time_err(args[2], &val, TIME_UNIT_MS))) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001352 memprintf(err,
1353 "'%s %s' expects a positive delay in milliseconds, in %s '%s'",
1354 args[0], args[1], proxy_type_str(curpx), curpx->id);
1355 if (ptr)
1356 memprintf(err, "%s (unexpected character '%c')", *err, *ptr);
Emeric Brun97679e72010-09-23 17:56:44 +02001357 return -1;
1358 }
1359
1360 if (curpx->tcp_rep.inspect_delay) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001361 memprintf(err, "ignoring %s %s (was already defined) in %s '%s'",
1362 args[0], args[1], proxy_type_str(curpx), curpx->id);
Emeric Brun97679e72010-09-23 17:56:44 +02001363 return 1;
1364 }
1365 curpx->tcp_rep.inspect_delay = val;
1366 return 0;
1367 }
1368
Simon Hormande072bd2011-06-24 15:11:37 +09001369 rule = calloc(1, sizeof(*rule));
Emeric Brun97679e72010-09-23 17:56:44 +02001370 LIST_INIT(&rule->list);
1371 arg = 1;
Willy Tarreau80aca902013-01-07 15:42:20 +01001372 where = 0;
Emeric Brun97679e72010-09-23 17:56:44 +02001373
1374 if (strcmp(args[1], "content") == 0) {
1375 arg++;
Willy Tarreau80aca902013-01-07 15:42:20 +01001376
1377 if (curpx->cap & PR_CAP_FE)
1378 where |= SMP_VAL_FE_RES_CNT;
1379 if (curpx->cap & PR_CAP_BE)
1380 where |= SMP_VAL_BE_RES_CNT;
1381
1382 if (tcp_parse_response_rule(args, arg, section_type, curpx, defpx, rule, err, where) < 0)
Emeric Brun97679e72010-09-23 17:56:44 +02001383 goto error;
1384
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001385 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1386 if (acl) {
1387 if (acl->name && *acl->name)
1388 memprintf(err,
1389 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1390 acl->name, args[0], args[1], sample_ckp_names(where));
1391 else
1392 memprintf(err,
1393 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1394 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001395 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001396 sample_ckp_names(where));
Emeric Brun97679e72010-09-23 17:56:44 +02001397
Emeric Brun97679e72010-09-23 17:56:44 +02001398 warn++;
1399 }
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001400 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1401 if (acl->name && *acl->name)
1402 memprintf(err,
1403 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001404 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001405 else
1406 memprintf(err,
1407 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001408 kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001409 warn++;
1410 }
Emeric Brun97679e72010-09-23 17:56:44 +02001411
1412 LIST_ADDQ(&curpx->tcp_rep.inspect_rules, &rule->list);
1413 }
1414 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001415 memprintf(err,
1416 "'%s' expects 'inspect-delay' or 'content' in %s '%s' (got '%s')",
1417 args[0], proxy_type_str(curpx), curpx->id, args[1]);
Emeric Brun97679e72010-09-23 17:56:44 +02001418 goto error;
1419 }
1420
1421 return warn;
1422 error:
1423 free(rule);
1424 return -1;
1425}
1426
1427
Willy Tarreaub6866442008-07-14 23:54:42 +02001428/* This function should be called to parse a line starting with the "tcp-request"
1429 * keyword.
1430 */
1431static int tcp_parse_tcp_req(char **args, int section_type, struct proxy *curpx,
Willy Tarreau28a47d62012-09-18 20:02:48 +02001432 struct proxy *defpx, const char *file, int line,
1433 char **err)
Willy Tarreaub6866442008-07-14 23:54:42 +02001434{
1435 const char *ptr = NULL;
Willy Tarreauc7e961e2008-08-17 17:13:47 +02001436 unsigned int val;
Willy Tarreau1a687942010-05-23 22:40:30 +02001437 int warn = 0;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001438 int arg;
Willy Tarreau1a687942010-05-23 22:40:30 +02001439 struct tcp_rule *rule;
Willy Tarreau80aca902013-01-07 15:42:20 +01001440 unsigned int where;
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001441 const struct acl *acl;
Willy Tarreau93fddf12013-03-31 22:59:32 +02001442 const char *kw;
Willy Tarreaub6866442008-07-14 23:54:42 +02001443
1444 if (!*args[1]) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001445 if (curpx == defpx)
1446 memprintf(err, "missing argument for '%s' in defaults section", args[0]);
1447 else
1448 memprintf(err, "missing argument for '%s' in %s '%s'",
1449 args[0], proxy_type_str(curpx), curpx->id);
Willy Tarreaub6866442008-07-14 23:54:42 +02001450 return -1;
1451 }
1452
1453 if (!strcmp(args[1], "inspect-delay")) {
1454 if (curpx == defpx) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001455 memprintf(err, "%s %s is not allowed in 'defaults' sections",
1456 args[0], args[1]);
Willy Tarreaub6866442008-07-14 23:54:42 +02001457 return -1;
1458 }
1459
Willy Tarreaub6866442008-07-14 23:54:42 +02001460 if (!*args[2] || (ptr = parse_time_err(args[2], &val, TIME_UNIT_MS))) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001461 memprintf(err,
1462 "'%s %s' expects a positive delay in milliseconds, in %s '%s'",
1463 args[0], args[1], proxy_type_str(curpx), curpx->id);
1464 if (ptr)
1465 memprintf(err, "%s (unexpected character '%c')", *err, *ptr);
Willy Tarreaub6866442008-07-14 23:54:42 +02001466 return -1;
1467 }
1468
1469 if (curpx->tcp_req.inspect_delay) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001470 memprintf(err, "ignoring %s %s (was already defined) in %s '%s'",
1471 args[0], args[1], proxy_type_str(curpx), curpx->id);
Willy Tarreaub6866442008-07-14 23:54:42 +02001472 return 1;
1473 }
1474 curpx->tcp_req.inspect_delay = val;
1475 return 0;
1476 }
1477
Simon Hormande072bd2011-06-24 15:11:37 +09001478 rule = calloc(1, sizeof(*rule));
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001479 LIST_INIT(&rule->list);
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001480 arg = 1;
Willy Tarreau80aca902013-01-07 15:42:20 +01001481 where = 0;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001482
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001483 if (strcmp(args[1], "content") == 0) {
Willy Tarreaud1f96522010-08-03 19:34:32 +02001484 arg++;
Willy Tarreau80aca902013-01-07 15:42:20 +01001485
1486 if (curpx->cap & PR_CAP_FE)
1487 where |= SMP_VAL_FE_REQ_CNT;
1488 if (curpx->cap & PR_CAP_BE)
1489 where |= SMP_VAL_BE_REQ_CNT;
1490
1491 if (tcp_parse_request_rule(args, arg, section_type, curpx, defpx, rule, err, where) < 0)
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001492 goto error;
Willy Tarreaub6866442008-07-14 23:54:42 +02001493
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001494 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1495 if (acl) {
1496 if (acl->name && *acl->name)
1497 memprintf(err,
1498 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1499 acl->name, args[0], args[1], sample_ckp_names(where));
1500 else
1501 memprintf(err,
1502 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1503 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001504 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001505 sample_ckp_names(where));
Willy Tarreaudd64f8d2008-07-27 22:02:32 +02001506
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001507 warn++;
1508 }
1509 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1510 if (acl->name && *acl->name)
1511 memprintf(err,
1512 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001513 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001514 else
1515 memprintf(err,
1516 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001517 kw, sample_ckp_names(where));
Willy Tarreaudd64f8d2008-07-27 22:02:32 +02001518 warn++;
1519 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001520
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001521 LIST_ADDQ(&curpx->tcp_req.inspect_rules, &rule->list);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001522 }
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001523 else if (strcmp(args[1], "connection") == 0) {
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001524 arg++;
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001525
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001526 if (!(curpx->cap & PR_CAP_FE)) {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001527 memprintf(err, "%s %s is not allowed because %s %s is not a frontend",
1528 args[0], args[1], proxy_type_str(curpx), curpx->id);
Simon Horman6c54d8b2011-07-15 13:14:06 +09001529 goto error;
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001530 }
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001531
Willy Tarreau80aca902013-01-07 15:42:20 +01001532 where |= SMP_VAL_FE_CON_ACC;
1533
1534 if (tcp_parse_request_rule(args, arg, section_type, curpx, defpx, rule, err, where) < 0)
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001535 goto error;
1536
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001537 acl = rule->cond ? acl_cond_conflicts(rule->cond, where) : NULL;
1538 if (acl) {
1539 if (acl->name && *acl->name)
1540 memprintf(err,
1541 "acl '%s' will never match in '%s %s' because it only involves keywords that are incompatible with '%s'",
1542 acl->name, args[0], args[1], sample_ckp_names(where));
1543 else
1544 memprintf(err,
1545 "anonymous acl will never match in '%s %s' because it uses keyword '%s' which is incompatible with '%s'",
1546 args[0], args[1],
Willy Tarreau93fddf12013-03-31 22:59:32 +02001547 LIST_ELEM(acl->expr.n, struct acl_expr *, list)->kw,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001548 sample_ckp_names(where));
Willy Tarreauf059a0f2010-08-03 16:29:52 +02001549
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001550 warn++;
1551 }
1552 else if (rule->cond && acl_cond_kw_conflicts(rule->cond, where, &acl, &kw)) {
1553 if (acl->name && *acl->name)
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001554 memprintf(err,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001555 "acl '%s' involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001556 acl->name, kw, sample_ckp_names(where));
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001557 else
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001558 memprintf(err,
Willy Tarreaua91d0a52013-03-25 08:12:18 +01001559 "anonymous acl involves keyword '%s' which is incompatible with '%s'",
Willy Tarreau93fddf12013-03-31 22:59:32 +02001560 kw, sample_ckp_names(where));
Willy Tarreau68c03ab2010-08-06 15:08:45 +02001561 warn++;
1562 }
Willy Tarreau5d5b5d82012-12-09 12:00:04 +01001563
Willy Tarreaufb024dc2010-08-20 13:35:41 +02001564 LIST_ADDQ(&curpx->tcp_req.l4_rules, &rule->list);
Willy Tarreau9ba2dcc2010-06-14 21:04:55 +02001565 }
Willy Tarreau1a687942010-05-23 22:40:30 +02001566 else {
Willy Tarreau0a3dd742012-05-08 19:47:01 +02001567 if (curpx == defpx)
1568 memprintf(err,
1569 "'%s' expects 'inspect-delay', 'connection', or 'content' in defaults section (got '%s')",
1570 args[0], args[1]);
1571 else
1572 memprintf(err,
1573 "'%s' expects 'inspect-delay', 'connection', or 'content' in %s '%s' (got '%s')",
Willy Tarreaudeaec2f2013-04-10 16:31:11 +02001574 args[0], proxy_type_str(curpx), curpx->id, args[1]);
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001575 goto error;
Willy Tarreau1a687942010-05-23 22:40:30 +02001576 }
1577
Willy Tarreau1a687942010-05-23 22:40:30 +02001578 return warn;
Willy Tarreau6a984fa2010-06-14 16:44:27 +02001579 error:
1580 free(rule);
1581 return -1;
Willy Tarreaub6866442008-07-14 23:54:42 +02001582}
1583
Willy Tarreau645513a2010-05-24 20:55:15 +02001584
1585/************************************************************************/
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001586/* All supported sample fetch functions must be declared here */
Willy Tarreau32389b72012-04-23 23:13:20 +02001587/************************************************************************/
1588
Willy Tarreau4a129812012-04-25 17:31:42 +02001589/* fetch the connection's source IPv4/IPv6 address */
Willy Tarreau645513a2010-05-24 20:55:15 +02001590static int
Willy Tarreau4a129812012-04-25 17:31:42 +02001591smp_fetch_src(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Willy Tarreauef38c392013-07-22 16:29:32 +02001592 const struct arg *args, struct sample *smp, const char *kw)
Willy Tarreau645513a2010-05-24 20:55:15 +02001593{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001594 struct connection *cli_conn = objt_conn(l4->si[0].end);
1595
1596 if (!cli_conn)
1597 return 0;
1598
1599 switch (cli_conn->addr.from.ss_family) {
Willy Tarreauf4362b32011-12-16 17:49:52 +01001600 case AF_INET:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001601 smp->data.ipv4 = ((struct sockaddr_in *)&cli_conn->addr.from)->sin_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001602 smp->type = SMP_T_IPV4;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001603 break;
1604 case AF_INET6:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001605 smp->data.ipv6 = ((struct sockaddr_in6 *)&cli_conn->addr.from)->sin6_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001606 smp->type = SMP_T_IPV6;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001607 break;
1608 default:
Emeric Brunf769f512010-10-22 17:14:01 +02001609 return 0;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001610 }
Emeric Brunf769f512010-10-22 17:14:01 +02001611
Willy Tarreau37406352012-04-23 16:16:37 +02001612 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02001613 return 1;
1614}
1615
Willy Tarreaua5e37562011-12-16 17:06:15 +01001616/* set temp integer to the connection's source port */
Willy Tarreau645513a2010-05-24 20:55:15 +02001617static int
Willy Tarreau25c1ebc2012-04-25 16:21:44 +02001618smp_fetch_sport(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Willy Tarreauef38c392013-07-22 16:29:32 +02001619 const struct arg *args, struct sample *smp, const char *kw)
Willy Tarreau645513a2010-05-24 20:55:15 +02001620{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001621 struct connection *cli_conn = objt_conn(l4->si[0].end);
1622
1623 if (!cli_conn)
1624 return 0;
1625
Willy Tarreauf853c462012-04-23 18:53:56 +02001626 smp->type = SMP_T_UINT;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001627 if (!(smp->data.uint = get_host_port(&cli_conn->addr.from)))
Emeric Brunf769f512010-10-22 17:14:01 +02001628 return 0;
1629
Willy Tarreau37406352012-04-23 16:16:37 +02001630 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02001631 return 1;
1632}
1633
Willy Tarreau4a129812012-04-25 17:31:42 +02001634/* fetch the connection's destination IPv4/IPv6 address */
Willy Tarreau645513a2010-05-24 20:55:15 +02001635static int
Willy Tarreau4a129812012-04-25 17:31:42 +02001636smp_fetch_dst(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Willy Tarreauef38c392013-07-22 16:29:32 +02001637 const struct arg *args, struct sample *smp, const char *kw)
Willy Tarreau645513a2010-05-24 20:55:15 +02001638{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001639 struct connection *cli_conn = objt_conn(l4->si[0].end);
Willy Tarreau645513a2010-05-24 20:55:15 +02001640
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001641 if (!cli_conn)
1642 return 0;
1643
1644 conn_get_to_addr(cli_conn);
1645
1646 switch (cli_conn->addr.to.ss_family) {
Willy Tarreauf4362b32011-12-16 17:49:52 +01001647 case AF_INET:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001648 smp->data.ipv4 = ((struct sockaddr_in *)&cli_conn->addr.to)->sin_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001649 smp->type = SMP_T_IPV4;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001650 break;
1651 case AF_INET6:
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001652 smp->data.ipv6 = ((struct sockaddr_in6 *)&cli_conn->addr.to)->sin6_addr;
Willy Tarreauf853c462012-04-23 18:53:56 +02001653 smp->type = SMP_T_IPV6;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001654 break;
1655 default:
Emeric Brunf769f512010-10-22 17:14:01 +02001656 return 0;
Willy Tarreauf4362b32011-12-16 17:49:52 +01001657 }
Emeric Brunf769f512010-10-22 17:14:01 +02001658
Willy Tarreau37406352012-04-23 16:16:37 +02001659 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02001660 return 1;
1661}
1662
Willy Tarreaua5e37562011-12-16 17:06:15 +01001663/* set temp integer to the frontend connexion's destination port */
Willy Tarreau645513a2010-05-24 20:55:15 +02001664static int
Willy Tarreau25c1ebc2012-04-25 16:21:44 +02001665smp_fetch_dport(struct proxy *px, struct session *l4, void *l7, unsigned int opt,
Willy Tarreauef38c392013-07-22 16:29:32 +02001666 const struct arg *args, struct sample *smp, const char *kw)
Willy Tarreau645513a2010-05-24 20:55:15 +02001667{
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001668 struct connection *cli_conn = objt_conn(l4->si[0].end);
1669
1670 if (!cli_conn)
1671 return 0;
1672
1673 conn_get_to_addr(cli_conn);
Willy Tarreau645513a2010-05-24 20:55:15 +02001674
Willy Tarreauf853c462012-04-23 18:53:56 +02001675 smp->type = SMP_T_UINT;
Willy Tarreaub363a1f2013-10-01 10:45:07 +02001676 if (!(smp->data.uint = get_host_port(&cli_conn->addr.to)))
Emeric Brunf769f512010-10-22 17:14:01 +02001677 return 0;
1678
Willy Tarreau37406352012-04-23 16:16:37 +02001679 smp->flags = 0;
Willy Tarreau645513a2010-05-24 20:55:15 +02001680 return 1;
Emericf2d7cae2010-11-05 18:13:50 +01001681}
1682
Willy Tarreau9b6700f2012-11-24 11:55:28 +01001683#ifdef IPV6_V6ONLY
Willy Tarreau77e3af92012-11-24 15:07:23 +01001684/* parse the "v4v6" bind keyword */
1685static int bind_parse_v4v6(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1686{
1687 struct listener *l;
1688
1689 list_for_each_entry(l, &conf->listeners, by_bind) {
1690 if (l->addr.ss_family == AF_INET6)
1691 l->options |= LI_O_V4V6;
1692 }
1693
1694 return 0;
1695}
1696
Willy Tarreau9b6700f2012-11-24 11:55:28 +01001697/* parse the "v6only" bind keyword */
1698static int bind_parse_v6only(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1699{
1700 struct listener *l;
1701
1702 list_for_each_entry(l, &conf->listeners, by_bind) {
1703 if (l->addr.ss_family == AF_INET6)
1704 l->options |= LI_O_V6ONLY;
1705 }
1706
1707 return 0;
1708}
1709#endif
1710
Pieter Baauwd551fb52013-05-08 22:49:23 +02001711#ifdef CONFIG_HAP_TRANSPARENT
Willy Tarreau44791242012-09-12 23:27:21 +02001712/* parse the "transparent" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02001713static 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 +02001714{
1715 struct listener *l;
1716
Willy Tarreau4348fad2012-09-20 16:48:07 +02001717 list_for_each_entry(l, &conf->listeners, by_bind) {
1718 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
1719 l->options |= LI_O_FOREIGN;
Willy Tarreau44791242012-09-12 23:27:21 +02001720 }
1721
Willy Tarreau44791242012-09-12 23:27:21 +02001722 return 0;
1723}
1724#endif
1725
1726#ifdef TCP_DEFER_ACCEPT
1727/* parse the "defer-accept" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02001728static 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 +02001729{
1730 struct listener *l;
1731
Willy Tarreau4348fad2012-09-20 16:48:07 +02001732 list_for_each_entry(l, &conf->listeners, by_bind) {
1733 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
1734 l->options |= LI_O_DEF_ACCEPT;
Willy Tarreau44791242012-09-12 23:27:21 +02001735 }
1736
Willy Tarreau44791242012-09-12 23:27:21 +02001737 return 0;
1738}
1739#endif
1740
Willy Tarreau1c862c52012-10-05 16:21:00 +02001741#ifdef TCP_FASTOPEN
Lukas Tribus0defb902013-02-13 23:35:39 +01001742/* parse the "tfo" bind keyword */
Willy Tarreau1c862c52012-10-05 16:21:00 +02001743static int bind_parse_tfo(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1744{
1745 struct listener *l;
1746
1747 list_for_each_entry(l, &conf->listeners, by_bind) {
1748 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
1749 l->options |= LI_O_TCP_FO;
1750 }
1751
1752 return 0;
1753}
1754#endif
1755
Willy Tarreau44791242012-09-12 23:27:21 +02001756#ifdef TCP_MAXSEG
1757/* parse the "mss" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02001758static 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 +02001759{
1760 struct listener *l;
1761 int mss;
1762
Willy Tarreau44791242012-09-12 23:27:21 +02001763 if (!*args[cur_arg + 1]) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02001764 memprintf(err, "'%s' : missing MSS value", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02001765 return ERR_ALERT | ERR_FATAL;
1766 }
1767
1768 mss = atoi(args[cur_arg + 1]);
1769 if (!mss || abs(mss) > 65535) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02001770 memprintf(err, "'%s' : expects an MSS with and absolute value between 1 and 65535", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02001771 return ERR_ALERT | ERR_FATAL;
1772 }
1773
Willy Tarreau4348fad2012-09-20 16:48:07 +02001774 list_for_each_entry(l, &conf->listeners, by_bind) {
1775 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
1776 l->maxseg = mss;
1777 }
Willy Tarreau44791242012-09-12 23:27:21 +02001778
1779 return 0;
1780}
1781#endif
1782
1783#ifdef SO_BINDTODEVICE
1784/* parse the "mss" bind keyword */
Willy Tarreau4348fad2012-09-20 16:48:07 +02001785static 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 +02001786{
1787 struct listener *l;
1788
Willy Tarreau44791242012-09-12 23:27:21 +02001789 if (!*args[cur_arg + 1]) {
Willy Tarreaueb6cead2012-09-20 19:43:14 +02001790 memprintf(err, "'%s' : missing interface name", args[cur_arg]);
Willy Tarreau44791242012-09-12 23:27:21 +02001791 return ERR_ALERT | ERR_FATAL;
1792 }
1793
Willy Tarreau4348fad2012-09-20 16:48:07 +02001794 list_for_each_entry(l, &conf->listeners, by_bind) {
1795 if (l->addr.ss_family == AF_INET || l->addr.ss_family == AF_INET6)
1796 l->interface = strdup(args[cur_arg + 1]);
1797 }
Willy Tarreau44791242012-09-12 23:27:21 +02001798
1799 global.last_checks |= LSTCHK_NETADM;
1800 return 0;
1801}
1802#endif
1803
Willy Tarreaudc13c112013-06-21 23:16:39 +02001804static struct cfg_kw_list cfg_kws = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001805 { CFG_LISTEN, "tcp-request", tcp_parse_tcp_req },
Emeric Brun97679e72010-09-23 17:56:44 +02001806 { CFG_LISTEN, "tcp-response", tcp_parse_tcp_rep },
Willy Tarreaub6866442008-07-14 23:54:42 +02001807 { 0, NULL, NULL },
1808}};
1809
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001810
Willy Tarreau61612d42012-04-19 18:42:05 +02001811/* Note: must not be declared <const> as its list will be overwritten.
1812 * Please take care of keeping this list alphabetically sorted.
1813 */
Willy Tarreaudc13c112013-06-21 23:16:39 +02001814static struct acl_kw_list acl_kws = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001815 { /* END */ },
Willy Tarreaub6866442008-07-14 23:54:42 +02001816}};
1817
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001818
Willy Tarreau4a129812012-04-25 17:31:42 +02001819/* Note: must not be declared <const> as its list will be overwritten.
1820 * Note: fetches that may return multiple types must be declared as the lowest
1821 * common denominator, the type that can be casted into all other ones. For
1822 * instance v4/v6 must be declared v4.
1823 */
Willy Tarreaudc13c112013-06-21 23:16:39 +02001824static struct sample_fetch_kw_list sample_fetch_keywords = {ILH, {
Willy Tarreaud4c33c82013-01-07 21:59:07 +01001825 { "dst", smp_fetch_dst, 0, NULL, SMP_T_IPV4, SMP_USE_L4CLI },
1826 { "dst_port", smp_fetch_dport, 0, NULL, SMP_T_UINT, SMP_USE_L4CLI },
1827 { "src", smp_fetch_src, 0, NULL, SMP_T_IPV4, SMP_USE_L4CLI },
1828 { "src_port", smp_fetch_sport, 0, NULL, SMP_T_UINT, SMP_USE_L4CLI },
1829 { /* END */ },
Willy Tarreau645513a2010-05-24 20:55:15 +02001830}};
1831
Willy Tarreau44791242012-09-12 23:27:21 +02001832/************************************************************************/
1833/* All supported bind keywords must be declared here. */
1834/************************************************************************/
1835
1836/* Note: must not be declared <const> as its list will be overwritten.
1837 * Please take care of keeping this list alphabetically sorted, doing so helps
1838 * all code contributors.
1839 * Optional keywords are also declared with a NULL ->parse() function so that
1840 * the config parser can report an appropriate error when a known keyword was
1841 * not enabled.
1842 */
Willy Tarreau51fb7652012-09-18 18:24:39 +02001843static struct bind_kw_list bind_kws = { "TCP", { }, {
Willy Tarreau44791242012-09-12 23:27:21 +02001844#ifdef TCP_DEFER_ACCEPT
1845 { "defer-accept", bind_parse_defer_accept, 0 }, /* wait for some data for 1 second max before doing accept */
1846#endif
1847#ifdef SO_BINDTODEVICE
1848 { "interface", bind_parse_interface, 1 }, /* specifically bind to this interface */
1849#endif
1850#ifdef TCP_MAXSEG
1851 { "mss", bind_parse_mss, 1 }, /* set MSS of listening socket */
1852#endif
Willy Tarreau1c862c52012-10-05 16:21:00 +02001853#ifdef TCP_FASTOPEN
1854 { "tfo", bind_parse_tfo, 0 }, /* enable TCP_FASTOPEN of listening socket */
1855#endif
Pieter Baauwd551fb52013-05-08 22:49:23 +02001856#ifdef CONFIG_HAP_TRANSPARENT
Willy Tarreau44791242012-09-12 23:27:21 +02001857 { "transparent", bind_parse_transparent, 0 }, /* transparently bind to the specified addresses */
1858#endif
Willy Tarreau9b6700f2012-11-24 11:55:28 +01001859#ifdef IPV6_V6ONLY
Willy Tarreau77e3af92012-11-24 15:07:23 +01001860 { "v4v6", bind_parse_v4v6, 0 }, /* force socket to bind to IPv4+IPv6 */
Willy Tarreau9b6700f2012-11-24 11:55:28 +01001861 { "v6only", bind_parse_v6only, 0 }, /* force socket to bind to IPv6 only */
1862#endif
Willy Tarreau44791242012-09-12 23:27:21 +02001863 /* the versions with the NULL parse function*/
1864 { "defer-accept", NULL, 0 },
1865 { "interface", NULL, 1 },
1866 { "mss", NULL, 1 },
1867 { "transparent", NULL, 0 },
Willy Tarreau77e3af92012-11-24 15:07:23 +01001868 { "v4v6", NULL, 0 },
Willy Tarreau9b6700f2012-11-24 11:55:28 +01001869 { "v6only", NULL, 0 },
Willy Tarreau44791242012-09-12 23:27:21 +02001870 { NULL, NULL, 0 },
1871}};
1872
Willy Tarreaue6b98942007-10-29 01:09:36 +01001873__attribute__((constructor))
1874static void __tcp_protocol_init(void)
1875{
1876 protocol_register(&proto_tcpv4);
1877 protocol_register(&proto_tcpv6);
Willy Tarreau12785782012-04-27 21:37:17 +02001878 sample_register_fetches(&sample_fetch_keywords);
Willy Tarreaub6866442008-07-14 23:54:42 +02001879 cfg_register_keywords(&cfg_kws);
1880 acl_register_keywords(&acl_kws);
Willy Tarreau44791242012-09-12 23:27:21 +02001881 bind_register_keywords(&bind_kws);
Willy Tarreaue6b98942007-10-29 01:09:36 +01001882}
1883
1884
1885/*
1886 * Local variables:
1887 * c-indent-level: 8
1888 * c-basic-offset: 8
1889 * End:
1890 */