blob: 9546b26e815addbf76096fd060022671d7b2b322 [file] [log] [blame]
William Lallemand48dfbbd2019-04-01 11:29:53 +02001/*
2 * Master Worker
3 *
4 * Copyright HAProxy Technologies 2019 - William Lallemand <wlallemand@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
William Lallemand3fa724d2019-04-01 11:29:55 +020013#include <errno.h>
14#include <fcntl.h>
15#include <signal.h>
William Lallemand48dfbbd2019-04-01 11:29:53 +020016#include <stdlib.h>
17#include <string.h>
William Lallemande25473c2019-04-01 11:29:56 +020018#include <sys/wait.h>
William Lallemand48dfbbd2019-04-01 11:29:53 +020019
Willy Tarreau4c7e4b72020-05-27 12:58:42 +020020#include <haproxy/api.h>
William Lallemand27edc4b2019-05-07 17:49:33 +020021#include <common/cfgparse.h>
Willy Tarreau83487a82020-06-04 20:19:54 +020022#include <haproxy/cli.h>
Willy Tarreau853b2972020-05-27 18:01:47 +020023#include <haproxy/list.h>
Willy Tarreau213e9902020-06-04 14:58:24 +020024#include <haproxy/listener.h>
Willy Tarreauaeed4a82020-06-04 22:01:04 +020025#include <haproxy/log.h>
Willy Tarreaub5abe5b2020-06-04 14:07:37 +020026#include <haproxy/mworker.h>
Willy Tarreau3c2a7c22020-06-04 18:38:21 +020027#include <haproxy/peers.h>
Willy Tarreaua264d962020-06-04 22:29:18 +020028#include <haproxy/proxy-t.h>
Willy Tarreau3727a8a2020-06-04 17:37:26 +020029#include <haproxy/signal.h>
Willy Tarreau5e539c92020-06-04 20:45:39 +020030#include <haproxy/stream_interface.h>
Willy Tarreaud6788052020-05-27 15:59:00 +020031#include <haproxy/version.h>
William Lallemand48dfbbd2019-04-01 11:29:53 +020032
Willy Tarreauf268ee82020-06-04 17:05:57 +020033#include <haproxy/global.h>
William Lallemand88dc7c52019-04-01 11:30:01 +020034
Willy Tarreau0f6ffd62020-06-03 19:33:00 +020035#include <haproxy/fd.h>
William Lallemand88dc7c52019-04-01 11:30:01 +020036#include <proto/stream.h>
William Lallemand48dfbbd2019-04-01 11:29:53 +020037
William Lallemand48dfbbd2019-04-01 11:29:53 +020038
William Lallemande25473c2019-04-01 11:29:56 +020039#if defined(USE_SYSTEMD)
40#include <systemd/sd-daemon.h>
41#endif
42
43static int exitcode = -1;
William Lallemand27edc4b2019-05-07 17:49:33 +020044static int max_reloads = -1; /* number max of reloads a worker can have until they are killed */
William Lallemande25473c2019-04-01 11:29:56 +020045
William Lallemande25473c2019-04-01 11:29:56 +020046/* ----- children processes handling ----- */
William Lallemand48dfbbd2019-04-01 11:29:53 +020047
William Lallemand48dfbbd2019-04-01 11:29:53 +020048/*
William Lallemande25473c2019-04-01 11:29:56 +020049 * Send signal to every known children.
50 */
51
52static void mworker_kill(int sig)
53{
William Lallemand3f128872019-04-01 11:29:59 +020054 struct mworker_proc *child;
William Lallemande25473c2019-04-01 11:29:56 +020055
William Lallemand3f128872019-04-01 11:29:59 +020056 list_for_each_entry(child, &proc_list, list) {
57 /* careful there, we must be sure that the pid > 0, we don't want to emit a kill -1 */
William Lallemand32b69012019-04-16 17:42:42 +020058 if ((child->options & (PROC_O_TYPE_WORKER|PROC_O_TYPE_PROG)) && (child->pid > 0))
William Lallemand3f128872019-04-01 11:29:59 +020059 kill(child->pid, sig);
William Lallemande25473c2019-04-01 11:29:56 +020060 }
61}
62
William Lallemand27edc4b2019-05-07 17:49:33 +020063void mworker_kill_max_reloads(int sig)
64{
65 struct mworker_proc *child;
66
67 list_for_each_entry(child, &proc_list, list) {
68 if (max_reloads != -1 && (child->options & PROC_O_TYPE_WORKER) &&
69 (child->pid > 0) && (child->reloads > max_reloads))
70 kill(child->pid, sig);
71 }
72}
William Lallemande25473c2019-04-01 11:29:56 +020073
74/* return 1 if a pid is a current child otherwise 0 */
William Lallemand3f128872019-04-01 11:29:59 +020075int mworker_current_child(int pid)
William Lallemande25473c2019-04-01 11:29:56 +020076{
William Lallemand3f128872019-04-01 11:29:59 +020077 struct mworker_proc *child;
William Lallemande25473c2019-04-01 11:29:56 +020078
William Lallemand3f128872019-04-01 11:29:59 +020079 list_for_each_entry(child, &proc_list, list) {
William Lallemand8f7069a2019-04-12 16:09:23 +020080 if ((child->options & (PROC_O_TYPE_WORKER|PROC_O_TYPE_PROG)) && (!(child->options & PROC_O_LEAVING)) && (child->pid == pid))
William Lallemande25473c2019-04-01 11:29:56 +020081 return 1;
82 }
83 return 0;
84}
85
William Lallemand3f128872019-04-01 11:29:59 +020086/*
87 * Return the number of new and old children (including workers and external
88 * processes)
89 */
90int mworker_child_nb()
91{
92 struct mworker_proc *child;
93 int ret = 0;
94
95 list_for_each_entry(child, &proc_list, list) {
William Lallemand8f7069a2019-04-12 16:09:23 +020096 if (child->options & (PROC_O_TYPE_WORKER|PROC_O_TYPE_PROG))
William Lallemand3f128872019-04-01 11:29:59 +020097 ret++;
98 }
99
100 return ret;
101}
102
103
William Lallemande25473c2019-04-01 11:29:56 +0200104/*
William Lallemand48dfbbd2019-04-01 11:29:53 +0200105 * serialize the proc list and put it in the environment
106 */
107void mworker_proc_list_to_env()
108{
109 char *msg = NULL;
110 struct mworker_proc *child;
111
112 list_for_each_entry(child, &proc_list, list) {
William Lallemand8f7069a2019-04-12 16:09:23 +0200113 char type = '?';
114
115 if (child->options & PROC_O_TYPE_MASTER)
116 type = 'm';
117 else if (child->options & PROC_O_TYPE_PROG)
118 type = 'e';
119 else if (child->options &= PROC_O_TYPE_WORKER)
120 type = 'w';
121
William Lallemand48dfbbd2019-04-01 11:29:53 +0200122 if (child->pid > -1)
William Lallemand1dc69632019-06-12 19:11:33 +0200123 memprintf(&msg, "%s|type=%c;fd=%d;pid=%d;rpid=%d;reloads=%d;timestamp=%d;id=%s;version=%s", msg ? msg : "", type, child->ipc_fd[0], child->pid, child->relative_pid, child->reloads, child->timestamp, child->id ? child->id : "", child->version);
William Lallemand48dfbbd2019-04-01 11:29:53 +0200124 }
125 if (msg)
126 setenv("HAPROXY_PROCESSES", msg, 1);
127}
128
129/*
130 * unserialize the proc list from the environment
131 */
132void mworker_env_to_proc_list()
133{
134 char *msg, *token = NULL, *s1;
135
136 msg = getenv("HAPROXY_PROCESSES");
137 if (!msg)
138 return;
139
140 while ((token = strtok_r(msg, "|", &s1))) {
141 struct mworker_proc *child;
142 char *subtoken = NULL;
143 char *s2;
144
145 msg = NULL;
146
147 child = calloc(1, sizeof(*child));
148
149 while ((subtoken = strtok_r(token, ";", &s2))) {
150
151 token = NULL;
152
153 if (strncmp(subtoken, "type=", 5) == 0) {
William Lallemand8f7069a2019-04-12 16:09:23 +0200154 char type;
155
156 type = *(subtoken+5);
157 if (type == 'm') { /* we are in the master, assign it */
William Lallemand48dfbbd2019-04-01 11:29:53 +0200158 proc_self = child;
William Lallemand8f7069a2019-04-12 16:09:23 +0200159 child->options |= PROC_O_TYPE_MASTER;
160 } else if (type == 'e') {
161 child->options |= PROC_O_TYPE_PROG;
162 } else if (type == 'w') {
163 child->options |= PROC_O_TYPE_WORKER;
164 }
165
William Lallemand48dfbbd2019-04-01 11:29:53 +0200166 } else if (strncmp(subtoken, "fd=", 3) == 0) {
167 child->ipc_fd[0] = atoi(subtoken+3);
168 } else if (strncmp(subtoken, "pid=", 4) == 0) {
169 child->pid = atoi(subtoken+4);
170 } else if (strncmp(subtoken, "rpid=", 5) == 0) {
171 child->relative_pid = atoi(subtoken+5);
172 } else if (strncmp(subtoken, "reloads=", 8) == 0) {
173 /* we reloaded this process once more */
174 child->reloads = atoi(subtoken+8) + 1;
175 } else if (strncmp(subtoken, "timestamp=", 10) == 0) {
176 child->timestamp = atoi(subtoken+10);
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200177 } else if (strncmp(subtoken, "id=", 3) == 0) {
178 child->id = strdup(subtoken+3);
William Lallemand1dc69632019-06-12 19:11:33 +0200179 } else if (strncmp(subtoken, "version=", 8) == 0) {
180 child->version = strdup(subtoken+8);
William Lallemand48dfbbd2019-04-01 11:29:53 +0200181 }
182 }
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200183 if (child->pid) {
William Lallemand920fc8b2019-05-14 11:15:18 +0200184 /* this is a process inherited from a reload that should be leaving */
185 child->options |= PROC_O_LEAVING;
186
William Lallemand48dfbbd2019-04-01 11:29:53 +0200187 LIST_ADDQ(&proc_list, &child->list);
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200188 } else {
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200189 mworker_free_child(child);
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200190 }
William Lallemand48dfbbd2019-04-01 11:29:53 +0200191 }
192
193 unsetenv("HAPROXY_PROCESSES");
194}
William Lallemand3cd95d22019-04-01 11:29:54 +0200195
196/* Signal blocking and unblocking */
197
198void mworker_block_signals()
199{
200 sigset_t set;
201
202 sigemptyset(&set);
203 sigaddset(&set, SIGUSR1);
204 sigaddset(&set, SIGUSR2);
Willy Tarreaud26c9f92019-12-11 14:24:07 +0100205 sigaddset(&set, SIGTTIN);
206 sigaddset(&set, SIGTTOU);
William Lallemand3cd95d22019-04-01 11:29:54 +0200207 sigaddset(&set, SIGHUP);
208 sigaddset(&set, SIGCHLD);
209 ha_sigmask(SIG_SETMASK, &set, NULL);
210}
211
212void mworker_unblock_signals()
213{
214 haproxy_unblock_signals();
215}
William Lallemand3fa724d2019-04-01 11:29:55 +0200216
William Lallemande25473c2019-04-01 11:29:56 +0200217/* ----- mworker signal handlers ----- */
218
Willy Tarreaud26c9f92019-12-11 14:24:07 +0100219/* broadcast the configured signal to the workers */
220void mworker_broadcast_signal(struct sig_handler *sh)
221{
222 mworker_kill(sh->arg);
223}
224
William Lallemande25473c2019-04-01 11:29:56 +0200225/*
226 * When called, this function reexec haproxy with -sf followed by current
227 * children PIDs and possibly old children PIDs if they didn't leave yet.
228 */
229void mworker_catch_sighup(struct sig_handler *sh)
230{
231 mworker_reload();
232}
233
234void mworker_catch_sigterm(struct sig_handler *sh)
235{
236 int sig = sh->arg;
237
238#if defined(USE_SYSTEMD)
239 if (global.tune.options & GTUNE_USE_SYSTEMD) {
240 sd_notify(0, "STOPPING=1");
241 }
242#endif
243 ha_warning("Exiting Master process...\n");
244 mworker_kill(sig);
245}
246
247/*
248 * Wait for every children to exit
249 */
250
251void mworker_catch_sigchld(struct sig_handler *sh)
252{
253 int exitpid = -1;
254 int status = 0;
William Lallemande25473c2019-04-01 11:29:56 +0200255 int childfound;
256
257restart_wait:
258
259 childfound = 0;
260
261 exitpid = waitpid(-1, &status, WNOHANG);
262 if (exitpid > 0) {
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200263 struct mworker_proc *child, *it;
264
William Lallemande25473c2019-04-01 11:29:56 +0200265 if (WIFEXITED(status))
266 status = WEXITSTATUS(status);
267 else if (WIFSIGNALED(status))
268 status = 128 + WTERMSIG(status);
269 else if (WIFSTOPPED(status))
270 status = 128 + WSTOPSIG(status);
271 else
272 status = 255;
273
William Lallemand3f128872019-04-01 11:29:59 +0200274 /* delete the child from the process list */
William Lallemande25473c2019-04-01 11:29:56 +0200275 list_for_each_entry_safe(child, it, &proc_list, list) {
276 if (child->pid != exitpid)
277 continue;
278
279 LIST_DEL(&child->list);
280 close(child->ipc_fd[0]);
281 childfound = 1;
282 break;
283 }
284
William Lallemand3f128872019-04-01 11:29:59 +0200285 if (!childfound) {
286 /* We didn't find the PID in the list, that shouldn't happen but we can emit a warning */
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200287 ha_warning("Process %d exited with code %d (%s)\n", exitpid, status, (status >= 128) ? strsignal(status - 128) : "Exit");
William Lallemande25473c2019-04-01 11:29:56 +0200288 } else {
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200289 /* check if exited child is a current child */
William Lallemand45286112019-04-12 16:09:21 +0200290 if (!(child->options & PROC_O_LEAVING)) {
William Lallemanda655ba42020-05-06 17:27:03 +0200291 if (child->options & PROC_O_TYPE_WORKER) {
292 if (status < 128)
293 ha_warning("Current worker #%d (%d) exited with code %d (%s)\n", child->relative_pid, exitpid, status, "Exit");
294 else
295 ha_alert("Current worker #%d (%d) exited with code %d (%s)\n", child->relative_pid, exitpid, status, strsignal(status - 128));
296 }
William Lallemand8f7069a2019-04-12 16:09:23 +0200297 else if (child->options & PROC_O_TYPE_PROG)
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200298 ha_alert("Current program '%s' (%d) exited with code %d (%s)\n", child->id, exitpid, status, (status >= 128) ? strsignal(status - 128) : "Exit");
William Lallemand3f128872019-04-01 11:29:59 +0200299
William Lallemande25473c2019-04-01 11:29:56 +0200300 if (status != 0 && status != 130 && status != 143
301 && !(global.tune.options & GTUNE_NOEXIT_ONFAILURE)) {
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200302 ha_alert("exit-on-failure: killing every processes with SIGTERM\n");
William Lallemande25473c2019-04-01 11:29:56 +0200303 mworker_kill(SIGTERM);
304 }
William Lallemand74f0ec32019-04-16 17:42:44 +0200305 /* 0 & SIGTERM (143) are normal, but we should report SIGINT (130) and other signals */
306 if (exitcode < 0 && status != 0 && status != 143)
307 exitcode = status;
William Lallemande25473c2019-04-01 11:29:56 +0200308 } else {
William Lallemand8f7069a2019-04-12 16:09:23 +0200309 if (child->options & PROC_O_TYPE_WORKER) {
William Lallemand3f128872019-04-01 11:29:59 +0200310 ha_warning("Former worker #%d (%d) exited with code %d (%s)\n", child->relative_pid, exitpid, status, (status >= 128) ? strsignal(status - 128) : "Exit");
311 delete_oldpid(exitpid);
William Lallemand8f7069a2019-04-12 16:09:23 +0200312 } else if (child->options & PROC_O_TYPE_PROG) {
William Lallemand9a1ee7a2019-04-01 11:30:02 +0200313 ha_warning("Former program '%s' (%d) exited with code %d (%s)\n", child->id, exitpid, status, (status >= 128) ? strsignal(status - 128) : "Exit");
William Lallemand3f128872019-04-01 11:29:59 +0200314 }
William Lallemande25473c2019-04-01 11:29:56 +0200315 }
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200316 mworker_free_child(child);
317 child = NULL;
William Lallemande25473c2019-04-01 11:29:56 +0200318 }
319
320 /* do it again to check if it was the last worker */
321 goto restart_wait;
322 }
323 /* Better rely on the system than on a list of process to check if it was the last one */
324 else if (exitpid == -1 && errno == ECHILD) {
William Lallemand4cf4b332019-04-16 17:42:43 +0200325 ha_warning("All workers exited. Exiting... (%d)\n", (exitcode > 0) ? exitcode : EXIT_SUCCESS);
William Lallemande25473c2019-04-01 11:29:56 +0200326 atexit_flag = 0;
327 if (exitcode > 0)
William Lallemand4cf4b332019-04-16 17:42:43 +0200328 exit(exitcode); /* parent must leave using the status code that provoked the exit */
329 exit(EXIT_SUCCESS);
William Lallemande25473c2019-04-01 11:29:56 +0200330 }
331
332}
333
William Lallemand3fa724d2019-04-01 11:29:55 +0200334/* ----- IPC FD (sockpair) related ----- */
335
336/* This wrapper is called from the workers. It is registered instead of the
337 * normal listener_accept() so the worker can exit() when it detects that the
338 * master closed the IPC FD. If it's not a close, we just call the regular
339 * listener_accept() function */
340void mworker_accept_wrapper(int fd)
341{
342 char c;
343 int ret;
344
345 while (1) {
346 ret = recv(fd, &c, 1, MSG_PEEK);
347 if (ret == -1) {
348 if (errno == EINTR)
349 continue;
350 if (errno == EAGAIN) {
351 fd_cant_recv(fd);
352 return;
353 }
354 break;
355 } else if (ret > 0) {
356 listener_accept(fd);
357 return;
358 } else if (ret == 0) {
359 /* At this step the master is down before
360 * this worker perform a 'normal' exit.
361 * So we want to exit with an error but
362 * other threads could currently process
363 * some stuff so we can't perform a clean
364 * deinit().
365 */
366 exit(EXIT_FAILURE);
367 }
368 }
369 return;
370}
371
372/*
Willy Tarreau619a95f2019-05-20 11:12:15 +0200373 * This function registers the accept wrapper for the sockpair of the master
374 * worker. It's only handled by worker thread #0. Other threads and master do
375 * nothing here. It always returns 1 (success).
William Lallemand3fa724d2019-04-01 11:29:55 +0200376 */
Willy Tarreau619a95f2019-05-20 11:12:15 +0200377static int mworker_pipe_register_per_thread()
William Lallemand3fa724d2019-04-01 11:29:55 +0200378{
Willy Tarreau619a95f2019-05-20 11:12:15 +0200379 if (!(global.mode & MODE_MWORKER) || master)
380 return 1;
381
382 if (tid != 0)
383 return 1;
William Lallemand3fa724d2019-04-01 11:29:55 +0200384
385 fcntl(proc_self->ipc_fd[1], F_SETFL, O_NONBLOCK);
386 /* In multi-tread, we need only one thread to process
387 * events on the pipe with master
388 */
Willy Tarreau619a95f2019-05-20 11:12:15 +0200389 fd_insert(proc_self->ipc_fd[1], fdtab[proc_self->ipc_fd[1]].owner, mworker_accept_wrapper, tid_bit);
William Lallemand3fa724d2019-04-01 11:29:55 +0200390 fd_want_recv(proc_self->ipc_fd[1]);
Willy Tarreau619a95f2019-05-20 11:12:15 +0200391 return 1;
William Lallemand3fa724d2019-04-01 11:29:55 +0200392}
William Lallemand9001ce82019-04-01 11:29:57 +0200393
Willy Tarreau619a95f2019-05-20 11:12:15 +0200394REGISTER_PER_THREAD_INIT(mworker_pipe_register_per_thread);
395
William Lallemand9001ce82019-04-01 11:29:57 +0200396/* ----- proxies ----- */
397/*
398 * Upon a reload, the master worker needs to close all listeners FDs but the mworker_pipe
399 * fd, and the FD provided by fd@
400 */
401void mworker_cleanlisteners()
402{
403 struct listener *l, *l_next;
404 struct proxy *curproxy;
405 struct peers *curpeers;
406
407 /* we might have to unbind some peers sections from some processes */
408 for (curpeers = cfg_peers; curpeers; curpeers = curpeers->next) {
409 if (!curpeers->peers_fe)
410 continue;
411
412 stop_proxy(curpeers->peers_fe);
413 /* disable this peer section so that it kills itself */
414 signal_unregister_handler(curpeers->sighandler);
Olivier Houchard3f795f72019-04-17 22:51:06 +0200415 task_destroy(curpeers->sync_task);
William Lallemand9001ce82019-04-01 11:29:57 +0200416 curpeers->sync_task = NULL;
Olivier Houchard3f795f72019-04-17 22:51:06 +0200417 task_destroy(curpeers->peers_fe->task);
William Lallemand9001ce82019-04-01 11:29:57 +0200418 curpeers->peers_fe->task = NULL;
419 curpeers->peers_fe = NULL;
420 }
421
422 for (curproxy = proxies_list; curproxy; curproxy = curproxy->next) {
423 int listen_in_master = 0;
424
425 list_for_each_entry_safe(l, l_next, &curproxy->conf.listeners, by_fe) {
426 /* remove the listener, but not those we need in the master... */
427 if (!(l->options & LI_O_MWORKER)) {
428 /* unbind the listener but does not close if
429 the FD is inherited with fd@ from the parent
430 process */
431 if (l->options & LI_O_INHERITED)
432 unbind_listener_no_close(l);
433 else
434 unbind_listener(l);
435 delete_listener(l);
436 } else {
437 listen_in_master = 1;
438 }
439 }
440 /* if the proxy shouldn't be in the master, we stop it */
441 if (!listen_in_master)
442 curproxy->state = PR_STSTOPPED;
443 }
William Lallemand88dc7c52019-04-01 11:30:01 +0200444}
445
446/* Displays workers and processes */
447static int cli_io_handler_show_proc(struct appctx *appctx)
448{
449 struct stream_interface *si = appctx->owner;
450 struct mworker_proc *child;
451 int old = 0;
452 int up = now.tv_sec - proc_self->timestamp;
William Lallemande8669fc2019-06-12 18:21:17 +0200453 char *uptime = NULL;
William Lallemand88dc7c52019-04-01 11:30:01 +0200454
455 if (unlikely(si_ic(si)->flags & (CF_WRITE_ERROR|CF_SHUTW)))
456 return 1;
457
458 chunk_reset(&trash);
459
William Lallemand1dc69632019-06-12 19:11:33 +0200460 chunk_printf(&trash, "#%-14s %-15s %-15s %-15s %-15s %-15s\n", "<PID>", "<type>", "<relative PID>", "<reloads>", "<uptime>", "<version>");
William Lallemande8669fc2019-06-12 18:21:17 +0200461 memprintf(&uptime, "%dd%02dh%02dm%02ds", up / 86400, (up % 86400) / 3600, (up % 3600) / 60, (up % 60));
Willy Tarreau76a80c72019-06-22 07:41:38 +0200462 chunk_appendf(&trash, "%-15u %-15s %-15u %-15d %-15s %-15s\n", (unsigned int)getpid(), "master", 0, proc_self->reloads, uptime, haproxy_version);
William Lallemande8669fc2019-06-12 18:21:17 +0200463 free(uptime);
464 uptime = NULL;
William Lallemand88dc7c52019-04-01 11:30:01 +0200465
466 /* displays current processes */
467
468 chunk_appendf(&trash, "# workers\n");
469 list_for_each_entry(child, &proc_list, list) {
470 up = now.tv_sec - child->timestamp;
471
William Lallemand8f7069a2019-04-12 16:09:23 +0200472 if (!(child->options & PROC_O_TYPE_WORKER))
William Lallemand88dc7c52019-04-01 11:30:01 +0200473 continue;
474
William Lallemand45286112019-04-12 16:09:21 +0200475 if (child->options & PROC_O_LEAVING) {
William Lallemand88dc7c52019-04-01 11:30:01 +0200476 old++;
477 continue;
478 }
William Lallemande8669fc2019-06-12 18:21:17 +0200479 memprintf(&uptime, "%dd%02dh%02dm%02ds", up / 86400, (up % 86400) / 3600, (up % 3600) / 60, (up % 60));
William Lallemand1dc69632019-06-12 19:11:33 +0200480 chunk_appendf(&trash, "%-15u %-15s %-15u %-15d %-15s %-15s\n", child->pid, "worker", child->relative_pid, child->reloads, uptime, child->version);
William Lallemande8669fc2019-06-12 18:21:17 +0200481 free(uptime);
482 uptime = NULL;
William Lallemand88dc7c52019-04-01 11:30:01 +0200483 }
484
485 /* displays old processes */
486
487 if (old) {
488 char *msg = NULL;
489
490 chunk_appendf(&trash, "# old workers\n");
491 list_for_each_entry(child, &proc_list, list) {
492 up = now.tv_sec - child->timestamp;
493
William Lallemand8f7069a2019-04-12 16:09:23 +0200494 if (!(child->options & PROC_O_TYPE_WORKER))
William Lallemand88dc7c52019-04-01 11:30:01 +0200495 continue;
496
William Lallemand45286112019-04-12 16:09:21 +0200497 if (child->options & PROC_O_LEAVING) {
William Lallemand88dc7c52019-04-01 11:30:01 +0200498 memprintf(&msg, "[was: %u]", child->relative_pid);
William Lallemande8669fc2019-06-12 18:21:17 +0200499 memprintf(&uptime, "%dd%02dh%02dm%02ds", up / 86400, (up % 86400) / 3600, (up % 3600) / 60, (up % 60));
William Lallemand1dc69632019-06-12 19:11:33 +0200500 chunk_appendf(&trash, "%-15u %-15s %-15s %-15d %-15s %-15s\n", child->pid, "worker", msg, child->reloads, uptime, child->version);
William Lallemande8669fc2019-06-12 18:21:17 +0200501 free(uptime);
502 uptime = NULL;
William Lallemand88dc7c52019-04-01 11:30:01 +0200503 }
504 }
505 free(msg);
506 }
507
William Lallemandad53d6d2019-04-01 11:30:03 +0200508 /* displays external process */
509 chunk_appendf(&trash, "# programs\n");
510 old = 0;
511 list_for_each_entry(child, &proc_list, list) {
512 up = now.tv_sec - child->timestamp;
513
William Lallemand8f7069a2019-04-12 16:09:23 +0200514 if (!(child->options & PROC_O_TYPE_PROG))
William Lallemandad53d6d2019-04-01 11:30:03 +0200515 continue;
516
William Lallemand45286112019-04-12 16:09:21 +0200517 if (child->options & PROC_O_LEAVING) {
William Lallemandad53d6d2019-04-01 11:30:03 +0200518 old++;
519 continue;
520 }
William Lallemande8669fc2019-06-12 18:21:17 +0200521 memprintf(&uptime, "%dd%02dh%02dm%02ds", up / 86400, (up % 86400) / 3600, (up % 3600) / 60, (up % 60));
William Lallemand1dc69632019-06-12 19:11:33 +0200522 chunk_appendf(&trash, "%-15u %-15s %-15s %-15d %-15s %-15s\n", child->pid, child->id, "-", child->reloads, uptime, "-");
William Lallemande8669fc2019-06-12 18:21:17 +0200523 free(uptime);
524 uptime = NULL;
William Lallemandad53d6d2019-04-01 11:30:03 +0200525 }
526
527 if (old) {
528 chunk_appendf(&trash, "# old programs\n");
529 list_for_each_entry(child, &proc_list, list) {
530 up = now.tv_sec - child->timestamp;
531
William Lallemand8f7069a2019-04-12 16:09:23 +0200532 if (!(child->options & PROC_O_TYPE_PROG))
William Lallemandad53d6d2019-04-01 11:30:03 +0200533 continue;
534
William Lallemand45286112019-04-12 16:09:21 +0200535 if (child->options & PROC_O_LEAVING) {
William Lallemande8669fc2019-06-12 18:21:17 +0200536 memprintf(&uptime, "%dd%02dh%02dm%02ds", up / 86400, (up % 86400) / 3600, (up % 3600) / 60, (up % 60));
William Lallemand1dc69632019-06-12 19:11:33 +0200537 chunk_appendf(&trash, "%-15u %-15s %-15s %-15d %-15s %-15s\n", child->pid, child->id, "-", child->reloads, uptime, "-");
William Lallemande8669fc2019-06-12 18:21:17 +0200538 free(uptime);
539 uptime = NULL;
William Lallemandad53d6d2019-04-01 11:30:03 +0200540 }
541 }
542 }
543
544
545
William Lallemand88dc7c52019-04-01 11:30:01 +0200546 if (ci_putchk(si_ic(si), &trash) == -1) {
547 si_rx_room_blk(si);
548 return 0;
549 }
550
551 /* dump complete */
552 return 1;
William Lallemand9001ce82019-04-01 11:29:57 +0200553}
William Lallemand88dc7c52019-04-01 11:30:01 +0200554
555/* reload the master process */
556static int cli_parse_reload(char **args, char *payload, struct appctx *appctx, void *private)
557{
558 if (!cli_has_level(appctx, ACCESS_LVL_OPER))
559 return 1;
560
561 mworker_reload();
562
563 return 1;
564}
565
566
William Lallemand27edc4b2019-05-07 17:49:33 +0200567static int mworker_parse_global_max_reloads(char **args, int section_type, struct proxy *curpx,
568 struct proxy *defpx, const char *file, int linenum, char **err)
569{
570
571 int err_code = 0;
572
573 if (alertif_too_many_args(1, file, linenum, args, &err_code))
574 goto out;
575
576 if (*(args[1]) == 0) {
577 memprintf(err, "%sparsing [%s:%d] : '%s' expects an integer argument.\n", *err, file, linenum, args[0]);
578 err_code |= ERR_ALERT | ERR_FATAL;
579 goto out;
580 }
581
582 max_reloads = atol(args[1]);
583 if (max_reloads < 0) {
584 memprintf(err, "%sparsing [%s:%d] '%s' : invalid value %d, must be >= 0", *err, file, linenum, args[0], max_reloads);
585 err_code |= ERR_ALERT | ERR_FATAL;
586 goto out;
587 }
588
589out:
590 return err_code;
591}
592
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200593void mworker_free_child(struct mworker_proc *child)
594{
595 if (child == NULL)
596 return;
597
598 if (child->command) {
599 int i;
600
601 for (i = 0; child->command[i]; i++) {
602 if (child->command[i]) {
603 free(child->command[i]);
604 child->command[i] = NULL;
605 }
William Lallemande8669fc2019-06-12 18:21:17 +0200606
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200607 }
608 free(child->command);
609 child->command = NULL;
610 }
611 if (child->id) {
612 free(child->id);
613 child->id = NULL;
614 }
William Lallemand1dc69632019-06-12 19:11:33 +0200615 if (child->version) {
616 free(child->version);
617 child->version = NULL;
618 }
Tim Duesterhus9b7a9762019-05-16 20:23:22 +0200619 free(child);
620}
William Lallemand27edc4b2019-05-07 17:49:33 +0200621
622static struct cfg_kw_list mworker_kws = {{ }, {
623 { CFG_GLOBAL, "mworker-max-reloads", mworker_parse_global_max_reloads },
624 { 0, NULL, NULL },
625}};
626
627INITCALL1(STG_REGISTER, cfg_register_keywords, &mworker_kws);
628
629
William Lallemand88dc7c52019-04-01 11:30:01 +0200630/* register cli keywords */
631static struct cli_kw_list cli_kws = {{ },{
632 { { "@<relative pid>", NULL }, "@<relative pid> : send a command to the <relative pid> process", NULL, cli_io_handler_show_proc, NULL, NULL, ACCESS_MASTER_ONLY},
633 { { "@!<pid>", NULL }, "@!<pid> : send a command to the <pid> process", cli_parse_default, NULL, NULL, NULL, ACCESS_MASTER_ONLY},
634 { { "@master", NULL }, "@master : send a command to the master process", cli_parse_default, NULL, NULL, NULL, ACCESS_MASTER_ONLY},
635 { { "show", "proc", NULL }, "show proc : show processes status", cli_parse_default, cli_io_handler_show_proc, NULL, NULL, ACCESS_MASTER_ONLY},
636 { { "reload", NULL }, "reload : reload haproxy", cli_parse_reload, NULL, NULL, NULL, ACCESS_MASTER_ONLY},
637 {{},}
638}};
639
640INITCALL1(STG_REGISTER, cli_register_kw, &cli_kws);