blob: c34078f98159de9ff15cfd4e96523601ae59ea07 [file] [log] [blame]
William Lallemand74c24fb2016-11-21 17:18:36 +01001/*
2 * Functions dedicated to statistics output and the stats socket
3 *
4 * Copyright 2000-2012 Willy Tarreau <w@1wt.eu>
5 * Copyright 2007-2009 Krzysztof Piotr Oledzki <ole@ans.pl>
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License
9 * as published by the Free Software Foundation; either version
10 * 2 of the License, or (at your option) any later version.
11 *
12 */
13
14#include <ctype.h>
15#include <errno.h>
16#include <fcntl.h>
17#include <stdio.h>
18#include <stdlib.h>
19#include <string.h>
20#include <pwd.h>
21#include <grp.h>
22
23#include <sys/socket.h>
24#include <sys/stat.h>
25#include <sys/types.h>
26
Olivier Houchardf886e342017-04-05 22:24:59 +020027#include <net/if.h>
28
William Lallemand74c24fb2016-11-21 17:18:36 +010029#include <common/cfgparse.h>
30#include <common/compat.h>
31#include <common/config.h>
32#include <common/debug.h>
33#include <common/memory.h>
34#include <common/mini-clist.h>
35#include <common/standard.h>
36#include <common/ticks.h>
37#include <common/time.h>
38#include <common/uri_auth.h>
39#include <common/version.h>
40#include <common/base64.h>
41
42#include <types/applet.h>
William Lallemand9ed62032016-11-21 17:49:11 +010043#include <types/cli.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010044#include <types/global.h>
45#include <types/dns.h>
William Lallemand9ed62032016-11-21 17:49:11 +010046#include <types/stats.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010047
48#include <proto/backend.h>
49#include <proto/channel.h>
50#include <proto/checks.h>
51#include <proto/compression.h>
William Lallemand9ed62032016-11-21 17:49:11 +010052#include <proto/stats.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010053#include <proto/fd.h>
54#include <proto/freq_ctr.h>
55#include <proto/frontend.h>
56#include <proto/log.h>
57#include <proto/pattern.h>
58#include <proto/pipe.h>
59#include <proto/listener.h>
60#include <proto/map.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010061#include <proto/proxy.h>
62#include <proto/sample.h>
63#include <proto/session.h>
64#include <proto/stream.h>
65#include <proto/server.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010066#include <proto/stream_interface.h>
67#include <proto/task.h>
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +020068#include <proto/proto_udp.h>
William Lallemand74c24fb2016-11-21 17:18:36 +010069
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +020070#define PAYLOAD_PATTERN "<<"
71
William Lallemand74c24fb2016-11-21 17:18:36 +010072static struct applet cli_applet;
73
74static const char stats_sock_usage_msg[] =
75 "Unknown command. Please enter one of the following commands only :\n"
William Lallemand74c24fb2016-11-21 17:18:36 +010076 " help : this message\n"
77 " prompt : toggle interactive mode with prompt\n"
78 " quit : disconnect\n"
William Lallemand74c24fb2016-11-21 17:18:36 +010079 "";
80
81static const char stats_permission_denied_msg[] =
82 "Permission denied\n"
83 "";
84
85
Christopher Faulet1bc04c72017-10-29 20:14:08 +010086static THREAD_LOCAL char *dynamic_usage_msg = NULL;
William Lallemand74c24fb2016-11-21 17:18:36 +010087
88/* List head of cli keywords */
89static struct cli_kw_list cli_keywords = {
90 .list = LIST_HEAD_INIT(cli_keywords.list)
91};
92
93extern const char *stat_status_codes[];
94
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +020095static char *cli_gen_usage_msg(struct appctx *appctx)
William Lallemand74c24fb2016-11-21 17:18:36 +010096{
97 struct cli_kw_list *kw_list;
98 struct cli_kw *kw;
99 struct chunk *tmp = get_trash_chunk();
100 struct chunk out;
101
102 free(dynamic_usage_msg);
103 dynamic_usage_msg = NULL;
104
105 if (LIST_ISEMPTY(&cli_keywords.list))
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200106 goto end;
William Lallemand74c24fb2016-11-21 17:18:36 +0100107
108 chunk_reset(tmp);
109 chunk_strcat(tmp, stats_sock_usage_msg);
110 list_for_each_entry(kw_list, &cli_keywords.list, list) {
111 kw = &kw_list->kw[0];
William Lallemand0154edc2018-05-15 11:50:04 +0200112 while (kw->str_kw[0]) {
113 if (kw->usage)
114 chunk_appendf(tmp, " %s\n", kw->usage);
William Lallemand74c24fb2016-11-21 17:18:36 +0100115 kw++;
116 }
117 }
118 chunk_init(&out, NULL, 0);
119 chunk_dup(&out, tmp);
120 dynamic_usage_msg = out.str;
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200121
122end:
123 if (dynamic_usage_msg) {
124 appctx->ctx.cli.severity = LOG_INFO;
125 appctx->ctx.cli.msg = dynamic_usage_msg;
126 }
127 else {
128 appctx->ctx.cli.severity = LOG_INFO;
129 appctx->ctx.cli.msg = stats_sock_usage_msg;
130 }
131 appctx->st0 = CLI_ST_PRINT;
132
William Lallemand74c24fb2016-11-21 17:18:36 +0100133 return dynamic_usage_msg;
134}
135
136struct cli_kw* cli_find_kw(char **args)
137{
138 struct cli_kw_list *kw_list;
139 struct cli_kw *kw;/* current cli_kw */
140 char **tmp_args;
141 const char **tmp_str_kw;
142 int found = 0;
143
144 if (LIST_ISEMPTY(&cli_keywords.list))
145 return NULL;
146
147 list_for_each_entry(kw_list, &cli_keywords.list, list) {
148 kw = &kw_list->kw[0];
149 while (*kw->str_kw) {
150 tmp_args = args;
151 tmp_str_kw = kw->str_kw;
152 while (*tmp_str_kw) {
153 if (strcmp(*tmp_str_kw, *tmp_args) == 0) {
154 found = 1;
155 } else {
156 found = 0;
157 break;
158 }
159 tmp_args++;
160 tmp_str_kw++;
161 }
162 if (found)
163 return (kw);
164 kw++;
165 }
166 }
167 return NULL;
168}
169
170void cli_register_kw(struct cli_kw_list *kw_list)
171{
172 LIST_ADDQ(&cli_keywords.list, &kw_list->list);
173}
174
175
176/* allocate a new stats frontend named <name>, and return it
177 * (or NULL in case of lack of memory).
178 */
179static struct proxy *alloc_stats_fe(const char *name, const char *file, int line)
180{
181 struct proxy *fe;
182
183 fe = calloc(1, sizeof(*fe));
184 if (!fe)
185 return NULL;
186
187 init_new_proxy(fe);
Olivier Houchardfbc74e82017-11-24 16:54:05 +0100188 fe->next = proxies_list;
189 proxies_list = fe;
William Lallemand74c24fb2016-11-21 17:18:36 +0100190 fe->last_change = now.tv_sec;
191 fe->id = strdup("GLOBAL");
192 fe->cap = PR_CAP_FE;
193 fe->maxconn = 10; /* default to 10 concurrent connections */
194 fe->timeout.client = MS_TO_TICKS(10000); /* default timeout of 10 seconds */
195 fe->conf.file = strdup(file);
196 fe->conf.line = line;
197 fe->accept = frontend_accept;
198 fe->default_target = &cli_applet.obj_type;
199
200 /* the stats frontend is the only one able to assign ID #0 */
201 fe->conf.id.key = fe->uuid = 0;
202 eb32_insert(&used_proxy_id, &fe->conf.id);
203 return fe;
204}
205
206/* This function parses a "stats" statement in the "global" section. It returns
207 * -1 if there is any error, otherwise zero. If it returns -1, it will write an
208 * error message into the <err> buffer which will be preallocated. The trailing
209 * '\n' must not be written. The function must be called with <args> pointing to
210 * the first word after "stats".
211 */
212static int stats_parse_global(char **args, int section_type, struct proxy *curpx,
213 struct proxy *defpx, const char *file, int line,
214 char **err)
215{
216 struct bind_conf *bind_conf;
217 struct listener *l;
218
219 if (!strcmp(args[1], "socket")) {
220 int cur_arg;
221
222 if (*args[2] == 0) {
223 memprintf(err, "'%s %s' in global section expects an address or a path to a UNIX socket", args[0], args[1]);
224 return -1;
225 }
226
227 if (!global.stats_fe) {
228 if ((global.stats_fe = alloc_stats_fe("GLOBAL", file, line)) == NULL) {
229 memprintf(err, "'%s %s' : out of memory trying to allocate a frontend", args[0], args[1]);
230 return -1;
231 }
232 }
233
Willy Tarreaua261e9b2016-12-22 20:44:00 +0100234 bind_conf = bind_conf_alloc(global.stats_fe, file, line, args[2], xprt_get(XPRT_RAW));
William Lallemand07a62f72017-05-24 00:57:40 +0200235 bind_conf->level &= ~ACCESS_LVL_MASK;
236 bind_conf->level |= ACCESS_LVL_OPER; /* default access level */
William Lallemand74c24fb2016-11-21 17:18:36 +0100237
238 if (!str2listener(args[2], global.stats_fe, bind_conf, file, line, err)) {
239 memprintf(err, "parsing [%s:%d] : '%s %s' : %s\n",
240 file, line, args[0], args[1], err && *err ? *err : "error");
241 return -1;
242 }
243
244 cur_arg = 3;
245 while (*args[cur_arg]) {
246 static int bind_dumped;
247 struct bind_kw *kw;
248
249 kw = bind_find_kw(args[cur_arg]);
250 if (kw) {
251 if (!kw->parse) {
252 memprintf(err, "'%s %s' : '%s' option is not implemented in this version (check build options).",
253 args[0], args[1], args[cur_arg]);
254 return -1;
255 }
256
257 if (kw->parse(args, cur_arg, global.stats_fe, bind_conf, err) != 0) {
258 if (err && *err)
259 memprintf(err, "'%s %s' : '%s'", args[0], args[1], *err);
260 else
261 memprintf(err, "'%s %s' : error encountered while processing '%s'",
262 args[0], args[1], args[cur_arg]);
263 return -1;
264 }
265
266 cur_arg += 1 + kw->skip;
267 continue;
268 }
269
270 if (!bind_dumped) {
271 bind_dump_kws(err);
272 indent_msg(err, 4);
273 bind_dumped = 1;
274 }
275
276 memprintf(err, "'%s %s' : unknown keyword '%s'.%s%s",
277 args[0], args[1], args[cur_arg],
278 err && *err ? " Registered keywords :" : "", err && *err ? *err : "");
279 return -1;
280 }
281
282 list_for_each_entry(l, &bind_conf->listeners, by_bind) {
283 l->maxconn = global.stats_fe->maxconn;
284 l->backlog = global.stats_fe->backlog;
285 l->accept = session_accept_fd;
William Lallemand74c24fb2016-11-21 17:18:36 +0100286 l->default_target = global.stats_fe->default_target;
287 l->options |= LI_O_UNLIMITED; /* don't make the peers subject to global limits */
288 l->nice = -64; /* we want to boost priority for local stats */
289 global.maxsock += l->maxconn;
290 }
291 }
292 else if (!strcmp(args[1], "timeout")) {
293 unsigned timeout;
294 const char *res = parse_time_err(args[2], &timeout, TIME_UNIT_MS);
295
296 if (res) {
297 memprintf(err, "'%s %s' : unexpected character '%c'", args[0], args[1], *res);
298 return -1;
299 }
300
301 if (!timeout) {
302 memprintf(err, "'%s %s' expects a positive value", args[0], args[1]);
303 return -1;
304 }
305 if (!global.stats_fe) {
306 if ((global.stats_fe = alloc_stats_fe("GLOBAL", file, line)) == NULL) {
307 memprintf(err, "'%s %s' : out of memory trying to allocate a frontend", args[0], args[1]);
308 return -1;
309 }
310 }
311 global.stats_fe->timeout.client = MS_TO_TICKS(timeout);
312 }
313 else if (!strcmp(args[1], "maxconn")) {
314 int maxconn = atol(args[2]);
315
316 if (maxconn <= 0) {
317 memprintf(err, "'%s %s' expects a positive value", args[0], args[1]);
318 return -1;
319 }
320
321 if (!global.stats_fe) {
322 if ((global.stats_fe = alloc_stats_fe("GLOBAL", file, line)) == NULL) {
323 memprintf(err, "'%s %s' : out of memory trying to allocate a frontend", args[0], args[1]);
324 return -1;
325 }
326 }
327 global.stats_fe->maxconn = maxconn;
328 }
329 else if (!strcmp(args[1], "bind-process")) { /* enable the socket only on some processes */
330 int cur_arg = 2;
331 unsigned long set = 0;
332
333 if (!global.stats_fe) {
334 if ((global.stats_fe = alloc_stats_fe("GLOBAL", file, line)) == NULL) {
335 memprintf(err, "'%s %s' : out of memory trying to allocate a frontend", args[0], args[1]);
336 return -1;
337 }
338 }
339
340 while (*args[cur_arg]) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100341 if (strcmp(args[cur_arg], "all") == 0) {
342 set = 0;
343 break;
344 }
Christopher Faulet26028f62017-11-22 15:01:51 +0100345 if (parse_process_number(args[cur_arg], &set, NULL, err)) {
Christopher Fauletf1f0c5f2017-11-22 12:06:43 +0100346 memprintf(err, "'%s %s' : %s", args[0], args[1], *err);
William Lallemand74c24fb2016-11-21 17:18:36 +0100347 return -1;
348 }
349 cur_arg++;
350 }
351 global.stats_fe->bind_proc = set;
352 }
353 else {
354 memprintf(err, "'%s' only supports 'socket', 'maxconn', 'bind-process' and 'timeout' (got '%s')", args[0], args[1]);
355 return -1;
356 }
357 return 0;
358}
359
Willy Tarreaude57a572016-11-23 17:01:39 +0100360/* Verifies that the CLI at least has a level at least as high as <level>
361 * (typically ACCESS_LVL_ADMIN). Returns 1 if OK, otherwise 0. In case of
362 * failure, an error message is prepared and the appctx's state is adjusted
363 * to print it so that a return 1 is enough to abort any processing.
364 */
365int cli_has_level(struct appctx *appctx, int level)
366{
367 struct stream_interface *si = appctx->owner;
368 struct stream *s = si_strm(si);
369
William Lallemand07a62f72017-05-24 00:57:40 +0200370 if ((strm_li(s)->bind_conf->level & ACCESS_LVL_MASK) < level) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +0200371 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreaude57a572016-11-23 17:01:39 +0100372 appctx->ctx.cli.msg = stats_permission_denied_msg;
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100373 appctx->st0 = CLI_ST_PRINT;
Willy Tarreaude57a572016-11-23 17:01:39 +0100374 return 0;
375 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100376 return 1;
377}
378
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200379/* Returns severity_output for the current session if set, or default for the socket */
380static int cli_get_severity_output(struct appctx *appctx)
381{
382 if (appctx->cli_severity_output)
383 return appctx->cli_severity_output;
384 return strm_li(si_strm(appctx->owner))->bind_conf->severity_output;
385}
William Lallemand74c24fb2016-11-21 17:18:36 +0100386
Willy Tarreau41908562016-11-24 16:23:38 +0100387/* Processes the CLI interpreter on the stats socket. This function is called
388 * from the CLI's IO handler running in an appctx context. The function returns 1
389 * if the request was understood, otherwise zero. It is called with appctx->st0
390 * set to CLI_ST_GETREQ and presets ->st2 to 0 so that parsers don't have to do
391 * it. It will possilbly leave st0 to CLI_ST_CALLBACK if the keyword needs to
392 * have its own I/O handler called again. Most of the time, parsers will only
393 * set st0 to CLI_ST_PRINT and put their message to be displayed into cli.msg.
Willy Tarreaueaffde32016-12-16 17:59:25 +0100394 * If a keyword parser is NULL and an I/O handler is declared, the I/O handler
395 * will automatically be used.
William Lallemand74c24fb2016-11-21 17:18:36 +0100396 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200397static int cli_parse_request(struct appctx *appctx)
William Lallemand74c24fb2016-11-21 17:18:36 +0100398{
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200399 char *args[MAX_STATS_ARGS + 1], *p, *end, *payload = NULL;
400 int i = 0;
William Lallemand74c24fb2016-11-21 17:18:36 +0100401 struct cli_kw *kw;
William Lallemand74c24fb2016-11-21 17:18:36 +0100402
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200403 appctx->st2 = 0;
404 memset(&appctx->ctx.cli, 0, sizeof(appctx->ctx.cli));
William Lallemand74c24fb2016-11-21 17:18:36 +0100405
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200406 p = appctx->chunk->str;
407 end = p + appctx->chunk->len;
William Lallemand74c24fb2016-11-21 17:18:36 +0100408
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200409 /*
410 * Get the payload start if there is one.
411 * For the sake of simplicity, the payload pattern is looked up
412 * everywhere from the start of the input but it can only be found
413 * at the end of the first line if APPCTX_CLI_ST1_PAYLOAD is set.
414 *
415 * The input string was zero terminated so it is safe to use
416 * the str*() functions throughout the parsing
417 */
418 if (appctx->st1 & APPCTX_CLI_ST1_PAYLOAD) {
419 payload = strstr(p, PAYLOAD_PATTERN);
420 end = payload;
421 /* skip the pattern */
422 payload += strlen(PAYLOAD_PATTERN);
423 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100424
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200425 /*
426 * Get pointers on words.
427 * One extra slot is reserved to store a pointer on a null byte.
428 */
429 while (i < MAX_STATS_ARGS && p < end) {
430 int j, k;
William Lallemand74c24fb2016-11-21 17:18:36 +0100431
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200432 /* skip leading spaces/tabs */
433 p += strspn(p, " \t");
434 if (!*p)
435 break;
William Lallemand74c24fb2016-11-21 17:18:36 +0100436
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200437 args[i] = p;
438 p += strcspn(p, " \t");
439 *p++ = 0;
William Lallemand74c24fb2016-11-21 17:18:36 +0100440
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200441 /* unescape backslashes (\) */
442 for (j = 0, k = 0; args[i][k]; k++) {
443 if (args[i][k] == '\\') {
444 if (args[i][k + 1] == '\\')
445 k++;
Dragan Dosena1c35ab2016-11-24 11:33:12 +0100446 else
447 continue;
448 }
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200449 args[i][j] = args[i][k];
William Lallemand74c24fb2016-11-21 17:18:36 +0100450 j++;
451 }
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200452 args[i][j] = 0;
William Lallemand74c24fb2016-11-21 17:18:36 +0100453
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200454 i++;
455 }
456 /* fill unused slots */
457 p = appctx->chunk->str + appctx->chunk->len;
458 for (; i < MAX_STATS_ARGS + 1; i++)
459 args[i] = p;
Willy Tarreau41908562016-11-24 16:23:38 +0100460
461 kw = cli_find_kw(args);
Willy Tarreaueaffde32016-12-16 17:59:25 +0100462 if (!kw)
Willy Tarreau41908562016-11-24 16:23:38 +0100463 return 0;
464
465 appctx->io_handler = kw->io_handler;
Emeric Brund6871f72017-06-29 19:54:13 +0200466 appctx->io_release = kw->io_release;
467 /* kw->parse could set its own io_handler or ip_release handler */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200468 if ((!kw->parse || kw->parse(args, payload, appctx, kw->private) == 0) && appctx->io_handler) {
Willy Tarreau41908562016-11-24 16:23:38 +0100469 appctx->st0 = CLI_ST_CALLBACK;
William Lallemand74c24fb2016-11-21 17:18:36 +0100470 }
Willy Tarreau41908562016-11-24 16:23:38 +0100471 return 1;
William Lallemand74c24fb2016-11-21 17:18:36 +0100472}
473
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200474/* prepends then outputs the argument msg with a syslog-type severity depending on severity_output value */
475static int cli_output_msg(struct channel *chn, const char *msg, int severity, int severity_output)
476{
477 struct chunk *tmp;
478
479 if (likely(severity_output == CLI_SEVERITY_NONE))
Willy Tarreau06d80a92017-10-19 14:32:15 +0200480 return ci_putblk(chn, msg, strlen(msg));
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200481
482 tmp = get_trash_chunk();
483 chunk_reset(tmp);
484
485 if (severity < 0 || severity > 7) {
Christopher Faulet767a84b2017-11-24 16:50:31 +0100486 ha_warning("socket command feedback with invalid severity %d", severity);
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200487 chunk_printf(tmp, "[%d]: ", severity);
488 }
489 else {
490 switch (severity_output) {
491 case CLI_SEVERITY_NUMBER:
492 chunk_printf(tmp, "[%d]: ", severity);
493 break;
494 case CLI_SEVERITY_STRING:
495 chunk_printf(tmp, "[%s]: ", log_levels[severity]);
496 break;
497 default:
Christopher Faulet767a84b2017-11-24 16:50:31 +0100498 ha_warning("Unrecognized severity output %d", severity_output);
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200499 }
500 }
501 chunk_appendf(tmp, "%s", msg);
502
Willy Tarreau06d80a92017-10-19 14:32:15 +0200503 return ci_putblk(chn, tmp->str, strlen(tmp->str));
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200504}
505
William Lallemand74c24fb2016-11-21 17:18:36 +0100506/* This I/O handler runs as an applet embedded in a stream interface. It is
507 * used to processes I/O from/to the stats unix socket. The system relies on a
508 * state machine handling requests and various responses. We read a request,
509 * then we process it and send the response, and we possibly display a prompt.
510 * Then we can read again. The state is stored in appctx->st0 and is one of the
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100511 * CLI_ST_* constants. appctx->st1 is used to indicate whether prompt is enabled
William Lallemand74c24fb2016-11-21 17:18:36 +0100512 * or not.
513 */
514static void cli_io_handler(struct appctx *appctx)
515{
516 struct stream_interface *si = appctx->owner;
517 struct channel *req = si_oc(si);
518 struct channel *res = si_ic(si);
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200519 struct bind_conf *bind_conf = strm_li(si_strm(si))->bind_conf;
William Lallemand74c24fb2016-11-21 17:18:36 +0100520 int reql;
521 int len;
522
523 if (unlikely(si->state == SI_ST_DIS || si->state == SI_ST_CLO))
524 goto out;
525
Christopher Fauleta73e59b2016-12-09 17:30:18 +0100526 /* Check if the input buffer is avalaible. */
527 if (res->buf->size == 0) {
528 si_applet_cant_put(si);
529 goto out;
530 }
531
William Lallemand74c24fb2016-11-21 17:18:36 +0100532 while (1) {
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100533 if (appctx->st0 == CLI_ST_INIT) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100534 /* Stats output not initialized yet */
535 memset(&appctx->ctx.stats, 0, sizeof(appctx->ctx.stats));
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200536 /* reset severity to default at init */
537 appctx->cli_severity_output = bind_conf->severity_output;
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100538 appctx->st0 = CLI_ST_GETREQ;
William Lallemand74c24fb2016-11-21 17:18:36 +0100539 }
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100540 else if (appctx->st0 == CLI_ST_END) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100541 /* Let's close for real now. We just close the request
542 * side, the conditions below will complete if needed.
543 */
544 si_shutw(si);
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200545 free_trash_chunk(appctx->chunk);
William Lallemand74c24fb2016-11-21 17:18:36 +0100546 break;
547 }
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100548 else if (appctx->st0 == CLI_ST_GETREQ) {
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200549 char *str;
550
551 /* use a trash chunk to store received data */
552 if (!appctx->chunk) {
553 appctx->chunk = alloc_trash_chunk();
554 if (!appctx->chunk) {
555 appctx->st0 = CLI_ST_END;
556 continue;
557 }
558 }
559
560 str = appctx->chunk->str + appctx->chunk->len;
561
William Lallemand74c24fb2016-11-21 17:18:36 +0100562 /* ensure we have some output room left in the event we
563 * would want to return some info right after parsing.
564 */
565 if (buffer_almost_full(si_ib(si))) {
566 si_applet_cant_put(si);
567 break;
568 }
569
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200570 /* '- 1' is to ensure a null byte can always be inserted at the end */
571 reql = co_getline(si_oc(si), str, appctx->chunk->size - appctx->chunk->len - 1);
William Lallemand74c24fb2016-11-21 17:18:36 +0100572 if (reql <= 0) { /* closed or EOL not found */
573 if (reql == 0)
574 break;
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100575 appctx->st0 = CLI_ST_END;
William Lallemand74c24fb2016-11-21 17:18:36 +0100576 continue;
577 }
578
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200579 if (!(appctx->st1 & APPCTX_CLI_ST1_PAYLOAD)) {
580 /* seek for a possible unescaped semi-colon. If we find
581 * one, we replace it with an LF and skip only this part.
582 */
583 for (len = 0; len < reql; len++) {
584 if (str[len] == '\\') {
585 len++;
586 continue;
587 }
588 if (str[len] == ';') {
589 str[len] = '\n';
590 reql = len + 1;
591 break;
592 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100593 }
594 }
595
596 /* now it is time to check that we have a full line,
597 * remove the trailing \n and possibly \r, then cut the
598 * line.
599 */
600 len = reql - 1;
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200601 if (str[len] != '\n') {
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100602 appctx->st0 = CLI_ST_END;
William Lallemand74c24fb2016-11-21 17:18:36 +0100603 continue;
604 }
605
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200606 if (len && str[len-1] == '\r')
William Lallemand74c24fb2016-11-21 17:18:36 +0100607 len--;
608
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200609 str[len] = '\0';
610 appctx->chunk->len += len;
611
612 if (appctx->st1 & APPCTX_CLI_ST1_PAYLOAD) {
613 appctx->chunk->str[appctx->chunk->len] = '\n';
614 appctx->chunk->str[appctx->chunk->len + 1] = 0;
615 appctx->chunk->len++;
616 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100617
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100618 appctx->st0 = CLI_ST_PROMPT;
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200619
620 if (appctx->st1 & APPCTX_CLI_ST1_PAYLOAD) {
621 /* empty line */
622 if (!len) {
623 /* remove the last two \n */
624 appctx->chunk->len -= 2;
625 appctx->chunk->str[appctx->chunk->len] = 0;
626
627 if (!cli_parse_request(appctx))
628 cli_gen_usage_msg(appctx);
629
630 chunk_reset(appctx->chunk);
631 /* NB: cli_sock_parse_request() may have put
632 * another CLI_ST_O_* into appctx->st0.
633 */
634
635 appctx->st1 &= ~APPCTX_CLI_ST1_PAYLOAD;
William Lallemand74c24fb2016-11-21 17:18:36 +0100636 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100637 }
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200638 else {
639 /*
640 * Look for the "payload start" pattern at the end of a line
641 * Its location is not remembered here, this is just to switch
642 * to a gathering mode.
William Lallemand74c24fb2016-11-21 17:18:36 +0100643 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200644 if (!strcmp(appctx->chunk->str + appctx->chunk->len - strlen(PAYLOAD_PATTERN), PAYLOAD_PATTERN))
645 appctx->st1 |= APPCTX_CLI_ST1_PAYLOAD;
Andjelko Iharosc3680ec2017-07-20 16:49:14 +0200646 else {
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200647 /* no payload, the command is complete: parse the request */
648 if (!cli_parse_request(appctx))
649 cli_gen_usage_msg(appctx);
650
651 chunk_reset(appctx->chunk);
Andjelko Iharosc3680ec2017-07-20 16:49:14 +0200652 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100653 }
654
655 /* re-adjust req buffer */
Willy Tarreau06d80a92017-10-19 14:32:15 +0200656 co_skip(si_oc(si), reql);
William Lallemand74c24fb2016-11-21 17:18:36 +0100657 req->flags |= CF_READ_DONTWAIT; /* we plan to read small requests */
658 }
659 else { /* output functions */
660 switch (appctx->st0) {
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100661 case CLI_ST_PROMPT:
William Lallemand74c24fb2016-11-21 17:18:36 +0100662 break;
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100663 case CLI_ST_PRINT:
Andjelko Iharosc4df59e2017-07-20 11:59:48 +0200664 if (cli_output_msg(res, appctx->ctx.cli.msg, appctx->ctx.cli.severity,
665 cli_get_severity_output(appctx)) != -1)
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100666 appctx->st0 = CLI_ST_PROMPT;
William Lallemand74c24fb2016-11-21 17:18:36 +0100667 else
668 si_applet_cant_put(si);
669 break;
Aurélien Nephtalic511b7c2018-04-16 18:50:19 +0200670 case CLI_ST_PRINT_FREE: {
671 const char *msg = appctx->ctx.cli.err;
672
673 if (!msg)
674 msg = "Out of memory.\n";
675
676 if (cli_output_msg(res, msg, LOG_ERR, cli_get_severity_output(appctx)) != -1) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100677 free(appctx->ctx.cli.err);
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100678 appctx->st0 = CLI_ST_PROMPT;
William Lallemand74c24fb2016-11-21 17:18:36 +0100679 }
680 else
681 si_applet_cant_put(si);
682 break;
Aurélien Nephtalic511b7c2018-04-16 18:50:19 +0200683 }
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100684 case CLI_ST_CALLBACK: /* use custom pointer */
William Lallemand74c24fb2016-11-21 17:18:36 +0100685 if (appctx->io_handler)
686 if (appctx->io_handler(appctx)) {
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100687 appctx->st0 = CLI_ST_PROMPT;
William Lallemand74c24fb2016-11-21 17:18:36 +0100688 if (appctx->io_release) {
689 appctx->io_release(appctx);
690 appctx->io_release = NULL;
691 }
692 }
693 break;
694 default: /* abnormal state */
695 si->flags |= SI_FL_ERR;
696 break;
697 }
698
699 /* The post-command prompt is either LF alone or LF + '> ' in interactive mode */
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100700 if (appctx->st0 == CLI_ST_PROMPT) {
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200701 const char *prompt = "";
702
703 if (appctx->st1 & APPCTX_CLI_ST1_PROMPT) {
704 /*
705 * when entering a payload with interactive mode, change the prompt
706 * to emphasize that more data can still be sent
707 */
708 if (appctx->chunk->len && appctx->st1 & APPCTX_CLI_ST1_PAYLOAD)
709 prompt = "+ ";
710 else
711 prompt = "\n> ";
712 }
713 else {
714 if (!(appctx->st1 & APPCTX_CLI_ST1_PAYLOAD))
715 prompt = "\n";
716 }
717
718 if (ci_putstr(si_ic(si), prompt) != -1)
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100719 appctx->st0 = CLI_ST_GETREQ;
William Lallemand74c24fb2016-11-21 17:18:36 +0100720 else
721 si_applet_cant_put(si);
722 }
723
724 /* If the output functions are still there, it means they require more room. */
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100725 if (appctx->st0 >= CLI_ST_OUTPUT)
William Lallemand74c24fb2016-11-21 17:18:36 +0100726 break;
727
728 /* Now we close the output if one of the writers did so,
729 * or if we're not in interactive mode and the request
730 * buffer is empty. This still allows pipelined requests
731 * to be sent in non-interactive mode.
732 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +0200733 if ((res->flags & (CF_SHUTW|CF_SHUTW_NOW)) || (!(appctx->st1 & APPCTX_CLI_ST1_PROMPT) && !req->buf->o)) {
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100734 appctx->st0 = CLI_ST_END;
William Lallemand74c24fb2016-11-21 17:18:36 +0100735 continue;
736 }
737
738 /* switch state back to GETREQ to read next requests */
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100739 appctx->st0 = CLI_ST_GETREQ;
William Lallemand74c24fb2016-11-21 17:18:36 +0100740 }
741 }
742
743 if ((res->flags & CF_SHUTR) && (si->state == SI_ST_EST)) {
744 DPRINTF(stderr, "%s@%d: si to buf closed. req=%08x, res=%08x, st=%d\n",
745 __FUNCTION__, __LINE__, req->flags, res->flags, si->state);
746 /* Other side has closed, let's abort if we have no more processing to do
747 * and nothing more to consume. This is comparable to a broken pipe, so
748 * we forward the close to the request side so that it flows upstream to
749 * the client.
750 */
751 si_shutw(si);
752 }
753
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100754 if ((req->flags & CF_SHUTW) && (si->state == SI_ST_EST) && (appctx->st0 < CLI_ST_OUTPUT)) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100755 DPRINTF(stderr, "%s@%d: buf to si closed. req=%08x, res=%08x, st=%d\n",
756 __FUNCTION__, __LINE__, req->flags, res->flags, si->state);
757 /* We have no more processing to do, and nothing more to send, and
758 * the client side has closed. So we'll forward this state downstream
759 * on the response buffer.
760 */
761 si_shutr(si);
762 res->flags |= CF_READ_NULL;
763 }
764
765 out:
766 DPRINTF(stderr, "%s@%d: st=%d, rqf=%x, rpf=%x, rqh=%d, rqs=%d, rh=%d, rs=%d\n",
767 __FUNCTION__, __LINE__,
768 si->state, req->flags, res->flags, req->buf->i, req->buf->o, res->buf->i, res->buf->o);
769}
770
William Lallemand74c24fb2016-11-21 17:18:36 +0100771/* This is called when the stream interface is closed. For instance, upon an
772 * external abort, we won't call the i/o handler anymore so we may need to
773 * remove back references to the stream currently being dumped.
774 */
775static void cli_release_handler(struct appctx *appctx)
776{
777 if (appctx->io_release) {
778 appctx->io_release(appctx);
779 appctx->io_release = NULL;
780 }
Willy Tarreau3b6e5472016-11-24 15:53:53 +0100781 else if (appctx->st0 == CLI_ST_PRINT_FREE) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100782 free(appctx->ctx.cli.err);
783 appctx->ctx.cli.err = NULL;
784 }
William Lallemand74c24fb2016-11-21 17:18:36 +0100785}
786
787/* This function dumps all environmnent variables to the buffer. It returns 0
788 * if the output buffer is full and it needs to be called again, otherwise
Willy Tarreauf6710f82016-12-16 17:45:44 +0100789 * non-zero. Dumps only one entry if st2 == STAT_ST_END. It uses cli.p0 as the
790 * pointer to the current variable.
William Lallemand74c24fb2016-11-21 17:18:36 +0100791 */
Willy Tarreau0a739292016-11-22 20:21:23 +0100792static int cli_io_handler_show_env(struct appctx *appctx)
William Lallemand74c24fb2016-11-21 17:18:36 +0100793{
Willy Tarreau0a739292016-11-22 20:21:23 +0100794 struct stream_interface *si = appctx->owner;
Willy Tarreauf6710f82016-12-16 17:45:44 +0100795 char **var = appctx->ctx.cli.p0;
William Lallemand74c24fb2016-11-21 17:18:36 +0100796
797 if (unlikely(si_ic(si)->flags & (CF_WRITE_ERROR|CF_SHUTW)))
798 return 1;
799
800 chunk_reset(&trash);
801
802 /* we have two inner loops here, one for the proxy, the other one for
803 * the buffer.
804 */
Willy Tarreauf6710f82016-12-16 17:45:44 +0100805 while (*var) {
806 chunk_printf(&trash, "%s\n", *var);
William Lallemand74c24fb2016-11-21 17:18:36 +0100807
Willy Tarreau06d80a92017-10-19 14:32:15 +0200808 if (ci_putchk(si_ic(si), &trash) == -1) {
William Lallemand74c24fb2016-11-21 17:18:36 +0100809 si_applet_cant_put(si);
810 return 0;
811 }
812 if (appctx->st2 == STAT_ST_END)
813 break;
Willy Tarreauf6710f82016-12-16 17:45:44 +0100814 var++;
815 appctx->ctx.cli.p0 = var;
William Lallemand74c24fb2016-11-21 17:18:36 +0100816 }
817
818 /* dump complete */
819 return 1;
820}
821
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200822/* This function dumps all file descriptors states (or the requested one) to
823 * the buffer. It returns 0 if the output buffer is full and it needs to be
824 * called again, otherwise non-zero. Dumps only one entry if st2 == STAT_ST_END.
825 * It uses cli.i0 as the fd number to restart from.
826 */
827static int cli_io_handler_show_fd(struct appctx *appctx)
828{
829 struct stream_interface *si = appctx->owner;
830 int fd = appctx->ctx.cli.i0;
831
832 if (unlikely(si_ic(si)->flags & (CF_WRITE_ERROR|CF_SHUTW)))
833 return 1;
834
835 chunk_reset(&trash);
836
837 /* we have two inner loops here, one for the proxy, the other one for
838 * the buffer.
839 */
Aurélien Nephtali498a1152018-03-09 18:51:16 +0100840 while (fd >= 0 && fd < global.maxsock) {
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200841 struct fdtab fdt;
Willy Tarreau286ec682017-08-09 16:35:44 +0200842 struct listener *li = NULL;
843 struct server *sv = NULL;
844 struct proxy *px = NULL;
Willy Tarreaua833cd92018-03-29 13:19:37 +0200845 const struct mux_ops *mux = NULL;
Willy Tarreau35b1b482018-03-28 18:41:30 +0200846 void *ctx = NULL;
Willy Tarreau286ec682017-08-09 16:35:44 +0200847 uint32_t conn_flags = 0;
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200848
849 fdt = fdtab[fd];
850
Willy Tarreau017af242017-10-04 20:24:54 +0200851 if (!fdt.owner)
852 goto skip; // closed
853
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200854 if (fdt.iocb == conn_fd_handler) {
855 conn_flags = ((struct connection *)fdt.owner)->flags;
Willy Tarreau35b1b482018-03-28 18:41:30 +0200856 mux = ((struct connection *)fdt.owner)->mux;
857 ctx = ((struct connection *)fdt.owner)->mux_ctx;
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200858 li = objt_listener(((struct connection *)fdt.owner)->target);
859 sv = objt_server(((struct connection *)fdt.owner)->target);
860 px = objt_proxy(((struct connection *)fdt.owner)->target);
861 }
862 else if (fdt.iocb == listener_accept)
863 li = fdt.owner;
864
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200865 chunk_printf(&trash,
Willy Tarreauc754b342018-03-30 15:00:15 +0200866 " %5d : st=0x%02x(R:%c%c%c W:%c%c%c) ev=0x%02x(%c%c%c%c%c) [%c%c] cnext=%d cprev=%d tmask=0x%lx umask=0x%lx owner=%p iocb=%p(%s)",
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200867 fd,
868 fdt.state,
869 (fdt.state & FD_EV_POLLED_R) ? 'P' : 'p',
870 (fdt.state & FD_EV_READY_R) ? 'R' : 'r',
871 (fdt.state & FD_EV_ACTIVE_R) ? 'A' : 'a',
872 (fdt.state & FD_EV_POLLED_W) ? 'P' : 'p',
873 (fdt.state & FD_EV_READY_W) ? 'R' : 'r',
874 (fdt.state & FD_EV_ACTIVE_W) ? 'A' : 'a',
875 fdt.ev,
876 (fdt.ev & FD_POLL_HUP) ? 'H' : 'h',
877 (fdt.ev & FD_POLL_ERR) ? 'E' : 'e',
878 (fdt.ev & FD_POLL_OUT) ? 'O' : 'o',
879 (fdt.ev & FD_POLL_PRI) ? 'P' : 'p',
880 (fdt.ev & FD_POLL_IN) ? 'I' : 'i',
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200881 fdt.linger_risk ? 'L' : 'l',
882 fdt.cloned ? 'C' : 'c',
Willy Tarreauc754b342018-03-30 15:00:15 +0200883 fdt.cache.next,
884 fdt.cache.prev,
885 fdt.thread_mask, fdt.update_mask,
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200886 fdt.owner,
887 fdt.iocb,
888 (fdt.iocb == conn_fd_handler) ? "conn_fd_handler" :
889 (fdt.iocb == dgram_fd_handler) ? "dgram_fd_handler" :
890 (fdt.iocb == listener_accept) ? "listener_accept" :
Willy Tarreau4037a3f2018-03-28 18:06:47 +0200891 (fdt.iocb == thread_sync_io_handler) ? "thread_sync_io_handler" :
Willy Tarreauc754b342018-03-30 15:00:15 +0200892 "unknown");
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200893
894 if (fdt.iocb == conn_fd_handler) {
895 chunk_appendf(&trash, " cflg=0x%08x", conn_flags);
896 if (px)
897 chunk_appendf(&trash, " px=%s", px->id);
898 else if (sv)
899 chunk_appendf(&trash, " sv=%s/%s", sv->id, sv->proxy->id);
900 else if (li)
901 chunk_appendf(&trash, " fe=%s", li->bind_conf->frontend->id);
Willy Tarreau35b1b482018-03-28 18:41:30 +0200902
Willy Tarreaub011d8f2018-03-30 14:41:19 +0200903 if (mux) {
Willy Tarreau35b1b482018-03-28 18:41:30 +0200904 chunk_appendf(&trash, " mux=%s mux_ctx=%p", mux->name, ctx);
Willy Tarreaub011d8f2018-03-30 14:41:19 +0200905 if (mux->show_fd)
906 mux->show_fd(&trash, fdt.owner);
907 }
Willy Tarreau35b1b482018-03-28 18:41:30 +0200908 else
909 chunk_appendf(&trash, " nomux");
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200910 }
911 else if (fdt.iocb == listener_accept) {
912 chunk_appendf(&trash, " l.st=%s fe=%s",
913 listener_state_str(li),
914 li->bind_conf->frontend->id);
915 }
916
917 chunk_appendf(&trash, "\n");
918
Willy Tarreau06d80a92017-10-19 14:32:15 +0200919 if (ci_putchk(si_ic(si), &trash) == -1) {
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +0200920 si_applet_cant_put(si);
921 return 0;
922 }
923 skip:
924 if (appctx->st2 == STAT_ST_END)
925 break;
926
927 fd++;
928 appctx->ctx.cli.i0 = fd;
929 }
930
931 /* dump complete */
932 return 1;
933}
934
Willy Tarreaud80cb4e2018-01-20 19:30:13 +0100935/* This function dumps some activity counters used by developers and support to
936 * rule out some hypothesis during bug reports. It returns 0 if the output
937 * buffer is full and it needs to be called again, otherwise non-zero. It dumps
938 * everything at once in the buffer and is not designed to do it in multiple
939 * passes.
940 */
941static int cli_io_handler_show_activity(struct appctx *appctx)
942{
943 struct stream_interface *si = appctx->owner;
944 int thr;
945
946 if (unlikely(si_ic(si)->flags & (CF_WRITE_ERROR|CF_SHUTW)))
947 return 1;
948
949 chunk_reset(&trash);
950
951 chunk_appendf(&trash, "thread_id: %u", tid);
952 chunk_appendf(&trash, "\ndate_now: %lu.%06lu", (long)now.tv_sec, (long)now.tv_usec);
953 chunk_appendf(&trash, "\nloops:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].loops);
954 chunk_appendf(&trash, "\nwake_cache:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].wake_cache);
955 chunk_appendf(&trash, "\nwake_tasks:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].wake_tasks);
Willy Tarreaud80cb4e2018-01-20 19:30:13 +0100956 chunk_appendf(&trash, "\nwake_signal:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].wake_signal);
957 chunk_appendf(&trash, "\npoll_exp:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].poll_exp);
958 chunk_appendf(&trash, "\npoll_drop:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].poll_drop);
959 chunk_appendf(&trash, "\npoll_dead:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].poll_dead);
960 chunk_appendf(&trash, "\npoll_skip:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].poll_skip);
961 chunk_appendf(&trash, "\nfd_skip:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].fd_skip);
962 chunk_appendf(&trash, "\nfd_lock:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].fd_lock);
963 chunk_appendf(&trash, "\nfd_del:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].fd_del);
964 chunk_appendf(&trash, "\nconn_dead:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].conn_dead);
965 chunk_appendf(&trash, "\nstream:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].stream);
966 chunk_appendf(&trash, "\nempty_rq:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].empty_rq);
967 chunk_appendf(&trash, "\nlong_rq:"); for (thr = 0; thr < global.nbthread; thr++) chunk_appendf(&trash, " %u", activity[thr].long_rq);
968
969 chunk_appendf(&trash, "\n");
970
971 if (ci_putchk(si_ic(si), &trash) == -1) {
972 chunk_reset(&trash);
973 chunk_printf(&trash, "[output too large, cannot dump]\n");
974 si_applet_cant_put(si);
975 }
976
977 /* dump complete */
978 return 1;
979}
980
William Lallemandeceddf72016-12-15 18:06:44 +0100981/*
Willy Tarreau3af9d832016-12-16 12:58:09 +0100982 * CLI IO handler for `show cli sockets`.
983 * Uses ctx.cli.p0 to store the restart pointer.
William Lallemandeceddf72016-12-15 18:06:44 +0100984 */
985static int cli_io_handler_show_cli_sock(struct appctx *appctx)
986{
987 struct bind_conf *bind_conf;
988 struct stream_interface *si = appctx->owner;
989
990 chunk_reset(&trash);
991
992 switch (appctx->st2) {
993 case STAT_ST_INIT:
994 chunk_printf(&trash, "# socket lvl processes\n");
Willy Tarreau06d80a92017-10-19 14:32:15 +0200995 if (ci_putchk(si_ic(si), &trash) == -1) {
William Lallemandeceddf72016-12-15 18:06:44 +0100996 si_applet_cant_put(si);
997 return 0;
998 }
William Lallemandeceddf72016-12-15 18:06:44 +0100999 appctx->st2 = STAT_ST_LIST;
1000
1001 case STAT_ST_LIST:
1002 if (global.stats_fe) {
1003 list_for_each_entry(bind_conf, &global.stats_fe->conf.bind, by_fe) {
1004 struct listener *l;
1005
1006 /*
Willy Tarreau3af9d832016-12-16 12:58:09 +01001007 * get the latest dumped node in appctx->ctx.cli.p0
William Lallemandeceddf72016-12-15 18:06:44 +01001008 * if the current node is the first of the list
1009 */
1010
Willy Tarreau3af9d832016-12-16 12:58:09 +01001011 if (appctx->ctx.cli.p0 &&
1012 &bind_conf->by_fe == (&global.stats_fe->conf.bind)->n) {
William Lallemandeceddf72016-12-15 18:06:44 +01001013 /* change the current node to the latest dumped and continue the loop */
Willy Tarreau3af9d832016-12-16 12:58:09 +01001014 bind_conf = LIST_ELEM(appctx->ctx.cli.p0, typeof(bind_conf), by_fe);
William Lallemandeceddf72016-12-15 18:06:44 +01001015 continue;
1016 }
1017
1018 list_for_each_entry(l, &bind_conf->listeners, by_bind) {
1019
1020 char addr[46];
1021 char port[6];
1022
1023 if (l->addr.ss_family == AF_UNIX) {
1024 const struct sockaddr_un *un;
1025
1026 un = (struct sockaddr_un *)&l->addr;
1027 chunk_appendf(&trash, "%s ", un->sun_path);
1028 } else if (l->addr.ss_family == AF_INET) {
1029 addr_to_str(&l->addr, addr, sizeof(addr));
1030 port_to_str(&l->addr, port, sizeof(port));
1031 chunk_appendf(&trash, "%s:%s ", addr, port);
1032 } else if (l->addr.ss_family == AF_INET6) {
1033 addr_to_str(&l->addr, addr, sizeof(addr));
1034 port_to_str(&l->addr, port, sizeof(port));
1035 chunk_appendf(&trash, "[%s]:%s ", addr, port);
1036 } else
1037 continue;
1038
William Lallemand07a62f72017-05-24 00:57:40 +02001039 if ((bind_conf->level & ACCESS_LVL_MASK) == ACCESS_LVL_ADMIN)
William Lallemandeceddf72016-12-15 18:06:44 +01001040 chunk_appendf(&trash, "admin ");
William Lallemand07a62f72017-05-24 00:57:40 +02001041 else if ((bind_conf->level & ACCESS_LVL_MASK) == ACCESS_LVL_OPER)
1042 chunk_appendf(&trash, "operator ");
1043 else if ((bind_conf->level & ACCESS_LVL_MASK) == ACCESS_LVL_USER)
1044 chunk_appendf(&trash, "user ");
William Lallemandeceddf72016-12-15 18:06:44 +01001045 else
1046 chunk_appendf(&trash, " ");
1047
1048 if (bind_conf->bind_proc != 0) {
1049 int pos;
Willy Tarreau20c5e522016-12-16 12:50:55 +01001050 for (pos = 0; pos < 8 * sizeof(bind_conf->bind_proc); pos++) {
Willy Tarreau4305ac72016-12-16 12:56:31 +01001051 if (bind_conf->bind_proc & (1UL << pos)) {
William Lallemandeceddf72016-12-15 18:06:44 +01001052 chunk_appendf(&trash, "%d,", pos+1);
1053 }
1054 }
1055 /* replace the latest comma by a newline */
1056 trash.str[trash.len-1] = '\n';
1057
1058 } else {
1059 chunk_appendf(&trash, "all\n");
1060 }
1061
Willy Tarreau06d80a92017-10-19 14:32:15 +02001062 if (ci_putchk(si_ic(si), &trash) == -1) {
William Lallemandeceddf72016-12-15 18:06:44 +01001063 si_applet_cant_put(si);
1064 return 0;
1065 }
1066 }
Willy Tarreau3af9d832016-12-16 12:58:09 +01001067 appctx->ctx.cli.p0 = &bind_conf->by_fe; /* store the latest list node dumped */
William Lallemandeceddf72016-12-15 18:06:44 +01001068 }
1069 }
1070 default:
1071 appctx->st2 = STAT_ST_FIN;
1072 return 1;
1073 }
1074}
1075
1076
Willy Tarreau0a739292016-11-22 20:21:23 +01001077/* parse a "show env" CLI request. Returns 0 if it needs to continue, 1 if it
Willy Tarreauf6710f82016-12-16 17:45:44 +01001078 * wants to stop here. It puts the variable to be dumped into cli.p0 if a single
1079 * variable is requested otherwise puts environ there.
Willy Tarreau0a739292016-11-22 20:21:23 +01001080 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001081static int cli_parse_show_env(char **args, char *payload, struct appctx *appctx, void *private)
Willy Tarreau0a739292016-11-22 20:21:23 +01001082{
1083 extern char **environ;
Willy Tarreauf6710f82016-12-16 17:45:44 +01001084 char **var;
Willy Tarreau0a739292016-11-22 20:21:23 +01001085
1086 if (!cli_has_level(appctx, ACCESS_LVL_OPER))
1087 return 1;
1088
Willy Tarreauf6710f82016-12-16 17:45:44 +01001089 var = environ;
Willy Tarreau0a739292016-11-22 20:21:23 +01001090
1091 if (*args[2]) {
1092 int len = strlen(args[2]);
1093
Willy Tarreauf6710f82016-12-16 17:45:44 +01001094 for (; *var; var++) {
1095 if (strncmp(*var, args[2], len) == 0 &&
1096 (*var)[len] == '=')
Willy Tarreau0a739292016-11-22 20:21:23 +01001097 break;
1098 }
Willy Tarreauf6710f82016-12-16 17:45:44 +01001099 if (!*var) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001100 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau0a739292016-11-22 20:21:23 +01001101 appctx->ctx.cli.msg = "Variable not found\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001102 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau0a739292016-11-22 20:21:23 +01001103 return 1;
1104 }
1105 appctx->st2 = STAT_ST_END;
1106 }
Willy Tarreauf6710f82016-12-16 17:45:44 +01001107 appctx->ctx.cli.p0 = var;
Willy Tarreau0a739292016-11-22 20:21:23 +01001108 return 0;
1109}
1110
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +02001111/* parse a "show fd" CLI request. Returns 0 if it needs to continue, 1 if it
1112 * wants to stop here. It puts the FD number into cli.i0 if a specific FD is
1113 * requested and sets st2 to STAT_ST_END, otherwise leaves 0 in i0.
1114 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001115static int cli_parse_show_fd(char **args, char *payload, struct appctx *appctx, void *private)
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +02001116{
1117 if (!cli_has_level(appctx, ACCESS_LVL_OPER))
1118 return 1;
1119
1120 appctx->ctx.cli.i0 = 0;
1121
1122 if (*args[2]) {
1123 appctx->ctx.cli.i0 = atoi(args[2]);
1124 appctx->st2 = STAT_ST_END;
1125 }
1126 return 0;
1127}
1128
Willy Tarreau599852e2016-11-22 20:33:32 +01001129/* parse a "set timeout" CLI request. It always returns 1. */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001130static int cli_parse_set_timeout(char **args, char *payload, struct appctx *appctx, void *private)
Willy Tarreau599852e2016-11-22 20:33:32 +01001131{
1132 struct stream_interface *si = appctx->owner;
1133 struct stream *s = si_strm(si);
1134
1135 if (strcmp(args[2], "cli") == 0) {
1136 unsigned timeout;
1137 const char *res;
1138
1139 if (!*args[3]) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001140 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau599852e2016-11-22 20:33:32 +01001141 appctx->ctx.cli.msg = "Expects an integer value.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001142 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau599852e2016-11-22 20:33:32 +01001143 return 1;
1144 }
1145
1146 res = parse_time_err(args[3], &timeout, TIME_UNIT_S);
1147 if (res || timeout < 1) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001148 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau599852e2016-11-22 20:33:32 +01001149 appctx->ctx.cli.msg = "Invalid timeout value.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001150 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau599852e2016-11-22 20:33:32 +01001151 return 1;
1152 }
1153
1154 s->req.rto = s->res.wto = 1 + MS_TO_TICKS(timeout*1000);
1155 task_wakeup(s->task, TASK_WOKEN_MSG); // recompute timeouts
1156 return 1;
1157 }
1158 else {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001159 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau599852e2016-11-22 20:33:32 +01001160 appctx->ctx.cli.msg = "'set timeout' only supports 'cli'.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001161 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau599852e2016-11-22 20:33:32 +01001162 return 1;
1163 }
1164}
1165
Willy Tarreau2af99412016-11-23 11:10:59 +01001166/* parse a "set maxconn global" command. It always returns 1. */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001167static int cli_parse_set_maxconn_global(char **args, char *payload, struct appctx *appctx, void *private)
Willy Tarreau2af99412016-11-23 11:10:59 +01001168{
1169 int v;
1170
1171 if (!cli_has_level(appctx, ACCESS_LVL_ADMIN))
1172 return 1;
1173
1174 if (!*args[3]) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001175 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau2af99412016-11-23 11:10:59 +01001176 appctx->ctx.cli.msg = "Expects an integer value.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001177 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau2af99412016-11-23 11:10:59 +01001178 return 1;
1179 }
1180
1181 v = atoi(args[3]);
1182 if (v > global.hardmaxconn) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001183 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau2af99412016-11-23 11:10:59 +01001184 appctx->ctx.cli.msg = "Value out of range.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001185 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau2af99412016-11-23 11:10:59 +01001186 return 1;
1187 }
1188
1189 /* check for unlimited values */
1190 if (v <= 0)
1191 v = global.hardmaxconn;
1192
1193 global.maxconn = v;
1194
1195 /* Dequeues all of the listeners waiting for a resource */
1196 if (!LIST_ISEMPTY(&global_listener_queue))
1197 dequeue_all_listeners(&global_listener_queue);
1198
1199 return 1;
1200}
1201
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001202static int set_severity_output(int *target, char *argument)
1203{
1204 if (!strcmp(argument, "none")) {
1205 *target = CLI_SEVERITY_NONE;
1206 return 1;
1207 }
1208 else if (!strcmp(argument, "number")) {
1209 *target = CLI_SEVERITY_NUMBER;
1210 return 1;
1211 }
1212 else if (!strcmp(argument, "string")) {
1213 *target = CLI_SEVERITY_STRING;
1214 return 1;
1215 }
1216 return 0;
1217}
1218
1219/* parse a "set severity-output" command. */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001220static int cli_parse_set_severity_output(char **args, char *payload, struct appctx *appctx, void *private)
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001221{
1222 if (*args[2] && set_severity_output(&appctx->cli_severity_output, args[2]))
1223 return 0;
1224
1225 appctx->ctx.cli.severity = LOG_ERR;
Aurélien Nephtali6e8a41d2018-03-15 21:48:50 +01001226 appctx->ctx.cli.msg = "one of 'none', 'number', 'string' is a required argument\n";
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001227 appctx->st0 = CLI_ST_PRINT;
1228 return 1;
1229}
William Lallemandeceddf72016-12-15 18:06:44 +01001230
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001231int cli_parse_default(char **args, char *payload, struct appctx *appctx, void *private)
William Lallemandeceddf72016-12-15 18:06:44 +01001232{
1233 return 0;
1234}
1235
Willy Tarreau45c742b2016-11-24 14:51:17 +01001236/* parse a "set rate-limit" command. It always returns 1. */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001237static int cli_parse_set_ratelimit(char **args, char *payload, struct appctx *appctx, void *private)
Willy Tarreau45c742b2016-11-24 14:51:17 +01001238{
1239 int v;
1240 int *res;
1241 int mul = 1;
1242
1243 if (!cli_has_level(appctx, ACCESS_LVL_ADMIN))
1244 return 1;
1245
1246 if (strcmp(args[2], "connections") == 0 && strcmp(args[3], "global") == 0)
1247 res = &global.cps_lim;
1248 else if (strcmp(args[2], "sessions") == 0 && strcmp(args[3], "global") == 0)
1249 res = &global.sps_lim;
1250#ifdef USE_OPENSSL
1251 else if (strcmp(args[2], "ssl-sessions") == 0 && strcmp(args[3], "global") == 0)
1252 res = &global.ssl_lim;
1253#endif
1254 else if (strcmp(args[2], "http-compression") == 0 && strcmp(args[3], "global") == 0) {
1255 res = &global.comp_rate_lim;
1256 mul = 1024;
1257 }
1258 else {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001259 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001260 appctx->ctx.cli.msg =
1261 "'set rate-limit' only supports :\n"
1262 " - 'connections global' to set the per-process maximum connection rate\n"
1263 " - 'sessions global' to set the per-process maximum session rate\n"
1264#ifdef USE_OPENSSL
Aurélien Nephtalib53e2082018-03-11 16:55:02 +01001265 " - 'ssl-sessions global' to set the per-process maximum SSL session rate\n"
Willy Tarreau45c742b2016-11-24 14:51:17 +01001266#endif
1267 " - 'http-compression global' to set the per-process maximum compression speed in kB/s\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001268 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001269 return 1;
1270 }
1271
1272 if (!*args[4]) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001273 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001274 appctx->ctx.cli.msg = "Expects an integer value.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001275 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001276 return 1;
1277 }
1278
1279 v = atoi(args[4]);
1280 if (v < 0) {
Andjelko Iharosc3680ec2017-07-20 16:49:14 +02001281 appctx->ctx.cli.severity = LOG_ERR;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001282 appctx->ctx.cli.msg = "Value out of range.\n";
Willy Tarreau3b6e5472016-11-24 15:53:53 +01001283 appctx->st0 = CLI_ST_PRINT;
Willy Tarreau45c742b2016-11-24 14:51:17 +01001284 return 1;
1285 }
1286
1287 *res = v * mul;
1288
1289 /* Dequeues all of the listeners waiting for a resource */
1290 if (!LIST_ISEMPTY(&global_listener_queue))
1291 dequeue_all_listeners(&global_listener_queue);
1292
1293 return 1;
1294}
1295
William Lallemandf6975e92017-05-26 17:42:10 +02001296/* parse the "expose-fd" argument on the bind lines */
1297static int bind_parse_expose_fd(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1298{
1299 if (!*args[cur_arg + 1]) {
1300 memprintf(err, "'%s' : missing fd type", args[cur_arg]);
1301 return ERR_ALERT | ERR_FATAL;
1302 }
1303 if (!strcmp(args[cur_arg+1], "listeners")) {
1304 conf->level |= ACCESS_FD_LISTENERS;
1305 } else {
1306 memprintf(err, "'%s' only supports 'listeners' (got '%s')",
1307 args[cur_arg], args[cur_arg+1]);
1308 return ERR_ALERT | ERR_FATAL;
1309 }
1310
1311 return 0;
1312}
1313
William Lallemand74c24fb2016-11-21 17:18:36 +01001314/* parse the "level" argument on the bind lines */
1315static int bind_parse_level(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1316{
1317 if (!*args[cur_arg + 1]) {
1318 memprintf(err, "'%s' : missing level", args[cur_arg]);
1319 return ERR_ALERT | ERR_FATAL;
1320 }
1321
William Lallemand07a62f72017-05-24 00:57:40 +02001322 if (!strcmp(args[cur_arg+1], "user")) {
1323 conf->level &= ~ACCESS_LVL_MASK;
1324 conf->level |= ACCESS_LVL_USER;
1325 } else if (!strcmp(args[cur_arg+1], "operator")) {
1326 conf->level &= ~ACCESS_LVL_MASK;
1327 conf->level |= ACCESS_LVL_OPER;
1328 } else if (!strcmp(args[cur_arg+1], "admin")) {
1329 conf->level &= ~ACCESS_LVL_MASK;
1330 conf->level |= ACCESS_LVL_ADMIN;
1331 } else {
William Lallemand74c24fb2016-11-21 17:18:36 +01001332 memprintf(err, "'%s' only supports 'user', 'operator', and 'admin' (got '%s')",
1333 args[cur_arg], args[cur_arg+1]);
1334 return ERR_ALERT | ERR_FATAL;
1335 }
1336
1337 return 0;
1338}
1339
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001340static int bind_parse_severity_output(char **args, int cur_arg, struct proxy *px, struct bind_conf *conf, char **err)
1341{
1342 if (!*args[cur_arg + 1]) {
1343 memprintf(err, "'%s' : missing severity format", args[cur_arg]);
1344 return ERR_ALERT | ERR_FATAL;
1345 }
1346
1347 if (set_severity_output(&conf->severity_output, args[cur_arg+1]))
1348 return 0;
1349 else {
1350 memprintf(err, "'%s' only supports 'none', 'number', and 'string' (got '%s')",
1351 args[cur_arg], args[cur_arg+1]);
1352 return ERR_ALERT | ERR_FATAL;
1353 }
1354}
1355
Olivier Houchardf886e342017-04-05 22:24:59 +02001356/* Send all the bound sockets, always returns 1 */
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001357static int _getsocks(char **args, char *payload, struct appctx *appctx, void *private)
Olivier Houchardf886e342017-04-05 22:24:59 +02001358{
1359 char *cmsgbuf = NULL;
1360 unsigned char *tmpbuf = NULL;
1361 struct cmsghdr *cmsg;
1362 struct stream_interface *si = appctx->owner;
William Lallemandf6975e92017-05-26 17:42:10 +02001363 struct stream *s = si_strm(si);
Olivier Houchard9aaf7782017-09-13 18:30:23 +02001364 struct connection *remote = cs_conn(objt_cs(si_opposite(si)->end));
Olivier Houchardf886e342017-04-05 22:24:59 +02001365 struct msghdr msghdr;
1366 struct iovec iov;
Olivier Houchard54740872017-04-06 14:45:14 +02001367 struct timeval tv = { .tv_sec = 1, .tv_usec = 0 };
Olivier Houchardf886e342017-04-05 22:24:59 +02001368 int *tmpfd;
1369 int tot_fd_nb = 0;
1370 struct proxy *px;
1371 int i = 0;
Willy Tarreau585744b2017-08-24 14:31:19 +02001372 int fd = remote->handle.fd;
Olivier Houchardf886e342017-04-05 22:24:59 +02001373 int curoff = 0;
1374 int old_fcntl;
1375 int ret;
1376
1377 /* Temporary set the FD in blocking mode, that will make our life easier */
1378 old_fcntl = fcntl(fd, F_GETFL);
1379 if (old_fcntl < 0) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001380 ha_warning("Couldn't get the flags for the unix socket\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001381 goto out;
1382 }
1383 cmsgbuf = malloc(CMSG_SPACE(sizeof(int) * MAX_SEND_FD));
1384 if (!cmsgbuf) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001385 ha_warning("Failed to allocate memory to send sockets\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001386 goto out;
1387 }
1388 if (fcntl(fd, F_SETFL, old_fcntl &~ O_NONBLOCK) == -1) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001389 ha_warning("Cannot make the unix socket blocking\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001390 goto out;
1391 }
Olivier Houchard54740872017-04-06 14:45:14 +02001392 setsockopt(fd, SOL_SOCKET, SO_RCVTIMEO, (void *)&tv, sizeof(tv));
Olivier Houchardf886e342017-04-05 22:24:59 +02001393 iov.iov_base = &tot_fd_nb;
1394 iov.iov_len = sizeof(tot_fd_nb);
William Lallemandf6975e92017-05-26 17:42:10 +02001395 if (!(strm_li(s)->bind_conf->level & ACCESS_FD_LISTENERS))
Olivier Houchardf886e342017-04-05 22:24:59 +02001396 goto out;
1397 memset(&msghdr, 0, sizeof(msghdr));
1398 /*
1399 * First, calculates the total number of FD, so that we can let
1400 * the caller know how much he should expects.
1401 */
Olivier Houchardfbc74e82017-11-24 16:54:05 +01001402 px = proxies_list;
Olivier Houchardf886e342017-04-05 22:24:59 +02001403 while (px) {
1404 struct listener *l;
1405
1406 list_for_each_entry(l, &px->conf.listeners, by_fe) {
Olivier Houchard1fc05162017-04-06 01:05:05 +02001407 /* Only transfer IPv4/IPv6/UNIX sockets */
1408 if (l->state >= LI_ZOMBIE &&
1409 (l->proto->sock_family == AF_INET ||
Olivier Houchardf886e342017-04-05 22:24:59 +02001410 l->proto->sock_family == AF_INET6 ||
Olivier Houchard1fc05162017-04-06 01:05:05 +02001411 l->proto->sock_family == AF_UNIX))
Olivier Houchardf886e342017-04-05 22:24:59 +02001412 tot_fd_nb++;
1413 }
1414 px = px->next;
1415 }
1416 if (tot_fd_nb == 0)
1417 goto out;
1418
1419 /* First send the total number of file descriptors, so that the
1420 * receiving end knows what to expect.
1421 */
1422 msghdr.msg_iov = &iov;
1423 msghdr.msg_iovlen = 1;
1424 ret = sendmsg(fd, &msghdr, 0);
1425 if (ret != sizeof(tot_fd_nb)) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001426 ha_warning("Failed to send the number of sockets to send\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001427 goto out;
1428 }
1429
1430 /* Now send the fds */
1431 msghdr.msg_control = cmsgbuf;
1432 msghdr.msg_controllen = CMSG_SPACE(sizeof(int) * MAX_SEND_FD);
1433 cmsg = CMSG_FIRSTHDR(&msghdr);
1434 cmsg->cmsg_len = CMSG_LEN(MAX_SEND_FD * sizeof(int));
1435 cmsg->cmsg_level = SOL_SOCKET;
1436 cmsg->cmsg_type = SCM_RIGHTS;
1437 tmpfd = (int *)CMSG_DATA(cmsg);
1438
Olivier Houchardfbc74e82017-11-24 16:54:05 +01001439 px = proxies_list;
Olivier Houchardf886e342017-04-05 22:24:59 +02001440 /* For each socket, e message is sent, containing the following :
1441 * Size of the namespace name (or 0 if none), as an unsigned char.
1442 * The namespace name, if any
1443 * Size of the interface name (or 0 if none), as an unsigned char
1444 * The interface name, if any
1445 * Listener options, as an int.
1446 */
1447 /* We will send sockets MAX_SEND_FD per MAX_SEND_FD, allocate a
1448 * buffer big enough to store the socket informations.
1449 */
Olivier Houchardf143b802017-11-04 15:13:01 +01001450 tmpbuf = malloc(MAX_SEND_FD * (1 + MAXPATHLEN + 1 + IFNAMSIZ + sizeof(int)));
Olivier Houchardf886e342017-04-05 22:24:59 +02001451 if (tmpbuf == NULL) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001452 ha_warning("Failed to allocate memory to transfer socket informations\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001453 goto out;
1454 }
1455 iov.iov_base = tmpbuf;
1456 while (px) {
1457 struct listener *l;
1458
1459 list_for_each_entry(l, &px->conf.listeners, by_fe) {
1460 int ret;
1461 /* Only transfer IPv4/IPv6 sockets */
Olivier Houchard1fc05162017-04-06 01:05:05 +02001462 if (l->state >= LI_ZOMBIE &&
Olivier Houchardf886e342017-04-05 22:24:59 +02001463 (l->proto->sock_family == AF_INET ||
1464 l->proto->sock_family == AF_INET6 ||
1465 l->proto->sock_family == AF_UNIX)) {
1466 memcpy(&tmpfd[i % MAX_SEND_FD], &l->fd, sizeof(l->fd));
1467 if (!l->netns)
1468 tmpbuf[curoff++] = 0;
1469#ifdef CONFIG_HAP_NS
1470 else {
1471 char *name = l->netns->node.key;
1472 unsigned char len = l->netns->name_len;
1473 tmpbuf[curoff++] = len;
1474 memcpy(tmpbuf + curoff, name, len);
1475 curoff += len;
1476 }
1477#endif
1478 if (l->interface) {
1479 unsigned char len = strlen(l->interface);
1480 tmpbuf[curoff++] = len;
1481 memcpy(tmpbuf + curoff, l->interface, len);
1482 curoff += len;
1483 } else
1484 tmpbuf[curoff++] = 0;
1485 memcpy(tmpbuf + curoff, &l->options,
1486 sizeof(l->options));
1487 curoff += sizeof(l->options);
1488
1489
1490 i++;
1491 } else
1492 continue;
1493 if ((!(i % MAX_SEND_FD))) {
1494 iov.iov_len = curoff;
1495 if (sendmsg(fd, &msghdr, 0) != curoff) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001496 ha_warning("Failed to transfer sockets\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001497 goto out;
1498 }
1499 /* Wait for an ack */
1500 do {
1501 ret = recv(fd, &tot_fd_nb,
1502 sizeof(tot_fd_nb), 0);
1503 } while (ret == -1 && errno == EINTR);
1504 if (ret <= 0) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001505 ha_warning("Unexpected error while transferring sockets\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001506 goto out;
1507 }
1508 curoff = 0;
1509 }
1510
1511 }
1512 px = px->next;
1513 }
1514 if (i % MAX_SEND_FD) {
1515 iov.iov_len = curoff;
1516 cmsg->cmsg_len = CMSG_LEN((i % MAX_SEND_FD) * sizeof(int));
1517 msghdr.msg_controllen = CMSG_SPACE(sizeof(int) * (i % MAX_SEND_FD));
1518 if (sendmsg(fd, &msghdr, 0) != curoff) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001519 ha_warning("Failed to transfer sockets\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001520 goto out;
1521 }
1522 }
1523
1524out:
1525 if (old_fcntl >= 0 && fcntl(fd, F_SETFL, old_fcntl) == -1) {
Christopher Faulet767a84b2017-11-24 16:50:31 +01001526 ha_warning("Cannot make the unix socket non-blocking\n");
Olivier Houchardf886e342017-04-05 22:24:59 +02001527 goto out;
1528 }
1529 appctx->st0 = CLI_ST_END;
1530 free(cmsgbuf);
1531 free(tmpbuf);
1532 return 1;
1533}
1534
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001535static int cli_parse_simple(char **args, char *payload, struct appctx *appctx, void *private)
1536{
1537 if (*args[0] == 'h')
1538 /* help */
1539 cli_gen_usage_msg(appctx);
1540 else if (*args[0] == 'p')
1541 /* prompt */
1542 appctx->st1 ^= APPCTX_CLI_ST1_PROMPT;
1543 else if (*args[0] == 'q')
1544 /* quit */
1545 appctx->st0 = CLI_ST_END;
1546
1547 return 1;
1548}
Olivier Houchardf886e342017-04-05 22:24:59 +02001549
1550
William Lallemand74c24fb2016-11-21 17:18:36 +01001551static struct applet cli_applet = {
1552 .obj_type = OBJ_TYPE_APPLET,
1553 .name = "<CLI>", /* used for logging */
1554 .fct = cli_io_handler,
1555 .release = cli_release_handler,
1556};
1557
Willy Tarreau0a739292016-11-22 20:21:23 +01001558/* register cli keywords */
1559static struct cli_kw_list cli_kws = {{ },{
Aurélien Nephtaliabbf6072018-04-18 13:26:46 +02001560 { { "help", NULL }, NULL, cli_parse_simple, NULL },
1561 { { "prompt", NULL }, NULL, cli_parse_simple, NULL },
1562 { { "quit", NULL }, NULL, cli_parse_simple, NULL },
Willy Tarreau2af99412016-11-23 11:10:59 +01001563 { { "set", "maxconn", "global", NULL }, "set maxconn global : change the per-process maxconn setting", cli_parse_set_maxconn_global, NULL },
Willy Tarreau45c742b2016-11-24 14:51:17 +01001564 { { "set", "rate-limit", NULL }, "set rate-limit : change a rate limiting value", cli_parse_set_ratelimit, NULL },
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001565 { { "set", "severity-output", NULL }, "set severity-output [none|number|string] : set presence of severity level in feedback information", cli_parse_set_severity_output, NULL, NULL },
Willy Tarreau599852e2016-11-22 20:33:32 +01001566 { { "set", "timeout", NULL }, "set timeout : change a timeout setting", cli_parse_set_timeout, NULL, NULL },
Willy Tarreau0a739292016-11-22 20:21:23 +01001567 { { "show", "env", NULL }, "show env [var] : dump environment variables known to the process", cli_parse_show_env, cli_io_handler_show_env, NULL },
William Lallemandeceddf72016-12-15 18:06:44 +01001568 { { "show", "cli", "sockets", NULL }, "show cli sockets : dump list of cli sockets", cli_parse_default, cli_io_handler_show_cli_sock, NULL },
Willy Tarreau7a4a0ac2017-07-25 19:32:50 +02001569 { { "show", "fd", NULL }, "show fd [num] : dump list of file descriptors in use", cli_parse_show_fd, cli_io_handler_show_fd, NULL },
Willy Tarreaud80cb4e2018-01-20 19:30:13 +01001570 { { "show", "activity", NULL }, "show activity : show per-thread activity stats (for support/developers)", cli_parse_default, cli_io_handler_show_activity, NULL },
Olivier Houchardf886e342017-04-05 22:24:59 +02001571 { { "_getsocks", NULL }, NULL, _getsocks, NULL },
Willy Tarreau0a739292016-11-22 20:21:23 +01001572 {{},}
1573}};
1574
William Lallemand74c24fb2016-11-21 17:18:36 +01001575static struct cfg_kw_list cfg_kws = {ILH, {
1576 { CFG_GLOBAL, "stats", stats_parse_global },
1577 { 0, NULL, NULL },
1578}};
1579
1580static struct bind_kw_list bind_kws = { "STAT", { }, {
William Lallemandf6975e92017-05-26 17:42:10 +02001581 { "level", bind_parse_level, 1 }, /* set the unix socket admin level */
1582 { "expose-fd", bind_parse_expose_fd, 1 }, /* set the unix socket expose fd rights */
Andjelko Iharosc4df59e2017-07-20 11:59:48 +02001583 { "severity-output", bind_parse_severity_output, 1 }, /* set the severity output format */
William Lallemand74c24fb2016-11-21 17:18:36 +01001584 { NULL, NULL, 0 },
1585}};
1586
1587__attribute__((constructor))
1588static void __dumpstats_module_init(void)
1589{
1590 cfg_register_keywords(&cfg_kws);
Willy Tarreau0a739292016-11-22 20:21:23 +01001591 cli_register_kw(&cli_kws);
William Lallemand74c24fb2016-11-21 17:18:36 +01001592 bind_register_keywords(&bind_kws);
1593}
1594
1595/*
1596 * Local variables:
1597 * c-indent-level: 8
1598 * c-basic-offset: 8
1599 * End:
1600 */