relayd: track relayd control connection sockets
[lttng-tools.git] / src / bin / lttng-relayd / main.c
... / ...
CommitLineData
1/*
2 * Copyright (C) 2012 - Julien Desfossez <jdesfossez@efficios.com>
3 * David Goulet <dgoulet@efficios.com>
4 * 2013 - Jérémie Galarneau <jeremie.galarneau@efficios.com>
5 * 2015 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License, version 2 only,
9 * as published by the Free Software Foundation.
10 *
11 * This program is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
14 * more details.
15 *
16 * You should have received a copy of the GNU General Public License along
17 * with this program; if not, write to the Free Software Foundation, Inc.,
18 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19 */
20
21#define _LGPL_SOURCE
22#include <getopt.h>
23#include <grp.h>
24#include <limits.h>
25#include <pthread.h>
26#include <signal.h>
27#include <stdio.h>
28#include <stdlib.h>
29#include <string.h>
30#include <sys/mman.h>
31#include <sys/mount.h>
32#include <sys/resource.h>
33#include <sys/socket.h>
34#include <sys/stat.h>
35#include <sys/types.h>
36#include <sys/wait.h>
37#include <sys/resource.h>
38#include <inttypes.h>
39#include <urcu/futex.h>
40#include <urcu/uatomic.h>
41#include <urcu/rculist.h>
42#include <unistd.h>
43#include <fcntl.h>
44#include <strings.h>
45#include <ctype.h>
46
47#include <lttng/lttng.h>
48#include <common/common.h>
49#include <common/compat/poll.h>
50#include <common/compat/socket.h>
51#include <common/compat/endian.h>
52#include <common/compat/getenv.h>
53#include <common/defaults.h>
54#include <common/daemonize.h>
55#include <common/futex.h>
56#include <common/sessiond-comm/sessiond-comm.h>
57#include <common/sessiond-comm/inet.h>
58#include <common/sessiond-comm/relayd.h>
59#include <common/uri.h>
60#include <common/utils.h>
61#include <common/align.h>
62#include <common/config/session-config.h>
63#include <common/dynamic-buffer.h>
64#include <common/buffer-view.h>
65#include <common/string-utils/format.h>
66#include <common/fd-tracker/fd-tracker.h>
67#include <common/fd-tracker/utils.h>
68
69#include "backward-compatibility-group-by.h"
70#include "cmd.h"
71#include "connection.h"
72#include "ctf-trace.h"
73#include "health-relayd.h"
74#include "index.h"
75#include "live.h"
76#include "lttng-relayd.h"
77#include "session.h"
78#include "sessiond-trace-chunks.h"
79#include "stream.h"
80#include "tcp_keep_alive.h"
81#include "testpoint.h"
82#include "tracefile-array.h"
83#include "utils.h"
84#include "version.h"
85#include "viewer-stream.h"
86
87static const char *help_msg =
88#ifdef LTTNG_EMBED_HELP
89#include <lttng-relayd.8.h>
90#else
91NULL
92#endif
93;
94
95enum relay_connection_status {
96 RELAY_CONNECTION_STATUS_OK,
97 /* An error occurred while processing an event on the connection. */
98 RELAY_CONNECTION_STATUS_ERROR,
99 /* Connection closed/shutdown cleanly. */
100 RELAY_CONNECTION_STATUS_CLOSED,
101};
102
103/* command line options */
104char *opt_output_path, *opt_working_directory;
105static int opt_daemon, opt_background, opt_print_version, opt_allow_clear = 1;
106enum relay_group_output_by opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_UNKNOWN;
107
108/*
109 * We need to wait for listener and live listener threads, as well as
110 * health check thread, before being ready to signal readiness.
111 */
112#define NR_LTTNG_RELAY_READY 3
113static int lttng_relay_ready = NR_LTTNG_RELAY_READY;
114
115/* Size of receive buffer. */
116#define RECV_DATA_BUFFER_SIZE 65536
117
118static int recv_child_signal; /* Set to 1 when a SIGUSR1 signal is received. */
119static pid_t child_ppid; /* Internal parent PID use with daemonize. */
120
121static struct lttng_uri *control_uri;
122static struct lttng_uri *data_uri;
123static struct lttng_uri *live_uri;
124
125const char *progname;
126
127const char *tracing_group_name = DEFAULT_TRACING_GROUP;
128static int tracing_group_name_override;
129
130const char * const config_section_name = "relayd";
131
132/*
133 * Quit pipe for all threads. This permits a single cancellation point
134 * for all threads when receiving an event on the pipe.
135 */
136int thread_quit_pipe[2] = { -1, -1 };
137
138/*
139 * This pipe is used to inform the worker thread that a command is queued and
140 * ready to be processed.
141 */
142static int relay_conn_pipe[2] = { -1, -1 };
143
144/* Shared between threads */
145static int dispatch_thread_exit;
146
147static pthread_t listener_thread;
148static pthread_t dispatcher_thread;
149static pthread_t worker_thread;
150static pthread_t health_thread;
151
152/*
153 * last_relay_stream_id_lock protects last_relay_stream_id increment
154 * atomicity on 32-bit architectures.
155 */
156static pthread_mutex_t last_relay_stream_id_lock = PTHREAD_MUTEX_INITIALIZER;
157static uint64_t last_relay_stream_id;
158
159/*
160 * Relay command queue.
161 *
162 * The relay_thread_listener and relay_thread_dispatcher communicate with this
163 * queue.
164 */
165static struct relay_conn_queue relay_conn_queue;
166
167/* Cap of file desriptors to be in simultaneous use by the relay daemon. */
168static unsigned int lttng_opt_fd_pool_size = -1;
169
170/* Global relay stream hash table. */
171struct lttng_ht *relay_streams_ht;
172
173/* Global relay viewer stream hash table. */
174struct lttng_ht *viewer_streams_ht;
175
176/* Global relay sessions hash table. */
177struct lttng_ht *sessions_ht;
178
179/* Relayd health monitoring */
180struct health_app *health_relayd;
181
182struct sessiond_trace_chunk_registry *sessiond_trace_chunk_registry;
183
184/* Global fd tracker. */
185struct fd_tracker *the_fd_tracker;
186
187static struct option long_options[] = {
188 { "control-port", 1, 0, 'C', },
189 { "data-port", 1, 0, 'D', },
190 { "live-port", 1, 0, 'L', },
191 { "daemonize", 0, 0, 'd', },
192 { "background", 0, 0, 'b', },
193 { "group", 1, 0, 'g', },
194 { "fd-pool-size", 1, 0, '\0', },
195 { "help", 0, 0, 'h', },
196 { "output", 1, 0, 'o', },
197 { "verbose", 0, 0, 'v', },
198 { "config", 1, 0, 'f' },
199 { "version", 0, 0, 'V' },
200 { "working-directory", 1, 0, 'w', },
201 { "group-output-by-session", 0, 0, 's', },
202 { "group-output-by-host", 0, 0, 'p', },
203 { "disallow-clear", 0, 0, 'x' },
204 { NULL, 0, 0, 0, },
205};
206
207static const char *config_ignore_options[] = { "help", "config", "version" };
208
209static void print_version(void) {
210 fprintf(stdout, "%s\n", VERSION);
211}
212
213static void relayd_config_log(void)
214{
215 DBG("LTTng-relayd " VERSION " - " VERSION_NAME "%s%s",
216 GIT_VERSION[0] == '\0' ? "" : " - " GIT_VERSION,
217 EXTRA_VERSION_NAME[0] == '\0' ? "" : " - " EXTRA_VERSION_NAME);
218 if (EXTRA_VERSION_DESCRIPTION[0] != '\0') {
219 DBG("LTTng-relayd extra version description:\n\t" EXTRA_VERSION_DESCRIPTION "\n");
220 }
221 if (EXTRA_VERSION_PATCHES[0] != '\0') {
222 DBG("LTTng-relayd extra patches:\n\t" EXTRA_VERSION_PATCHES "\n");
223 }
224}
225
226/*
227 * Take an option from the getopt output and set it in the right variable to be
228 * used later.
229 *
230 * Return 0 on success else a negative value.
231 */
232static int set_option(int opt, const char *arg, const char *optname)
233{
234 int ret;
235
236 switch (opt) {
237 case 0:
238 if (!strcmp(optname, "fd-pool-size")) {
239 unsigned long v;
240
241 errno = 0;
242 v = strtoul(arg, NULL, 0);
243 if (errno != 0 || !isdigit(arg[0])) {
244 ERR("Wrong value in --fd-pool-size parameter: %s", arg);
245 ret = -1;
246 goto end;
247 }
248 if (v >= UINT_MAX) {
249 ERR("File descriptor cap overflow in --fd-pool-size parameter: %s", arg);
250 ret = -1;
251 goto end;
252 }
253 lttng_opt_fd_pool_size = (unsigned int) v;
254 } else {
255 fprintf(stderr, "unknown option %s", optname);
256 if (arg) {
257 fprintf(stderr, " with arg %s\n", arg);
258 }
259 }
260 break;
261 case 'C':
262 if (lttng_is_setuid_setgid()) {
263 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
264 "-C, --control-port");
265 } else {
266 ret = uri_parse(arg, &control_uri);
267 if (ret < 0) {
268 ERR("Invalid control URI specified");
269 goto end;
270 }
271 if (control_uri->port == 0) {
272 control_uri->port = DEFAULT_NETWORK_CONTROL_PORT;
273 }
274 }
275 break;
276 case 'D':
277 if (lttng_is_setuid_setgid()) {
278 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
279 "-D, -data-port");
280 } else {
281 ret = uri_parse(arg, &data_uri);
282 if (ret < 0) {
283 ERR("Invalid data URI specified");
284 goto end;
285 }
286 if (data_uri->port == 0) {
287 data_uri->port = DEFAULT_NETWORK_DATA_PORT;
288 }
289 }
290 break;
291 case 'L':
292 if (lttng_is_setuid_setgid()) {
293 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
294 "-L, -live-port");
295 } else {
296 ret = uri_parse(arg, &live_uri);
297 if (ret < 0) {
298 ERR("Invalid live URI specified");
299 goto end;
300 }
301 if (live_uri->port == 0) {
302 live_uri->port = DEFAULT_NETWORK_VIEWER_PORT;
303 }
304 }
305 break;
306 case 'd':
307 opt_daemon = 1;
308 break;
309 case 'b':
310 opt_background = 1;
311 break;
312 case 'g':
313 if (lttng_is_setuid_setgid()) {
314 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
315 "-g, --group");
316 } else {
317 tracing_group_name = strdup(arg);
318 if (tracing_group_name == NULL) {
319 ret = -errno;
320 PERROR("strdup");
321 goto end;
322 }
323 tracing_group_name_override = 1;
324 }
325 break;
326 case 'h':
327 ret = utils_show_help(8, "lttng-relayd", help_msg);
328 if (ret) {
329 ERR("Cannot show --help for `lttng-relayd`");
330 perror("exec");
331 }
332 exit(EXIT_FAILURE);
333 case 'V':
334 opt_print_version = 1;
335 break;
336 case 'o':
337 if (lttng_is_setuid_setgid()) {
338 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
339 "-o, --output");
340 } else {
341 ret = asprintf(&opt_output_path, "%s", arg);
342 if (ret < 0) {
343 ret = -errno;
344 PERROR("asprintf opt_output_path");
345 goto end;
346 }
347 }
348 break;
349 case 'w':
350 if (lttng_is_setuid_setgid()) {
351 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
352 "-w, --working-directory");
353 } else {
354 ret = asprintf(&opt_working_directory, "%s", arg);
355 if (ret < 0) {
356 ret = -errno;
357 PERROR("asprintf opt_working_directory");
358 goto end;
359 }
360 }
361 break;
362
363 case 'v':
364 /* Verbose level can increase using multiple -v */
365 if (arg) {
366 lttng_opt_verbose = config_parse_value(arg);
367 } else {
368 /* Only 3 level of verbosity (-vvv). */
369 if (lttng_opt_verbose < 3) {
370 lttng_opt_verbose += 1;
371 }
372 }
373 break;
374 case 's':
375 if (opt_group_output_by != RELAYD_GROUP_OUTPUT_BY_UNKNOWN) {
376 ERR("Cannot set --group-output-by-session, another --group-output-by argument is present");
377 exit(EXIT_FAILURE);
378 }
379 opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_SESSION;
380 break;
381 case 'p':
382 if (opt_group_output_by != RELAYD_GROUP_OUTPUT_BY_UNKNOWN) {
383 ERR("Cannot set --group-output-by-host, another --group-output-by argument is present");
384 exit(EXIT_FAILURE);
385 }
386 opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_HOST;
387 break;
388 case 'x':
389 /* Disallow clear */
390 opt_allow_clear = 0;
391 break;
392 default:
393 /* Unknown option or other error.
394 * Error is printed by getopt, just return */
395 ret = -1;
396 goto end;
397 }
398
399 /* All good. */
400 ret = 0;
401
402end:
403 return ret;
404}
405
406/*
407 * config_entry_handler_cb used to handle options read from a config file.
408 * See config_entry_handler_cb comment in common/config/session-config.h for the
409 * return value conventions.
410 */
411static int config_entry_handler(const struct config_entry *entry, void *unused)
412{
413 int ret = 0, i;
414
415 if (!entry || !entry->name || !entry->value) {
416 ret = -EINVAL;
417 goto end;
418 }
419
420 /* Check if the option is to be ignored */
421 for (i = 0; i < sizeof(config_ignore_options) / sizeof(char *); i++) {
422 if (!strcmp(entry->name, config_ignore_options[i])) {
423 goto end;
424 }
425 }
426
427 for (i = 0; i < (sizeof(long_options) / sizeof(struct option)) - 1; i++) {
428 /* Ignore if entry name is not fully matched. */
429 if (strcmp(entry->name, long_options[i].name)) {
430 continue;
431 }
432
433 /*
434 * If the option takes no argument on the command line,
435 * we have to check if the value is "true". We support
436 * non-zero numeric values, true, on and yes.
437 */
438 if (!long_options[i].has_arg) {
439 ret = config_parse_value(entry->value);
440 if (ret <= 0) {
441 if (ret) {
442 WARN("Invalid configuration value \"%s\" for option %s",
443 entry->value, entry->name);
444 }
445 /* False, skip boolean config option. */
446 goto end;
447 }
448 }
449
450 ret = set_option(long_options[i].val, entry->value, entry->name);
451 goto end;
452 }
453
454 WARN("Unrecognized option \"%s\" in daemon configuration file.",
455 entry->name);
456
457end:
458 return ret;
459}
460
461static int parse_env_options(void)
462{
463 int ret = 0;
464 char *value = NULL;
465
466 value = lttng_secure_getenv(DEFAULT_LTTNG_RELAYD_WORKING_DIRECTORY_ENV);
467 if (value) {
468 opt_working_directory = strdup(value);
469 if (!opt_working_directory) {
470 ERR("Failed to allocate working directory string (\"%s\")",
471 value);
472 ret = -1;
473 }
474 }
475 return ret;
476}
477
478static int set_fd_pool_size(void)
479{
480 int ret = 0;
481 struct rlimit rlimit;
482
483 ret = getrlimit(RLIMIT_NOFILE, &rlimit);
484 if (ret) {
485 PERROR("Failed to get file descriptor limit");
486 ret = -1;
487 goto end;
488 }
489
490 DBG("File descriptor count limits are %" PRIu64 " (soft) and %" PRIu64 " (hard)",
491 (uint64_t) rlimit.rlim_cur,
492 (uint64_t) rlimit.rlim_max);
493 if (lttng_opt_fd_pool_size == -1) {
494 /* Use default value (soft limit - reserve). */
495 if (rlimit.rlim_cur < DEFAULT_RELAYD_MIN_FD_POOL_SIZE) {
496 ERR("The process' file number limit is too low (%" PRIu64 "). The process' file number limit must be set to at least %i.",
497 (uint64_t) rlimit.rlim_cur, DEFAULT_RELAYD_MIN_FD_POOL_SIZE);
498 ret = -1;
499 goto end;
500 }
501 lttng_opt_fd_pool_size = rlimit.rlim_cur -
502 DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE;
503 goto end;
504 }
505
506 if (lttng_opt_fd_pool_size < DEFAULT_RELAYD_MIN_FD_POOL_SIZE) {
507 ERR("File descriptor pool size must be set to at least %d",
508 DEFAULT_RELAYD_MIN_FD_POOL_SIZE);
509 ret = -1;
510 goto end;
511 }
512
513 if (lttng_opt_fd_pool_size > rlimit.rlim_cur) {
514 ERR("File descriptor pool size argument (%u) exceeds the process' soft limit (%" PRIu64 ").",
515 lttng_opt_fd_pool_size, (uint64_t) rlimit.rlim_cur);
516 ret = -1;
517 goto end;
518 }
519
520 DBG("File descriptor pool size argument (%u) adjusted to %u to accomodate transient fd uses",
521 lttng_opt_fd_pool_size,
522 lttng_opt_fd_pool_size - DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE);
523 lttng_opt_fd_pool_size -= DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE;
524end:
525 return ret;
526}
527
528static int set_options(int argc, char **argv)
529{
530 int c, ret = 0, option_index = 0, retval = 0;
531 int orig_optopt = optopt, orig_optind = optind;
532 char *default_address, *optstring;
533 const char *config_path = NULL;
534
535 optstring = utils_generate_optstring(long_options,
536 sizeof(long_options) / sizeof(struct option));
537 if (!optstring) {
538 retval = -ENOMEM;
539 goto exit;
540 }
541
542 /* Check for the --config option */
543
544 while ((c = getopt_long(argc, argv, optstring, long_options,
545 &option_index)) != -1) {
546 if (c == '?') {
547 retval = -EINVAL;
548 goto exit;
549 } else if (c != 'f') {
550 continue;
551 }
552
553 if (lttng_is_setuid_setgid()) {
554 WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.",
555 "-f, --config");
556 } else {
557 config_path = utils_expand_path(optarg);
558 if (!config_path) {
559 ERR("Failed to resolve path: %s", optarg);
560 }
561 }
562 }
563
564 ret = config_get_section_entries(config_path, config_section_name,
565 config_entry_handler, NULL);
566 if (ret) {
567 if (ret > 0) {
568 ERR("Invalid configuration option at line %i", ret);
569 }
570 retval = -1;
571 goto exit;
572 }
573
574 /* Reset getopt's global state */
575 optopt = orig_optopt;
576 optind = orig_optind;
577 while (1) {
578 c = getopt_long(argc, argv, optstring, long_options, &option_index);
579 if (c == -1) {
580 break;
581 }
582
583 ret = set_option(c, optarg, long_options[option_index].name);
584 if (ret < 0) {
585 retval = -1;
586 goto exit;
587 }
588 }
589
590 /* assign default values */
591 if (control_uri == NULL) {
592 ret = asprintf(&default_address,
593 "tcp://" DEFAULT_NETWORK_CONTROL_BIND_ADDRESS ":%d",
594 DEFAULT_NETWORK_CONTROL_PORT);
595 if (ret < 0) {
596 PERROR("asprintf default data address");
597 retval = -1;
598 goto exit;
599 }
600
601 ret = uri_parse(default_address, &control_uri);
602 free(default_address);
603 if (ret < 0) {
604 ERR("Invalid control URI specified");
605 retval = -1;
606 goto exit;
607 }
608 }
609 if (data_uri == NULL) {
610 ret = asprintf(&default_address,
611 "tcp://" DEFAULT_NETWORK_DATA_BIND_ADDRESS ":%d",
612 DEFAULT_NETWORK_DATA_PORT);
613 if (ret < 0) {
614 PERROR("asprintf default data address");
615 retval = -1;
616 goto exit;
617 }
618
619 ret = uri_parse(default_address, &data_uri);
620 free(default_address);
621 if (ret < 0) {
622 ERR("Invalid data URI specified");
623 retval = -1;
624 goto exit;
625 }
626 }
627 if (live_uri == NULL) {
628 ret = asprintf(&default_address,
629 "tcp://" DEFAULT_NETWORK_VIEWER_BIND_ADDRESS ":%d",
630 DEFAULT_NETWORK_VIEWER_PORT);
631 if (ret < 0) {
632 PERROR("asprintf default viewer control address");
633 retval = -1;
634 goto exit;
635 }
636
637 ret = uri_parse(default_address, &live_uri);
638 free(default_address);
639 if (ret < 0) {
640 ERR("Invalid viewer control URI specified");
641 retval = -1;
642 goto exit;
643 }
644 }
645 ret = set_fd_pool_size();
646 if (ret) {
647 retval = -1;
648 goto exit;
649 }
650
651 if (opt_group_output_by == RELAYD_GROUP_OUTPUT_BY_UNKNOWN) {
652 opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_HOST;
653 }
654 if (opt_allow_clear) {
655 /* Check if env variable exists. */
656 const char *value = lttng_secure_getenv(DEFAULT_LTTNG_RELAYD_DISALLOW_CLEAR_ENV);
657 if (value) {
658 ret = config_parse_value(value);
659 if (ret < 0) {
660 ERR("Invalid value for %s specified", DEFAULT_LTTNG_RELAYD_DISALLOW_CLEAR_ENV);
661 retval = -1;
662 goto exit;
663 }
664 opt_allow_clear = !ret;
665 }
666 }
667
668exit:
669 free(optstring);
670 return retval;
671}
672
673static void print_global_objects(void)
674{
675 print_viewer_streams();
676 print_relay_streams();
677 print_sessions();
678}
679
680static int noop_close(void *data, int *fds)
681{
682 return 0;
683}
684
685static void untrack_stdio(void)
686{
687 int fds[] = { fileno(stdout), fileno(stderr) };
688
689 /*
690 * noop_close is used since we don't really want to close
691 * the stdio output fds; we merely want to stop tracking them.
692 */
693 (void) fd_tracker_close_unsuspendable_fd(the_fd_tracker,
694 fds, 2, noop_close, NULL);
695}
696
697/*
698 * Cleanup the daemon
699 */
700static void relayd_cleanup(void)
701{
702 print_global_objects();
703
704 DBG("Cleaning up");
705
706 if (viewer_streams_ht)
707 lttng_ht_destroy(viewer_streams_ht);
708 if (relay_streams_ht)
709 lttng_ht_destroy(relay_streams_ht);
710 if (sessions_ht)
711 lttng_ht_destroy(sessions_ht);
712
713 free(opt_output_path);
714 free(opt_working_directory);
715
716 if (health_relayd) {
717 health_app_destroy(health_relayd);
718 }
719 /* Close thread quit pipes */
720 if (health_quit_pipe[0] != -1) {
721 (void) fd_tracker_util_pipe_close(
722 the_fd_tracker, health_quit_pipe);
723 }
724 if (thread_quit_pipe[0] != -1) {
725 (void) fd_tracker_util_pipe_close(
726 the_fd_tracker, thread_quit_pipe);
727 }
728 if (sessiond_trace_chunk_registry) {
729 sessiond_trace_chunk_registry_destroy(
730 sessiond_trace_chunk_registry);
731 }
732 if (the_fd_tracker) {
733 untrack_stdio();
734 /*
735 * fd_tracker_destroy() will log the contents of the fd-tracker
736 * if a leak is detected.
737 */
738 fd_tracker_destroy(the_fd_tracker);
739 }
740
741 uri_free(control_uri);
742 uri_free(data_uri);
743 /* Live URI is freed in the live thread. */
744
745 if (tracing_group_name_override) {
746 free((void *) tracing_group_name);
747 }
748}
749
750/*
751 * Write to writable pipe used to notify a thread.
752 */
753static int notify_thread_pipe(int wpipe)
754{
755 ssize_t ret;
756
757 ret = lttng_write(wpipe, "!", 1);
758 if (ret < 1) {
759 PERROR("write poll pipe");
760 goto end;
761 }
762 ret = 0;
763end:
764 return ret;
765}
766
767static int notify_health_quit_pipe(int *pipe)
768{
769 ssize_t ret;
770
771 ret = lttng_write(pipe[1], "4", 1);
772 if (ret < 1) {
773 PERROR("write relay health quit");
774 goto end;
775 }
776 ret = 0;
777end:
778 return ret;
779}
780
781/*
782 * Stop all relayd and relayd-live threads.
783 */
784int lttng_relay_stop_threads(void)
785{
786 int retval = 0;
787
788 /* Stopping all threads */
789 DBG("Terminating all threads");
790 if (notify_thread_pipe(thread_quit_pipe[1])) {
791 ERR("write error on thread quit pipe");
792 retval = -1;
793 }
794
795 if (notify_health_quit_pipe(health_quit_pipe)) {
796 ERR("write error on health quit pipe");
797 }
798
799 /* Dispatch thread */
800 CMM_STORE_SHARED(dispatch_thread_exit, 1);
801 futex_nto1_wake(&relay_conn_queue.futex);
802
803 if (relayd_live_stop()) {
804 ERR("Error stopping live threads");
805 retval = -1;
806 }
807 return retval;
808}
809
810/*
811 * Signal handler for the daemon
812 *
813 * Simply stop all worker threads, leaving main() return gracefully after
814 * joining all threads and calling cleanup().
815 */
816static void sighandler(int sig)
817{
818 switch (sig) {
819 case SIGINT:
820 DBG("SIGINT caught");
821 if (lttng_relay_stop_threads()) {
822 ERR("Error stopping threads");
823 }
824 break;
825 case SIGTERM:
826 DBG("SIGTERM caught");
827 if (lttng_relay_stop_threads()) {
828 ERR("Error stopping threads");
829 }
830 break;
831 case SIGUSR1:
832 CMM_STORE_SHARED(recv_child_signal, 1);
833 break;
834 default:
835 break;
836 }
837}
838
839/*
840 * Setup signal handler for :
841 * SIGINT, SIGTERM, SIGPIPE
842 */
843static int set_signal_handler(void)
844{
845 int ret = 0;
846 struct sigaction sa;
847 sigset_t sigset;
848
849 if ((ret = sigemptyset(&sigset)) < 0) {
850 PERROR("sigemptyset");
851 return ret;
852 }
853
854 sa.sa_mask = sigset;
855 sa.sa_flags = 0;
856
857 sa.sa_handler = sighandler;
858 if ((ret = sigaction(SIGTERM, &sa, NULL)) < 0) {
859 PERROR("sigaction");
860 return ret;
861 }
862
863 if ((ret = sigaction(SIGINT, &sa, NULL)) < 0) {
864 PERROR("sigaction");
865 return ret;
866 }
867
868 if ((ret = sigaction(SIGUSR1, &sa, NULL)) < 0) {
869 PERROR("sigaction");
870 return ret;
871 }
872
873 sa.sa_handler = SIG_IGN;
874 if ((ret = sigaction(SIGPIPE, &sa, NULL)) < 0) {
875 PERROR("sigaction");
876 return ret;
877 }
878
879 DBG("Signal handler set for SIGTERM, SIGUSR1, SIGPIPE and SIGINT");
880
881 return ret;
882}
883
884void lttng_relay_notify_ready(void)
885{
886 /* Notify the parent of the fork() process that we are ready. */
887 if (opt_daemon || opt_background) {
888 if (uatomic_sub_return(&lttng_relay_ready, 1) == 0) {
889 kill(child_ppid, SIGUSR1);
890 }
891 }
892}
893
894/*
895 * Init thread quit pipe.
896 *
897 * Return -1 on error or 0 if all pipes are created.
898 */
899static int init_thread_quit_pipe(void)
900{
901 return fd_tracker_util_pipe_open_cloexec(
902 the_fd_tracker, "Quit pipe", thread_quit_pipe);
903}
904
905/*
906 * Init health quit pipe.
907 *
908 * Return -1 on error or 0 if all pipes are created.
909 */
910static int init_health_quit_pipe(void)
911{
912 return fd_tracker_util_pipe_open_cloexec(the_fd_tracker,
913 "Health quit pipe", health_quit_pipe);
914}
915
916/*
917 * Create a poll set with O_CLOEXEC and add the thread quit pipe to the set.
918 */
919static int create_named_thread_poll_set(struct lttng_poll_event *events,
920 int size, const char *name)
921{
922 int ret;
923
924 if (events == NULL || size == 0) {
925 ret = -1;
926 goto error;
927 }
928
929 ret = fd_tracker_util_poll_create(the_fd_tracker,
930 name, events, 1, LTTNG_CLOEXEC);
931
932 /* Add quit pipe */
933 ret = lttng_poll_add(events, thread_quit_pipe[0], LPOLLIN | LPOLLERR);
934 if (ret < 0) {
935 goto error;
936 }
937
938 return 0;
939
940error:
941 return ret;
942}
943
944/*
945 * Check if the thread quit pipe was triggered.
946 *
947 * Return 1 if it was triggered else 0;
948 */
949static int check_thread_quit_pipe(int fd, uint32_t events)
950{
951 if (fd == thread_quit_pipe[0] && (events & LPOLLIN)) {
952 return 1;
953 }
954
955 return 0;
956}
957
958static int create_sock(void *data, int *out_fd)
959{
960 int ret;
961 struct lttcomm_sock *sock = data;
962
963 ret = lttcomm_create_sock(sock);
964 if (ret < 0) {
965 goto end;
966 }
967
968 *out_fd = sock->fd;
969end:
970 return ret;
971}
972
973static int close_sock(void *data, int *in_fd)
974{
975 struct lttcomm_sock *sock = data;
976
977 return sock->ops->close(sock);
978}
979
980static int accept_sock(void *data, int *out_fd)
981{
982 int ret = 0;
983 /* Socks is an array of in_sock, out_sock. */
984 struct lttcomm_sock **socks = data;
985 struct lttcomm_sock *in_sock = socks[0];
986
987 socks[1] = in_sock->ops->accept(in_sock);
988 if (!socks[1]) {
989 ret = -1;
990 goto end;
991 }
992 *out_fd = socks[1]->fd;
993end:
994 return ret;
995}
996
997/*
998 * Create and init socket from uri.
999 */
1000static struct lttcomm_sock *relay_socket_create(struct lttng_uri *uri,
1001 const char *name)
1002{
1003 int ret, sock_fd;
1004 struct lttcomm_sock *sock = NULL;
1005 char uri_str[PATH_MAX];
1006 char *formated_name = NULL;
1007
1008 sock = lttcomm_alloc_sock_from_uri(uri);
1009 if (sock == NULL) {
1010 ERR("Allocating socket");
1011 goto error;
1012 }
1013
1014 /*
1015 * Don't fail to create the socket if the name can't be built as it is
1016 * only used for debugging purposes.
1017 */
1018 ret = uri_to_str_url(uri, uri_str, sizeof(uri_str));
1019 uri_str[sizeof(uri_str) - 1] = '\0';
1020 if (ret >= 0) {
1021 ret = asprintf(&formated_name, "%s socket @ %s", name,
1022 uri_str);
1023 if (ret < 0) {
1024 formated_name = NULL;
1025 }
1026 }
1027
1028 ret = fd_tracker_open_unsuspendable_fd(the_fd_tracker, &sock_fd,
1029 (const char **) (formated_name ? &formated_name : NULL),
1030 1, create_sock, sock);
1031 free(formated_name);
1032 DBG("Listening on %s socket %d", name, sock->fd);
1033
1034 ret = sock->ops->bind(sock);
1035 if (ret < 0) {
1036 PERROR("Failed to bind socket");
1037 goto error;
1038 }
1039
1040 ret = sock->ops->listen(sock, -1);
1041 if (ret < 0) {
1042 goto error;
1043
1044 }
1045
1046 return sock;
1047
1048error:
1049 if (sock) {
1050 lttcomm_destroy_sock(sock);
1051 }
1052 return NULL;
1053}
1054
1055static
1056struct lttcomm_sock *accept_relayd_sock(struct lttcomm_sock *listening_sock,
1057 const char *name)
1058{
1059 int out_fd, ret;
1060 struct lttcomm_sock *socks[2] = { listening_sock, NULL };
1061 struct lttcomm_sock *new_sock = NULL;
1062
1063 ret = fd_tracker_open_unsuspendable_fd(
1064 the_fd_tracker, &out_fd,
1065 (const char **) &name,
1066 1, accept_sock, &socks);
1067 if (ret) {
1068 goto end;
1069 }
1070 new_sock = socks[1];
1071 DBG("%s accepted, socket %d", name, new_sock->fd);
1072end:
1073 return new_sock;
1074}
1075
1076/*
1077 * This thread manages the listening for new connections on the network
1078 */
1079static void *relay_thread_listener(void *data)
1080{
1081 int i, ret, pollfd, err = -1;
1082 uint32_t revents, nb_fd;
1083 struct lttng_poll_event events;
1084 struct lttcomm_sock *control_sock, *data_sock;
1085
1086 DBG("[thread] Relay listener started");
1087
1088 health_register(health_relayd, HEALTH_RELAYD_TYPE_LISTENER);
1089
1090 health_code_update();
1091
1092 control_sock = relay_socket_create(control_uri, "Control listener");
1093 if (!control_sock) {
1094 goto error_sock_control;
1095 }
1096
1097 data_sock = relay_socket_create(data_uri, "Data listener");
1098 if (!data_sock) {
1099 goto error_sock_relay;
1100 }
1101
1102 /*
1103 * Pass 3 as size here for the thread quit pipe, control and
1104 * data socket.
1105 */
1106 ret = create_named_thread_poll_set(&events, 3, "Listener thread epoll");
1107 if (ret < 0) {
1108 goto error_create_poll;
1109 }
1110
1111 /* Add the control socket */
1112 ret = lttng_poll_add(&events, control_sock->fd, LPOLLIN | LPOLLRDHUP);
1113 if (ret < 0) {
1114 goto error_poll_add;
1115 }
1116
1117 /* Add the data socket */
1118 ret = lttng_poll_add(&events, data_sock->fd, LPOLLIN | LPOLLRDHUP);
1119 if (ret < 0) {
1120 goto error_poll_add;
1121 }
1122
1123 lttng_relay_notify_ready();
1124
1125 if (testpoint(relayd_thread_listener)) {
1126 goto error_testpoint;
1127 }
1128
1129 while (1) {
1130 health_code_update();
1131
1132 DBG("Listener accepting connections");
1133
1134restart:
1135 health_poll_entry();
1136 ret = lttng_poll_wait(&events, -1);
1137 health_poll_exit();
1138 if (ret < 0) {
1139 /*
1140 * Restart interrupted system call.
1141 */
1142 if (errno == EINTR) {
1143 goto restart;
1144 }
1145 goto error;
1146 }
1147
1148 nb_fd = ret;
1149
1150 DBG("Relay new connection received");
1151 for (i = 0; i < nb_fd; i++) {
1152 health_code_update();
1153
1154 /* Fetch once the poll data */
1155 revents = LTTNG_POLL_GETEV(&events, i);
1156 pollfd = LTTNG_POLL_GETFD(&events, i);
1157
1158 /* Thread quit pipe has been closed. Killing thread. */
1159 ret = check_thread_quit_pipe(pollfd, revents);
1160 if (ret) {
1161 err = 0;
1162 goto exit;
1163 }
1164
1165 if (revents & LPOLLIN) {
1166 /*
1167 * A new connection is requested, therefore a
1168 * sessiond/consumerd connection is allocated in
1169 * this thread, enqueued to a global queue and
1170 * dequeued (and freed) in the worker thread.
1171 */
1172 int val = 1;
1173 struct relay_connection *new_conn;
1174 struct lttcomm_sock *newsock = NULL;
1175 enum connection_type type;
1176
1177 if (pollfd == data_sock->fd) {
1178 type = RELAY_DATA;
1179 newsock = accept_relayd_sock(data_sock,
1180 "Data socket to relayd");
1181 } else {
1182 assert(pollfd == control_sock->fd);
1183 type = RELAY_CONTROL;
1184 newsock = accept_relayd_sock(control_sock,
1185 "Control socket to relayd");
1186 }
1187 if (!newsock) {
1188 PERROR("accepting sock");
1189 goto error;
1190 }
1191
1192 ret = setsockopt(newsock->fd, SOL_SOCKET, SO_REUSEADDR, &val,
1193 sizeof(val));
1194 if (ret < 0) {
1195 PERROR("setsockopt inet");
1196 lttcomm_destroy_sock(newsock);
1197 goto error;
1198 }
1199
1200 ret = socket_apply_keep_alive_config(newsock->fd);
1201 if (ret < 0) {
1202 ERR("Failed to apply TCP keep-alive configuration on socket (%i)",
1203 newsock->fd);
1204 lttcomm_destroy_sock(newsock);
1205 goto error;
1206 }
1207
1208 new_conn = connection_create(newsock, type);
1209 if (!new_conn) {
1210 lttcomm_destroy_sock(newsock);
1211 goto error;
1212 }
1213
1214 /* Enqueue request for the dispatcher thread. */
1215 cds_wfcq_enqueue(&relay_conn_queue.head, &relay_conn_queue.tail,
1216 &new_conn->qnode);
1217
1218 /*
1219 * Wake the dispatch queue futex.
1220 * Implicit memory barrier with the
1221 * exchange in cds_wfcq_enqueue.
1222 */
1223 futex_nto1_wake(&relay_conn_queue.futex);
1224 } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
1225 ERR("socket poll error");
1226 goto error;
1227 } else {
1228 ERR("Unexpected poll events %u for sock %d", revents, pollfd);
1229 goto error;
1230 }
1231 }
1232 }
1233
1234exit:
1235error:
1236error_poll_add:
1237error_testpoint:
1238 (void) fd_tracker_util_poll_clean(the_fd_tracker, &events);
1239error_create_poll:
1240 if (data_sock->fd >= 0) {
1241 int data_sock_fd = data_sock->fd;
1242
1243 ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker,
1244 &data_sock_fd, 1, close_sock,
1245 data_sock);
1246 if (ret) {
1247 PERROR("Failed to close the data listener socket file descriptor");
1248 }
1249 data_sock->fd = -1;
1250 }
1251 lttcomm_destroy_sock(data_sock);
1252error_sock_relay:
1253 if (control_sock->fd >= 0) {
1254 int control_sock_fd = control_sock->fd;
1255
1256 ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker,
1257 &control_sock_fd, 1, close_sock,
1258 control_sock);
1259 if (ret) {
1260 PERROR("Failed to close the control listener socket file descriptor");
1261 }
1262 control_sock->fd = -1;
1263 }
1264 lttcomm_destroy_sock(control_sock);
1265error_sock_control:
1266 if (err) {
1267 health_error();
1268 ERR("Health error occurred in %s", __func__);
1269 }
1270 health_unregister(health_relayd);
1271 DBG("Relay listener thread cleanup complete");
1272 lttng_relay_stop_threads();
1273 return NULL;
1274}
1275
1276/*
1277 * This thread manages the dispatching of the requests to worker threads
1278 */
1279static void *relay_thread_dispatcher(void *data)
1280{
1281 int err = -1;
1282 ssize_t ret;
1283 struct cds_wfcq_node *node;
1284 struct relay_connection *new_conn = NULL;
1285
1286 DBG("[thread] Relay dispatcher started");
1287
1288 health_register(health_relayd, HEALTH_RELAYD_TYPE_DISPATCHER);
1289
1290 if (testpoint(relayd_thread_dispatcher)) {
1291 goto error_testpoint;
1292 }
1293
1294 health_code_update();
1295
1296 for (;;) {
1297 health_code_update();
1298
1299 /* Atomically prepare the queue futex */
1300 futex_nto1_prepare(&relay_conn_queue.futex);
1301
1302 if (CMM_LOAD_SHARED(dispatch_thread_exit)) {
1303 break;
1304 }
1305
1306 do {
1307 health_code_update();
1308
1309 /* Dequeue commands */
1310 node = cds_wfcq_dequeue_blocking(&relay_conn_queue.head,
1311 &relay_conn_queue.tail);
1312 if (node == NULL) {
1313 DBG("Woken up but nothing in the relay command queue");
1314 /* Continue thread execution */
1315 break;
1316 }
1317 new_conn = caa_container_of(node, struct relay_connection, qnode);
1318
1319 DBG("Dispatching request waiting on sock %d", new_conn->sock->fd);
1320
1321 /*
1322 * Inform worker thread of the new request. This
1323 * call is blocking so we can be assured that
1324 * the data will be read at some point in time
1325 * or wait to the end of the world :)
1326 */
1327 ret = lttng_write(relay_conn_pipe[1], &new_conn, sizeof(new_conn));
1328 if (ret < 0) {
1329 PERROR("write connection pipe");
1330 connection_put(new_conn);
1331 goto error;
1332 }
1333 } while (node != NULL);
1334
1335 /* Futex wait on queue. Blocking call on futex() */
1336 health_poll_entry();
1337 futex_nto1_wait(&relay_conn_queue.futex);
1338 health_poll_exit();
1339 }
1340
1341 /* Normal exit, no error */
1342 err = 0;
1343
1344error:
1345error_testpoint:
1346 if (err) {
1347 health_error();
1348 ERR("Health error occurred in %s", __func__);
1349 }
1350 health_unregister(health_relayd);
1351 DBG("Dispatch thread dying");
1352 lttng_relay_stop_threads();
1353 return NULL;
1354}
1355
1356static bool session_streams_have_index(const struct relay_session *session)
1357{
1358 return session->minor >= 4 && !session->snapshot;
1359}
1360
1361/*
1362 * Handle the RELAYD_CREATE_SESSION command.
1363 *
1364 * On success, send back the session id or else return a negative value.
1365 */
1366static int relay_create_session(const struct lttcomm_relayd_hdr *recv_hdr,
1367 struct relay_connection *conn,
1368 const struct lttng_buffer_view *payload)
1369{
1370 int ret = 0;
1371 ssize_t send_ret;
1372 struct relay_session *session = NULL;
1373 struct lttcomm_relayd_create_session_reply_2_11 reply = {};
1374 char session_name[LTTNG_NAME_MAX] = {};
1375 char hostname[LTTNG_HOST_NAME_MAX] = {};
1376 uint32_t live_timer = 0;
1377 bool snapshot = false;
1378 bool session_name_contains_creation_timestamp = false;
1379 /* Left nil for peers < 2.11. */
1380 char base_path[LTTNG_PATH_MAX] = {};
1381 lttng_uuid sessiond_uuid = {};
1382 LTTNG_OPTIONAL(uint64_t) id_sessiond = {};
1383 LTTNG_OPTIONAL(uint64_t) current_chunk_id = {};
1384 LTTNG_OPTIONAL(time_t) creation_time = {};
1385 struct lttng_dynamic_buffer reply_payload;
1386
1387 lttng_dynamic_buffer_init(&reply_payload);
1388
1389 if (conn->minor < 4) {
1390 /* From 2.1 to 2.3 */
1391 ret = 0;
1392 } else if (conn->minor >= 4 && conn->minor < 11) {
1393 /* From 2.4 to 2.10 */
1394 ret = cmd_create_session_2_4(payload, session_name,
1395 hostname, &live_timer, &snapshot);
1396 } else {
1397 bool has_current_chunk;
1398 uint64_t current_chunk_id_value;
1399 time_t creation_time_value;
1400 uint64_t id_sessiond_value;
1401
1402 /* From 2.11 to ... */
1403 ret = cmd_create_session_2_11(payload, session_name, hostname,
1404 base_path, &live_timer, &snapshot, &id_sessiond_value,
1405 sessiond_uuid, &has_current_chunk,
1406 &current_chunk_id_value, &creation_time_value,
1407 &session_name_contains_creation_timestamp);
1408 if (lttng_uuid_is_nil(sessiond_uuid)) {
1409 /* The nil UUID is reserved for pre-2.11 clients. */
1410 ERR("Illegal nil UUID announced by peer in create session command");
1411 ret = -1;
1412 goto send_reply;
1413 }
1414 LTTNG_OPTIONAL_SET(&id_sessiond, id_sessiond_value);
1415 LTTNG_OPTIONAL_SET(&creation_time, creation_time_value);
1416 if (has_current_chunk) {
1417 LTTNG_OPTIONAL_SET(&current_chunk_id,
1418 current_chunk_id_value);
1419 }
1420 }
1421
1422 if (ret < 0) {
1423 goto send_reply;
1424 }
1425
1426 session = session_create(session_name, hostname, base_path, live_timer,
1427 snapshot, sessiond_uuid,
1428 id_sessiond.is_set ? &id_sessiond.value : NULL,
1429 current_chunk_id.is_set ? &current_chunk_id.value : NULL,
1430 creation_time.is_set ? &creation_time.value : NULL,
1431 conn->major, conn->minor,
1432 session_name_contains_creation_timestamp);
1433 if (!session) {
1434 ret = -1;
1435 goto send_reply;
1436 }
1437 assert(!conn->session);
1438 conn->session = session;
1439 DBG("Created session %" PRIu64, session->id);
1440
1441 reply.generic.session_id = htobe64(session->id);
1442
1443send_reply:
1444 if (ret < 0) {
1445 reply.generic.ret_code = htobe32(LTTNG_ERR_FATAL);
1446 } else {
1447 reply.generic.ret_code = htobe32(LTTNG_OK);
1448 }
1449
1450 if (conn->minor < 11) {
1451 /* From 2.1 to 2.10 */
1452 ret = lttng_dynamic_buffer_append(&reply_payload,
1453 &reply.generic, sizeof(reply.generic));
1454 if (ret) {
1455 ERR("Failed to append \"create session\" command reply header to payload buffer");
1456 ret = -1;
1457 goto end;
1458 }
1459 } else {
1460 const uint32_t output_path_length =
1461 session ? strlen(session->output_path) + 1 : 0;
1462
1463 reply.output_path_length = htobe32(output_path_length);
1464 ret = lttng_dynamic_buffer_append(
1465 &reply_payload, &reply, sizeof(reply));
1466 if (ret) {
1467 ERR("Failed to append \"create session\" command reply header to payload buffer");
1468 goto end;
1469 }
1470
1471 if (output_path_length) {
1472 ret = lttng_dynamic_buffer_append(&reply_payload,
1473 session->output_path,
1474 output_path_length);
1475 if (ret) {
1476 ERR("Failed to append \"create session\" command reply path to payload buffer");
1477 goto end;
1478 }
1479 }
1480 }
1481
1482 send_ret = conn->sock->ops->sendmsg(conn->sock, reply_payload.data,
1483 reply_payload.size, 0);
1484 if (send_ret < (ssize_t) reply_payload.size) {
1485 ERR("Failed to send \"create session\" command reply of %zu bytes (ret = %zd)",
1486 reply_payload.size, send_ret);
1487 ret = -1;
1488 }
1489end:
1490 if (ret < 0 && session) {
1491 session_put(session);
1492 }
1493 lttng_dynamic_buffer_reset(&reply_payload);
1494 return ret;
1495}
1496
1497/*
1498 * When we have received all the streams and the metadata for a channel,
1499 * we make them visible to the viewer threads.
1500 */
1501static void publish_connection_local_streams(struct relay_connection *conn)
1502{
1503 struct relay_stream *stream;
1504 struct relay_session *session = conn->session;
1505
1506 /*
1507 * We publish all streams belonging to a session atomically wrt
1508 * session lock.
1509 */
1510 pthread_mutex_lock(&session->lock);
1511 rcu_read_lock();
1512 cds_list_for_each_entry_rcu(stream, &session->recv_list,
1513 recv_node) {
1514 stream_publish(stream);
1515 }
1516 rcu_read_unlock();
1517
1518 /*
1519 * Inform the viewer that there are new streams in the session.
1520 */
1521 if (session->viewer_attached) {
1522 uatomic_set(&session->new_streams, 1);
1523 }
1524 pthread_mutex_unlock(&session->lock);
1525}
1526
1527static int conform_channel_path(char *channel_path)
1528{
1529 int ret = 0;
1530
1531 if (strstr("../", channel_path)) {
1532 ERR("Refusing channel path as it walks up the path hierarchy: \"%s\"",
1533 channel_path);
1534 ret = -1;
1535 goto end;
1536 }
1537
1538 if (*channel_path == '/') {
1539 const size_t len = strlen(channel_path);
1540
1541 /*
1542 * Channel paths from peers prior to 2.11 are expressed as an
1543 * absolute path that is, in reality, relative to the relay
1544 * daemon's output directory. Remove the leading slash so it
1545 * is correctly interpreted as a relative path later on.
1546 *
1547 * len (and not len - 1) is used to copy the trailing NULL.
1548 */
1549 bcopy(channel_path + 1, channel_path, len);
1550 }
1551end:
1552 return ret;
1553}
1554
1555/*
1556 * relay_add_stream: allocate a new stream for a session
1557 */
1558static int relay_add_stream(const struct lttcomm_relayd_hdr *recv_hdr,
1559 struct relay_connection *conn,
1560 const struct lttng_buffer_view *payload)
1561{
1562 int ret;
1563 ssize_t send_ret;
1564 struct relay_session *session = conn->session;
1565 struct relay_stream *stream = NULL;
1566 struct lttcomm_relayd_status_stream reply;
1567 struct ctf_trace *trace = NULL;
1568 uint64_t stream_handle = -1ULL;
1569 char *path_name = NULL, *channel_name = NULL;
1570 uint64_t tracefile_size = 0, tracefile_count = 0;
1571 LTTNG_OPTIONAL(uint64_t) stream_chunk_id = {};
1572
1573 if (!session || !conn->version_check_done) {
1574 ERR("Trying to add a stream before version check");
1575 ret = -1;
1576 goto end_no_session;
1577 }
1578
1579 if (session->minor == 1) {
1580 /* For 2.1 */
1581 ret = cmd_recv_stream_2_1(payload, &path_name,
1582 &channel_name);
1583 } else if (session->minor > 1 && session->minor < 11) {
1584 /* From 2.2 to 2.10 */
1585 ret = cmd_recv_stream_2_2(payload, &path_name,
1586 &channel_name, &tracefile_size, &tracefile_count);
1587 } else {
1588 /* From 2.11 to ... */
1589 ret = cmd_recv_stream_2_11(payload, &path_name,
1590 &channel_name, &tracefile_size, &tracefile_count,
1591 &stream_chunk_id.value);
1592 stream_chunk_id.is_set = true;
1593 }
1594
1595 if (ret < 0) {
1596 goto send_reply;
1597 }
1598
1599 if (conform_channel_path(path_name)) {
1600 goto send_reply;
1601 }
1602
1603 /*
1604 * Backward compatibility for --group-output-by-session.
1605 * Prior to lttng 2.11, the complete path is passed by the stream.
1606 * Starting at 2.11, lttng-relayd uses chunk. When dealing with producer
1607 * >=2.11 the chunk is responsible for the output path. When dealing
1608 * with producer < 2.11 the chunk output_path is the root output path
1609 * and the stream carries the complete path (path_name).
1610 * To support --group-output-by-session with older producer (<2.11), we
1611 * need to craft the path based on the stream path.
1612 */
1613 if (opt_group_output_by == RELAYD_GROUP_OUTPUT_BY_SESSION) {
1614 if (conn->minor < 4) {
1615 /*
1616 * From 2.1 to 2.3, the session_name is not passed on
1617 * the RELAYD_CREATE_SESSION command. The session name
1618 * is necessary to detect the presence of a base_path
1619 * inside the stream path. Without it we cannot perform
1620 * a valid group-output-by-session transformation.
1621 */
1622 WARN("Unable to perform a --group-by-session transformation for session %" PRIu64
1623 " for stream with path \"%s\" as it is produced by a peer using a protocol older than v2.4",
1624 session->id, path_name);
1625 } else if (conn->minor >= 4 && conn->minor < 11) {
1626 char *group_by_session_path_name;
1627
1628 assert(session->session_name[0] != '\0');
1629
1630 group_by_session_path_name =
1631 backward_compat_group_by_session(
1632 path_name,
1633 session->session_name);
1634 if (!group_by_session_path_name) {
1635 ERR("Failed to apply group by session to stream of session %" PRIu64,
1636 session->id);
1637 goto send_reply;
1638 }
1639
1640 DBG("Transformed session path from \"%s\" to \"%s\" to honor per-session name grouping",
1641 path_name, group_by_session_path_name);
1642
1643 free(path_name);
1644 path_name = group_by_session_path_name;
1645 }
1646 }
1647
1648 trace = ctf_trace_get_by_path_or_create(session, path_name);
1649 if (!trace) {
1650 goto send_reply;
1651 }
1652
1653 /* This stream here has one reference on the trace. */
1654 pthread_mutex_lock(&last_relay_stream_id_lock);
1655 stream_handle = ++last_relay_stream_id;
1656 pthread_mutex_unlock(&last_relay_stream_id_lock);
1657
1658 /* We pass ownership of path_name and channel_name. */
1659 stream = stream_create(trace, stream_handle, path_name,
1660 channel_name, tracefile_size, tracefile_count);
1661 path_name = NULL;
1662 channel_name = NULL;
1663
1664 /*
1665 * Streams are the owners of their trace. Reference to trace is
1666 * kept within stream_create().
1667 */
1668 ctf_trace_put(trace);
1669
1670send_reply:
1671 memset(&reply, 0, sizeof(reply));
1672 reply.handle = htobe64(stream_handle);
1673 if (!stream) {
1674 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1675 } else {
1676 reply.ret_code = htobe32(LTTNG_OK);
1677 }
1678
1679 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1680 sizeof(struct lttcomm_relayd_status_stream), 0);
1681 if (send_ret < (ssize_t) sizeof(reply)) {
1682 ERR("Failed to send \"add stream\" command reply (ret = %zd)",
1683 send_ret);
1684 ret = -1;
1685 }
1686
1687end_no_session:
1688 free(path_name);
1689 free(channel_name);
1690 return ret;
1691}
1692
1693/*
1694 * relay_close_stream: close a specific stream
1695 */
1696static int relay_close_stream(const struct lttcomm_relayd_hdr *recv_hdr,
1697 struct relay_connection *conn,
1698 const struct lttng_buffer_view *payload)
1699{
1700 int ret;
1701 ssize_t send_ret;
1702 struct relay_session *session = conn->session;
1703 struct lttcomm_relayd_close_stream stream_info;
1704 struct lttcomm_relayd_generic_reply reply;
1705 struct relay_stream *stream;
1706
1707 DBG("Close stream received");
1708
1709 if (!session || !conn->version_check_done) {
1710 ERR("Trying to close a stream before version check");
1711 ret = -1;
1712 goto end_no_session;
1713 }
1714
1715 if (payload->size < sizeof(stream_info)) {
1716 ERR("Unexpected payload size in \"relay_close_stream\": expected >= %zu bytes, got %zu bytes",
1717 sizeof(stream_info), payload->size);
1718 ret = -1;
1719 goto end_no_session;
1720 }
1721 memcpy(&stream_info, payload->data, sizeof(stream_info));
1722 stream_info.stream_id = be64toh(stream_info.stream_id);
1723 stream_info.last_net_seq_num = be64toh(stream_info.last_net_seq_num);
1724
1725 stream = stream_get_by_id(stream_info.stream_id);
1726 if (!stream) {
1727 ret = -1;
1728 goto end;
1729 }
1730
1731 /*
1732 * Set last_net_seq_num before the close flag. Required by data
1733 * pending check.
1734 */
1735 pthread_mutex_lock(&stream->lock);
1736 stream->last_net_seq_num = stream_info.last_net_seq_num;
1737 pthread_mutex_unlock(&stream->lock);
1738
1739 /*
1740 * This is one of the conditions which may trigger a stream close
1741 * with the others being:
1742 * 1) A close command is received for a stream
1743 * 2) The control connection owning the stream is closed
1744 * 3) We have received all of the stream's data _after_ a close
1745 * request.
1746 */
1747 try_stream_close(stream);
1748 if (stream->is_metadata) {
1749 struct relay_viewer_stream *vstream;
1750
1751 vstream = viewer_stream_get_by_id(stream->stream_handle);
1752 if (vstream) {
1753 if (stream->no_new_metadata_notified) {
1754 /*
1755 * Since all the metadata has been sent to the
1756 * viewer and that we have a request to close
1757 * its stream, we can safely teardown the
1758 * corresponding metadata viewer stream.
1759 */
1760 viewer_stream_put(vstream);
1761 }
1762 /* Put local reference. */
1763 viewer_stream_put(vstream);
1764 }
1765 }
1766 stream_put(stream);
1767 ret = 0;
1768
1769end:
1770 memset(&reply, 0, sizeof(reply));
1771 if (ret < 0) {
1772 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1773 } else {
1774 reply.ret_code = htobe32(LTTNG_OK);
1775 }
1776 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1777 sizeof(struct lttcomm_relayd_generic_reply), 0);
1778 if (send_ret < (ssize_t) sizeof(reply)) {
1779 ERR("Failed to send \"close stream\" command reply (ret = %zd)",
1780 send_ret);
1781 ret = -1;
1782 }
1783
1784end_no_session:
1785 return ret;
1786}
1787
1788/*
1789 * relay_reset_metadata: reset a metadata stream
1790 */
1791static
1792int relay_reset_metadata(const struct lttcomm_relayd_hdr *recv_hdr,
1793 struct relay_connection *conn,
1794 const struct lttng_buffer_view *payload)
1795{
1796 int ret;
1797 ssize_t send_ret;
1798 struct relay_session *session = conn->session;
1799 struct lttcomm_relayd_reset_metadata stream_info;
1800 struct lttcomm_relayd_generic_reply reply;
1801 struct relay_stream *stream;
1802
1803 DBG("Reset metadata received");
1804
1805 if (!session || !conn->version_check_done) {
1806 ERR("Trying to reset a metadata stream before version check");
1807 ret = -1;
1808 goto end_no_session;
1809 }
1810
1811 if (payload->size < sizeof(stream_info)) {
1812 ERR("Unexpected payload size in \"relay_reset_metadata\": expected >= %zu bytes, got %zu bytes",
1813 sizeof(stream_info), payload->size);
1814 ret = -1;
1815 goto end_no_session;
1816 }
1817 memcpy(&stream_info, payload->data, sizeof(stream_info));
1818 stream_info.stream_id = be64toh(stream_info.stream_id);
1819 stream_info.version = be64toh(stream_info.version);
1820
1821 DBG("Update metadata to version %" PRIu64, stream_info.version);
1822
1823 /* Unsupported for live sessions for now. */
1824 if (session->live_timer != 0) {
1825 ret = -1;
1826 goto end;
1827 }
1828
1829 stream = stream_get_by_id(stream_info.stream_id);
1830 if (!stream) {
1831 ret = -1;
1832 goto end;
1833 }
1834 pthread_mutex_lock(&stream->lock);
1835 if (!stream->is_metadata) {
1836 ret = -1;
1837 goto end_unlock;
1838 }
1839
1840 ret = stream_reset_file(stream);
1841 if (ret < 0) {
1842 ERR("Failed to reset metadata stream %" PRIu64
1843 ": stream_path = %s, channel = %s",
1844 stream->stream_handle, stream->path_name,
1845 stream->channel_name);
1846 goto end_unlock;
1847 }
1848end_unlock:
1849 pthread_mutex_unlock(&stream->lock);
1850 stream_put(stream);
1851
1852end:
1853 memset(&reply, 0, sizeof(reply));
1854 if (ret < 0) {
1855 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1856 } else {
1857 reply.ret_code = htobe32(LTTNG_OK);
1858 }
1859 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1860 sizeof(struct lttcomm_relayd_generic_reply), 0);
1861 if (send_ret < (ssize_t) sizeof(reply)) {
1862 ERR("Failed to send \"reset metadata\" command reply (ret = %zd)",
1863 send_ret);
1864 ret = -1;
1865 }
1866
1867end_no_session:
1868 return ret;
1869}
1870
1871/*
1872 * relay_unknown_command: send -1 if received unknown command
1873 */
1874static void relay_unknown_command(struct relay_connection *conn)
1875{
1876 struct lttcomm_relayd_generic_reply reply;
1877 ssize_t send_ret;
1878
1879 memset(&reply, 0, sizeof(reply));
1880 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1881 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
1882 if (send_ret < sizeof(reply)) {
1883 ERR("Failed to send \"unknown command\" command reply (ret = %zd)", send_ret);
1884 }
1885}
1886
1887/*
1888 * relay_start: send an acknowledgment to the client to tell if we are
1889 * ready to receive data. We are ready if a session is established.
1890 */
1891static int relay_start(const struct lttcomm_relayd_hdr *recv_hdr,
1892 struct relay_connection *conn,
1893 const struct lttng_buffer_view *payload)
1894{
1895 int ret = 0;
1896 ssize_t send_ret;
1897 struct lttcomm_relayd_generic_reply reply;
1898 struct relay_session *session = conn->session;
1899
1900 if (!session) {
1901 DBG("Trying to start the streaming without a session established");
1902 ret = htobe32(LTTNG_ERR_UNK);
1903 }
1904
1905 memset(&reply, 0, sizeof(reply));
1906 reply.ret_code = htobe32(LTTNG_OK);
1907 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1908 sizeof(reply), 0);
1909 if (send_ret < (ssize_t) sizeof(reply)) {
1910 ERR("Failed to send \"relay_start\" command reply (ret = %zd)",
1911 send_ret);
1912 ret = -1;
1913 }
1914
1915 return ret;
1916}
1917
1918/*
1919 * relay_recv_metadata: receive the metadata for the session.
1920 */
1921static int relay_recv_metadata(const struct lttcomm_relayd_hdr *recv_hdr,
1922 struct relay_connection *conn,
1923 const struct lttng_buffer_view *payload)
1924{
1925 int ret = 0;
1926 struct relay_session *session = conn->session;
1927 struct lttcomm_relayd_metadata_payload metadata_payload_header;
1928 struct relay_stream *metadata_stream;
1929 uint64_t metadata_payload_size;
1930 struct lttng_buffer_view packet_view;
1931
1932 if (!session) {
1933 ERR("Metadata sent before version check");
1934 ret = -1;
1935 goto end;
1936 }
1937
1938 if (recv_hdr->data_size < sizeof(struct lttcomm_relayd_metadata_payload)) {
1939 ERR("Incorrect data size");
1940 ret = -1;
1941 goto end;
1942 }
1943 metadata_payload_size = recv_hdr->data_size -
1944 sizeof(struct lttcomm_relayd_metadata_payload);
1945
1946 memcpy(&metadata_payload_header, payload->data,
1947 sizeof(metadata_payload_header));
1948 metadata_payload_header.stream_id = be64toh(
1949 metadata_payload_header.stream_id);
1950 metadata_payload_header.padding_size = be32toh(
1951 metadata_payload_header.padding_size);
1952
1953 metadata_stream = stream_get_by_id(metadata_payload_header.stream_id);
1954 if (!metadata_stream) {
1955 ret = -1;
1956 goto end;
1957 }
1958
1959 packet_view = lttng_buffer_view_from_view(payload,
1960 sizeof(metadata_payload_header), metadata_payload_size);
1961 if (!packet_view.data) {
1962 ERR("Invalid metadata packet length announced by header");
1963 ret = -1;
1964 goto end_put;
1965 }
1966
1967 pthread_mutex_lock(&metadata_stream->lock);
1968 ret = stream_write(metadata_stream, &packet_view,
1969 metadata_payload_header.padding_size);
1970 pthread_mutex_unlock(&metadata_stream->lock);
1971 if (ret){
1972 ret = -1;
1973 goto end_put;
1974 }
1975end_put:
1976 stream_put(metadata_stream);
1977end:
1978 return ret;
1979}
1980
1981/*
1982 * relay_send_version: send relayd version number
1983 */
1984static int relay_send_version(const struct lttcomm_relayd_hdr *recv_hdr,
1985 struct relay_connection *conn,
1986 const struct lttng_buffer_view *payload)
1987{
1988 int ret;
1989 ssize_t send_ret;
1990 struct lttcomm_relayd_version reply, msg;
1991 bool compatible = true;
1992
1993 conn->version_check_done = true;
1994
1995 /* Get version from the other side. */
1996 if (payload->size < sizeof(msg)) {
1997 ERR("Unexpected payload size in \"relay_send_version\": expected >= %zu bytes, got %zu bytes",
1998 sizeof(msg), payload->size);
1999 ret = -1;
2000 goto end;
2001 }
2002
2003 memcpy(&msg, payload->data, sizeof(msg));
2004 msg.major = be32toh(msg.major);
2005 msg.minor = be32toh(msg.minor);
2006
2007 memset(&reply, 0, sizeof(reply));
2008 reply.major = RELAYD_VERSION_COMM_MAJOR;
2009 reply.minor = RELAYD_VERSION_COMM_MINOR;
2010
2011 /* Major versions must be the same */
2012 if (reply.major != msg.major) {
2013 DBG("Incompatible major versions (%u vs %u), deleting session",
2014 reply.major, msg.major);
2015 compatible = false;
2016 }
2017
2018 conn->major = reply.major;
2019 /* We adapt to the lowest compatible version */
2020 if (reply.minor <= msg.minor) {
2021 conn->minor = reply.minor;
2022 } else {
2023 conn->minor = msg.minor;
2024 }
2025
2026 reply.major = htobe32(reply.major);
2027 reply.minor = htobe32(reply.minor);
2028 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
2029 sizeof(reply), 0);
2030 if (send_ret < (ssize_t) sizeof(reply)) {
2031 ERR("Failed to send \"send version\" command reply (ret = %zd)",
2032 send_ret);
2033 ret = -1;
2034 goto end;
2035 } else {
2036 ret = 0;
2037 }
2038
2039 if (!compatible) {
2040 ret = -1;
2041 goto end;
2042 }
2043
2044 DBG("Version check done using protocol %u.%u", conn->major,
2045 conn->minor);
2046
2047end:
2048 return ret;
2049}
2050
2051/*
2052 * Check for data pending for a given stream id from the session daemon.
2053 */
2054static int relay_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2055 struct relay_connection *conn,
2056 const struct lttng_buffer_view *payload)
2057{
2058 struct relay_session *session = conn->session;
2059 struct lttcomm_relayd_data_pending msg;
2060 struct lttcomm_relayd_generic_reply reply;
2061 struct relay_stream *stream;
2062 ssize_t send_ret;
2063 int ret;
2064 uint64_t stream_seq;
2065
2066 DBG("Data pending command received");
2067
2068 if (!session || !conn->version_check_done) {
2069 ERR("Trying to check for data before version check");
2070 ret = -1;
2071 goto end_no_session;
2072 }
2073
2074 if (payload->size < sizeof(msg)) {
2075 ERR("Unexpected payload size in \"relay_data_pending\": expected >= %zu bytes, got %zu bytes",
2076 sizeof(msg), payload->size);
2077 ret = -1;
2078 goto end_no_session;
2079 }
2080 memcpy(&msg, payload->data, sizeof(msg));
2081 msg.stream_id = be64toh(msg.stream_id);
2082 msg.last_net_seq_num = be64toh(msg.last_net_seq_num);
2083
2084 stream = stream_get_by_id(msg.stream_id);
2085 if (stream == NULL) {
2086 ret = -1;
2087 goto end;
2088 }
2089
2090 pthread_mutex_lock(&stream->lock);
2091
2092 if (session_streams_have_index(session)) {
2093 /*
2094 * Ensure that both the index and stream data have been
2095 * flushed up to the requested point.
2096 */
2097 stream_seq = min(stream->prev_data_seq, stream->prev_index_seq);
2098 } else {
2099 stream_seq = stream->prev_data_seq;
2100 }
2101 DBG("Data pending for stream id %" PRIu64 ": prev_data_seq %" PRIu64
2102 ", prev_index_seq %" PRIu64
2103 ", and last_seq %" PRIu64, msg.stream_id,
2104 stream->prev_data_seq, stream->prev_index_seq,
2105 msg.last_net_seq_num);
2106
2107 /* Avoid wrapping issue */
2108 if (((int64_t) (stream_seq - msg.last_net_seq_num)) >= 0) {
2109 /* Data has in fact been written and is NOT pending */
2110 ret = 0;
2111 } else {
2112 /* Data still being streamed thus pending */
2113 ret = 1;
2114 }
2115
2116 stream->data_pending_check_done = true;
2117 pthread_mutex_unlock(&stream->lock);
2118
2119 stream_put(stream);
2120end:
2121
2122 memset(&reply, 0, sizeof(reply));
2123 reply.ret_code = htobe32(ret);
2124 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2125 if (send_ret < (ssize_t) sizeof(reply)) {
2126 ERR("Failed to send \"data pending\" command reply (ret = %zd)",
2127 send_ret);
2128 ret = -1;
2129 }
2130
2131end_no_session:
2132 return ret;
2133}
2134
2135/*
2136 * Wait for the control socket to reach a quiescent state.
2137 *
2138 * Note that for now, when receiving this command from the session
2139 * daemon, this means that every subsequent commands or data received on
2140 * the control socket has been handled. So, this is why we simply return
2141 * OK here.
2142 */
2143static int relay_quiescent_control(const struct lttcomm_relayd_hdr *recv_hdr,
2144 struct relay_connection *conn,
2145 const struct lttng_buffer_view *payload)
2146{
2147 int ret;
2148 ssize_t send_ret;
2149 struct relay_stream *stream;
2150 struct lttcomm_relayd_quiescent_control msg;
2151 struct lttcomm_relayd_generic_reply reply;
2152
2153 DBG("Checking quiescent state on control socket");
2154
2155 if (!conn->session || !conn->version_check_done) {
2156 ERR("Trying to check for data before version check");
2157 ret = -1;
2158 goto end_no_session;
2159 }
2160
2161 if (payload->size < sizeof(msg)) {
2162 ERR("Unexpected payload size in \"relay_quiescent_control\": expected >= %zu bytes, got %zu bytes",
2163 sizeof(msg), payload->size);
2164 ret = -1;
2165 goto end_no_session;
2166 }
2167 memcpy(&msg, payload->data, sizeof(msg));
2168 msg.stream_id = be64toh(msg.stream_id);
2169
2170 stream = stream_get_by_id(msg.stream_id);
2171 if (!stream) {
2172 goto reply;
2173 }
2174 pthread_mutex_lock(&stream->lock);
2175 stream->data_pending_check_done = true;
2176 pthread_mutex_unlock(&stream->lock);
2177
2178 DBG("Relay quiescent control pending flag set to %" PRIu64, msg.stream_id);
2179 stream_put(stream);
2180reply:
2181 memset(&reply, 0, sizeof(reply));
2182 reply.ret_code = htobe32(LTTNG_OK);
2183 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2184 if (send_ret < (ssize_t) sizeof(reply)) {
2185 ERR("Failed to send \"quiescent control\" command reply (ret = %zd)",
2186 send_ret);
2187 ret = -1;
2188 } else {
2189 ret = 0;
2190 }
2191
2192end_no_session:
2193 return ret;
2194}
2195
2196/*
2197 * Initialize a data pending command. This means that a consumer is about
2198 * to ask for data pending for each stream it holds. Simply iterate over
2199 * all streams of a session and set the data_pending_check_done flag.
2200 *
2201 * This command returns to the client a LTTNG_OK code.
2202 */
2203static int relay_begin_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2204 struct relay_connection *conn,
2205 const struct lttng_buffer_view *payload)
2206{
2207 int ret;
2208 ssize_t send_ret;
2209 struct lttng_ht_iter iter;
2210 struct lttcomm_relayd_begin_data_pending msg;
2211 struct lttcomm_relayd_generic_reply reply;
2212 struct relay_stream *stream;
2213
2214 assert(recv_hdr);
2215 assert(conn);
2216
2217 DBG("Init streams for data pending");
2218
2219 if (!conn->session || !conn->version_check_done) {
2220 ERR("Trying to check for data before version check");
2221 ret = -1;
2222 goto end_no_session;
2223 }
2224
2225 if (payload->size < sizeof(msg)) {
2226 ERR("Unexpected payload size in \"relay_begin_data_pending\": expected >= %zu bytes, got %zu bytes",
2227 sizeof(msg), payload->size);
2228 ret = -1;
2229 goto end_no_session;
2230 }
2231 memcpy(&msg, payload->data, sizeof(msg));
2232 msg.session_id = be64toh(msg.session_id);
2233
2234 /*
2235 * Iterate over all streams to set the begin data pending flag.
2236 * For now, the streams are indexed by stream handle so we have
2237 * to iterate over all streams to find the one associated with
2238 * the right session_id.
2239 */
2240 rcu_read_lock();
2241 cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream,
2242 node.node) {
2243 if (!stream_get(stream)) {
2244 continue;
2245 }
2246 if (stream->trace->session->id == msg.session_id) {
2247 pthread_mutex_lock(&stream->lock);
2248 stream->data_pending_check_done = false;
2249 pthread_mutex_unlock(&stream->lock);
2250 DBG("Set begin data pending flag to stream %" PRIu64,
2251 stream->stream_handle);
2252 }
2253 stream_put(stream);
2254 }
2255 rcu_read_unlock();
2256
2257 memset(&reply, 0, sizeof(reply));
2258 /* All good, send back reply. */
2259 reply.ret_code = htobe32(LTTNG_OK);
2260
2261 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2262 if (send_ret < (ssize_t) sizeof(reply)) {
2263 ERR("Failed to send \"begin data pending\" command reply (ret = %zd)",
2264 send_ret);
2265 ret = -1;
2266 } else {
2267 ret = 0;
2268 }
2269
2270end_no_session:
2271 return ret;
2272}
2273
2274/*
2275 * End data pending command. This will check, for a given session id, if
2276 * each stream associated with it has its data_pending_check_done flag
2277 * set. If not, this means that the client lost track of the stream but
2278 * the data is still being streamed on our side. In this case, we inform
2279 * the client that data is in flight.
2280 *
2281 * Return to the client if there is data in flight or not with a ret_code.
2282 */
2283static int relay_end_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2284 struct relay_connection *conn,
2285 const struct lttng_buffer_view *payload)
2286{
2287 int ret;
2288 ssize_t send_ret;
2289 struct lttng_ht_iter iter;
2290 struct lttcomm_relayd_end_data_pending msg;
2291 struct lttcomm_relayd_generic_reply reply;
2292 struct relay_stream *stream;
2293 uint32_t is_data_inflight = 0;
2294
2295 DBG("End data pending command");
2296
2297 if (!conn->session || !conn->version_check_done) {
2298 ERR("Trying to check for data before version check");
2299 ret = -1;
2300 goto end_no_session;
2301 }
2302
2303 if (payload->size < sizeof(msg)) {
2304 ERR("Unexpected payload size in \"relay_end_data_pending\": expected >= %zu bytes, got %zu bytes",
2305 sizeof(msg), payload->size);
2306 ret = -1;
2307 goto end_no_session;
2308 }
2309 memcpy(&msg, payload->data, sizeof(msg));
2310 msg.session_id = be64toh(msg.session_id);
2311
2312 /*
2313 * Iterate over all streams to see if the begin data pending
2314 * flag is set.
2315 */
2316 rcu_read_lock();
2317 cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream,
2318 node.node) {
2319 if (!stream_get(stream)) {
2320 continue;
2321 }
2322 if (stream->trace->session->id != msg.session_id) {
2323 stream_put(stream);
2324 continue;
2325 }
2326 pthread_mutex_lock(&stream->lock);
2327 if (!stream->data_pending_check_done) {
2328 uint64_t stream_seq;
2329
2330 if (session_streams_have_index(conn->session)) {
2331 /*
2332 * Ensure that both the index and stream data have been
2333 * flushed up to the requested point.
2334 */
2335 stream_seq = min(stream->prev_data_seq, stream->prev_index_seq);
2336 } else {
2337 stream_seq = stream->prev_data_seq;
2338 }
2339 if (!stream->closed || !(((int64_t) (stream_seq - stream->last_net_seq_num)) >= 0)) {
2340 is_data_inflight = 1;
2341 DBG("Data is still in flight for stream %" PRIu64,
2342 stream->stream_handle);
2343 pthread_mutex_unlock(&stream->lock);
2344 stream_put(stream);
2345 break;
2346 }
2347 }
2348 pthread_mutex_unlock(&stream->lock);
2349 stream_put(stream);
2350 }
2351 rcu_read_unlock();
2352
2353 memset(&reply, 0, sizeof(reply));
2354 /* All good, send back reply. */
2355 reply.ret_code = htobe32(is_data_inflight);
2356
2357 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2358 if (send_ret < (ssize_t) sizeof(reply)) {
2359 ERR("Failed to send \"end data pending\" command reply (ret = %zd)",
2360 send_ret);
2361 ret = -1;
2362 } else {
2363 ret = 0;
2364 }
2365
2366end_no_session:
2367 return ret;
2368}
2369
2370/*
2371 * Receive an index for a specific stream.
2372 *
2373 * Return 0 on success else a negative value.
2374 */
2375static int relay_recv_index(const struct lttcomm_relayd_hdr *recv_hdr,
2376 struct relay_connection *conn,
2377 const struct lttng_buffer_view *payload)
2378{
2379 int ret;
2380 ssize_t send_ret;
2381 struct relay_session *session = conn->session;
2382 struct lttcomm_relayd_index index_info;
2383 struct lttcomm_relayd_generic_reply reply;
2384 struct relay_stream *stream;
2385 size_t msg_len;
2386
2387 assert(conn);
2388
2389 DBG("Relay receiving index");
2390
2391 if (!session || !conn->version_check_done) {
2392 ERR("Trying to close a stream before version check");
2393 ret = -1;
2394 goto end_no_session;
2395 }
2396
2397 msg_len = lttcomm_relayd_index_len(
2398 lttng_to_index_major(conn->major, conn->minor),
2399 lttng_to_index_minor(conn->major, conn->minor));
2400 if (payload->size < msg_len) {
2401 ERR("Unexpected payload size in \"relay_recv_index\": expected >= %zu bytes, got %zu bytes",
2402 msg_len, payload->size);
2403 ret = -1;
2404 goto end_no_session;
2405 }
2406 memcpy(&index_info, payload->data, msg_len);
2407 index_info.relay_stream_id = be64toh(index_info.relay_stream_id);
2408 index_info.net_seq_num = be64toh(index_info.net_seq_num);
2409 index_info.packet_size = be64toh(index_info.packet_size);
2410 index_info.content_size = be64toh(index_info.content_size);
2411 index_info.timestamp_begin = be64toh(index_info.timestamp_begin);
2412 index_info.timestamp_end = be64toh(index_info.timestamp_end);
2413 index_info.events_discarded = be64toh(index_info.events_discarded);
2414 index_info.stream_id = be64toh(index_info.stream_id);
2415
2416 if (conn->minor >= 8) {
2417 index_info.stream_instance_id =
2418 be64toh(index_info.stream_instance_id);
2419 index_info.packet_seq_num = be64toh(index_info.packet_seq_num);
2420 } else {
2421 index_info.stream_instance_id = -1ULL;
2422 index_info.packet_seq_num = -1ULL;
2423 }
2424
2425 stream = stream_get_by_id(index_info.relay_stream_id);
2426 if (!stream) {
2427 ERR("stream_get_by_id not found");
2428 ret = -1;
2429 goto end;
2430 }
2431
2432 pthread_mutex_lock(&stream->lock);
2433 ret = stream_add_index(stream, &index_info);
2434 pthread_mutex_unlock(&stream->lock);
2435 if (ret) {
2436 goto end_stream_put;
2437 }
2438
2439end_stream_put:
2440 stream_put(stream);
2441end:
2442 memset(&reply, 0, sizeof(reply));
2443 if (ret < 0) {
2444 reply.ret_code = htobe32(LTTNG_ERR_UNK);
2445 } else {
2446 reply.ret_code = htobe32(LTTNG_OK);
2447 }
2448 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2449 if (send_ret < (ssize_t) sizeof(reply)) {
2450 ERR("Failed to send \"recv index\" command reply (ret = %zd)", send_ret);
2451 ret = -1;
2452 }
2453
2454end_no_session:
2455 return ret;
2456}
2457
2458/*
2459 * Receive the streams_sent message.
2460 *
2461 * Return 0 on success else a negative value.
2462 */
2463static int relay_streams_sent(const struct lttcomm_relayd_hdr *recv_hdr,
2464 struct relay_connection *conn,
2465 const struct lttng_buffer_view *payload)
2466{
2467 int ret;
2468 ssize_t send_ret;
2469 struct lttcomm_relayd_generic_reply reply;
2470
2471 assert(conn);
2472
2473 DBG("Relay receiving streams_sent");
2474
2475 if (!conn->session || !conn->version_check_done) {
2476 ERR("Trying to close a stream before version check");
2477 ret = -1;
2478 goto end_no_session;
2479 }
2480
2481 /*
2482 * Publish every pending stream in the connection recv list which are
2483 * now ready to be used by the viewer.
2484 */
2485 publish_connection_local_streams(conn);
2486
2487 memset(&reply, 0, sizeof(reply));
2488 reply.ret_code = htobe32(LTTNG_OK);
2489 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2490 if (send_ret < (ssize_t) sizeof(reply)) {
2491 ERR("Failed to send \"streams sent\" command reply (ret = %zd)",
2492 send_ret);
2493 ret = -1;
2494 } else {
2495 /* Success. */
2496 ret = 0;
2497 }
2498
2499end_no_session:
2500 return ret;
2501}
2502
2503/*
2504 * relay_rotate_session_stream: rotate a stream to a new tracefile for the
2505 * session rotation feature (not the tracefile rotation feature).
2506 */
2507static int relay_rotate_session_streams(
2508 const struct lttcomm_relayd_hdr *recv_hdr,
2509 struct relay_connection *conn,
2510 const struct lttng_buffer_view *payload)
2511{
2512 int ret = 0;
2513 uint32_t i;
2514 ssize_t send_ret;
2515 enum lttng_error_code reply_code = LTTNG_ERR_UNK;
2516 struct relay_session *session = conn->session;
2517 struct lttcomm_relayd_rotate_streams rotate_streams;
2518 struct lttcomm_relayd_generic_reply reply = {};
2519 struct relay_stream *stream = NULL;
2520 const size_t header_len = sizeof(struct lttcomm_relayd_rotate_streams);
2521 struct lttng_trace_chunk *next_trace_chunk = NULL;
2522 struct lttng_buffer_view stream_positions;
2523 char chunk_id_buf[MAX_INT_DEC_LEN(uint64_t)];
2524 const char *chunk_id_str = "none";
2525
2526 if (!session || !conn->version_check_done) {
2527 ERR("Trying to rotate a stream before version check");
2528 ret = -1;
2529 goto end_no_reply;
2530 }
2531
2532 if (session->major == 2 && session->minor < 11) {
2533 ERR("Unsupported feature before 2.11");
2534 ret = -1;
2535 goto end_no_reply;
2536 }
2537
2538 if (payload->size < header_len) {
2539 ERR("Unexpected payload size in \"relay_rotate_session_stream\": expected >= %zu bytes, got %zu bytes",
2540 header_len, payload->size);
2541 ret = -1;
2542 goto end_no_reply;
2543 }
2544
2545 memcpy(&rotate_streams, payload->data, header_len);
2546
2547 /* Convert header to host endianness. */
2548 rotate_streams = (typeof(rotate_streams)) {
2549 .stream_count = be32toh(rotate_streams.stream_count),
2550 .new_chunk_id = (typeof(rotate_streams.new_chunk_id)) {
2551 .is_set = !!rotate_streams.new_chunk_id.is_set,
2552 .value = be64toh(rotate_streams.new_chunk_id.value),
2553 }
2554 };
2555
2556 if (rotate_streams.new_chunk_id.is_set) {
2557 /*
2558 * Retrieve the trace chunk the stream must transition to. As
2559 * per the protocol, this chunk should have been created
2560 * before this command is received.
2561 */
2562 next_trace_chunk = sessiond_trace_chunk_registry_get_chunk(
2563 sessiond_trace_chunk_registry,
2564 session->sessiond_uuid, session->id,
2565 rotate_streams.new_chunk_id.value);
2566 if (!next_trace_chunk) {
2567 char uuid_str[LTTNG_UUID_STR_LEN];
2568
2569 lttng_uuid_to_str(session->sessiond_uuid, uuid_str);
2570 ERR("Unknown next trace chunk in ROTATE_STREAMS command: sessiond_uuid = {%s}, session_id = %" PRIu64
2571 ", trace_chunk_id = %" PRIu64,
2572 uuid_str, session->id,
2573 rotate_streams.new_chunk_id.value);
2574 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2575 ret = -1;
2576 goto end;
2577 }
2578
2579 ret = snprintf(chunk_id_buf, sizeof(chunk_id_buf), "%" PRIu64,
2580 rotate_streams.new_chunk_id.value);
2581 if (ret < 0 || ret >= sizeof(chunk_id_buf)) {
2582 chunk_id_str = "formatting error";
2583 } else {
2584 chunk_id_str = chunk_id_buf;
2585 }
2586 }
2587
2588 DBG("Rotate %" PRIu32 " streams of session \"%s\" to chunk \"%s\"",
2589 rotate_streams.stream_count, session->session_name,
2590 chunk_id_str);
2591
2592 stream_positions = lttng_buffer_view_from_view(payload,
2593 sizeof(rotate_streams), -1);
2594 if (!stream_positions.data ||
2595 stream_positions.size <
2596 (rotate_streams.stream_count *
2597 sizeof(struct lttcomm_relayd_stream_rotation_position))) {
2598 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2599 ret = -1;
2600 goto end;
2601 }
2602
2603 for (i = 0; i < rotate_streams.stream_count; i++) {
2604 struct lttcomm_relayd_stream_rotation_position *position_comm =
2605 &((typeof(position_comm)) stream_positions.data)[i];
2606 const struct lttcomm_relayd_stream_rotation_position pos = {
2607 .stream_id = be64toh(position_comm->stream_id),
2608 .rotate_at_seq_num = be64toh(
2609 position_comm->rotate_at_seq_num),
2610 };
2611
2612 stream = stream_get_by_id(pos.stream_id);
2613 if (!stream) {
2614 reply_code = LTTNG_ERR_INVALID;
2615 ret = -1;
2616 goto end;
2617 }
2618
2619 pthread_mutex_lock(&stream->lock);
2620 ret = stream_set_pending_rotation(stream, next_trace_chunk,
2621 pos.rotate_at_seq_num);
2622 pthread_mutex_unlock(&stream->lock);
2623 if (ret) {
2624 reply_code = LTTNG_ERR_FILE_CREATION_ERROR;
2625 goto end;
2626 }
2627
2628 stream_put(stream);
2629 stream = NULL;
2630 }
2631
2632 reply_code = LTTNG_OK;
2633 ret = 0;
2634end:
2635 if (stream) {
2636 stream_put(stream);
2637 }
2638
2639 reply.ret_code = htobe32((uint32_t) reply_code);
2640 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
2641 sizeof(struct lttcomm_relayd_generic_reply), 0);
2642 if (send_ret < (ssize_t) sizeof(reply)) {
2643 ERR("Failed to send \"rotate session stream\" command reply (ret = %zd)",
2644 send_ret);
2645 ret = -1;
2646 }
2647end_no_reply:
2648 lttng_trace_chunk_put(next_trace_chunk);
2649 return ret;
2650}
2651
2652
2653
2654/*
2655 * relay_create_trace_chunk: create a new trace chunk
2656 */
2657static int relay_create_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr,
2658 struct relay_connection *conn,
2659 const struct lttng_buffer_view *payload)
2660{
2661 int ret = 0;
2662 ssize_t send_ret;
2663 struct relay_session *session = conn->session;
2664 struct lttcomm_relayd_create_trace_chunk *msg;
2665 struct lttcomm_relayd_generic_reply reply = {};
2666 struct lttng_buffer_view header_view;
2667 struct lttng_buffer_view chunk_name_view;
2668 struct lttng_trace_chunk *chunk = NULL, *published_chunk = NULL;
2669 enum lttng_error_code reply_code = LTTNG_OK;
2670 enum lttng_trace_chunk_status chunk_status;
2671 const char *new_path;
2672
2673 if (!session || !conn->version_check_done) {
2674 ERR("Trying to create a trace chunk before version check");
2675 ret = -1;
2676 goto end_no_reply;
2677 }
2678
2679 if (session->major == 2 && session->minor < 11) {
2680 ERR("Chunk creation command is unsupported before 2.11");
2681 ret = -1;
2682 goto end_no_reply;
2683 }
2684
2685 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
2686 if (!header_view.data) {
2687 ERR("Failed to receive payload of chunk creation command");
2688 ret = -1;
2689 goto end_no_reply;
2690 }
2691
2692 /* Convert to host endianness. */
2693 msg = (typeof(msg)) header_view.data;
2694 msg->chunk_id = be64toh(msg->chunk_id);
2695 msg->creation_timestamp = be64toh(msg->creation_timestamp);
2696 msg->override_name_length = be32toh(msg->override_name_length);
2697
2698 if (session->current_trace_chunk &&
2699 !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) {
2700 chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk,
2701 DEFAULT_CHUNK_TMP_OLD_DIRECTORY);
2702 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2703 ERR("Failed to rename old chunk");
2704 ret = -1;
2705 reply_code = LTTNG_ERR_UNK;
2706 goto end;
2707 }
2708 }
2709 session->ongoing_rotation = true;
2710 if (!session->current_trace_chunk) {
2711 if (!session->has_rotated) {
2712 new_path = "";
2713 } else {
2714 new_path = NULL;
2715 }
2716 } else {
2717 new_path = DEFAULT_CHUNK_TMP_NEW_DIRECTORY;
2718 }
2719 chunk = lttng_trace_chunk_create(
2720 msg->chunk_id, msg->creation_timestamp, new_path);
2721 if (!chunk) {
2722 ERR("Failed to create trace chunk in trace chunk creation command");
2723 ret = -1;
2724 reply_code = LTTNG_ERR_NOMEM;
2725 goto end;
2726 }
2727
2728 if (msg->override_name_length) {
2729 const char *name;
2730
2731 chunk_name_view = lttng_buffer_view_from_view(payload,
2732 sizeof(*msg),
2733 msg->override_name_length);
2734 name = chunk_name_view.data;
2735 if (!name || name[msg->override_name_length - 1]) {
2736 ERR("Failed to receive payload of chunk creation command");
2737 ret = -1;
2738 reply_code = LTTNG_ERR_INVALID;
2739 goto end;
2740 }
2741
2742 chunk_status = lttng_trace_chunk_override_name(
2743 chunk, chunk_name_view.data);
2744 switch (chunk_status) {
2745 case LTTNG_TRACE_CHUNK_STATUS_OK:
2746 break;
2747 case LTTNG_TRACE_CHUNK_STATUS_INVALID_ARGUMENT:
2748 ERR("Failed to set the name of new trace chunk in trace chunk creation command (invalid name)");
2749 reply_code = LTTNG_ERR_INVALID;
2750 ret = -1;
2751 goto end;
2752 default:
2753 ERR("Failed to set the name of new trace chunk in trace chunk creation command (unknown error)");
2754 reply_code = LTTNG_ERR_UNK;
2755 ret = -1;
2756 goto end;
2757 }
2758 }
2759
2760 chunk_status = lttng_trace_chunk_set_credentials_current_user(chunk);
2761 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2762 reply_code = LTTNG_ERR_UNK;
2763 ret = -1;
2764 goto end;
2765 }
2766
2767 assert(conn->session->output_directory);
2768 chunk_status = lttng_trace_chunk_set_as_owner(chunk,
2769 conn->session->output_directory);
2770 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2771 reply_code = LTTNG_ERR_UNK;
2772 ret = -1;
2773 goto end;
2774 }
2775
2776 published_chunk = sessiond_trace_chunk_registry_publish_chunk(
2777 sessiond_trace_chunk_registry,
2778 conn->session->sessiond_uuid,
2779 conn->session->id,
2780 chunk);
2781 if (!published_chunk) {
2782 char uuid_str[LTTNG_UUID_STR_LEN];
2783
2784 lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str);
2785 ERR("Failed to publish chunk: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64,
2786 uuid_str,
2787 conn->session->id,
2788 msg->chunk_id);
2789 ret = -1;
2790 reply_code = LTTNG_ERR_NOMEM;
2791 goto end;
2792 }
2793
2794 pthread_mutex_lock(&conn->session->lock);
2795 if (conn->session->pending_closure_trace_chunk) {
2796 /*
2797 * Invalid; this means a second create_trace_chunk command was
2798 * received before a close_trace_chunk.
2799 */
2800 ERR("Invalid trace chunk close command received; a trace chunk is already waiting for a trace chunk close command");
2801 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2802 ret = -1;
2803 goto end_unlock_session;
2804 }
2805 conn->session->pending_closure_trace_chunk =
2806 conn->session->current_trace_chunk;
2807 conn->session->current_trace_chunk = published_chunk;
2808 published_chunk = NULL;
2809 if (!conn->session->pending_closure_trace_chunk) {
2810 session->ongoing_rotation = false;
2811 }
2812end_unlock_session:
2813 pthread_mutex_unlock(&conn->session->lock);
2814end:
2815 reply.ret_code = htobe32((uint32_t) reply_code);
2816 send_ret = conn->sock->ops->sendmsg(conn->sock,
2817 &reply,
2818 sizeof(struct lttcomm_relayd_generic_reply),
2819 0);
2820 if (send_ret < (ssize_t) sizeof(reply)) {
2821 ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)",
2822 send_ret);
2823 ret = -1;
2824 }
2825end_no_reply:
2826 lttng_trace_chunk_put(chunk);
2827 lttng_trace_chunk_put(published_chunk);
2828 return ret;
2829}
2830
2831/*
2832 * relay_close_trace_chunk: close a trace chunk
2833 */
2834static int relay_close_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr,
2835 struct relay_connection *conn,
2836 const struct lttng_buffer_view *payload)
2837{
2838 int ret = 0, buf_ret;
2839 ssize_t send_ret;
2840 struct relay_session *session = conn->session;
2841 struct lttcomm_relayd_close_trace_chunk *msg;
2842 struct lttcomm_relayd_close_trace_chunk_reply reply = {};
2843 struct lttng_buffer_view header_view;
2844 struct lttng_trace_chunk *chunk = NULL;
2845 enum lttng_error_code reply_code = LTTNG_OK;
2846 enum lttng_trace_chunk_status chunk_status;
2847 uint64_t chunk_id;
2848 LTTNG_OPTIONAL(enum lttng_trace_chunk_command_type) close_command = {};
2849 time_t close_timestamp;
2850 char closed_trace_chunk_path[LTTNG_PATH_MAX];
2851 size_t path_length = 0;
2852 const char *chunk_name = NULL;
2853 struct lttng_dynamic_buffer reply_payload;
2854 const char *new_path;
2855
2856 lttng_dynamic_buffer_init(&reply_payload);
2857
2858 if (!session || !conn->version_check_done) {
2859 ERR("Trying to close a trace chunk before version check");
2860 ret = -1;
2861 goto end_no_reply;
2862 }
2863
2864 if (session->major == 2 && session->minor < 11) {
2865 ERR("Chunk close command is unsupported before 2.11");
2866 ret = -1;
2867 goto end_no_reply;
2868 }
2869
2870 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
2871 if (!header_view.data) {
2872 ERR("Failed to receive payload of chunk close command");
2873 ret = -1;
2874 goto end_no_reply;
2875 }
2876
2877 /* Convert to host endianness. */
2878 msg = (typeof(msg)) header_view.data;
2879 chunk_id = be64toh(msg->chunk_id);
2880 close_timestamp = (time_t) be64toh(msg->close_timestamp);
2881 close_command = (typeof(close_command)){
2882 .value = be32toh(msg->close_command.value),
2883 .is_set = msg->close_command.is_set,
2884 };
2885
2886 chunk = sessiond_trace_chunk_registry_get_chunk(
2887 sessiond_trace_chunk_registry,
2888 conn->session->sessiond_uuid,
2889 conn->session->id,
2890 chunk_id);
2891 if (!chunk) {
2892 char uuid_str[LTTNG_UUID_STR_LEN];
2893
2894 lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str);
2895 ERR("Failed to find chunk to close: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64,
2896 uuid_str,
2897 conn->session->id,
2898 msg->chunk_id);
2899 ret = -1;
2900 reply_code = LTTNG_ERR_NOMEM;
2901 goto end;
2902 }
2903
2904 pthread_mutex_lock(&session->lock);
2905 if (close_command.is_set &&
2906 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE) {
2907 /*
2908 * Clear command. It is a protocol error to ask for a
2909 * clear on a relay which does not allow it. Querying
2910 * the configuration allows figuring out whether
2911 * clearing is allowed before doing the clear.
2912 */
2913 if (!opt_allow_clear) {
2914 ret = -1;
2915 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2916 goto end_unlock_session;
2917 }
2918 }
2919 if (session->pending_closure_trace_chunk &&
2920 session->pending_closure_trace_chunk != chunk) {
2921 ERR("Trace chunk close command for session \"%s\" does not target the trace chunk pending closure",
2922 session->session_name);
2923 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2924 ret = -1;
2925 goto end_unlock_session;
2926 }
2927
2928 if (session->current_trace_chunk && session->current_trace_chunk != chunk &&
2929 !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) {
2930 if (close_command.is_set &&
2931 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE &&
2932 !session->has_rotated) {
2933 /* New chunk stays in session output directory. */
2934 new_path = "";
2935 } else {
2936 /* Use chunk name for new chunk. */
2937 new_path = NULL;
2938 }
2939 /* Rename new chunk path. */
2940 chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk,
2941 new_path);
2942 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2943 ret = -1;
2944 goto end;
2945 }
2946 session->ongoing_rotation = false;
2947 }
2948 if ((!close_command.is_set ||
2949 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_NO_OPERATION) &&
2950 !lttng_trace_chunk_get_name_overridden(chunk)) {
2951 const char *old_path;
2952
2953 if (!session->has_rotated) {
2954 old_path = "";
2955 } else {
2956 old_path = NULL;
2957 }
2958 /* We need to move back the .tmp_old_chunk to its rightful place. */
2959 chunk_status = lttng_trace_chunk_rename_path(chunk, old_path);
2960 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2961 ret = -1;
2962 goto end;
2963 }
2964 }
2965 chunk_status = lttng_trace_chunk_set_close_timestamp(
2966 chunk, close_timestamp);
2967 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2968 ERR("Failed to set trace chunk close timestamp");
2969 ret = -1;
2970 reply_code = LTTNG_ERR_UNK;
2971 goto end_unlock_session;
2972 }
2973
2974 if (close_command.is_set) {
2975 chunk_status = lttng_trace_chunk_set_close_command(
2976 chunk, close_command.value);
2977 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2978 ret = -1;
2979 reply_code = LTTNG_ERR_INVALID;
2980 goto end_unlock_session;
2981 }
2982 }
2983 chunk_status = lttng_trace_chunk_get_name(chunk, &chunk_name, NULL);
2984 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2985 ERR("Failed to get chunk name");
2986 ret = -1;
2987 reply_code = LTTNG_ERR_UNK;
2988 goto end_unlock_session;
2989 }
2990 if (!session->has_rotated && !session->snapshot) {
2991 ret = lttng_strncpy(closed_trace_chunk_path,
2992 session->output_path,
2993 sizeof(closed_trace_chunk_path));
2994 if (ret) {
2995 ERR("Failed to send trace chunk path: path length of %zu bytes exceeds the maximal allowed length of %zu bytes",
2996 strlen(session->output_path),
2997 sizeof(closed_trace_chunk_path));
2998 reply_code = LTTNG_ERR_NOMEM;
2999 ret = -1;
3000 goto end_unlock_session;
3001 }
3002 } else {
3003 if (session->snapshot) {
3004 ret = snprintf(closed_trace_chunk_path,
3005 sizeof(closed_trace_chunk_path),
3006 "%s/%s", session->output_path,
3007 chunk_name);
3008 } else {
3009 ret = snprintf(closed_trace_chunk_path,
3010 sizeof(closed_trace_chunk_path),
3011 "%s/" DEFAULT_ARCHIVED_TRACE_CHUNKS_DIRECTORY
3012 "/%s",
3013 session->output_path, chunk_name);
3014 }
3015 if (ret < 0 || ret == sizeof(closed_trace_chunk_path)) {
3016 ERR("Failed to format closed trace chunk resulting path");
3017 reply_code = ret < 0 ? LTTNG_ERR_UNK : LTTNG_ERR_NOMEM;
3018 ret = -1;
3019 goto end_unlock_session;
3020 }
3021 }
3022 if (close_command.is_set &&
3023 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_MOVE_TO_COMPLETED) {
3024 session->has_rotated = true;
3025 }
3026 DBG("Reply chunk path on close: %s", closed_trace_chunk_path);
3027 path_length = strlen(closed_trace_chunk_path) + 1;
3028 if (path_length > UINT32_MAX) {
3029 ERR("Closed trace chunk path exceeds the maximal length allowed by the protocol");
3030 ret = -1;
3031 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
3032 goto end_unlock_session;
3033 }
3034
3035 if (session->current_trace_chunk == chunk) {
3036 /*
3037 * After a trace chunk close command, no new streams
3038 * referencing the chunk may be created. Hence, on the
3039 * event that no new trace chunk have been created for
3040 * the session, the reference to the current trace chunk
3041 * is released in order to allow it to be reclaimed when
3042 * the last stream releases its reference to it.
3043 */
3044 lttng_trace_chunk_put(session->current_trace_chunk);
3045 session->current_trace_chunk = NULL;
3046 }
3047 lttng_trace_chunk_put(session->pending_closure_trace_chunk);
3048 session->pending_closure_trace_chunk = NULL;
3049end_unlock_session:
3050 pthread_mutex_unlock(&session->lock);
3051
3052end:
3053 reply.generic.ret_code = htobe32((uint32_t) reply_code);
3054 reply.path_length = htobe32((uint32_t) path_length);
3055 buf_ret = lttng_dynamic_buffer_append(
3056 &reply_payload, &reply, sizeof(reply));
3057 if (buf_ret) {
3058 ERR("Failed to append \"close trace chunk\" command reply header to payload buffer");
3059 goto end_no_reply;
3060 }
3061
3062 if (reply_code == LTTNG_OK) {
3063 buf_ret = lttng_dynamic_buffer_append(&reply_payload,
3064 closed_trace_chunk_path, path_length);
3065 if (buf_ret) {
3066 ERR("Failed to append \"close trace chunk\" command reply path to payload buffer");
3067 goto end_no_reply;
3068 }
3069 }
3070
3071 send_ret = conn->sock->ops->sendmsg(conn->sock,
3072 reply_payload.data,
3073 reply_payload.size,
3074 0);
3075 if (send_ret < reply_payload.size) {
3076 ERR("Failed to send \"close trace chunk\" command reply of %zu bytes (ret = %zd)",
3077 reply_payload.size, send_ret);
3078 ret = -1;
3079 goto end_no_reply;
3080 }
3081end_no_reply:
3082 lttng_trace_chunk_put(chunk);
3083 lttng_dynamic_buffer_reset(&reply_payload);
3084 return ret;
3085}
3086
3087/*
3088 * relay_trace_chunk_exists: check if a trace chunk exists
3089 */
3090static int relay_trace_chunk_exists(const struct lttcomm_relayd_hdr *recv_hdr,
3091 struct relay_connection *conn,
3092 const struct lttng_buffer_view *payload)
3093{
3094 int ret = 0;
3095 ssize_t send_ret;
3096 struct relay_session *session = conn->session;
3097 struct lttcomm_relayd_trace_chunk_exists *msg;
3098 struct lttcomm_relayd_trace_chunk_exists_reply reply = {};
3099 struct lttng_buffer_view header_view;
3100 uint64_t chunk_id;
3101 bool chunk_exists;
3102
3103 if (!session || !conn->version_check_done) {
3104 ERR("Trying to close a trace chunk before version check");
3105 ret = -1;
3106 goto end_no_reply;
3107 }
3108
3109 if (session->major == 2 && session->minor < 11) {
3110 ERR("Chunk close command is unsupported before 2.11");
3111 ret = -1;
3112 goto end_no_reply;
3113 }
3114
3115 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
3116 if (!header_view.data) {
3117 ERR("Failed to receive payload of chunk close command");
3118 ret = -1;
3119 goto end_no_reply;
3120 }
3121
3122 /* Convert to host endianness. */
3123 msg = (typeof(msg)) header_view.data;
3124 chunk_id = be64toh(msg->chunk_id);
3125
3126 ret = sessiond_trace_chunk_registry_chunk_exists(
3127 sessiond_trace_chunk_registry,
3128 conn->session->sessiond_uuid,
3129 conn->session->id,
3130 chunk_id, &chunk_exists);
3131 /*
3132 * If ret is not 0, send the reply and report the error to the caller.
3133 * It is a protocol (or internal) error and the session/connection
3134 * should be torn down.
3135 */
3136 reply = (typeof(reply)){
3137 .generic.ret_code = htobe32((uint32_t)
3138 (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)),
3139 .trace_chunk_exists = ret == 0 ? chunk_exists : 0,
3140 };
3141 send_ret = conn->sock->ops->sendmsg(
3142 conn->sock, &reply, sizeof(reply), 0);
3143 if (send_ret < (ssize_t) sizeof(reply)) {
3144 ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)",
3145 send_ret);
3146 ret = -1;
3147 }
3148end_no_reply:
3149 return ret;
3150}
3151
3152/*
3153 * relay_get_configuration: query whether feature is available
3154 */
3155static int relay_get_configuration(const struct lttcomm_relayd_hdr *recv_hdr,
3156 struct relay_connection *conn,
3157 const struct lttng_buffer_view *payload)
3158{
3159 int ret = 0;
3160 ssize_t send_ret;
3161 struct lttcomm_relayd_get_configuration *msg;
3162 struct lttcomm_relayd_get_configuration_reply reply = {};
3163 struct lttng_buffer_view header_view;
3164 uint64_t query_flags = 0;
3165 uint64_t result_flags = 0;
3166
3167 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
3168 if (!header_view.data) {
3169 ERR("Failed to receive payload of chunk close command");
3170 ret = -1;
3171 goto end_no_reply;
3172 }
3173
3174 /* Convert to host endianness. */
3175 msg = (typeof(msg)) header_view.data;
3176 query_flags = be64toh(msg->query_flags);
3177
3178 if (query_flags) {
3179 ret = LTTNG_ERR_INVALID_PROTOCOL;
3180 goto reply;
3181 }
3182 if (opt_allow_clear) {
3183 result_flags |= LTTCOMM_RELAYD_CONFIGURATION_FLAG_CLEAR_ALLOWED;
3184 }
3185 ret = 0;
3186reply:
3187 reply = (typeof(reply)){
3188 .generic.ret_code = htobe32((uint32_t)
3189 (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)),
3190 .relayd_configuration_flags = htobe64(result_flags),
3191 };
3192 send_ret = conn->sock->ops->sendmsg(
3193 conn->sock, &reply, sizeof(reply), 0);
3194 if (send_ret < (ssize_t) sizeof(reply)) {
3195 ERR("Failed to send \"get configuration\" command reply (ret = %zd)",
3196 send_ret);
3197 ret = -1;
3198 }
3199end_no_reply:
3200 return ret;
3201}
3202
3203#define DBG_CMD(cmd_name, conn) \
3204 DBG3("Processing \"%s\" command for socket %i", cmd_name, conn->sock->fd);
3205
3206static int relay_process_control_command(struct relay_connection *conn,
3207 const struct lttcomm_relayd_hdr *header,
3208 const struct lttng_buffer_view *payload)
3209{
3210 int ret = 0;
3211
3212 switch (header->cmd) {
3213 case RELAYD_CREATE_SESSION:
3214 DBG_CMD("RELAYD_CREATE_SESSION", conn);
3215 ret = relay_create_session(header, conn, payload);
3216 break;
3217 case RELAYD_ADD_STREAM:
3218 DBG_CMD("RELAYD_ADD_STREAM", conn);
3219 ret = relay_add_stream(header, conn, payload);
3220 break;
3221 case RELAYD_START_DATA:
3222 DBG_CMD("RELAYD_START_DATA", conn);
3223 ret = relay_start(header, conn, payload);
3224 break;
3225 case RELAYD_SEND_METADATA:
3226 DBG_CMD("RELAYD_SEND_METADATA", conn);
3227 ret = relay_recv_metadata(header, conn, payload);
3228 break;
3229 case RELAYD_VERSION:
3230 DBG_CMD("RELAYD_VERSION", conn);
3231 ret = relay_send_version(header, conn, payload);
3232 break;
3233 case RELAYD_CLOSE_STREAM:
3234 DBG_CMD("RELAYD_CLOSE_STREAM", conn);
3235 ret = relay_close_stream(header, conn, payload);
3236 break;
3237 case RELAYD_DATA_PENDING:
3238 DBG_CMD("RELAYD_DATA_PENDING", conn);
3239 ret = relay_data_pending(header, conn, payload);
3240 break;
3241 case RELAYD_QUIESCENT_CONTROL:
3242 DBG_CMD("RELAYD_QUIESCENT_CONTROL", conn);
3243 ret = relay_quiescent_control(header, conn, payload);
3244 break;
3245 case RELAYD_BEGIN_DATA_PENDING:
3246 DBG_CMD("RELAYD_BEGIN_DATA_PENDING", conn);
3247 ret = relay_begin_data_pending(header, conn, payload);
3248 break;
3249 case RELAYD_END_DATA_PENDING:
3250 DBG_CMD("RELAYD_END_DATA_PENDING", conn);
3251 ret = relay_end_data_pending(header, conn, payload);
3252 break;
3253 case RELAYD_SEND_INDEX:
3254 DBG_CMD("RELAYD_SEND_INDEX", conn);
3255 ret = relay_recv_index(header, conn, payload);
3256 break;
3257 case RELAYD_STREAMS_SENT:
3258 DBG_CMD("RELAYD_STREAMS_SENT", conn);
3259 ret = relay_streams_sent(header, conn, payload);
3260 break;
3261 case RELAYD_RESET_METADATA:
3262 DBG_CMD("RELAYD_RESET_METADATA", conn);
3263 ret = relay_reset_metadata(header, conn, payload);
3264 break;
3265 case RELAYD_ROTATE_STREAMS:
3266 DBG_CMD("RELAYD_ROTATE_STREAMS", conn);
3267 ret = relay_rotate_session_streams(header, conn, payload);
3268 break;
3269 case RELAYD_CREATE_TRACE_CHUNK:
3270 DBG_CMD("RELAYD_CREATE_TRACE_CHUNK", conn);
3271 ret = relay_create_trace_chunk(header, conn, payload);
3272 break;
3273 case RELAYD_CLOSE_TRACE_CHUNK:
3274 DBG_CMD("RELAYD_CLOSE_TRACE_CHUNK", conn);
3275 ret = relay_close_trace_chunk(header, conn, payload);
3276 break;
3277 case RELAYD_TRACE_CHUNK_EXISTS:
3278 DBG_CMD("RELAYD_TRACE_CHUNK_EXISTS", conn);
3279 ret = relay_trace_chunk_exists(header, conn, payload);
3280 break;
3281 case RELAYD_GET_CONFIGURATION:
3282 DBG_CMD("RELAYD_GET_CONFIGURATION", conn);
3283 ret = relay_get_configuration(header, conn, payload);
3284 break;
3285 case RELAYD_UPDATE_SYNC_INFO:
3286 default:
3287 ERR("Received unknown command (%u)", header->cmd);
3288 relay_unknown_command(conn);
3289 ret = -1;
3290 goto end;
3291 }
3292
3293end:
3294 return ret;
3295}
3296
3297static enum relay_connection_status relay_process_control_receive_payload(
3298 struct relay_connection *conn)
3299{
3300 int ret = 0;
3301 enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK;
3302 struct lttng_dynamic_buffer *reception_buffer =
3303 &conn->protocol.ctrl.reception_buffer;
3304 struct ctrl_connection_state_receive_payload *state =
3305 &conn->protocol.ctrl.state.receive_payload;
3306 struct lttng_buffer_view payload_view;
3307
3308 if (state->left_to_receive == 0) {
3309 /* Short-circuit for payload-less commands. */
3310 goto reception_complete;
3311 }
3312
3313 ret = conn->sock->ops->recvmsg(conn->sock,
3314 reception_buffer->data + state->received,
3315 state->left_to_receive, MSG_DONTWAIT);
3316 if (ret < 0) {
3317 if (errno != EAGAIN && errno != EWOULDBLOCK) {
3318 PERROR("Unable to receive command payload on sock %d",
3319 conn->sock->fd);
3320 status = RELAY_CONNECTION_STATUS_ERROR;
3321 }
3322 goto end;
3323 } else if (ret == 0) {
3324 DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd);
3325 status = RELAY_CONNECTION_STATUS_CLOSED;
3326 goto end;
3327 }
3328
3329 assert(ret > 0);
3330 assert(ret <= state->left_to_receive);
3331
3332 state->left_to_receive -= ret;
3333 state->received += ret;
3334
3335 if (state->left_to_receive > 0) {
3336 /*
3337 * Can't transition to the protocol's next state, wait to
3338 * receive the rest of the header.
3339 */
3340 DBG3("Partial reception of control connection protocol payload (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)",
3341 state->received, state->left_to_receive,
3342 conn->sock->fd);
3343 goto end;
3344 }
3345
3346reception_complete:
3347 DBG("Done receiving control command payload: fd = %i, payload size = %" PRIu64 " bytes",
3348 conn->sock->fd, state->received);
3349 /*
3350 * The payload required to process the command has been received.
3351 * A view to the reception buffer is forwarded to the various
3352 * commands and the state of the control is reset on success.
3353 *
3354 * Commands are responsible for sending their reply to the peer.
3355 */
3356 payload_view = lttng_buffer_view_from_dynamic_buffer(reception_buffer,
3357 0, -1);
3358 ret = relay_process_control_command(conn,
3359 &state->header, &payload_view);
3360 if (ret < 0) {
3361 status = RELAY_CONNECTION_STATUS_ERROR;
3362 goto end;
3363 }
3364
3365 ret = connection_reset_protocol_state(conn);
3366 if (ret) {
3367 status = RELAY_CONNECTION_STATUS_ERROR;
3368 }
3369end:
3370 return status;
3371}
3372
3373static enum relay_connection_status relay_process_control_receive_header(
3374 struct relay_connection *conn)
3375{
3376 int ret = 0;
3377 enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK;
3378 struct lttcomm_relayd_hdr header;
3379 struct lttng_dynamic_buffer *reception_buffer =
3380 &conn->protocol.ctrl.reception_buffer;
3381 struct ctrl_connection_state_receive_header *state =
3382 &conn->protocol.ctrl.state.receive_header;
3383
3384 assert(state->left_to_receive != 0);
3385
3386 ret = conn->sock->ops->recvmsg(conn->sock,
3387 reception_buffer->data + state->received,
3388 state->left_to_receive, MSG_DONTWAIT);
3389 if (ret < 0) {
3390 if (errno != EAGAIN && errno != EWOULDBLOCK) {
3391 PERROR("Unable to receive control command header on sock %d",
3392 conn->sock->fd);
3393 status = RELAY_CONNECTION_STATUS_ERROR;
3394 }
3395 goto end;
3396 } else if (ret == 0) {
3397 DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd);
3398 status = RELAY_CONNECTION_STATUS_CLOSED;
3399 goto end;
3400 }
3401
3402 assert(ret > 0);
3403 assert(ret <= state->left_to_receive);
3404
3405 state->left_to_receive -= ret;
3406 state->received += ret;
3407
3408 if (state->left_to_receive > 0) {
3409 /*
3410 * Can't transition to the protocol's next state, wait to
3411 * receive the rest of the header.
3412 */
3413 DBG3("Partial reception of control connection protocol header (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)",
3414 state->received, state->left_to_receive,
3415 conn->sock->fd);
3416 goto end;
3417 }
3418
3419 /* Transition to next state: receiving the command's payload. */
3420 conn->protocol.ctrl.state_id =
3421 CTRL_CONNECTION_STATE_RECEIVE_PAYLOAD;
3422 memcpy(&header, reception_buffer->data, sizeof(header));
3423 header.circuit_id = be64toh(header.circuit_id);
3424 header.data_size = be64toh(header.data_size);
3425 header.cmd = be32toh(header.cmd);
3426 header.cmd_version = be32toh(header.cmd_version);
3427 memcpy(&conn->protocol.ctrl.state.receive_payload.header,
3428 &header, sizeof(header));
3429
3430 DBG("Done receiving control command header: fd = %i, cmd = %" PRIu32 ", cmd_version = %" PRIu32 ", payload size = %" PRIu64 " bytes",
3431 conn->sock->fd, header.cmd, header.cmd_version,
3432 header.data_size);
3433
3434 if (header.data_size > DEFAULT_NETWORK_RELAYD_CTRL_MAX_PAYLOAD_SIZE) {
3435 ERR("Command header indicates a payload (%" PRIu64 " bytes) that exceeds the maximal payload size allowed on a control connection.",
3436 header.data_size);
3437 status = RELAY_CONNECTION_STATUS_ERROR;
3438 goto end;
3439 }
3440
3441 conn->protocol.ctrl.state.receive_payload.left_to_receive =
3442 header.data_size;
3443 conn->protocol.ctrl.state.receive_payload.received = 0;
3444 ret = lttng_dynamic_buffer_set_size(reception_buffer,
3445 header.data_size);
3446 if (ret) {
3447 status = RELAY_CONNECTION_STATUS_ERROR;
3448 goto end;
3449 }
3450
3451 if (header.data_size == 0) {
3452 /*
3453 * Manually invoke the next state as the poll loop
3454 * will not wake-up to allow us to proceed further.
3455 */
3456 status = relay_process_control_receive_payload(conn);
3457 }
3458end:
3459 return status;
3460}
3461
3462/*
3463 * Process the commands received on the control socket
3464 */
3465static enum relay_connection_status relay_process_control(
3466 struct relay_connection *conn)
3467{
3468 enum relay_connection_status status;
3469
3470 switch (conn->protocol.ctrl.state_id) {
3471 case CTRL_CONNECTION_STATE_RECEIVE_HEADER:
3472 status = relay_process_control_receive_header(conn);
3473 break;
3474 case CTRL_CONNECTION_STATE_RECEIVE_PAYLOAD:
3475 status = relay_process_control_receive_payload(conn);
3476 break;
3477 default:
3478 ERR("Unknown control connection protocol state encountered.");
3479 abort();
3480 }
3481
3482 return status;
3483}
3484
3485static enum relay_connection_status relay_process_data_receive_header(
3486 struct relay_connection *conn)
3487{
3488 int ret;
3489 enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK;
3490 struct data_connection_state_receive_header *state =
3491 &conn->protocol.data.state.receive_header;
3492 struct lttcomm_relayd_data_hdr header;
3493 struct relay_stream *stream;
3494
3495 assert(state->left_to_receive != 0);
3496
3497 ret = conn->sock->ops->recvmsg(conn->sock,
3498 state->header_reception_buffer + state->received,
3499 state->left_to_receive, MSG_DONTWAIT);
3500 if (ret < 0) {
3501 if (errno != EAGAIN && errno != EWOULDBLOCK) {
3502 PERROR("Unable to receive data header on sock %d", conn->sock->fd);
3503 status = RELAY_CONNECTION_STATUS_ERROR;
3504 }
3505 goto end;
3506 } else if (ret == 0) {
3507 /* Orderly shutdown. Not necessary to print an error. */
3508 DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd);
3509 status = RELAY_CONNECTION_STATUS_CLOSED;
3510 goto end;
3511 }
3512
3513 assert(ret > 0);
3514 assert(ret <= state->left_to_receive);
3515
3516 state->left_to_receive -= ret;
3517 state->received += ret;
3518
3519 if (state->left_to_receive > 0) {
3520 /*
3521 * Can't transition to the protocol's next state, wait to
3522 * receive the rest of the header.
3523 */
3524 DBG3("Partial reception of data connection header (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)",
3525 state->received, state->left_to_receive,
3526 conn->sock->fd);
3527 goto end;
3528 }
3529
3530 /* Transition to next state: receiving the payload. */
3531 conn->protocol.data.state_id = DATA_CONNECTION_STATE_RECEIVE_PAYLOAD;
3532
3533 memcpy(&header, state->header_reception_buffer, sizeof(header));
3534 header.circuit_id = be64toh(header.circuit_id);
3535 header.stream_id = be64toh(header.stream_id);
3536 header.data_size = be32toh(header.data_size);
3537 header.net_seq_num = be64toh(header.net_seq_num);
3538 header.padding_size = be32toh(header.padding_size);
3539 memcpy(&conn->protocol.data.state.receive_payload.header, &header, sizeof(header));
3540
3541 conn->protocol.data.state.receive_payload.left_to_receive =
3542 header.data_size;
3543 conn->protocol.data.state.receive_payload.received = 0;
3544 conn->protocol.data.state.receive_payload.rotate_index = false;
3545
3546 DBG("Received data connection header on fd %i: circuit_id = %" PRIu64 ", stream_id = %" PRIu64 ", data_size = %" PRIu32 ", net_seq_num = %" PRIu64 ", padding_size = %" PRIu32,
3547 conn->sock->fd, header.circuit_id,
3548 header.stream_id, header.data_size,
3549 header.net_seq_num, header.padding_size);
3550
3551 stream = stream_get_by_id(header.stream_id);
3552 if (!stream) {
3553 DBG("relay_process_data_receive_payload: Cannot find stream %" PRIu64,
3554 header.stream_id);
3555 /* Protocol error. */
3556 status = RELAY_CONNECTION_STATUS_ERROR;
3557 goto end;
3558 }
3559
3560 pthread_mutex_lock(&stream->lock);
3561 /* Prepare stream for the reception of a new packet. */
3562 ret = stream_init_packet(stream, header.data_size,
3563 &conn->protocol.data.state.receive_payload.rotate_index);
3564 pthread_mutex_unlock(&stream->lock);
3565 if (ret) {
3566 ERR("Failed to rotate stream output file");
3567 status = RELAY_CONNECTION_STATUS_ERROR;
3568 goto end_stream_unlock;
3569 }
3570
3571end_stream_unlock:
3572 stream_put(stream);
3573end:
3574 return status;
3575}
3576
3577static enum relay_connection_status relay_process_data_receive_payload(
3578 struct relay_connection *conn)
3579{
3580 int ret;
3581 enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK;
3582 struct relay_stream *stream;
3583 struct data_connection_state_receive_payload *state =
3584 &conn->protocol.data.state.receive_payload;
3585 const size_t chunk_size = RECV_DATA_BUFFER_SIZE;
3586 char data_buffer[chunk_size];
3587 bool partial_recv = false;
3588 bool new_stream = false, close_requested = false, index_flushed = false;
3589 uint64_t left_to_receive = state->left_to_receive;
3590 struct relay_session *session;
3591
3592 DBG3("Receiving data for stream id %" PRIu64 " seqnum %" PRIu64 ", %" PRIu64" bytes received, %" PRIu64 " bytes left to receive",
3593 state->header.stream_id, state->header.net_seq_num,
3594 state->received, left_to_receive);
3595
3596 stream = stream_get_by_id(state->header.stream_id);
3597 if (!stream) {
3598 /* Protocol error. */
3599 ERR("relay_process_data_receive_payload: cannot find stream %" PRIu64,
3600 state->header.stream_id);
3601 status = RELAY_CONNECTION_STATUS_ERROR;
3602 goto end;
3603 }
3604
3605 pthread_mutex_lock(&stream->lock);
3606 session = stream->trace->session;
3607 if (!conn->session) {
3608 ret = connection_set_session(conn, session);
3609 if (ret) {
3610 status = RELAY_CONNECTION_STATUS_ERROR;
3611 goto end_stream_unlock;
3612 }
3613 }
3614
3615 /*
3616 * The size of the "chunk" received on any iteration is bounded by:
3617 * - the data left to receive,
3618 * - the data immediately available on the socket,
3619 * - the on-stack data buffer
3620 */
3621 while (left_to_receive > 0 && !partial_recv) {
3622 size_t recv_size = min(left_to_receive, chunk_size);
3623 struct lttng_buffer_view packet_chunk;
3624
3625 ret = conn->sock->ops->recvmsg(conn->sock, data_buffer,
3626 recv_size, MSG_DONTWAIT);
3627 if (ret < 0) {
3628 if (errno != EAGAIN && errno != EWOULDBLOCK) {
3629 PERROR("Socket %d error", conn->sock->fd);
3630 status = RELAY_CONNECTION_STATUS_ERROR;
3631 }
3632 goto end_stream_unlock;
3633 } else if (ret == 0) {
3634 /* No more data ready to be consumed on socket. */
3635 DBG3("No more data ready for consumption on data socket of stream id %" PRIu64,
3636 state->header.stream_id);
3637 status = RELAY_CONNECTION_STATUS_CLOSED;
3638 break;
3639 } else if (ret < (int) recv_size) {
3640 /*
3641 * All the data available on the socket has been
3642 * consumed.
3643 */
3644 partial_recv = true;
3645 recv_size = ret;
3646 }
3647
3648 packet_chunk = lttng_buffer_view_init(data_buffer,
3649 0, recv_size);
3650 assert(packet_chunk.data);
3651
3652 ret = stream_write(stream, &packet_chunk, 0);
3653 if (ret) {
3654 ERR("Relay error writing data to file");
3655 status = RELAY_CONNECTION_STATUS_ERROR;
3656 goto end_stream_unlock;
3657 }
3658
3659 left_to_receive -= recv_size;
3660 state->received += recv_size;
3661 state->left_to_receive = left_to_receive;
3662 }
3663
3664 if (state->left_to_receive > 0) {
3665 /*
3666 * Did not receive all the data expected, wait for more data to
3667 * become available on the socket.
3668 */
3669 DBG3("Partial receive on data connection of stream id %" PRIu64 ", %" PRIu64 " bytes received, %" PRIu64 " bytes left to receive",
3670 state->header.stream_id, state->received,
3671 state->left_to_receive);
3672 goto end_stream_unlock;
3673 }
3674
3675 ret = stream_write(stream, NULL, state->header.padding_size);
3676 if (ret) {
3677 status = RELAY_CONNECTION_STATUS_ERROR;
3678 goto end_stream_unlock;
3679 }
3680
3681 if (session_streams_have_index(session)) {
3682 ret = stream_update_index(stream, state->header.net_seq_num,
3683 state->rotate_index, &index_flushed,
3684 state->header.data_size + state->header.padding_size);
3685 if (ret < 0) {
3686 ERR("Failed to update index: stream %" PRIu64 " net_seq_num %" PRIu64 " ret %d",
3687 stream->stream_handle,
3688 state->header.net_seq_num, ret);
3689 status = RELAY_CONNECTION_STATUS_ERROR;
3690 goto end_stream_unlock;
3691 }
3692 }
3693
3694 if (stream->prev_data_seq == -1ULL) {
3695 new_stream = true;
3696 }
3697
3698 ret = stream_complete_packet(stream, state->header.data_size +
3699 state->header.padding_size, state->header.net_seq_num,
3700 index_flushed);
3701 if (ret) {
3702 status = RELAY_CONNECTION_STATUS_ERROR;
3703 goto end_stream_unlock;
3704 }
3705
3706 /*
3707 * Resetting the protocol state (to RECEIVE_HEADER) will trash the
3708 * contents of *state which are aliased (union) to the same location as
3709 * the new state. Don't use it beyond this point.
3710 */
3711 connection_reset_protocol_state(conn);
3712 state = NULL;
3713
3714end_stream_unlock:
3715 close_requested = stream->close_requested;
3716 pthread_mutex_unlock(&stream->lock);
3717 if (close_requested && left_to_receive == 0) {
3718 try_stream_close(stream);
3719 }
3720
3721 if (new_stream) {
3722 pthread_mutex_lock(&session->lock);
3723 uatomic_set(&session->new_streams, 1);
3724 pthread_mutex_unlock(&session->lock);
3725 }
3726
3727 stream_put(stream);
3728end:
3729 return status;
3730}
3731
3732/*
3733 * relay_process_data: Process the data received on the data socket
3734 */
3735static enum relay_connection_status relay_process_data(
3736 struct relay_connection *conn)
3737{
3738 enum relay_connection_status status;
3739
3740 switch (conn->protocol.data.state_id) {
3741 case DATA_CONNECTION_STATE_RECEIVE_HEADER:
3742 status = relay_process_data_receive_header(conn);
3743 break;
3744 case DATA_CONNECTION_STATE_RECEIVE_PAYLOAD:
3745 status = relay_process_data_receive_payload(conn);
3746 break;
3747 default:
3748 ERR("Unexpected data connection communication state.");
3749 abort();
3750 }
3751
3752 return status;
3753}
3754
3755static void cleanup_connection_pollfd(struct lttng_poll_event *events, int pollfd)
3756{
3757 int ret;
3758
3759 (void) lttng_poll_del(events, pollfd);
3760
3761 ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker, &pollfd, 1,
3762 fd_tracker_util_close_fd, NULL);
3763 if (ret < 0) {
3764 ERR("Closing pollfd %d", pollfd);
3765 }
3766}
3767
3768static void relay_thread_close_connection(struct lttng_poll_event *events,
3769 int pollfd, struct relay_connection *conn)
3770{
3771 const char *type_str;
3772
3773 switch (conn->type) {
3774 case RELAY_DATA:
3775 type_str = "Data";
3776 break;
3777 case RELAY_CONTROL:
3778 type_str = "Control";
3779 break;
3780 case RELAY_VIEWER_COMMAND:
3781 type_str = "Viewer Command";
3782 break;
3783 case RELAY_VIEWER_NOTIFICATION:
3784 type_str = "Viewer Notification";
3785 break;
3786 default:
3787 type_str = "Unknown";
3788 }
3789 cleanup_connection_pollfd(events, pollfd);
3790 connection_put(conn);
3791 DBG("%s connection closed with %d", type_str, pollfd);
3792}
3793
3794/*
3795 * This thread does the actual work
3796 */
3797static void *relay_thread_worker(void *data)
3798{
3799 int ret, err = -1, last_seen_data_fd = -1;
3800 uint32_t nb_fd;
3801 struct lttng_poll_event events;
3802 struct lttng_ht *relay_connections_ht;
3803 struct lttng_ht_iter iter;
3804 struct relay_connection *destroy_conn = NULL;
3805
3806 DBG("[thread] Relay worker started");
3807
3808 rcu_register_thread();
3809
3810 health_register(health_relayd, HEALTH_RELAYD_TYPE_WORKER);
3811
3812 if (testpoint(relayd_thread_worker)) {
3813 goto error_testpoint;
3814 }
3815
3816 health_code_update();
3817
3818 /* table of connections indexed on socket */
3819 relay_connections_ht = lttng_ht_new(0, LTTNG_HT_TYPE_ULONG);
3820 if (!relay_connections_ht) {
3821 goto relay_connections_ht_error;
3822 }
3823
3824 ret = create_named_thread_poll_set(&events, 2, "Worker thread epoll");
3825 if (ret < 0) {
3826 goto error_poll_create;
3827 }
3828
3829 ret = lttng_poll_add(&events, relay_conn_pipe[0], LPOLLIN | LPOLLRDHUP);
3830 if (ret < 0) {
3831 goto error;
3832 }
3833
3834restart:
3835 while (1) {
3836 int idx = -1, i, seen_control = 0, last_notdel_data_fd = -1;
3837
3838 health_code_update();
3839
3840 /* Infinite blocking call, waiting for transmission */
3841 DBG3("Relayd worker thread polling...");
3842 health_poll_entry();
3843 ret = lttng_poll_wait(&events, -1);
3844 health_poll_exit();
3845 if (ret < 0) {
3846 /*
3847 * Restart interrupted system call.
3848 */
3849 if (errno == EINTR) {
3850 goto restart;
3851 }
3852 goto error;
3853 }
3854
3855 nb_fd = ret;
3856
3857 /*
3858 * Process control. The control connection is
3859 * prioritized so we don't starve it with high
3860 * throughput tracing data on the data connection.
3861 */
3862 for (i = 0; i < nb_fd; i++) {
3863 /* Fetch once the poll data */
3864 uint32_t revents = LTTNG_POLL_GETEV(&events, i);
3865 int pollfd = LTTNG_POLL_GETFD(&events, i);
3866
3867 health_code_update();
3868
3869 /* Thread quit pipe has been closed. Killing thread. */
3870 ret = check_thread_quit_pipe(pollfd, revents);
3871 if (ret) {
3872 err = 0;
3873 goto exit;
3874 }
3875
3876 /* Inspect the relay conn pipe for new connection */
3877 if (pollfd == relay_conn_pipe[0]) {
3878 if (revents & LPOLLIN) {
3879 struct relay_connection *conn;
3880
3881 ret = lttng_read(relay_conn_pipe[0], &conn, sizeof(conn));
3882 if (ret < 0) {
3883 goto error;
3884 }
3885 ret = lttng_poll_add(&events,
3886 conn->sock->fd,
3887 LPOLLIN | LPOLLRDHUP);
3888 if (ret) {
3889 ERR("Failed to add new connection file descriptor to poll set");
3890 goto error;
3891 }
3892 connection_ht_add(relay_connections_ht, conn);
3893 DBG("Connection socket %d added", conn->sock->fd);
3894 } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
3895 ERR("Relay connection pipe error");
3896 goto error;
3897 } else {
3898 ERR("Unexpected poll events %u for sock %d", revents, pollfd);
3899 goto error;
3900 }
3901 } else {
3902 struct relay_connection *ctrl_conn;
3903
3904 ctrl_conn = connection_get_by_sock(relay_connections_ht, pollfd);
3905 /* If not found, there is a synchronization issue. */
3906 assert(ctrl_conn);
3907
3908 if (ctrl_conn->type == RELAY_DATA) {
3909 if (revents & LPOLLIN) {
3910 /*
3911 * Flag the last seen data fd not deleted. It will be
3912 * used as the last seen fd if any fd gets deleted in
3913 * this first loop.
3914 */
3915 last_notdel_data_fd = pollfd;
3916 }
3917 goto put_ctrl_connection;
3918 }
3919 assert(ctrl_conn->type == RELAY_CONTROL);
3920
3921 if (revents & LPOLLIN) {
3922 enum relay_connection_status status;
3923
3924 status = relay_process_control(ctrl_conn);
3925 if (status != RELAY_CONNECTION_STATUS_OK) {
3926 /*
3927 * On socket error flag the session as aborted to force
3928 * the cleanup of its stream otherwise it can leak
3929 * during the lifetime of the relayd.
3930 *
3931 * This prevents situations in which streams can be
3932 * left opened because an index was received, the
3933 * control connection is closed, and the data
3934 * connection is closed (uncleanly) before the packet's
3935 * data provided.
3936 *
3937 * Since the control connection encountered an error,
3938 * it is okay to be conservative and close the
3939 * session right now as we can't rely on the protocol
3940 * being respected anymore.
3941 */
3942 if (status == RELAY_CONNECTION_STATUS_ERROR) {
3943 session_abort(ctrl_conn->session);
3944 }
3945
3946 /* Clear the connection on error or close. */
3947 relay_thread_close_connection(&events,
3948 pollfd,
3949 ctrl_conn);
3950 }
3951 seen_control = 1;
3952 } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
3953 relay_thread_close_connection(&events,
3954 pollfd, ctrl_conn);
3955 if (last_seen_data_fd == pollfd) {
3956 last_seen_data_fd = last_notdel_data_fd;
3957 }
3958 } else {
3959 ERR("Unexpected poll events %u for control sock %d",
3960 revents, pollfd);
3961 connection_put(ctrl_conn);
3962 goto error;
3963 }
3964 put_ctrl_connection:
3965 connection_put(ctrl_conn);
3966 }
3967 }
3968
3969 /*
3970 * The last loop handled a control request, go back to poll to make
3971 * sure we prioritise the control socket.
3972 */
3973 if (seen_control) {
3974 continue;
3975 }
3976
3977 if (last_seen_data_fd >= 0) {
3978 for (i = 0; i < nb_fd; i++) {
3979 int pollfd = LTTNG_POLL_GETFD(&events, i);
3980
3981 health_code_update();
3982
3983 if (last_seen_data_fd == pollfd) {
3984 idx = i;
3985 break;
3986 }
3987 }
3988 }
3989
3990 /* Process data connection. */
3991 for (i = idx + 1; i < nb_fd; i++) {
3992 /* Fetch the poll data. */
3993 uint32_t revents = LTTNG_POLL_GETEV(&events, i);
3994 int pollfd = LTTNG_POLL_GETFD(&events, i);
3995 struct relay_connection *data_conn;
3996
3997 health_code_update();
3998
3999 if (!revents) {
4000 /* No activity for this FD (poll implementation). */
4001 continue;
4002 }
4003
4004 /* Skip the command pipe. It's handled in the first loop. */
4005 if (pollfd == relay_conn_pipe[0]) {
4006 continue;
4007 }
4008
4009 data_conn = connection_get_by_sock(relay_connections_ht, pollfd);
4010 if (!data_conn) {
4011 /* Skip it. Might be removed before. */
4012 continue;
4013 }
4014 if (data_conn->type == RELAY_CONTROL) {
4015 goto put_data_connection;
4016 }
4017 assert(data_conn->type == RELAY_DATA);
4018
4019 if (revents & LPOLLIN) {
4020 enum relay_connection_status status;
4021
4022 status = relay_process_data(data_conn);
4023 /* Connection closed or error. */
4024 if (status != RELAY_CONNECTION_STATUS_OK) {
4025 /*
4026 * On socket error flag the session as aborted to force
4027 * the cleanup of its stream otherwise it can leak
4028 * during the lifetime of the relayd.
4029 *
4030 * This prevents situations in which streams can be
4031 * left opened because an index was received, the
4032 * control connection is closed, and the data
4033 * connection is closed (uncleanly) before the packet's
4034 * data provided.
4035 *
4036 * Since the data connection encountered an error,
4037 * it is okay to be conservative and close the
4038 * session right now as we can't rely on the protocol
4039 * being respected anymore.
4040 */
4041 if (status == RELAY_CONNECTION_STATUS_ERROR) {
4042 session_abort(data_conn->session);
4043 }
4044 relay_thread_close_connection(&events, pollfd,
4045 data_conn);
4046 /*
4047 * Every goto restart call sets the last seen fd where
4048 * here we don't really care since we gracefully
4049 * continue the loop after the connection is deleted.
4050 */
4051 } else {
4052 /* Keep last seen port. */
4053 last_seen_data_fd = pollfd;
4054 connection_put(data_conn);
4055 goto restart;
4056 }
4057 } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
4058 relay_thread_close_connection(&events, pollfd,
4059 data_conn);
4060 } else {
4061 ERR("Unknown poll events %u for data sock %d",
4062 revents, pollfd);
4063 }
4064 put_data_connection:
4065 connection_put(data_conn);
4066 }
4067 last_seen_data_fd = -1;
4068 }
4069
4070 /* Normal exit, no error */
4071 ret = 0;
4072
4073exit:
4074error:
4075 /* Cleanup remaining connection object. */
4076 rcu_read_lock();
4077 cds_lfht_for_each_entry(relay_connections_ht->ht, &iter.iter,
4078 destroy_conn,
4079 sock_n.node) {
4080 health_code_update();
4081
4082 session_abort(destroy_conn->session);
4083
4084 /*
4085 * No need to grab another ref, because we own
4086 * destroy_conn.
4087 */
4088 relay_thread_close_connection(&events, destroy_conn->sock->fd,
4089 destroy_conn);
4090 }
4091 rcu_read_unlock();
4092
4093 (void) fd_tracker_util_poll_clean(the_fd_tracker, &events);
4094error_poll_create:
4095 lttng_ht_destroy(relay_connections_ht);
4096relay_connections_ht_error:
4097 /* Close relay conn pipes */
4098 (void) fd_tracker_util_pipe_close(the_fd_tracker,
4099 relay_conn_pipe);
4100 if (err) {
4101 DBG("Thread exited with error");
4102 }
4103 DBG("Worker thread cleanup complete");
4104error_testpoint:
4105 if (err) {
4106 health_error();
4107 ERR("Health error occurred in %s", __func__);
4108 }
4109 health_unregister(health_relayd);
4110 rcu_unregister_thread();
4111 lttng_relay_stop_threads();
4112 return NULL;
4113}
4114
4115/*
4116 * Create the relay command pipe to wake thread_manage_apps.
4117 * Closed in cleanup().
4118 */
4119static int create_relay_conn_pipe(void)
4120{
4121 return fd_tracker_util_pipe_open_cloexec(the_fd_tracker,
4122 "Relayd connection pipe", relay_conn_pipe);
4123}
4124
4125static int stdio_open(void *data, int *fds)
4126{
4127 fds[0] = fileno(stdout);
4128 fds[1] = fileno(stderr);
4129 return 0;
4130}
4131
4132static int track_stdio(void)
4133{
4134 int fds[2];
4135 const char *names[] = { "stdout", "stderr" };
4136
4137 return fd_tracker_open_unsuspendable_fd(the_fd_tracker, fds,
4138 names, 2, stdio_open, NULL);
4139}
4140
4141/*
4142 * main
4143 */
4144int main(int argc, char **argv)
4145{
4146 bool thread_is_rcu_registered = false;
4147 int ret = 0, retval = 0;
4148 void *status;
4149 char *unlinked_file_directory_path = NULL, *output_path = NULL;
4150
4151 /* Parse environment variables */
4152 ret = parse_env_options();
4153 if (ret) {
4154 retval = -1;
4155 goto exit_options;
4156 }
4157
4158 /*
4159 * Parse arguments.
4160 * Command line arguments overwrite environment.
4161 */
4162 progname = argv[0];
4163 if (set_options(argc, argv)) {
4164 retval = -1;
4165 goto exit_options;
4166 }
4167
4168 if (set_signal_handler()) {
4169 retval = -1;
4170 goto exit_options;
4171 }
4172
4173 relayd_config_log();
4174
4175 if (opt_print_version) {
4176 print_version();
4177 retval = 0;
4178 goto exit_options;
4179 }
4180
4181 ret = fclose(stdin);
4182 if (ret) {
4183 PERROR("Failed to close stdin");
4184 goto exit_options;
4185 }
4186
4187 DBG("Clear command %s", opt_allow_clear ? "allowed" : "disallowed");
4188
4189 /* Try to create directory if -o, --output is specified. */
4190 if (opt_output_path) {
4191 if (*opt_output_path != '/') {
4192 ERR("Please specify an absolute path for -o, --output PATH");
4193 retval = -1;
4194 goto exit_options;
4195 }
4196
4197 ret = utils_mkdir_recursive(opt_output_path, S_IRWXU | S_IRWXG,
4198 -1, -1);
4199 if (ret < 0) {
4200 ERR("Unable to create %s", opt_output_path);
4201 retval = -1;
4202 goto exit_options;
4203 }
4204 }
4205
4206 /* Daemonize */
4207 if (opt_daemon || opt_background) {
4208 ret = lttng_daemonize(&child_ppid, &recv_child_signal,
4209 !opt_background);
4210 if (ret < 0) {
4211 retval = -1;
4212 goto exit_options;
4213 }
4214 }
4215
4216 if (opt_working_directory) {
4217 ret = utils_change_working_directory(opt_working_directory);
4218 if (ret) {
4219 /* All errors are already logged. */
4220 goto exit_options;
4221 }
4222 }
4223
4224 sessiond_trace_chunk_registry = sessiond_trace_chunk_registry_create();
4225 if (!sessiond_trace_chunk_registry) {
4226 ERR("Failed to initialize session daemon trace chunk registry");
4227 retval = -1;
4228 goto exit_options;
4229 }
4230
4231 /*
4232 * The RCU thread registration (and use, through the fd-tracker's
4233 * creation) is done after the daemonization to allow us to not
4234 * deal with liburcu's fork() management as the call RCU needs to
4235 * be restored.
4236 */
4237 rcu_register_thread();
4238 thread_is_rcu_registered = true;
4239
4240 output_path = create_output_path("");
4241 if (!output_path) {
4242 ERR("Failed to get output path");
4243 retval = -1;
4244 goto exit_options;
4245 }
4246 ret = asprintf(&unlinked_file_directory_path, "%s/%s", output_path,
4247 DEFAULT_UNLINKED_FILES_DIRECTORY);
4248 free(output_path);
4249 if (ret < 0) {
4250 ERR("Failed to format unlinked file directory path");
4251 retval = -1;
4252 goto exit_options;
4253 }
4254 the_fd_tracker = fd_tracker_create(
4255 unlinked_file_directory_path, lttng_opt_fd_pool_size);
4256 free(unlinked_file_directory_path);
4257 if (!the_fd_tracker) {
4258 retval = -1;
4259 goto exit_options;
4260 }
4261
4262 ret = track_stdio();
4263 if (ret) {
4264 retval = -1;
4265 goto exit_options;
4266 }
4267
4268 /* Initialize thread health monitoring */
4269 health_relayd = health_app_create(NR_HEALTH_RELAYD_TYPES);
4270 if (!health_relayd) {
4271 PERROR("health_app_create error");
4272 retval = -1;
4273 goto exit_options;
4274 }
4275
4276 /* Create thread quit pipe */
4277 if (init_thread_quit_pipe()) {
4278 retval = -1;
4279 goto exit_options;
4280 }
4281
4282 /* Setup the thread apps communication pipe. */
4283 if (create_relay_conn_pipe()) {
4284 retval = -1;
4285 goto exit_options;
4286 }
4287
4288 /* Init relay command queue. */
4289 cds_wfcq_init(&relay_conn_queue.head, &relay_conn_queue.tail);
4290
4291 /* Initialize communication library */
4292 lttcomm_init();
4293 lttcomm_inet_init();
4294
4295 /* tables of sessions indexed by session ID */
4296 sessions_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64);
4297 if (!sessions_ht) {
4298 retval = -1;
4299 goto exit_options;
4300 }
4301
4302 /* tables of streams indexed by stream ID */
4303 relay_streams_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64);
4304 if (!relay_streams_ht) {
4305 retval = -1;
4306 goto exit_options;
4307 }
4308
4309 /* tables of streams indexed by stream ID */
4310 viewer_streams_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64);
4311 if (!viewer_streams_ht) {
4312 retval = -1;
4313 goto exit_options;
4314 }
4315
4316 ret = init_health_quit_pipe();
4317 if (ret) {
4318 retval = -1;
4319 goto exit_options;
4320 }
4321
4322 /* Create thread to manage the client socket */
4323 ret = pthread_create(&health_thread, default_pthread_attr(),
4324 thread_manage_health, (void *) NULL);
4325 if (ret) {
4326 errno = ret;
4327 PERROR("pthread_create health");
4328 retval = -1;
4329 goto exit_options;
4330 }
4331
4332 /* Setup the dispatcher thread */
4333 ret = pthread_create(&dispatcher_thread, default_pthread_attr(),
4334 relay_thread_dispatcher, (void *) NULL);
4335 if (ret) {
4336 errno = ret;
4337 PERROR("pthread_create dispatcher");
4338 retval = -1;
4339 goto exit_dispatcher_thread;
4340 }
4341
4342 /* Setup the worker thread */
4343 ret = pthread_create(&worker_thread, default_pthread_attr(),
4344 relay_thread_worker, NULL);
4345 if (ret) {
4346 errno = ret;
4347 PERROR("pthread_create worker");
4348 retval = -1;
4349 goto exit_worker_thread;
4350 }
4351
4352 /* Setup the listener thread */
4353 ret = pthread_create(&listener_thread, default_pthread_attr(),
4354 relay_thread_listener, (void *) NULL);
4355 if (ret) {
4356 errno = ret;
4357 PERROR("pthread_create listener");
4358 retval = -1;
4359 goto exit_listener_thread;
4360 }
4361
4362 ret = relayd_live_create(live_uri);
4363 if (ret) {
4364 ERR("Starting live viewer threads");
4365 retval = -1;
4366 goto exit_live;
4367 }
4368
4369 /*
4370 * This is where we start awaiting program completion (e.g. through
4371 * signal that asks threads to teardown).
4372 */
4373
4374 ret = relayd_live_join();
4375 if (ret) {
4376 retval = -1;
4377 }
4378exit_live:
4379
4380 ret = pthread_join(listener_thread, &status);
4381 if (ret) {
4382 errno = ret;
4383 PERROR("pthread_join listener_thread");
4384 retval = -1;
4385 }
4386
4387exit_listener_thread:
4388 ret = pthread_join(worker_thread, &status);
4389 if (ret) {
4390 errno = ret;
4391 PERROR("pthread_join worker_thread");
4392 retval = -1;
4393 }
4394
4395exit_worker_thread:
4396 ret = pthread_join(dispatcher_thread, &status);
4397 if (ret) {
4398 errno = ret;
4399 PERROR("pthread_join dispatcher_thread");
4400 retval = -1;
4401 }
4402exit_dispatcher_thread:
4403
4404 ret = pthread_join(health_thread, &status);
4405 if (ret) {
4406 errno = ret;
4407 PERROR("pthread_join health_thread");
4408 retval = -1;
4409 }
4410exit_options:
4411 /*
4412 * Wait for all pending call_rcu work to complete before tearing
4413 * down data structures. call_rcu worker may be trying to
4414 * perform lookups in those structures.
4415 */
4416 rcu_barrier();
4417 relayd_cleanup();
4418
4419 /* Ensure all prior call_rcu are done. */
4420 rcu_barrier();
4421
4422 if (thread_is_rcu_registered) {
4423 rcu_unregister_thread();
4424 }
4425
4426 if (!retval) {
4427 exit(EXIT_SUCCESS);
4428 } else {
4429 exit(EXIT_FAILURE);
4430 }
4431}
This page took 0.125566 seconds and 5 git commands to generate.