REORG: cfgparse: move server keyword parsing to server.c
The cfgparse.c file becomes huge, and a large part of it comes from the
server keyword parser. Since the configuration is a bit more modular now,
move this parser to server.c.
This patch also moves the check of the "server" keyword earlier in the
supported keywords list, resulting in a slightly faster config parsing
for configs with large numbers of servers (about 10%).
No functional change was made, only the code was moved.
diff --git a/include/common/cfgparse.h b/include/common/cfgparse.h
index 106bad7..80310ae 100644
--- a/include/common/cfgparse.h
+++ b/include/common/cfgparse.h
@@ -26,7 +26,8 @@
#include <common/config.h>
#include <common/mini-clist.h>
-#include <types/proxy.h>
+#include <proto/log.h>
+#include <proto/proxy.h>
/* configuration sections */
#define CFG_NONE 0
@@ -73,6 +74,32 @@
int cfg_register_section(char *section_name,
int (*section_parser)(const char *, int, char **, int));
+/*
+ * Sends a warning if proxy <proxy> does not have at least one of the
+ * capabilities in <cap>. An optionnal <hint> may be added at the end
+ * of the warning to help the user. Returns 1 if a warning was emitted
+ * or 0 if the condition is valid.
+ */
+static inline int warnifnotcap(struct proxy *proxy, int cap, const char *file, int line, const char *arg, const char *hint)
+{
+ char *msg;
+
+ switch (cap) {
+ case PR_CAP_BE: msg = "no backend"; break;
+ case PR_CAP_FE: msg = "no frontend"; break;
+ case PR_CAP_RS: msg = "no ruleset"; break;
+ case PR_CAP_BE|PR_CAP_FE: msg = "neither frontend nor backend"; break;
+ default: msg = "not enough"; break;
+ }
+
+ if (!(proxy->cap & cap)) {
+ Warning("parsing [%s:%d] : '%s' ignored because %s '%s' has %s capability.%s\n",
+ file, line, arg, proxy_type_str(proxy), proxy->id, msg, hint ? hint : "");
+ return 1;
+ }
+ return 0;
+}
+
#endif /* _COMMON_CFGPARSE_H */
/*
diff --git a/include/proto/server.h b/include/proto/server.h
index 750d8d5..f030962 100644
--- a/include/proto/server.h
+++ b/include/proto/server.h
@@ -37,6 +37,7 @@
int srv_downtime(const struct server *s);
int srv_lastsession(const struct server *s);
int srv_getinter(const struct check *check);
+int parse_server(const char *file, int linenum, char **args, struct proxy *curproxy, struct proxy *defproxy);
/* increase the number of cumulated connections on the designated server */
static void inline srv_inc_sess_ctr(struct server *s)
diff --git a/src/cfgparse.c b/src/cfgparse.c
index e433c2c..344bde1 100644
--- a/src/cfgparse.c
+++ b/src/cfgparse.c
@@ -54,7 +54,6 @@
#include <proto/lb_map.h>
#include <proto/listener.h>
#include <proto/log.h>
-#include <proto/port_range.h>
#include <proto/protocol.h>
#include <proto/proto_tcp.h>
#include <proto/proto_uxst.h>
@@ -308,32 +307,6 @@
return 0;
}
-/*
- * Sends a warning if proxy <proxy> does not have at least one of the
- * capabilities in <cap>. An optionnal <hint> may be added at the end
- * of the warning to help the user. Returns 1 if a warning was emitted
- * or 0 if the condition is valid.
- */
-int warnifnotcap(struct proxy *proxy, int cap, const char *file, int line, const char *arg, const char *hint)
-{
- char *msg;
-
- switch (cap) {
- case PR_CAP_BE: msg = "no backend"; break;
- case PR_CAP_FE: msg = "no frontend"; break;
- case PR_CAP_RS: msg = "no ruleset"; break;
- case PR_CAP_BE|PR_CAP_FE: msg = "neither frontend nor backend"; break;
- default: msg = "not enough"; break;
- }
-
- if (!(proxy->cap & cap)) {
- Warning("parsing [%s:%d] : '%s' ignored because %s '%s' has %s capability.%s\n",
- file, line, arg, proxy_type_str(proxy), proxy->id, msg, hint ? hint : "");
- return 1;
- }
- return 0;
-}
-
/* Report a warning if a rule is placed after a 'block' rule.
* Return 1 if the warning has been emitted, otherwise 0.
*/
@@ -1733,39 +1706,9 @@
return err_code;
}
-static int init_check(struct check *check, int type, const char * file, int linenum)
-{
- check->type = type;
-
- /* Allocate buffer for requests... */
- if ((check->bi = calloc(sizeof(struct buffer) + global.tune.chksize, sizeof(char))) == NULL) {
- Alert("parsing [%s:%d] : out of memory while allocating check buffer.\n", file, linenum);
- return ERR_ALERT | ERR_ABORT;
- }
- check->bi->size = global.tune.chksize;
-
- /* Allocate buffer for responses... */
- if ((check->bo = calloc(sizeof(struct buffer) + global.tune.chksize, sizeof(char))) == NULL) {
- Alert("parsing [%s:%d] : out of memory while allocating check buffer.\n", file, linenum);
- return ERR_ALERT | ERR_ABORT;
- }
- check->bo->size = global.tune.chksize;
-
- /* Allocate buffer for partial results... */
- if ((check->conn = calloc(1, sizeof(struct connection))) == NULL) {
- Alert("parsing [%s:%d] : out of memory while allocating check connection.\n", file, linenum);
- return ERR_ALERT | ERR_ABORT;
- }
-
- check->conn->t.sock.fd = -1; /* no agent in progress yet */
-
- return 0;
-}
-
int cfg_parse_listen(const char *file, int linenum, char **args, int kwm)
{
static struct proxy *curproxy = NULL;
- struct server *newsrv = NULL;
const char *err;
int rc;
unsigned val;
@@ -2104,7 +2047,12 @@
curproxy->conf.args.line = linenum;
/* Now let's parse the proxy-specific keywords */
- if (!strcmp(args[0], "bind")) { /* new listen addresses */
+ if (!strcmp(args[0], "server") || !strcmp(args[0], "default-server")) {
+ err_code |= parse_server(file, linenum, args, curproxy, &defproxy);
+ if (err_code & ERR_FATAL)
+ goto out;
+ }
+ else if (!strcmp(args[0], "bind")) { /* new listen addresses */
struct listener *l;
int cur_arg;
@@ -4581,857 +4529,8 @@
err_code |= ERR_ALERT | ERR_FATAL;
goto out;
}
- }
- }
- else if (!strcmp(args[0], "server") || !strcmp(args[0], "default-server")) { /* server address */
- int cur_arg;
- short realport = 0;
- int do_agent = 0, do_check = 0, defsrv = (*args[0] == 'd');
-
- if (!defsrv && curproxy == &defproxy) {
- Alert("parsing [%s:%d] : '%s' not allowed in 'defaults' section.\n", file, linenum, args[0]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- else if (warnifnotcap(curproxy, PR_CAP_BE, file, linenum, args[0], NULL))
- err_code |= ERR_ALERT | ERR_FATAL;
-
- if (!*args[2]) {
- Alert("parsing [%s:%d] : '%s' expects <name> and <addr>[:<port>] as arguments.\n",
- file, linenum, args[0]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- err = invalid_char(args[1]);
- if (err && !defsrv) {
- Alert("parsing [%s:%d] : character '%c' is not permitted in server name '%s'.\n",
- file, linenum, *err, args[1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (!defsrv) {
- struct sockaddr_storage *sk;
- int port1, port2;
- struct protocol *proto;
-
- if ((newsrv = (struct server *)calloc(1, sizeof(struct server))) == NULL) {
- Alert("parsing [%s:%d] : out of memory.\n", file, linenum);
- err_code |= ERR_ALERT | ERR_ABORT;
- goto out;
- }
-
- /* the servers are linked backwards first */
- newsrv->next = curproxy->srv;
- curproxy->srv = newsrv;
- newsrv->proxy = curproxy;
- newsrv->conf.file = strdup(file);
- newsrv->conf.line = linenum;
-
- newsrv->obj_type = OBJ_TYPE_SERVER;
- LIST_INIT(&newsrv->actconns);
- LIST_INIT(&newsrv->pendconns);
- do_check = 0;
- do_agent = 0;
- newsrv->state = SRV_RUNNING; /* early server setup */
- newsrv->last_change = now.tv_sec;
- newsrv->id = strdup(args[1]);
-
- /* several ways to check the port component :
- * - IP => port=+0, relative (IPv4 only)
- * - IP: => port=+0, relative
- * - IP:N => port=N, absolute
- * - IP:+N => port=+N, relative
- * - IP:-N => port=-N, relative
- */
- sk = str2sa_range(args[2], &port1, &port2, &errmsg, NULL);
- if (!sk) {
- Alert("parsing [%s:%d] : '%s %s' : %s\n", file, linenum, args[0], args[1], errmsg);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- proto = protocol_by_family(sk->ss_family);
- if (!proto || !proto->connect) {
- Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
- file, linenum, args[0], args[1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (!port1 || !port2) {
- /* no port specified, +offset, -offset */
- newsrv->state |= SRV_MAPPORTS;
- }
- else if (port1 != port2) {
- /* port range */
- Alert("parsing [%s:%d] : '%s %s' : port ranges are not allowed in '%s'\n",
- file, linenum, args[0], args[1], args[2]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- else {
- /* used by checks */
- realport = port1;
- }
-
- newsrv->addr = *sk;
- newsrv->proto = newsrv->check_common.proto = protocol_by_family(newsrv->addr.ss_family);
- newsrv->xprt = newsrv->check_common.xprt = &raw_sock;
-
- if (!newsrv->proto) {
- Alert("parsing [%s:%d] : Unknown protocol family %d '%s'\n",
- file, linenum, newsrv->addr.ss_family, args[2]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->check.use_ssl = curproxy->defsrv.check.use_ssl;
- newsrv->check.port = curproxy->defsrv.check.port;
- newsrv->check.inter = curproxy->defsrv.check.inter;
- newsrv->check.fastinter = curproxy->defsrv.check.fastinter;
- newsrv->check.downinter = curproxy->defsrv.check.downinter;
- newsrv->agent.use_ssl = curproxy->defsrv.agent.use_ssl;
- newsrv->agent.port = curproxy->defsrv.agent.port;
- newsrv->agent.inter = curproxy->defsrv.agent.inter;
- newsrv->agent.fastinter = curproxy->defsrv.agent.fastinter;
- newsrv->agent.downinter = curproxy->defsrv.agent.downinter;
- newsrv->maxqueue = curproxy->defsrv.maxqueue;
- newsrv->minconn = curproxy->defsrv.minconn;
- newsrv->maxconn = curproxy->defsrv.maxconn;
- newsrv->slowstart = curproxy->defsrv.slowstart;
- newsrv->onerror = curproxy->defsrv.onerror;
- newsrv->onmarkeddown = curproxy->defsrv.onmarkeddown;
- newsrv->onmarkedup = curproxy->defsrv.onmarkedup;
- newsrv->consecutive_errors_limit
- = curproxy->defsrv.consecutive_errors_limit;
-#ifdef OPENSSL
- newsrv->use_ssl = curproxy->defsrv.use_ssl;
-#endif
- newsrv->uweight = newsrv->iweight
- = curproxy->defsrv.iweight;
-
- newsrv->check.status = HCHK_STATUS_INI;
- newsrv->check.rise = curproxy->defsrv.check.rise;
- newsrv->check.fall = curproxy->defsrv.check.fall;
- newsrv->check.health = newsrv->check.rise; /* up, but will fall down at first failure */
- newsrv->check.server = newsrv;
-
- newsrv->agent.status = HCHK_STATUS_INI;
- newsrv->agent.rise = curproxy->defsrv.agent.rise;
- newsrv->agent.fall = curproxy->defsrv.agent.fall;
- newsrv->agent.health = newsrv->agent.rise; /* up, but will fall down at first failure */
- newsrv->agent.server = newsrv;
-
- cur_arg = 3;
- } else {
- newsrv = &curproxy->defsrv;
- cur_arg = 1;
- }
-
- while (*args[cur_arg]) {
- if (!strcmp(args[cur_arg], "agent-check")) {
- global.maxsock++;
- do_agent = 1;
- cur_arg += 1;
- } else if (!strcmp(args[cur_arg], "agent-inter")) {
- const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
- if (err) {
- Alert("parsing [%s:%d] : unexpected character '%c' in 'agent-inter' argument of server %s.\n",
- file, linenum, *err, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if (val <= 0) {
- Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
- file, linenum, val, args[cur_arg], newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->agent.inter = val;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "agent-port")) {
- global.maxsock++;
- newsrv->agent.port = atol(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "cookie")) {
- newsrv->cookie = strdup(args[cur_arg + 1]);
- newsrv->cklen = strlen(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "redir")) {
- newsrv->rdr_pfx = strdup(args[cur_arg + 1]);
- newsrv->rdr_len = strlen(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "rise")) {
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->check.rise = atol(args[cur_arg + 1]);
- if (newsrv->check.rise <= 0) {
- Alert("parsing [%s:%d]: '%s' has to be > 0.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (newsrv->check.health)
- newsrv->check.health = newsrv->check.rise;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "fall")) {
- newsrv->check.fall = atol(args[cur_arg + 1]);
-
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (newsrv->check.fall <= 0) {
- Alert("parsing [%s:%d]: '%s' has to be > 0.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "inter")) {
- const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
- if (err) {
- Alert("parsing [%s:%d] : unexpected character '%c' in 'inter' argument of server %s.\n",
- file, linenum, *err, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if (val <= 0) {
- Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
- file, linenum, val, args[cur_arg], newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->check.inter = val;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "fastinter")) {
- const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
- if (err) {
- Alert("parsing [%s:%d]: unexpected character '%c' in 'fastinter' argument of server %s.\n",
- file, linenum, *err, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if (val <= 0) {
- Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
- file, linenum, val, args[cur_arg], newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->check.fastinter = val;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "downinter")) {
- const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
- if (err) {
- Alert("parsing [%s:%d]: unexpected character '%c' in 'downinter' argument of server %s.\n",
- file, linenum, *err, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if (val <= 0) {
- Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
- file, linenum, val, args[cur_arg], newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->check.downinter = val;
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "addr")) {
- struct sockaddr_storage *sk;
- int port1, port2;
- struct protocol *proto;
-
- sk = str2sa_range(args[cur_arg + 1], &port1, &port2, &errmsg, NULL);
- if (!sk) {
- Alert("parsing [%s:%d] : '%s' : %s\n",
- file, linenum, args[cur_arg], errmsg);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- proto = protocol_by_family(sk->ss_family);
- if (!proto || !proto->connect) {
- Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (port1 != port2) {
- Alert("parsing [%s:%d] : '%s' : port ranges and offsets are not allowed in '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->check_common.addr = *sk;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "port")) {
- newsrv->check.port = atol(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "backup")) {
- newsrv->state |= SRV_BACKUP;
- cur_arg ++;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "non-stick")) {
- newsrv->state |= SRV_NON_STICK;
- cur_arg ++;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "send-proxy")) {
- newsrv->state |= SRV_SEND_PROXY;
- cur_arg ++;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "check-send-proxy")) {
- newsrv->check.send_proxy = 1;
- cur_arg ++;
- }
- else if (!strcmp(args[cur_arg], "weight")) {
- int w;
- w = atol(args[cur_arg + 1]);
- if (w < 0 || w > SRV_UWGHT_MAX) {
- Alert("parsing [%s:%d] : weight of server %s is not within 0 and %d (%d).\n",
- file, linenum, newsrv->id, SRV_UWGHT_MAX, w);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->uweight = newsrv->iweight = w;
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "minconn")) {
- newsrv->minconn = atol(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "maxconn")) {
- newsrv->maxconn = atol(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "maxqueue")) {
- newsrv->maxqueue = atol(args[cur_arg + 1]);
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "slowstart")) {
- /* slowstart is stored in seconds */
- const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
- if (err) {
- Alert("parsing [%s:%d] : unexpected character '%c' in 'slowstart' argument of server %s.\n",
- file, linenum, *err, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->slowstart = (val + 999) / 1000;
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "track")) {
-
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d]: 'track' expects [<proxy>/]<server> as argument.\n",
- file, linenum);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->trackit = strdup(args[cur_arg + 1]);
-
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "check")) {
- global.maxsock++;
- do_check = 1;
- cur_arg += 1;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "disabled")) {
- newsrv->state |= SRV_MAINTAIN;
- newsrv->state &= ~SRV_RUNNING;
- newsrv->check.state |= CHK_ST_PAUSED;
- newsrv->check.health = 0;
- newsrv->agent.health = 0;
- cur_arg += 1;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "observe")) {
- if (!strcmp(args[cur_arg + 1], "none"))
- newsrv->observe = HANA_OBS_NONE;
- else if (!strcmp(args[cur_arg + 1], "layer4"))
- newsrv->observe = HANA_OBS_LAYER4;
- else if (!strcmp(args[cur_arg + 1], "layer7")) {
- if (curproxy->mode != PR_MODE_HTTP) {
- Alert("parsing [%s:%d]: '%s' can only be used in http proxies.\n",
- file, linenum, args[cur_arg + 1]);
- err_code |= ERR_ALERT;
- }
- newsrv->observe = HANA_OBS_LAYER7;
- }
- else {
- Alert("parsing [%s:%d]: '%s' expects one of 'none', "
- "'layer4', 'layer7' but got '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "on-error")) {
- if (!strcmp(args[cur_arg + 1], "fastinter"))
- newsrv->onerror = HANA_ONERR_FASTINTER;
- else if (!strcmp(args[cur_arg + 1], "fail-check"))
- newsrv->onerror = HANA_ONERR_FAILCHK;
- else if (!strcmp(args[cur_arg + 1], "sudden-death"))
- newsrv->onerror = HANA_ONERR_SUDDTH;
- else if (!strcmp(args[cur_arg + 1], "mark-down"))
- newsrv->onerror = HANA_ONERR_MARKDWN;
- else {
- Alert("parsing [%s:%d]: '%s' expects one of 'fastinter', "
- "'fail-check', 'sudden-death' or 'mark-down' but got '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "on-marked-down")) {
- if (!strcmp(args[cur_arg + 1], "shutdown-sessions"))
- newsrv->onmarkeddown = HANA_ONMARKEDDOWN_SHUTDOWNSESSIONS;
- else {
- Alert("parsing [%s:%d]: '%s' expects 'shutdown-sessions' but got '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "on-marked-up")) {
- if (!strcmp(args[cur_arg + 1], "shutdown-backup-sessions"))
- newsrv->onmarkedup = HANA_ONMARKEDUP_SHUTDOWNBACKUPSESSIONS;
- else {
- Alert("parsing [%s:%d]: '%s' expects 'shutdown-backup-sessions' but got '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- cur_arg += 2;
- }
- else if (!strcmp(args[cur_arg], "error-limit")) {
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->consecutive_errors_limit = atoi(args[cur_arg + 1]);
-
- if (newsrv->consecutive_errors_limit <= 0) {
- Alert("parsing [%s:%d]: %s has to be > 0.\n",
- file, linenum, args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- cur_arg += 2;
- }
- else if (!defsrv && !strcmp(args[cur_arg], "source")) { /* address to which we bind when connecting */
- int port_low, port_high;
- struct sockaddr_storage *sk;
- struct protocol *proto;
-
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d] : '%s' expects <addr>[:<port>[-<port>]], and optionally '%s' <addr>, and '%s' <name> as argument.\n",
- file, linenum, "source", "usesrc", "interface");
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->conn_src.opts |= CO_SRC_BIND;
- sk = str2sa_range(args[cur_arg + 1], &port_low, &port_high, &errmsg, NULL);
- if (!sk) {
- Alert("parsing [%s:%d] : '%s %s' : %s\n",
- file, linenum, args[cur_arg], args[cur_arg+1], errmsg);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- proto = protocol_by_family(sk->ss_family);
- if (!proto || !proto->connect) {
- Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
- file, linenum, args[cur_arg], args[cur_arg+1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- newsrv->conn_src.source_addr = *sk;
-
- if (port_low != port_high) {
- int i;
-
- if (!port_low || !port_high) {
- Alert("parsing [%s:%d] : %s does not support port offsets (found '%s').\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (port_low <= 0 || port_low > 65535 ||
- port_high <= 0 || port_high > 65535 ||
- port_low > port_high) {
- Alert("parsing [%s:%d] : invalid source port range %d-%d.\n",
- file, linenum, port_low, port_high);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->conn_src.sport_range = port_range_alloc_range(port_high - port_low + 1);
- for (i = 0; i < newsrv->conn_src.sport_range->size; i++)
- newsrv->conn_src.sport_range->ports[i] = port_low + i;
- }
-
- cur_arg += 2;
- while (*(args[cur_arg])) {
- if (!strcmp(args[cur_arg], "usesrc")) { /* address to use outside */
-#if defined(CONFIG_HAP_CTTPROXY) || defined(CONFIG_HAP_TRANSPARENT)
-#if !defined(CONFIG_HAP_TRANSPARENT)
- if (!is_addr(&newsrv->conn_src.source_addr)) {
- Alert("parsing [%s:%d] : '%s' requires an explicit '%s' address.\n",
- file, linenum, "usesrc", "source");
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-#endif
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d] : '%s' expects <addr>[:<port>], 'client', 'clientip', or 'hdr_ip(name,#)' as argument.\n",
- file, linenum, "usesrc");
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if (!strcmp(args[cur_arg + 1], "client")) {
- newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
- newsrv->conn_src.opts |= CO_SRC_TPROXY_CLI;
- } else if (!strcmp(args[cur_arg + 1], "clientip")) {
- newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
- newsrv->conn_src.opts |= CO_SRC_TPROXY_CIP;
- } else if (!strncmp(args[cur_arg + 1], "hdr_ip(", 7)) {
- char *name, *end;
-
- name = args[cur_arg+1] + 7;
- while (isspace(*name))
- name++;
-
- end = name;
- while (*end && !isspace(*end) && *end != ',' && *end != ')')
- end++;
-
- newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
- newsrv->conn_src.opts |= CO_SRC_TPROXY_DYN;
- newsrv->conn_src.bind_hdr_name = calloc(1, end - name + 1);
- newsrv->conn_src.bind_hdr_len = end - name;
- memcpy(newsrv->conn_src.bind_hdr_name, name, end - name);
- newsrv->conn_src.bind_hdr_name[end-name] = '\0';
- newsrv->conn_src.bind_hdr_occ = -1;
-
- /* now look for an occurrence number */
- while (isspace(*end))
- end++;
- if (*end == ',') {
- end++;
- name = end;
- if (*end == '-')
- end++;
- while (isdigit((int)*end))
- end++;
- newsrv->conn_src.bind_hdr_occ = strl2ic(name, end-name);
- }
-
- if (newsrv->conn_src.bind_hdr_occ < -MAX_HDR_HISTORY) {
- Alert("parsing [%s:%d] : usesrc hdr_ip(name,num) does not support negative"
- " occurrences values smaller than %d.\n",
- file, linenum, MAX_HDR_HISTORY);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- } else {
- struct sockaddr_storage *sk;
- int port1, port2;
-
- sk = str2sa_range(args[cur_arg + 1], &port1, &port2, &errmsg, NULL);
- if (!sk) {
- Alert("parsing [%s:%d] : '%s %s' : %s\n",
- file, linenum, args[cur_arg], args[cur_arg+1], errmsg);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- proto = protocol_by_family(sk->ss_family);
- if (!proto || !proto->connect) {
- Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
- file, linenum, args[cur_arg], args[cur_arg+1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (port1 != port2) {
- Alert("parsing [%s:%d] : '%s' : port ranges and offsets are not allowed in '%s'\n",
- file, linenum, args[cur_arg], args[cur_arg + 1]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- newsrv->conn_src.tproxy_addr = *sk;
- newsrv->conn_src.opts |= CO_SRC_TPROXY_ADDR;
- }
- global.last_checks |= LSTCHK_NETADM;
-#if !defined(CONFIG_HAP_TRANSPARENT)
- global.last_checks |= LSTCHK_CTTPROXY;
-#endif
- cur_arg += 2;
- continue;
-#else /* no TPROXY support */
- Alert("parsing [%s:%d] : '%s' not allowed here because support for TPROXY was not compiled in.\n",
- file, linenum, "usesrc");
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
-#endif /* defined(CONFIG_HAP_CTTPROXY) || defined(CONFIG_HAP_TRANSPARENT) */
- } /* "usesrc" */
-
- if (!strcmp(args[cur_arg], "interface")) { /* specifically bind to this interface */
-#ifdef SO_BINDTODEVICE
- if (!*args[cur_arg + 1]) {
- Alert("parsing [%s:%d] : '%s' : missing interface name.\n",
- file, linenum, args[0]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- free(newsrv->conn_src.iface_name);
- newsrv->conn_src.iface_name = strdup(args[cur_arg + 1]);
- newsrv->conn_src.iface_len = strlen(newsrv->conn_src.iface_name);
- global.last_checks |= LSTCHK_NETADM;
-#else
- Alert("parsing [%s:%d] : '%s' : '%s' option not implemented.\n",
- file, linenum, args[0], args[cur_arg]);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
-#endif
- cur_arg += 2;
- continue;
- }
- /* this keyword in not an option of "source" */
- break;
- } /* while */
- }
- else if (!defsrv && !strcmp(args[cur_arg], "usesrc")) { /* address to use outside: needs "source" first */
- Alert("parsing [%s:%d] : '%s' only allowed after a '%s' statement.\n",
- file, linenum, "usesrc", "source");
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- else {
- static int srv_dumped;
- struct srv_kw *kw;
- char *err;
-
- kw = srv_find_kw(args[cur_arg]);
- if (kw) {
- char *err = NULL;
- int code;
-
- if (!kw->parse) {
- Alert("parsing [%s:%d] : '%s %s' : '%s' option is not implemented in this version (check build options).\n",
- file, linenum, args[0], args[1], args[cur_arg]);
- cur_arg += 1 + kw->skip ;
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (defsrv && !kw->default_ok) {
- Alert("parsing [%s:%d] : '%s %s' : '%s' option is not accepted in default-server sections.\n",
- file, linenum, args[0], args[1], args[cur_arg]);
- cur_arg += 1 + kw->skip ;
- err_code |= ERR_ALERT;
- continue;
- }
-
- code = kw->parse(args, &cur_arg, curproxy, newsrv, &err);
- err_code |= code;
-
- if (code) {
- if (err && *err) {
- indent_msg(&err, 2);
- Alert("parsing [%s:%d] : '%s %s' : %s\n", file, linenum, args[0], args[1], err);
- }
- else
- Alert("parsing [%s:%d] : '%s %s' : error encountered while processing '%s'.\n",
- file, linenum, args[0], args[1], args[cur_arg]);
- if (code & ERR_FATAL) {
- free(err);
- cur_arg += 1 + kw->skip;
- goto out;
- }
- }
- free(err);
- cur_arg += 1 + kw->skip;
- continue;
- }
-
- err = NULL;
- if (!srv_dumped) {
- srv_dump_kws(&err);
- indent_msg(&err, 4);
- srv_dumped = 1;
- }
-
- Alert("parsing [%s:%d] : '%s %s' unknown keyword '%s'.%s%s\n",
- file, linenum, args[0], args[1], args[cur_arg],
- err ? " Registered keywords :" : "", err ? err : "");
- free(err);
-
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- }
-
- /* Set initial drain state using now-configured weight */
- set_server_drain_state(newsrv);
-
- if (do_check) {
- int ret;
-
- if (newsrv->trackit) {
- Alert("parsing [%s:%d]: unable to enable checks and tracking at the same time!\n",
- file, linenum);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- /* If neither a port nor an addr was specified and no check transport
- * layer is forced, then the transport layer used by the checks is the
- * same as for the production traffic. Otherwise we use raw_sock by
- * default, unless one is specified.
- */
- if (!newsrv->check.port && !is_addr(&newsrv->check_common.addr)) {
-#ifdef USE_OPENSSL
- newsrv->check.use_ssl |= (newsrv->use_ssl || (newsrv->proxy->options & PR_O_TCPCHK_SSL));
-#endif
- newsrv->check.send_proxy |= (newsrv->state & SRV_SEND_PROXY);
- }
- /* try to get the port from check_core.addr if check.port not set */
- if (!newsrv->check.port)
- newsrv->check.port = get_host_port(&newsrv->check_common.addr);
-
- if (!newsrv->check.port)
- newsrv->check.port = realport; /* by default */
-
- if (!newsrv->check.port) {
- /* not yet valid, because no port was set on
- * the server either. We'll check if we have
- * a known port on the first listener.
- */
- struct listener *l;
-
- list_for_each_entry(l, &curproxy->conf.listeners, by_fe) {
- newsrv->check.port = get_host_port(&l->addr);
- if (newsrv->check.port)
- break;
- }
- }
- /*
- * We need at least a service port, a check port or the first tcp-check rule must
- * be a 'connect' one
- */
- if (!newsrv->check.port) {
- struct tcpcheck_rule *n = NULL, *r = NULL;
- struct list *l;
-
- r = (struct tcpcheck_rule *)newsrv->proxy->tcpcheck_rules.n;
- if (!r) {
- Alert("parsing [%s:%d] : server %s has neither service port nor check port. Check has been disabled.\n",
- file, linenum, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- if ((r->action != TCPCHK_ACT_CONNECT) || !r->port) {
- Alert("parsing [%s:%d] : server %s has neither service port nor check port nor tcp_check rule 'connect' with port information. Check has been disabled.\n",
- file, linenum, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- else {
- /* scan the tcp-check ruleset to ensure a port has been configured */
- l = &newsrv->proxy->tcpcheck_rules;
- list_for_each_entry(n, l, list) {
- r = (struct tcpcheck_rule *)n->list.p;
- if ((r->action == TCPCHK_ACT_CONNECT) && (!r->port)) {
- Alert("parsing [%s:%d] : server %s has neither service port nor check port, and a tcp_check rule 'connect' with no port information. Check has been disabled.\n",
- file, linenum, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
- }
- }
- }
-
- /* note: check type will be set during the config review phase */
- ret = init_check(&newsrv->check, 0, file, linenum);
- if (ret) {
- err_code |= ret;
- goto out;
- }
-
- newsrv->check.state |= CHK_ST_CONFIGURED | CHK_ST_ENABLED;
- }
-
- if (do_agent) {
- int ret;
-
- if (!newsrv->agent.port) {
- Alert("parsing [%s:%d] : server %s does not have agent port. Agent check has been disabled.\n",
- file, linenum, newsrv->id);
- err_code |= ERR_ALERT | ERR_FATAL;
- goto out;
- }
-
- if (!newsrv->agent.inter)
- newsrv->agent.inter = newsrv->check.inter;
-
- ret = init_check(&newsrv->agent, PR_O2_LB_AGENT_CHK, file, linenum);
- if (ret) {
- err_code |= ret;
- goto out;
- }
-
- newsrv->agent.state |= CHK_ST_CONFIGURED | CHK_ST_ENABLED | CHK_ST_AGENT;
- }
-
- if (!defsrv) {
- if (newsrv->state & SRV_BACKUP)
- curproxy->srv_bck++;
- else
- curproxy->srv_act++;
-
- newsrv->prev_state = newsrv->state;
}
}
-
else if (strcmp(args[0], "unique-id-format") == 0) {
if (!*(args[1])) {
Alert("parsing [%s:%d] : %s expects an argument.\n", file, linenum, args[0]);
diff --git a/src/server.c b/src/server.c
index ccae58b..5ac5e37 100644
--- a/src/server.c
+++ b/src/server.c
@@ -11,10 +11,18 @@
*
*/
+#include <ctype.h>
+
+#include <common/cfgparse.h>
#include <common/config.h>
#include <common/errors.h>
#include <common/time.h>
+#include <types/global.h>
+
+#include <proto/port_range.h>
+#include <proto/protocol.h>
+#include <proto/raw_sock.h>
#include <proto/server.h>
/* List head of all known server keywords */
@@ -249,6 +257,898 @@
return NULL;
}
+static int init_check(struct check *check, int type, const char * file, int linenum)
+{
+ check->type = type;
+
+ /* Allocate buffer for requests... */
+ if ((check->bi = calloc(sizeof(struct buffer) + global.tune.chksize, sizeof(char))) == NULL) {
+ Alert("parsing [%s:%d] : out of memory while allocating check buffer.\n", file, linenum);
+ return ERR_ALERT | ERR_ABORT;
+ }
+ check->bi->size = global.tune.chksize;
+
+ /* Allocate buffer for responses... */
+ if ((check->bo = calloc(sizeof(struct buffer) + global.tune.chksize, sizeof(char))) == NULL) {
+ Alert("parsing [%s:%d] : out of memory while allocating check buffer.\n", file, linenum);
+ return ERR_ALERT | ERR_ABORT;
+ }
+ check->bo->size = global.tune.chksize;
+
+ /* Allocate buffer for partial results... */
+ if ((check->conn = calloc(1, sizeof(struct connection))) == NULL) {
+ Alert("parsing [%s:%d] : out of memory while allocating check connection.\n", file, linenum);
+ return ERR_ALERT | ERR_ABORT;
+ }
+
+ check->conn->t.sock.fd = -1; /* no agent in progress yet */
+
+ return 0;
+}
+
+int parse_server(const char *file, int linenum, char **args, struct proxy *curproxy, struct proxy *defproxy)
+{
+ struct server *newsrv = NULL;
+ const char *err;
+ char *errmsg = NULL;
+ int err_code = 0;
+ unsigned val;
+
+ if (!strcmp(args[0], "server") || !strcmp(args[0], "default-server")) { /* server address */
+ int cur_arg;
+ short realport = 0;
+ int do_agent = 0, do_check = 0, defsrv = (*args[0] == 'd');
+
+ if (!defsrv && curproxy == defproxy) {
+ Alert("parsing [%s:%d] : '%s' not allowed in 'defaults' section.\n", file, linenum, args[0]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ else if (warnifnotcap(curproxy, PR_CAP_BE, file, linenum, args[0], NULL))
+ err_code |= ERR_ALERT | ERR_FATAL;
+
+ if (!*args[2]) {
+ Alert("parsing [%s:%d] : '%s' expects <name> and <addr>[:<port>] as arguments.\n",
+ file, linenum, args[0]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ err = invalid_char(args[1]);
+ if (err && !defsrv) {
+ Alert("parsing [%s:%d] : character '%c' is not permitted in server name '%s'.\n",
+ file, linenum, *err, args[1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (!defsrv) {
+ struct sockaddr_storage *sk;
+ int port1, port2;
+ struct protocol *proto;
+
+ if ((newsrv = (struct server *)calloc(1, sizeof(struct server))) == NULL) {
+ Alert("parsing [%s:%d] : out of memory.\n", file, linenum);
+ err_code |= ERR_ALERT | ERR_ABORT;
+ goto out;
+ }
+
+ /* the servers are linked backwards first */
+ newsrv->next = curproxy->srv;
+ curproxy->srv = newsrv;
+ newsrv->proxy = curproxy;
+ newsrv->conf.file = strdup(file);
+ newsrv->conf.line = linenum;
+
+ newsrv->obj_type = OBJ_TYPE_SERVER;
+ LIST_INIT(&newsrv->actconns);
+ LIST_INIT(&newsrv->pendconns);
+ do_check = 0;
+ do_agent = 0;
+ newsrv->state = SRV_RUNNING; /* early server setup */
+ newsrv->last_change = now.tv_sec;
+ newsrv->id = strdup(args[1]);
+
+ /* several ways to check the port component :
+ * - IP => port=+0, relative (IPv4 only)
+ * - IP: => port=+0, relative
+ * - IP:N => port=N, absolute
+ * - IP:+N => port=+N, relative
+ * - IP:-N => port=-N, relative
+ */
+ sk = str2sa_range(args[2], &port1, &port2, &errmsg, NULL);
+ if (!sk) {
+ Alert("parsing [%s:%d] : '%s %s' : %s\n", file, linenum, args[0], args[1], errmsg);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ proto = protocol_by_family(sk->ss_family);
+ if (!proto || !proto->connect) {
+ Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
+ file, linenum, args[0], args[1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (!port1 || !port2) {
+ /* no port specified, +offset, -offset */
+ newsrv->state |= SRV_MAPPORTS;
+ }
+ else if (port1 != port2) {
+ /* port range */
+ Alert("parsing [%s:%d] : '%s %s' : port ranges are not allowed in '%s'\n",
+ file, linenum, args[0], args[1], args[2]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ else {
+ /* used by checks */
+ realport = port1;
+ }
+
+ newsrv->addr = *sk;
+ newsrv->proto = newsrv->check_common.proto = protocol_by_family(newsrv->addr.ss_family);
+ newsrv->xprt = newsrv->check_common.xprt = &raw_sock;
+
+ if (!newsrv->proto) {
+ Alert("parsing [%s:%d] : Unknown protocol family %d '%s'\n",
+ file, linenum, newsrv->addr.ss_family, args[2]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->check.use_ssl = curproxy->defsrv.check.use_ssl;
+ newsrv->check.port = curproxy->defsrv.check.port;
+ newsrv->check.inter = curproxy->defsrv.check.inter;
+ newsrv->check.fastinter = curproxy->defsrv.check.fastinter;
+ newsrv->check.downinter = curproxy->defsrv.check.downinter;
+ newsrv->agent.use_ssl = curproxy->defsrv.agent.use_ssl;
+ newsrv->agent.port = curproxy->defsrv.agent.port;
+ newsrv->agent.inter = curproxy->defsrv.agent.inter;
+ newsrv->agent.fastinter = curproxy->defsrv.agent.fastinter;
+ newsrv->agent.downinter = curproxy->defsrv.agent.downinter;
+ newsrv->maxqueue = curproxy->defsrv.maxqueue;
+ newsrv->minconn = curproxy->defsrv.minconn;
+ newsrv->maxconn = curproxy->defsrv.maxconn;
+ newsrv->slowstart = curproxy->defsrv.slowstart;
+ newsrv->onerror = curproxy->defsrv.onerror;
+ newsrv->onmarkeddown = curproxy->defsrv.onmarkeddown;
+ newsrv->onmarkedup = curproxy->defsrv.onmarkedup;
+ newsrv->consecutive_errors_limit
+ = curproxy->defsrv.consecutive_errors_limit;
+#ifdef OPENSSL
+ newsrv->use_ssl = curproxy->defsrv.use_ssl;
+#endif
+ newsrv->uweight = newsrv->iweight
+ = curproxy->defsrv.iweight;
+
+ newsrv->check.status = HCHK_STATUS_INI;
+ newsrv->check.rise = curproxy->defsrv.check.rise;
+ newsrv->check.fall = curproxy->defsrv.check.fall;
+ newsrv->check.health = newsrv->check.rise; /* up, but will fall down at first failure */
+ newsrv->check.server = newsrv;
+
+ newsrv->agent.status = HCHK_STATUS_INI;
+ newsrv->agent.rise = curproxy->defsrv.agent.rise;
+ newsrv->agent.fall = curproxy->defsrv.agent.fall;
+ newsrv->agent.health = newsrv->agent.rise; /* up, but will fall down at first failure */
+ newsrv->agent.server = newsrv;
+
+ cur_arg = 3;
+ } else {
+ newsrv = &curproxy->defsrv;
+ cur_arg = 1;
+ }
+
+ while (*args[cur_arg]) {
+ if (!strcmp(args[cur_arg], "agent-check")) {
+ global.maxsock++;
+ do_agent = 1;
+ cur_arg += 1;
+ } else if (!strcmp(args[cur_arg], "agent-inter")) {
+ const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
+ if (err) {
+ Alert("parsing [%s:%d] : unexpected character '%c' in 'agent-inter' argument of server %s.\n",
+ file, linenum, *err, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if (val <= 0) {
+ Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
+ file, linenum, val, args[cur_arg], newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->agent.inter = val;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "agent-port")) {
+ global.maxsock++;
+ newsrv->agent.port = atol(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "cookie")) {
+ newsrv->cookie = strdup(args[cur_arg + 1]);
+ newsrv->cklen = strlen(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "redir")) {
+ newsrv->rdr_pfx = strdup(args[cur_arg + 1]);
+ newsrv->rdr_len = strlen(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "rise")) {
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->check.rise = atol(args[cur_arg + 1]);
+ if (newsrv->check.rise <= 0) {
+ Alert("parsing [%s:%d]: '%s' has to be > 0.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (newsrv->check.health)
+ newsrv->check.health = newsrv->check.rise;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "fall")) {
+ newsrv->check.fall = atol(args[cur_arg + 1]);
+
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (newsrv->check.fall <= 0) {
+ Alert("parsing [%s:%d]: '%s' has to be > 0.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "inter")) {
+ const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
+ if (err) {
+ Alert("parsing [%s:%d] : unexpected character '%c' in 'inter' argument of server %s.\n",
+ file, linenum, *err, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if (val <= 0) {
+ Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
+ file, linenum, val, args[cur_arg], newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->check.inter = val;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "fastinter")) {
+ const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
+ if (err) {
+ Alert("parsing [%s:%d]: unexpected character '%c' in 'fastinter' argument of server %s.\n",
+ file, linenum, *err, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if (val <= 0) {
+ Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
+ file, linenum, val, args[cur_arg], newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->check.fastinter = val;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "downinter")) {
+ const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
+ if (err) {
+ Alert("parsing [%s:%d]: unexpected character '%c' in 'downinter' argument of server %s.\n",
+ file, linenum, *err, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if (val <= 0) {
+ Alert("parsing [%s:%d]: invalid value %d for argument '%s' of server %s.\n",
+ file, linenum, val, args[cur_arg], newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->check.downinter = val;
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "addr")) {
+ struct sockaddr_storage *sk;
+ int port1, port2;
+ struct protocol *proto;
+
+ sk = str2sa_range(args[cur_arg + 1], &port1, &port2, &errmsg, NULL);
+ if (!sk) {
+ Alert("parsing [%s:%d] : '%s' : %s\n",
+ file, linenum, args[cur_arg], errmsg);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ proto = protocol_by_family(sk->ss_family);
+ if (!proto || !proto->connect) {
+ Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (port1 != port2) {
+ Alert("parsing [%s:%d] : '%s' : port ranges and offsets are not allowed in '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->check_common.addr = *sk;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "port")) {
+ newsrv->check.port = atol(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "backup")) {
+ newsrv->state |= SRV_BACKUP;
+ cur_arg ++;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "non-stick")) {
+ newsrv->state |= SRV_NON_STICK;
+ cur_arg ++;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "send-proxy")) {
+ newsrv->state |= SRV_SEND_PROXY;
+ cur_arg ++;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "check-send-proxy")) {
+ newsrv->check.send_proxy = 1;
+ cur_arg ++;
+ }
+ else if (!strcmp(args[cur_arg], "weight")) {
+ int w;
+ w = atol(args[cur_arg + 1]);
+ if (w < 0 || w > SRV_UWGHT_MAX) {
+ Alert("parsing [%s:%d] : weight of server %s is not within 0 and %d (%d).\n",
+ file, linenum, newsrv->id, SRV_UWGHT_MAX, w);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->uweight = newsrv->iweight = w;
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "minconn")) {
+ newsrv->minconn = atol(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "maxconn")) {
+ newsrv->maxconn = atol(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "maxqueue")) {
+ newsrv->maxqueue = atol(args[cur_arg + 1]);
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "slowstart")) {
+ /* slowstart is stored in seconds */
+ const char *err = parse_time_err(args[cur_arg + 1], &val, TIME_UNIT_MS);
+ if (err) {
+ Alert("parsing [%s:%d] : unexpected character '%c' in 'slowstart' argument of server %s.\n",
+ file, linenum, *err, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->slowstart = (val + 999) / 1000;
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "track")) {
+
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d]: 'track' expects [<proxy>/]<server> as argument.\n",
+ file, linenum);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->trackit = strdup(args[cur_arg + 1]);
+
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "check")) {
+ global.maxsock++;
+ do_check = 1;
+ cur_arg += 1;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "disabled")) {
+ newsrv->state |= SRV_MAINTAIN;
+ newsrv->state &= ~SRV_RUNNING;
+ newsrv->check.state |= CHK_ST_PAUSED;
+ newsrv->check.health = 0;
+ newsrv->agent.health = 0;
+ cur_arg += 1;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "observe")) {
+ if (!strcmp(args[cur_arg + 1], "none"))
+ newsrv->observe = HANA_OBS_NONE;
+ else if (!strcmp(args[cur_arg + 1], "layer4"))
+ newsrv->observe = HANA_OBS_LAYER4;
+ else if (!strcmp(args[cur_arg + 1], "layer7")) {
+ if (curproxy->mode != PR_MODE_HTTP) {
+ Alert("parsing [%s:%d]: '%s' can only be used in http proxies.\n",
+ file, linenum, args[cur_arg + 1]);
+ err_code |= ERR_ALERT;
+ }
+ newsrv->observe = HANA_OBS_LAYER7;
+ }
+ else {
+ Alert("parsing [%s:%d]: '%s' expects one of 'none', "
+ "'layer4', 'layer7' but got '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "on-error")) {
+ if (!strcmp(args[cur_arg + 1], "fastinter"))
+ newsrv->onerror = HANA_ONERR_FASTINTER;
+ else if (!strcmp(args[cur_arg + 1], "fail-check"))
+ newsrv->onerror = HANA_ONERR_FAILCHK;
+ else if (!strcmp(args[cur_arg + 1], "sudden-death"))
+ newsrv->onerror = HANA_ONERR_SUDDTH;
+ else if (!strcmp(args[cur_arg + 1], "mark-down"))
+ newsrv->onerror = HANA_ONERR_MARKDWN;
+ else {
+ Alert("parsing [%s:%d]: '%s' expects one of 'fastinter', "
+ "'fail-check', 'sudden-death' or 'mark-down' but got '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "on-marked-down")) {
+ if (!strcmp(args[cur_arg + 1], "shutdown-sessions"))
+ newsrv->onmarkeddown = HANA_ONMARKEDDOWN_SHUTDOWNSESSIONS;
+ else {
+ Alert("parsing [%s:%d]: '%s' expects 'shutdown-sessions' but got '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "on-marked-up")) {
+ if (!strcmp(args[cur_arg + 1], "shutdown-backup-sessions"))
+ newsrv->onmarkedup = HANA_ONMARKEDUP_SHUTDOWNBACKUPSESSIONS;
+ else {
+ Alert("parsing [%s:%d]: '%s' expects 'shutdown-backup-sessions' but got '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ cur_arg += 2;
+ }
+ else if (!strcmp(args[cur_arg], "error-limit")) {
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d]: '%s' expects an integer argument.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->consecutive_errors_limit = atoi(args[cur_arg + 1]);
+
+ if (newsrv->consecutive_errors_limit <= 0) {
+ Alert("parsing [%s:%d]: %s has to be > 0.\n",
+ file, linenum, args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ cur_arg += 2;
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "source")) { /* address to which we bind when connecting */
+ int port_low, port_high;
+ struct sockaddr_storage *sk;
+ struct protocol *proto;
+
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d] : '%s' expects <addr>[:<port>[-<port>]], and optionally '%s' <addr>, and '%s' <name> as argument.\n",
+ file, linenum, "source", "usesrc", "interface");
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->conn_src.opts |= CO_SRC_BIND;
+ sk = str2sa_range(args[cur_arg + 1], &port_low, &port_high, &errmsg, NULL);
+ if (!sk) {
+ Alert("parsing [%s:%d] : '%s %s' : %s\n",
+ file, linenum, args[cur_arg], args[cur_arg+1], errmsg);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ proto = protocol_by_family(sk->ss_family);
+ if (!proto || !proto->connect) {
+ Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
+ file, linenum, args[cur_arg], args[cur_arg+1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ newsrv->conn_src.source_addr = *sk;
+
+ if (port_low != port_high) {
+ int i;
+
+ if (!port_low || !port_high) {
+ Alert("parsing [%s:%d] : %s does not support port offsets (found '%s').\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (port_low <= 0 || port_low > 65535 ||
+ port_high <= 0 || port_high > 65535 ||
+ port_low > port_high) {
+ Alert("parsing [%s:%d] : invalid source port range %d-%d.\n",
+ file, linenum, port_low, port_high);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->conn_src.sport_range = port_range_alloc_range(port_high - port_low + 1);
+ for (i = 0; i < newsrv->conn_src.sport_range->size; i++)
+ newsrv->conn_src.sport_range->ports[i] = port_low + i;
+ }
+
+ cur_arg += 2;
+ while (*(args[cur_arg])) {
+ if (!strcmp(args[cur_arg], "usesrc")) { /* address to use outside */
+#if defined(CONFIG_HAP_CTTPROXY) || defined(CONFIG_HAP_TRANSPARENT)
+#if !defined(CONFIG_HAP_TRANSPARENT)
+ if (!is_addr(&newsrv->conn_src.source_addr)) {
+ Alert("parsing [%s:%d] : '%s' requires an explicit '%s' address.\n",
+ file, linenum, "usesrc", "source");
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+#endif
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d] : '%s' expects <addr>[:<port>], 'client', 'clientip', or 'hdr_ip(name,#)' as argument.\n",
+ file, linenum, "usesrc");
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if (!strcmp(args[cur_arg + 1], "client")) {
+ newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
+ newsrv->conn_src.opts |= CO_SRC_TPROXY_CLI;
+ } else if (!strcmp(args[cur_arg + 1], "clientip")) {
+ newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
+ newsrv->conn_src.opts |= CO_SRC_TPROXY_CIP;
+ } else if (!strncmp(args[cur_arg + 1], "hdr_ip(", 7)) {
+ char *name, *end;
+
+ name = args[cur_arg+1] + 7;
+ while (isspace(*name))
+ name++;
+
+ end = name;
+ while (*end && !isspace(*end) && *end != ',' && *end != ')')
+ end++;
+
+ newsrv->conn_src.opts &= ~CO_SRC_TPROXY_MASK;
+ newsrv->conn_src.opts |= CO_SRC_TPROXY_DYN;
+ newsrv->conn_src.bind_hdr_name = calloc(1, end - name + 1);
+ newsrv->conn_src.bind_hdr_len = end - name;
+ memcpy(newsrv->conn_src.bind_hdr_name, name, end - name);
+ newsrv->conn_src.bind_hdr_name[end-name] = '\0';
+ newsrv->conn_src.bind_hdr_occ = -1;
+
+ /* now look for an occurrence number */
+ while (isspace(*end))
+ end++;
+ if (*end == ',') {
+ end++;
+ name = end;
+ if (*end == '-')
+ end++;
+ while (isdigit((int)*end))
+ end++;
+ newsrv->conn_src.bind_hdr_occ = strl2ic(name, end-name);
+ }
+
+ if (newsrv->conn_src.bind_hdr_occ < -MAX_HDR_HISTORY) {
+ Alert("parsing [%s:%d] : usesrc hdr_ip(name,num) does not support negative"
+ " occurrences values smaller than %d.\n",
+ file, linenum, MAX_HDR_HISTORY);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ } else {
+ struct sockaddr_storage *sk;
+ int port1, port2;
+
+ sk = str2sa_range(args[cur_arg + 1], &port1, &port2, &errmsg, NULL);
+ if (!sk) {
+ Alert("parsing [%s:%d] : '%s %s' : %s\n",
+ file, linenum, args[cur_arg], args[cur_arg+1], errmsg);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ proto = protocol_by_family(sk->ss_family);
+ if (!proto || !proto->connect) {
+ Alert("parsing [%s:%d] : '%s %s' : connect() not supported for this address family.\n",
+ file, linenum, args[cur_arg], args[cur_arg+1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (port1 != port2) {
+ Alert("parsing [%s:%d] : '%s' : port ranges and offsets are not allowed in '%s'\n",
+ file, linenum, args[cur_arg], args[cur_arg + 1]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ newsrv->conn_src.tproxy_addr = *sk;
+ newsrv->conn_src.opts |= CO_SRC_TPROXY_ADDR;
+ }
+ global.last_checks |= LSTCHK_NETADM;
+#if !defined(CONFIG_HAP_TRANSPARENT)
+ global.last_checks |= LSTCHK_CTTPROXY;
+#endif
+ cur_arg += 2;
+ continue;
+#else /* no TPROXY support */
+ Alert("parsing [%s:%d] : '%s' not allowed here because support for TPROXY was not compiled in.\n",
+ file, linenum, "usesrc");
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+#endif /* defined(CONFIG_HAP_CTTPROXY) || defined(CONFIG_HAP_TRANSPARENT) */
+ } /* "usesrc" */
+
+ if (!strcmp(args[cur_arg], "interface")) { /* specifically bind to this interface */
+#ifdef SO_BINDTODEVICE
+ if (!*args[cur_arg + 1]) {
+ Alert("parsing [%s:%d] : '%s' : missing interface name.\n",
+ file, linenum, args[0]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ free(newsrv->conn_src.iface_name);
+ newsrv->conn_src.iface_name = strdup(args[cur_arg + 1]);
+ newsrv->conn_src.iface_len = strlen(newsrv->conn_src.iface_name);
+ global.last_checks |= LSTCHK_NETADM;
+#else
+ Alert("parsing [%s:%d] : '%s' : '%s' option not implemented.\n",
+ file, linenum, args[0], args[cur_arg]);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+#endif
+ cur_arg += 2;
+ continue;
+ }
+ /* this keyword in not an option of "source" */
+ break;
+ } /* while */
+ }
+ else if (!defsrv && !strcmp(args[cur_arg], "usesrc")) { /* address to use outside: needs "source" first */
+ Alert("parsing [%s:%d] : '%s' only allowed after a '%s' statement.\n",
+ file, linenum, "usesrc", "source");
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ else {
+ static int srv_dumped;
+ struct srv_kw *kw;
+ char *err;
+
+ kw = srv_find_kw(args[cur_arg]);
+ if (kw) {
+ char *err = NULL;
+ int code;
+
+ if (!kw->parse) {
+ Alert("parsing [%s:%d] : '%s %s' : '%s' option is not implemented in this version (check build options).\n",
+ file, linenum, args[0], args[1], args[cur_arg]);
+ cur_arg += 1 + kw->skip ;
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (defsrv && !kw->default_ok) {
+ Alert("parsing [%s:%d] : '%s %s' : '%s' option is not accepted in default-server sections.\n",
+ file, linenum, args[0], args[1], args[cur_arg]);
+ cur_arg += 1 + kw->skip ;
+ err_code |= ERR_ALERT;
+ continue;
+ }
+
+ code = kw->parse(args, &cur_arg, curproxy, newsrv, &err);
+ err_code |= code;
+
+ if (code) {
+ if (err && *err) {
+ indent_msg(&err, 2);
+ Alert("parsing [%s:%d] : '%s %s' : %s\n", file, linenum, args[0], args[1], err);
+ }
+ else
+ Alert("parsing [%s:%d] : '%s %s' : error encountered while processing '%s'.\n",
+ file, linenum, args[0], args[1], args[cur_arg]);
+ if (code & ERR_FATAL) {
+ free(err);
+ cur_arg += 1 + kw->skip;
+ goto out;
+ }
+ }
+ free(err);
+ cur_arg += 1 + kw->skip;
+ continue;
+ }
+
+ err = NULL;
+ if (!srv_dumped) {
+ srv_dump_kws(&err);
+ indent_msg(&err, 4);
+ srv_dumped = 1;
+ }
+
+ Alert("parsing [%s:%d] : '%s %s' unknown keyword '%s'.%s%s\n",
+ file, linenum, args[0], args[1], args[cur_arg],
+ err ? " Registered keywords :" : "", err ? err : "");
+ free(err);
+
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ }
+
+ /* Set initial drain state using now-configured weight */
+ set_server_drain_state(newsrv);
+
+ if (do_check) {
+ int ret;
+
+ if (newsrv->trackit) {
+ Alert("parsing [%s:%d]: unable to enable checks and tracking at the same time!\n",
+ file, linenum);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ /* If neither a port nor an addr was specified and no check transport
+ * layer is forced, then the transport layer used by the checks is the
+ * same as for the production traffic. Otherwise we use raw_sock by
+ * default, unless one is specified.
+ */
+ if (!newsrv->check.port && !is_addr(&newsrv->check_common.addr)) {
+#ifdef USE_OPENSSL
+ newsrv->check.use_ssl |= (newsrv->use_ssl || (newsrv->proxy->options & PR_O_TCPCHK_SSL));
+#endif
+ newsrv->check.send_proxy |= (newsrv->state & SRV_SEND_PROXY);
+ }
+ /* try to get the port from check_core.addr if check.port not set */
+ if (!newsrv->check.port)
+ newsrv->check.port = get_host_port(&newsrv->check_common.addr);
+
+ if (!newsrv->check.port)
+ newsrv->check.port = realport; /* by default */
+
+ if (!newsrv->check.port) {
+ /* not yet valid, because no port was set on
+ * the server either. We'll check if we have
+ * a known port on the first listener.
+ */
+ struct listener *l;
+
+ list_for_each_entry(l, &curproxy->conf.listeners, by_fe) {
+ newsrv->check.port = get_host_port(&l->addr);
+ if (newsrv->check.port)
+ break;
+ }
+ }
+ /*
+ * We need at least a service port, a check port or the first tcp-check rule must
+ * be a 'connect' one
+ */
+ if (!newsrv->check.port) {
+ struct tcpcheck_rule *n = NULL, *r = NULL;
+ struct list *l;
+
+ r = (struct tcpcheck_rule *)newsrv->proxy->tcpcheck_rules.n;
+ if (!r) {
+ Alert("parsing [%s:%d] : server %s has neither service port nor check port. Check has been disabled.\n",
+ file, linenum, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ if ((r->action != TCPCHK_ACT_CONNECT) || !r->port) {
+ Alert("parsing [%s:%d] : server %s has neither service port nor check port nor tcp_check rule 'connect' with port information. Check has been disabled.\n",
+ file, linenum, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ else {
+ /* scan the tcp-check ruleset to ensure a port has been configured */
+ l = &newsrv->proxy->tcpcheck_rules;
+ list_for_each_entry(n, l, list) {
+ r = (struct tcpcheck_rule *)n->list.p;
+ if ((r->action == TCPCHK_ACT_CONNECT) && (!r->port)) {
+ Alert("parsing [%s:%d] : server %s has neither service port nor check port, and a tcp_check rule 'connect' with no port information. Check has been disabled.\n",
+ file, linenum, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+ }
+ }
+ }
+
+ /* note: check type will be set during the config review phase */
+ ret = init_check(&newsrv->check, 0, file, linenum);
+ if (ret) {
+ err_code |= ret;
+ goto out;
+ }
+
+ newsrv->check.state |= CHK_ST_CONFIGURED | CHK_ST_ENABLED;
+ }
+
+ if (do_agent) {
+ int ret;
+
+ if (!newsrv->agent.port) {
+ Alert("parsing [%s:%d] : server %s does not have agent port. Agent check has been disabled.\n",
+ file, linenum, newsrv->id);
+ err_code |= ERR_ALERT | ERR_FATAL;
+ goto out;
+ }
+
+ if (!newsrv->agent.inter)
+ newsrv->agent.inter = newsrv->check.inter;
+
+ ret = init_check(&newsrv->agent, PR_O2_LB_AGENT_CHK, file, linenum);
+ if (ret) {
+ err_code |= ret;
+ goto out;
+ }
+
+ newsrv->agent.state |= CHK_ST_CONFIGURED | CHK_ST_ENABLED | CHK_ST_AGENT;
+ }
+
+ if (!defsrv) {
+ if (newsrv->state & SRV_BACKUP)
+ curproxy->srv_bck++;
+ else
+ curproxy->srv_act++;
+
+ newsrv->prev_state = newsrv->state;
+ }
+ }
+ return 0;
+
+ out:
+ free(errmsg);
+ return err_code;
+}
+
/*
* Local variables:
* c-indent-level: 8