relayd: share the same output directory handle accross sessions
[lttng-tools.git] / src / bin / lttng-relayd / main.c
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
87 static const char *help_msg =
88 #ifdef LTTNG_EMBED_HELP
89 #include <lttng-relayd.8.h>
90 #else
91 NULL
92 #endif
93 ;
94
95 enum 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 */
104 char *opt_output_path, *opt_working_directory;
105 static int opt_daemon, opt_background, opt_print_version, opt_allow_clear = 1;
106 enum 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
113 static int lttng_relay_ready = NR_LTTNG_RELAY_READY;
114
115 /* Size of receive buffer. */
116 #define RECV_DATA_BUFFER_SIZE 65536
117
118 static int recv_child_signal; /* Set to 1 when a SIGUSR1 signal is received. */
119 static pid_t child_ppid; /* Internal parent PID use with daemonize. */
120
121 static struct lttng_uri *control_uri;
122 static struct lttng_uri *data_uri;
123 static struct lttng_uri *live_uri;
124
125 const char *progname;
126
127 const char *tracing_group_name = DEFAULT_TRACING_GROUP;
128 static int tracing_group_name_override;
129
130 const 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 */
136 int 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 */
142 static int relay_conn_pipe[2] = { -1, -1 };
143
144 /* Shared between threads */
145 static int dispatch_thread_exit;
146
147 static pthread_t listener_thread;
148 static pthread_t dispatcher_thread;
149 static pthread_t worker_thread;
150 static 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 */
156 static pthread_mutex_t last_relay_stream_id_lock = PTHREAD_MUTEX_INITIALIZER;
157 static 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 */
165 static struct relay_conn_queue relay_conn_queue;
166
167 /* Cap of file desriptors to be in simultaneous use by the relay daemon. */
168 static unsigned int lttng_opt_fd_pool_size = -1;
169
170 /* Global relay stream hash table. */
171 struct lttng_ht *relay_streams_ht;
172
173 /* Global relay viewer stream hash table. */
174 struct lttng_ht *viewer_streams_ht;
175
176 /* Global relay sessions hash table. */
177 struct lttng_ht *sessions_ht;
178
179 /* Relayd health monitoring */
180 struct health_app *health_relayd;
181
182 struct sessiond_trace_chunk_registry *sessiond_trace_chunk_registry;
183
184 /* Global fd tracker. */
185 struct fd_tracker *the_fd_tracker;
186
187 static 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
207 static const char *config_ignore_options[] = { "help", "config", "version" };
208
209 static void print_version(void) {
210 fprintf(stdout, "%s\n", VERSION);
211 }
212
213 static 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 */
232 static 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
402 end:
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 */
411 static 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
457 end:
458 return ret;
459 }
460
461 static 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
478 static 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;
524 end:
525 return ret;
526 }
527
528 static 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
668 exit:
669 free(optstring);
670 return retval;
671 }
672
673 static void print_global_objects(void)
674 {
675 print_viewer_streams();
676 print_relay_streams();
677 print_sessions();
678 }
679
680 static int noop_close(void *data, int *fds)
681 {
682 return 0;
683 }
684
685 static 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 */
700 static 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 */
753 static 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;
763 end:
764 return ret;
765 }
766
767 static 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;
777 end:
778 return ret;
779 }
780
781 /*
782 * Stop all relayd and relayd-live threads.
783 */
784 int 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 */
816 static 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 */
843 static 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
884 void 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 */
899 static 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 */
910 static 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 */
919 static 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
940 error:
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 */
949 static 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
958 static 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;
969 end:
970 return ret;
971 }
972
973 static int close_sock(void *data, int *in_fd)
974 {
975 struct lttcomm_sock *sock = data;
976
977 return sock->ops->close(sock);
978 }
979
980 /*
981 * Create and init socket from uri.
982 */
983 static struct lttcomm_sock *relay_socket_create(struct lttng_uri *uri,
984 const char *name)
985 {
986 int ret, sock_fd;
987 struct lttcomm_sock *sock = NULL;
988 char uri_str[PATH_MAX];
989 char *formated_name = NULL;
990
991 sock = lttcomm_alloc_sock_from_uri(uri);
992 if (sock == NULL) {
993 ERR("Allocating socket");
994 goto error;
995 }
996
997 /*
998 * Don't fail to create the socket if the name can't be built as it is
999 * only used for debugging purposes.
1000 */
1001 ret = uri_to_str_url(uri, uri_str, sizeof(uri_str));
1002 uri_str[sizeof(uri_str) - 1] = '\0';
1003 if (ret >= 0) {
1004 ret = asprintf(&formated_name, "%s socket @ %s", name,
1005 uri_str);
1006 if (ret < 0) {
1007 formated_name = NULL;
1008 }
1009 }
1010
1011 ret = fd_tracker_open_unsuspendable_fd(the_fd_tracker, &sock_fd,
1012 (const char **) (formated_name ? &formated_name : NULL),
1013 1, create_sock, sock);
1014 free(formated_name);
1015 DBG("Listening on %s socket %d", name, sock->fd);
1016
1017 ret = sock->ops->bind(sock);
1018 if (ret < 0) {
1019 PERROR("Failed to bind socket");
1020 goto error;
1021 }
1022
1023 ret = sock->ops->listen(sock, -1);
1024 if (ret < 0) {
1025 goto error;
1026
1027 }
1028
1029 return sock;
1030
1031 error:
1032 if (sock) {
1033 lttcomm_destroy_sock(sock);
1034 }
1035 return NULL;
1036 }
1037
1038 /*
1039 * This thread manages the listening for new connections on the network
1040 */
1041 static void *relay_thread_listener(void *data)
1042 {
1043 int i, ret, pollfd, err = -1;
1044 uint32_t revents, nb_fd;
1045 struct lttng_poll_event events;
1046 struct lttcomm_sock *control_sock, *data_sock;
1047
1048 DBG("[thread] Relay listener started");
1049
1050 health_register(health_relayd, HEALTH_RELAYD_TYPE_LISTENER);
1051
1052 health_code_update();
1053
1054 control_sock = relay_socket_create(control_uri, "Control listener");
1055 if (!control_sock) {
1056 goto error_sock_control;
1057 }
1058
1059 data_sock = relay_socket_create(data_uri, "Data listener");
1060 if (!data_sock) {
1061 goto error_sock_relay;
1062 }
1063
1064 /*
1065 * Pass 3 as size here for the thread quit pipe, control and
1066 * data socket.
1067 */
1068 ret = create_named_thread_poll_set(&events, 3, "Listener thread epoll");
1069 if (ret < 0) {
1070 goto error_create_poll;
1071 }
1072
1073 /* Add the control socket */
1074 ret = lttng_poll_add(&events, control_sock->fd, LPOLLIN | LPOLLRDHUP);
1075 if (ret < 0) {
1076 goto error_poll_add;
1077 }
1078
1079 /* Add the data socket */
1080 ret = lttng_poll_add(&events, data_sock->fd, LPOLLIN | LPOLLRDHUP);
1081 if (ret < 0) {
1082 goto error_poll_add;
1083 }
1084
1085 lttng_relay_notify_ready();
1086
1087 if (testpoint(relayd_thread_listener)) {
1088 goto error_testpoint;
1089 }
1090
1091 while (1) {
1092 health_code_update();
1093
1094 DBG("Listener accepting connections");
1095
1096 restart:
1097 health_poll_entry();
1098 ret = lttng_poll_wait(&events, -1);
1099 health_poll_exit();
1100 if (ret < 0) {
1101 /*
1102 * Restart interrupted system call.
1103 */
1104 if (errno == EINTR) {
1105 goto restart;
1106 }
1107 goto error;
1108 }
1109
1110 nb_fd = ret;
1111
1112 DBG("Relay new connection received");
1113 for (i = 0; i < nb_fd; i++) {
1114 health_code_update();
1115
1116 /* Fetch once the poll data */
1117 revents = LTTNG_POLL_GETEV(&events, i);
1118 pollfd = LTTNG_POLL_GETFD(&events, i);
1119
1120 /* Thread quit pipe has been closed. Killing thread. */
1121 ret = check_thread_quit_pipe(pollfd, revents);
1122 if (ret) {
1123 err = 0;
1124 goto exit;
1125 }
1126
1127 if (revents & LPOLLIN) {
1128 /*
1129 * A new connection is requested, therefore a
1130 * sessiond/consumerd connection is allocated in
1131 * this thread, enqueued to a global queue and
1132 * dequeued (and freed) in the worker thread.
1133 */
1134 int val = 1;
1135 struct relay_connection *new_conn;
1136 struct lttcomm_sock *newsock;
1137 enum connection_type type;
1138
1139 if (pollfd == data_sock->fd) {
1140 type = RELAY_DATA;
1141 newsock = data_sock->ops->accept(data_sock);
1142 DBG("Relay data connection accepted, socket %d",
1143 newsock->fd);
1144 } else {
1145 assert(pollfd == control_sock->fd);
1146 type = RELAY_CONTROL;
1147 newsock = control_sock->ops->accept(control_sock);
1148 DBG("Relay control connection accepted, socket %d",
1149 newsock->fd);
1150 }
1151 if (!newsock) {
1152 PERROR("accepting sock");
1153 goto error;
1154 }
1155
1156 ret = setsockopt(newsock->fd, SOL_SOCKET, SO_REUSEADDR, &val,
1157 sizeof(val));
1158 if (ret < 0) {
1159 PERROR("setsockopt inet");
1160 lttcomm_destroy_sock(newsock);
1161 goto error;
1162 }
1163
1164 ret = socket_apply_keep_alive_config(newsock->fd);
1165 if (ret < 0) {
1166 ERR("Failed to apply TCP keep-alive configuration on socket (%i)",
1167 newsock->fd);
1168 lttcomm_destroy_sock(newsock);
1169 goto error;
1170 }
1171
1172 new_conn = connection_create(newsock, type);
1173 if (!new_conn) {
1174 lttcomm_destroy_sock(newsock);
1175 goto error;
1176 }
1177
1178 /* Enqueue request for the dispatcher thread. */
1179 cds_wfcq_enqueue(&relay_conn_queue.head, &relay_conn_queue.tail,
1180 &new_conn->qnode);
1181
1182 /*
1183 * Wake the dispatch queue futex.
1184 * Implicit memory barrier with the
1185 * exchange in cds_wfcq_enqueue.
1186 */
1187 futex_nto1_wake(&relay_conn_queue.futex);
1188 } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) {
1189 ERR("socket poll error");
1190 goto error;
1191 } else {
1192 ERR("Unexpected poll events %u for sock %d", revents, pollfd);
1193 goto error;
1194 }
1195 }
1196 }
1197
1198 exit:
1199 error:
1200 error_poll_add:
1201 error_testpoint:
1202 (void) fd_tracker_util_poll_clean(the_fd_tracker, &events);
1203 error_create_poll:
1204 if (data_sock->fd >= 0) {
1205 int data_sock_fd = data_sock->fd;
1206
1207 ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker,
1208 &data_sock_fd, 1, close_sock,
1209 data_sock);
1210 if (ret) {
1211 PERROR("Failed to close the data listener socket file descriptor");
1212 }
1213 data_sock->fd = -1;
1214 }
1215 lttcomm_destroy_sock(data_sock);
1216 error_sock_relay:
1217 if (control_sock->fd >= 0) {
1218 int control_sock_fd = control_sock->fd;
1219
1220 ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker,
1221 &control_sock_fd, 1, close_sock,
1222 control_sock);
1223 if (ret) {
1224 PERROR("Failed to close the control listener socket file descriptor");
1225 }
1226 control_sock->fd = -1;
1227 }
1228 lttcomm_destroy_sock(control_sock);
1229 error_sock_control:
1230 if (err) {
1231 health_error();
1232 ERR("Health error occurred in %s", __func__);
1233 }
1234 health_unregister(health_relayd);
1235 DBG("Relay listener thread cleanup complete");
1236 lttng_relay_stop_threads();
1237 return NULL;
1238 }
1239
1240 /*
1241 * This thread manages the dispatching of the requests to worker threads
1242 */
1243 static void *relay_thread_dispatcher(void *data)
1244 {
1245 int err = -1;
1246 ssize_t ret;
1247 struct cds_wfcq_node *node;
1248 struct relay_connection *new_conn = NULL;
1249
1250 DBG("[thread] Relay dispatcher started");
1251
1252 health_register(health_relayd, HEALTH_RELAYD_TYPE_DISPATCHER);
1253
1254 if (testpoint(relayd_thread_dispatcher)) {
1255 goto error_testpoint;
1256 }
1257
1258 health_code_update();
1259
1260 for (;;) {
1261 health_code_update();
1262
1263 /* Atomically prepare the queue futex */
1264 futex_nto1_prepare(&relay_conn_queue.futex);
1265
1266 if (CMM_LOAD_SHARED(dispatch_thread_exit)) {
1267 break;
1268 }
1269
1270 do {
1271 health_code_update();
1272
1273 /* Dequeue commands */
1274 node = cds_wfcq_dequeue_blocking(&relay_conn_queue.head,
1275 &relay_conn_queue.tail);
1276 if (node == NULL) {
1277 DBG("Woken up but nothing in the relay command queue");
1278 /* Continue thread execution */
1279 break;
1280 }
1281 new_conn = caa_container_of(node, struct relay_connection, qnode);
1282
1283 DBG("Dispatching request waiting on sock %d", new_conn->sock->fd);
1284
1285 /*
1286 * Inform worker thread of the new request. This
1287 * call is blocking so we can be assured that
1288 * the data will be read at some point in time
1289 * or wait to the end of the world :)
1290 */
1291 ret = lttng_write(relay_conn_pipe[1], &new_conn, sizeof(new_conn));
1292 if (ret < 0) {
1293 PERROR("write connection pipe");
1294 connection_put(new_conn);
1295 goto error;
1296 }
1297 } while (node != NULL);
1298
1299 /* Futex wait on queue. Blocking call on futex() */
1300 health_poll_entry();
1301 futex_nto1_wait(&relay_conn_queue.futex);
1302 health_poll_exit();
1303 }
1304
1305 /* Normal exit, no error */
1306 err = 0;
1307
1308 error:
1309 error_testpoint:
1310 if (err) {
1311 health_error();
1312 ERR("Health error occurred in %s", __func__);
1313 }
1314 health_unregister(health_relayd);
1315 DBG("Dispatch thread dying");
1316 lttng_relay_stop_threads();
1317 return NULL;
1318 }
1319
1320 static bool session_streams_have_index(const struct relay_session *session)
1321 {
1322 return session->minor >= 4 && !session->snapshot;
1323 }
1324
1325 /*
1326 * Handle the RELAYD_CREATE_SESSION command.
1327 *
1328 * On success, send back the session id or else return a negative value.
1329 */
1330 static int relay_create_session(const struct lttcomm_relayd_hdr *recv_hdr,
1331 struct relay_connection *conn,
1332 const struct lttng_buffer_view *payload)
1333 {
1334 int ret = 0;
1335 ssize_t send_ret;
1336 struct relay_session *session = NULL;
1337 struct lttcomm_relayd_create_session_reply_2_11 reply = {};
1338 char session_name[LTTNG_NAME_MAX] = {};
1339 char hostname[LTTNG_HOST_NAME_MAX] = {};
1340 uint32_t live_timer = 0;
1341 bool snapshot = false;
1342 bool session_name_contains_creation_timestamp = false;
1343 /* Left nil for peers < 2.11. */
1344 char base_path[LTTNG_PATH_MAX] = {};
1345 lttng_uuid sessiond_uuid = {};
1346 LTTNG_OPTIONAL(uint64_t) id_sessiond = {};
1347 LTTNG_OPTIONAL(uint64_t) current_chunk_id = {};
1348 LTTNG_OPTIONAL(time_t) creation_time = {};
1349 struct lttng_dynamic_buffer reply_payload;
1350
1351 lttng_dynamic_buffer_init(&reply_payload);
1352
1353 if (conn->minor < 4) {
1354 /* From 2.1 to 2.3 */
1355 ret = 0;
1356 } else if (conn->minor >= 4 && conn->minor < 11) {
1357 /* From 2.4 to 2.10 */
1358 ret = cmd_create_session_2_4(payload, session_name,
1359 hostname, &live_timer, &snapshot);
1360 } else {
1361 bool has_current_chunk;
1362 uint64_t current_chunk_id_value;
1363 time_t creation_time_value;
1364 uint64_t id_sessiond_value;
1365
1366 /* From 2.11 to ... */
1367 ret = cmd_create_session_2_11(payload, session_name, hostname,
1368 base_path, &live_timer, &snapshot, &id_sessiond_value,
1369 sessiond_uuid, &has_current_chunk,
1370 &current_chunk_id_value, &creation_time_value,
1371 &session_name_contains_creation_timestamp);
1372 if (lttng_uuid_is_nil(sessiond_uuid)) {
1373 /* The nil UUID is reserved for pre-2.11 clients. */
1374 ERR("Illegal nil UUID announced by peer in create session command");
1375 ret = -1;
1376 goto send_reply;
1377 }
1378 LTTNG_OPTIONAL_SET(&id_sessiond, id_sessiond_value);
1379 LTTNG_OPTIONAL_SET(&creation_time, creation_time_value);
1380 if (has_current_chunk) {
1381 LTTNG_OPTIONAL_SET(&current_chunk_id,
1382 current_chunk_id_value);
1383 }
1384 }
1385
1386 if (ret < 0) {
1387 goto send_reply;
1388 }
1389
1390 session = session_create(session_name, hostname, base_path, live_timer,
1391 snapshot, sessiond_uuid,
1392 id_sessiond.is_set ? &id_sessiond.value : NULL,
1393 current_chunk_id.is_set ? &current_chunk_id.value : NULL,
1394 creation_time.is_set ? &creation_time.value : NULL,
1395 conn->major, conn->minor,
1396 session_name_contains_creation_timestamp);
1397 if (!session) {
1398 ret = -1;
1399 goto send_reply;
1400 }
1401 assert(!conn->session);
1402 conn->session = session;
1403 DBG("Created session %" PRIu64, session->id);
1404
1405 reply.generic.session_id = htobe64(session->id);
1406
1407 send_reply:
1408 if (ret < 0) {
1409 reply.generic.ret_code = htobe32(LTTNG_ERR_FATAL);
1410 } else {
1411 reply.generic.ret_code = htobe32(LTTNG_OK);
1412 }
1413
1414 if (conn->minor < 11) {
1415 /* From 2.1 to 2.10 */
1416 ret = lttng_dynamic_buffer_append(&reply_payload,
1417 &reply.generic, sizeof(reply.generic));
1418 if (ret) {
1419 ERR("Failed to append \"create session\" command reply header to payload buffer");
1420 ret = -1;
1421 goto end;
1422 }
1423 } else {
1424 const uint32_t output_path_length =
1425 session ? strlen(session->output_path) + 1 : 0;
1426
1427 reply.output_path_length = htobe32(output_path_length);
1428 ret = lttng_dynamic_buffer_append(
1429 &reply_payload, &reply, sizeof(reply));
1430 if (ret) {
1431 ERR("Failed to append \"create session\" command reply header to payload buffer");
1432 goto end;
1433 }
1434
1435 if (output_path_length) {
1436 ret = lttng_dynamic_buffer_append(&reply_payload,
1437 session->output_path,
1438 output_path_length);
1439 if (ret) {
1440 ERR("Failed to append \"create session\" command reply path to payload buffer");
1441 goto end;
1442 }
1443 }
1444 }
1445
1446 send_ret = conn->sock->ops->sendmsg(conn->sock, reply_payload.data,
1447 reply_payload.size, 0);
1448 if (send_ret < (ssize_t) reply_payload.size) {
1449 ERR("Failed to send \"create session\" command reply of %zu bytes (ret = %zd)",
1450 reply_payload.size, send_ret);
1451 ret = -1;
1452 }
1453 end:
1454 if (ret < 0 && session) {
1455 session_put(session);
1456 }
1457 lttng_dynamic_buffer_reset(&reply_payload);
1458 return ret;
1459 }
1460
1461 /*
1462 * When we have received all the streams and the metadata for a channel,
1463 * we make them visible to the viewer threads.
1464 */
1465 static void publish_connection_local_streams(struct relay_connection *conn)
1466 {
1467 struct relay_stream *stream;
1468 struct relay_session *session = conn->session;
1469
1470 /*
1471 * We publish all streams belonging to a session atomically wrt
1472 * session lock.
1473 */
1474 pthread_mutex_lock(&session->lock);
1475 rcu_read_lock();
1476 cds_list_for_each_entry_rcu(stream, &session->recv_list,
1477 recv_node) {
1478 stream_publish(stream);
1479 }
1480 rcu_read_unlock();
1481
1482 /*
1483 * Inform the viewer that there are new streams in the session.
1484 */
1485 if (session->viewer_attached) {
1486 uatomic_set(&session->new_streams, 1);
1487 }
1488 pthread_mutex_unlock(&session->lock);
1489 }
1490
1491 static int conform_channel_path(char *channel_path)
1492 {
1493 int ret = 0;
1494
1495 if (strstr("../", channel_path)) {
1496 ERR("Refusing channel path as it walks up the path hierarchy: \"%s\"",
1497 channel_path);
1498 ret = -1;
1499 goto end;
1500 }
1501
1502 if (*channel_path == '/') {
1503 const size_t len = strlen(channel_path);
1504
1505 /*
1506 * Channel paths from peers prior to 2.11 are expressed as an
1507 * absolute path that is, in reality, relative to the relay
1508 * daemon's output directory. Remove the leading slash so it
1509 * is correctly interpreted as a relative path later on.
1510 *
1511 * len (and not len - 1) is used to copy the trailing NULL.
1512 */
1513 bcopy(channel_path + 1, channel_path, len);
1514 }
1515 end:
1516 return ret;
1517 }
1518
1519 /*
1520 * relay_add_stream: allocate a new stream for a session
1521 */
1522 static int relay_add_stream(const struct lttcomm_relayd_hdr *recv_hdr,
1523 struct relay_connection *conn,
1524 const struct lttng_buffer_view *payload)
1525 {
1526 int ret;
1527 ssize_t send_ret;
1528 struct relay_session *session = conn->session;
1529 struct relay_stream *stream = NULL;
1530 struct lttcomm_relayd_status_stream reply;
1531 struct ctf_trace *trace = NULL;
1532 uint64_t stream_handle = -1ULL;
1533 char *path_name = NULL, *channel_name = NULL;
1534 uint64_t tracefile_size = 0, tracefile_count = 0;
1535 LTTNG_OPTIONAL(uint64_t) stream_chunk_id = {};
1536
1537 if (!session || !conn->version_check_done) {
1538 ERR("Trying to add a stream before version check");
1539 ret = -1;
1540 goto end_no_session;
1541 }
1542
1543 if (session->minor == 1) {
1544 /* For 2.1 */
1545 ret = cmd_recv_stream_2_1(payload, &path_name,
1546 &channel_name);
1547 } else if (session->minor > 1 && session->minor < 11) {
1548 /* From 2.2 to 2.10 */
1549 ret = cmd_recv_stream_2_2(payload, &path_name,
1550 &channel_name, &tracefile_size, &tracefile_count);
1551 } else {
1552 /* From 2.11 to ... */
1553 ret = cmd_recv_stream_2_11(payload, &path_name,
1554 &channel_name, &tracefile_size, &tracefile_count,
1555 &stream_chunk_id.value);
1556 stream_chunk_id.is_set = true;
1557 }
1558
1559 if (ret < 0) {
1560 goto send_reply;
1561 }
1562
1563 if (conform_channel_path(path_name)) {
1564 goto send_reply;
1565 }
1566
1567 /*
1568 * Backward compatibility for --group-output-by-session.
1569 * Prior to lttng 2.11, the complete path is passed by the stream.
1570 * Starting at 2.11, lttng-relayd uses chunk. When dealing with producer
1571 * >=2.11 the chunk is responsible for the output path. When dealing
1572 * with producer < 2.11 the chunk output_path is the root output path
1573 * and the stream carries the complete path (path_name).
1574 * To support --group-output-by-session with older producer (<2.11), we
1575 * need to craft the path based on the stream path.
1576 */
1577 if (opt_group_output_by == RELAYD_GROUP_OUTPUT_BY_SESSION) {
1578 if (conn->minor < 4) {
1579 /*
1580 * From 2.1 to 2.3, the session_name is not passed on
1581 * the RELAYD_CREATE_SESSION command. The session name
1582 * is necessary to detect the presence of a base_path
1583 * inside the stream path. Without it we cannot perform
1584 * a valid group-output-by-session transformation.
1585 */
1586 WARN("Unable to perform a --group-by-session transformation for session %" PRIu64
1587 " for stream with path \"%s\" as it is produced by a peer using a protocol older than v2.4",
1588 session->id, path_name);
1589 } else if (conn->minor >= 4 && conn->minor < 11) {
1590 char *group_by_session_path_name;
1591
1592 assert(session->session_name[0] != '\0');
1593
1594 group_by_session_path_name =
1595 backward_compat_group_by_session(
1596 path_name,
1597 session->session_name);
1598 if (!group_by_session_path_name) {
1599 ERR("Failed to apply group by session to stream of session %" PRIu64,
1600 session->id);
1601 goto send_reply;
1602 }
1603
1604 DBG("Transformed session path from \"%s\" to \"%s\" to honor per-session name grouping",
1605 path_name, group_by_session_path_name);
1606
1607 free(path_name);
1608 path_name = group_by_session_path_name;
1609 }
1610 }
1611
1612 trace = ctf_trace_get_by_path_or_create(session, path_name);
1613 if (!trace) {
1614 goto send_reply;
1615 }
1616
1617 /* This stream here has one reference on the trace. */
1618 pthread_mutex_lock(&last_relay_stream_id_lock);
1619 stream_handle = ++last_relay_stream_id;
1620 pthread_mutex_unlock(&last_relay_stream_id_lock);
1621
1622 /* We pass ownership of path_name and channel_name. */
1623 stream = stream_create(trace, stream_handle, path_name,
1624 channel_name, tracefile_size, tracefile_count);
1625 path_name = NULL;
1626 channel_name = NULL;
1627
1628 /*
1629 * Streams are the owners of their trace. Reference to trace is
1630 * kept within stream_create().
1631 */
1632 ctf_trace_put(trace);
1633
1634 send_reply:
1635 memset(&reply, 0, sizeof(reply));
1636 reply.handle = htobe64(stream_handle);
1637 if (!stream) {
1638 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1639 } else {
1640 reply.ret_code = htobe32(LTTNG_OK);
1641 }
1642
1643 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1644 sizeof(struct lttcomm_relayd_status_stream), 0);
1645 if (send_ret < (ssize_t) sizeof(reply)) {
1646 ERR("Failed to send \"add stream\" command reply (ret = %zd)",
1647 send_ret);
1648 ret = -1;
1649 }
1650
1651 end_no_session:
1652 free(path_name);
1653 free(channel_name);
1654 return ret;
1655 }
1656
1657 /*
1658 * relay_close_stream: close a specific stream
1659 */
1660 static int relay_close_stream(const struct lttcomm_relayd_hdr *recv_hdr,
1661 struct relay_connection *conn,
1662 const struct lttng_buffer_view *payload)
1663 {
1664 int ret;
1665 ssize_t send_ret;
1666 struct relay_session *session = conn->session;
1667 struct lttcomm_relayd_close_stream stream_info;
1668 struct lttcomm_relayd_generic_reply reply;
1669 struct relay_stream *stream;
1670
1671 DBG("Close stream received");
1672
1673 if (!session || !conn->version_check_done) {
1674 ERR("Trying to close a stream before version check");
1675 ret = -1;
1676 goto end_no_session;
1677 }
1678
1679 if (payload->size < sizeof(stream_info)) {
1680 ERR("Unexpected payload size in \"relay_close_stream\": expected >= %zu bytes, got %zu bytes",
1681 sizeof(stream_info), payload->size);
1682 ret = -1;
1683 goto end_no_session;
1684 }
1685 memcpy(&stream_info, payload->data, sizeof(stream_info));
1686 stream_info.stream_id = be64toh(stream_info.stream_id);
1687 stream_info.last_net_seq_num = be64toh(stream_info.last_net_seq_num);
1688
1689 stream = stream_get_by_id(stream_info.stream_id);
1690 if (!stream) {
1691 ret = -1;
1692 goto end;
1693 }
1694
1695 /*
1696 * Set last_net_seq_num before the close flag. Required by data
1697 * pending check.
1698 */
1699 pthread_mutex_lock(&stream->lock);
1700 stream->last_net_seq_num = stream_info.last_net_seq_num;
1701 pthread_mutex_unlock(&stream->lock);
1702
1703 /*
1704 * This is one of the conditions which may trigger a stream close
1705 * with the others being:
1706 * 1) A close command is received for a stream
1707 * 2) The control connection owning the stream is closed
1708 * 3) We have received all of the stream's data _after_ a close
1709 * request.
1710 */
1711 try_stream_close(stream);
1712 if (stream->is_metadata) {
1713 struct relay_viewer_stream *vstream;
1714
1715 vstream = viewer_stream_get_by_id(stream->stream_handle);
1716 if (vstream) {
1717 if (stream->no_new_metadata_notified) {
1718 /*
1719 * Since all the metadata has been sent to the
1720 * viewer and that we have a request to close
1721 * its stream, we can safely teardown the
1722 * corresponding metadata viewer stream.
1723 */
1724 viewer_stream_put(vstream);
1725 }
1726 /* Put local reference. */
1727 viewer_stream_put(vstream);
1728 }
1729 }
1730 stream_put(stream);
1731 ret = 0;
1732
1733 end:
1734 memset(&reply, 0, sizeof(reply));
1735 if (ret < 0) {
1736 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1737 } else {
1738 reply.ret_code = htobe32(LTTNG_OK);
1739 }
1740 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1741 sizeof(struct lttcomm_relayd_generic_reply), 0);
1742 if (send_ret < (ssize_t) sizeof(reply)) {
1743 ERR("Failed to send \"close stream\" command reply (ret = %zd)",
1744 send_ret);
1745 ret = -1;
1746 }
1747
1748 end_no_session:
1749 return ret;
1750 }
1751
1752 /*
1753 * relay_reset_metadata: reset a metadata stream
1754 */
1755 static
1756 int relay_reset_metadata(const struct lttcomm_relayd_hdr *recv_hdr,
1757 struct relay_connection *conn,
1758 const struct lttng_buffer_view *payload)
1759 {
1760 int ret;
1761 ssize_t send_ret;
1762 struct relay_session *session = conn->session;
1763 struct lttcomm_relayd_reset_metadata stream_info;
1764 struct lttcomm_relayd_generic_reply reply;
1765 struct relay_stream *stream;
1766
1767 DBG("Reset metadata received");
1768
1769 if (!session || !conn->version_check_done) {
1770 ERR("Trying to reset a metadata stream before version check");
1771 ret = -1;
1772 goto end_no_session;
1773 }
1774
1775 if (payload->size < sizeof(stream_info)) {
1776 ERR("Unexpected payload size in \"relay_reset_metadata\": expected >= %zu bytes, got %zu bytes",
1777 sizeof(stream_info), payload->size);
1778 ret = -1;
1779 goto end_no_session;
1780 }
1781 memcpy(&stream_info, payload->data, sizeof(stream_info));
1782 stream_info.stream_id = be64toh(stream_info.stream_id);
1783 stream_info.version = be64toh(stream_info.version);
1784
1785 DBG("Update metadata to version %" PRIu64, stream_info.version);
1786
1787 /* Unsupported for live sessions for now. */
1788 if (session->live_timer != 0) {
1789 ret = -1;
1790 goto end;
1791 }
1792
1793 stream = stream_get_by_id(stream_info.stream_id);
1794 if (!stream) {
1795 ret = -1;
1796 goto end;
1797 }
1798 pthread_mutex_lock(&stream->lock);
1799 if (!stream->is_metadata) {
1800 ret = -1;
1801 goto end_unlock;
1802 }
1803
1804 ret = stream_reset_file(stream);
1805 if (ret < 0) {
1806 ERR("Failed to reset metadata stream %" PRIu64
1807 ": stream_path = %s, channel = %s",
1808 stream->stream_handle, stream->path_name,
1809 stream->channel_name);
1810 goto end_unlock;
1811 }
1812 end_unlock:
1813 pthread_mutex_unlock(&stream->lock);
1814 stream_put(stream);
1815
1816 end:
1817 memset(&reply, 0, sizeof(reply));
1818 if (ret < 0) {
1819 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1820 } else {
1821 reply.ret_code = htobe32(LTTNG_OK);
1822 }
1823 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1824 sizeof(struct lttcomm_relayd_generic_reply), 0);
1825 if (send_ret < (ssize_t) sizeof(reply)) {
1826 ERR("Failed to send \"reset metadata\" command reply (ret = %zd)",
1827 send_ret);
1828 ret = -1;
1829 }
1830
1831 end_no_session:
1832 return ret;
1833 }
1834
1835 /*
1836 * relay_unknown_command: send -1 if received unknown command
1837 */
1838 static void relay_unknown_command(struct relay_connection *conn)
1839 {
1840 struct lttcomm_relayd_generic_reply reply;
1841 ssize_t send_ret;
1842
1843 memset(&reply, 0, sizeof(reply));
1844 reply.ret_code = htobe32(LTTNG_ERR_UNK);
1845 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
1846 if (send_ret < sizeof(reply)) {
1847 ERR("Failed to send \"unknown command\" command reply (ret = %zd)", send_ret);
1848 }
1849 }
1850
1851 /*
1852 * relay_start: send an acknowledgment to the client to tell if we are
1853 * ready to receive data. We are ready if a session is established.
1854 */
1855 static int relay_start(const struct lttcomm_relayd_hdr *recv_hdr,
1856 struct relay_connection *conn,
1857 const struct lttng_buffer_view *payload)
1858 {
1859 int ret = 0;
1860 ssize_t send_ret;
1861 struct lttcomm_relayd_generic_reply reply;
1862 struct relay_session *session = conn->session;
1863
1864 if (!session) {
1865 DBG("Trying to start the streaming without a session established");
1866 ret = htobe32(LTTNG_ERR_UNK);
1867 }
1868
1869 memset(&reply, 0, sizeof(reply));
1870 reply.ret_code = htobe32(LTTNG_OK);
1871 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1872 sizeof(reply), 0);
1873 if (send_ret < (ssize_t) sizeof(reply)) {
1874 ERR("Failed to send \"relay_start\" command reply (ret = %zd)",
1875 send_ret);
1876 ret = -1;
1877 }
1878
1879 return ret;
1880 }
1881
1882 /*
1883 * relay_recv_metadata: receive the metadata for the session.
1884 */
1885 static int relay_recv_metadata(const struct lttcomm_relayd_hdr *recv_hdr,
1886 struct relay_connection *conn,
1887 const struct lttng_buffer_view *payload)
1888 {
1889 int ret = 0;
1890 struct relay_session *session = conn->session;
1891 struct lttcomm_relayd_metadata_payload metadata_payload_header;
1892 struct relay_stream *metadata_stream;
1893 uint64_t metadata_payload_size;
1894 struct lttng_buffer_view packet_view;
1895
1896 if (!session) {
1897 ERR("Metadata sent before version check");
1898 ret = -1;
1899 goto end;
1900 }
1901
1902 if (recv_hdr->data_size < sizeof(struct lttcomm_relayd_metadata_payload)) {
1903 ERR("Incorrect data size");
1904 ret = -1;
1905 goto end;
1906 }
1907 metadata_payload_size = recv_hdr->data_size -
1908 sizeof(struct lttcomm_relayd_metadata_payload);
1909
1910 memcpy(&metadata_payload_header, payload->data,
1911 sizeof(metadata_payload_header));
1912 metadata_payload_header.stream_id = be64toh(
1913 metadata_payload_header.stream_id);
1914 metadata_payload_header.padding_size = be32toh(
1915 metadata_payload_header.padding_size);
1916
1917 metadata_stream = stream_get_by_id(metadata_payload_header.stream_id);
1918 if (!metadata_stream) {
1919 ret = -1;
1920 goto end;
1921 }
1922
1923 packet_view = lttng_buffer_view_from_view(payload,
1924 sizeof(metadata_payload_header), metadata_payload_size);
1925 if (!packet_view.data) {
1926 ERR("Invalid metadata packet length announced by header");
1927 ret = -1;
1928 goto end_put;
1929 }
1930
1931 pthread_mutex_lock(&metadata_stream->lock);
1932 ret = stream_write(metadata_stream, &packet_view,
1933 metadata_payload_header.padding_size);
1934 pthread_mutex_unlock(&metadata_stream->lock);
1935 if (ret){
1936 ret = -1;
1937 goto end_put;
1938 }
1939 end_put:
1940 stream_put(metadata_stream);
1941 end:
1942 return ret;
1943 }
1944
1945 /*
1946 * relay_send_version: send relayd version number
1947 */
1948 static int relay_send_version(const struct lttcomm_relayd_hdr *recv_hdr,
1949 struct relay_connection *conn,
1950 const struct lttng_buffer_view *payload)
1951 {
1952 int ret;
1953 ssize_t send_ret;
1954 struct lttcomm_relayd_version reply, msg;
1955 bool compatible = true;
1956
1957 conn->version_check_done = true;
1958
1959 /* Get version from the other side. */
1960 if (payload->size < sizeof(msg)) {
1961 ERR("Unexpected payload size in \"relay_send_version\": expected >= %zu bytes, got %zu bytes",
1962 sizeof(msg), payload->size);
1963 ret = -1;
1964 goto end;
1965 }
1966
1967 memcpy(&msg, payload->data, sizeof(msg));
1968 msg.major = be32toh(msg.major);
1969 msg.minor = be32toh(msg.minor);
1970
1971 memset(&reply, 0, sizeof(reply));
1972 reply.major = RELAYD_VERSION_COMM_MAJOR;
1973 reply.minor = RELAYD_VERSION_COMM_MINOR;
1974
1975 /* Major versions must be the same */
1976 if (reply.major != msg.major) {
1977 DBG("Incompatible major versions (%u vs %u), deleting session",
1978 reply.major, msg.major);
1979 compatible = false;
1980 }
1981
1982 conn->major = reply.major;
1983 /* We adapt to the lowest compatible version */
1984 if (reply.minor <= msg.minor) {
1985 conn->minor = reply.minor;
1986 } else {
1987 conn->minor = msg.minor;
1988 }
1989
1990 reply.major = htobe32(reply.major);
1991 reply.minor = htobe32(reply.minor);
1992 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
1993 sizeof(reply), 0);
1994 if (send_ret < (ssize_t) sizeof(reply)) {
1995 ERR("Failed to send \"send version\" command reply (ret = %zd)",
1996 send_ret);
1997 ret = -1;
1998 goto end;
1999 } else {
2000 ret = 0;
2001 }
2002
2003 if (!compatible) {
2004 ret = -1;
2005 goto end;
2006 }
2007
2008 DBG("Version check done using protocol %u.%u", conn->major,
2009 conn->minor);
2010
2011 end:
2012 return ret;
2013 }
2014
2015 /*
2016 * Check for data pending for a given stream id from the session daemon.
2017 */
2018 static int relay_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2019 struct relay_connection *conn,
2020 const struct lttng_buffer_view *payload)
2021 {
2022 struct relay_session *session = conn->session;
2023 struct lttcomm_relayd_data_pending msg;
2024 struct lttcomm_relayd_generic_reply reply;
2025 struct relay_stream *stream;
2026 ssize_t send_ret;
2027 int ret;
2028 uint64_t stream_seq;
2029
2030 DBG("Data pending command received");
2031
2032 if (!session || !conn->version_check_done) {
2033 ERR("Trying to check for data before version check");
2034 ret = -1;
2035 goto end_no_session;
2036 }
2037
2038 if (payload->size < sizeof(msg)) {
2039 ERR("Unexpected payload size in \"relay_data_pending\": expected >= %zu bytes, got %zu bytes",
2040 sizeof(msg), payload->size);
2041 ret = -1;
2042 goto end_no_session;
2043 }
2044 memcpy(&msg, payload->data, sizeof(msg));
2045 msg.stream_id = be64toh(msg.stream_id);
2046 msg.last_net_seq_num = be64toh(msg.last_net_seq_num);
2047
2048 stream = stream_get_by_id(msg.stream_id);
2049 if (stream == NULL) {
2050 ret = -1;
2051 goto end;
2052 }
2053
2054 pthread_mutex_lock(&stream->lock);
2055
2056 if (session_streams_have_index(session)) {
2057 /*
2058 * Ensure that both the index and stream data have been
2059 * flushed up to the requested point.
2060 */
2061 stream_seq = min(stream->prev_data_seq, stream->prev_index_seq);
2062 } else {
2063 stream_seq = stream->prev_data_seq;
2064 }
2065 DBG("Data pending for stream id %" PRIu64 ": prev_data_seq %" PRIu64
2066 ", prev_index_seq %" PRIu64
2067 ", and last_seq %" PRIu64, msg.stream_id,
2068 stream->prev_data_seq, stream->prev_index_seq,
2069 msg.last_net_seq_num);
2070
2071 /* Avoid wrapping issue */
2072 if (((int64_t) (stream_seq - msg.last_net_seq_num)) >= 0) {
2073 /* Data has in fact been written and is NOT pending */
2074 ret = 0;
2075 } else {
2076 /* Data still being streamed thus pending */
2077 ret = 1;
2078 }
2079
2080 stream->data_pending_check_done = true;
2081 pthread_mutex_unlock(&stream->lock);
2082
2083 stream_put(stream);
2084 end:
2085
2086 memset(&reply, 0, sizeof(reply));
2087 reply.ret_code = htobe32(ret);
2088 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2089 if (send_ret < (ssize_t) sizeof(reply)) {
2090 ERR("Failed to send \"data pending\" command reply (ret = %zd)",
2091 send_ret);
2092 ret = -1;
2093 }
2094
2095 end_no_session:
2096 return ret;
2097 }
2098
2099 /*
2100 * Wait for the control socket to reach a quiescent state.
2101 *
2102 * Note that for now, when receiving this command from the session
2103 * daemon, this means that every subsequent commands or data received on
2104 * the control socket has been handled. So, this is why we simply return
2105 * OK here.
2106 */
2107 static int relay_quiescent_control(const struct lttcomm_relayd_hdr *recv_hdr,
2108 struct relay_connection *conn,
2109 const struct lttng_buffer_view *payload)
2110 {
2111 int ret;
2112 ssize_t send_ret;
2113 struct relay_stream *stream;
2114 struct lttcomm_relayd_quiescent_control msg;
2115 struct lttcomm_relayd_generic_reply reply;
2116
2117 DBG("Checking quiescent state on control socket");
2118
2119 if (!conn->session || !conn->version_check_done) {
2120 ERR("Trying to check for data before version check");
2121 ret = -1;
2122 goto end_no_session;
2123 }
2124
2125 if (payload->size < sizeof(msg)) {
2126 ERR("Unexpected payload size in \"relay_quiescent_control\": expected >= %zu bytes, got %zu bytes",
2127 sizeof(msg), payload->size);
2128 ret = -1;
2129 goto end_no_session;
2130 }
2131 memcpy(&msg, payload->data, sizeof(msg));
2132 msg.stream_id = be64toh(msg.stream_id);
2133
2134 stream = stream_get_by_id(msg.stream_id);
2135 if (!stream) {
2136 goto reply;
2137 }
2138 pthread_mutex_lock(&stream->lock);
2139 stream->data_pending_check_done = true;
2140 pthread_mutex_unlock(&stream->lock);
2141
2142 DBG("Relay quiescent control pending flag set to %" PRIu64, msg.stream_id);
2143 stream_put(stream);
2144 reply:
2145 memset(&reply, 0, sizeof(reply));
2146 reply.ret_code = htobe32(LTTNG_OK);
2147 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2148 if (send_ret < (ssize_t) sizeof(reply)) {
2149 ERR("Failed to send \"quiescent control\" command reply (ret = %zd)",
2150 send_ret);
2151 ret = -1;
2152 } else {
2153 ret = 0;
2154 }
2155
2156 end_no_session:
2157 return ret;
2158 }
2159
2160 /*
2161 * Initialize a data pending command. This means that a consumer is about
2162 * to ask for data pending for each stream it holds. Simply iterate over
2163 * all streams of a session and set the data_pending_check_done flag.
2164 *
2165 * This command returns to the client a LTTNG_OK code.
2166 */
2167 static int relay_begin_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2168 struct relay_connection *conn,
2169 const struct lttng_buffer_view *payload)
2170 {
2171 int ret;
2172 ssize_t send_ret;
2173 struct lttng_ht_iter iter;
2174 struct lttcomm_relayd_begin_data_pending msg;
2175 struct lttcomm_relayd_generic_reply reply;
2176 struct relay_stream *stream;
2177
2178 assert(recv_hdr);
2179 assert(conn);
2180
2181 DBG("Init streams for data pending");
2182
2183 if (!conn->session || !conn->version_check_done) {
2184 ERR("Trying to check for data before version check");
2185 ret = -1;
2186 goto end_no_session;
2187 }
2188
2189 if (payload->size < sizeof(msg)) {
2190 ERR("Unexpected payload size in \"relay_begin_data_pending\": expected >= %zu bytes, got %zu bytes",
2191 sizeof(msg), payload->size);
2192 ret = -1;
2193 goto end_no_session;
2194 }
2195 memcpy(&msg, payload->data, sizeof(msg));
2196 msg.session_id = be64toh(msg.session_id);
2197
2198 /*
2199 * Iterate over all streams to set the begin data pending flag.
2200 * For now, the streams are indexed by stream handle so we have
2201 * to iterate over all streams to find the one associated with
2202 * the right session_id.
2203 */
2204 rcu_read_lock();
2205 cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream,
2206 node.node) {
2207 if (!stream_get(stream)) {
2208 continue;
2209 }
2210 if (stream->trace->session->id == msg.session_id) {
2211 pthread_mutex_lock(&stream->lock);
2212 stream->data_pending_check_done = false;
2213 pthread_mutex_unlock(&stream->lock);
2214 DBG("Set begin data pending flag to stream %" PRIu64,
2215 stream->stream_handle);
2216 }
2217 stream_put(stream);
2218 }
2219 rcu_read_unlock();
2220
2221 memset(&reply, 0, sizeof(reply));
2222 /* All good, send back reply. */
2223 reply.ret_code = htobe32(LTTNG_OK);
2224
2225 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2226 if (send_ret < (ssize_t) sizeof(reply)) {
2227 ERR("Failed to send \"begin data pending\" command reply (ret = %zd)",
2228 send_ret);
2229 ret = -1;
2230 } else {
2231 ret = 0;
2232 }
2233
2234 end_no_session:
2235 return ret;
2236 }
2237
2238 /*
2239 * End data pending command. This will check, for a given session id, if
2240 * each stream associated with it has its data_pending_check_done flag
2241 * set. If not, this means that the client lost track of the stream but
2242 * the data is still being streamed on our side. In this case, we inform
2243 * the client that data is in flight.
2244 *
2245 * Return to the client if there is data in flight or not with a ret_code.
2246 */
2247 static int relay_end_data_pending(const struct lttcomm_relayd_hdr *recv_hdr,
2248 struct relay_connection *conn,
2249 const struct lttng_buffer_view *payload)
2250 {
2251 int ret;
2252 ssize_t send_ret;
2253 struct lttng_ht_iter iter;
2254 struct lttcomm_relayd_end_data_pending msg;
2255 struct lttcomm_relayd_generic_reply reply;
2256 struct relay_stream *stream;
2257 uint32_t is_data_inflight = 0;
2258
2259 DBG("End data pending command");
2260
2261 if (!conn->session || !conn->version_check_done) {
2262 ERR("Trying to check for data before version check");
2263 ret = -1;
2264 goto end_no_session;
2265 }
2266
2267 if (payload->size < sizeof(msg)) {
2268 ERR("Unexpected payload size in \"relay_end_data_pending\": expected >= %zu bytes, got %zu bytes",
2269 sizeof(msg), payload->size);
2270 ret = -1;
2271 goto end_no_session;
2272 }
2273 memcpy(&msg, payload->data, sizeof(msg));
2274 msg.session_id = be64toh(msg.session_id);
2275
2276 /*
2277 * Iterate over all streams to see if the begin data pending
2278 * flag is set.
2279 */
2280 rcu_read_lock();
2281 cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream,
2282 node.node) {
2283 if (!stream_get(stream)) {
2284 continue;
2285 }
2286 if (stream->trace->session->id != msg.session_id) {
2287 stream_put(stream);
2288 continue;
2289 }
2290 pthread_mutex_lock(&stream->lock);
2291 if (!stream->data_pending_check_done) {
2292 uint64_t stream_seq;
2293
2294 if (session_streams_have_index(conn->session)) {
2295 /*
2296 * Ensure that both the index and stream data have been
2297 * flushed up to the requested point.
2298 */
2299 stream_seq = min(stream->prev_data_seq, stream->prev_index_seq);
2300 } else {
2301 stream_seq = stream->prev_data_seq;
2302 }
2303 if (!stream->closed || !(((int64_t) (stream_seq - stream->last_net_seq_num)) >= 0)) {
2304 is_data_inflight = 1;
2305 DBG("Data is still in flight for stream %" PRIu64,
2306 stream->stream_handle);
2307 pthread_mutex_unlock(&stream->lock);
2308 stream_put(stream);
2309 break;
2310 }
2311 }
2312 pthread_mutex_unlock(&stream->lock);
2313 stream_put(stream);
2314 }
2315 rcu_read_unlock();
2316
2317 memset(&reply, 0, sizeof(reply));
2318 /* All good, send back reply. */
2319 reply.ret_code = htobe32(is_data_inflight);
2320
2321 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2322 if (send_ret < (ssize_t) sizeof(reply)) {
2323 ERR("Failed to send \"end data pending\" command reply (ret = %zd)",
2324 send_ret);
2325 ret = -1;
2326 } else {
2327 ret = 0;
2328 }
2329
2330 end_no_session:
2331 return ret;
2332 }
2333
2334 /*
2335 * Receive an index for a specific stream.
2336 *
2337 * Return 0 on success else a negative value.
2338 */
2339 static int relay_recv_index(const struct lttcomm_relayd_hdr *recv_hdr,
2340 struct relay_connection *conn,
2341 const struct lttng_buffer_view *payload)
2342 {
2343 int ret;
2344 ssize_t send_ret;
2345 struct relay_session *session = conn->session;
2346 struct lttcomm_relayd_index index_info;
2347 struct lttcomm_relayd_generic_reply reply;
2348 struct relay_stream *stream;
2349 size_t msg_len;
2350
2351 assert(conn);
2352
2353 DBG("Relay receiving index");
2354
2355 if (!session || !conn->version_check_done) {
2356 ERR("Trying to close a stream before version check");
2357 ret = -1;
2358 goto end_no_session;
2359 }
2360
2361 msg_len = lttcomm_relayd_index_len(
2362 lttng_to_index_major(conn->major, conn->minor),
2363 lttng_to_index_minor(conn->major, conn->minor));
2364 if (payload->size < msg_len) {
2365 ERR("Unexpected payload size in \"relay_recv_index\": expected >= %zu bytes, got %zu bytes",
2366 msg_len, payload->size);
2367 ret = -1;
2368 goto end_no_session;
2369 }
2370 memcpy(&index_info, payload->data, msg_len);
2371 index_info.relay_stream_id = be64toh(index_info.relay_stream_id);
2372 index_info.net_seq_num = be64toh(index_info.net_seq_num);
2373 index_info.packet_size = be64toh(index_info.packet_size);
2374 index_info.content_size = be64toh(index_info.content_size);
2375 index_info.timestamp_begin = be64toh(index_info.timestamp_begin);
2376 index_info.timestamp_end = be64toh(index_info.timestamp_end);
2377 index_info.events_discarded = be64toh(index_info.events_discarded);
2378 index_info.stream_id = be64toh(index_info.stream_id);
2379
2380 if (conn->minor >= 8) {
2381 index_info.stream_instance_id =
2382 be64toh(index_info.stream_instance_id);
2383 index_info.packet_seq_num = be64toh(index_info.packet_seq_num);
2384 } else {
2385 index_info.stream_instance_id = -1ULL;
2386 index_info.packet_seq_num = -1ULL;
2387 }
2388
2389 stream = stream_get_by_id(index_info.relay_stream_id);
2390 if (!stream) {
2391 ERR("stream_get_by_id not found");
2392 ret = -1;
2393 goto end;
2394 }
2395
2396 pthread_mutex_lock(&stream->lock);
2397 ret = stream_add_index(stream, &index_info);
2398 pthread_mutex_unlock(&stream->lock);
2399 if (ret) {
2400 goto end_stream_put;
2401 }
2402
2403 end_stream_put:
2404 stream_put(stream);
2405 end:
2406 memset(&reply, 0, sizeof(reply));
2407 if (ret < 0) {
2408 reply.ret_code = htobe32(LTTNG_ERR_UNK);
2409 } else {
2410 reply.ret_code = htobe32(LTTNG_OK);
2411 }
2412 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2413 if (send_ret < (ssize_t) sizeof(reply)) {
2414 ERR("Failed to send \"recv index\" command reply (ret = %zd)", send_ret);
2415 ret = -1;
2416 }
2417
2418 end_no_session:
2419 return ret;
2420 }
2421
2422 /*
2423 * Receive the streams_sent message.
2424 *
2425 * Return 0 on success else a negative value.
2426 */
2427 static int relay_streams_sent(const struct lttcomm_relayd_hdr *recv_hdr,
2428 struct relay_connection *conn,
2429 const struct lttng_buffer_view *payload)
2430 {
2431 int ret;
2432 ssize_t send_ret;
2433 struct lttcomm_relayd_generic_reply reply;
2434
2435 assert(conn);
2436
2437 DBG("Relay receiving streams_sent");
2438
2439 if (!conn->session || !conn->version_check_done) {
2440 ERR("Trying to close a stream before version check");
2441 ret = -1;
2442 goto end_no_session;
2443 }
2444
2445 /*
2446 * Publish every pending stream in the connection recv list which are
2447 * now ready to be used by the viewer.
2448 */
2449 publish_connection_local_streams(conn);
2450
2451 memset(&reply, 0, sizeof(reply));
2452 reply.ret_code = htobe32(LTTNG_OK);
2453 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0);
2454 if (send_ret < (ssize_t) sizeof(reply)) {
2455 ERR("Failed to send \"streams sent\" command reply (ret = %zd)",
2456 send_ret);
2457 ret = -1;
2458 } else {
2459 /* Success. */
2460 ret = 0;
2461 }
2462
2463 end_no_session:
2464 return ret;
2465 }
2466
2467 /*
2468 * relay_rotate_session_stream: rotate a stream to a new tracefile for the
2469 * session rotation feature (not the tracefile rotation feature).
2470 */
2471 static int relay_rotate_session_streams(
2472 const struct lttcomm_relayd_hdr *recv_hdr,
2473 struct relay_connection *conn,
2474 const struct lttng_buffer_view *payload)
2475 {
2476 int ret = 0;
2477 uint32_t i;
2478 ssize_t send_ret;
2479 enum lttng_error_code reply_code = LTTNG_ERR_UNK;
2480 struct relay_session *session = conn->session;
2481 struct lttcomm_relayd_rotate_streams rotate_streams;
2482 struct lttcomm_relayd_generic_reply reply = {};
2483 struct relay_stream *stream = NULL;
2484 const size_t header_len = sizeof(struct lttcomm_relayd_rotate_streams);
2485 struct lttng_trace_chunk *next_trace_chunk = NULL;
2486 struct lttng_buffer_view stream_positions;
2487 char chunk_id_buf[MAX_INT_DEC_LEN(uint64_t)];
2488 const char *chunk_id_str = "none";
2489
2490 if (!session || !conn->version_check_done) {
2491 ERR("Trying to rotate a stream before version check");
2492 ret = -1;
2493 goto end_no_reply;
2494 }
2495
2496 if (session->major == 2 && session->minor < 11) {
2497 ERR("Unsupported feature before 2.11");
2498 ret = -1;
2499 goto end_no_reply;
2500 }
2501
2502 if (payload->size < header_len) {
2503 ERR("Unexpected payload size in \"relay_rotate_session_stream\": expected >= %zu bytes, got %zu bytes",
2504 header_len, payload->size);
2505 ret = -1;
2506 goto end_no_reply;
2507 }
2508
2509 memcpy(&rotate_streams, payload->data, header_len);
2510
2511 /* Convert header to host endianness. */
2512 rotate_streams = (typeof(rotate_streams)) {
2513 .stream_count = be32toh(rotate_streams.stream_count),
2514 .new_chunk_id = (typeof(rotate_streams.new_chunk_id)) {
2515 .is_set = !!rotate_streams.new_chunk_id.is_set,
2516 .value = be64toh(rotate_streams.new_chunk_id.value),
2517 }
2518 };
2519
2520 if (rotate_streams.new_chunk_id.is_set) {
2521 /*
2522 * Retrieve the trace chunk the stream must transition to. As
2523 * per the protocol, this chunk should have been created
2524 * before this command is received.
2525 */
2526 next_trace_chunk = sessiond_trace_chunk_registry_get_chunk(
2527 sessiond_trace_chunk_registry,
2528 session->sessiond_uuid, session->id,
2529 rotate_streams.new_chunk_id.value);
2530 if (!next_trace_chunk) {
2531 char uuid_str[LTTNG_UUID_STR_LEN];
2532
2533 lttng_uuid_to_str(session->sessiond_uuid, uuid_str);
2534 ERR("Unknown next trace chunk in ROTATE_STREAMS command: sessiond_uuid = {%s}, session_id = %" PRIu64
2535 ", trace_chunk_id = %" PRIu64,
2536 uuid_str, session->id,
2537 rotate_streams.new_chunk_id.value);
2538 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2539 ret = -1;
2540 goto end;
2541 }
2542
2543 ret = snprintf(chunk_id_buf, sizeof(chunk_id_buf), "%" PRIu64,
2544 rotate_streams.new_chunk_id.value);
2545 if (ret < 0 || ret >= sizeof(chunk_id_buf)) {
2546 chunk_id_str = "formatting error";
2547 } else {
2548 chunk_id_str = chunk_id_buf;
2549 }
2550 }
2551
2552 DBG("Rotate %" PRIu32 " streams of session \"%s\" to chunk \"%s\"",
2553 rotate_streams.stream_count, session->session_name,
2554 chunk_id_str);
2555
2556 stream_positions = lttng_buffer_view_from_view(payload,
2557 sizeof(rotate_streams), -1);
2558 if (!stream_positions.data ||
2559 stream_positions.size <
2560 (rotate_streams.stream_count *
2561 sizeof(struct lttcomm_relayd_stream_rotation_position))) {
2562 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2563 ret = -1;
2564 goto end;
2565 }
2566
2567 for (i = 0; i < rotate_streams.stream_count; i++) {
2568 struct lttcomm_relayd_stream_rotation_position *position_comm =
2569 &((typeof(position_comm)) stream_positions.data)[i];
2570 const struct lttcomm_relayd_stream_rotation_position pos = {
2571 .stream_id = be64toh(position_comm->stream_id),
2572 .rotate_at_seq_num = be64toh(
2573 position_comm->rotate_at_seq_num),
2574 };
2575
2576 stream = stream_get_by_id(pos.stream_id);
2577 if (!stream) {
2578 reply_code = LTTNG_ERR_INVALID;
2579 ret = -1;
2580 goto end;
2581 }
2582
2583 pthread_mutex_lock(&stream->lock);
2584 ret = stream_set_pending_rotation(stream, next_trace_chunk,
2585 pos.rotate_at_seq_num);
2586 pthread_mutex_unlock(&stream->lock);
2587 if (ret) {
2588 reply_code = LTTNG_ERR_FILE_CREATION_ERROR;
2589 goto end;
2590 }
2591
2592 stream_put(stream);
2593 stream = NULL;
2594 }
2595
2596 reply_code = LTTNG_OK;
2597 ret = 0;
2598 end:
2599 if (stream) {
2600 stream_put(stream);
2601 }
2602
2603 reply.ret_code = htobe32((uint32_t) reply_code);
2604 send_ret = conn->sock->ops->sendmsg(conn->sock, &reply,
2605 sizeof(struct lttcomm_relayd_generic_reply), 0);
2606 if (send_ret < (ssize_t) sizeof(reply)) {
2607 ERR("Failed to send \"rotate session stream\" command reply (ret = %zd)",
2608 send_ret);
2609 ret = -1;
2610 }
2611 end_no_reply:
2612 lttng_trace_chunk_put(next_trace_chunk);
2613 return ret;
2614 }
2615
2616
2617
2618 /*
2619 * relay_create_trace_chunk: create a new trace chunk
2620 */
2621 static int relay_create_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr,
2622 struct relay_connection *conn,
2623 const struct lttng_buffer_view *payload)
2624 {
2625 int ret = 0;
2626 ssize_t send_ret;
2627 struct relay_session *session = conn->session;
2628 struct lttcomm_relayd_create_trace_chunk *msg;
2629 struct lttcomm_relayd_generic_reply reply = {};
2630 struct lttng_buffer_view header_view;
2631 struct lttng_buffer_view chunk_name_view;
2632 struct lttng_trace_chunk *chunk = NULL, *published_chunk = NULL;
2633 enum lttng_error_code reply_code = LTTNG_OK;
2634 enum lttng_trace_chunk_status chunk_status;
2635 const char *new_path;
2636
2637 if (!session || !conn->version_check_done) {
2638 ERR("Trying to create a trace chunk before version check");
2639 ret = -1;
2640 goto end_no_reply;
2641 }
2642
2643 if (session->major == 2 && session->minor < 11) {
2644 ERR("Chunk creation command is unsupported before 2.11");
2645 ret = -1;
2646 goto end_no_reply;
2647 }
2648
2649 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
2650 if (!header_view.data) {
2651 ERR("Failed to receive payload of chunk creation command");
2652 ret = -1;
2653 goto end_no_reply;
2654 }
2655
2656 /* Convert to host endianness. */
2657 msg = (typeof(msg)) header_view.data;
2658 msg->chunk_id = be64toh(msg->chunk_id);
2659 msg->creation_timestamp = be64toh(msg->creation_timestamp);
2660 msg->override_name_length = be32toh(msg->override_name_length);
2661
2662 if (session->current_trace_chunk &&
2663 !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) {
2664 chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk,
2665 DEFAULT_CHUNK_TMP_OLD_DIRECTORY);
2666 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2667 ERR("Failed to rename old chunk");
2668 ret = -1;
2669 reply_code = LTTNG_ERR_UNK;
2670 goto end;
2671 }
2672 }
2673 session->ongoing_rotation = true;
2674 if (!session->current_trace_chunk) {
2675 if (!session->has_rotated) {
2676 new_path = "";
2677 } else {
2678 new_path = NULL;
2679 }
2680 } else {
2681 new_path = DEFAULT_CHUNK_TMP_NEW_DIRECTORY;
2682 }
2683 chunk = lttng_trace_chunk_create(
2684 msg->chunk_id, msg->creation_timestamp, new_path);
2685 if (!chunk) {
2686 ERR("Failed to create trace chunk in trace chunk creation command");
2687 ret = -1;
2688 reply_code = LTTNG_ERR_NOMEM;
2689 goto end;
2690 }
2691
2692 if (msg->override_name_length) {
2693 const char *name;
2694
2695 chunk_name_view = lttng_buffer_view_from_view(payload,
2696 sizeof(*msg),
2697 msg->override_name_length);
2698 name = chunk_name_view.data;
2699 if (!name || name[msg->override_name_length - 1]) {
2700 ERR("Failed to receive payload of chunk creation command");
2701 ret = -1;
2702 reply_code = LTTNG_ERR_INVALID;
2703 goto end;
2704 }
2705
2706 chunk_status = lttng_trace_chunk_override_name(
2707 chunk, chunk_name_view.data);
2708 switch (chunk_status) {
2709 case LTTNG_TRACE_CHUNK_STATUS_OK:
2710 break;
2711 case LTTNG_TRACE_CHUNK_STATUS_INVALID_ARGUMENT:
2712 ERR("Failed to set the name of new trace chunk in trace chunk creation command (invalid name)");
2713 reply_code = LTTNG_ERR_INVALID;
2714 ret = -1;
2715 goto end;
2716 default:
2717 ERR("Failed to set the name of new trace chunk in trace chunk creation command (unknown error)");
2718 reply_code = LTTNG_ERR_UNK;
2719 ret = -1;
2720 goto end;
2721 }
2722 }
2723
2724 chunk_status = lttng_trace_chunk_set_credentials_current_user(chunk);
2725 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2726 reply_code = LTTNG_ERR_UNK;
2727 ret = -1;
2728 goto end;
2729 }
2730
2731 assert(conn->session->output_directory);
2732 chunk_status = lttng_trace_chunk_set_as_owner(chunk,
2733 conn->session->output_directory);
2734 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2735 reply_code = LTTNG_ERR_UNK;
2736 ret = -1;
2737 goto end;
2738 }
2739
2740 published_chunk = sessiond_trace_chunk_registry_publish_chunk(
2741 sessiond_trace_chunk_registry,
2742 conn->session->sessiond_uuid,
2743 conn->session->id,
2744 chunk);
2745 if (!published_chunk) {
2746 char uuid_str[LTTNG_UUID_STR_LEN];
2747
2748 lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str);
2749 ERR("Failed to publish chunk: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64,
2750 uuid_str,
2751 conn->session->id,
2752 msg->chunk_id);
2753 ret = -1;
2754 reply_code = LTTNG_ERR_NOMEM;
2755 goto end;
2756 }
2757
2758 pthread_mutex_lock(&conn->session->lock);
2759 if (conn->session->pending_closure_trace_chunk) {
2760 /*
2761 * Invalid; this means a second create_trace_chunk command was
2762 * received before a close_trace_chunk.
2763 */
2764 ERR("Invalid trace chunk close command received; a trace chunk is already waiting for a trace chunk close command");
2765 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2766 ret = -1;
2767 goto end_unlock_session;
2768 }
2769 conn->session->pending_closure_trace_chunk =
2770 conn->session->current_trace_chunk;
2771 conn->session->current_trace_chunk = published_chunk;
2772 published_chunk = NULL;
2773 if (!conn->session->pending_closure_trace_chunk) {
2774 session->ongoing_rotation = false;
2775 }
2776 end_unlock_session:
2777 pthread_mutex_unlock(&conn->session->lock);
2778 end:
2779 reply.ret_code = htobe32((uint32_t) reply_code);
2780 send_ret = conn->sock->ops->sendmsg(conn->sock,
2781 &reply,
2782 sizeof(struct lttcomm_relayd_generic_reply),
2783 0);
2784 if (send_ret < (ssize_t) sizeof(reply)) {
2785 ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)",
2786 send_ret);
2787 ret = -1;
2788 }
2789 end_no_reply:
2790 lttng_trace_chunk_put(chunk);
2791 lttng_trace_chunk_put(published_chunk);
2792 return ret;
2793 }
2794
2795 /*
2796 * relay_close_trace_chunk: close a trace chunk
2797 */
2798 static int relay_close_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr,
2799 struct relay_connection *conn,
2800 const struct lttng_buffer_view *payload)
2801 {
2802 int ret = 0, buf_ret;
2803 ssize_t send_ret;
2804 struct relay_session *session = conn->session;
2805 struct lttcomm_relayd_close_trace_chunk *msg;
2806 struct lttcomm_relayd_close_trace_chunk_reply reply = {};
2807 struct lttng_buffer_view header_view;
2808 struct lttng_trace_chunk *chunk = NULL;
2809 enum lttng_error_code reply_code = LTTNG_OK;
2810 enum lttng_trace_chunk_status chunk_status;
2811 uint64_t chunk_id;
2812 LTTNG_OPTIONAL(enum lttng_trace_chunk_command_type) close_command = {};
2813 time_t close_timestamp;
2814 char closed_trace_chunk_path[LTTNG_PATH_MAX];
2815 size_t path_length = 0;
2816 const char *chunk_name = NULL;
2817 struct lttng_dynamic_buffer reply_payload;
2818 const char *new_path;
2819
2820 lttng_dynamic_buffer_init(&reply_payload);
2821
2822 if (!session || !conn->version_check_done) {
2823 ERR("Trying to close a trace chunk before version check");
2824 ret = -1;
2825 goto end_no_reply;
2826 }
2827
2828 if (session->major == 2 && session->minor < 11) {
2829 ERR("Chunk close command is unsupported before 2.11");
2830 ret = -1;
2831 goto end_no_reply;
2832 }
2833
2834 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
2835 if (!header_view.data) {
2836 ERR("Failed to receive payload of chunk close command");
2837 ret = -1;
2838 goto end_no_reply;
2839 }
2840
2841 /* Convert to host endianness. */
2842 msg = (typeof(msg)) header_view.data;
2843 chunk_id = be64toh(msg->chunk_id);
2844 close_timestamp = (time_t) be64toh(msg->close_timestamp);
2845 close_command = (typeof(close_command)){
2846 .value = be32toh(msg->close_command.value),
2847 .is_set = msg->close_command.is_set,
2848 };
2849
2850 chunk = sessiond_trace_chunk_registry_get_chunk(
2851 sessiond_trace_chunk_registry,
2852 conn->session->sessiond_uuid,
2853 conn->session->id,
2854 chunk_id);
2855 if (!chunk) {
2856 char uuid_str[LTTNG_UUID_STR_LEN];
2857
2858 lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str);
2859 ERR("Failed to find chunk to close: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64,
2860 uuid_str,
2861 conn->session->id,
2862 msg->chunk_id);
2863 ret = -1;
2864 reply_code = LTTNG_ERR_NOMEM;
2865 goto end;
2866 }
2867
2868 pthread_mutex_lock(&session->lock);
2869 if (close_command.is_set &&
2870 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE) {
2871 /*
2872 * Clear command. It is a protocol error to ask for a
2873 * clear on a relay which does not allow it. Querying
2874 * the configuration allows figuring out whether
2875 * clearing is allowed before doing the clear.
2876 */
2877 if (!opt_allow_clear) {
2878 ret = -1;
2879 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2880 goto end_unlock_session;
2881 }
2882 }
2883 if (session->pending_closure_trace_chunk &&
2884 session->pending_closure_trace_chunk != chunk) {
2885 ERR("Trace chunk close command for session \"%s\" does not target the trace chunk pending closure",
2886 session->session_name);
2887 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2888 ret = -1;
2889 goto end_unlock_session;
2890 }
2891
2892 if (session->current_trace_chunk && session->current_trace_chunk != chunk &&
2893 !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) {
2894 if (close_command.is_set &&
2895 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE &&
2896 !session->has_rotated) {
2897 /* New chunk stays in session output directory. */
2898 new_path = "";
2899 } else {
2900 /* Use chunk name for new chunk. */
2901 new_path = NULL;
2902 }
2903 /* Rename new chunk path. */
2904 chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk,
2905 new_path);
2906 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2907 ret = -1;
2908 goto end;
2909 }
2910 session->ongoing_rotation = false;
2911 }
2912 if ((!close_command.is_set ||
2913 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_NO_OPERATION) &&
2914 !lttng_trace_chunk_get_name_overridden(chunk)) {
2915 const char *old_path;
2916
2917 if (!session->has_rotated) {
2918 old_path = "";
2919 } else {
2920 old_path = NULL;
2921 }
2922 /* We need to move back the .tmp_old_chunk to its rightful place. */
2923 chunk_status = lttng_trace_chunk_rename_path(chunk, old_path);
2924 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2925 ret = -1;
2926 goto end;
2927 }
2928 }
2929 chunk_status = lttng_trace_chunk_set_close_timestamp(
2930 chunk, close_timestamp);
2931 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2932 ERR("Failed to set trace chunk close timestamp");
2933 ret = -1;
2934 reply_code = LTTNG_ERR_UNK;
2935 goto end_unlock_session;
2936 }
2937
2938 if (close_command.is_set) {
2939 chunk_status = lttng_trace_chunk_set_close_command(
2940 chunk, close_command.value);
2941 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2942 ret = -1;
2943 reply_code = LTTNG_ERR_INVALID;
2944 goto end_unlock_session;
2945 }
2946 }
2947 chunk_status = lttng_trace_chunk_get_name(chunk, &chunk_name, NULL);
2948 if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) {
2949 ERR("Failed to get chunk name");
2950 ret = -1;
2951 reply_code = LTTNG_ERR_UNK;
2952 goto end_unlock_session;
2953 }
2954 if (!session->has_rotated && !session->snapshot) {
2955 ret = lttng_strncpy(closed_trace_chunk_path,
2956 session->output_path,
2957 sizeof(closed_trace_chunk_path));
2958 if (ret) {
2959 ERR("Failed to send trace chunk path: path length of %zu bytes exceeds the maximal allowed length of %zu bytes",
2960 strlen(session->output_path),
2961 sizeof(closed_trace_chunk_path));
2962 reply_code = LTTNG_ERR_NOMEM;
2963 ret = -1;
2964 goto end_unlock_session;
2965 }
2966 } else {
2967 if (session->snapshot) {
2968 ret = snprintf(closed_trace_chunk_path,
2969 sizeof(closed_trace_chunk_path),
2970 "%s/%s", session->output_path,
2971 chunk_name);
2972 } else {
2973 ret = snprintf(closed_trace_chunk_path,
2974 sizeof(closed_trace_chunk_path),
2975 "%s/" DEFAULT_ARCHIVED_TRACE_CHUNKS_DIRECTORY
2976 "/%s",
2977 session->output_path, chunk_name);
2978 }
2979 if (ret < 0 || ret == sizeof(closed_trace_chunk_path)) {
2980 ERR("Failed to format closed trace chunk resulting path");
2981 reply_code = ret < 0 ? LTTNG_ERR_UNK : LTTNG_ERR_NOMEM;
2982 ret = -1;
2983 goto end_unlock_session;
2984 }
2985 }
2986 if (close_command.is_set &&
2987 close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_MOVE_TO_COMPLETED) {
2988 session->has_rotated = true;
2989 }
2990 DBG("Reply chunk path on close: %s", closed_trace_chunk_path);
2991 path_length = strlen(closed_trace_chunk_path) + 1;
2992 if (path_length > UINT32_MAX) {
2993 ERR("Closed trace chunk path exceeds the maximal length allowed by the protocol");
2994 ret = -1;
2995 reply_code = LTTNG_ERR_INVALID_PROTOCOL;
2996 goto end_unlock_session;
2997 }
2998
2999 if (session->current_trace_chunk == chunk) {
3000 /*
3001 * After a trace chunk close command, no new streams
3002 * referencing the chunk may be created. Hence, on the
3003 * event that no new trace chunk have been created for
3004 * the session, the reference to the current trace chunk
3005 * is released in order to allow it to be reclaimed when
3006 * the last stream releases its reference to it.
3007 */
3008 lttng_trace_chunk_put(session->current_trace_chunk);
3009 session->current_trace_chunk = NULL;
3010 }
3011 lttng_trace_chunk_put(session->pending_closure_trace_chunk);
3012 session->pending_closure_trace_chunk = NULL;
3013 end_unlock_session:
3014 pthread_mutex_unlock(&session->lock);
3015
3016 end:
3017 reply.generic.ret_code = htobe32((uint32_t) reply_code);
3018 reply.path_length = htobe32((uint32_t) path_length);
3019 buf_ret = lttng_dynamic_buffer_append(
3020 &reply_payload, &reply, sizeof(reply));
3021 if (buf_ret) {
3022 ERR("Failed to append \"close trace chunk\" command reply header to payload buffer");
3023 goto end_no_reply;
3024 }
3025
3026 if (reply_code == LTTNG_OK) {
3027 buf_ret = lttng_dynamic_buffer_append(&reply_payload,
3028 closed_trace_chunk_path, path_length);
3029 if (buf_ret) {
3030 ERR("Failed to append \"close trace chunk\" command reply path to payload buffer");
3031 goto end_no_reply;
3032 }
3033 }
3034
3035 send_ret = conn->sock->ops->sendmsg(conn->sock,
3036 reply_payload.data,
3037 reply_payload.size,
3038 0);
3039 if (send_ret < reply_payload.size) {
3040 ERR("Failed to send \"close trace chunk\" command reply of %zu bytes (ret = %zd)",
3041 reply_payload.size, send_ret);
3042 ret = -1;
3043 goto end_no_reply;
3044 }
3045 end_no_reply:
3046 lttng_trace_chunk_put(chunk);
3047 lttng_dynamic_buffer_reset(&reply_payload);
3048 return ret;
3049 }
3050
3051 /*
3052 * relay_trace_chunk_exists: check if a trace chunk exists
3053 */
3054 static int relay_trace_chunk_exists(const struct lttcomm_relayd_hdr *recv_hdr,
3055 struct relay_connection *conn,
3056 const struct lttng_buffer_view *payload)
3057 {
3058 int ret = 0;
3059 ssize_t send_ret;
3060 struct relay_session *session = conn->session;
3061 struct lttcomm_relayd_trace_chunk_exists *msg;
3062 struct lttcomm_relayd_trace_chunk_exists_reply reply = {};
3063 struct lttng_buffer_view header_view;
3064 uint64_t chunk_id;
3065 bool chunk_exists;
3066
3067 if (!session || !conn->version_check_done) {
3068 ERR("Trying to close a trace chunk before version check");
3069 ret = -1;
3070 goto end_no_reply;
3071 }
3072
3073 if (session->major == 2 && session->minor < 11) {
3074 ERR("Chunk close command is unsupported before 2.11");
3075 ret = -1;
3076 goto end_no_reply;
3077 }
3078
3079 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
3080 if (!header_view.data) {
3081 ERR("Failed to receive payload of chunk close command");
3082 ret = -1;
3083 goto end_no_reply;
3084 }
3085
3086 /* Convert to host endianness. */
3087 msg = (typeof(msg)) header_view.data;
3088 chunk_id = be64toh(msg->chunk_id);
3089
3090 ret = sessiond_trace_chunk_registry_chunk_exists(
3091 sessiond_trace_chunk_registry,
3092 conn->session->sessiond_uuid,
3093 conn->session->id,
3094 chunk_id, &chunk_exists);
3095 /*
3096 * If ret is not 0, send the reply and report the error to the caller.
3097 * It is a protocol (or internal) error and the session/connection
3098 * should be torn down.
3099 */
3100 reply = (typeof(reply)){
3101 .generic.ret_code = htobe32((uint32_t)
3102 (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)),
3103 .trace_chunk_exists = ret == 0 ? chunk_exists : 0,
3104 };
3105 send_ret = conn->sock->ops->sendmsg(
3106 conn->sock, &reply, sizeof(reply), 0);
3107 if (send_ret < (ssize_t) sizeof(reply)) {
3108 ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)",
3109 send_ret);
3110 ret = -1;
3111 }
3112 end_no_reply:
3113 return ret;
3114 }
3115
3116 /*
3117 * relay_get_configuration: query whether feature is available
3118 */
3119 static int relay_get_configuration(const struct lttcomm_relayd_hdr *recv_hdr,
3120 struct relay_connection *conn,
3121 const struct lttng_buffer_view *payload)
3122 {
3123 int ret = 0;
3124 ssize_t send_ret;
3125 struct lttcomm_relayd_get_configuration *msg;
3126 struct lttcomm_relayd_get_configuration_reply reply = {};
3127 struct lttng_buffer_view header_view;
3128 uint64_t query_flags = 0;
3129 uint64_t result_flags = 0;
3130
3131 header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg));
3132 if (!header_view.data) {
3133 ERR("Failed to receive payload of chunk close command");
3134 ret = -1;
3135 goto end_no_reply;
3136 }
3137
3138 /* Convert to host endianness. */
3139 msg = (typeof(msg)) header_view.data;
3140 query_flags = be64toh(msg->query_flags);
3141
3142 if (query_flags) {
3143 ret = LTTNG_ERR_INVALID_PROTOCOL;
3144 goto reply;
3145 }
3146 if (opt_allow_clear) {
3147 result_flags |= LTTCOMM_RELAYD_CONFIGURATION_FLAG_CLEAR_ALLOWED;
3148 }
3149 ret = 0;
3150 reply:
3151 reply = (typeof(reply)){
3152 .generic.ret_code = htobe32((uint32_t)
3153 (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)),
3154 .relayd_configuration_flags = htobe64(result_flags),
3155 };
3156 send_ret = conn->sock->ops->sendmsg(
3157 conn->sock, &reply, sizeof(reply), 0);
3158 if (send_ret < (ssize_t) sizeof(reply)) {
3159 ERR("Failed to send \"get configuration\" command reply (ret = %zd)",
3160 send_ret);
3161 ret = -1;
3162 }
3163 end_no_reply:
3164 return ret;
3165 }
3166
3167 #define DBG_CMD(cmd_name, conn) \
3168 DBG3("Processing \"%s\" command for socket %i", cmd_name, conn->sock->fd);