blob: 9ddffa848f8809f46ef4542586a6fa9f1e440dde [file] [log] [blame]
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001/*
2 * Stream processing offload engine management.
3 *
4 * Copyright 2016 HAProxy Technologies, Christopher Faulet <cfaulet@haproxy.com>
5 *
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#include <ctype.h>
13#include <errno.h>
14
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020015#include <common/cfgparse.h>
16#include <common/compat.h>
17#include <common/config.h>
18#include <common/debug.h>
Willy Tarreau0108d902018-11-25 19:14:37 +010019#include <common/hathreads.h>
20#include <common/initcall.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020021#include <common/memory.h>
22#include <common/time.h>
23
24#include <types/arg.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020025#include <types/global.h>
Christopher Faulet1f40b912017-02-17 09:32:19 +010026#include <types/spoe.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020027
Christopher Faulet57583e42017-09-04 15:41:09 +020028#include <proto/acl.h>
Christopher Faulet76c09ef2017-09-21 11:03:52 +020029#include <proto/action.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020030#include <proto/arg.h>
31#include <proto/backend.h>
32#include <proto/filters.h>
Christopher Faulet48026722016-11-16 15:01:12 +010033#include <proto/freq_ctr.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020034#include <proto/frontend.h>
Willy Tarreau61c112a2018-10-02 16:43:32 +020035#include <proto/http_rules.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020036#include <proto/log.h>
37#include <proto/proto_http.h>
38#include <proto/proxy.h>
39#include <proto/sample.h>
40#include <proto/session.h>
41#include <proto/signal.h>
Christopher Faulet4ff3e572017-02-24 14:31:11 +010042#include <proto/spoe.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020043#include <proto/stream.h>
44#include <proto/stream_interface.h>
45#include <proto/task.h>
Christopher Faulet76c09ef2017-09-21 11:03:52 +020046#include <proto/tcp_rules.h>
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020047#include <proto/vars.h>
48
49#if defined(DEBUG_SPOE) || defined(DEBUG_FULL)
50#define SPOE_PRINTF(x...) fprintf(x)
Christopher Fauletb077cdc2018-01-24 16:37:57 +010051#define SPOE_DEBUG_STMT(statement) statement
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020052#else
53#define SPOE_PRINTF(x...)
Christopher Fauletb077cdc2018-01-24 16:37:57 +010054#define SPOE_DEBUG_STMT(statement)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020055#endif
56
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +010057/* Reserved 4 bytes to the frame size. So a frame and its size can be written
58 * together in a buffer */
59#define MAX_FRAME_SIZE global.tune.bufsize - 4
60
61/* The minimum size for a frame */
62#define MIN_FRAME_SIZE 256
63
Christopher Fauletf51f5fa2017-01-19 10:01:12 +010064/* Reserved for the metadata and the frame type.
65 * So <MAX_FRAME_SIZE> - <FRAME_HDR_SIZE> is the maximum payload size */
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +010066#define FRAME_HDR_SIZE 32
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020067
Christopher Fauletf51f5fa2017-01-19 10:01:12 +010068/* Helper to get SPOE ctx inside an appctx */
Christopher Faulet42bfa462017-01-04 14:14:19 +010069#define SPOE_APPCTX(appctx) ((struct spoe_appctx *)((appctx)->ctx.spoe.ptr))
70
Christopher Faulet3b386a32017-02-23 10:17:15 +010071/* SPOE filter id. Used to identify SPOE filters */
72const char *spoe_filter_id = "SPOE filter";
73
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020074/* Set if the handle on SIGUSR1 is registered */
75static int sighandler_registered = 0;
76
77/* proxy used during the parsing */
78struct proxy *curproxy = NULL;
79
80/* The name of the SPOE engine, used during the parsing */
81char *curengine = NULL;
82
83/* SPOE agent used during the parsing */
Christopher Faulet11610f32017-09-21 10:23:10 +020084/* SPOE agent/group/message used during the parsing */
85struct spoe_agent *curagent = NULL;
86struct spoe_group *curgrp = NULL;
87struct spoe_message *curmsg = NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020088
89/* list of SPOE messages and placeholders used during the parsing */
90struct list curmsgs;
Christopher Faulet11610f32017-09-21 10:23:10 +020091struct list curgrps;
92struct list curmphs;
93struct list curgphs;
Christopher Faulet336d3ef2017-12-22 10:00:55 +010094struct list curvars;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +020095
Christopher Faulet7250b8f2018-03-26 17:19:01 +020096/* list of log servers used during the parsing */
97struct list curlogsrvs;
98
Christopher Faulet0e0f0852018-03-26 17:20:36 +020099/* agent's proxy flags (PR_O_* and PR_O2_*) used during parsing */
100int curpxopts;
101int curpxopts2;
102
Christopher Faulet42bfa462017-01-04 14:14:19 +0100103/* Pools used to allocate SPOE structs */
Willy Tarreau8ceae722018-11-26 11:58:30 +0100104DECLARE_STATIC_POOL(pool_head_spoe_ctx, "spoe_ctx", sizeof(struct spoe_context));
105DECLARE_STATIC_POOL(pool_head_spoe_appctx, "spoe_appctx", sizeof(struct spoe_appctx));
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200106
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200107struct flt_ops spoe_ops;
108
Christopher Faulet8ef75252017-02-20 22:56:03 +0100109static int spoe_queue_context(struct spoe_context *ctx);
Willy Tarreauc9fa0482018-07-10 17:43:27 +0200110static int spoe_acquire_buffer(struct buffer *buf, struct buffer_wait *buffer_wait);
111static void spoe_release_buffer(struct buffer *buf, struct buffer_wait *buffer_wait);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200112
113/********************************************************************
114 * helper functions/globals
115 ********************************************************************/
116static void
Christopher Faulet11610f32017-09-21 10:23:10 +0200117spoe_release_placeholder(struct spoe_placeholder *ph)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200118{
Christopher Faulet11610f32017-09-21 10:23:10 +0200119 if (!ph)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200120 return;
Christopher Faulet11610f32017-09-21 10:23:10 +0200121 free(ph->id);
122 free(ph);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200123}
124
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200125static void
Christopher Faulet8ef75252017-02-20 22:56:03 +0100126spoe_release_message(struct spoe_message *msg)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200127{
Christopher Faulet57583e42017-09-04 15:41:09 +0200128 struct spoe_arg *arg, *argback;
129 struct acl *acl, *aclback;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200130
131 if (!msg)
132 return;
133 free(msg->id);
134 free(msg->conf.file);
Christopher Faulet57583e42017-09-04 15:41:09 +0200135 list_for_each_entry_safe(arg, argback, &msg->args, list) {
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200136 release_sample_expr(arg->expr);
137 free(arg->name);
138 LIST_DEL(&arg->list);
139 free(arg);
140 }
Christopher Faulet57583e42017-09-04 15:41:09 +0200141 list_for_each_entry_safe(acl, aclback, &msg->acls, list) {
142 LIST_DEL(&acl->list);
143 prune_acl(acl);
144 free(acl);
145 }
146 if (msg->cond) {
147 prune_acl_cond(msg->cond);
148 free(msg->cond);
149 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200150 free(msg);
151}
152
153static void
Christopher Faulet11610f32017-09-21 10:23:10 +0200154spoe_release_group(struct spoe_group *grp)
155{
156 if (!grp)
157 return;
158 free(grp->id);
159 free(grp->conf.file);
160 free(grp);
161}
162
163static void
Christopher Faulet8ef75252017-02-20 22:56:03 +0100164spoe_release_agent(struct spoe_agent *agent)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200165{
Christopher Faulet11610f32017-09-21 10:23:10 +0200166 struct spoe_message *msg, *msgback;
167 struct spoe_group *grp, *grpback;
Christopher Faulet24289f22017-09-25 14:48:02 +0200168 int i;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200169
170 if (!agent)
171 return;
172 free(agent->id);
173 free(agent->conf.file);
174 free(agent->var_pfx);
Christopher Faulet985532d2016-11-16 15:36:19 +0100175 free(agent->var_on_error);
Christopher Faulet36bda1c2018-03-22 09:08:20 +0100176 free(agent->var_t_process);
177 free(agent->var_t_total);
Christopher Faulet11610f32017-09-21 10:23:10 +0200178 list_for_each_entry_safe(msg, msgback, &agent->messages, list) {
179 LIST_DEL(&msg->list);
180 spoe_release_message(msg);
181 }
182 list_for_each_entry_safe(grp, grpback, &agent->groups, list) {
183 LIST_DEL(&grp->list);
184 spoe_release_group(grp);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200185 }
Willy Tarreau3ddcf762019-02-07 14:22:52 +0100186 if (agent->rt) {
Christopher Faulet46c76822019-09-17 11:55:52 +0200187 for (i = 0; i < global.nbthread; ++i) {
188 free(agent->rt[i].engine_id);
Willy Tarreau3ddcf762019-02-07 14:22:52 +0100189 HA_SPIN_DESTROY(&agent->rt[i].lock);
Christopher Faulet46c76822019-09-17 11:55:52 +0200190 }
Willy Tarreau3ddcf762019-02-07 14:22:52 +0100191 }
Christopher Faulet24289f22017-09-25 14:48:02 +0200192 free(agent->rt);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200193 free(agent);
194}
195
196static const char *spoe_frm_err_reasons[SPOE_FRM_ERRS] = {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100197 [SPOE_FRM_ERR_NONE] = "normal",
198 [SPOE_FRM_ERR_IO] = "I/O error",
199 [SPOE_FRM_ERR_TOUT] = "a timeout occurred",
200 [SPOE_FRM_ERR_TOO_BIG] = "frame is too big",
201 [SPOE_FRM_ERR_INVALID] = "invalid frame received",
202 [SPOE_FRM_ERR_NO_VSN] = "version value not found",
203 [SPOE_FRM_ERR_NO_FRAME_SIZE] = "max-frame-size value not found",
204 [SPOE_FRM_ERR_NO_CAP] = "capabilities value not found",
205 [SPOE_FRM_ERR_BAD_VSN] = "unsupported version",
206 [SPOE_FRM_ERR_BAD_FRAME_SIZE] = "max-frame-size too big or too small",
207 [SPOE_FRM_ERR_FRAG_NOT_SUPPORTED] = "fragmentation not supported",
208 [SPOE_FRM_ERR_INTERLACED_FRAMES] = "invalid interlaced frames",
Christopher Faulet8eda93f2017-02-09 09:44:33 +0100209 [SPOE_FRM_ERR_FRAMEID_NOTFOUND] = "frame-id not found",
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100210 [SPOE_FRM_ERR_RES] = "resource allocation error",
211 [SPOE_FRM_ERR_UNKNOWN] = "an unknown error occurred",
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200212};
213
214static const char *spoe_event_str[SPOE_EV_EVENTS] = {
215 [SPOE_EV_ON_CLIENT_SESS] = "on-client-session",
216 [SPOE_EV_ON_TCP_REQ_FE] = "on-frontend-tcp-request",
217 [SPOE_EV_ON_TCP_REQ_BE] = "on-backend-tcp-request",
218 [SPOE_EV_ON_HTTP_REQ_FE] = "on-frontend-http-request",
219 [SPOE_EV_ON_HTTP_REQ_BE] = "on-backend-http-request",
220
221 [SPOE_EV_ON_SERVER_SESS] = "on-server-session",
222 [SPOE_EV_ON_TCP_RSP] = "on-tcp-response",
223 [SPOE_EV_ON_HTTP_RSP] = "on-http-response",
224};
225
226
227#if defined(DEBUG_SPOE) || defined(DEBUG_FULL)
228
229static const char *spoe_ctx_state_str[SPOE_CTX_ST_ERROR+1] = {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100230 [SPOE_CTX_ST_NONE] = "NONE",
231 [SPOE_CTX_ST_READY] = "READY",
232 [SPOE_CTX_ST_ENCODING_MSGS] = "ENCODING_MSGS",
233 [SPOE_CTX_ST_SENDING_MSGS] = "SENDING_MSGS",
234 [SPOE_CTX_ST_WAITING_ACK] = "WAITING_ACK",
235 [SPOE_CTX_ST_DONE] = "DONE",
236 [SPOE_CTX_ST_ERROR] = "ERROR",
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200237};
238
239static const char *spoe_appctx_state_str[SPOE_APPCTX_ST_END+1] = {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100240 [SPOE_APPCTX_ST_CONNECT] = "CONNECT",
241 [SPOE_APPCTX_ST_CONNECTING] = "CONNECTING",
242 [SPOE_APPCTX_ST_IDLE] = "IDLE",
243 [SPOE_APPCTX_ST_PROCESSING] = "PROCESSING",
244 [SPOE_APPCTX_ST_SENDING_FRAG_NOTIFY] = "SENDING_FRAG_NOTIFY",
245 [SPOE_APPCTX_ST_WAITING_SYNC_ACK] = "WAITING_SYNC_ACK",
246 [SPOE_APPCTX_ST_DISCONNECT] = "DISCONNECT",
247 [SPOE_APPCTX_ST_DISCONNECTING] = "DISCONNECTING",
248 [SPOE_APPCTX_ST_EXIT] = "EXIT",
249 [SPOE_APPCTX_ST_END] = "END",
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200250};
251
252#endif
Christopher Fauleta1cda022016-12-21 08:58:06 +0100253
Christopher Faulet8ef75252017-02-20 22:56:03 +0100254/* Used to generates a unique id for an engine. On success, it returns a
255 * allocated string. So it is the caller's reponsibility to release it. If the
256 * allocation failed, it returns NULL. */
Christopher Fauleta1cda022016-12-21 08:58:06 +0100257static char *
258generate_pseudo_uuid()
259{
Christopher Fauleta1cda022016-12-21 08:58:06 +0100260 char *uuid;
Christopher Fauleteaf11912019-09-17 15:07:02 +0200261 uint32_t rnd[4] = { 0, 0, 0, 0 };
262 uint64_t last = 0;
263 int byte = 0;
264 uint8_t bits = 0;
265 unsigned int rand_max_bits = my_flsl(RAND_MAX);
Christopher Fauleta1cda022016-12-21 08:58:06 +0100266
Christopher Fauleteaf11912019-09-17 15:07:02 +0200267 if ((uuid = calloc(1, 37)) == NULL)
Christopher Fauleta1cda022016-12-21 08:58:06 +0100268 return NULL;
269
Christopher Fauleteaf11912019-09-17 15:07:02 +0200270 while (byte < 4) {
271 while (bits < 32) {
Willy Tarreau861c4ef2020-03-08 00:42:37 +0100272 last |= (uint64_t)ha_random() << bits;
Christopher Fauleteaf11912019-09-17 15:07:02 +0200273 bits += rand_max_bits;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100274 }
Christopher Fauleteaf11912019-09-17 15:07:02 +0200275 rnd[byte++] = last;
276 last >>= 32u;
277 bits -= 32;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100278 }
Willy Tarreau079ec122019-10-29 10:25:49 +0100279 snprintf(uuid, 37, "%8.8x-%4.4x-%4.4x-%4.4x-%12.12llx",
Christopher Fauleteaf11912019-09-17 15:07:02 +0200280 rnd[0],
281 rnd[1] & 0xFFFF,
282 ((rnd[1] >> 16u) & 0xFFF) | 0x4000, // highest 4 bits indicate the uuid version
283 (rnd[2] & 0x3FFF) | 0x8000, // the highest 2 bits indicate the UUID variant (10),
284 (long long)((rnd[2] >> 14u) | ((uint64_t) rnd[3] << 18u)) & 0xFFFFFFFFFFFFull
285 );
Christopher Fauleta1cda022016-12-21 08:58:06 +0100286 return uuid;
287}
288
Christopher Fauletb2dd1e02018-03-22 09:07:41 +0100289
290static inline void
291spoe_update_stat_time(struct timeval *tv, long *t)
292{
293 if (*t == -1)
294 *t = tv_ms_elapsed(tv, &now);
295 else
296 *t += tv_ms_elapsed(tv, &now);
297 tv_zero(tv);
298}
299
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200300/********************************************************************
301 * Functions that encode/decode SPOE frames
302 ********************************************************************/
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200303/* Helper to get static string length, excluding the terminating null byte */
304#define SLEN(str) (sizeof(str)-1)
305
306/* Predefined key used in HELLO/DISCONNECT frames */
307#define SUPPORTED_VERSIONS_KEY "supported-versions"
308#define VERSION_KEY "version"
309#define MAX_FRAME_SIZE_KEY "max-frame-size"
310#define CAPABILITIES_KEY "capabilities"
Christopher Fauleta1cda022016-12-21 08:58:06 +0100311#define ENGINE_ID_KEY "engine-id"
Christopher Fauletba7bc162016-11-07 21:07:38 +0100312#define HEALTHCHECK_KEY "healthcheck"
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200313#define STATUS_CODE_KEY "status-code"
314#define MSG_KEY "message"
315
316struct spoe_version {
317 char *str;
318 int min;
319 int max;
320};
321
322/* All supported versions */
323static struct spoe_version supported_versions[] = {
Christopher Faulet63816502018-05-31 14:56:42 +0200324 /* 1.0 is now unsupported because of a bug about frame's flags*/
325 {"2.0", 2000, 2000},
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200326 {NULL, 0, 0}
327};
328
329/* Comma-separated list of supported versions */
Christopher Faulet63816502018-05-31 14:56:42 +0200330#define SUPPORTED_VERSIONS_VAL "2.0"
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200331
Christopher Faulet8ef75252017-02-20 22:56:03 +0100332/* Convert a string to a SPOE version value. The string must follow the format
333 * "MAJOR.MINOR". It will be concerted into the integer (1000 * MAJOR + MINOR).
334 * If an error occurred, -1 is returned. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200335static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100336spoe_str_to_vsn(const char *str, size_t len)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200337{
Christopher Faulet8ef75252017-02-20 22:56:03 +0100338 const char *p, *end;
339 int maj, min, vsn;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200340
Christopher Faulet8ef75252017-02-20 22:56:03 +0100341 p = str;
342 end = str+len;
343 maj = min = 0;
344 vsn = -1;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200345
Christopher Faulet8ef75252017-02-20 22:56:03 +0100346 /* skip leading spaces */
347 while (p < end && isspace(*p))
348 p++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200349
Christopher Faulet8ef75252017-02-20 22:56:03 +0100350 /* parse Major number, until the '.' */
351 while (*p != '.') {
352 if (p >= end || *p < '0' || *p > '9')
353 goto out;
354 maj *= 10;
355 maj += (*p - '0');
356 p++;
357 }
358
359 /* check Major version */
360 if (!maj)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200361 goto out;
362
Christopher Faulet8ef75252017-02-20 22:56:03 +0100363 p++; /* skip the '.' */
364 if (p >= end || *p < '0' || *p > '9') /* Minor number is missing */
365 goto out;
366
367 /* Parse Minor number */
368 while (p < end) {
369 if (*p < '0' || *p > '9')
370 break;
371 min *= 10;
372 min += (*p - '0');
373 p++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200374 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100375
376 /* check Minor number */
377 if (min > 999)
378 goto out;
379
380 /* skip trailing spaces */
381 while (p < end && isspace(*p))
382 p++;
383 if (p != end)
384 goto out;
385
386 vsn = maj * 1000 + min;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200387 out:
388 return vsn;
389}
390
Christopher Faulet8ef75252017-02-20 22:56:03 +0100391/* Encode the HELLO frame sent by HAProxy to an agent. It returns the number of
Joseph Herlantf7f60312018-11-15 13:46:49 -0800392 * encoded bytes in the frame on success, 0 if an encoding error occurred and -1
Christopher Faulet8ef75252017-02-20 22:56:03 +0100393 * if a fatal error occurred. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200394static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100395spoe_prepare_hahello_frame(struct appctx *appctx, char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200396{
Willy Tarreau83061a82018-07-13 11:56:34 +0200397 struct buffer *chk;
Christopher Faulet42bfa462017-01-04 14:14:19 +0100398 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100399 char *p, *end;
400 unsigned int flags = SPOE_FRM_FL_FIN;
401 size_t sz;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200402
Christopher Faulet8ef75252017-02-20 22:56:03 +0100403 p = frame;
404 end = frame+size;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200405
Christopher Faulet8ef75252017-02-20 22:56:03 +0100406 /* Set Frame type */
407 *p++ = SPOE_FRM_T_HAPROXY_HELLO;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200408
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100409 /* Set flags */
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200410 flags = htonl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100411 memcpy(p, (char *)&flags, 4);
412 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200413
414 /* No stream-id and frame-id for HELLO frames */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100415 *p++ = 0; *p++ = 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200416
417 /* There are 3 mandatory items: "supported-versions", "max-frame-size"
418 * and "capabilities" */
419
420 /* "supported-versions" K/V item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100421 sz = SLEN(SUPPORTED_VERSIONS_KEY);
422 if (spoe_encode_buffer(SUPPORTED_VERSIONS_KEY, sz, &p, end) == -1)
423 goto too_big;
424
425 *p++ = SPOE_DATA_T_STR;
426 sz = SLEN(SUPPORTED_VERSIONS_VAL);
427 if (spoe_encode_buffer(SUPPORTED_VERSIONS_VAL, sz, &p, end) == -1)
428 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200429
430 /* "max-fram-size" K/V item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100431 sz = SLEN(MAX_FRAME_SIZE_KEY);
432 if (spoe_encode_buffer(MAX_FRAME_SIZE_KEY, sz, &p, end) == -1)
433 goto too_big;
434
435 *p++ = SPOE_DATA_T_UINT32;
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200436 if (encode_varint(SPOE_APPCTX(appctx)->max_frame_size, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100437 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200438
439 /* "capabilities" K/V item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100440 sz = SLEN(CAPABILITIES_KEY);
441 if (spoe_encode_buffer(CAPABILITIES_KEY, sz, &p, end) == -1)
442 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200443
Christopher Faulet8ef75252017-02-20 22:56:03 +0100444 *p++ = SPOE_DATA_T_STR;
Christopher Faulet305c6072017-02-23 16:17:53 +0100445 chk = get_trash_chunk();
446 if (agent != NULL && (agent->flags & SPOE_FL_PIPELINING)) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +0200447 memcpy(chk->area, "pipelining", 10);
448 chk->data += 10;
Christopher Faulet305c6072017-02-23 16:17:53 +0100449 }
450 if (agent != NULL && (agent->flags & SPOE_FL_ASYNC)) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +0200451 if (chk->data) chk->area[chk->data++] = ',';
452 memcpy(chk->area+chk->data, "async", 5);
453 chk->data += 5;
Christopher Faulet305c6072017-02-23 16:17:53 +0100454 }
Christopher Fauletcecd8522017-02-24 22:11:21 +0100455 if (agent != NULL && (agent->flags & SPOE_FL_RCV_FRAGMENTATION)) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +0200456 if (chk->data) chk->area[chk->data++] = ',';
457 memcpy(chk->area+chk->data, "fragmentation", 13);
Miroslav Zagorac6b3690b2019-01-13 16:55:01 +0100458 chk->data += 13;
Christopher Fauletcecd8522017-02-24 22:11:21 +0100459 }
Willy Tarreau843b7cb2018-07-13 10:54:26 +0200460 if (spoe_encode_buffer(chk->area, chk->data, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100461 goto too_big;
462
463 /* (optionnal) "engine-id" K/V item, if present */
Christopher Faulet46c76822019-09-17 11:55:52 +0200464 if (agent != NULL && agent->rt[tid].engine_id != NULL) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100465 sz = SLEN(ENGINE_ID_KEY);
466 if (spoe_encode_buffer(ENGINE_ID_KEY, sz, &p, end) == -1)
467 goto too_big;
468
469 *p++ = SPOE_DATA_T_STR;
Christopher Faulet46c76822019-09-17 11:55:52 +0200470 sz = strlen(agent->rt[tid].engine_id);
471 if (spoe_encode_buffer(agent->rt[tid].engine_id, sz, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100472 goto too_big;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100473 }
474
Christopher Faulet8ef75252017-02-20 22:56:03 +0100475 return (p - frame);
476
477 too_big:
478 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOO_BIG;
479 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200480}
481
Christopher Faulet8ef75252017-02-20 22:56:03 +0100482/* Encode DISCONNECT frame sent by HAProxy to an agent. It returns the number of
483 * encoded bytes in the frame on success, 0 if an encoding error occurred and -1
484 * if a fatal error occurred. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200485static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100486spoe_prepare_hadiscon_frame(struct appctx *appctx, char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200487{
Christopher Faulet8ef75252017-02-20 22:56:03 +0100488 const char *reason;
489 char *p, *end;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100490 unsigned int flags = SPOE_FRM_FL_FIN;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100491 size_t sz;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200492
Christopher Faulet8ef75252017-02-20 22:56:03 +0100493 p = frame;
494 end = frame+size;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200495
Christopher Faulet8ef75252017-02-20 22:56:03 +0100496 /* Set Frame type */
497 *p++ = SPOE_FRM_T_HAPROXY_DISCON;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200498
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100499 /* Set flags */
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200500 flags = htonl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100501 memcpy(p, (char *)&flags, 4);
502 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200503
504 /* No stream-id and frame-id for DISCONNECT frames */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100505 *p++ = 0; *p++ = 0;
506
507 if (SPOE_APPCTX(appctx)->status_code >= SPOE_FRM_ERRS)
508 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_UNKNOWN;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200509
510 /* There are 2 mandatory items: "status-code" and "message" */
511
512 /* "status-code" K/V item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100513 sz = SLEN(STATUS_CODE_KEY);
514 if (spoe_encode_buffer(STATUS_CODE_KEY, sz, &p, end) == -1)
515 goto too_big;
516
517 *p++ = SPOE_DATA_T_UINT32;
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200518 if (encode_varint(SPOE_APPCTX(appctx)->status_code, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100519 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200520
521 /* "message" K/V item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100522 sz = SLEN(MSG_KEY);
523 if (spoe_encode_buffer(MSG_KEY, sz, &p, end) == -1)
524 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200525
Christopher Faulet8ef75252017-02-20 22:56:03 +0100526 /*Get the message corresponding to the status code */
527 reason = spoe_frm_err_reasons[SPOE_APPCTX(appctx)->status_code];
528
529 *p++ = SPOE_DATA_T_STR;
530 sz = strlen(reason);
531 if (spoe_encode_buffer(reason, sz, &p, end) == -1)
532 goto too_big;
533
534 return (p - frame);
535
536 too_big:
537 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOO_BIG;
538 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200539}
540
Christopher Faulet8ef75252017-02-20 22:56:03 +0100541/* Encode the NOTIFY frame sent by HAProxy to an agent. It returns the number of
542 * encoded bytes in the frame on success, 0 if an encoding error occurred and -1
543 * if a fatal error occurred. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200544static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100545spoe_prepare_hanotify_frame(struct appctx *appctx, struct spoe_context *ctx,
Christopher Fauleta1cda022016-12-21 08:58:06 +0100546 char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200547{
Christopher Faulet8ef75252017-02-20 22:56:03 +0100548 char *p, *end;
549 unsigned int stream_id, frame_id;
550 unsigned int flags = SPOE_FRM_FL_FIN;
551 size_t sz;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200552
Christopher Faulet8ef75252017-02-20 22:56:03 +0100553 p = frame;
554 end = frame+size;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200555
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100556 stream_id = ctx->stream_id;
557 frame_id = ctx->frame_id;
558
559 if (ctx->flags & SPOE_CTX_FL_FRAGMENTED) {
560 /* The fragmentation is not supported by the applet */
561 if (!(SPOE_APPCTX(appctx)->flags & SPOE_APPCTX_FL_FRAGMENTATION)) {
562 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_FRAG_NOT_SUPPORTED;
563 return -1;
564 }
565 flags = ctx->frag_ctx.flags;
566 }
567
568 /* Set Frame type */
569 *p++ = SPOE_FRM_T_HAPROXY_NOTIFY;
570
571 /* Set flags */
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200572 flags = htonl(flags);
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100573 memcpy(p, (char *)&flags, 4);
574 p += 4;
575
576 /* Set stream-id and frame-id */
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200577 if (encode_varint(stream_id, &p, end) == -1)
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100578 goto too_big;
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200579 if (encode_varint(frame_id, &p, end) == -1)
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100580 goto too_big;
581
582 /* Copy encoded messages, if possible */
Willy Tarreauc9fa0482018-07-10 17:43:27 +0200583 sz = b_data(&ctx->buffer);
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100584 if (p + sz >= end)
585 goto too_big;
Willy Tarreauc9fa0482018-07-10 17:43:27 +0200586 memcpy(p, b_head(&ctx->buffer), sz);
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100587 p += sz;
588
589 return (p - frame);
590
591 too_big:
592 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOO_BIG;
593 return 0;
594}
595
596/* Encode next part of a fragmented frame sent by HAProxy to an agent. It
597 * returns the number of encoded bytes in the frame on success, 0 if an encoding
598 * error occurred and -1 if a fatal error occurred. */
599static int
600spoe_prepare_hafrag_frame(struct appctx *appctx, struct spoe_context *ctx,
601 char *frame, size_t size)
602{
603 char *p, *end;
604 unsigned int stream_id, frame_id;
605 unsigned int flags;
606 size_t sz;
607
608 p = frame;
609 end = frame+size;
610
Christopher Faulet8ef75252017-02-20 22:56:03 +0100611 /* <ctx> is null when the stream has aborted the processing of a
612 * fragmented frame. In this case, we must notify the corresponding
613 * agent using ids stored in <frag_ctx>. */
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100614 if (ctx == NULL) {
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100615 flags = (SPOE_FRM_FL_FIN|SPOE_FRM_FL_ABRT);
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100616 stream_id = SPOE_APPCTX(appctx)->frag_ctx.cursid;
617 frame_id = SPOE_APPCTX(appctx)->frag_ctx.curfid;
618 }
619 else {
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100620 flags = ctx->frag_ctx.flags;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100621 stream_id = ctx->stream_id;
622 frame_id = ctx->frame_id;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100623 }
624
Christopher Faulet8ef75252017-02-20 22:56:03 +0100625 /* Set Frame type */
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100626 *p++ = SPOE_FRM_T_UNSET;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100627
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100628 /* Set flags */
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200629 flags = htonl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100630 memcpy(p, (char *)&flags, 4);
631 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200632
633 /* Set stream-id and frame-id */
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200634 if (encode_varint(stream_id, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100635 goto too_big;
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200636 if (encode_varint(frame_id, &p, end) == -1)
Christopher Faulet8ef75252017-02-20 22:56:03 +0100637 goto too_big;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200638
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100639 if (ctx == NULL)
640 goto end;
641
Christopher Faulet8ef75252017-02-20 22:56:03 +0100642 /* Copy encoded messages, if possible */
Willy Tarreauc9fa0482018-07-10 17:43:27 +0200643 sz = b_data(&ctx->buffer);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100644 if (p + sz >= end)
645 goto too_big;
Willy Tarreauc9fa0482018-07-10 17:43:27 +0200646 memcpy(p, b_head(&ctx->buffer), sz);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100647 p += sz;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100648
Christopher Fauletf032c3e2017-02-17 15:18:35 +0100649 end:
Christopher Faulet8ef75252017-02-20 22:56:03 +0100650 return (p - frame);
651
652 too_big:
653 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOO_BIG;
654 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200655}
656
Christopher Faulet8ef75252017-02-20 22:56:03 +0100657/* Decode and process the HELLO frame sent by an agent. It returns the number of
658 * read bytes on success, 0 if a decoding error occurred, and -1 if a fatal
659 * error occurred. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200660static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100661spoe_handle_agenthello_frame(struct appctx *appctx, char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200662{
Christopher Faulet305c6072017-02-23 16:17:53 +0100663 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
664 char *p, *end;
665 int vsn, max_frame_size;
666 unsigned int flags;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100667
668 p = frame;
669 end = frame + size;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200670
671 /* Check frame type */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100672 if (*p++ != SPOE_FRM_T_AGENT_HELLO) {
673 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200674 return 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100675 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200676
Christopher Faulet8ef75252017-02-20 22:56:03 +0100677 if (size < 7 /* TYPE + METADATA */) {
678 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
679 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200680 }
681
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100682 /* Retrieve flags */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100683 memcpy((char *)&flags, p, 4);
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200684 flags = ntohl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100685 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200686
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100687 /* Fragmentation is not supported for HELLO frame */
688 if (!(flags & SPOE_FRM_FL_FIN)) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100689 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_FRAG_NOT_SUPPORTED;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100690 return -1;
691 }
692
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200693 /* stream-id and frame-id must be cleared */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100694 if (*p != 0 || *(p+1) != 0) {
695 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
696 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200697 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100698 p += 2;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200699
700 /* There are 3 mandatory items: "version", "max-frame-size" and
701 * "capabilities" */
702
703 /* Loop on K/V items */
Christopher Fauleta1cda022016-12-21 08:58:06 +0100704 vsn = max_frame_size = flags = 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100705 while (p < end) {
706 char *str;
Frédéric Lécaille6ca71a92017-08-22 10:33:14 +0200707 uint64_t sz;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100708 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200709
710 /* Decode the item key */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100711 ret = spoe_decode_buffer(&p, end, &str, &sz);
712 if (ret == -1 || !sz) {
713 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
714 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200715 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100716
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200717 /* Check "version" K/V item */
Willy Tarreau249346d2020-06-16 17:58:14 +0200718 if (sz >= strlen(VERSION_KEY) && !memcmp(str, VERSION_KEY, strlen(VERSION_KEY))) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100719 int i, type = *p++;
720
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200721 /* The value must be a string */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100722 if ((type & SPOE_DATA_T_MASK) != SPOE_DATA_T_STR) {
723 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
724 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200725 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100726 if (spoe_decode_buffer(&p, end, &str, &sz) == -1) {
727 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
728 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200729 }
730
Christopher Faulet8ef75252017-02-20 22:56:03 +0100731 vsn = spoe_str_to_vsn(str, sz);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200732 if (vsn == -1) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100733 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_BAD_VSN;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200734 return -1;
735 }
736 for (i = 0; supported_versions[i].str != NULL; ++i) {
737 if (vsn >= supported_versions[i].min &&
738 vsn <= supported_versions[i].max)
739 break;
740 }
741 if (supported_versions[i].str == NULL) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100742 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_BAD_VSN;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200743 return -1;
744 }
745 }
746 /* Check "max-frame-size" K/V item */
Willy Tarreau249346d2020-06-16 17:58:14 +0200747 else if (sz >= strlen(MAX_FRAME_SIZE_KEY) && !memcmp(str, MAX_FRAME_SIZE_KEY, strlen(MAX_FRAME_SIZE_KEY))) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100748 int type = *p++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200749
750 /* The value must be integer */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200751 if ((type & SPOE_DATA_T_MASK) != SPOE_DATA_T_INT32 &&
752 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_INT64 &&
753 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_UINT32 &&
754 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_UINT64) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100755 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
756 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200757 }
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200758 if (decode_varint(&p, end, &sz) == -1) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100759 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
760 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200761 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100762 if (sz < MIN_FRAME_SIZE ||
763 sz > SPOE_APPCTX(appctx)->max_frame_size) {
764 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_BAD_FRAME_SIZE;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200765 return -1;
766 }
767 max_frame_size = sz;
768 }
Christopher Fauleta1cda022016-12-21 08:58:06 +0100769 /* Check "capabilities" K/V item */
Willy Tarreau249346d2020-06-16 17:58:14 +0200770 else if (sz >= strlen(CAPABILITIES_KEY) && !memcmp(str, CAPABILITIES_KEY, strlen(CAPABILITIES_KEY))) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100771 int type = *p++;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100772
773 /* The value must be a string */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100774 if ((type & SPOE_DATA_T_MASK) != SPOE_DATA_T_STR) {
775 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
776 return 0;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100777 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100778 if (spoe_decode_buffer(&p, end, &str, &sz) == -1) {
779 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
780 return 0;
781 }
Christopher Fauleta1cda022016-12-21 08:58:06 +0100782
Christopher Faulet8ef75252017-02-20 22:56:03 +0100783 while (sz) {
Christopher Fauleta1cda022016-12-21 08:58:06 +0100784 char *delim;
785
786 /* Skip leading spaces */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100787 for (; isspace(*str) && sz; str++, sz--);
Christopher Fauleta1cda022016-12-21 08:58:06 +0100788
Christopher Faulet8ef75252017-02-20 22:56:03 +0100789 if (sz >= 10 && !strncmp(str, "pipelining", 10)) {
790 str += 10; sz -= 10;
791 if (!sz || isspace(*str) || *str == ',')
Christopher Fauleta1cda022016-12-21 08:58:06 +0100792 flags |= SPOE_APPCTX_FL_PIPELINING;
793 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100794 else if (sz >= 5 && !strncmp(str, "async", 5)) {
795 str += 5; sz -= 5;
796 if (!sz || isspace(*str) || *str == ',')
Christopher Fauleta1cda022016-12-21 08:58:06 +0100797 flags |= SPOE_APPCTX_FL_ASYNC;
798 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100799 else if (sz >= 13 && !strncmp(str, "fragmentation", 13)) {
800 str += 13; sz -= 13;
801 if (!sz || isspace(*str) || *str == ',')
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100802 flags |= SPOE_APPCTX_FL_FRAGMENTATION;
803 }
Christopher Fauleta1cda022016-12-21 08:58:06 +0100804
Christopher Faulet8ef75252017-02-20 22:56:03 +0100805 /* Get the next comma or break */
806 if (!sz || (delim = memchr(str, ',', sz)) == NULL)
Christopher Fauleta1cda022016-12-21 08:58:06 +0100807 break;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100808 delim++;
809 sz -= (delim - str);
810 str = delim;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100811 }
812 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200813 else {
814 /* Silently ignore unknown item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100815 if (spoe_skip_data(&p, end) == -1) {
816 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
817 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200818 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200819 }
820 }
821
822 /* Final checks */
823 if (!vsn) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100824 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_NO_VSN;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200825 return -1;
826 }
827 if (!max_frame_size) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100828 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_NO_FRAME_SIZE;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200829 return -1;
830 }
Christopher Faulet11389012019-02-07 16:13:26 +0100831 if (!agent)
832 flags &= ~(SPOE_APPCTX_FL_PIPELINING|SPOE_APPCTX_FL_ASYNC);
833 else {
834 if ((flags & SPOE_APPCTX_FL_PIPELINING) && !(agent->flags & SPOE_FL_PIPELINING))
835 flags &= ~SPOE_APPCTX_FL_PIPELINING;
836 if ((flags & SPOE_APPCTX_FL_ASYNC) && !(agent->flags & SPOE_FL_ASYNC))
837 flags &= ~SPOE_APPCTX_FL_ASYNC;
838 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200839
Christopher Faulet42bfa462017-01-04 14:14:19 +0100840 SPOE_APPCTX(appctx)->version = (unsigned int)vsn;
841 SPOE_APPCTX(appctx)->max_frame_size = (unsigned int)max_frame_size;
842 SPOE_APPCTX(appctx)->flags |= flags;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100843
844 return (p - frame);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200845}
846
847/* Decode DISCONNECT frame sent by an agent. It returns the number of by read
848 * bytes on success, 0 if the frame can be ignored and -1 if an error
849 * occurred. */
850static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100851spoe_handle_agentdiscon_frame(struct appctx *appctx, char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200852{
Christopher Faulet8ef75252017-02-20 22:56:03 +0100853 char *p, *end;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100854 unsigned int flags;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100855
856 p = frame;
857 end = frame + size;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200858
859 /* Check frame type */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100860 if (*p++ != SPOE_FRM_T_AGENT_DISCON) {
861 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200862 return 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100863 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200864
Christopher Faulet8ef75252017-02-20 22:56:03 +0100865 if (size < 7 /* TYPE + METADATA */) {
866 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
867 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200868 }
869
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100870 /* Retrieve flags */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100871 memcpy((char *)&flags, p, 4);
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200872 flags = ntohl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100873 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200874
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100875 /* Fragmentation is not supported for DISCONNECT frame */
876 if (!(flags & SPOE_FRM_FL_FIN)) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100877 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_FRAG_NOT_SUPPORTED;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100878 return -1;
879 }
880
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200881 /* stream-id and frame-id must be cleared */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100882 if (*p != 0 || *(p+1) != 0) {
883 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
884 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200885 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100886 p += 2;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200887
888 /* There are 2 mandatory items: "status-code" and "message" */
889
890 /* Loop on K/V items */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100891 while (p < end) {
892 char *str;
Frédéric Lécaille6ca71a92017-08-22 10:33:14 +0200893 uint64_t sz;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100894 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200895
896 /* Decode the item key */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100897 ret = spoe_decode_buffer(&p, end, &str, &sz);
898 if (ret == -1 || !sz) {
899 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
900 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200901 }
902
903 /* Check "status-code" K/V item */
Willy Tarreau249346d2020-06-16 17:58:14 +0200904 if (sz >= strlen(STATUS_CODE_KEY) && !memcmp(str, STATUS_CODE_KEY, strlen(STATUS_CODE_KEY))) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100905 int type = *p++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200906
907 /* The value must be an integer */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200908 if ((type & SPOE_DATA_T_MASK) != SPOE_DATA_T_INT32 &&
909 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_INT64 &&
910 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_UINT32 &&
911 (type & SPOE_DATA_T_MASK) != SPOE_DATA_T_UINT64) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100912 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
913 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200914 }
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200915 if (decode_varint(&p, end, &sz) == -1) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100916 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
917 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200918 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100919 SPOE_APPCTX(appctx)->status_code = sz;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200920 }
921
922 /* Check "message" K/V item */
Willy Tarreau249346d2020-06-16 17:58:14 +0200923 else if (sz >= strlen(MSG_KEY) && !memcmp(str, MSG_KEY, strlen(MSG_KEY))) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100924 int type = *p++;
925
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200926 /* The value must be a string */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100927 if ((type & SPOE_DATA_T_MASK) != SPOE_DATA_T_STR) {
928 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
929 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200930 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100931 ret = spoe_decode_buffer(&p, end, &str, &sz);
932 if (ret == -1 || sz > 255) {
933 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
934 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200935 }
Christopher Faulet8ef75252017-02-20 22:56:03 +0100936#if defined(DEBUG_SPOE) || defined(DEBUG_FULL)
937 SPOE_APPCTX(appctx)->reason = str;
938 SPOE_APPCTX(appctx)->rlen = sz;
939#endif
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200940 }
941 else {
942 /* Silently ignore unknown item */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100943 if (spoe_skip_data(&p, end) == -1) {
944 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
945 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200946 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200947 }
948 }
949
Christopher Faulet8ef75252017-02-20 22:56:03 +0100950 return (p - frame);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200951}
952
953
Christopher Fauleta1cda022016-12-21 08:58:06 +0100954/* Decode ACK frame sent by an agent. It returns the number of read bytes on
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200955 * success, 0 if the frame can be ignored and -1 if an error occurred. */
956static int
Christopher Faulet8ef75252017-02-20 22:56:03 +0100957spoe_handle_agentack_frame(struct appctx *appctx, struct spoe_context **ctx,
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100958 char *frame, size_t size)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200959{
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100960 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100961 char *p, *end;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100962 uint64_t stream_id, frame_id;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100963 int len;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100964 unsigned int flags;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100965
966 p = frame;
967 end = frame + size;
968 *ctx = NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200969
970 /* Check frame type */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100971 if (*p++ != SPOE_FRM_T_AGENT_ACK) {
972 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200973 return 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100974 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200975
Christopher Faulet8ef75252017-02-20 22:56:03 +0100976 if (size < 7 /* TYPE + METADATA */) {
977 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
978 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200979 }
980
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100981 /* Retrieve flags */
Christopher Faulet8ef75252017-02-20 22:56:03 +0100982 memcpy((char *)&flags, p, 4);
Thierry FOURNIERc4dcaff2018-05-18 12:25:39 +0200983 flags = ntohl(flags);
Christopher Faulet8ef75252017-02-20 22:56:03 +0100984 p += 4;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200985
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100986 /* Fragmentation is not supported for now */
987 if (!(flags & SPOE_FRM_FL_FIN)) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100988 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_FRAG_NOT_SUPPORTED;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +0100989 return -1;
990 }
991
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200992 /* Get the stream-id and the frame-id */
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200993 if (decode_varint(&p, end, &stream_id) == -1) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100994 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
Christopher Fauleta1cda022016-12-21 08:58:06 +0100995 return 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +0100996 }
Thierry FOURNIER6ab2bae2017-04-19 11:49:44 +0200997 if (decode_varint(&p, end, &frame_id) == -1) {
Christopher Faulet8ef75252017-02-20 22:56:03 +0100998 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +0200999 return 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001000 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001001
Christopher Faulet8ef75252017-02-20 22:56:03 +01001002 /* Try to find the corresponding SPOE context */
Christopher Faulet42bfa462017-01-04 14:14:19 +01001003 if (SPOE_APPCTX(appctx)->flags & SPOE_APPCTX_FL_ASYNC) {
Christopher Faulet24289f22017-09-25 14:48:02 +02001004 list_for_each_entry((*ctx), &agent->rt[tid].waiting_queue, list) {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001005 if ((*ctx)->stream_id == (unsigned int)stream_id &&
1006 (*ctx)->frame_id == (unsigned int)frame_id)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001007 goto found;
1008 }
1009 }
1010 else {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001011 list_for_each_entry((*ctx), &SPOE_APPCTX(appctx)->waiting_queue, list) {
1012 if ((*ctx)->stream_id == (unsigned int)stream_id &&
Christopher Faulet8ef75252017-02-20 22:56:03 +01001013 (*ctx)->frame_id == (unsigned int)frame_id)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001014 goto found;
1015 }
1016 }
1017
Christopher Faulet8eda93f2017-02-09 09:44:33 +01001018 if (SPOE_APPCTX(appctx)->frag_ctx.ctx &&
1019 SPOE_APPCTX(appctx)->frag_ctx.cursid == (unsigned int)stream_id &&
1020 SPOE_APPCTX(appctx)->frag_ctx.curfid == (unsigned int)frame_id) {
1021
1022 /* ABRT bit is set for an unfinished fragmented frame */
1023 if (flags & SPOE_FRM_FL_ABRT) {
1024 *ctx = SPOE_APPCTX(appctx)->frag_ctx.ctx;
Christopher Faulet8eda93f2017-02-09 09:44:33 +01001025 (*ctx)->state = SPOE_CTX_ST_ERROR;
1026 (*ctx)->status_code = SPOE_CTX_ERR_FRAG_FRAME_ABRT;
1027 /* Ignore the payload */
1028 goto end;
1029 }
1030 /* TODO: Handle more flags for fragmented frames: RESUME, FINISH... */
1031 /* For now, we ignore the ack */
1032 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_INVALID;
1033 return 0;
1034 }
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001035
Christopher Fauleta1cda022016-12-21 08:58:06 +01001036 /* No Stream found, ignore the frame */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001037 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1038 " - Ignore ACK frame"
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001039 " - stream-id=%u - frame-id=%u\n",
1040 (int)now.tv_sec, (int)now.tv_usec, agent->id,
1041 __FUNCTION__, appctx,
1042 (unsigned int)stream_id, (unsigned int)frame_id);
1043
Christopher Faulet8eda93f2017-02-09 09:44:33 +01001044 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_FRAMEID_NOTFOUND;
Christopher Fauletf4e52512020-11-10 14:31:39 +01001045 if (appctx->st0 == SPOE_APPCTX_ST_WAITING_SYNC_ACK) {
1046 /* Report an error if we are waiting the ack for another frame,
1047 * but not if there is no longer frame waiting for a ack
1048 * (timeout)
1049 */
1050 if (!LIST_ISEMPTY(&SPOE_APPCTX(appctx)->waiting_queue) ||
1051 SPOE_APPCTX(appctx)->frag_ctx.ctx)
1052 return -1;
1053 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
1054 SPOE_APPCTX(appctx)->cur_fpa = 0;
1055 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001056 return 0;
1057
1058 found:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001059 if (!spoe_acquire_buffer(&SPOE_APPCTX(appctx)->buffer,
1060 &SPOE_APPCTX(appctx)->buffer_wait)) {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001061 *ctx = NULL;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001062 return 1; /* Retry later */
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001063 }
Christopher Faulet4596fb72017-01-11 14:05:19 +01001064
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001065 /* Copy encoded actions */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001066 len = (end - p);
Willy Tarreauc9fa0482018-07-10 17:43:27 +02001067 memcpy(b_head(&SPOE_APPCTX(appctx)->buffer), p, len);
1068 b_set_data(&SPOE_APPCTX(appctx)->buffer, len);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001069 p += len;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001070
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001071 /* Transfer the buffer ownership to the SPOE context */
1072 (*ctx)->buffer = SPOE_APPCTX(appctx)->buffer;
Willy Tarreauc9fa0482018-07-10 17:43:27 +02001073 SPOE_APPCTX(appctx)->buffer = BUF_NULL;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001074
Christopher Faulet8ef75252017-02-20 22:56:03 +01001075 (*ctx)->state = SPOE_CTX_ST_DONE;
1076
Christopher Faulet8eda93f2017-02-09 09:44:33 +01001077 end:
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001078 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
Christopher Faulet8ef75252017-02-20 22:56:03 +01001079 " - ACK frame received"
1080 " - ctx=%p - stream-id=%u - frame-id=%u - flags=0x%08x\n",
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001081 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Faulet8ef75252017-02-20 22:56:03 +01001082 __FUNCTION__, appctx, *ctx, (*ctx)->stream_id,
1083 (*ctx)->frame_id, flags);
1084 return (p - frame);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001085}
1086
Christopher Fauletba7bc162016-11-07 21:07:38 +01001087/* This function is used in cfgparse.c and declared in proto/checks.h. It
1088 * prepare the request to send to agents during a healthcheck. It returns 0 on
1089 * success and -1 if an error occurred. */
1090int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001091spoe_prepare_healthcheck_request(char **req, int *len)
Christopher Fauletba7bc162016-11-07 21:07:38 +01001092{
Christopher Faulet8ef75252017-02-20 22:56:03 +01001093 struct appctx appctx;
1094 struct spoe_appctx spoe_appctx;
1095 char *frame, *end, buf[MAX_FRAME_SIZE+4];
1096 size_t sz;
1097 int ret;
Christopher Fauletba7bc162016-11-07 21:07:38 +01001098
Christopher Faulet42bfa462017-01-04 14:14:19 +01001099 memset(&appctx, 0, sizeof(appctx));
1100 memset(&spoe_appctx, 0, sizeof(spoe_appctx));
Christopher Fauletba7bc162016-11-07 21:07:38 +01001101 memset(buf, 0, sizeof(buf));
Christopher Faulet42bfa462017-01-04 14:14:19 +01001102
1103 appctx.ctx.spoe.ptr = &spoe_appctx;
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001104 SPOE_APPCTX(&appctx)->max_frame_size = MAX_FRAME_SIZE;
Christopher Fauletba7bc162016-11-07 21:07:38 +01001105
Christopher Faulet8ef75252017-02-20 22:56:03 +01001106 frame = buf+4; /* Reserved the 4 first bytes for the frame size */
1107 end = frame + MAX_FRAME_SIZE;
1108
1109 ret = spoe_prepare_hahello_frame(&appctx, frame, MAX_FRAME_SIZE);
1110 if (ret <= 0)
Christopher Fauletba7bc162016-11-07 21:07:38 +01001111 return -1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001112 frame += ret;
Christopher Fauletba7bc162016-11-07 21:07:38 +01001113
Christopher Faulet8ef75252017-02-20 22:56:03 +01001114 /* Add "healthcheck" K/V item */
1115 sz = SLEN(HEALTHCHECK_KEY);
1116 if (spoe_encode_buffer(HEALTHCHECK_KEY, sz, &frame, end) == -1)
1117 return -1;
1118 *frame++ = (SPOE_DATA_T_BOOL | SPOE_DATA_FL_TRUE);
Christopher Fauletba7bc162016-11-07 21:07:38 +01001119
Christopher Faulet8ef75252017-02-20 22:56:03 +01001120 *len = frame - buf;
1121 sz = htonl(*len - 4);
1122 memcpy(buf, (char *)&sz, 4);
Christopher Fauletba7bc162016-11-07 21:07:38 +01001123
Christopher Faulet8ef75252017-02-20 22:56:03 +01001124 if ((*req = malloc(*len)) == NULL)
Christopher Fauletba7bc162016-11-07 21:07:38 +01001125 return -1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001126 memcpy(*req, buf, *len);
Christopher Fauletba7bc162016-11-07 21:07:38 +01001127 return 0;
1128}
1129
1130/* This function is used in checks.c and declared in proto/checks.h. It decode
1131 * the response received from an agent during a healthcheck. It returns 0 on
1132 * success and -1 if an error occurred. */
1133int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001134spoe_handle_healthcheck_response(char *frame, size_t size, char *err, int errlen)
Christopher Fauletba7bc162016-11-07 21:07:38 +01001135{
Christopher Faulet42bfa462017-01-04 14:14:19 +01001136 struct appctx appctx;
1137 struct spoe_appctx spoe_appctx;
Christopher Fauletba7bc162016-11-07 21:07:38 +01001138
Christopher Faulet42bfa462017-01-04 14:14:19 +01001139 memset(&appctx, 0, sizeof(appctx));
1140 memset(&spoe_appctx, 0, sizeof(spoe_appctx));
Christopher Fauletba7bc162016-11-07 21:07:38 +01001141
Christopher Faulet42bfa462017-01-04 14:14:19 +01001142 appctx.ctx.spoe.ptr = &spoe_appctx;
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001143 SPOE_APPCTX(&appctx)->max_frame_size = MAX_FRAME_SIZE;
Christopher Faulet42bfa462017-01-04 14:14:19 +01001144
Christopher Faulet8ef75252017-02-20 22:56:03 +01001145 if (*frame == SPOE_FRM_T_AGENT_DISCON) {
1146 spoe_handle_agentdiscon_frame(&appctx, frame, size);
Christopher Fauletba7bc162016-11-07 21:07:38 +01001147 goto error;
1148 }
Christopher Faulet8ef75252017-02-20 22:56:03 +01001149 if (spoe_handle_agenthello_frame(&appctx, frame, size) <= 0)
1150 goto error;
Christopher Fauletba7bc162016-11-07 21:07:38 +01001151
1152 return 0;
1153
1154 error:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001155 if (SPOE_APPCTX(&appctx)->status_code >= SPOE_FRM_ERRS)
1156 SPOE_APPCTX(&appctx)->status_code = SPOE_FRM_ERR_UNKNOWN;
1157 strncpy(err, spoe_frm_err_reasons[SPOE_APPCTX(&appctx)->status_code], errlen);
Christopher Fauletba7bc162016-11-07 21:07:38 +01001158 return -1;
1159}
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001160
Christopher Fauleta1cda022016-12-21 08:58:06 +01001161/* Send a SPOE frame to an agent. It returns -1 when an error occurred, 0 when
1162 * the frame can be ignored, 1 to retry later, and the frame legnth on
1163 * success. */
1164static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001165spoe_send_frame(struct appctx *appctx, char *buf, size_t framesz)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001166{
1167 struct stream_interface *si = appctx->owner;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001168 int ret;
1169 uint32_t netint;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001170
Christopher Faulet8ef75252017-02-20 22:56:03 +01001171 /* 4 bytes are reserved at the beginning of <buf> to store the frame
1172 * length. */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001173 netint = htonl(framesz);
1174 memcpy(buf, (char *)&netint, 4);
Willy Tarreau06d80a92017-10-19 14:32:15 +02001175 ret = ci_putblk(si_ic(si), buf, framesz+4);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001176 if (ret <= 0) {
Willy Tarreauc9fa0482018-07-10 17:43:27 +02001177 if ((ret == -3 && b_is_null(&si_ic(si)->buf)) || ret == -1) {
Willy Tarreaudb398432018-11-15 11:08:52 +01001178 si_rx_room_blk(si);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001179 return 1; /* retry */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001180 }
1181 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001182 return -1; /* error */
1183 }
1184 return framesz;
1185}
1186
1187/* Receive a SPOE frame from an agent. It return -1 when an error occurred, 0
1188 * when the frame can be ignored, 1 to retry later and the frame length on
1189 * success. */
1190static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001191spoe_recv_frame(struct appctx *appctx, char *buf, size_t framesz)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001192{
1193 struct stream_interface *si = appctx->owner;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001194 int ret;
1195 uint32_t netint;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001196
Willy Tarreau06d80a92017-10-19 14:32:15 +02001197 ret = co_getblk(si_oc(si), (char *)&netint, 4, 0);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001198 if (ret > 0) {
1199 framesz = ntohl(netint);
Christopher Faulet42bfa462017-01-04 14:14:19 +01001200 if (framesz > SPOE_APPCTX(appctx)->max_frame_size) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001201 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOO_BIG;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001202 return -1;
1203 }
Willy Tarreau06d80a92017-10-19 14:32:15 +02001204 ret = co_getblk(si_oc(si), buf, framesz, 4);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001205 }
1206 if (ret <= 0) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001207 if (ret == 0) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01001208 return 1; /* retry */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001209 }
1210 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001211 return -1; /* error */
1212 }
1213 return framesz;
1214}
1215
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001216/********************************************************************
1217 * Functions that manage the SPOE applet
1218 ********************************************************************/
Christopher Faulet4596fb72017-01-11 14:05:19 +01001219static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001220spoe_wakeup_appctx(struct appctx *appctx)
Christopher Faulet4596fb72017-01-11 14:05:19 +01001221{
Willy Tarreau0cd3bd62018-11-06 18:46:37 +01001222 si_want_get(appctx->owner);
Willy Tarreau8bb2ffb2018-11-14 17:54:13 +01001223 si_rx_endp_more(appctx->owner);
Christopher Faulet4596fb72017-01-11 14:05:19 +01001224 appctx_wakeup(appctx);
1225 return 1;
1226}
1227
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001228/* Callback function that catches applet timeouts. If a timeout occurred, we set
1229 * <appctx->st1> flag and the SPOE applet is woken up. */
1230static struct task *
Olivier Houchard9f6af332018-05-25 14:04:04 +02001231spoe_process_appctx(struct task * task, void *context, unsigned short state)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001232{
Olivier Houchard9f6af332018-05-25 14:04:04 +02001233 struct appctx *appctx = context;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001234
1235 appctx->st1 = SPOE_APPCTX_ERR_NONE;
1236 if (tick_is_expired(task->expire, now_ms)) {
1237 task->expire = TICK_ETERNITY;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001238 appctx->st1 = SPOE_APPCTX_ERR_TOUT;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001239 }
Christopher Faulet8ef75252017-02-20 22:56:03 +01001240 spoe_wakeup_appctx(appctx);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001241 return task;
1242}
1243
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001244/* Callback function that releases a SPOE applet. This happens when the
1245 * connection with the agent is closed. */
1246static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01001247spoe_release_appctx(struct appctx *appctx)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001248{
Christopher Faulet8ef75252017-02-20 22:56:03 +01001249 struct stream_interface *si = appctx->owner;
1250 struct spoe_appctx *spoe_appctx = SPOE_APPCTX(appctx);
1251 struct spoe_agent *agent;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001252 struct spoe_context *ctx, *back;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001253
1254 if (spoe_appctx == NULL)
1255 return;
1256
1257 appctx->ctx.spoe.ptr = NULL;
1258 agent = spoe_appctx->agent;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001259
1260 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p\n",
1261 (int)now.tv_sec, (int)now.tv_usec, agent->id,
1262 __FUNCTION__, appctx);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001263
Christopher Faulet8ef75252017-02-20 22:56:03 +01001264 /* Remove applet from the list of running applets */
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001265 _HA_ATOMIC_SUB(&agent->counters.applets, 1);
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001266 HA_SPIN_LOCK(SPOE_APPLET_LOCK, &agent->rt[tid].lock);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001267 if (!LIST_ISEMPTY(&spoe_appctx->list)) {
1268 LIST_DEL(&spoe_appctx->list);
1269 LIST_INIT(&spoe_appctx->list);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001270 }
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001271 HA_SPIN_UNLOCK(SPOE_APPLET_LOCK, &agent->rt[tid].lock);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001272
Christopher Faulet8ef75252017-02-20 22:56:03 +01001273 /* Shutdown the server connection, if needed */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001274 if (appctx->st0 != SPOE_APPCTX_ST_END) {
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001275 if (appctx->st0 == SPOE_APPCTX_ST_IDLE) {
1276 eb32_delete(&spoe_appctx->node);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001277 _HA_ATOMIC_SUB(&agent->counters.idles, 1);
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001278 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001279
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001280 appctx->st0 = SPOE_APPCTX_ST_END;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001281 if (spoe_appctx->status_code == SPOE_FRM_ERR_NONE)
1282 spoe_appctx->status_code = SPOE_FRM_ERR_IO;
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001283
1284 si_shutw(si);
1285 si_shutr(si);
1286 si_ic(si)->flags |= CF_READ_NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001287 }
1288
Christopher Faulet8ef75252017-02-20 22:56:03 +01001289 /* Destroy the task attached to this applet */
Willy Tarreauf6562792019-05-07 19:05:35 +02001290 task_destroy(spoe_appctx->task);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001291
Christopher Faulet8ef75252017-02-20 22:56:03 +01001292 /* Notify all waiting streams */
1293 list_for_each_entry_safe(ctx, back, &spoe_appctx->waiting_queue, list) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01001294 LIST_DEL(&ctx->list);
1295 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001296 _HA_ATOMIC_SUB(&agent->counters.nb_waiting, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001297 spoe_update_stat_time(&ctx->stats.tv_wait, &ctx->stats.t_waiting);
Christopher Faulet746326a2020-11-10 18:45:34 +01001298 ctx->spoe_appctx = NULL;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001299 ctx->state = SPOE_CTX_ST_ERROR;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001300 ctx->status_code = (spoe_appctx->status_code + 0x100);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001301 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001302 }
1303
Christopher Faulet8ef75252017-02-20 22:56:03 +01001304 /* If the applet was processing a fragmented frame, notify the
1305 * corresponding stream. */
1306 if (spoe_appctx->frag_ctx.ctx) {
1307 ctx = spoe_appctx->frag_ctx.ctx;
Christopher Fauletfce747b2018-01-24 15:59:32 +01001308 ctx->spoe_appctx = NULL;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001309 ctx->state = SPOE_CTX_ST_ERROR;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001310 ctx->status_code = (spoe_appctx->status_code + 0x100);
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001311 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
1312 }
1313
Christopher Faulet746326a2020-11-10 18:45:34 +01001314 if (!LIST_ISEMPTY(&agent->rt[tid].applets)) {
1315 list_for_each_entry_safe(ctx, back, &agent->rt[tid].waiting_queue, list) {
1316 if (ctx->spoe_appctx == spoe_appctx)
1317 ctx->spoe_appctx = NULL;
1318 }
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001319 goto end;
Christopher Faulet746326a2020-11-10 18:45:34 +01001320 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001321
Christopher Faulet8ef75252017-02-20 22:56:03 +01001322 /* If this was the last running applet, notify all waiting streams */
Christopher Faulet24289f22017-09-25 14:48:02 +02001323 list_for_each_entry_safe(ctx, back, &agent->rt[tid].sending_queue, list) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01001324 LIST_DEL(&ctx->list);
1325 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001326 _HA_ATOMIC_SUB(&agent->counters.nb_sending, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001327 spoe_update_stat_time(&ctx->stats.tv_queue, &ctx->stats.t_queue);
Christopher Faulet746326a2020-11-10 18:45:34 +01001328 ctx->spoe_appctx = NULL;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001329 ctx->state = SPOE_CTX_ST_ERROR;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001330 ctx->status_code = (spoe_appctx->status_code + 0x100);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001331 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001332 }
Christopher Faulet24289f22017-09-25 14:48:02 +02001333 list_for_each_entry_safe(ctx, back, &agent->rt[tid].waiting_queue, list) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01001334 LIST_DEL(&ctx->list);
1335 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001336 _HA_ATOMIC_SUB(&agent->counters.nb_waiting, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001337 spoe_update_stat_time(&ctx->stats.tv_wait, &ctx->stats.t_waiting);
Christopher Faulet746326a2020-11-10 18:45:34 +01001338 ctx->spoe_appctx = NULL;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001339 ctx->state = SPOE_CTX_ST_ERROR;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001340 ctx->status_code = (spoe_appctx->status_code + 0x100);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001341 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
1342 }
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001343
1344 end:
Christopher Faulet55ae8a62019-05-23 22:47:48 +02001345 /* Release allocated memory */
1346 spoe_release_buffer(&spoe_appctx->buffer,
1347 &spoe_appctx->buffer_wait);
1348 pool_free(pool_head_spoe_appctx, spoe_appctx);
1349
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001350 /* Update runtinme agent info */
Christopher Faulet24289f22017-09-25 14:48:02 +02001351 agent->rt[tid].frame_size = agent->max_frame_size;
1352 list_for_each_entry(spoe_appctx, &agent->rt[tid].applets, list)
1353 HA_ATOMIC_UPDATE_MIN(&agent->rt[tid].frame_size, spoe_appctx->max_frame_size);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001354}
1355
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001356static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001357spoe_handle_connect_appctx(struct appctx *appctx)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001358{
Christopher Fauleta1cda022016-12-21 08:58:06 +01001359 struct stream_interface *si = appctx->owner;
Christopher Faulet42bfa462017-01-04 14:14:19 +01001360 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001361 char *frame, *buf;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001362 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001363
Willy Tarreau7ab22adb2019-06-05 14:53:22 +02001364 if (si_state_in(si->state, SI_SB_CER|SI_SB_DIS|SI_SB_CLO)) {
1365 /* closed */
1366 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
1367 goto exit;
1368 }
1369
Willy Tarreau4f283fa2019-06-05 14:34:03 +02001370 if (!si_state_in(si->state, SI_SB_RDY|SI_SB_EST)) {
Willy Tarreau7ab22adb2019-06-05 14:53:22 +02001371 /* not connected yet */
Willy Tarreau8bb2ffb2018-11-14 17:54:13 +01001372 si_rx_endp_more(si);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001373 task_wakeup(si_strm(si)->task, TASK_WOKEN_MSG);
1374 goto stop;
1375 }
Christopher Fauleta73e59b2016-12-09 17:30:18 +01001376
Christopher Fauleta1cda022016-12-21 08:58:06 +01001377 if (appctx->st1 == SPOE_APPCTX_ERR_TOUT) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001378 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1379 " - Connection timed out\n",
1380 (int)now.tv_sec, (int)now.tv_usec, agent->id,
1381 __FUNCTION__, appctx);
1382 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOUT;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001383 goto exit;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001384 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001385
Christopher Faulet42bfa462017-01-04 14:14:19 +01001386 if (SPOE_APPCTX(appctx)->task->expire == TICK_ETERNITY)
Christopher Faulet8ef75252017-02-20 22:56:03 +01001387 SPOE_APPCTX(appctx)->task->expire =
1388 tick_add_ifset(now_ms, agent->timeout.hello);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001389
Christopher Faulet8ef75252017-02-20 22:56:03 +01001390 /* 4 bytes are reserved at the beginning of <buf> to store the frame
1391 * length. */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001392 buf = trash.area; frame = buf+4;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001393 ret = spoe_prepare_hahello_frame(appctx, frame,
1394 SPOE_APPCTX(appctx)->max_frame_size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001395 if (ret > 1)
Christopher Faulet8ef75252017-02-20 22:56:03 +01001396 ret = spoe_send_frame(appctx, buf, ret);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001397
1398 switch (ret) {
1399 case -1: /* error */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001400 case 0: /* ignore => an error, cannot be ignored */
1401 goto exit;
1402
1403 case 1: /* retry later */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001404 goto stop;
1405
Christopher Faulet8ef75252017-02-20 22:56:03 +01001406 default:
1407 /* HELLO frame successfully sent, now wait for the
1408 * reply. */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001409 appctx->st0 = SPOE_APPCTX_ST_CONNECTING;
1410 goto next;
1411 }
1412
1413 next:
1414 return 0;
1415 stop:
1416 return 1;
1417 exit:
1418 appctx->st0 = SPOE_APPCTX_ST_EXIT;
1419 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001420}
1421
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001422static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001423spoe_handle_connecting_appctx(struct appctx *appctx)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001424{
Christopher Fauleta1cda022016-12-21 08:58:06 +01001425 struct stream_interface *si = appctx->owner;
Christopher Faulet42bfa462017-01-04 14:14:19 +01001426 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001427 char *frame;
1428 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001429
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001430
Christopher Fauletb067b062017-01-04 16:39:11 +01001431 if (si->state == SI_ST_CLO || si_opposite(si)->state == SI_ST_CLO) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001432 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001433 goto exit;
Christopher Fauletb067b062017-01-04 16:39:11 +01001434 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001435
Christopher Fauleta1cda022016-12-21 08:58:06 +01001436 if (appctx->st1 == SPOE_APPCTX_ERR_TOUT) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001437 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1438 " - Connection timed out\n",
1439 (int)now.tv_sec, (int)now.tv_usec, agent->id,
1440 __FUNCTION__, appctx);
1441 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOUT;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001442 goto exit;
1443 }
1444
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001445 frame = trash.area; trash.data = 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001446 ret = spoe_recv_frame(appctx, frame,
1447 SPOE_APPCTX(appctx)->max_frame_size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001448 if (ret > 1) {
1449 if (*frame == SPOE_FRM_T_AGENT_DISCON) {
1450 appctx->st0 = SPOE_APPCTX_ST_DISCONNECTING;
1451 goto next;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001452 }
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001453 trash.data = ret + 4;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001454 ret = spoe_handle_agenthello_frame(appctx, frame, ret);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001455 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001456
Christopher Fauleta1cda022016-12-21 08:58:06 +01001457 switch (ret) {
1458 case -1: /* error */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001459 case 0: /* ignore => an error, cannot be ignored */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001460 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
1461 goto next;
1462
1463 case 1: /* retry later */
1464 goto stop;
1465
1466 default:
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001467 _HA_ATOMIC_ADD(&agent->counters.idles, 1);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001468 appctx->st0 = SPOE_APPCTX_ST_IDLE;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001469 SPOE_APPCTX(appctx)->node.key = 0;
1470 eb32_insert(&agent->rt[tid].idle_applets, &SPOE_APPCTX(appctx)->node);
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01001471
1472 /* Update runtinme agent info */
Christopher Faulet24289f22017-09-25 14:48:02 +02001473 HA_ATOMIC_UPDATE_MIN(&agent->rt[tid].frame_size, SPOE_APPCTX(appctx)->max_frame_size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001474 goto next;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001475 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001476
Christopher Fauleta1cda022016-12-21 08:58:06 +01001477 next:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001478 /* Do not forget to remove processed frame from the output buffer */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001479 if (trash.data)
1480 co_skip(si_oc(si), trash.data);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001481
1482 SPOE_APPCTX(appctx)->task->expire =
1483 tick_add_ifset(now_ms, agent->timeout.idle);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001484 return 0;
1485 stop:
1486 return 1;
1487 exit:
1488 appctx->st0 = SPOE_APPCTX_ST_EXIT;
1489 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001490}
1491
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001492
Christopher Fauleta1cda022016-12-21 08:58:06 +01001493static int
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001494spoe_handle_sending_frame_appctx(struct appctx *appctx, int *skip)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001495{
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001496 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
1497 struct spoe_context *ctx = NULL;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001498 char *frame, *buf;
1499 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001500
Christopher Faulet8ef75252017-02-20 22:56:03 +01001501 /* 4 bytes are reserved at the beginning of <buf> to store the frame
1502 * length. */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001503 buf = trash.area; frame = buf+4;
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001504
1505 if (appctx->st0 == SPOE_APPCTX_ST_SENDING_FRAG_NOTIFY) {
1506 ctx = SPOE_APPCTX(appctx)->frag_ctx.ctx;
1507 ret = spoe_prepare_hafrag_frame(appctx, ctx, frame,
1508 SPOE_APPCTX(appctx)->max_frame_size);
1509 }
Christopher Faulet24289f22017-09-25 14:48:02 +02001510 else if (LIST_ISEMPTY(&agent->rt[tid].sending_queue)) {
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001511 *skip = 1;
1512 ret = 1;
1513 goto end;
1514 }
1515 else {
Christopher Faulet24289f22017-09-25 14:48:02 +02001516 ctx = LIST_NEXT(&agent->rt[tid].sending_queue, typeof(ctx), list);
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001517 ret = spoe_prepare_hanotify_frame(appctx, ctx, frame,
1518 SPOE_APPCTX(appctx)->max_frame_size);
1519
1520 }
1521
Christopher Faulet8ef75252017-02-20 22:56:03 +01001522 if (ret > 1)
1523 ret = spoe_send_frame(appctx, buf, ret);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001524
Christopher Faulet8ef75252017-02-20 22:56:03 +01001525 switch (ret) {
1526 case -1: /* error */
1527 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
1528 goto end;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001529
Christopher Faulet8ef75252017-02-20 22:56:03 +01001530 case 0: /* ignore */
1531 if (ctx == NULL)
1532 goto abort_frag_frame;
1533
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001534 spoe_release_buffer(&ctx->buffer, &ctx->buffer_wait);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001535 LIST_DEL(&ctx->list);
1536 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001537 _HA_ATOMIC_SUB(&agent->counters.nb_sending, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001538 spoe_update_stat_time(&ctx->stats.tv_queue, &ctx->stats.t_queue);
Christopher Fauletfce747b2018-01-24 15:59:32 +01001539 ctx->spoe_appctx = NULL;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001540 ctx->state = SPOE_CTX_ST_ERROR;
1541 ctx->status_code = (SPOE_APPCTX(appctx)->status_code + 0x100);
1542 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001543 *skip = 1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001544 break;
1545
1546 case 1: /* retry */
1547 *skip = 1;
1548 break;
1549
1550 default:
1551 if (ctx == NULL)
1552 goto abort_frag_frame;
1553
Christopher Fauletf032c3e2017-02-17 15:18:35 +01001554 spoe_release_buffer(&ctx->buffer, &ctx->buffer_wait);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001555 LIST_DEL(&ctx->list);
1556 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001557 _HA_ATOMIC_SUB(&agent->counters.nb_sending, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001558 spoe_update_stat_time(&ctx->stats.tv_queue, &ctx->stats.t_queue);
Christopher Fauletfce747b2018-01-24 15:59:32 +01001559 ctx->spoe_appctx = SPOE_APPCTX(appctx);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001560 if (!(ctx->flags & SPOE_CTX_FL_FRAGMENTED) ||
1561 (ctx->frag_ctx.flags & SPOE_FRM_FL_FIN))
1562 goto no_frag_frame_sent;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001563 else
Christopher Faulet8ef75252017-02-20 22:56:03 +01001564 goto frag_frame_sent;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001565 }
1566 goto end;
1567
1568 frag_frame_sent:
1569 appctx->st0 = SPOE_APPCTX_ST_SENDING_FRAG_NOTIFY;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001570 *skip = 1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001571 SPOE_APPCTX(appctx)->frag_ctx.ctx = ctx;
1572 SPOE_APPCTX(appctx)->frag_ctx.cursid = ctx->stream_id;
1573 SPOE_APPCTX(appctx)->frag_ctx.curfid = ctx->frame_id;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001574 ctx->state = SPOE_CTX_ST_ENCODING_MSGS;
1575 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
1576 goto end;
1577
1578 no_frag_frame_sent:
1579 if (SPOE_APPCTX(appctx)->flags & SPOE_APPCTX_FL_ASYNC) {
1580 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
Christopher Faulet24289f22017-09-25 14:48:02 +02001581 LIST_ADDQ(&agent->rt[tid].waiting_queue, &ctx->list);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001582 }
1583 else if (SPOE_APPCTX(appctx)->flags & SPOE_APPCTX_FL_PIPELINING) {
1584 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
1585 LIST_ADDQ(&SPOE_APPCTX(appctx)->waiting_queue, &ctx->list);
1586 }
1587 else {
1588 appctx->st0 = SPOE_APPCTX_ST_WAITING_SYNC_ACK;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001589 *skip = 1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001590 LIST_ADDQ(&SPOE_APPCTX(appctx)->waiting_queue, &ctx->list);
1591 }
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001592 _HA_ATOMIC_ADD(&agent->counters.nb_waiting, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001593 ctx->stats.tv_wait = now;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001594 SPOE_APPCTX(appctx)->frag_ctx.ctx = NULL;
1595 SPOE_APPCTX(appctx)->frag_ctx.cursid = 0;
1596 SPOE_APPCTX(appctx)->frag_ctx.curfid = 0;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001597 SPOE_APPCTX(appctx)->cur_fpa++;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001598
Christopher Faulet8ef75252017-02-20 22:56:03 +01001599 ctx->state = SPOE_CTX_ST_WAITING_ACK;
1600 goto end;
1601
1602 abort_frag_frame:
1603 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
1604 SPOE_APPCTX(appctx)->frag_ctx.ctx = NULL;
1605 SPOE_APPCTX(appctx)->frag_ctx.cursid = 0;
1606 SPOE_APPCTX(appctx)->frag_ctx.curfid = 0;
1607 goto end;
1608
1609 end:
1610 return ret;
1611}
1612
1613static int
1614spoe_handle_receiving_frame_appctx(struct appctx *appctx, int *skip)
1615{
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02001616 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001617 struct spoe_context *ctx = NULL;
1618 char *frame;
1619 int ret;
1620
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001621 frame = trash.area; trash.data = 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001622 ret = spoe_recv_frame(appctx, frame,
1623 SPOE_APPCTX(appctx)->max_frame_size);
1624 if (ret > 1) {
1625 if (*frame == SPOE_FRM_T_AGENT_DISCON) {
1626 appctx->st0 = SPOE_APPCTX_ST_DISCONNECTING;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001627 ret = -1;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001628 goto end;
1629 }
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001630 trash.data = ret + 4;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001631 ret = spoe_handle_agentack_frame(appctx, &ctx, frame, ret);
1632 }
1633 switch (ret) {
1634 case -1: /* error */
1635 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
1636 break;
1637
1638 case 0: /* ignore */
1639 break;
1640
1641 case 1: /* retry */
1642 *skip = 1;
1643 break;
1644
1645 default:
1646 LIST_DEL(&ctx->list);
1647 LIST_INIT(&ctx->list);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001648 _HA_ATOMIC_SUB(&agent->counters.nb_waiting, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01001649 spoe_update_stat_time(&ctx->stats.tv_wait, &ctx->stats.t_waiting);
1650 ctx->stats.tv_response = now;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001651 if (ctx->spoe_appctx) {
1652 ctx->spoe_appctx->cur_fpa--;
Christopher Fauletfce747b2018-01-24 15:59:32 +01001653 ctx->spoe_appctx = NULL;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001654 }
Christopher Faulet8eda93f2017-02-09 09:44:33 +01001655 if (appctx->st0 == SPOE_APPCTX_ST_SENDING_FRAG_NOTIFY &&
1656 ctx == SPOE_APPCTX(appctx)->frag_ctx.ctx) {
1657 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
1658 SPOE_APPCTX(appctx)->frag_ctx.ctx = NULL;
1659 SPOE_APPCTX(appctx)->frag_ctx.cursid = 0;
1660 SPOE_APPCTX(appctx)->frag_ctx.curfid = 0;
1661 }
1662 else if (appctx->st0 == SPOE_APPCTX_ST_WAITING_SYNC_ACK)
1663 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001664 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
1665 break;
1666 }
1667
1668 /* Do not forget to remove processed frame from the output buffer */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001669 if (trash.data)
1670 co_skip(si_oc(appctx->owner), trash.data);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001671 end:
1672 return ret;
1673}
1674
1675static int
1676spoe_handle_processing_appctx(struct appctx *appctx)
1677{
1678 struct stream_interface *si = appctx->owner;
1679 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001680 int ret, skip_sending = 0, skip_receiving = 0, active_s = 0, active_r = 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001681
1682 if (si->state == SI_ST_CLO || si_opposite(si)->state == SI_ST_CLO) {
1683 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
1684 goto exit;
1685 }
1686
1687 if (appctx->st1 == SPOE_APPCTX_ERR_TOUT) {
1688 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOUT;
1689 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
1690 appctx->st1 = SPOE_APPCTX_ERR_NONE;
1691 goto next;
1692 }
1693
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001694 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001695 " - process: fpa=%u/%u - appctx-state=%s - weight=%u - flags=0x%08x\n",
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001696 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Faulet8f82b202018-01-24 16:23:03 +01001697 __FUNCTION__, appctx, SPOE_APPCTX(appctx)->cur_fpa,
1698 agent->max_fpa, spoe_appctx_state_str[appctx->st0],
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001699 SPOE_APPCTX(appctx)->node.key, SPOE_APPCTX(appctx)->flags);
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001700
Christopher Faulet8f82b202018-01-24 16:23:03 +01001701 if (appctx->st0 == SPOE_APPCTX_ST_WAITING_SYNC_ACK)
1702 skip_sending = 1;
Christopher Faulet4596fb72017-01-11 14:05:19 +01001703
Christopher Faulet8f82b202018-01-24 16:23:03 +01001704 /* receiving_frame loop */
1705 while (!skip_receiving) {
1706 ret = spoe_handle_receiving_frame_appctx(appctx, &skip_receiving);
1707 switch (ret) {
1708 case -1: /* error */
1709 goto next;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001710
Christopher Faulet8f82b202018-01-24 16:23:03 +01001711 case 0: /* ignore */
1712 active_r = 1;
1713 break;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001714
Christopher Faulet8f82b202018-01-24 16:23:03 +01001715 case 1: /* retry */
1716 break;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001717
Christopher Faulet8f82b202018-01-24 16:23:03 +01001718 default:
1719 active_r = 1;
1720 break;
1721 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001722 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001723
Christopher Faulet8f82b202018-01-24 16:23:03 +01001724 /* send_frame loop */
1725 while (!skip_sending && SPOE_APPCTX(appctx)->cur_fpa < agent->max_fpa) {
1726 ret = spoe_handle_sending_frame_appctx(appctx, &skip_sending);
1727 switch (ret) {
1728 case -1: /* error */
1729 goto next;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001730
Christopher Faulet8f82b202018-01-24 16:23:03 +01001731 case 0: /* ignore */
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001732 if (SPOE_APPCTX(appctx)->node.key)
1733 SPOE_APPCTX(appctx)->node.key--;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001734 active_s++;
1735 break;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001736
Christopher Faulet8f82b202018-01-24 16:23:03 +01001737 case 1: /* retry */
1738 break;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001739
Christopher Faulet8f82b202018-01-24 16:23:03 +01001740 default:
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001741 if (SPOE_APPCTX(appctx)->node.key)
1742 SPOE_APPCTX(appctx)->node.key--;
Christopher Faulet8f82b202018-01-24 16:23:03 +01001743 active_s++;
1744 break;
1745 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001746 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001747
Christopher Faulet8f82b202018-01-24 16:23:03 +01001748 if (active_s || active_r) {
Christopher Faulet8f82b202018-01-24 16:23:03 +01001749 update_freq_ctr(&agent->rt[tid].processing_per_sec, active_s);
1750 SPOE_APPCTX(appctx)->task->expire = tick_add_ifset(now_ms, agent->timeout.idle);
1751 }
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001752
Christopher Faulet8f82b202018-01-24 16:23:03 +01001753 if (appctx->st0 == SPOE_APPCTX_ST_PROCESSING && SPOE_APPCTX(appctx)->cur_fpa < agent->max_fpa) {
Christopher Faulete7c50f12021-03-01 15:01:14 +01001754 struct server *srv = objt_server(si_strm(si)->target);
1755
1756 /* With several threads, close the applet if there are pending
1757 * connections or if the server is full. Otherwise, add the
1758 * applet in the idle list.
1759 */
1760 if (global.nbthread > 1 &&
1761 (agent->b.be->nbpend ||
1762 (srv && (srv->nbpend || (srv->maxconn && srv->served >=srv_dynamic_maxconn(srv)))))) {
1763 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_NONE;
1764 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
1765 appctx->st1 = SPOE_APPCTX_ERR_NONE;
1766 goto next;
1767 }
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001768 _HA_ATOMIC_ADD(&agent->counters.idles, 1);
Christopher Faulet8f82b202018-01-24 16:23:03 +01001769 appctx->st0 = SPOE_APPCTX_ST_IDLE;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01001770 eb32_insert(&agent->rt[tid].idle_applets, &SPOE_APPCTX(appctx)->node);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001771 }
1772 return 1;
1773
Christopher Faulet8f82b202018-01-24 16:23:03 +01001774 next:
1775 SPOE_APPCTX(appctx)->task->expire = tick_add_ifset(now_ms, agent->timeout.idle);
1776 return 0;
1777
Christopher Fauleta1cda022016-12-21 08:58:06 +01001778 exit:
1779 appctx->st0 = SPOE_APPCTX_ST_EXIT;
1780 return 0;
1781}
1782
1783static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001784spoe_handle_disconnect_appctx(struct appctx *appctx)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001785{
1786 struct stream_interface *si = appctx->owner;
Christopher Faulet42bfa462017-01-04 14:14:19 +01001787 struct spoe_agent *agent = SPOE_APPCTX(appctx)->agent;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001788 char *frame, *buf;
1789 int ret;
Christopher Fauletb067b062017-01-04 16:39:11 +01001790
Christopher Fauleta1cda022016-12-21 08:58:06 +01001791 if (si->state == SI_ST_CLO || si_opposite(si)->state == SI_ST_CLO)
1792 goto exit;
1793
1794 if (appctx->st1 == SPOE_APPCTX_ERR_TOUT)
1795 goto exit;
1796
Christopher Faulet8ef75252017-02-20 22:56:03 +01001797 /* 4 bytes are reserved at the beginning of <buf> to store the frame
1798 * length. */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001799 buf = trash.area; frame = buf+4;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001800 ret = spoe_prepare_hadiscon_frame(appctx, frame,
1801 SPOE_APPCTX(appctx)->max_frame_size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001802 if (ret > 1)
Christopher Faulet8ef75252017-02-20 22:56:03 +01001803 ret = spoe_send_frame(appctx, buf, ret);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001804
1805 switch (ret) {
1806 case -1: /* error */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001807 case 0: /* ignore => an error, cannot be ignored */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001808 goto exit;
1809
1810 case 1: /* retry */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001811 goto stop;
1812
1813 default:
1814 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1815 " - disconnected by HAProxy (%d): %s\n",
1816 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Faulet8ef75252017-02-20 22:56:03 +01001817 __FUNCTION__, appctx,
1818 SPOE_APPCTX(appctx)->status_code,
1819 spoe_frm_err_reasons[SPOE_APPCTX(appctx)->status_code]);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001820
1821 appctx->st0 = SPOE_APPCTX_ST_DISCONNECTING;
1822 goto next;
1823 }
1824
1825 next:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001826 SPOE_APPCTX(appctx)->task->expire =
1827 tick_add_ifset(now_ms, agent->timeout.idle);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001828 return 0;
1829 stop:
1830 return 1;
1831 exit:
1832 appctx->st0 = SPOE_APPCTX_ST_EXIT;
1833 return 0;
1834}
1835
1836static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01001837spoe_handle_disconnecting_appctx(struct appctx *appctx)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001838{
1839 struct stream_interface *si = appctx->owner;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001840 char *frame;
1841 int ret;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001842
Christopher Fauletb067b062017-01-04 16:39:11 +01001843 if (si->state == SI_ST_CLO || si_opposite(si)->state == SI_ST_CLO) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001844 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_IO;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001845 goto exit;
Christopher Fauletb067b062017-01-04 16:39:11 +01001846 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001847
Christopher Fauletb067b062017-01-04 16:39:11 +01001848 if (appctx->st1 == SPOE_APPCTX_ERR_TOUT) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001849 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_TOUT;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001850 goto exit;
Christopher Fauletb067b062017-01-04 16:39:11 +01001851 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001852
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001853 frame = trash.area; trash.data = 0;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001854 ret = spoe_recv_frame(appctx, frame,
1855 SPOE_APPCTX(appctx)->max_frame_size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001856 if (ret > 1) {
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001857 trash.data = ret + 4;
Christopher Faulet8ef75252017-02-20 22:56:03 +01001858 ret = spoe_handle_agentdiscon_frame(appctx, frame, ret);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001859 }
1860
1861 switch (ret) {
1862 case -1: /* error */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001863 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1864 " - error on frame (%s)\n",
1865 (int)now.tv_sec, (int)now.tv_usec,
Christopher Faulet42bfa462017-01-04 14:14:19 +01001866 ((struct spoe_agent *)SPOE_APPCTX(appctx)->agent)->id,
Christopher Fauleta1cda022016-12-21 08:58:06 +01001867 __FUNCTION__, appctx,
Christopher Faulet8ef75252017-02-20 22:56:03 +01001868 spoe_frm_err_reasons[SPOE_APPCTX(appctx)->status_code]);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001869 goto exit;
1870
1871 case 0: /* ignore */
Christopher Fauleta1cda022016-12-21 08:58:06 +01001872 goto next;
1873
1874 case 1: /* retry */
1875 goto stop;
1876
1877 default:
Christopher Fauleta1cda022016-12-21 08:58:06 +01001878 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
Christopher Faulet8ef75252017-02-20 22:56:03 +01001879 " - disconnected by peer (%d): %.*s\n",
Christopher Fauleta1cda022016-12-21 08:58:06 +01001880 (int)now.tv_sec, (int)now.tv_usec,
Christopher Faulet42bfa462017-01-04 14:14:19 +01001881 ((struct spoe_agent *)SPOE_APPCTX(appctx)->agent)->id,
Christopher Faulet8ef75252017-02-20 22:56:03 +01001882 __FUNCTION__, appctx, SPOE_APPCTX(appctx)->status_code,
1883 SPOE_APPCTX(appctx)->rlen, SPOE_APPCTX(appctx)->reason);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001884 goto exit;
1885 }
1886
1887 next:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001888 /* Do not forget to remove processed frame from the output buffer */
Willy Tarreau843b7cb2018-07-13 10:54:26 +02001889 if (trash.data)
1890 co_skip(si_oc(appctx->owner), trash.data);
Christopher Faulet8ef75252017-02-20 22:56:03 +01001891
Christopher Fauleta1cda022016-12-21 08:58:06 +01001892 return 0;
1893 stop:
1894 return 1;
1895 exit:
1896 appctx->st0 = SPOE_APPCTX_ST_EXIT;
1897 return 0;
1898}
1899
1900/* I/O Handler processing messages exchanged with the agent */
1901static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01001902spoe_handle_appctx(struct appctx *appctx)
Christopher Fauleta1cda022016-12-21 08:58:06 +01001903{
Christopher Faulet8ef75252017-02-20 22:56:03 +01001904 struct stream_interface *si = appctx->owner;
1905 struct spoe_agent *agent;
1906
1907 if (SPOE_APPCTX(appctx) == NULL)
1908 return;
Christopher Fauleta1cda022016-12-21 08:58:06 +01001909
Christopher Faulet8ef75252017-02-20 22:56:03 +01001910 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_NONE;
1911 agent = SPOE_APPCTX(appctx)->agent;
Christopher Fauletb067b062017-01-04 16:39:11 +01001912
Christopher Fauleta1cda022016-12-21 08:58:06 +01001913 switchstate:
1914 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: appctx=%p"
1915 " - appctx-state=%s\n",
1916 (int)now.tv_sec, (int)now.tv_usec, agent->id,
1917 __FUNCTION__, appctx, spoe_appctx_state_str[appctx->st0]);
1918
1919 switch (appctx->st0) {
1920 case SPOE_APPCTX_ST_CONNECT:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001921 if (spoe_handle_connect_appctx(appctx))
Christopher Fauleta1cda022016-12-21 08:58:06 +01001922 goto out;
1923 goto switchstate;
1924
1925 case SPOE_APPCTX_ST_CONNECTING:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001926 if (spoe_handle_connecting_appctx(appctx))
Christopher Fauleta1cda022016-12-21 08:58:06 +01001927 goto out;
1928 goto switchstate;
1929
1930 case SPOE_APPCTX_ST_IDLE:
Olivier Houchard9e7ae282019-03-08 18:50:42 +01001931 _HA_ATOMIC_SUB(&agent->counters.idles, 1);
Christopher Faulet7d9f1ba2018-02-28 13:33:26 +01001932 eb32_delete(&SPOE_APPCTX(appctx)->node);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001933 if (stopping &&
Christopher Faulet24289f22017-09-25 14:48:02 +02001934 LIST_ISEMPTY(&agent->rt[tid].sending_queue) &&
Christopher Faulet42bfa462017-01-04 14:14:19 +01001935 LIST_ISEMPTY(&SPOE_APPCTX(appctx)->waiting_queue)) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01001936 SPOE_APPCTX(appctx)->task->expire =
1937 tick_add_ifset(now_ms, agent->timeout.idle);
Christopher Fauleta1cda022016-12-21 08:58:06 +01001938 appctx->st0 = SPOE_APPCTX_ST_DISCONNECT;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001939 goto switchstate;
1940 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001941 appctx->st0 = SPOE_APPCTX_ST_PROCESSING;
1942 /* fall through */
1943
1944 case SPOE_APPCTX_ST_PROCESSING:
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01001945 case SPOE_APPCTX_ST_SENDING_FRAG_NOTIFY:
1946 case SPOE_APPCTX_ST_WAITING_SYNC_ACK:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001947 if (spoe_handle_processing_appctx(appctx))
Christopher Fauleta1cda022016-12-21 08:58:06 +01001948 goto out;
1949 goto switchstate;
1950
1951 case SPOE_APPCTX_ST_DISCONNECT:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001952 if (spoe_handle_disconnect_appctx(appctx))
Christopher Fauleta1cda022016-12-21 08:58:06 +01001953 goto out;
1954 goto switchstate;
1955
1956 case SPOE_APPCTX_ST_DISCONNECTING:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001957 if (spoe_handle_disconnecting_appctx(appctx))
Christopher Fauleta1cda022016-12-21 08:58:06 +01001958 goto out;
1959 goto switchstate;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001960
1961 case SPOE_APPCTX_ST_EXIT:
Christopher Faulet8ef75252017-02-20 22:56:03 +01001962 appctx->st0 = SPOE_APPCTX_ST_END;
1963 SPOE_APPCTX(appctx)->task->expire = TICK_ETERNITY;
1964
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001965 si_shutw(si);
1966 si_shutr(si);
1967 si_ic(si)->flags |= CF_READ_NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001968 /* fall through */
1969
1970 case SPOE_APPCTX_ST_END:
Christopher Fauleta73e59b2016-12-09 17:30:18 +01001971 return;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001972 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01001973 out:
Christopher Faulet24289f22017-09-25 14:48:02 +02001974 if (stopping)
1975 spoe_wakeup_appctx(appctx);
1976
Christopher Faulet42bfa462017-01-04 14:14:19 +01001977 if (SPOE_APPCTX(appctx)->task->expire != TICK_ETERNITY)
1978 task_queue(SPOE_APPCTX(appctx)->task);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001979}
1980
1981struct applet spoe_applet = {
1982 .obj_type = OBJ_TYPE_APPLET,
1983 .name = "<SPOE>", /* used for logging */
Christopher Faulet8ef75252017-02-20 22:56:03 +01001984 .fct = spoe_handle_appctx,
1985 .release = spoe_release_appctx,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001986};
1987
1988/* Create a SPOE applet. On success, the created applet is returned, else
1989 * NULL. */
1990static struct appctx *
Christopher Faulet8ef75252017-02-20 22:56:03 +01001991spoe_create_appctx(struct spoe_config *conf)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001992{
1993 struct appctx *appctx;
1994 struct session *sess;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001995 struct stream *strm;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001996
Emeric Brun1138fd02017-06-19 12:38:55 +02001997 if ((appctx = appctx_new(&spoe_applet, tid_bit)) == NULL)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02001998 goto out_error;
1999
Willy Tarreaubafbe012017-11-24 17:34:44 +01002000 appctx->ctx.spoe.ptr = pool_alloc_dirty(pool_head_spoe_appctx);
Christopher Faulet42bfa462017-01-04 14:14:19 +01002001 if (SPOE_APPCTX(appctx) == NULL)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002002 goto out_free_appctx;
Willy Tarreaubafbe012017-11-24 17:34:44 +01002003 memset(appctx->ctx.spoe.ptr, 0, pool_head_spoe_appctx->size);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002004
Christopher Faulet42bfa462017-01-04 14:14:19 +01002005 appctx->st0 = SPOE_APPCTX_ST_CONNECT;
Willy Tarreau5f4a47b2017-10-31 15:59:32 +01002006 if ((SPOE_APPCTX(appctx)->task = task_new(tid_bit)) == NULL)
Christopher Faulet42bfa462017-01-04 14:14:19 +01002007 goto out_free_spoe_appctx;
2008
2009 SPOE_APPCTX(appctx)->owner = appctx;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002010 SPOE_APPCTX(appctx)->task->process = spoe_process_appctx;
Christopher Faulet42bfa462017-01-04 14:14:19 +01002011 SPOE_APPCTX(appctx)->task->context = appctx;
2012 SPOE_APPCTX(appctx)->agent = conf->agent;
2013 SPOE_APPCTX(appctx)->version = 0;
2014 SPOE_APPCTX(appctx)->max_frame_size = conf->agent->max_frame_size;
2015 SPOE_APPCTX(appctx)->flags = 0;
Christopher Fauletb067b062017-01-04 16:39:11 +01002016 SPOE_APPCTX(appctx)->status_code = SPOE_FRM_ERR_NONE;
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002017 SPOE_APPCTX(appctx)->buffer = BUF_NULL;
Christopher Faulet8f82b202018-01-24 16:23:03 +01002018 SPOE_APPCTX(appctx)->cur_fpa = 0;
Christopher Faulet4596fb72017-01-11 14:05:19 +01002019
2020 LIST_INIT(&SPOE_APPCTX(appctx)->buffer_wait.list);
2021 SPOE_APPCTX(appctx)->buffer_wait.target = appctx;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002022 SPOE_APPCTX(appctx)->buffer_wait.wakeup_cb = (int (*)(void *))spoe_wakeup_appctx;
Christopher Faulet42bfa462017-01-04 14:14:19 +01002023
2024 LIST_INIT(&SPOE_APPCTX(appctx)->list);
2025 LIST_INIT(&SPOE_APPCTX(appctx)->waiting_queue);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002026
Willy Tarreau5820a362016-12-22 15:59:02 +01002027 sess = session_new(&conf->agent_fe, NULL, &appctx->obj_type);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002028 if (!sess)
2029 goto out_free_spoe;
2030
Willy Tarreau87787ac2017-08-28 16:22:54 +02002031 if ((strm = stream_new(sess, &appctx->obj_type)) == NULL)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002032 goto out_free_sess;
2033
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002034 stream_set_backend(strm, conf->agent->b.be);
2035
2036 /* applet is waiting for data */
Willy Tarreau0cd3bd62018-11-06 18:46:37 +01002037 si_cant_get(&strm->si[0]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002038 appctx_wakeup(appctx);
2039
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002040 strm->do_log = NULL;
2041 strm->res.flags |= CF_READ_DONTWAIT;
2042
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002043 HA_SPIN_LOCK(SPOE_APPLET_LOCK, &conf->agent->rt[tid].lock);
Christopher Faulet24289f22017-09-25 14:48:02 +02002044 LIST_ADDQ(&conf->agent->rt[tid].applets, &SPOE_APPCTX(appctx)->list);
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002045 HA_SPIN_UNLOCK(SPOE_APPLET_LOCK, &conf->agent->rt[tid].lock);
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002046 _HA_ATOMIC_ADD(&conf->agent->counters.applets, 1);
Emeric Brun5f77fef2017-05-29 15:26:51 +02002047
Emeric Brunc60def82017-09-27 14:59:38 +02002048 task_wakeup(SPOE_APPCTX(appctx)->task, TASK_WOKEN_INIT);
Willy Tarreau87787ac2017-08-28 16:22:54 +02002049 task_wakeup(strm->task, TASK_WOKEN_INIT);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002050 return appctx;
2051
2052 /* Error unrolling */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002053 out_free_sess:
2054 session_free(sess);
2055 out_free_spoe:
Olivier Houchard3f795f72019-04-17 22:51:06 +02002056 task_destroy(SPOE_APPCTX(appctx)->task);
Christopher Faulet42bfa462017-01-04 14:14:19 +01002057 out_free_spoe_appctx:
Willy Tarreaubafbe012017-11-24 17:34:44 +01002058 pool_free(pool_head_spoe_appctx, SPOE_APPCTX(appctx));
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002059 out_free_appctx:
2060 appctx_free(appctx);
2061 out_error:
2062 return NULL;
2063}
2064
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002065static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01002066spoe_queue_context(struct spoe_context *ctx)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002067{
2068 struct spoe_config *conf = FLT_CONF(ctx->filter);
2069 struct spoe_agent *agent = conf->agent;
2070 struct appctx *appctx;
Christopher Faulet42bfa462017-01-04 14:14:19 +01002071 struct spoe_appctx *spoe_appctx;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002072
Christopher Fauleta1cda022016-12-21 08:58:06 +01002073 /* Check if we need to create a new SPOE applet or not. */
Christopher Fauletb077cdc2018-01-24 16:37:57 +01002074 if (!eb_is_empty(&agent->rt[tid].idle_applets) &&
Christopher Fauletd6cd2b32020-06-22 15:32:14 +02002075 (agent->rt[tid].processing == 1 || agent->rt[tid].processing < read_freq_ctr(&agent->rt[tid].processing_per_sec)))
Christopher Fauleta1cda022016-12-21 08:58:06 +01002076 goto end;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002077
2078 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Fauleta1cda022016-12-21 08:58:06 +01002079 " - try to create new SPOE appctx\n",
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002080 (int)now.tv_sec, (int)now.tv_usec, agent->id, __FUNCTION__,
2081 ctx->strm);
2082
Christopher Fauleta1cda022016-12-21 08:58:06 +01002083 /* Do not try to create a new applet if there is no server up for the
2084 * agent's backend. */
2085 if (!agent->b.be->srv_act && !agent->b.be->srv_bck) {
2086 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2087 " - cannot create SPOE appctx: no server up\n",
2088 (int)now.tv_sec, (int)now.tv_usec, agent->id,
2089 __FUNCTION__, ctx->strm);
2090 goto end;
2091 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002092
Christopher Fauleta1cda022016-12-21 08:58:06 +01002093 /* Do not try to create a new applet if we have reached the maximum of
2094 * connection per seconds */
Christopher Faulet48026722016-11-16 15:01:12 +01002095 if (agent->cps_max > 0) {
Christopher Faulet24289f22017-09-25 14:48:02 +02002096 if (!freq_ctr_remain(&agent->rt[tid].conn_per_sec, agent->cps_max, 0)) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01002097 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2098 " - cannot create SPOE appctx: max CPS reached\n",
2099 (int)now.tv_sec, (int)now.tv_usec, agent->id,
2100 __FUNCTION__, ctx->strm);
2101 goto end;
2102 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002103 }
2104
Christopher Faulet8ef75252017-02-20 22:56:03 +01002105 appctx = spoe_create_appctx(conf);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002106 if (appctx == NULL) {
2107 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2108 " - failed to create SPOE appctx\n",
2109 (int)now.tv_sec, (int)now.tv_usec, agent->id,
2110 __FUNCTION__, ctx->strm);
Christopher Faulet3b8e3492018-03-26 17:20:58 +02002111 send_log(&conf->agent_fe, LOG_EMERG,
Christopher Faulet72bcc472017-01-04 16:39:41 +01002112 "SPOE: [%s] failed to create SPOE applet\n",
2113 agent->id);
2114
Christopher Fauleta1cda022016-12-21 08:58:06 +01002115 goto end;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002116 }
2117
Christopher Fauleta1cda022016-12-21 08:58:06 +01002118 /* Increase the per-process number of cumulated connections */
2119 if (agent->cps_max > 0)
Christopher Faulet24289f22017-09-25 14:48:02 +02002120 update_freq_ctr(&agent->rt[tid].conn_per_sec, 1);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002121
Christopher Fauleta1cda022016-12-21 08:58:06 +01002122 end:
2123 /* The only reason to return an error is when there is no applet */
Christopher Faulet24289f22017-09-25 14:48:02 +02002124 if (LIST_ISEMPTY(&agent->rt[tid].applets)) {
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002125 ctx->status_code = SPOE_CTX_ERR_RES;
2126 return -1;
2127 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002128
Christopher Faulet3e86cec2019-04-10 14:02:12 +02002129 /* Add the SPOE context in the sending queue if the stream has no applet
2130 * already assigned and wakeup all idle applets. Otherwise, don't queue
2131 * it. */
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002132 _HA_ATOMIC_ADD(&agent->counters.nb_sending, 1);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002133 spoe_update_stat_time(&ctx->stats.tv_request, &ctx->stats.t_request);
2134 ctx->stats.tv_queue = now;
Christopher Faulet3e86cec2019-04-10 14:02:12 +02002135 if (ctx->spoe_appctx)
2136 return 1;
2137 LIST_ADDQ(&agent->rt[tid].sending_queue, &ctx->list);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002138
2139 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet8ef75252017-02-20 22:56:03 +01002140 " - Add stream in sending queue"
Christopher Faulet68db0232018-04-06 11:34:12 +02002141 " - applets=%u - idles=%u - processing=%u\n",
Christopher Fauleta1cda022016-12-21 08:58:06 +01002142 (int)now.tv_sec, (int)now.tv_usec, agent->id, __FUNCTION__,
Christopher Faulet68db0232018-04-06 11:34:12 +02002143 ctx->strm, agent->counters.applets, agent->counters.idles,
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002144 agent->rt[tid].processing);
Christopher Fauletf7a30922016-11-10 15:04:51 +01002145
Christopher Fauletb077cdc2018-01-24 16:37:57 +01002146 /* Finally try to wakeup an IDLE applet. */
2147 if (!eb_is_empty(&agent->rt[tid].idle_applets)) {
2148 struct eb32_node *node;
2149
2150 node = eb32_first(&agent->rt[tid].idle_applets);
2151 spoe_appctx = eb32_entry(node, struct spoe_appctx, node);
2152 if (node && spoe_appctx) {
2153 eb32_delete(&spoe_appctx->node);
2154 spoe_appctx->node.key++;
2155 eb32_insert(&agent->rt[tid].idle_applets, &spoe_appctx->node);
2156 spoe_wakeup_appctx(spoe_appctx->owner);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002157 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002158 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01002159 return 1;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002160}
2161
2162/***************************************************************************
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002163 * Functions that encode SPOE messages
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002164 **************************************************************************/
Christopher Faulet10e37672017-09-21 16:38:22 +02002165/* Encode a SPOE message. Info in <ctx->frag_ctx>, if any, are used to handle
2166 * fragmented_content. If the next message can be processed, it returns 0. If
2167 * the message is too big, it returns -1.*/
2168static int
2169spoe_encode_message(struct stream *s, struct spoe_context *ctx,
2170 struct spoe_message *msg, int dir,
2171 char **buf, char *end)
2172{
2173 struct sample *smp;
2174 struct spoe_arg *arg;
2175 int ret;
2176
2177 if (msg->cond) {
2178 ret = acl_exec_cond(msg->cond, s->be, s->sess, s, dir|SMP_OPT_FINAL);
2179 ret = acl_pass(ret);
2180 if (msg->cond->pol == ACL_COND_UNLESS)
2181 ret = !ret;
2182
2183 /* the rule does not match */
2184 if (!ret)
2185 goto next;
2186 }
2187
2188 /* Resume encoding of a SPOE argument */
2189 if (ctx->frag_ctx.curarg != NULL) {
2190 arg = ctx->frag_ctx.curarg;
2191 goto encode_argument;
2192 }
2193
2194 if (ctx->frag_ctx.curoff != UINT_MAX)
2195 goto encode_msg_payload;
2196
2197 /* Check if there is enough space for the message name and the
2198 * number of arguments. It implies <msg->id_len> is encoded on 2
2199 * bytes, at most (< 2288). */
2200 if (*buf + 2 + msg->id_len + 1 > end)
2201 goto too_big;
2202
2203 /* Encode the message name */
2204 if (spoe_encode_buffer(msg->id, msg->id_len, buf, end) == -1)
2205 goto too_big;
2206
2207 /* Set the number of arguments for this message */
2208 **buf = msg->nargs;
2209 (*buf)++;
2210
2211 ctx->frag_ctx.curoff = 0;
2212 encode_msg_payload:
2213
2214 /* Loop on arguments */
2215 list_for_each_entry(arg, &msg->args, list) {
2216 ctx->frag_ctx.curarg = arg;
2217 ctx->frag_ctx.curoff = UINT_MAX;
Kevin Zhuf7f54282019-04-26 14:00:01 +08002218 ctx->frag_ctx.curlen = 0;
Christopher Faulet10e37672017-09-21 16:38:22 +02002219
2220 encode_argument:
2221 if (ctx->frag_ctx.curoff != UINT_MAX)
2222 goto encode_arg_value;
2223
Joseph Herlantf7f60312018-11-15 13:46:49 -08002224 /* Encode the argument name as a string. It can by NULL */
Christopher Faulet10e37672017-09-21 16:38:22 +02002225 if (spoe_encode_buffer(arg->name, arg->name_len, buf, end) == -1)
2226 goto too_big;
2227
2228 ctx->frag_ctx.curoff = 0;
2229 encode_arg_value:
2230
Joseph Herlantf7f60312018-11-15 13:46:49 -08002231 /* Fetch the argument value */
Christopher Faulet10e37672017-09-21 16:38:22 +02002232 smp = sample_process(s->be, s->sess, s, dir|SMP_OPT_FINAL, arg->expr, NULL);
Christopher Faulet3b1d0042019-05-06 09:53:10 +02002233 if (smp) {
2234 smp->ctx.a[0] = &ctx->frag_ctx.curlen;
2235 smp->ctx.a[1] = &ctx->frag_ctx.curoff;
2236 }
Christopher Faulet85db3212019-04-26 14:30:15 +02002237 ret = spoe_encode_data(smp, buf, end);
Christopher Faulet10e37672017-09-21 16:38:22 +02002238 if (ret == -1 || ctx->frag_ctx.curoff)
2239 goto too_big;
2240 }
2241
2242 next:
2243 return 0;
2244
2245 too_big:
2246 return -1;
2247}
2248
Christopher Fauletc718b822017-09-21 16:50:56 +02002249/* Encode list of SPOE messages. Info in <ctx->frag_ctx>, if any, are used to
2250 * handle fragmented content. On success it returns 1. If an error occurred, -1
2251 * is returned. If nothing has been encoded, it returns 0 (this is only possible
2252 * for unfragmented payload). */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002253static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01002254spoe_encode_messages(struct stream *s, struct spoe_context *ctx,
Christopher Fauletc718b822017-09-21 16:50:56 +02002255 struct list *messages, int dir, int type)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002256{
Christopher Fauleta1cda022016-12-21 08:58:06 +01002257 struct spoe_config *conf = FLT_CONF(ctx->filter);
2258 struct spoe_agent *agent = conf->agent;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002259 struct spoe_message *msg;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002260 char *p, *end;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002261
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002262 p = b_head(&ctx->buffer);
Christopher Faulet24289f22017-09-25 14:48:02 +02002263 end = p + agent->rt[tid].frame_size - FRAME_HDR_SIZE;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002264
Christopher Fauletc718b822017-09-21 16:50:56 +02002265 if (type == SPOE_MSGS_BY_EVENT) { /* Loop on messages by event */
2266 /* Resume encoding of a SPOE message */
2267 if (ctx->frag_ctx.curmsg != NULL) {
2268 msg = ctx->frag_ctx.curmsg;
2269 goto encode_evt_message;
2270 }
2271
2272 list_for_each_entry(msg, messages, by_evt) {
2273 ctx->frag_ctx.curmsg = msg;
2274 ctx->frag_ctx.curarg = NULL;
2275 ctx->frag_ctx.curoff = UINT_MAX;
2276
2277 encode_evt_message:
2278 if (spoe_encode_message(s, ctx, msg, dir, &p, end) == -1)
2279 goto too_big;
2280 }
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002281 }
Christopher Fauletc718b822017-09-21 16:50:56 +02002282 else if (type == SPOE_MSGS_BY_GROUP) { /* Loop on messages by group */
2283 /* Resume encoding of a SPOE message */
2284 if (ctx->frag_ctx.curmsg != NULL) {
2285 msg = ctx->frag_ctx.curmsg;
2286 goto encode_grp_message;
2287 }
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002288
Christopher Fauletc718b822017-09-21 16:50:56 +02002289 list_for_each_entry(msg, messages, by_grp) {
2290 ctx->frag_ctx.curmsg = msg;
2291 ctx->frag_ctx.curarg = NULL;
2292 ctx->frag_ctx.curoff = UINT_MAX;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002293
Christopher Fauletc718b822017-09-21 16:50:56 +02002294 encode_grp_message:
2295 if (spoe_encode_message(s, ctx, msg, dir, &p, end) == -1)
2296 goto too_big;
2297 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002298 }
Christopher Fauletc718b822017-09-21 16:50:56 +02002299 else
2300 goto skip;
2301
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002302
Christopher Faulet57583e42017-09-04 15:41:09 +02002303 /* nothing has been encoded for an unfragmented payload */
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002304 if (!(ctx->flags & SPOE_CTX_FL_FRAGMENTED) && p == b_head(&ctx->buffer))
Christopher Faulet57583e42017-09-04 15:41:09 +02002305 goto skip;
2306
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002307 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet8ef75252017-02-20 22:56:03 +01002308 " - encode %s messages - spoe_appctx=%p"
2309 "- max_size=%u - encoded=%ld\n",
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002310 (int)now.tv_sec, (int)now.tv_usec,
2311 agent->id, __FUNCTION__, s,
2312 ((ctx->flags & SPOE_CTX_FL_FRAGMENTED) ? "last fragment of" : "unfragmented"),
Christopher Fauletfce747b2018-01-24 15:59:32 +01002313 ctx->spoe_appctx, (agent->rt[tid].frame_size - FRAME_HDR_SIZE),
Christopher Faulet45073512018-07-20 10:16:29 +02002314 p - b_head(&ctx->buffer));
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002315
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002316 b_set_data(&ctx->buffer, p - b_head(&ctx->buffer));
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002317 ctx->frag_ctx.curmsg = NULL;
2318 ctx->frag_ctx.curarg = NULL;
2319 ctx->frag_ctx.curoff = 0;
2320 ctx->frag_ctx.flags = SPOE_FRM_FL_FIN;
Christopher Faulet57583e42017-09-04 15:41:09 +02002321
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002322 return 1;
2323
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002324 too_big:
Christopher Fauleta715ea82019-04-10 14:21:51 +02002325 /* Return an error if fragmentation is unsupported or if nothing has
2326 * been encoded because its too big and not splittable. */
2327 if (!(agent->flags & SPOE_FL_SND_FRAGMENTATION) || p == b_head(&ctx->buffer)) {
Christopher Fauletcecd8522017-02-24 22:11:21 +01002328 ctx->status_code = SPOE_CTX_ERR_TOO_BIG;
2329 return -1;
2330 }
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002331
2332 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet8ef75252017-02-20 22:56:03 +01002333 " - encode fragmented messages - spoe_appctx=%p"
2334 " - curmsg=%p - curarg=%p - curoff=%u"
2335 " - max_size=%u - encoded=%ld\n",
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002336 (int)now.tv_sec, (int)now.tv_usec,
Christopher Fauletfce747b2018-01-24 15:59:32 +01002337 agent->id, __FUNCTION__, s, ctx->spoe_appctx,
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002338 ctx->frag_ctx.curmsg, ctx->frag_ctx.curarg, ctx->frag_ctx.curoff,
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002339 (agent->rt[tid].frame_size - FRAME_HDR_SIZE), p - b_head(&ctx->buffer));
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002340
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002341 b_set_data(&ctx->buffer, p - b_head(&ctx->buffer));
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002342 ctx->flags |= SPOE_CTX_FL_FRAGMENTED;
2343 ctx->frag_ctx.flags &= ~SPOE_FRM_FL_FIN;
2344 return 1;
Christopher Faulet57583e42017-09-04 15:41:09 +02002345
2346 skip:
2347 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2348 " - skip the frame because nothing has been encoded\n",
2349 (int)now.tv_sec, (int)now.tv_usec,
2350 agent->id, __FUNCTION__, s);
2351 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002352}
2353
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002354
2355/***************************************************************************
2356 * Functions that handle SPOE actions
2357 **************************************************************************/
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002358/* Helper function to set a variable */
2359static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01002360spoe_set_var(struct spoe_context *ctx, char *scope, char *name, int len,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002361 struct sample *smp)
2362{
2363 struct spoe_config *conf = FLT_CONF(ctx->filter);
2364 struct spoe_agent *agent = conf->agent;
2365 char varname[64];
2366
2367 memset(varname, 0, sizeof(varname));
2368 len = snprintf(varname, sizeof(varname), "%s.%s.%.*s",
2369 scope, agent->var_pfx, len, name);
Etienne Carriereaec89892017-12-14 09:36:40 +00002370 if (agent->flags & SPOE_FL_FORCE_SET_VAR)
2371 vars_set_by_name(varname, len, smp);
2372 else
2373 vars_set_by_name_ifexist(varname, len, smp);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002374}
2375
2376/* Helper function to unset a variable */
2377static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01002378spoe_unset_var(struct spoe_context *ctx, char *scope, char *name, int len,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002379 struct sample *smp)
2380{
2381 struct spoe_config *conf = FLT_CONF(ctx->filter);
2382 struct spoe_agent *agent = conf->agent;
2383 char varname[64];
2384
2385 memset(varname, 0, sizeof(varname));
2386 len = snprintf(varname, sizeof(varname), "%s.%s.%.*s",
2387 scope, agent->var_pfx, len, name);
2388 vars_unset_by_name_ifexist(varname, len, smp);
2389}
2390
2391
Christopher Faulet8ef75252017-02-20 22:56:03 +01002392static inline int
2393spoe_decode_action_set_var(struct stream *s, struct spoe_context *ctx,
2394 char **buf, char *end, int dir)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002395{
Christopher Faulet8ef75252017-02-20 22:56:03 +01002396 char *str, *scope, *p = *buf;
2397 struct sample smp;
2398 uint64_t sz;
2399 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002400
Christopher Faulet8ef75252017-02-20 22:56:03 +01002401 if (p + 2 >= end)
2402 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002403
Christopher Faulet8ef75252017-02-20 22:56:03 +01002404 /* SET-VAR requires 3 arguments */
2405 if (*p++ != 3)
2406 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002407
Christopher Faulet8ef75252017-02-20 22:56:03 +01002408 switch (*p++) {
2409 case SPOE_SCOPE_PROC: scope = "proc"; break;
2410 case SPOE_SCOPE_SESS: scope = "sess"; break;
2411 case SPOE_SCOPE_TXN : scope = "txn"; break;
2412 case SPOE_SCOPE_REQ : scope = "req"; break;
2413 case SPOE_SCOPE_RES : scope = "res"; break;
2414 default: goto skip;
2415 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002416
Christopher Faulet8ef75252017-02-20 22:56:03 +01002417 if (spoe_decode_buffer(&p, end, &str, &sz) == -1)
2418 goto skip;
2419 memset(&smp, 0, sizeof(smp));
2420 smp_set_owner(&smp, s->be, s->sess, s, dir|SMP_OPT_FINAL);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002421
Christopher Faulet8ef75252017-02-20 22:56:03 +01002422 if (spoe_decode_data(&p, end, &smp) == -1)
2423 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002424
Christopher Faulet8ef75252017-02-20 22:56:03 +01002425 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2426 " - set-var '%s.%s.%.*s'\n",
2427 (int)now.tv_sec, (int)now.tv_usec,
2428 ((struct spoe_config *)FLT_CONF(ctx->filter))->agent->id,
2429 __FUNCTION__, s, scope,
2430 ((struct spoe_config *)FLT_CONF(ctx->filter))->agent->var_pfx,
2431 (int)sz, str);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002432
Christopher Fauletb135abc2020-10-15 16:08:30 +02002433 if (smp.data.type == SMP_T_ANY)
2434 spoe_unset_var(ctx, scope, str, sz, &smp);
2435 else
2436 spoe_set_var(ctx, scope, str, sz, &smp);
Christopher Fauletb5cff602016-11-24 14:53:22 +01002437
Christopher Faulet8ef75252017-02-20 22:56:03 +01002438 ret = (p - *buf);
2439 *buf = p;
2440 return ret;
2441 skip:
2442 return 0;
2443}
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002444
Christopher Faulet8ef75252017-02-20 22:56:03 +01002445static inline int
2446spoe_decode_action_unset_var(struct stream *s, struct spoe_context *ctx,
2447 char **buf, char *end, int dir)
2448{
2449 char *str, *scope, *p = *buf;
2450 struct sample smp;
2451 uint64_t sz;
2452 int ret;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002453
Christopher Faulet8ef75252017-02-20 22:56:03 +01002454 if (p + 2 >= end)
2455 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002456
Christopher Faulet8ef75252017-02-20 22:56:03 +01002457 /* UNSET-VAR requires 2 arguments */
2458 if (*p++ != 2)
2459 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002460
Christopher Faulet8ef75252017-02-20 22:56:03 +01002461 switch (*p++) {
2462 case SPOE_SCOPE_PROC: scope = "proc"; break;
2463 case SPOE_SCOPE_SESS: scope = "sess"; break;
2464 case SPOE_SCOPE_TXN : scope = "txn"; break;
2465 case SPOE_SCOPE_REQ : scope = "req"; break;
2466 case SPOE_SCOPE_RES : scope = "res"; break;
2467 default: goto skip;
2468 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002469
Christopher Faulet8ef75252017-02-20 22:56:03 +01002470 if (spoe_decode_buffer(&p, end, &str, &sz) == -1)
2471 goto skip;
2472 memset(&smp, 0, sizeof(smp));
2473 smp_set_owner(&smp, s->be, s->sess, s, dir|SMP_OPT_FINAL);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002474
Christopher Faulet8ef75252017-02-20 22:56:03 +01002475 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2476 " - unset-var '%s.%s.%.*s'\n",
2477 (int)now.tv_sec, (int)now.tv_usec,
2478 ((struct spoe_config *)FLT_CONF(ctx->filter))->agent->id,
2479 __FUNCTION__, s, scope,
2480 ((struct spoe_config *)FLT_CONF(ctx->filter))->agent->var_pfx,
2481 (int)sz, str);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002482
Christopher Faulet8ef75252017-02-20 22:56:03 +01002483 spoe_unset_var(ctx, scope, str, sz, &smp);
2484
2485 ret = (p - *buf);
2486 *buf = p;
2487 return ret;
2488 skip:
2489 return 0;
2490}
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002491
Christopher Faulet8ef75252017-02-20 22:56:03 +01002492/* Process SPOE actions for a specific event. It returns 1 on success. If an
2493 * error occurred, 0 is returned. */
2494static int
Christopher Faulet58d03682017-09-21 16:57:24 +02002495spoe_process_actions(struct stream *s, struct spoe_context *ctx, int dir)
Christopher Faulet8ef75252017-02-20 22:56:03 +01002496{
2497 char *p, *end;
2498 int ret;
2499
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002500 p = b_head(&ctx->buffer);
2501 end = p + b_data(&ctx->buffer);
Christopher Faulet8ef75252017-02-20 22:56:03 +01002502
2503 while (p < end) {
2504 enum spoe_action_type type;
2505
2506 type = *p++;
2507 switch (type) {
2508 case SPOE_ACT_T_SET_VAR:
2509 ret = spoe_decode_action_set_var(s, ctx, &p, end, dir);
2510 if (!ret)
2511 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002512 break;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002513
Christopher Faulet8ef75252017-02-20 22:56:03 +01002514 case SPOE_ACT_T_UNSET_VAR:
2515 ret = spoe_decode_action_unset_var(s, ctx, &p, end, dir);
2516 if (!ret)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002517 goto skip;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002518 break;
2519
2520 default:
2521 goto skip;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002522 }
2523 }
2524
2525 return 1;
2526 skip:
2527 return 0;
2528}
2529
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002530/***************************************************************************
2531 * Functions that process SPOE events
2532 **************************************************************************/
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002533static void
2534spoe_update_stats(struct stream *s, struct spoe_agent *agent,
2535 struct spoe_context *ctx, int dir)
2536{
2537 if (!tv_iszero(&ctx->stats.tv_start)) {
2538 spoe_update_stat_time(&ctx->stats.tv_start, &ctx->stats.t_process);
2539 ctx->stats.t_total += ctx->stats.t_process;
2540 tv_zero(&ctx->stats.tv_request);
2541 tv_zero(&ctx->stats.tv_queue);
2542 tv_zero(&ctx->stats.tv_wait);
2543 tv_zero(&ctx->stats.tv_response);
2544 }
2545
2546 if (agent->var_t_process) {
2547 struct sample smp;
2548
2549 memset(&smp, 0, sizeof(smp));
2550 smp_set_owner(&smp, s->be, s->sess, s, dir|SMP_OPT_FINAL);
2551 smp.data.u.sint = ctx->stats.t_process;
2552 smp.data.type = SMP_T_SINT;
2553
2554 spoe_set_var(ctx, "txn", agent->var_t_process,
2555 strlen(agent->var_t_process), &smp);
2556 }
2557
2558 if (agent->var_t_total) {
2559 struct sample smp;
2560
2561 memset(&smp, 0, sizeof(smp));
2562 smp_set_owner(&smp, s->be, s->sess, s, dir|SMP_OPT_FINAL);
2563 smp.data.u.sint = ctx->stats.t_total;
2564 smp.data.type = SMP_T_SINT;
2565
2566 spoe_set_var(ctx, "txn", agent->var_t_total,
2567 strlen(agent->var_t_total), &smp);
2568 }
2569}
2570
2571static void
2572spoe_handle_processing_error(struct stream *s, struct spoe_agent *agent,
2573 struct spoe_context *ctx, int dir)
2574{
2575 if (agent->eps_max > 0)
2576 update_freq_ctr(&agent->rt[tid].err_per_sec, 1);
2577
2578 if (agent->var_on_error) {
2579 struct sample smp;
2580
2581 memset(&smp, 0, sizeof(smp));
2582 smp_set_owner(&smp, s->be, s->sess, s, dir|SMP_OPT_FINAL);
2583 smp.data.u.sint = ctx->status_code;
2584 smp.data.type = SMP_T_BOOL;
2585
2586 spoe_set_var(ctx, "txn", agent->var_on_error,
2587 strlen(agent->var_on_error), &smp);
2588 }
2589
2590 ctx->state = ((agent->flags & SPOE_FL_CONT_ON_ERR)
2591 ? SPOE_CTX_ST_READY
2592 : SPOE_CTX_ST_NONE);
2593}
2594
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002595static inline int
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002596spoe_start_processing(struct spoe_agent *agent, struct spoe_context *ctx, int dir)
Christopher Fauleta1cda022016-12-21 08:58:06 +01002597{
Christopher Fauleta1cda022016-12-21 08:58:06 +01002598 /* If a process is already started for this SPOE context, retry
2599 * later. */
2600 if (ctx->flags & SPOE_CTX_FL_PROCESS)
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002601 return 0;
Christopher Fauleta1cda022016-12-21 08:58:06 +01002602
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002603 agent->rt[tid].processing++;
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002604 ctx->stats.tv_start = now;
2605 ctx->stats.tv_request = now;
2606 ctx->stats.t_request = -1;
2607 ctx->stats.t_queue = -1;
2608 ctx->stats.t_waiting = -1;
2609 ctx->stats.t_response = -1;
2610 ctx->stats.t_process = -1;
2611
2612 ctx->status_code = 0;
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002613
Christopher Fauleta1cda022016-12-21 08:58:06 +01002614 /* Set the right flag to prevent request and response processing
2615 * in same time. */
2616 ctx->flags |= ((dir == SMP_OPT_DIR_REQ)
2617 ? SPOE_CTX_FL_REQ_PROCESS
2618 : SPOE_CTX_FL_RSP_PROCESS);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002619 return 1;
Christopher Fauleta1cda022016-12-21 08:58:06 +01002620}
2621
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002622static inline void
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002623spoe_stop_processing(struct spoe_agent *agent, struct spoe_context *ctx)
Christopher Fauleta1cda022016-12-21 08:58:06 +01002624{
Christopher Fauletfce747b2018-01-24 15:59:32 +01002625 struct spoe_appctx *sa = ctx->spoe_appctx;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002626
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002627 if (!(ctx->flags & SPOE_CTX_FL_PROCESS))
2628 return;
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002629 _HA_ATOMIC_ADD(&agent->counters.nb_processed, 1);
Christopher Faulet879dca92018-03-23 11:53:24 +01002630 if (sa) {
2631 if (sa->frag_ctx.ctx == ctx) {
2632 sa->frag_ctx.ctx = NULL;
2633 spoe_wakeup_appctx(sa->owner);
2634 }
2635 else
2636 sa->cur_fpa--;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002637 }
2638
Christopher Fauleta1cda022016-12-21 08:58:06 +01002639 /* Reset the flag to allow next processing */
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002640 agent->rt[tid].processing--;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002641 ctx->flags &= ~(SPOE_CTX_FL_PROCESS|SPOE_CTX_FL_FRAGMENTED);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002642
2643 /* Reset processing timer */
2644 ctx->process_exp = TICK_ETERNITY;
2645
Christopher Faulet8ef75252017-02-20 22:56:03 +01002646 spoe_release_buffer(&ctx->buffer, &ctx->buffer_wait);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002647
Christopher Fauletfce747b2018-01-24 15:59:32 +01002648 ctx->spoe_appctx = NULL;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002649 ctx->frag_ctx.curmsg = NULL;
2650 ctx->frag_ctx.curarg = NULL;
2651 ctx->frag_ctx.curoff = 0;
2652 ctx->frag_ctx.flags = 0;
2653
Christopher Fauleta1cda022016-12-21 08:58:06 +01002654 if (!LIST_ISEMPTY(&ctx->list)) {
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002655 if (ctx->state == SPOE_CTX_ST_SENDING_MSGS)
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002656 _HA_ATOMIC_SUB(&agent->counters.nb_sending, 1);
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002657 else
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002658 _HA_ATOMIC_SUB(&agent->counters.nb_waiting, 1);
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002659
Christopher Fauleta1cda022016-12-21 08:58:06 +01002660 LIST_DEL(&ctx->list);
2661 LIST_INIT(&ctx->list);
2662 }
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002663}
2664
Christopher Faulet58d03682017-09-21 16:57:24 +02002665/* Process a list of SPOE messages. First, this functions will process messages
2666 * and send them to an agent in a NOTIFY frame. Then, it will wait a ACK frame
2667 * to process corresponding actions. During all the processing, it returns 0
2668 * and it returns 1 when the processing is finished. If an error occurred, -1
2669 * is returned. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002670static int
Christopher Faulet58d03682017-09-21 16:57:24 +02002671spoe_process_messages(struct stream *s, struct spoe_context *ctx,
2672 struct list *messages, int dir, int type)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002673{
Christopher Fauletf7a30922016-11-10 15:04:51 +01002674 struct spoe_config *conf = FLT_CONF(ctx->filter);
2675 struct spoe_agent *agent = conf->agent;
Christopher Faulet58d03682017-09-21 16:57:24 +02002676 int ret = 1;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002677
2678 if (ctx->state == SPOE_CTX_ST_ERROR)
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002679 goto end;
Christopher Fauletf7a30922016-11-10 15:04:51 +01002680
2681 if (tick_is_expired(ctx->process_exp, now_ms) && ctx->state != SPOE_CTX_ST_DONE) {
2682 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet58d03682017-09-21 16:57:24 +02002683 " - failed to process messages: timeout\n",
Christopher Fauletf7a30922016-11-10 15:04:51 +01002684 (int)now.tv_sec, (int)now.tv_usec,
Christopher Faulet58d03682017-09-21 16:57:24 +02002685 agent->id, __FUNCTION__, s);
Christopher Fauletb067b062017-01-04 16:39:11 +01002686 ctx->status_code = SPOE_CTX_ERR_TOUT;
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002687 goto end;
Christopher Fauletf7a30922016-11-10 15:04:51 +01002688 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002689
2690 if (ctx->state == SPOE_CTX_ST_READY) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01002691 if (agent->eps_max > 0) {
Christopher Faulet24289f22017-09-25 14:48:02 +02002692 if (!freq_ctr_remain(&agent->rt[tid].err_per_sec, agent->eps_max, 0)) {
Christopher Fauleta1cda022016-12-21 08:58:06 +01002693 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet58d03682017-09-21 16:57:24 +02002694 " - skip processing of messages: max EPS reached\n",
Christopher Fauleta1cda022016-12-21 08:58:06 +01002695 (int)now.tv_sec, (int)now.tv_usec,
Christopher Faulet58d03682017-09-21 16:57:24 +02002696 agent->id, __FUNCTION__, s);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002697 goto skip;
2698 }
2699 }
2700
Christopher Fauletf7a30922016-11-10 15:04:51 +01002701 if (!tick_isset(ctx->process_exp)) {
2702 ctx->process_exp = tick_add_ifset(now_ms, agent->timeout.processing);
2703 s->task->expire = tick_first((tick_is_expired(s->task->expire, now_ms) ? 0 : s->task->expire),
2704 ctx->process_exp);
2705 }
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002706 ret = spoe_start_processing(agent, ctx, dir);
Christopher Fauletb067b062017-01-04 16:39:11 +01002707 if (!ret)
2708 goto out;
Christopher Fauleta1cda022016-12-21 08:58:06 +01002709
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002710 ctx->state = SPOE_CTX_ST_ENCODING_MSGS;
Christopher Fauleta1cda022016-12-21 08:58:06 +01002711 /* fall through */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002712 }
2713
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002714 if (ctx->state == SPOE_CTX_ST_ENCODING_MSGS) {
Christopher Faulet63263e52019-04-10 14:47:18 +02002715 if (tv_iszero(&ctx->stats.tv_request))
2716 ctx->stats.tv_request = now;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002717 if (!spoe_acquire_buffer(&ctx->buffer, &ctx->buffer_wait))
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002718 goto out;
Christopher Faulet58d03682017-09-21 16:57:24 +02002719 ret = spoe_encode_messages(s, ctx, messages, dir, type);
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002720 if (ret < 0)
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002721 goto end;
Christopher Faulet57583e42017-09-04 15:41:09 +02002722 if (!ret)
2723 goto skip;
Christopher Faulet333694d2018-01-12 10:45:47 +01002724 if (spoe_queue_context(ctx) < 0)
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002725 goto end;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002726 ctx->state = SPOE_CTX_ST_SENDING_MSGS;
2727 }
2728
2729 if (ctx->state == SPOE_CTX_ST_SENDING_MSGS) {
Christopher Fauletfce747b2018-01-24 15:59:32 +01002730 if (ctx->spoe_appctx)
2731 spoe_wakeup_appctx(ctx->spoe_appctx->owner);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002732 ret = 0;
2733 goto out;
2734 }
2735
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01002736 if (ctx->state == SPOE_CTX_ST_WAITING_ACK) {
2737 ret = 0;
2738 goto out;
2739 }
2740
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002741 if (ctx->state == SPOE_CTX_ST_DONE) {
Christopher Faulet58d03682017-09-21 16:57:24 +02002742 spoe_process_actions(s, ctx, dir);
Christopher Faulet8ef75252017-02-20 22:56:03 +01002743 ret = 1;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002744 ctx->frame_id++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002745 ctx->state = SPOE_CTX_ST_READY;
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002746 spoe_update_stat_time(&ctx->stats.tv_response, &ctx->stats.t_response);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002747 goto end;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002748 }
2749
2750 out:
2751 return ret;
2752
Christopher Fauleta1cda022016-12-21 08:58:06 +01002753 skip:
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002754 tv_zero(&ctx->stats.tv_start);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002755 ctx->state = SPOE_CTX_ST_READY;
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002756 spoe_stop_processing(agent, ctx);
2757 return 1;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002758
Christopher Fauleta1cda022016-12-21 08:58:06 +01002759 end:
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002760 spoe_update_stats(s, agent, ctx, dir);
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002761 spoe_stop_processing(agent, ctx);
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002762 if (ctx->status_code) {
Olivier Houchard9e7ae282019-03-08 18:50:42 +01002763 _HA_ATOMIC_ADD(&agent->counters.nb_errors, 1);
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002764 spoe_handle_processing_error(s, agent, ctx, dir);
2765 ret = 1;
2766 }
Christopher Faulet58d03682017-09-21 16:57:24 +02002767 return ret;
2768}
2769
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002770/* Process a SPOE group, ie the list of messages attached to the group <grp>.
2771 * See spoe_process_message for details. */
2772static int
2773spoe_process_group(struct stream *s, struct spoe_context *ctx,
2774 struct spoe_group *group, int dir)
2775{
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002776 struct spoe_config *conf = FLT_CONF(ctx->filter);
2777 struct spoe_agent *agent = conf->agent;
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002778 int ret;
2779
2780 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
2781 " - ctx-state=%s - Process messages for group=%s\n",
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002782 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002783 __FUNCTION__, s, spoe_ctx_state_str[ctx->state],
2784 group->id);
2785
2786 if (LIST_ISEMPTY(&group->messages))
2787 return 1;
2788
2789 ret = spoe_process_messages(s, ctx, &group->messages, dir, SPOE_MSGS_BY_GROUP);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002790 if (ret && ctx->stats.t_process != -1) {
2791 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002792 " - <GROUP:%s> sid=%u st=%u %ld/%ld/%ld/%ld/%ld %u/%u %u/%u %llu/%llu %u/%u\n",
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002793 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002794 __FUNCTION__, s, group->id, s->uniq_id, ctx->status_code,
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002795 ctx->stats.t_request, ctx->stats.t_queue, ctx->stats.t_waiting,
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002796 ctx->stats.t_response, ctx->stats.t_process,
2797 agent->counters.idles, agent->counters.applets,
2798 agent->counters.nb_sending, agent->counters.nb_waiting,
2799 agent->counters.nb_errors, agent->counters.nb_processed,
2800 agent->rt[tid].processing, read_freq_ctr(&agent->rt[tid].processing_per_sec));
2801 if (ctx->status_code || !(conf->agent_fe.options2 & PR_O2_NOLOGNORM))
2802 send_log(&conf->agent_fe, (!ctx->status_code ? LOG_NOTICE : LOG_WARNING),
2803 "SPOE: [%s] <GROUP:%s> sid=%u st=%u %ld/%ld/%ld/%ld/%ld %u/%u %u/%u %llu/%llu\n",
2804 agent->id, group->id, s->uniq_id, ctx->status_code,
2805 ctx->stats.t_request, ctx->stats.t_queue, ctx->stats.t_waiting,
2806 ctx->stats.t_response, ctx->stats.t_process,
2807 agent->counters.idles, agent->counters.applets,
2808 agent->counters.nb_sending, agent->counters.nb_waiting,
2809 agent->counters.nb_errors, agent->counters.nb_processed);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002810 }
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002811 return ret;
2812}
2813
Christopher Faulet58d03682017-09-21 16:57:24 +02002814/* Process a SPOE event, ie the list of messages attached to the event <ev>.
2815 * See spoe_process_message for details. */
2816static int
2817spoe_process_event(struct stream *s, struct spoe_context *ctx,
2818 enum spoe_event ev)
2819{
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002820 struct spoe_config *conf = FLT_CONF(ctx->filter);
2821 struct spoe_agent *agent = conf->agent;
Christopher Faulet58d03682017-09-21 16:57:24 +02002822 int dir, ret;
2823
2824 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Faulet344c4ab2017-09-22 10:20:13 +02002825 " - ctx-state=%s - Process messages for event=%s\n",
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002826 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Faulet58d03682017-09-21 16:57:24 +02002827 __FUNCTION__, s, spoe_ctx_state_str[ctx->state],
2828 spoe_event_str[ev]);
2829
2830 dir = ((ev < SPOE_EV_ON_SERVER_SESS) ? SMP_OPT_DIR_REQ : SMP_OPT_DIR_RES);
2831
2832 if (LIST_ISEMPTY(&(ctx->events[ev])))
2833 return 1;
2834
2835 ret = spoe_process_messages(s, ctx, &(ctx->events[ev]), dir, SPOE_MSGS_BY_EVENT);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002836 if (ret && ctx->stats.t_process != -1) {
2837 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002838 " - <EVENT:%s> sid=%u st=%u %ld/%ld/%ld/%ld/%ld %u/%u %u/%u %llu/%llu %u/%u\n",
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002839 (int)now.tv_sec, (int)now.tv_usec, agent->id,
2840 __FUNCTION__, s, spoe_event_str[ev], s->uniq_id, ctx->status_code,
2841 ctx->stats.t_request, ctx->stats.t_queue, ctx->stats.t_waiting,
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02002842 ctx->stats.t_response, ctx->stats.t_process,
2843 agent->counters.idles, agent->counters.applets,
2844 agent->counters.nb_sending, agent->counters.nb_waiting,
2845 agent->counters.nb_errors, agent->counters.nb_processed,
2846 agent->rt[tid].processing, read_freq_ctr(&agent->rt[tid].processing_per_sec));
2847 if (ctx->status_code || !(conf->agent_fe.options2 & PR_O2_NOLOGNORM))
2848 send_log(&conf->agent_fe, (!ctx->status_code ? LOG_NOTICE : LOG_WARNING),
2849 "SPOE: [%s] <EVENT:%s> sid=%u st=%u %ld/%ld/%ld/%ld/%ld %u/%u %u/%u %llu/%llu\n",
2850 agent->id, spoe_event_str[ev], s->uniq_id, ctx->status_code,
2851 ctx->stats.t_request, ctx->stats.t_queue, ctx->stats.t_waiting,
2852 ctx->stats.t_response, ctx->stats.t_process,
2853 agent->counters.idles, agent->counters.applets,
2854 agent->counters.nb_sending, agent->counters.nb_waiting,
2855 agent->counters.nb_errors, agent->counters.nb_processed);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002856 }
Christopher Fauleta1cda022016-12-21 08:58:06 +01002857 return ret;
2858}
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002859
2860/***************************************************************************
2861 * Functions that create/destroy SPOE contexts
2862 **************************************************************************/
Christopher Fauleta1cda022016-12-21 08:58:06 +01002863static int
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002864spoe_acquire_buffer(struct buffer *buf, struct buffer_wait *buffer_wait)
Christopher Fauleta1cda022016-12-21 08:58:06 +01002865{
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002866 if (buf->size)
Christopher Fauleta1cda022016-12-21 08:58:06 +01002867 return 1;
2868
Christopher Faulet4596fb72017-01-11 14:05:19 +01002869 if (!LIST_ISEMPTY(&buffer_wait->list)) {
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002870 HA_SPIN_LOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Faulet4596fb72017-01-11 14:05:19 +01002871 LIST_DEL(&buffer_wait->list);
2872 LIST_INIT(&buffer_wait->list);
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002873 HA_SPIN_UNLOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002874 }
2875
Christopher Faulet4596fb72017-01-11 14:05:19 +01002876 if (b_alloc_margin(buf, global.tune.reserved_bufs))
Christopher Fauleta1cda022016-12-21 08:58:06 +01002877 return 1;
2878
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002879 HA_SPIN_LOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Faulet4596fb72017-01-11 14:05:19 +01002880 LIST_ADDQ(&buffer_wq, &buffer_wait->list);
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002881 HA_SPIN_UNLOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002882 return 0;
2883}
2884
2885static void
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002886spoe_release_buffer(struct buffer *buf, struct buffer_wait *buffer_wait)
Christopher Fauleta1cda022016-12-21 08:58:06 +01002887{
Christopher Faulet4596fb72017-01-11 14:05:19 +01002888 if (!LIST_ISEMPTY(&buffer_wait->list)) {
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002889 HA_SPIN_LOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Faulet4596fb72017-01-11 14:05:19 +01002890 LIST_DEL(&buffer_wait->list);
2891 LIST_INIT(&buffer_wait->list);
Christopher Faulet2a944ee2017-11-07 10:42:54 +01002892 HA_SPIN_UNLOCK(BUF_WQ_LOCK, &buffer_wq_lock);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002893 }
2894
2895 /* Release the buffer if needed */
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002896 if (buf->size) {
Christopher Faulet4596fb72017-01-11 14:05:19 +01002897 b_free(buf);
Olivier Houchard673867c2018-05-25 16:58:52 +02002898 offer_buffers(buffer_wait->target, tasks_run_queue);
Christopher Fauleta1cda022016-12-21 08:58:06 +01002899 }
2900}
2901
Christopher Faulet4596fb72017-01-11 14:05:19 +01002902static int
Christopher Faulet8ef75252017-02-20 22:56:03 +01002903spoe_wakeup_context(struct spoe_context *ctx)
Christopher Fauleta73e59b2016-12-09 17:30:18 +01002904{
2905 task_wakeup(ctx->strm->task, TASK_WOKEN_MSG);
2906 return 1;
2907}
2908
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002909static struct spoe_context *
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002910spoe_create_context(struct stream *s, struct filter *filter)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002911{
2912 struct spoe_config *conf = FLT_CONF(filter);
2913 struct spoe_context *ctx;
2914
Willy Tarreaubafbe012017-11-24 17:34:44 +01002915 ctx = pool_alloc_dirty(pool_head_spoe_ctx);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002916 if (ctx == NULL) {
2917 return NULL;
2918 }
2919 memset(ctx, 0, sizeof(*ctx));
Christopher Fauletb067b062017-01-04 16:39:11 +01002920 ctx->filter = filter;
2921 ctx->state = SPOE_CTX_ST_NONE;
2922 ctx->status_code = SPOE_CTX_ERR_NONE;
2923 ctx->flags = 0;
Christopher Faulet11610f32017-09-21 10:23:10 +02002924 ctx->events = conf->agent->events;
Christopher Faulet76c09ef2017-09-21 11:03:52 +02002925 ctx->groups = &conf->agent->groups;
Willy Tarreauc9fa0482018-07-10 17:43:27 +02002926 ctx->buffer = BUF_NULL;
Christopher Fauleta73e59b2016-12-09 17:30:18 +01002927 LIST_INIT(&ctx->buffer_wait.list);
2928 ctx->buffer_wait.target = ctx;
Christopher Faulet8ef75252017-02-20 22:56:03 +01002929 ctx->buffer_wait.wakeup_cb = (int (*)(void *))spoe_wakeup_context;
Christopher Fauleta1cda022016-12-21 08:58:06 +01002930 LIST_INIT(&ctx->list);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002931
Christopher Fauletf7a30922016-11-10 15:04:51 +01002932 ctx->stream_id = 0;
2933 ctx->frame_id = 1;
2934 ctx->process_exp = TICK_ETERNITY;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002935
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002936 tv_zero(&ctx->stats.tv_start);
2937 tv_zero(&ctx->stats.tv_request);
2938 tv_zero(&ctx->stats.tv_queue);
2939 tv_zero(&ctx->stats.tv_wait);
2940 tv_zero(&ctx->stats.tv_response);
2941 ctx->stats.t_request = -1;
2942 ctx->stats.t_queue = -1;
2943 ctx->stats.t_waiting = -1;
2944 ctx->stats.t_response = -1;
2945 ctx->stats.t_process = -1;
2946 ctx->stats.t_total = 0;
2947
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002948 ctx->strm = s;
2949 ctx->state = SPOE_CTX_ST_READY;
2950 filter->ctx = ctx;
2951
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002952 return ctx;
2953}
2954
2955static void
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002956spoe_destroy_context(struct filter *filter)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002957{
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002958 struct spoe_config *conf = FLT_CONF(filter);
2959 struct spoe_context *ctx = filter->ctx;
2960
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002961 if (!ctx)
2962 return;
2963
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002964 spoe_stop_processing(conf->agent, ctx);
Willy Tarreaubafbe012017-11-24 17:34:44 +01002965 pool_free(pool_head_spoe_ctx, ctx);
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01002966 filter->ctx = NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002967}
2968
2969static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01002970spoe_reset_context(struct spoe_context *ctx)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002971{
2972 ctx->state = SPOE_CTX_ST_READY;
Christopher Fauletf032c3e2017-02-17 15:18:35 +01002973 ctx->flags &= ~(SPOE_CTX_FL_PROCESS|SPOE_CTX_FL_FRAGMENTED);
Christopher Fauletb2dd1e02018-03-22 09:07:41 +01002974
2975 tv_zero(&ctx->stats.tv_start);
2976 tv_zero(&ctx->stats.tv_request);
2977 tv_zero(&ctx->stats.tv_queue);
2978 tv_zero(&ctx->stats.tv_wait);
2979 tv_zero(&ctx->stats.tv_response);
2980 ctx->stats.t_request = -1;
2981 ctx->stats.t_queue = -1;
2982 ctx->stats.t_waiting = -1;
2983 ctx->stats.t_response = -1;
2984 ctx->stats.t_process = -1;
2985 ctx->stats.t_total = 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002986}
2987
2988
2989/***************************************************************************
2990 * Hooks that manage the filter lifecycle (init/check/deinit)
2991 **************************************************************************/
2992/* Signal handler: Do a soft stop, wakeup SPOE applet */
2993static void
Christopher Faulet8ef75252017-02-20 22:56:03 +01002994spoe_sig_stop(struct sig_handler *sh)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002995{
2996 struct proxy *p;
2997
Olivier Houchardfbc74e82017-11-24 16:54:05 +01002998 p = proxies_list;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02002999 while (p) {
3000 struct flt_conf *fconf;
3001
3002 list_for_each_entry(fconf, &p->filter_configs, list) {
Christopher Faulet3b386a32017-02-23 10:17:15 +01003003 struct spoe_config *conf;
3004 struct spoe_agent *agent;
Christopher Faulet42bfa462017-01-04 14:14:19 +01003005 struct spoe_appctx *spoe_appctx;
Christopher Faulet24289f22017-09-25 14:48:02 +02003006 int i;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003007
Christopher Faulet3b386a32017-02-23 10:17:15 +01003008 if (fconf->id != spoe_filter_id)
3009 continue;
3010
3011 conf = fconf->conf;
3012 agent = conf->agent;
3013
Christopher Faulet24289f22017-09-25 14:48:02 +02003014 for (i = 0; i < global.nbthread; ++i) {
Christopher Faulet2a944ee2017-11-07 10:42:54 +01003015 HA_SPIN_LOCK(SPOE_APPLET_LOCK, &agent->rt[i].lock);
Christopher Faulet24289f22017-09-25 14:48:02 +02003016 list_for_each_entry(spoe_appctx, &agent->rt[i].applets, list)
3017 spoe_wakeup_appctx(spoe_appctx->owner);
Christopher Faulet2a944ee2017-11-07 10:42:54 +01003018 HA_SPIN_UNLOCK(SPOE_APPLET_LOCK, &agent->rt[i].lock);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003019 }
3020 }
3021 p = p->next;
3022 }
3023}
3024
3025
3026/* Initialize the SPOE filter. Returns -1 on error, else 0. */
3027static int
3028spoe_init(struct proxy *px, struct flt_conf *fconf)
3029{
3030 struct spoe_config *conf = fconf->conf;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003031
Christopher Faulet7250b8f2018-03-26 17:19:01 +02003032 /* conf->agent_fe was already initialized during the config
3033 * parsing. Finish initialization. */
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003034 conf->agent_fe.last_change = now.tv_sec;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003035 conf->agent_fe.cap = PR_CAP_FE;
3036 conf->agent_fe.mode = PR_MODE_TCP;
3037 conf->agent_fe.maxconn = 0;
3038 conf->agent_fe.options2 |= PR_O2_INDEPSTR;
3039 conf->agent_fe.conn_retries = CONN_RETRIES;
3040 conf->agent_fe.accept = frontend_accept;
3041 conf->agent_fe.srv = NULL;
3042 conf->agent_fe.timeout.client = TICK_ETERNITY;
3043 conf->agent_fe.default_target = &spoe_applet.obj_type;
3044 conf->agent_fe.fe_req_ana = AN_REQ_SWITCHING_RULES;
3045
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003046 if (!sighandler_registered) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01003047 signal_register_fct(0, spoe_sig_stop, 0);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003048 sighandler_registered = 1;
3049 }
3050
Christopher Faulet00292352019-01-09 15:05:10 +01003051 fconf->flags |= FLT_CFG_FL_HTX;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003052 return 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003053}
3054
3055/* Free ressources allocated by the SPOE filter. */
3056static void
3057spoe_deinit(struct proxy *px, struct flt_conf *fconf)
3058{
3059 struct spoe_config *conf = fconf->conf;
3060
3061 if (conf) {
3062 struct spoe_agent *agent = conf->agent;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003063
Christopher Faulet8ef75252017-02-20 22:56:03 +01003064 spoe_release_agent(agent);
Christopher Faulet7ee86672017-09-19 11:08:28 +02003065 free(conf->id);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003066 free(conf);
3067 }
3068 fconf->conf = NULL;
3069}
3070
3071/* Check configuration of a SPOE filter for a specified proxy.
3072 * Return 1 on error, else 0. */
3073static int
3074spoe_check(struct proxy *px, struct flt_conf *fconf)
3075{
Christopher Faulet7ee86672017-09-19 11:08:28 +02003076 struct flt_conf *f;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003077 struct spoe_config *conf = fconf->conf;
3078 struct proxy *target;
Willy Tarreaub0769b22019-02-07 13:40:33 +01003079 int i;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003080
Christopher Faulet7ee86672017-09-19 11:08:28 +02003081 /* Check all SPOE filters for proxy <px> to be sure all SPOE agent names
3082 * are uniq */
3083 list_for_each_entry(f, &px->filter_configs, list) {
3084 struct spoe_config *c = f->conf;
3085
3086 /* This is not an SPOE filter */
3087 if (f->id != spoe_filter_id)
3088 continue;
3089 /* This is the current SPOE filter */
3090 if (f == fconf)
3091 continue;
3092
3093 /* Check engine Id. It should be uniq */
3094 if (!strcmp(conf->id, c->id)) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003095 ha_alert("Proxy %s : duplicated name for SPOE engine '%s'.\n",
3096 px->id, conf->id);
Christopher Faulet7ee86672017-09-19 11:08:28 +02003097 return 1;
3098 }
3099 }
3100
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003101 target = proxy_be_by_name(conf->agent->b.name);
3102 if (target == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003103 ha_alert("Proxy %s : unknown backend '%s' used by SPOE agent '%s'"
3104 " declared at %s:%d.\n",
3105 px->id, conf->agent->b.name, conf->agent->id,
3106 conf->agent->conf.file, conf->agent->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003107 return 1;
3108 }
3109 if (target->mode != PR_MODE_TCP) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003110 ha_alert("Proxy %s : backend '%s' used by SPOE agent '%s' declared"
3111 " at %s:%d does not support HTTP mode.\n",
3112 px->id, target->id, conf->agent->id,
3113 conf->agent->conf.file, conf->agent->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003114 return 1;
3115 }
3116
Willy Tarreau2bdcfde2019-02-05 13:37:19 +01003117 if (px->bind_proc & ~target->bind_proc) {
3118 ha_alert("Proxy %s : backend '%s' used by SPOE agent '%s' declared"
3119 " at %s:%d does not cover all of its processes.\n",
3120 px->id, target->id, conf->agent->id,
3121 conf->agent->conf.file, conf->agent->conf.line);
3122 return 1;
3123 }
3124
Christopher Fauletfe261552019-03-18 13:57:42 +01003125 if ((conf->agent->rt = calloc(global.nbthread, sizeof(*conf->agent->rt))) == NULL) {
Willy Tarreaub0769b22019-02-07 13:40:33 +01003126 ha_alert("Proxy %s : out of memory initializing SPOE agent '%s' declared at %s:%d.\n",
3127 px->id, conf->agent->id, conf->agent->conf.file, conf->agent->conf.line);
3128 return 1;
3129 }
3130 for (i = 0; i < global.nbthread; ++i) {
Christopher Faulet46c76822019-09-17 11:55:52 +02003131 conf->agent->rt[i].engine_id = NULL;
Christopher Fauletfe261552019-03-18 13:57:42 +01003132 conf->agent->rt[i].frame_size = conf->agent->max_frame_size;
3133 conf->agent->rt[i].processing = 0;
3134 LIST_INIT(&conf->agent->rt[i].applets);
3135 LIST_INIT(&conf->agent->rt[i].sending_queue);
3136 LIST_INIT(&conf->agent->rt[i].waiting_queue);
3137 HA_SPIN_INIT(&conf->agent->rt[i].lock);
Willy Tarreaub0769b22019-02-07 13:40:33 +01003138 }
3139
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003140 free(conf->agent->b.name);
3141 conf->agent->b.name = NULL;
3142 conf->agent->b.be = target;
3143 return 0;
3144}
3145
Kevin Zhu652c8e22019-09-17 15:05:45 +02003146/* Initializes the SPOE filter for a proxy for a specific thread.
3147 * Returns a negative value if an error occurs. */
3148static int
3149spoe_init_per_thread(struct proxy *p, struct flt_conf *fconf)
3150{
3151 struct spoe_config *conf = fconf->conf;
3152 struct spoe_agent *agent = conf->agent;
3153
Christopher Faulet46c76822019-09-17 11:55:52 +02003154 agent->rt[tid].engine_id = generate_pseudo_uuid();
3155 if (agent->rt[tid].engine_id == NULL)
3156 return -1;
Kevin Zhu652c8e22019-09-17 15:05:45 +02003157 return 0;
3158}
3159
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003160/**************************************************************************
3161 * Hooks attached to a stream
3162 *************************************************************************/
3163/* Called when a filter instance is created and attach to a stream. It creates
3164 * the context that will be used to process this stream. */
3165static int
3166spoe_start(struct stream *s, struct filter *filter)
3167{
Christopher Faulet72bcc472017-01-04 16:39:41 +01003168 struct spoe_config *conf = FLT_CONF(filter);
3169 struct spoe_agent *agent = conf->agent;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003170 struct spoe_context *ctx;
3171
3172 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p\n",
Christopher Faulet72bcc472017-01-04 16:39:41 +01003173 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003174 __FUNCTION__, s);
3175
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01003176 if ((ctx = spoe_create_context(s, filter)) == NULL) {
Christopher Faulet72bcc472017-01-04 16:39:41 +01003177 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
3178 " - failed to create SPOE context\n",
3179 (int)now.tv_sec, (int)now.tv_usec, agent->id,
Christopher Fauletccbc3fd2017-09-15 11:51:18 +02003180 __FUNCTION__, s);
Christopher Faulet3b8e3492018-03-26 17:20:58 +02003181 send_log(&conf->agent_fe, LOG_EMERG,
Christopher Faulet72bcc472017-01-04 16:39:41 +01003182 "SPOE: [%s] failed to create SPOE context\n",
3183 agent->id);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003184 return 0;
3185 }
3186
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003187 return 1;
3188}
3189
3190/* Called when a filter instance is detached from a stream. It release the
3191 * attached SPOE context. */
3192static void
3193spoe_stop(struct stream *s, struct filter *filter)
3194{
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003195 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p\n",
3196 (int)now.tv_sec, (int)now.tv_usec,
3197 ((struct spoe_config *)FLT_CONF(filter))->agent->id,
3198 __FUNCTION__, s);
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01003199 spoe_destroy_context(filter);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003200}
3201
Christopher Fauletf7a30922016-11-10 15:04:51 +01003202
3203/*
3204 * Called when the stream is woken up because of expired timer.
3205 */
3206static void
3207spoe_check_timeouts(struct stream *s, struct filter *filter)
3208{
3209 struct spoe_context *ctx = filter->ctx;
3210
Christopher Fauletac580602018-03-20 16:09:20 +01003211 if (tick_is_expired(ctx->process_exp, now_ms))
Christopher Fauleta73e59b2016-12-09 17:30:18 +01003212 s->pending_events |= TASK_WOKEN_MSG;
Christopher Fauletf7a30922016-11-10 15:04:51 +01003213}
3214
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003215/* Called when we are ready to filter data on a channel */
3216static int
3217spoe_start_analyze(struct stream *s, struct filter *filter, struct channel *chn)
3218{
3219 struct spoe_context *ctx = filter->ctx;
3220 int ret = 1;
3221
3222 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p - ctx-state=%s"
3223 " - ctx-flags=0x%08x\n",
3224 (int)now.tv_sec, (int)now.tv_usec,
3225 ((struct spoe_config *)FLT_CONF(filter))->agent->id,
3226 __FUNCTION__, s, spoe_ctx_state_str[ctx->state], ctx->flags);
3227
Christopher Fauletb067b062017-01-04 16:39:11 +01003228 if (ctx->state == SPOE_CTX_ST_NONE)
3229 goto out;
3230
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003231 if (!(chn->flags & CF_ISRESP)) {
Christopher Fauletbebe2552021-06-25 19:11:49 +02003232 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_TCP_REQ_FE]))
3233 filter->pre_analyzers |= AN_REQ_INSPECT_FE;
3234
3235 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_TCP_REQ_BE]))
3236 filter->pre_analyzers |= AN_REQ_INSPECT_BE;
3237
3238 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_TCP_RSP]))
3239 filter->pre_analyzers |= AN_RES_INSPECT;
3240
3241 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_HTTP_REQ_FE]))
3242 filter->pre_analyzers |= AN_REQ_HTTP_PROCESS_FE;
3243
3244 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_HTTP_REQ_BE]))
3245 filter->pre_analyzers |= AN_REQ_HTTP_PROCESS_BE;
3246
3247 if (!LIST_ISEMPTY(&ctx->events[SPOE_EV_ON_HTTP_RSP]))
3248 filter->pre_analyzers |= AN_RES_HTTP_PROCESS_FE;
3249
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003250 if (filter->pre_analyzers & AN_REQ_INSPECT_FE)
3251 chn->analysers |= AN_REQ_INSPECT_FE;
3252 if (filter->pre_analyzers & AN_REQ_INSPECT_BE)
3253 chn->analysers |= AN_REQ_INSPECT_BE;
3254
3255 if (ctx->flags & SPOE_CTX_FL_CLI_CONNECTED)
3256 goto out;
3257
3258 ctx->stream_id = s->uniq_id;
Christopher Faulet8ef75252017-02-20 22:56:03 +01003259 ret = spoe_process_event(s, ctx, SPOE_EV_ON_CLIENT_SESS);
Christopher Fauletb067b062017-01-04 16:39:11 +01003260 if (!ret)
3261 goto out;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003262 ctx->flags |= SPOE_CTX_FL_CLI_CONNECTED;
3263 }
3264 else {
Miroslav Zagoracd995d5f2020-06-19 22:17:17 +02003265 if (filter->pre_analyzers & AN_RES_INSPECT)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003266 chn->analysers |= AN_RES_INSPECT;
3267
3268 if (ctx->flags & SPOE_CTX_FL_SRV_CONNECTED)
3269 goto out;
3270
Christopher Faulet8ef75252017-02-20 22:56:03 +01003271 ret = spoe_process_event(s, ctx, SPOE_EV_ON_SERVER_SESS);
Christopher Fauleta1cda022016-12-21 08:58:06 +01003272 if (!ret) {
3273 channel_dont_read(chn);
3274 channel_dont_close(chn);
Christopher Fauletb067b062017-01-04 16:39:11 +01003275 goto out;
Christopher Fauleta1cda022016-12-21 08:58:06 +01003276 }
Christopher Fauletb067b062017-01-04 16:39:11 +01003277 ctx->flags |= SPOE_CTX_FL_SRV_CONNECTED;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003278 }
3279
3280 out:
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003281 return ret;
3282}
3283
3284/* Called before a processing happens on a given channel */
3285static int
3286spoe_chn_pre_analyze(struct stream *s, struct filter *filter,
3287 struct channel *chn, unsigned an_bit)
3288{
3289 struct spoe_context *ctx = filter->ctx;
3290 int ret = 1;
3291
3292 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p - ctx-state=%s"
3293 " - ctx-flags=0x%08x - ana=0x%08x\n",
3294 (int)now.tv_sec, (int)now.tv_usec,
3295 ((struct spoe_config *)FLT_CONF(filter))->agent->id,
3296 __FUNCTION__, s, spoe_ctx_state_str[ctx->state],
3297 ctx->flags, an_bit);
3298
Christopher Fauletb067b062017-01-04 16:39:11 +01003299 if (ctx->state == SPOE_CTX_ST_NONE)
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003300 goto out;
3301
3302 switch (an_bit) {
3303 case AN_REQ_INSPECT_FE:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003304 ret = spoe_process_event(s, ctx, SPOE_EV_ON_TCP_REQ_FE);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003305 break;
3306 case AN_REQ_INSPECT_BE:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003307 ret = spoe_process_event(s, ctx, SPOE_EV_ON_TCP_REQ_BE);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003308 break;
3309 case AN_RES_INSPECT:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003310 ret = spoe_process_event(s, ctx, SPOE_EV_ON_TCP_RSP);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003311 break;
3312 case AN_REQ_HTTP_PROCESS_FE:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003313 ret = spoe_process_event(s, ctx, SPOE_EV_ON_HTTP_REQ_FE);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003314 break;
3315 case AN_REQ_HTTP_PROCESS_BE:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003316 ret = spoe_process_event(s, ctx, SPOE_EV_ON_HTTP_REQ_BE);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003317 break;
3318 case AN_RES_HTTP_PROCESS_FE:
Christopher Faulet8ef75252017-02-20 22:56:03 +01003319 ret = spoe_process_event(s, ctx, SPOE_EV_ON_HTTP_RSP);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003320 break;
3321 }
3322
3323 out:
Christopher Faulet9cdca972018-02-01 08:45:45 +01003324 if (!ret && (chn->flags & CF_ISRESP)) {
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003325 channel_dont_read(chn);
3326 channel_dont_close(chn);
3327 }
3328 return ret;
3329}
3330
3331/* Called when the filtering on the channel ends. */
3332static int
3333spoe_end_analyze(struct stream *s, struct filter *filter, struct channel *chn)
3334{
3335 struct spoe_context *ctx = filter->ctx;
3336
3337 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p - ctx-state=%s"
3338 " - ctx-flags=0x%08x\n",
3339 (int)now.tv_sec, (int)now.tv_usec,
3340 ((struct spoe_config *)FLT_CONF(filter))->agent->id,
3341 __FUNCTION__, s, spoe_ctx_state_str[ctx->state], ctx->flags);
3342
3343 if (!(ctx->flags & SPOE_CTX_FL_PROCESS)) {
Christopher Faulet8ef75252017-02-20 22:56:03 +01003344 spoe_reset_context(ctx);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003345 }
3346
3347 return 1;
3348}
3349
3350/********************************************************************
3351 * Functions that manage the filter initialization
3352 ********************************************************************/
3353struct flt_ops spoe_ops = {
3354 /* Manage SPOE filter, called for each filter declaration */
3355 .init = spoe_init,
3356 .deinit = spoe_deinit,
3357 .check = spoe_check,
Kevin Zhu652c8e22019-09-17 15:05:45 +02003358 .init_per_thread = spoe_init_per_thread,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003359
3360 /* Handle start/stop of SPOE */
Christopher Fauletf7a30922016-11-10 15:04:51 +01003361 .attach = spoe_start,
3362 .detach = spoe_stop,
3363 .check_timeouts = spoe_check_timeouts,
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003364
3365 /* Handle channels activity */
3366 .channel_start_analyze = spoe_start_analyze,
3367 .channel_pre_analyze = spoe_chn_pre_analyze,
3368 .channel_end_analyze = spoe_end_analyze,
3369};
3370
3371
3372static int
3373cfg_parse_spoe_agent(const char *file, int linenum, char **args, int kwm)
3374{
3375 const char *err;
3376 int i, err_code = 0;
3377
3378 if ((cfg_scope == NULL && curengine != NULL) ||
3379 (cfg_scope != NULL && curengine == NULL) ||
Christopher Faulete1405e52017-09-19 10:35:35 +02003380 (curengine != NULL && cfg_scope != NULL && strcmp(curengine, cfg_scope)))
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003381 goto out;
3382
3383 if (!strcmp(args[0], "spoe-agent")) { /* new spoe-agent section */
3384 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003385 ha_alert("parsing [%s:%d] : missing name for spoe-agent section.\n",
3386 file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003387 err_code |= ERR_ALERT | ERR_ABORT;
3388 goto out;
3389 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003390 if (alertif_too_many_args(1, file, linenum, args, &err_code)) {
3391 err_code |= ERR_ABORT;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003392 goto out;
3393 }
3394
3395 err = invalid_char(args[1]);
3396 if (err) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003397 ha_alert("parsing [%s:%d] : character '%c' is not permitted in '%s' name '%s'.\n",
3398 file, linenum, *err, args[0], args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003399 err_code |= ERR_ALERT | ERR_ABORT;
3400 goto out;
3401 }
3402
3403 if (curagent != NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003404 ha_alert("parsing [%s:%d] : another spoe-agent section previously defined.\n",
3405 file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003406 err_code |= ERR_ALERT | ERR_ABORT;
3407 goto out;
3408 }
3409 if ((curagent = calloc(1, sizeof(*curagent))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003410 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003411 err_code |= ERR_ALERT | ERR_ABORT;
3412 goto out;
3413 }
3414
3415 curagent->id = strdup(args[1]);
Christopher Fauleta1cda022016-12-21 08:58:06 +01003416
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003417 curagent->conf.file = strdup(file);
3418 curagent->conf.line = linenum;
Christopher Fauleta1cda022016-12-21 08:58:06 +01003419
3420 curagent->timeout.hello = TICK_ETERNITY;
3421 curagent->timeout.idle = TICK_ETERNITY;
Christopher Fauletf7a30922016-11-10 15:04:51 +01003422 curagent->timeout.processing = TICK_ETERNITY;
Christopher Fauleta1cda022016-12-21 08:58:06 +01003423
Christopher Fauleta1cda022016-12-21 08:58:06 +01003424 curagent->var_pfx = NULL;
3425 curagent->var_on_error = NULL;
Christopher Faulet36bda1c2018-03-22 09:08:20 +01003426 curagent->var_t_process = NULL;
3427 curagent->var_t_total = NULL;
Christopher Faulet46c76822019-09-17 11:55:52 +02003428 curagent->flags = (SPOE_FL_ASYNC | SPOE_FL_PIPELINING | SPOE_FL_SND_FRAGMENTATION);
Christopher Fauleta1cda022016-12-21 08:58:06 +01003429 curagent->cps_max = 0;
3430 curagent->eps_max = 0;
Christopher Faulet7aa0b2b2017-01-13 11:30:50 +01003431 curagent->max_frame_size = MAX_FRAME_SIZE;
Christopher Fauletb077cdc2018-01-24 16:37:57 +01003432 curagent->max_fpa = 20;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003433
3434 for (i = 0; i < SPOE_EV_EVENTS; ++i)
Christopher Faulet11610f32017-09-21 10:23:10 +02003435 LIST_INIT(&curagent->events[i]);
3436 LIST_INIT(&curagent->groups);
3437 LIST_INIT(&curagent->messages);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003438 }
3439 else if (!strcmp(args[0], "use-backend")) {
3440 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003441 ha_alert("parsing [%s:%d] : '%s' expects a backend name.\n",
3442 file, linenum, args[0]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003443 err_code |= ERR_ALERT | ERR_FATAL;
3444 goto out;
3445 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003446 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003447 goto out;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003448 free(curagent->b.name);
3449 curagent->b.name = strdup(args[1]);
3450 }
3451 else if (!strcmp(args[0], "messages")) {
3452 int cur_arg = 1;
3453 while (*args[cur_arg]) {
Christopher Faulet11610f32017-09-21 10:23:10 +02003454 struct spoe_placeholder *ph = NULL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003455
Christopher Faulet11610f32017-09-21 10:23:10 +02003456 list_for_each_entry(ph, &curmphs, list) {
3457 if (!strcmp(ph->id, args[cur_arg])) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003458 ha_alert("parsing [%s:%d]: spoe-message '%s' already used.\n",
3459 file, linenum, args[cur_arg]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003460 err_code |= ERR_ALERT | ERR_FATAL;
3461 goto out;
3462 }
3463 }
3464
Christopher Faulet11610f32017-09-21 10:23:10 +02003465 if ((ph = calloc(1, sizeof(*ph))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003466 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003467 err_code |= ERR_ALERT | ERR_ABORT;
3468 goto out;
3469 }
Christopher Faulet11610f32017-09-21 10:23:10 +02003470 ph->id = strdup(args[cur_arg]);
3471 LIST_ADDQ(&curmphs, &ph->list);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003472 cur_arg++;
3473 }
3474 }
Christopher Faulet11610f32017-09-21 10:23:10 +02003475 else if (!strcmp(args[0], "groups")) {
3476 int cur_arg = 1;
3477 while (*args[cur_arg]) {
3478 struct spoe_placeholder *ph = NULL;
3479
3480 list_for_each_entry(ph, &curgphs, list) {
3481 if (!strcmp(ph->id, args[cur_arg])) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003482 ha_alert("parsing [%s:%d]: spoe-group '%s' already used.\n",
3483 file, linenum, args[cur_arg]);
Christopher Faulet11610f32017-09-21 10:23:10 +02003484 err_code |= ERR_ALERT | ERR_FATAL;
3485 goto out;
3486 }
3487 }
3488
3489 if ((ph = calloc(1, sizeof(*ph))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003490 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Faulet11610f32017-09-21 10:23:10 +02003491 err_code |= ERR_ALERT | ERR_ABORT;
3492 goto out;
3493 }
3494 ph->id = strdup(args[cur_arg]);
3495 LIST_ADDQ(&curgphs, &ph->list);
3496 cur_arg++;
3497 }
3498 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003499 else if (!strcmp(args[0], "timeout")) {
3500 unsigned int *tv = NULL;
3501 const char *res;
3502 unsigned timeout;
3503
3504 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003505 ha_alert("parsing [%s:%d] : 'timeout' expects 'hello', 'idle' and 'processing'.\n",
3506 file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003507 err_code |= ERR_ALERT | ERR_FATAL;
3508 goto out;
3509 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003510 if (alertif_too_many_args(2, file, linenum, args, &err_code))
3511 goto out;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003512 if (!strcmp(args[1], "hello"))
3513 tv = &curagent->timeout.hello;
3514 else if (!strcmp(args[1], "idle"))
3515 tv = &curagent->timeout.idle;
Christopher Fauletf7a30922016-11-10 15:04:51 +01003516 else if (!strcmp(args[1], "processing"))
3517 tv = &curagent->timeout.processing;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003518 else {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003519 ha_alert("parsing [%s:%d] : 'timeout' supports 'hello', 'idle' or 'processing' (got %s).\n",
3520 file, linenum, args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003521 err_code |= ERR_ALERT | ERR_FATAL;
3522 goto out;
3523 }
3524 if (!*args[2]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003525 ha_alert("parsing [%s:%d] : 'timeout %s' expects an integer value (in milliseconds).\n",
3526 file, linenum, args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003527 err_code |= ERR_ALERT | ERR_FATAL;
3528 goto out;
3529 }
3530 res = parse_time_err(args[2], &timeout, TIME_UNIT_MS);
Willy Tarreau9faebe32019-06-07 19:00:37 +02003531 if (res == PARSE_TIME_OVER) {
3532 ha_alert("parsing [%s:%d]: timer overflow in argument <%s> to <%s %s>, maximum value is 2147483647 ms (~24.8 days).\n",
3533 file, linenum, args[2], args[0], args[1]);
3534 err_code |= ERR_ALERT | ERR_FATAL;
3535 goto out;
3536 }
3537 else if (res == PARSE_TIME_UNDER) {
3538 ha_alert("parsing [%s:%d]: timer underflow in argument <%s> to <%s %s>, minimum non-null value is 1 ms.\n",
3539 file, linenum, args[2], args[0], args[1]);
3540 err_code |= ERR_ALERT | ERR_FATAL;
3541 goto out;
3542 }
3543 else if (res) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003544 ha_alert("parsing [%s:%d] : unexpected character '%c' in 'timeout %s'.\n",
3545 file, linenum, *res, args[1]);
Christopher Fauletecc537a2017-02-23 22:52:39 +01003546 err_code |= ERR_ALERT | ERR_FATAL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003547 goto out;
3548 }
3549 *tv = MS_TO_TICKS(timeout);
3550 }
3551 else if (!strcmp(args[0], "option")) {
3552 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003553 ha_alert("parsing [%s:%d]: '%s' expects an option name.\n",
3554 file, linenum, args[0]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003555 err_code |= ERR_ALERT | ERR_FATAL;
3556 goto out;
3557 }
Christopher Faulet6a2940c2017-02-23 15:06:26 +01003558
Christopher Faulet305c6072017-02-23 16:17:53 +01003559 if (!strcmp(args[1], "pipelining")) {
Christopher Fauletecc537a2017-02-23 22:52:39 +01003560 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Faulet305c6072017-02-23 16:17:53 +01003561 goto out;
Christopher Faulet305c6072017-02-23 16:17:53 +01003562 if (kwm == 1)
3563 curagent->flags &= ~SPOE_FL_PIPELINING;
3564 else
3565 curagent->flags |= SPOE_FL_PIPELINING;
3566 goto out;
3567 }
3568 else if (!strcmp(args[1], "async")) {
Christopher Fauletecc537a2017-02-23 22:52:39 +01003569 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Faulet305c6072017-02-23 16:17:53 +01003570 goto out;
Christopher Faulet305c6072017-02-23 16:17:53 +01003571 if (kwm == 1)
3572 curagent->flags &= ~SPOE_FL_ASYNC;
Christopher Faulet46c76822019-09-17 11:55:52 +02003573 else
3574 curagent->flags |= SPOE_FL_ASYNC;
Christopher Faulet305c6072017-02-23 16:17:53 +01003575 goto out;
3576 }
Christopher Fauletcecd8522017-02-24 22:11:21 +01003577 else if (!strcmp(args[1], "send-frag-payload")) {
3578 if (alertif_too_many_args(1, file, linenum, args, &err_code))
3579 goto out;
3580 if (kwm == 1)
3581 curagent->flags &= ~SPOE_FL_SND_FRAGMENTATION;
3582 else
3583 curagent->flags |= SPOE_FL_SND_FRAGMENTATION;
3584 goto out;
3585 }
Christopher Faulet0e0f0852018-03-26 17:20:36 +02003586 else if (!strcmp(args[1], "dontlog-normal")) {
3587 if (alertif_too_many_args(1, file, linenum, args, &err_code))
3588 goto out;
3589 if (kwm == 1)
3590 curpxopts2 &= ~PR_O2_NOLOGNORM;
3591 else
3592 curpxopts2 |= PR_O2_NOLOGNORM;
Christopher Faulet799f5182018-04-26 11:36:34 +02003593 goto out;
Christopher Faulet0e0f0852018-03-26 17:20:36 +02003594 }
Christopher Faulet305c6072017-02-23 16:17:53 +01003595
Christopher Faulet6a2940c2017-02-23 15:06:26 +01003596 /* Following options does not support negation */
3597 if (kwm == 1) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003598 ha_alert("parsing [%s:%d]: negation is not supported for option '%s'.\n",
3599 file, linenum, args[1]);
Christopher Faulet6a2940c2017-02-23 15:06:26 +01003600 err_code |= ERR_ALERT | ERR_FATAL;
3601 goto out;
3602 }
3603
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003604 if (!strcmp(args[1], "var-prefix")) {
3605 char *tmp;
3606
3607 if (!*args[2]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003608 ha_alert("parsing [%s:%d]: '%s %s' expects a value.\n",
3609 file, linenum, args[0],
3610 args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003611 err_code |= ERR_ALERT | ERR_FATAL;
3612 goto out;
3613 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003614 if (alertif_too_many_args(2, file, linenum, args, &err_code))
3615 goto out;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003616 tmp = args[2];
3617 while (*tmp) {
3618 if (!isalnum(*tmp) && *tmp != '_' && *tmp != '.') {
Thierry FOURNIER01a3f202018-05-10 16:41:26 +02003619 ha_alert("parsing [%s:%d]: '%s %s' only supports [a-zA-Z0-9_.] chars.\n",
Christopher Faulet767a84b2017-11-24 16:50:31 +01003620 file, linenum, args[0], args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003621 err_code |= ERR_ALERT | ERR_FATAL;
3622 goto out;
3623 }
3624 tmp++;
3625 }
3626 curagent->var_pfx = strdup(args[2]);
3627 }
Etienne Carriereaec89892017-12-14 09:36:40 +00003628 else if (!strcmp(args[1], "force-set-var")) {
3629 if (alertif_too_many_args(1, file, linenum, args, &err_code))
3630 goto out;
3631 curagent->flags |= SPOE_FL_FORCE_SET_VAR;
3632 }
Christopher Fauletea62c2a2016-11-14 10:54:21 +01003633 else if (!strcmp(args[1], "continue-on-error")) {
Christopher Fauletecc537a2017-02-23 22:52:39 +01003634 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Fauletea62c2a2016-11-14 10:54:21 +01003635 goto out;
Christopher Fauletea62c2a2016-11-14 10:54:21 +01003636 curagent->flags |= SPOE_FL_CONT_ON_ERR;
3637 }
Christopher Faulet985532d2016-11-16 15:36:19 +01003638 else if (!strcmp(args[1], "set-on-error")) {
3639 char *tmp;
3640
3641 if (!*args[2]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003642 ha_alert("parsing [%s:%d]: '%s %s' expects a value.\n",
3643 file, linenum, args[0],
3644 args[1]);
Christopher Faulet985532d2016-11-16 15:36:19 +01003645 err_code |= ERR_ALERT | ERR_FATAL;
3646 goto out;
3647 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003648 if (alertif_too_many_args(2, file, linenum, args, &err_code))
3649 goto out;
Christopher Faulet985532d2016-11-16 15:36:19 +01003650 tmp = args[2];
3651 while (*tmp) {
3652 if (!isalnum(*tmp) && *tmp != '_' && *tmp != '.') {
Thierry FOURNIER01a3f202018-05-10 16:41:26 +02003653 ha_alert("parsing [%s:%d]: '%s %s' only supports [a-zA-Z0-9_.] chars.\n",
Christopher Faulet767a84b2017-11-24 16:50:31 +01003654 file, linenum, args[0], args[1]);
Christopher Faulet985532d2016-11-16 15:36:19 +01003655 err_code |= ERR_ALERT | ERR_FATAL;
3656 goto out;
3657 }
3658 tmp++;
3659 }
3660 curagent->var_on_error = strdup(args[2]);
3661 }
Christopher Faulet36bda1c2018-03-22 09:08:20 +01003662 else if (!strcmp(args[1], "set-process-time")) {
3663 char *tmp;
3664
3665 if (!*args[2]) {
3666 ha_alert("parsing [%s:%d]: '%s %s' expects a value.\n",
3667 file, linenum, args[0],
3668 args[1]);
3669 err_code |= ERR_ALERT | ERR_FATAL;
3670 goto out;
3671 }
3672 if (alertif_too_many_args(2, file, linenum, args, &err_code))
3673 goto out;
3674 tmp = args[2];
3675 while (*tmp) {
3676 if (!isalnum(*tmp) && *tmp != '_' && *tmp != '.') {
Thierry FOURNIER01a3f202018-05-10 16:41:26 +02003677 ha_alert("parsing [%s:%d]: '%s %s' only supports [a-zA-Z0-9_.] chars.\n",
Christopher Faulet36bda1c2018-03-22 09:08:20 +01003678 file, linenum, args[0], args[1]);
3679 err_code |= ERR_ALERT | ERR_FATAL;
3680 goto out;
3681 }
3682 tmp++;
3683 }
3684 curagent->var_t_process = strdup(args[2]);
3685 }
3686 else if (!strcmp(args[1], "set-total-time")) {
3687 char *tmp;
3688
3689 if (!*args[2]) {
3690 ha_alert("parsing [%s:%d]: '%s %s' expects a value.\n",
3691 file, linenum, args[0],
3692 args[1]);
3693 err_code |= ERR_ALERT | ERR_FATAL;
3694 goto out;
3695 }
3696 if (alertif_too_many_args(2, file, linenum, args, &err_code))
3697 goto out;
3698 tmp = args[2];
3699 while (*tmp) {
3700 if (!isalnum(*tmp) && *tmp != '_' && *tmp != '.') {
Thierry FOURNIER01a3f202018-05-10 16:41:26 +02003701 ha_alert("parsing [%s:%d]: '%s %s' only supports [a-zA-Z0-9_.] chars.\n",
Christopher Faulet36bda1c2018-03-22 09:08:20 +01003702 file, linenum, args[0], args[1]);
3703 err_code |= ERR_ALERT | ERR_FATAL;
3704 goto out;
3705 }
3706 tmp++;
3707 }
3708 curagent->var_t_total = strdup(args[2]);
3709 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003710 else {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003711 ha_alert("parsing [%s:%d]: option '%s' is not supported.\n",
3712 file, linenum, args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003713 err_code |= ERR_ALERT | ERR_FATAL;
3714 goto out;
3715 }
Christopher Faulet48026722016-11-16 15:01:12 +01003716 }
3717 else if (!strcmp(args[0], "maxconnrate")) {
3718 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003719 ha_alert("parsing [%s:%d] : '%s' expects an integer argument.\n",
3720 file, linenum, args[0]);
Christopher Faulet48026722016-11-16 15:01:12 +01003721 err_code |= ERR_ALERT | ERR_FATAL;
3722 goto out;
3723 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003724 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Faulet48026722016-11-16 15:01:12 +01003725 goto out;
Christopher Faulet48026722016-11-16 15:01:12 +01003726 curagent->cps_max = atol(args[1]);
3727 }
3728 else if (!strcmp(args[0], "maxerrrate")) {
3729 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003730 ha_alert("parsing [%s:%d] : '%s' expects an integer argument.\n",
3731 file, linenum, args[0]);
Christopher Faulet48026722016-11-16 15:01:12 +01003732 err_code |= ERR_ALERT | ERR_FATAL;
3733 goto out;
3734 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003735 if (alertif_too_many_args(1, file, linenum, args, &err_code))
Christopher Faulet48026722016-11-16 15:01:12 +01003736 goto out;
Christopher Faulet48026722016-11-16 15:01:12 +01003737 curagent->eps_max = atol(args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003738 }
Christopher Faulet2eca6b52017-02-27 09:40:34 +01003739 else if (!strcmp(args[0], "max-frame-size")) {
3740 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003741 ha_alert("parsing [%s:%d] : '%s' expects an integer argument.\n",
3742 file, linenum, args[0]);
Christopher Faulet2eca6b52017-02-27 09:40:34 +01003743 err_code |= ERR_ALERT | ERR_FATAL;
3744 goto out;
3745 }
3746 if (alertif_too_many_args(1, file, linenum, args, &err_code))
3747 goto out;
3748 curagent->max_frame_size = atol(args[1]);
3749 if (curagent->max_frame_size < MIN_FRAME_SIZE ||
3750 curagent->max_frame_size > MAX_FRAME_SIZE) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003751 ha_alert("parsing [%s:%d] : '%s' expects a positive integer argument in the range [%d, %d].\n",
3752 file, linenum, args[0], MIN_FRAME_SIZE, MAX_FRAME_SIZE);
Christopher Faulet2eca6b52017-02-27 09:40:34 +01003753 err_code |= ERR_ALERT | ERR_FATAL;
3754 goto out;
3755 }
3756 }
Christopher Faulete8ade382018-01-25 15:32:22 +01003757 else if (!strcmp(args[0], "max-waiting-frames")) {
3758 if (!*args[1]) {
3759 ha_alert("parsing [%s:%d] : '%s' expects an integer argument.\n",
3760 file, linenum, args[0]);
3761 err_code |= ERR_ALERT | ERR_FATAL;
3762 goto out;
3763 }
3764 if (alertif_too_many_args(1, file, linenum, args, &err_code))
3765 goto out;
3766 curagent->max_fpa = atol(args[1]);
3767 if (curagent->max_fpa < 1) {
3768 ha_alert("parsing [%s:%d] : '%s' expects a positive integer argument.\n",
3769 file, linenum, args[0]);
3770 err_code |= ERR_ALERT | ERR_FATAL;
3771 goto out;
3772 }
3773 }
Christopher Faulet336d3ef2017-12-22 10:00:55 +01003774 else if (!strcmp(args[0], "register-var-names")) {
3775 int cur_arg;
3776
3777 if (!*args[1]) {
3778 ha_alert("parsing [%s:%d] : '%s' expects one or more variable names.\n",
3779 file, linenum, args[0]);
3780 err_code |= ERR_ALERT | ERR_FATAL;
3781 goto out;
3782 }
3783 cur_arg = 1;
3784 while (*args[cur_arg]) {
3785 struct spoe_var_placeholder *vph;
3786
3787 if ((vph = calloc(1, sizeof(*vph))) == NULL) {
3788 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
3789 err_code |= ERR_ALERT | ERR_ABORT;
3790 goto out;
3791 }
3792 if ((vph->name = strdup(args[cur_arg])) == NULL) {
Tim Duesterhusf818ea52019-06-23 22:10:13 +02003793 free(vph);
Christopher Faulet336d3ef2017-12-22 10:00:55 +01003794 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
3795 err_code |= ERR_ALERT | ERR_ABORT;
3796 goto out;
3797 }
3798 LIST_ADDQ(&curvars, &vph->list);
3799 cur_arg++;
3800 }
3801 }
Christopher Faulet7250b8f2018-03-26 17:19:01 +02003802 else if (!strcmp(args[0], "log")) {
3803 char *errmsg = NULL;
3804
3805 if (!parse_logsrv(args, &curlogsrvs, (kwm == 1), &errmsg)) {
3806 ha_alert("parsing [%s:%d] : %s : %s\n", file, linenum, args[0], errmsg);
3807 err_code |= ERR_ALERT | ERR_FATAL;
3808 goto out;
3809 }
3810 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003811 else if (*args[0]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003812 ha_alert("parsing [%s:%d] : unknown keyword '%s' in spoe-agent section.\n",
3813 file, linenum, args[0]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003814 err_code |= ERR_ALERT | ERR_FATAL;
3815 goto out;
3816 }
3817 out:
3818 return err_code;
3819}
Christopher Faulet11610f32017-09-21 10:23:10 +02003820static int
3821cfg_parse_spoe_group(const char *file, int linenum, char **args, int kwm)
3822{
3823 struct spoe_group *grp;
3824 const char *err;
3825 int err_code = 0;
3826
3827 if ((cfg_scope == NULL && curengine != NULL) ||
3828 (cfg_scope != NULL && curengine == NULL) ||
3829 (curengine != NULL && cfg_scope != NULL && strcmp(curengine, cfg_scope)))
3830 goto out;
3831
3832 if (!strcmp(args[0], "spoe-group")) { /* new spoe-group section */
3833 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003834 ha_alert("parsing [%s:%d] : missing name for spoe-group section.\n",
3835 file, linenum);
Christopher Faulet11610f32017-09-21 10:23:10 +02003836 err_code |= ERR_ALERT | ERR_ABORT;
3837 goto out;
3838 }
3839 if (alertif_too_many_args(1, file, linenum, args, &err_code)) {
3840 err_code |= ERR_ABORT;
3841 goto out;
3842 }
3843
3844 err = invalid_char(args[1]);
3845 if (err) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003846 ha_alert("parsing [%s:%d] : character '%c' is not permitted in '%s' name '%s'.\n",
3847 file, linenum, *err, args[0], args[1]);
Christopher Faulet11610f32017-09-21 10:23:10 +02003848 err_code |= ERR_ALERT | ERR_ABORT;
3849 goto out;
3850 }
3851
3852 list_for_each_entry(grp, &curgrps, list) {
3853 if (!strcmp(grp->id, args[1])) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003854 ha_alert("parsing [%s:%d]: spoe-group section '%s' has the same"
3855 " name as another one declared at %s:%d.\n",
3856 file, linenum, args[1], grp->conf.file, grp->conf.line);
Christopher Faulet11610f32017-09-21 10:23:10 +02003857 err_code |= ERR_ALERT | ERR_FATAL;
3858 goto out;
3859 }
3860 }
3861
3862 if ((curgrp = calloc(1, sizeof(*curgrp))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003863 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Faulet11610f32017-09-21 10:23:10 +02003864 err_code |= ERR_ALERT | ERR_ABORT;
3865 goto out;
3866 }
3867
3868 curgrp->id = strdup(args[1]);
3869 curgrp->conf.file = strdup(file);
3870 curgrp->conf.line = linenum;
3871 LIST_INIT(&curgrp->phs);
3872 LIST_INIT(&curgrp->messages);
3873 LIST_ADDQ(&curgrps, &curgrp->list);
3874 }
3875 else if (!strcmp(args[0], "messages")) {
3876 int cur_arg = 1;
3877 while (*args[cur_arg]) {
3878 struct spoe_placeholder *ph = NULL;
3879
3880 list_for_each_entry(ph, &curgrp->phs, list) {
3881 if (!strcmp(ph->id, args[cur_arg])) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003882 ha_alert("parsing [%s:%d]: spoe-message '%s' already used.\n",
3883 file, linenum, args[cur_arg]);
Christopher Faulet11610f32017-09-21 10:23:10 +02003884 err_code |= ERR_ALERT | ERR_FATAL;
3885 goto out;
3886 }
3887 }
3888
3889 if ((ph = calloc(1, sizeof(*ph))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003890 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Faulet11610f32017-09-21 10:23:10 +02003891 err_code |= ERR_ALERT | ERR_ABORT;
3892 goto out;
3893 }
3894 ph->id = strdup(args[cur_arg]);
3895 LIST_ADDQ(&curgrp->phs, &ph->list);
3896 cur_arg++;
3897 }
3898 }
3899 else if (*args[0]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003900 ha_alert("parsing [%s:%d] : unknown keyword '%s' in spoe-group section.\n",
3901 file, linenum, args[0]);
Christopher Faulet11610f32017-09-21 10:23:10 +02003902 err_code |= ERR_ALERT | ERR_FATAL;
3903 goto out;
3904 }
3905 out:
3906 return err_code;
3907}
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003908
3909static int
3910cfg_parse_spoe_message(const char *file, int linenum, char **args, int kwm)
3911{
3912 struct spoe_message *msg;
3913 struct spoe_arg *arg;
3914 const char *err;
3915 char *errmsg = NULL;
3916 int err_code = 0;
3917
3918 if ((cfg_scope == NULL && curengine != NULL) ||
3919 (cfg_scope != NULL && curengine == NULL) ||
Christopher Faulete1405e52017-09-19 10:35:35 +02003920 (curengine != NULL && cfg_scope != NULL && strcmp(curengine, cfg_scope)))
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003921 goto out;
3922
3923 if (!strcmp(args[0], "spoe-message")) { /* new spoe-message section */
3924 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003925 ha_alert("parsing [%s:%d] : missing name for spoe-message section.\n",
3926 file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003927 err_code |= ERR_ALERT | ERR_ABORT;
3928 goto out;
3929 }
Christopher Fauletecc537a2017-02-23 22:52:39 +01003930 if (alertif_too_many_args(1, file, linenum, args, &err_code)) {
3931 err_code |= ERR_ABORT;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003932 goto out;
3933 }
3934
3935 err = invalid_char(args[1]);
3936 if (err) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003937 ha_alert("parsing [%s:%d] : character '%c' is not permitted in '%s' name '%s'.\n",
3938 file, linenum, *err, args[0], args[1]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003939 err_code |= ERR_ALERT | ERR_ABORT;
3940 goto out;
3941 }
3942
3943 list_for_each_entry(msg, &curmsgs, list) {
3944 if (!strcmp(msg->id, args[1])) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003945 ha_alert("parsing [%s:%d]: spoe-message section '%s' has the same"
3946 " name as another one declared at %s:%d.\n",
3947 file, linenum, args[1], msg->conf.file, msg->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003948 err_code |= ERR_ALERT | ERR_FATAL;
3949 goto out;
3950 }
3951 }
3952
3953 if ((curmsg = calloc(1, sizeof(*curmsg))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003954 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003955 err_code |= ERR_ALERT | ERR_ABORT;
3956 goto out;
3957 }
3958
3959 curmsg->id = strdup(args[1]);
3960 curmsg->id_len = strlen(curmsg->id);
3961 curmsg->event = SPOE_EV_NONE;
3962 curmsg->conf.file = strdup(file);
3963 curmsg->conf.line = linenum;
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01003964 curmsg->nargs = 0;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003965 LIST_INIT(&curmsg->args);
Christopher Faulet57583e42017-09-04 15:41:09 +02003966 LIST_INIT(&curmsg->acls);
Christopher Faulet11610f32017-09-21 10:23:10 +02003967 LIST_INIT(&curmsg->by_evt);
3968 LIST_INIT(&curmsg->by_grp);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003969 LIST_ADDQ(&curmsgs, &curmsg->list);
3970 }
3971 else if (!strcmp(args[0], "args")) {
3972 int cur_arg = 1;
3973
3974 curproxy->conf.args.ctx = ARGC_SPOE;
3975 curproxy->conf.args.file = file;
3976 curproxy->conf.args.line = linenum;
3977 while (*args[cur_arg]) {
3978 char *delim = strchr(args[cur_arg], '=');
3979 int idx = 0;
3980
3981 if ((arg = calloc(1, sizeof(*arg))) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01003982 ha_alert("parsing [%s:%d] : out of memory.\n", file, linenum);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02003983 err_code |= ERR_ALERT | ERR_ABORT;
3984 goto out;
3985 }
3986
3987 if (!delim) {
3988 arg->name = NULL;
3989 arg->name_len = 0;
3990 delim = args[cur_arg];
3991 }
3992 else {
3993 arg->name = my_strndup(args[cur_arg], delim - args[cur_arg]);
3994 arg->name_len = delim - args[cur_arg];
3995 delim++;
3996 }
Christopher Fauletb0b42382017-02-23 22:41:09 +01003997 arg->expr = sample_parse_expr((char*[]){delim, NULL},
3998 &idx, file, linenum, &errmsg,
3999 &curproxy->conf.args);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004000 if (arg->expr == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004001 ha_alert("parsing [%s:%d] : '%s': %s.\n", file, linenum, args[0], errmsg);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004002 err_code |= ERR_ALERT | ERR_FATAL;
4003 free(arg->name);
4004 free(arg);
4005 goto out;
4006 }
Christopher Fauletf51f5fa2017-01-19 10:01:12 +01004007 curmsg->nargs++;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004008 LIST_ADDQ(&curmsg->args, &arg->list);
4009 cur_arg++;
4010 }
4011 curproxy->conf.args.file = NULL;
4012 curproxy->conf.args.line = 0;
4013 }
Christopher Faulet57583e42017-09-04 15:41:09 +02004014 else if (!strcmp(args[0], "acl")) {
4015 err = invalid_char(args[1]);
4016 if (err) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004017 ha_alert("parsing [%s:%d] : character '%c' is not permitted in acl name '%s'.\n",
4018 file, linenum, *err, args[1]);
Christopher Faulet57583e42017-09-04 15:41:09 +02004019 err_code |= ERR_ALERT | ERR_FATAL;
4020 goto out;
4021 }
Tim Duesterhus6b7ce1e2020-02-05 21:00:50 +01004022 if (strcasecmp(args[1], "or") == 0) {
4023 ha_warning("parsing [%s:%d] : acl name '%s' will never match. 'or' is used to express a "
4024 "logical disjunction within a condition.\n",
4025 file, linenum, args[1]);
4026 err_code |= ERR_WARN;
4027 }
Christopher Faulet57583e42017-09-04 15:41:09 +02004028 if (parse_acl((const char **)args + 1, &curmsg->acls, &errmsg, &curproxy->conf.args, file, linenum) == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004029 ha_alert("parsing [%s:%d] : error detected while parsing ACL '%s' : %s.\n",
4030 file, linenum, args[1], errmsg);
Christopher Faulet57583e42017-09-04 15:41:09 +02004031 err_code |= ERR_ALERT | ERR_FATAL;
4032 goto out;
4033 }
4034 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004035 else if (!strcmp(args[0], "event")) {
4036 if (!*args[1]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004037 ha_alert("parsing [%s:%d] : missing event name.\n", file, linenum);
Christopher Fauletecc537a2017-02-23 22:52:39 +01004038 err_code |= ERR_ALERT | ERR_FATAL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004039 goto out;
4040 }
Christopher Faulet57583e42017-09-04 15:41:09 +02004041 /* if (alertif_too_many_args(1, file, linenum, args, &err_code)) */
4042 /* goto out; */
Christopher Fauletecc537a2017-02-23 22:52:39 +01004043
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004044 if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_CLIENT_SESS]))
4045 curmsg->event = SPOE_EV_ON_CLIENT_SESS;
4046 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_SERVER_SESS]))
4047 curmsg->event = SPOE_EV_ON_SERVER_SESS;
4048
4049 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_TCP_REQ_FE]))
4050 curmsg->event = SPOE_EV_ON_TCP_REQ_FE;
4051 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_TCP_REQ_BE]))
4052 curmsg->event = SPOE_EV_ON_TCP_REQ_BE;
4053 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_TCP_RSP]))
4054 curmsg->event = SPOE_EV_ON_TCP_RSP;
4055
4056 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_HTTP_REQ_FE]))
4057 curmsg->event = SPOE_EV_ON_HTTP_REQ_FE;
4058 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_HTTP_REQ_BE]))
4059 curmsg->event = SPOE_EV_ON_HTTP_REQ_BE;
4060 else if (!strcmp(args[1], spoe_event_str[SPOE_EV_ON_HTTP_RSP]))
4061 curmsg->event = SPOE_EV_ON_HTTP_RSP;
4062 else {
Joseph Herlantf1da69d2018-11-15 13:49:02 -08004063 ha_alert("parsing [%s:%d] : unknown event '%s'.\n",
Christopher Faulet767a84b2017-11-24 16:50:31 +01004064 file, linenum, args[1]);
Christopher Fauletecc537a2017-02-23 22:52:39 +01004065 err_code |= ERR_ALERT | ERR_FATAL;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004066 goto out;
4067 }
Christopher Faulet57583e42017-09-04 15:41:09 +02004068
4069 if (strcmp(args[2], "if") == 0 || strcmp(args[2], "unless") == 0) {
4070 struct acl_cond *cond;
4071
4072 cond = build_acl_cond(file, linenum, &curmsg->acls,
4073 curproxy, (const char **)args+2,
4074 &errmsg);
4075 if (cond == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004076 ha_alert("parsing [%s:%d] : error detected while "
4077 "parsing an 'event %s' condition : %s.\n",
4078 file, linenum, args[1], errmsg);
Christopher Faulet57583e42017-09-04 15:41:09 +02004079 err_code |= ERR_ALERT | ERR_FATAL;
4080 goto out;
4081 }
4082 curmsg->cond = cond;
4083 }
4084 else if (*args[2]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004085 ha_alert("parsing [%s:%d]: 'event %s' expects either 'if' "
4086 "or 'unless' followed by a condition but found '%s'.\n",
4087 file, linenum, args[1], args[2]);
Christopher Faulet57583e42017-09-04 15:41:09 +02004088 err_code |= ERR_ALERT | ERR_FATAL;
4089 goto out;
4090 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004091 }
4092 else if (!*args[0]) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004093 ha_alert("parsing [%s:%d] : unknown keyword '%s' in spoe-message section.\n",
4094 file, linenum, args[0]);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004095 err_code |= ERR_ALERT | ERR_FATAL;
4096 goto out;
4097 }
4098 out:
4099 free(errmsg);
4100 return err_code;
4101}
4102
4103/* Return -1 on error, else 0 */
4104static int
4105parse_spoe_flt(char **args, int *cur_arg, struct proxy *px,
4106 struct flt_conf *fconf, char **err, void *private)
4107{
4108 struct list backup_sections;
4109 struct spoe_config *conf;
4110 struct spoe_message *msg, *msgback;
Christopher Faulet11610f32017-09-21 10:23:10 +02004111 struct spoe_group *grp, *grpback;
4112 struct spoe_placeholder *ph, *phback;
Christopher Faulet336d3ef2017-12-22 10:00:55 +01004113 struct spoe_var_placeholder *vph, *vphback;
Christopher Faulet7250b8f2018-03-26 17:19:01 +02004114 struct logsrv *logsrv, *logsrvback;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004115 char *file = NULL, *engine = NULL;
4116 int ret, pos = *cur_arg + 1;
4117
Christopher Faulet84c844e2018-03-23 14:37:14 +01004118 LIST_INIT(&curmsgs);
4119 LIST_INIT(&curgrps);
4120 LIST_INIT(&curmphs);
4121 LIST_INIT(&curgphs);
4122 LIST_INIT(&curvars);
Christopher Faulet7250b8f2018-03-26 17:19:01 +02004123 LIST_INIT(&curlogsrvs);
Christopher Faulet0e0f0852018-03-26 17:20:36 +02004124 curpxopts = 0;
4125 curpxopts2 = 0;
Christopher Faulet84c844e2018-03-23 14:37:14 +01004126
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004127 conf = calloc(1, sizeof(*conf));
4128 if (conf == NULL) {
4129 memprintf(err, "%s: out of memory", args[*cur_arg]);
4130 goto error;
4131 }
4132 conf->proxy = px;
4133
4134 while (*args[pos]) {
4135 if (!strcmp(args[pos], "config")) {
4136 if (!*args[pos+1]) {
4137 memprintf(err, "'%s' : '%s' option without value",
4138 args[*cur_arg], args[pos]);
4139 goto error;
4140 }
4141 file = args[pos+1];
4142 pos += 2;
4143 }
4144 else if (!strcmp(args[pos], "engine")) {
4145 if (!*args[pos+1]) {
4146 memprintf(err, "'%s' : '%s' option without value",
4147 args[*cur_arg], args[pos]);
4148 goto error;
4149 }
4150 engine = args[pos+1];
4151 pos += 2;
4152 }
4153 else {
4154 memprintf(err, "unknown keyword '%s'", args[pos]);
4155 goto error;
4156 }
4157 }
4158 if (file == NULL) {
4159 memprintf(err, "'%s' : missing config file", args[*cur_arg]);
4160 goto error;
4161 }
4162
4163 /* backup sections and register SPOE sections */
4164 LIST_INIT(&backup_sections);
4165 cfg_backup_sections(&backup_sections);
Christopher Faulet11610f32017-09-21 10:23:10 +02004166 cfg_register_section("spoe-agent", cfg_parse_spoe_agent, NULL);
4167 cfg_register_section("spoe-group", cfg_parse_spoe_group, NULL);
William Lallemandd2ff56d2017-10-16 11:06:50 +02004168 cfg_register_section("spoe-message", cfg_parse_spoe_message, NULL);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004169
4170 /* Parse SPOE filter configuration file */
4171 curengine = engine;
4172 curproxy = px;
4173 curagent = NULL;
4174 curmsg = NULL;
4175 ret = readcfgfile(file);
4176 curproxy = NULL;
4177
4178 /* unregister SPOE sections and restore previous sections */
4179 cfg_unregister_sections();
4180 cfg_restore_sections(&backup_sections);
4181
4182 if (ret == -1) {
4183 memprintf(err, "Could not open configuration file %s : %s",
4184 file, strerror(errno));
4185 goto error;
4186 }
4187 if (ret & (ERR_ABORT|ERR_FATAL)) {
4188 memprintf(err, "Error(s) found in configuration file %s", file);
4189 goto error;
4190 }
4191
4192 /* Check SPOE agent */
4193 if (curagent == NULL) {
4194 memprintf(err, "No SPOE agent found in file %s", file);
4195 goto error;
4196 }
4197 if (curagent->b.name == NULL) {
4198 memprintf(err, "No backend declared for SPOE agent '%s' declared at %s:%d",
4199 curagent->id, curagent->conf.file, curagent->conf.line);
4200 goto error;
4201 }
Christopher Fauletf7a30922016-11-10 15:04:51 +01004202 if (curagent->timeout.hello == TICK_ETERNITY ||
4203 curagent->timeout.idle == TICK_ETERNITY ||
Christopher Fauletf7a30922016-11-10 15:04:51 +01004204 curagent->timeout.processing == TICK_ETERNITY) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004205 ha_warning("Proxy '%s': missing timeouts for SPOE agent '%s' declare at %s:%d.\n"
4206 " | While not properly invalid, you will certainly encounter various problems\n"
4207 " | with such a configuration. To fix this, please ensure that all following\n"
4208 " | timeouts are set to a non-zero value: 'hello', 'idle', 'processing'.\n",
4209 px->id, curagent->id, curagent->conf.file, curagent->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004210 }
4211 if (curagent->var_pfx == NULL) {
4212 char *tmp = curagent->id;
4213
4214 while (*tmp) {
4215 if (!isalnum(*tmp) && *tmp != '_' && *tmp != '.') {
4216 memprintf(err, "Invalid variable prefix '%s' for SPOE agent '%s' declared at %s:%d. "
4217 "Use 'option var-prefix' to set it. Only [a-zA-Z0-9_.] chars are supported.\n",
4218 curagent->id, curagent->id, curagent->conf.file, curagent->conf.line);
4219 goto error;
4220 }
4221 tmp++;
4222 }
4223 curagent->var_pfx = strdup(curagent->id);
4224 }
4225
Christopher Fauletb7426d12018-03-21 14:12:17 +01004226 if (curagent->var_on_error) {
4227 struct arg arg;
4228
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004229 trash.data = snprintf(trash.area, trash.size, "txn.%s.%s",
Christopher Fauletb7426d12018-03-21 14:12:17 +01004230 curagent->var_pfx, curagent->var_on_error);
4231
4232 arg.type = ARGT_STR;
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004233 arg.data.str.area = trash.area;
4234 arg.data.str.data = trash.data;
Christopher Fauletbf9bcb02019-05-13 10:39:36 +02004235 arg.data.str.size = 0; /* Set it to 0 to not release it in vars_check_args() */
Christopher Fauletb7426d12018-03-21 14:12:17 +01004236 if (!vars_check_arg(&arg, err)) {
4237 memprintf(err, "SPOE agent '%s': failed to register variable %s.%s (%s)",
4238 curagent->id, curagent->var_pfx, curagent->var_on_error, *err);
4239 goto error;
4240 }
4241 }
4242
Christopher Faulet36bda1c2018-03-22 09:08:20 +01004243 if (curagent->var_t_process) {
4244 struct arg arg;
4245
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004246 trash.data = snprintf(trash.area, trash.size, "txn.%s.%s",
Christopher Faulet36bda1c2018-03-22 09:08:20 +01004247 curagent->var_pfx, curagent->var_t_process);
4248
4249 arg.type = ARGT_STR;
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004250 arg.data.str.area = trash.area;
4251 arg.data.str.data = trash.data;
Christopher Fauletbf9bcb02019-05-13 10:39:36 +02004252 arg.data.str.size = 0; /* Set it to 0 to not release it in vars_check_args() */
Christopher Faulet36bda1c2018-03-22 09:08:20 +01004253 if (!vars_check_arg(&arg, err)) {
4254 memprintf(err, "SPOE agent '%s': failed to register variable %s.%s (%s)",
4255 curagent->id, curagent->var_pfx, curagent->var_t_process, *err);
4256 goto error;
4257 }
4258 }
4259
4260 if (curagent->var_t_total) {
4261 struct arg arg;
4262
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004263 trash.data = snprintf(trash.area, trash.size, "txn.%s.%s",
Christopher Faulet36bda1c2018-03-22 09:08:20 +01004264 curagent->var_pfx, curagent->var_t_total);
4265
4266 arg.type = ARGT_STR;
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004267 arg.data.str.area = trash.area;
4268 arg.data.str.data = trash.data;
Christopher Fauletbf9bcb02019-05-13 10:39:36 +02004269 arg.data.str.size = 0; /* Set it to 0 to not release it in vars_check_args() */
Christopher Faulet36bda1c2018-03-22 09:08:20 +01004270 if (!vars_check_arg(&arg, err)) {
4271 memprintf(err, "SPOE agent '%s': failed to register variable %s.%s (%s)",
4272 curagent->id, curagent->var_pfx, curagent->var_t_process, *err);
4273 goto error;
4274 }
4275 }
4276
Christopher Faulet11610f32017-09-21 10:23:10 +02004277 if (LIST_ISEMPTY(&curmphs) && LIST_ISEMPTY(&curgphs)) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004278 ha_warning("Proxy '%s': No message/group used by SPOE agent '%s' declared at %s:%d.\n",
4279 px->id, curagent->id, curagent->conf.file, curagent->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004280 goto finish;
4281 }
4282
Christopher Faulet11610f32017-09-21 10:23:10 +02004283 /* Replace placeholders by the corresponding messages for the SPOE
4284 * agent */
4285 list_for_each_entry(ph, &curmphs, list) {
4286 list_for_each_entry(msg, &curmsgs, list) {
Christopher Fauleta21b0642017-01-09 16:56:23 +01004287 struct spoe_arg *arg;
4288 unsigned int where;
4289
Christopher Faulet11610f32017-09-21 10:23:10 +02004290 if (!strcmp(msg->id, ph->id)) {
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004291 if ((px->cap & (PR_CAP_FE|PR_CAP_BE)) == (PR_CAP_FE|PR_CAP_BE)) {
4292 if (msg->event == SPOE_EV_ON_TCP_REQ_BE)
4293 msg->event = SPOE_EV_ON_TCP_REQ_FE;
4294 if (msg->event == SPOE_EV_ON_HTTP_REQ_BE)
4295 msg->event = SPOE_EV_ON_HTTP_REQ_FE;
4296 }
4297 if (!(px->cap & PR_CAP_FE) && (msg->event == SPOE_EV_ON_CLIENT_SESS ||
4298 msg->event == SPOE_EV_ON_TCP_REQ_FE ||
4299 msg->event == SPOE_EV_ON_HTTP_REQ_FE)) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004300 ha_warning("Proxy '%s': frontend event used on a backend proxy at %s:%d.\n",
4301 px->id, msg->conf.file, msg->conf.line);
Christopher Faulet11610f32017-09-21 10:23:10 +02004302 goto next_mph;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004303 }
4304 if (msg->event == SPOE_EV_NONE) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01004305 ha_warning("Proxy '%s': Ignore SPOE message '%s' without event at %s:%d.\n",
4306 px->id, msg->id, msg->conf.file, msg->conf.line);
Christopher Faulet11610f32017-09-21 10:23:10 +02004307 goto next_mph;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004308 }
Christopher Fauleta21b0642017-01-09 16:56:23 +01004309
4310 where = 0;
4311 switch (msg->event) {
4312 case SPOE_EV_ON_CLIENT_SESS:
4313 where |= SMP_VAL_FE_CON_ACC;
4314 break;
4315
4316 case SPOE_EV_ON_TCP_REQ_FE:
4317 where |= SMP_VAL_FE_REQ_CNT;
4318 break;
4319
4320 case SPOE_EV_ON_HTTP_REQ_FE:
4321 where |= SMP_VAL_FE_HRQ_HDR;
4322 break;
4323
4324 case SPOE_EV_ON_TCP_REQ_BE:
4325 if (px->cap & PR_CAP_FE)
4326 where |= SMP_VAL_FE_REQ_CNT;
4327 if (px->cap & PR_CAP_BE)
4328 where |= SMP_VAL_BE_REQ_CNT;
4329 break;
4330
4331 case SPOE_EV_ON_HTTP_REQ_BE:
4332 if (px->cap & PR_CAP_FE)
4333 where |= SMP_VAL_FE_HRQ_HDR;
4334 if (px->cap & PR_CAP_BE)
4335 where |= SMP_VAL_BE_HRQ_HDR;
4336 break;
4337
4338 case SPOE_EV_ON_SERVER_SESS:
4339 where |= SMP_VAL_BE_SRV_CON;
4340 break;
4341
4342 case SPOE_EV_ON_TCP_RSP:
4343 if (px->cap & PR_CAP_FE)
4344 where |= SMP_VAL_FE_RES_CNT;
4345 if (px->cap & PR_CAP_BE)
4346 where |= SMP_VAL_BE_RES_CNT;
4347 break;
4348
4349 case SPOE_EV_ON_HTTP_RSP:
4350 if (px->cap & PR_CAP_FE)
4351 where |= SMP_VAL_FE_HRS_HDR;
4352 if (px->cap & PR_CAP_BE)
4353 where |= SMP_VAL_BE_HRS_HDR;
4354 break;
4355
4356 default:
4357 break;
4358 }
4359
4360 list_for_each_entry(arg, &msg->args, list) {
4361 if (!(arg->expr->fetch->val & where)) {
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004362 memprintf(err, "Ignore SPOE message '%s' at %s:%d: "
Christopher Fauleta21b0642017-01-09 16:56:23 +01004363 "some args extract information from '%s', "
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004364 "none of which is available here ('%s')",
4365 msg->id, msg->conf.file, msg->conf.line,
Christopher Fauleta21b0642017-01-09 16:56:23 +01004366 sample_ckp_names(arg->expr->fetch->use),
4367 sample_ckp_names(where));
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004368 goto error;
Christopher Fauleta21b0642017-01-09 16:56:23 +01004369 }
4370 }
4371
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004372 msg->agent = curagent;
Christopher Faulet11610f32017-09-21 10:23:10 +02004373 LIST_ADDQ(&curagent->events[msg->event], &msg->by_evt);
4374 goto next_mph;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004375 }
4376 }
4377 memprintf(err, "SPOE agent '%s' try to use undefined SPOE message '%s' at %s:%d",
Christopher Faulet11610f32017-09-21 10:23:10 +02004378 curagent->id, ph->id, curagent->conf.file, curagent->conf.line);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004379 goto error;
Christopher Faulet11610f32017-09-21 10:23:10 +02004380 next_mph:
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004381 continue;
4382 }
4383
Christopher Faulet11610f32017-09-21 10:23:10 +02004384 /* Replace placeholders by the corresponding groups for the SPOE
4385 * agent */
4386 list_for_each_entry(ph, &curgphs, list) {
4387 list_for_each_entry_safe(grp, grpback, &curgrps, list) {
4388 if (!strcmp(grp->id, ph->id)) {
4389 grp->agent = curagent;
4390 LIST_DEL(&grp->list);
4391 LIST_ADDQ(&curagent->groups, &grp->list);
4392 goto next_aph;
4393 }
4394 }
4395 memprintf(err, "SPOE agent '%s' try to use undefined SPOE group '%s' at %s:%d",
4396 curagent->id, ph->id, curagent->conf.file, curagent->conf.line);
4397 goto error;
4398 next_aph:
4399 continue;
4400 }
4401
4402 /* Replace placeholders by the corresponding message for each SPOE
4403 * group of the SPOE agent */
4404 list_for_each_entry(grp, &curagent->groups, list) {
4405 list_for_each_entry_safe(ph, phback, &grp->phs, list) {
4406 list_for_each_entry(msg, &curmsgs, list) {
4407 if (!strcmp(msg->id, ph->id)) {
4408 if (msg->group != NULL) {
4409 memprintf(err, "SPOE message '%s' already belongs to "
4410 "the SPOE group '%s' declare at %s:%d",
4411 msg->id, msg->group->id,
4412 msg->group->conf.file,
4413 msg->group->conf.line);
4414 goto error;
4415 }
4416
4417 /* Scope for arguments are not checked for now. We will check
4418 * them only if a rule use the corresponding SPOE group. */
4419 msg->agent = curagent;
4420 msg->group = grp;
4421 LIST_DEL(&ph->list);
4422 LIST_ADDQ(&grp->messages, &msg->by_grp);
4423 goto next_mph_grp;
4424 }
4425 }
4426 memprintf(err, "SPOE group '%s' try to use undefined SPOE message '%s' at %s:%d",
4427 grp->id, ph->id, curagent->conf.file, curagent->conf.line);
4428 goto error;
4429 next_mph_grp:
4430 continue;
4431 }
4432 }
4433
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004434 finish:
Christopher Faulet11610f32017-09-21 10:23:10 +02004435 /* move curmsgs to the agent message list */
4436 curmsgs.n->p = &curagent->messages;
4437 curmsgs.p->n = &curagent->messages;
4438 curagent->messages = curmsgs;
4439 LIST_INIT(&curmsgs);
4440
Christopher Faulet7ee86672017-09-19 11:08:28 +02004441 conf->id = strdup(engine ? engine : curagent->id);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004442 conf->agent = curagent;
Christopher Faulet75fc5f32021-08-02 17:51:01 +02004443 curagent->spoe_conf = conf;
Christopher Faulet7250b8f2018-03-26 17:19:01 +02004444
4445 /* Start agent's proxy initialization here. It will be finished during
4446 * the filter init. */
4447 memset(&conf->agent_fe, 0, sizeof(conf->agent_fe));
4448 init_new_proxy(&conf->agent_fe);
4449 conf->agent_fe.id = conf->agent->id;
4450 conf->agent_fe.parent = conf->agent;
Christopher Faulet0e0f0852018-03-26 17:20:36 +02004451 conf->agent_fe.options |= curpxopts;
4452 conf->agent_fe.options2 |= curpxopts2;
Christopher Faulet7250b8f2018-03-26 17:19:01 +02004453
4454 list_for_each_entry_safe(logsrv, logsrvback, &curlogsrvs, list) {
4455 LIST_DEL(&logsrv->list);
4456 LIST_ADDQ(&conf->agent_fe.logsrvs, &logsrv->list);
4457 }
4458
Christopher Faulet11610f32017-09-21 10:23:10 +02004459 list_for_each_entry_safe(ph, phback, &curmphs, list) {
4460 LIST_DEL(&ph->list);
4461 spoe_release_placeholder(ph);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004462 }
Christopher Faulet11610f32017-09-21 10:23:10 +02004463 list_for_each_entry_safe(ph, phback, &curgphs, list) {
4464 LIST_DEL(&ph->list);
4465 spoe_release_placeholder(ph);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004466 }
Christopher Faulet336d3ef2017-12-22 10:00:55 +01004467 list_for_each_entry_safe(vph, vphback, &curvars, list) {
4468 struct arg arg;
4469
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004470 trash.data = snprintf(trash.area, trash.size, "proc.%s.%s",
Christopher Faulet336d3ef2017-12-22 10:00:55 +01004471 curagent->var_pfx, vph->name);
4472
4473 arg.type = ARGT_STR;
Willy Tarreau843b7cb2018-07-13 10:54:26 +02004474 arg.data.str.area = trash.area;
4475 arg.data.str.data = trash.data;
Christopher Fauletbf9bcb02019-05-13 10:39:36 +02004476 arg.data.str.size = 0; /* Set it to 0 to not release it in vars_check_args() */
Christopher Faulet336d3ef2017-12-22 10:00:55 +01004477 if (!vars_check_arg(&arg, err)) {
4478 memprintf(err, "SPOE agent '%s': failed to register variable %s.%s (%s)",
4479 curagent->id, curagent->var_pfx, vph->name, *err);
4480 goto error;
4481 }
4482
4483 LIST_DEL(&vph->list);
4484 free(vph->name);
4485 free(vph);
4486 }
Christopher Faulet11610f32017-09-21 10:23:10 +02004487 list_for_each_entry_safe(grp, grpback, &curgrps, list) {
4488 LIST_DEL(&grp->list);
4489 spoe_release_group(grp);
4490 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004491 *cur_arg = pos;
Christopher Faulet3b386a32017-02-23 10:17:15 +01004492 fconf->id = spoe_filter_id;
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004493 fconf->ops = &spoe_ops;
4494 fconf->conf = conf;
4495 return 0;
4496
4497 error:
Christopher Faulet8ef75252017-02-20 22:56:03 +01004498 spoe_release_agent(curagent);
Christopher Faulet11610f32017-09-21 10:23:10 +02004499 list_for_each_entry_safe(ph, phback, &curmphs, list) {
4500 LIST_DEL(&ph->list);
4501 spoe_release_placeholder(ph);
4502 }
4503 list_for_each_entry_safe(ph, phback, &curgphs, list) {
4504 LIST_DEL(&ph->list);
4505 spoe_release_placeholder(ph);
4506 }
Christopher Faulet336d3ef2017-12-22 10:00:55 +01004507 list_for_each_entry_safe(vph, vphback, &curvars, list) {
4508 LIST_DEL(&vph->list);
4509 free(vph->name);
4510 free(vph);
4511 }
Christopher Faulet11610f32017-09-21 10:23:10 +02004512 list_for_each_entry_safe(grp, grpback, &curgrps, list) {
4513 LIST_DEL(&grp->list);
4514 spoe_release_group(grp);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004515 }
4516 list_for_each_entry_safe(msg, msgback, &curmsgs, list) {
4517 LIST_DEL(&msg->list);
Christopher Faulet8ef75252017-02-20 22:56:03 +01004518 spoe_release_message(msg);
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004519 }
Christopher Faulet7250b8f2018-03-26 17:19:01 +02004520 list_for_each_entry_safe(logsrv, logsrvback, &curlogsrvs, list) {
4521 LIST_DEL(&logsrv->list);
4522 free(logsrv);
4523 }
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004524 free(conf);
4525 return -1;
4526}
4527
Christopher Faulet344c4ab2017-09-22 10:20:13 +02004528/* Send message of a SPOE group. This is the action_ptr callback of a rule
4529 * associated to a "send-spoe-group" action.
4530 *
4531 * It returns ACT_RET_CONT is processing is finished without error, it returns
4532 * ACT_RET_YIELD if the action is in progress. Otherwise it returns
4533 * ACT_RET_ERR. */
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004534static enum act_return
4535spoe_send_group(struct act_rule *rule, struct proxy *px,
4536 struct session *sess, struct stream *s, int flags)
4537{
4538 struct filter *filter;
4539 struct spoe_agent *agent = NULL;
4540 struct spoe_group *group = NULL;
4541 struct spoe_context *ctx = NULL;
4542 int ret, dir;
4543
4544 list_for_each_entry(filter, &s->strm_flt.filters, list) {
4545 if (filter->config == rule->arg.act.p[0]) {
4546 agent = rule->arg.act.p[2];
4547 group = rule->arg.act.p[3];
4548 ctx = filter->ctx;
4549 break;
4550 }
4551 }
4552 if (agent == NULL || group == NULL || ctx == NULL)
4553 return ACT_RET_ERR;
Christopher Faulet344c4ab2017-09-22 10:20:13 +02004554 if (ctx->state == SPOE_CTX_ST_NONE)
4555 return ACT_RET_CONT;
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004556
Christopher Faulet344c4ab2017-09-22 10:20:13 +02004557 switch (rule->from) {
4558 case ACT_F_TCP_REQ_SES: dir = SMP_OPT_DIR_REQ; break;
4559 case ACT_F_TCP_REQ_CNT: dir = SMP_OPT_DIR_REQ; break;
4560 case ACT_F_TCP_RES_CNT: dir = SMP_OPT_DIR_RES; break;
4561 case ACT_F_HTTP_REQ: dir = SMP_OPT_DIR_REQ; break;
4562 case ACT_F_HTTP_RES: dir = SMP_OPT_DIR_RES; break;
4563 default:
4564 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
4565 " - internal error while execute spoe-send-group\n",
4566 (int)now.tv_sec, (int)now.tv_usec, agent->id,
4567 __FUNCTION__, s);
4568 send_log(px, LOG_ERR, "SPOE: [%s] internal error while execute spoe-send-group\n",
4569 agent->id);
4570 return ACT_RET_CONT;
4571 }
4572
4573 ret = spoe_process_group(s, ctx, group, dir);
4574 if (ret == 1)
4575 return ACT_RET_CONT;
4576 else if (ret == 0) {
4577 if (flags & ACT_FLAG_FINAL) {
4578 SPOE_PRINTF(stderr, "%d.%06d [SPOE/%-15s] %s: stream=%p"
4579 " - failed to process group '%s': interrupted by caller\n",
4580 (int)now.tv_sec, (int)now.tv_usec,
4581 agent->id, __FUNCTION__, s, group->id);
4582 ctx->status_code = SPOE_CTX_ERR_INTERRUPT;
Christopher Faulet6f9ea4f2018-01-24 16:13:48 +01004583 spoe_stop_processing(agent, ctx);
Christopher Fauletcaf2fec2018-04-04 10:25:50 +02004584 spoe_handle_processing_error(s, agent, ctx, dir);
Christopher Faulet344c4ab2017-09-22 10:20:13 +02004585 return ACT_RET_CONT;
4586 }
4587 return ACT_RET_YIELD;
4588 }
4589 else
4590 return ACT_RET_ERR;
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004591}
4592
4593/* Check an "send-spoe-group" action. Here, we'll try to find the real SPOE
4594 * group associated to <rule>. The format of an rule using 'send-spoe-group'
4595 * action should be:
4596 *
4597 * (http|tcp)-(request|response) send-spoe-group <engine-id> <group-id>
4598 *
4599 * So, we'll loop on each configured SPOE filter for the proxy <px> to find the
4600 * SPOE engine matching <engine-id>. And then, we'll try to find the good group
4601 * matching <group-id>. Finally, we'll check all messages referenced by the SPOE
4602 * group.
4603 *
4604 * The function returns 1 in success case, otherwise, it returns 0 and err is
4605 * filled.
4606 */
4607static int
4608check_send_spoe_group(struct act_rule *rule, struct proxy *px, char **err)
4609{
4610 struct flt_conf *fconf;
4611 struct spoe_config *conf;
4612 struct spoe_agent *agent = NULL;
4613 struct spoe_group *group;
4614 struct spoe_message *msg;
4615 char *engine_id = rule->arg.act.p[0];
4616 char *group_id = rule->arg.act.p[1];
4617 unsigned int where = 0;
4618
4619 switch (rule->from) {
4620 case ACT_F_TCP_REQ_SES: where = SMP_VAL_FE_SES_ACC; break;
4621 case ACT_F_TCP_REQ_CNT: where = SMP_VAL_FE_REQ_CNT; break;
4622 case ACT_F_TCP_RES_CNT: where = SMP_VAL_BE_RES_CNT; break;
4623 case ACT_F_HTTP_REQ: where = SMP_VAL_FE_HRQ_HDR; break;
4624 case ACT_F_HTTP_RES: where = SMP_VAL_BE_HRS_HDR; break;
4625 default:
4626 memprintf(err,
4627 "internal error, unexpected rule->from=%d, please report this bug!",
4628 rule->from);
4629 goto error;
4630 }
4631
4632 /* Try to find the SPOE engine by checking all SPOE filters for proxy
4633 * <px> */
4634 list_for_each_entry(fconf, &px->filter_configs, list) {
4635 conf = fconf->conf;
4636
4637 /* This is not an SPOE filter */
4638 if (fconf->id != spoe_filter_id)
4639 continue;
4640
4641 /* This is the good engine */
4642 if (!strcmp(conf->id, engine_id)) {
4643 agent = conf->agent;
4644 break;
4645 }
4646 }
4647 if (agent == NULL) {
4648 memprintf(err, "unable to find SPOE engine '%s' used by the send-spoe-group '%s'",
4649 engine_id, group_id);
4650 goto error;
4651 }
4652
4653 /* Try to find the right group */
4654 list_for_each_entry(group, &agent->groups, list) {
4655 /* This is the good group */
4656 if (!strcmp(group->id, group_id))
4657 break;
4658 }
4659 if (&group->list == &agent->groups) {
4660 memprintf(err, "unable to find SPOE group '%s' into SPOE engine '%s' configuration",
4661 group_id, engine_id);
4662 goto error;
4663 }
4664
4665 /* Ok, we found the group, we need to check messages and their
4666 * arguments */
4667 list_for_each_entry(msg, &group->messages, by_grp) {
4668 struct spoe_arg *arg;
4669
4670 list_for_each_entry(arg, &msg->args, list) {
4671 if (!(arg->expr->fetch->val & where)) {
4672 memprintf(err, "Invalid SPOE message '%s' used by SPOE group '%s' at %s:%d: "
4673 "some args extract information from '%s',"
4674 "none of which is available here ('%s')",
4675 msg->id, group->id, msg->conf.file, msg->conf.line,
4676 sample_ckp_names(arg->expr->fetch->use),
4677 sample_ckp_names(where));
4678 goto error;
4679 }
4680 }
4681 }
4682
4683 free(engine_id);
4684 free(group_id);
4685 rule->arg.act.p[0] = fconf; /* Associate filter config with the rule */
4686 rule->arg.act.p[1] = conf; /* Associate SPOE config with the rule */
4687 rule->arg.act.p[2] = agent; /* Associate SPOE agent with the rule */
4688 rule->arg.act.p[3] = group; /* Associate SPOE group with the rule */
4689 return 1;
4690
4691 error:
4692 free(engine_id);
4693 free(group_id);
4694 return 0;
4695}
4696
4697/* Parse 'send-spoe-group' action following the format:
4698 *
4699 * ... send-spoe-group <engine-id> <group-id>
4700 *
4701 * It returns ACT_RET_PRS_ERR if fails and <err> is filled with an error
4702 * message. Otherwise, it returns ACT_RET_PRS_OK and parsing engine and group
4703 * ids are saved and used later, when the rule will be checked.
4704 */
4705static enum act_parse_ret
4706parse_send_spoe_group(const char **args, int *orig_arg, struct proxy *px,
4707 struct act_rule *rule, char **err)
4708{
4709 if (!*args[*orig_arg] || !*args[*orig_arg+1] ||
4710 (*args[*orig_arg+2] && strcmp(args[*orig_arg+2], "if") != 0 && strcmp(args[*orig_arg+2], "unless") != 0)) {
4711 memprintf(err, "expects 2 arguments: <engine-id> <group-id>");
4712 return ACT_RET_PRS_ERR;
4713 }
4714 rule->arg.act.p[0] = strdup(args[*orig_arg]); /* Copy the SPOE engine id */
4715 rule->arg.act.p[1] = strdup(args[*orig_arg+1]); /* Cope the SPOE group id */
4716
4717 (*orig_arg) += 2;
4718
4719 rule->action = ACT_CUSTOM;
4720 rule->action_ptr = spoe_send_group;
4721 rule->check_ptr = check_send_spoe_group;
4722 return ACT_RET_PRS_OK;
4723}
4724
Christopher Fauletf7e4e7e2016-10-27 22:29:49 +02004725
4726/* Declare the filter parser for "spoe" keyword */
4727static struct flt_kw_list flt_kws = { "SPOE", { }, {
4728 { "spoe", parse_spoe_flt, NULL },
4729 { NULL, NULL, NULL },
4730 }
4731};
4732
Willy Tarreau0108d902018-11-25 19:14:37 +01004733INITCALL1(STG_REGISTER, flt_register_keywords, &flt_kws);
4734
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004735/* Delcate the action parser for "spoe-action" keyword */
4736static struct action_kw_list tcp_req_action_kws = { { }, {
4737 { "send-spoe-group", parse_send_spoe_group },
4738 { /* END */ },
4739 }
4740};
Willy Tarreau0108d902018-11-25 19:14:37 +01004741
4742INITCALL1(STG_REGISTER, tcp_req_cont_keywords_register, &tcp_req_action_kws);
4743
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004744static struct action_kw_list tcp_res_action_kws = { { }, {
4745 { "send-spoe-group", parse_send_spoe_group },
4746 { /* END */ },
4747 }
4748};
Willy Tarreau0108d902018-11-25 19:14:37 +01004749
4750INITCALL1(STG_REGISTER, tcp_res_cont_keywords_register, &tcp_res_action_kws);
4751
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004752static struct action_kw_list http_req_action_kws = { { }, {
4753 { "send-spoe-group", parse_send_spoe_group },
4754 { /* END */ },
4755 }
4756};
Willy Tarreau0108d902018-11-25 19:14:37 +01004757
4758INITCALL1(STG_REGISTER, http_req_keywords_register, &http_req_action_kws);
4759
Christopher Faulet76c09ef2017-09-21 11:03:52 +02004760static struct action_kw_list http_res_action_kws = { { }, {
4761 { "send-spoe-group", parse_send_spoe_group },
4762 { /* END */ },
4763 }
4764};
4765
Willy Tarreau0108d902018-11-25 19:14:37 +01004766INITCALL1(STG_REGISTER, http_res_keywords_register, &http_res_action_kws);