X-Git-Url: https://git.lttng.org/?p=lttng-tools.git;a=blobdiff_plain;f=src%2Fbin%2Flttng-relayd%2Fmain.c;fp=src%2Fbin%2Flttng-relayd%2Fmain.c;h=0000000000000000000000000000000000000000;hp=fb1817cd015fdc11ffa3e06c385c79d64eb50fc8;hb=ac497a37018f3c253d2e50397294f58d33f7f24f;hpb=7966af5763c4aaca39df9bbfa9277ff15715c720 diff --git a/src/bin/lttng-relayd/main.c b/src/bin/lttng-relayd/main.c deleted file mode 100644 index fb1817cd0..000000000 --- a/src/bin/lttng-relayd/main.c +++ /dev/null @@ -1,4444 +0,0 @@ -/* - * Copyright (C) 2012 Julien Desfossez - * Copyright (C) 2012 David Goulet - * Copyright (C) 2013 Jérémie Galarneau - * Copyright (C) 2015 Mathieu Desnoyers - * - * SPDX-License-Identifier: GPL-2.0-only - * - */ - -#define _LGPL_SOURCE -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "backward-compatibility-group-by.h" -#include "cmd.h" -#include "connection.h" -#include "ctf-trace.h" -#include "health-relayd.h" -#include "index.h" -#include "live.h" -#include "lttng-relayd.h" -#include "session.h" -#include "sessiond-trace-chunks.h" -#include "stream.h" -#include "tcp_keep_alive.h" -#include "testpoint.h" -#include "tracefile-array.h" -#include "utils.h" -#include "version.h" -#include "viewer-stream.h" - -static const char *help_msg = -#ifdef LTTNG_EMBED_HELP -#include -#else -NULL -#endif -; - -enum relay_connection_status { - RELAY_CONNECTION_STATUS_OK, - /* An error occurred while processing an event on the connection. */ - RELAY_CONNECTION_STATUS_ERROR, - /* Connection closed/shutdown cleanly. */ - RELAY_CONNECTION_STATUS_CLOSED, -}; - -/* command line options */ -char *opt_output_path, *opt_working_directory; -static int opt_daemon, opt_background, opt_print_version, opt_allow_clear = 1; -enum relay_group_output_by opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_UNKNOWN; - -/* - * We need to wait for listener and live listener threads, as well as - * health check thread, before being ready to signal readiness. - */ -#define NR_LTTNG_RELAY_READY 3 -static int lttng_relay_ready = NR_LTTNG_RELAY_READY; - -/* Size of receive buffer. */ -#define RECV_DATA_BUFFER_SIZE 65536 - -static int recv_child_signal; /* Set to 1 when a SIGUSR1 signal is received. */ -static pid_t child_ppid; /* Internal parent PID use with daemonize. */ - -static struct lttng_uri *control_uri; -static struct lttng_uri *data_uri; -static struct lttng_uri *live_uri; - -const char *progname; - -const char *tracing_group_name = DEFAULT_TRACING_GROUP; -static int tracing_group_name_override; - -const char * const config_section_name = "relayd"; - -/* - * Quit pipe for all threads. This permits a single cancellation point - * for all threads when receiving an event on the pipe. - */ -int thread_quit_pipe[2] = { -1, -1 }; - -/* - * This pipe is used to inform the worker thread that a command is queued and - * ready to be processed. - */ -static int relay_conn_pipe[2] = { -1, -1 }; - -/* Shared between threads */ -static int dispatch_thread_exit; - -static pthread_t listener_thread; -static pthread_t dispatcher_thread; -static pthread_t worker_thread; -static pthread_t health_thread; - -/* - * last_relay_stream_id_lock protects last_relay_stream_id increment - * atomicity on 32-bit architectures. - */ -static pthread_mutex_t last_relay_stream_id_lock = PTHREAD_MUTEX_INITIALIZER; -static uint64_t last_relay_stream_id; - -/* - * Relay command queue. - * - * The relay_thread_listener and relay_thread_dispatcher communicate with this - * queue. - */ -static struct relay_conn_queue relay_conn_queue; - -/* Cap of file desriptors to be in simultaneous use by the relay daemon. */ -static unsigned int lttng_opt_fd_pool_size = -1; - -/* Global relay stream hash table. */ -struct lttng_ht *relay_streams_ht; - -/* Global relay viewer stream hash table. */ -struct lttng_ht *viewer_streams_ht; - -/* Global relay sessions hash table. */ -struct lttng_ht *sessions_ht; - -/* Relayd health monitoring */ -struct health_app *health_relayd; - -struct sessiond_trace_chunk_registry *sessiond_trace_chunk_registry; - -/* Global fd tracker. */ -struct fd_tracker *the_fd_tracker; - -static struct option long_options[] = { - { "control-port", 1, 0, 'C', }, - { "data-port", 1, 0, 'D', }, - { "live-port", 1, 0, 'L', }, - { "daemonize", 0, 0, 'd', }, - { "background", 0, 0, 'b', }, - { "group", 1, 0, 'g', }, - { "fd-pool-size", 1, 0, '\0', }, - { "help", 0, 0, 'h', }, - { "output", 1, 0, 'o', }, - { "verbose", 0, 0, 'v', }, - { "config", 1, 0, 'f' }, - { "version", 0, 0, 'V' }, - { "working-directory", 1, 0, 'w', }, - { "group-output-by-session", 0, 0, 's', }, - { "group-output-by-host", 0, 0, 'p', }, - { "disallow-clear", 0, 0, 'x' }, - { NULL, 0, 0, 0, }, -}; - -static const char *config_ignore_options[] = { "help", "config", "version" }; - -static void print_version(void) { - fprintf(stdout, "%s\n", VERSION); -} - -static void relayd_config_log(void) -{ - DBG("LTTng-relayd " VERSION " - " VERSION_NAME "%s%s", - GIT_VERSION[0] == '\0' ? "" : " - " GIT_VERSION, - EXTRA_VERSION_NAME[0] == '\0' ? "" : " - " EXTRA_VERSION_NAME); - if (EXTRA_VERSION_DESCRIPTION[0] != '\0') { - DBG("LTTng-relayd extra version description:\n\t" EXTRA_VERSION_DESCRIPTION "\n"); - } - if (EXTRA_VERSION_PATCHES[0] != '\0') { - DBG("LTTng-relayd extra patches:\n\t" EXTRA_VERSION_PATCHES "\n"); - } -} - -/* - * Take an option from the getopt output and set it in the right variable to be - * used later. - * - * Return 0 on success else a negative value. - */ -static int set_option(int opt, const char *arg, const char *optname) -{ - int ret; - - switch (opt) { - case 0: - if (!strcmp(optname, "fd-pool-size")) { - unsigned long v; - - errno = 0; - v = strtoul(arg, NULL, 0); - if (errno != 0 || !isdigit((unsigned char) arg[0])) { - ERR("Wrong value in --fd-pool-size parameter: %s", arg); - ret = -1; - goto end; - } - if (v >= UINT_MAX) { - ERR("File descriptor cap overflow in --fd-pool-size parameter: %s", arg); - ret = -1; - goto end; - } - lttng_opt_fd_pool_size = (unsigned int) v; - } else { - fprintf(stderr, "unknown option %s", optname); - if (arg) { - fprintf(stderr, " with arg %s\n", arg); - } - } - break; - case 'C': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-C, --control-port"); - } else { - ret = uri_parse(arg, &control_uri); - if (ret < 0) { - ERR("Invalid control URI specified"); - goto end; - } - if (control_uri->port == 0) { - control_uri->port = DEFAULT_NETWORK_CONTROL_PORT; - } - } - break; - case 'D': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-D, -data-port"); - } else { - ret = uri_parse(arg, &data_uri); - if (ret < 0) { - ERR("Invalid data URI specified"); - goto end; - } - if (data_uri->port == 0) { - data_uri->port = DEFAULT_NETWORK_DATA_PORT; - } - } - break; - case 'L': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-L, -live-port"); - } else { - ret = uri_parse(arg, &live_uri); - if (ret < 0) { - ERR("Invalid live URI specified"); - goto end; - } - if (live_uri->port == 0) { - live_uri->port = DEFAULT_NETWORK_VIEWER_PORT; - } - } - break; - case 'd': - opt_daemon = 1; - break; - case 'b': - opt_background = 1; - break; - case 'g': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-g, --group"); - } else { - tracing_group_name = strdup(arg); - if (tracing_group_name == NULL) { - ret = -errno; - PERROR("strdup"); - goto end; - } - tracing_group_name_override = 1; - } - break; - case 'h': - ret = utils_show_help(8, "lttng-relayd", help_msg); - if (ret) { - ERR("Cannot show --help for `lttng-relayd`"); - perror("exec"); - } - exit(EXIT_FAILURE); - case 'V': - opt_print_version = 1; - break; - case 'o': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-o, --output"); - } else { - ret = asprintf(&opt_output_path, "%s", arg); - if (ret < 0) { - ret = -errno; - PERROR("asprintf opt_output_path"); - goto end; - } - } - break; - case 'w': - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-w, --working-directory"); - } else { - ret = asprintf(&opt_working_directory, "%s", arg); - if (ret < 0) { - ret = -errno; - PERROR("asprintf opt_working_directory"); - goto end; - } - } - break; - - case 'v': - /* Verbose level can increase using multiple -v */ - if (arg) { - lttng_opt_verbose = config_parse_value(arg); - } else { - /* Only 3 level of verbosity (-vvv). */ - if (lttng_opt_verbose < 3) { - lttng_opt_verbose += 1; - } - } - break; - case 's': - if (opt_group_output_by != RELAYD_GROUP_OUTPUT_BY_UNKNOWN) { - ERR("Cannot set --group-output-by-session, another --group-output-by argument is present"); - exit(EXIT_FAILURE); - } - opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_SESSION; - break; - case 'p': - if (opt_group_output_by != RELAYD_GROUP_OUTPUT_BY_UNKNOWN) { - ERR("Cannot set --group-output-by-host, another --group-output-by argument is present"); - exit(EXIT_FAILURE); - } - opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_HOST; - break; - case 'x': - /* Disallow clear */ - opt_allow_clear = 0; - break; - default: - /* Unknown option or other error. - * Error is printed by getopt, just return */ - ret = -1; - goto end; - } - - /* All good. */ - ret = 0; - -end: - return ret; -} - -/* - * config_entry_handler_cb used to handle options read from a config file. - * See config_entry_handler_cb comment in common/config/session-config.h for the - * return value conventions. - */ -static int config_entry_handler(const struct config_entry *entry, void *unused) -{ - int ret = 0, i; - - if (!entry || !entry->name || !entry->value) { - ret = -EINVAL; - goto end; - } - - /* Check if the option is to be ignored */ - for (i = 0; i < sizeof(config_ignore_options) / sizeof(char *); i++) { - if (!strcmp(entry->name, config_ignore_options[i])) { - goto end; - } - } - - for (i = 0; i < (sizeof(long_options) / sizeof(struct option)) - 1; i++) { - /* Ignore if entry name is not fully matched. */ - if (strcmp(entry->name, long_options[i].name)) { - continue; - } - - /* - * If the option takes no argument on the command line, - * we have to check if the value is "true". We support - * non-zero numeric values, true, on and yes. - */ - if (!long_options[i].has_arg) { - ret = config_parse_value(entry->value); - if (ret <= 0) { - if (ret) { - WARN("Invalid configuration value \"%s\" for option %s", - entry->value, entry->name); - } - /* False, skip boolean config option. */ - goto end; - } - } - - ret = set_option(long_options[i].val, entry->value, entry->name); - goto end; - } - - WARN("Unrecognized option \"%s\" in daemon configuration file.", - entry->name); - -end: - return ret; -} - -static int parse_env_options(void) -{ - int ret = 0; - char *value = NULL; - - value = lttng_secure_getenv(DEFAULT_LTTNG_RELAYD_WORKING_DIRECTORY_ENV); - if (value) { - opt_working_directory = strdup(value); - if (!opt_working_directory) { - ERR("Failed to allocate working directory string (\"%s\")", - value); - ret = -1; - } - } - return ret; -} - -static int set_fd_pool_size(void) -{ - int ret = 0; - struct rlimit rlimit; - - ret = getrlimit(RLIMIT_NOFILE, &rlimit); - if (ret) { - PERROR("Failed to get file descriptor limit"); - ret = -1; - goto end; - } - - DBG("File descriptor count limits are %" PRIu64 " (soft) and %" PRIu64 " (hard)", - (uint64_t) rlimit.rlim_cur, - (uint64_t) rlimit.rlim_max); - if (lttng_opt_fd_pool_size == -1) { - /* Use default value (soft limit - reserve). */ - if (rlimit.rlim_cur < DEFAULT_RELAYD_MIN_FD_POOL_SIZE) { - ERR("The process' file number limit is too low (%" PRIu64 "). The process' file number limit must be set to at least %i.", - (uint64_t) rlimit.rlim_cur, DEFAULT_RELAYD_MIN_FD_POOL_SIZE); - ret = -1; - goto end; - } - lttng_opt_fd_pool_size = rlimit.rlim_cur - - DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE; - goto end; - } - - if (lttng_opt_fd_pool_size < DEFAULT_RELAYD_MIN_FD_POOL_SIZE) { - ERR("File descriptor pool size must be set to at least %d", - DEFAULT_RELAYD_MIN_FD_POOL_SIZE); - ret = -1; - goto end; - } - - if (lttng_opt_fd_pool_size > rlimit.rlim_cur) { - ERR("File descriptor pool size argument (%u) exceeds the process' soft limit (%" PRIu64 ").", - lttng_opt_fd_pool_size, (uint64_t) rlimit.rlim_cur); - ret = -1; - goto end; - } - - DBG("File descriptor pool size argument (%u) adjusted to %u to accommodates transient fd uses", - lttng_opt_fd_pool_size, - lttng_opt_fd_pool_size - DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE); - lttng_opt_fd_pool_size -= DEFAULT_RELAYD_FD_POOL_SIZE_RESERVE; -end: - return ret; -} - -static int set_options(int argc, char **argv) -{ - int c, ret = 0, option_index = 0, retval = 0; - int orig_optopt = optopt, orig_optind = optind; - char *default_address, *optstring; - char *config_path = NULL; - - optstring = utils_generate_optstring(long_options, - sizeof(long_options) / sizeof(struct option)); - if (!optstring) { - retval = -ENOMEM; - goto exit; - } - - /* Check for the --config option */ - - while ((c = getopt_long(argc, argv, optstring, long_options, - &option_index)) != -1) { - if (c == '?') { - retval = -EINVAL; - goto exit; - } else if (c != 'f') { - continue; - } - - if (lttng_is_setuid_setgid()) { - WARN("Getting '%s' argument from setuid/setgid binary refused for security reasons.", - "-f, --config"); - } else { - free(config_path); - config_path = utils_expand_path(optarg); - if (!config_path) { - ERR("Failed to resolve path: %s", optarg); - } - } - } - - ret = config_get_section_entries(config_path, config_section_name, - config_entry_handler, NULL); - if (ret) { - if (ret > 0) { - ERR("Invalid configuration option at line %i", ret); - } - retval = -1; - goto exit; - } - - /* Reset getopt's global state */ - optopt = orig_optopt; - optind = orig_optind; - while (1) { - c = getopt_long(argc, argv, optstring, long_options, &option_index); - if (c == -1) { - break; - } - - ret = set_option(c, optarg, long_options[option_index].name); - if (ret < 0) { - retval = -1; - goto exit; - } - } - - /* assign default values */ - if (control_uri == NULL) { - ret = asprintf(&default_address, - "tcp://" DEFAULT_NETWORK_CONTROL_BIND_ADDRESS ":%d", - DEFAULT_NETWORK_CONTROL_PORT); - if (ret < 0) { - PERROR("asprintf default data address"); - retval = -1; - goto exit; - } - - ret = uri_parse(default_address, &control_uri); - free(default_address); - if (ret < 0) { - ERR("Invalid control URI specified"); - retval = -1; - goto exit; - } - } - if (data_uri == NULL) { - ret = asprintf(&default_address, - "tcp://" DEFAULT_NETWORK_DATA_BIND_ADDRESS ":%d", - DEFAULT_NETWORK_DATA_PORT); - if (ret < 0) { - PERROR("asprintf default data address"); - retval = -1; - goto exit; - } - - ret = uri_parse(default_address, &data_uri); - free(default_address); - if (ret < 0) { - ERR("Invalid data URI specified"); - retval = -1; - goto exit; - } - } - if (live_uri == NULL) { - ret = asprintf(&default_address, - "tcp://" DEFAULT_NETWORK_VIEWER_BIND_ADDRESS ":%d", - DEFAULT_NETWORK_VIEWER_PORT); - if (ret < 0) { - PERROR("asprintf default viewer control address"); - retval = -1; - goto exit; - } - - ret = uri_parse(default_address, &live_uri); - free(default_address); - if (ret < 0) { - ERR("Invalid viewer control URI specified"); - retval = -1; - goto exit; - } - } - ret = set_fd_pool_size(); - if (ret) { - retval = -1; - goto exit; - } - - if (opt_group_output_by == RELAYD_GROUP_OUTPUT_BY_UNKNOWN) { - opt_group_output_by = RELAYD_GROUP_OUTPUT_BY_HOST; - } - if (opt_allow_clear) { - /* Check if env variable exists. */ - const char *value = lttng_secure_getenv(DEFAULT_LTTNG_RELAYD_DISALLOW_CLEAR_ENV); - if (value) { - ret = config_parse_value(value); - if (ret < 0) { - ERR("Invalid value for %s specified", DEFAULT_LTTNG_RELAYD_DISALLOW_CLEAR_ENV); - retval = -1; - goto exit; - } - opt_allow_clear = !ret; - } - } - -exit: - free(config_path); - free(optstring); - return retval; -} - -static void print_global_objects(void) -{ - print_viewer_streams(); - print_relay_streams(); - print_sessions(); -} - -static int noop_close(void *data, int *fds) -{ - return 0; -} - -static void untrack_stdio(void) -{ - int fds[] = { fileno(stdout), fileno(stderr) }; - - /* - * noop_close is used since we don't really want to close - * the stdio output fds; we merely want to stop tracking them. - */ - (void) fd_tracker_close_unsuspendable_fd(the_fd_tracker, - fds, 2, noop_close, NULL); -} - -/* - * Cleanup the daemon - */ -static void relayd_cleanup(void) -{ - print_global_objects(); - - DBG("Cleaning up"); - - if (viewer_streams_ht) - lttng_ht_destroy(viewer_streams_ht); - if (relay_streams_ht) - lttng_ht_destroy(relay_streams_ht); - if (sessions_ht) - lttng_ht_destroy(sessions_ht); - - free(opt_output_path); - free(opt_working_directory); - - if (health_relayd) { - health_app_destroy(health_relayd); - } - /* Close thread quit pipes */ - if (health_quit_pipe[0] != -1) { - (void) fd_tracker_util_pipe_close( - the_fd_tracker, health_quit_pipe); - } - if (thread_quit_pipe[0] != -1) { - (void) fd_tracker_util_pipe_close( - the_fd_tracker, thread_quit_pipe); - } - if (sessiond_trace_chunk_registry) { - sessiond_trace_chunk_registry_destroy( - sessiond_trace_chunk_registry); - } - if (the_fd_tracker) { - untrack_stdio(); - /* - * fd_tracker_destroy() will log the contents of the fd-tracker - * if a leak is detected. - */ - fd_tracker_destroy(the_fd_tracker); - } - - uri_free(control_uri); - uri_free(data_uri); - /* Live URI is freed in the live thread. */ - - if (tracing_group_name_override) { - free((void *) tracing_group_name); - } -} - -/* - * Write to writable pipe used to notify a thread. - */ -static int notify_thread_pipe(int wpipe) -{ - ssize_t ret; - - ret = lttng_write(wpipe, "!", 1); - if (ret < 1) { - PERROR("write poll pipe"); - goto end; - } - ret = 0; -end: - return ret; -} - -static int notify_health_quit_pipe(int *pipe) -{ - ssize_t ret; - - ret = lttng_write(pipe[1], "4", 1); - if (ret < 1) { - PERROR("write relay health quit"); - goto end; - } - ret = 0; -end: - return ret; -} - -/* - * Stop all relayd and relayd-live threads. - */ -int lttng_relay_stop_threads(void) -{ - int retval = 0; - - /* Stopping all threads */ - DBG("Terminating all threads"); - if (notify_thread_pipe(thread_quit_pipe[1])) { - ERR("write error on thread quit pipe"); - retval = -1; - } - - if (notify_health_quit_pipe(health_quit_pipe)) { - ERR("write error on health quit pipe"); - } - - /* Dispatch thread */ - CMM_STORE_SHARED(dispatch_thread_exit, 1); - futex_nto1_wake(&relay_conn_queue.futex); - - if (relayd_live_stop()) { - ERR("Error stopping live threads"); - retval = -1; - } - return retval; -} - -/* - * Signal handler for the daemon - * - * Simply stop all worker threads, leaving main() return gracefully after - * joining all threads and calling cleanup(). - */ -static void sighandler(int sig) -{ - switch (sig) { - case SIGINT: - DBG("SIGINT caught"); - if (lttng_relay_stop_threads()) { - ERR("Error stopping threads"); - } - break; - case SIGTERM: - DBG("SIGTERM caught"); - if (lttng_relay_stop_threads()) { - ERR("Error stopping threads"); - } - break; - case SIGUSR1: - CMM_STORE_SHARED(recv_child_signal, 1); - break; - default: - break; - } -} - -/* - * Setup signal handler for : - * SIGINT, SIGTERM, SIGPIPE - */ -static int set_signal_handler(void) -{ - int ret = 0; - struct sigaction sa; - sigset_t sigset; - - if ((ret = sigemptyset(&sigset)) < 0) { - PERROR("sigemptyset"); - return ret; - } - - sa.sa_mask = sigset; - sa.sa_flags = 0; - - sa.sa_handler = sighandler; - if ((ret = sigaction(SIGTERM, &sa, NULL)) < 0) { - PERROR("sigaction"); - return ret; - } - - if ((ret = sigaction(SIGINT, &sa, NULL)) < 0) { - PERROR("sigaction"); - return ret; - } - - if ((ret = sigaction(SIGUSR1, &sa, NULL)) < 0) { - PERROR("sigaction"); - return ret; - } - - sa.sa_handler = SIG_IGN; - if ((ret = sigaction(SIGPIPE, &sa, NULL)) < 0) { - PERROR("sigaction"); - return ret; - } - - DBG("Signal handler set for SIGTERM, SIGUSR1, SIGPIPE and SIGINT"); - - return ret; -} - -void lttng_relay_notify_ready(void) -{ - /* Notify the parent of the fork() process that we are ready. */ - if (opt_daemon || opt_background) { - if (uatomic_sub_return(<tng_relay_ready, 1) == 0) { - kill(child_ppid, SIGUSR1); - } - } -} - -/* - * Init thread quit pipe. - * - * Return -1 on error or 0 if all pipes are created. - */ -static int init_thread_quit_pipe(void) -{ - return fd_tracker_util_pipe_open_cloexec( - the_fd_tracker, "Quit pipe", thread_quit_pipe); -} - -/* - * Init health quit pipe. - * - * Return -1 on error or 0 if all pipes are created. - */ -static int init_health_quit_pipe(void) -{ - return fd_tracker_util_pipe_open_cloexec(the_fd_tracker, - "Health quit pipe", health_quit_pipe); -} - -/* - * Create a poll set with O_CLOEXEC and add the thread quit pipe to the set. - */ -static int create_named_thread_poll_set(struct lttng_poll_event *events, - int size, const char *name) -{ - int ret; - - if (events == NULL || size == 0) { - ret = -1; - goto error; - } - - ret = fd_tracker_util_poll_create(the_fd_tracker, - name, events, 1, LTTNG_CLOEXEC); - if (ret) { - PERROR("Failed to create \"%s\" poll file descriptor", name); - goto error; - } - - /* Add quit pipe */ - ret = lttng_poll_add(events, thread_quit_pipe[0], LPOLLIN | LPOLLERR); - if (ret < 0) { - goto error; - } - - return 0; - -error: - return ret; -} - -/* - * Check if the thread quit pipe was triggered. - * - * Return 1 if it was triggered else 0; - */ -static int check_thread_quit_pipe(int fd, uint32_t events) -{ - if (fd == thread_quit_pipe[0] && (events & LPOLLIN)) { - return 1; - } - - return 0; -} - -static int create_sock(void *data, int *out_fd) -{ - int ret; - struct lttcomm_sock *sock = data; - - ret = lttcomm_create_sock(sock); - if (ret < 0) { - goto end; - } - - *out_fd = sock->fd; -end: - return ret; -} - -static int close_sock(void *data, int *in_fd) -{ - struct lttcomm_sock *sock = data; - - return sock->ops->close(sock); -} - -static int accept_sock(void *data, int *out_fd) -{ - int ret = 0; - /* Socks is an array of in_sock, out_sock. */ - struct lttcomm_sock **socks = data; - struct lttcomm_sock *in_sock = socks[0]; - - socks[1] = in_sock->ops->accept(in_sock); - if (!socks[1]) { - ret = -1; - goto end; - } - *out_fd = socks[1]->fd; -end: - return ret; -} - -/* - * Create and init socket from uri. - */ -static struct lttcomm_sock *relay_socket_create(struct lttng_uri *uri, - const char *name) -{ - int ret, sock_fd; - struct lttcomm_sock *sock = NULL; - char uri_str[PATH_MAX]; - char *formated_name = NULL; - - sock = lttcomm_alloc_sock_from_uri(uri); - if (sock == NULL) { - ERR("Allocating socket"); - goto error; - } - - /* - * Don't fail to create the socket if the name can't be built as it is - * only used for debugging purposes. - */ - ret = uri_to_str_url(uri, uri_str, sizeof(uri_str)); - uri_str[sizeof(uri_str) - 1] = '\0'; - if (ret >= 0) { - ret = asprintf(&formated_name, "%s socket @ %s", name, - uri_str); - if (ret < 0) { - formated_name = NULL; - } - } - - ret = fd_tracker_open_unsuspendable_fd(the_fd_tracker, &sock_fd, - (const char **) (formated_name ? &formated_name : NULL), - 1, create_sock, sock); - if (ret) { - PERROR("Failed to open \"%s\" relay socket", - formated_name ?: "Unknown"); - goto error; - } - DBG("Listening on %s socket %d", name, sock->fd); - - ret = sock->ops->bind(sock); - if (ret < 0) { - PERROR("Failed to bind socket"); - goto error; - } - - ret = sock->ops->listen(sock, -1); - if (ret < 0) { - goto error; - - } - - free(formated_name); - return sock; - -error: - if (sock) { - lttcomm_destroy_sock(sock); - } - free(formated_name); - return NULL; -} - -static -struct lttcomm_sock *accept_relayd_sock(struct lttcomm_sock *listening_sock, - const char *name) -{ - int out_fd, ret; - struct lttcomm_sock *socks[2] = { listening_sock, NULL }; - struct lttcomm_sock *new_sock = NULL; - - ret = fd_tracker_open_unsuspendable_fd( - the_fd_tracker, &out_fd, - (const char **) &name, - 1, accept_sock, &socks); - if (ret) { - goto end; - } - new_sock = socks[1]; - DBG("%s accepted, socket %d", name, new_sock->fd); -end: - return new_sock; -} - -/* - * This thread manages the listening for new connections on the network - */ -static void *relay_thread_listener(void *data) -{ - int i, ret, pollfd, err = -1; - uint32_t revents, nb_fd; - struct lttng_poll_event events; - struct lttcomm_sock *control_sock, *data_sock; - - DBG("[thread] Relay listener started"); - - rcu_register_thread(); - health_register(health_relayd, HEALTH_RELAYD_TYPE_LISTENER); - - health_code_update(); - - control_sock = relay_socket_create(control_uri, "Control listener"); - if (!control_sock) { - goto error_sock_control; - } - - data_sock = relay_socket_create(data_uri, "Data listener"); - if (!data_sock) { - goto error_sock_relay; - } - - /* - * Pass 3 as size here for the thread quit pipe, control and - * data socket. - */ - ret = create_named_thread_poll_set(&events, 3, "Listener thread epoll"); - if (ret < 0) { - goto error_create_poll; - } - - /* Add the control socket */ - ret = lttng_poll_add(&events, control_sock->fd, LPOLLIN | LPOLLRDHUP); - if (ret < 0) { - goto error_poll_add; - } - - /* Add the data socket */ - ret = lttng_poll_add(&events, data_sock->fd, LPOLLIN | LPOLLRDHUP); - if (ret < 0) { - goto error_poll_add; - } - - lttng_relay_notify_ready(); - - if (testpoint(relayd_thread_listener)) { - goto error_testpoint; - } - - while (1) { - health_code_update(); - - DBG("Listener accepting connections"); - -restart: - health_poll_entry(); - ret = lttng_poll_wait(&events, -1); - health_poll_exit(); - if (ret < 0) { - /* - * Restart interrupted system call. - */ - if (errno == EINTR) { - goto restart; - } - goto error; - } - - nb_fd = ret; - - DBG("Relay new connection received"); - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - /* Fetch once the poll data */ - revents = LTTNG_POLL_GETEV(&events, i); - pollfd = LTTNG_POLL_GETFD(&events, i); - - /* Thread quit pipe has been closed. Killing thread. */ - ret = check_thread_quit_pipe(pollfd, revents); - if (ret) { - err = 0; - goto exit; - } - - if (revents & LPOLLIN) { - /* - * A new connection is requested, therefore a - * sessiond/consumerd connection is allocated in - * this thread, enqueued to a global queue and - * dequeued (and freed) in the worker thread. - */ - int val = 1; - struct relay_connection *new_conn; - struct lttcomm_sock *newsock = NULL; - enum connection_type type; - - if (pollfd == data_sock->fd) { - type = RELAY_DATA; - newsock = accept_relayd_sock(data_sock, - "Data socket to relayd"); - } else { - LTTNG_ASSERT(pollfd == control_sock->fd); - type = RELAY_CONTROL; - newsock = accept_relayd_sock(control_sock, - "Control socket to relayd"); - } - if (!newsock) { - PERROR("accepting sock"); - goto error; - } - - ret = setsockopt(newsock->fd, SOL_SOCKET, SO_REUSEADDR, &val, - sizeof(val)); - if (ret < 0) { - PERROR("setsockopt inet"); - lttcomm_destroy_sock(newsock); - goto error; - } - - ret = socket_apply_keep_alive_config(newsock->fd); - if (ret < 0) { - ERR("Failed to apply TCP keep-alive configuration on socket (%i)", - newsock->fd); - lttcomm_destroy_sock(newsock); - goto error; - } - - new_conn = connection_create(newsock, type); - if (!new_conn) { - lttcomm_destroy_sock(newsock); - goto error; - } - - /* Enqueue request for the dispatcher thread. */ - cds_wfcq_enqueue(&relay_conn_queue.head, &relay_conn_queue.tail, - &new_conn->qnode); - - /* - * Wake the dispatch queue futex. - * Implicit memory barrier with the - * exchange in cds_wfcq_enqueue. - */ - futex_nto1_wake(&relay_conn_queue.futex); - } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) { - ERR("socket poll error"); - goto error; - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - goto error; - } - } - } - -exit: -error: -error_poll_add: -error_testpoint: - (void) fd_tracker_util_poll_clean(the_fd_tracker, &events); -error_create_poll: - if (data_sock->fd >= 0) { - int data_sock_fd = data_sock->fd; - - ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker, - &data_sock_fd, 1, close_sock, - data_sock); - if (ret) { - PERROR("Failed to close the data listener socket file descriptor"); - } - data_sock->fd = -1; - } - lttcomm_destroy_sock(data_sock); -error_sock_relay: - if (control_sock->fd >= 0) { - int control_sock_fd = control_sock->fd; - - ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker, - &control_sock_fd, 1, close_sock, - control_sock); - if (ret) { - PERROR("Failed to close the control listener socket file descriptor"); - } - control_sock->fd = -1; - } - lttcomm_destroy_sock(control_sock); -error_sock_control: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_relayd); - rcu_unregister_thread(); - DBG("Relay listener thread cleanup complete"); - lttng_relay_stop_threads(); - return NULL; -} - -/* - * This thread manages the dispatching of the requests to worker threads - */ -static void *relay_thread_dispatcher(void *data) -{ - int err = -1; - ssize_t ret; - struct cds_wfcq_node *node; - struct relay_connection *new_conn = NULL; - - DBG("[thread] Relay dispatcher started"); - - health_register(health_relayd, HEALTH_RELAYD_TYPE_DISPATCHER); - - if (testpoint(relayd_thread_dispatcher)) { - goto error_testpoint; - } - - health_code_update(); - - for (;;) { - health_code_update(); - - /* Atomically prepare the queue futex */ - futex_nto1_prepare(&relay_conn_queue.futex); - - if (CMM_LOAD_SHARED(dispatch_thread_exit)) { - break; - } - - do { - health_code_update(); - - /* Dequeue commands */ - node = cds_wfcq_dequeue_blocking(&relay_conn_queue.head, - &relay_conn_queue.tail); - if (node == NULL) { - DBG("Woken up but nothing in the relay command queue"); - /* Continue thread execution */ - break; - } - new_conn = caa_container_of(node, struct relay_connection, qnode); - - DBG("Dispatching request waiting on sock %d", new_conn->sock->fd); - - /* - * Inform worker thread of the new request. This - * call is blocking so we can be assured that - * the data will be read at some point in time - * or wait to the end of the world :) - */ - ret = lttng_write(relay_conn_pipe[1], &new_conn, sizeof(new_conn)); - if (ret < 0) { - PERROR("write connection pipe"); - connection_put(new_conn); - goto error; - } - } while (node != NULL); - - /* Futex wait on queue. Blocking call on futex() */ - health_poll_entry(); - futex_nto1_wait(&relay_conn_queue.futex); - health_poll_exit(); - } - - /* Normal exit, no error */ - err = 0; - -error: -error_testpoint: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_relayd); - DBG("Dispatch thread dying"); - lttng_relay_stop_threads(); - return NULL; -} - -static bool session_streams_have_index(const struct relay_session *session) -{ - return session->minor >= 4 && !session->snapshot; -} - -/* - * Handle the RELAYD_CREATE_SESSION command. - * - * On success, send back the session id or else return a negative value. - */ -static int relay_create_session(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - ssize_t send_ret; - struct relay_session *session = NULL; - struct lttcomm_relayd_create_session_reply_2_11 reply = {}; - char session_name[LTTNG_NAME_MAX] = {}; - char hostname[LTTNG_HOST_NAME_MAX] = {}; - uint32_t live_timer = 0; - bool snapshot = false; - bool session_name_contains_creation_timestamp = false; - /* Left nil for peers < 2.11. */ - char base_path[LTTNG_PATH_MAX] = {}; - lttng_uuid sessiond_uuid = {}; - LTTNG_OPTIONAL(uint64_t) id_sessiond = {}; - LTTNG_OPTIONAL(uint64_t) current_chunk_id = {}; - LTTNG_OPTIONAL(time_t) creation_time = {}; - struct lttng_dynamic_buffer reply_payload; - - lttng_dynamic_buffer_init(&reply_payload); - - if (conn->minor < 4) { - /* From 2.1 to 2.3 */ - ret = 0; - } else if (conn->minor >= 4 && conn->minor < 11) { - /* From 2.4 to 2.10 */ - ret = cmd_create_session_2_4(payload, session_name, - hostname, &live_timer, &snapshot); - } else { - bool has_current_chunk; - uint64_t current_chunk_id_value; - time_t creation_time_value; - uint64_t id_sessiond_value; - - /* From 2.11 to ... */ - ret = cmd_create_session_2_11(payload, session_name, hostname, - base_path, &live_timer, &snapshot, &id_sessiond_value, - sessiond_uuid, &has_current_chunk, - ¤t_chunk_id_value, &creation_time_value, - &session_name_contains_creation_timestamp); - if (lttng_uuid_is_nil(sessiond_uuid)) { - /* The nil UUID is reserved for pre-2.11 clients. */ - ERR("Illegal nil UUID announced by peer in create session command"); - ret = -1; - goto send_reply; - } - LTTNG_OPTIONAL_SET(&id_sessiond, id_sessiond_value); - LTTNG_OPTIONAL_SET(&creation_time, creation_time_value); - if (has_current_chunk) { - LTTNG_OPTIONAL_SET(¤t_chunk_id, - current_chunk_id_value); - } - } - - if (ret < 0) { - goto send_reply; - } - - session = session_create(session_name, hostname, base_path, live_timer, - snapshot, sessiond_uuid, - id_sessiond.is_set ? &id_sessiond.value : NULL, - current_chunk_id.is_set ? ¤t_chunk_id.value : NULL, - creation_time.is_set ? &creation_time.value : NULL, - conn->major, conn->minor, - session_name_contains_creation_timestamp); - if (!session) { - ret = -1; - goto send_reply; - } - LTTNG_ASSERT(!conn->session); - conn->session = session; - DBG("Created session %" PRIu64, session->id); - - reply.generic.session_id = htobe64(session->id); - -send_reply: - if (ret < 0) { - reply.generic.ret_code = htobe32(LTTNG_ERR_FATAL); - } else { - reply.generic.ret_code = htobe32(LTTNG_OK); - } - - if (conn->minor < 11) { - /* From 2.1 to 2.10 */ - ret = lttng_dynamic_buffer_append(&reply_payload, - &reply.generic, sizeof(reply.generic)); - if (ret) { - ERR("Failed to append \"create session\" command reply header to payload buffer"); - ret = -1; - goto end; - } - } else { - const uint32_t output_path_length = - session ? strlen(session->output_path) + 1 : 0; - - reply.output_path_length = htobe32(output_path_length); - ret = lttng_dynamic_buffer_append( - &reply_payload, &reply, sizeof(reply)); - if (ret) { - ERR("Failed to append \"create session\" command reply header to payload buffer"); - goto end; - } - - if (output_path_length) { - ret = lttng_dynamic_buffer_append(&reply_payload, - session->output_path, - output_path_length); - if (ret) { - ERR("Failed to append \"create session\" command reply path to payload buffer"); - goto end; - } - } - } - - send_ret = conn->sock->ops->sendmsg(conn->sock, reply_payload.data, - reply_payload.size, 0); - if (send_ret < (ssize_t) reply_payload.size) { - ERR("Failed to send \"create session\" command reply of %zu bytes (ret = %zd)", - reply_payload.size, send_ret); - ret = -1; - } -end: - if (ret < 0 && session) { - session_put(session); - } - lttng_dynamic_buffer_reset(&reply_payload); - return ret; -} - -/* - * When we have received all the streams and the metadata for a channel, - * we make them visible to the viewer threads. - */ -static void publish_connection_local_streams(struct relay_connection *conn) -{ - struct relay_stream *stream; - struct relay_session *session = conn->session; - - /* - * We publish all streams belonging to a session atomically wrt - * session lock. - */ - pthread_mutex_lock(&session->lock); - rcu_read_lock(); - cds_list_for_each_entry_rcu(stream, &session->recv_list, - recv_node) { - stream_publish(stream); - } - rcu_read_unlock(); - - /* - * Inform the viewer that there are new streams in the session. - */ - if (session->viewer_attached) { - uatomic_set(&session->new_streams, 1); - } - pthread_mutex_unlock(&session->lock); -} - -static int conform_channel_path(char *channel_path) -{ - int ret = 0; - - if (strstr("../", channel_path)) { - ERR("Refusing channel path as it walks up the path hierarchy: \"%s\"", - channel_path); - ret = -1; - goto end; - } - - if (*channel_path == '/') { - const size_t len = strlen(channel_path); - - /* - * Channel paths from peers prior to 2.11 are expressed as an - * absolute path that is, in reality, relative to the relay - * daemon's output directory. Remove the leading slash so it - * is correctly interpreted as a relative path later on. - * - * len (and not len - 1) is used to copy the trailing NULL. - */ - bcopy(channel_path + 1, channel_path, len); - } -end: - return ret; -} - -/* - * relay_add_stream: allocate a new stream for a session - */ -static int relay_add_stream(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct relay_stream *stream = NULL; - struct lttcomm_relayd_status_stream reply; - struct ctf_trace *trace = NULL; - uint64_t stream_handle = -1ULL; - char *path_name = NULL, *channel_name = NULL; - uint64_t tracefile_size = 0, tracefile_count = 0; - LTTNG_OPTIONAL(uint64_t) stream_chunk_id = {}; - - if (!session || !conn->version_check_done) { - ERR("Trying to add a stream before version check"); - ret = -1; - goto end_no_session; - } - - if (session->minor == 1) { - /* For 2.1 */ - ret = cmd_recv_stream_2_1(payload, &path_name, - &channel_name); - } else if (session->minor > 1 && session->minor < 11) { - /* From 2.2 to 2.10 */ - ret = cmd_recv_stream_2_2(payload, &path_name, - &channel_name, &tracefile_size, &tracefile_count); - } else { - /* From 2.11 to ... */ - ret = cmd_recv_stream_2_11(payload, &path_name, - &channel_name, &tracefile_size, &tracefile_count, - &stream_chunk_id.value); - stream_chunk_id.is_set = true; - } - - if (ret < 0) { - goto send_reply; - } - - if (conform_channel_path(path_name)) { - goto send_reply; - } - - /* - * Backward compatibility for --group-output-by-session. - * Prior to lttng 2.11, the complete path is passed by the stream. - * Starting at 2.11, lttng-relayd uses chunk. When dealing with producer - * >=2.11 the chunk is responsible for the output path. When dealing - * with producer < 2.11 the chunk output_path is the root output path - * and the stream carries the complete path (path_name). - * To support --group-output-by-session with older producer (<2.11), we - * need to craft the path based on the stream path. - */ - if (opt_group_output_by == RELAYD_GROUP_OUTPUT_BY_SESSION) { - if (conn->minor < 4) { - /* - * From 2.1 to 2.3, the session_name is not passed on - * the RELAYD_CREATE_SESSION command. The session name - * is necessary to detect the presence of a base_path - * inside the stream path. Without it we cannot perform - * a valid group-output-by-session transformation. - */ - WARN("Unable to perform a --group-by-session transformation for session %" PRIu64 - " for stream with path \"%s\" as it is produced by a peer using a protocol older than v2.4", - session->id, path_name); - } else if (conn->minor >= 4 && conn->minor < 11) { - char *group_by_session_path_name; - - LTTNG_ASSERT(session->session_name[0] != '\0'); - - group_by_session_path_name = - backward_compat_group_by_session( - path_name, - session->session_name, - session->creation_time.value); - if (!group_by_session_path_name) { - ERR("Failed to apply group by session to stream of session %" PRIu64, - session->id); - goto send_reply; - } - - DBG("Transformed session path from \"%s\" to \"%s\" to honor per-session name grouping", - path_name, group_by_session_path_name); - - free(path_name); - path_name = group_by_session_path_name; - } - } - - trace = ctf_trace_get_by_path_or_create(session, path_name); - if (!trace) { - goto send_reply; - } - - /* This stream here has one reference on the trace. */ - pthread_mutex_lock(&last_relay_stream_id_lock); - stream_handle = ++last_relay_stream_id; - pthread_mutex_unlock(&last_relay_stream_id_lock); - - /* We pass ownership of path_name and channel_name. */ - stream = stream_create(trace, stream_handle, path_name, - channel_name, tracefile_size, tracefile_count); - path_name = NULL; - channel_name = NULL; - - /* - * Streams are the owners of their trace. Reference to trace is - * kept within stream_create(). - */ - ctf_trace_put(trace); - -send_reply: - memset(&reply, 0, sizeof(reply)); - reply.handle = htobe64(stream_handle); - if (!stream) { - reply.ret_code = htobe32(LTTNG_ERR_UNK); - } else { - reply.ret_code = htobe32(LTTNG_OK); - } - - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(struct lttcomm_relayd_status_stream), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"add stream\" command reply (ret = %zd)", - send_ret); - ret = -1; - } - -end_no_session: - free(path_name); - free(channel_name); - return ret; -} - -/* - * relay_close_stream: close a specific stream - */ -static int relay_close_stream(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_close_stream stream_info; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - - DBG("Close stream received"); - - if (!session || !conn->version_check_done) { - ERR("Trying to close a stream before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(stream_info)) { - ERR("Unexpected payload size in \"relay_close_stream\": expected >= %zu bytes, got %zu bytes", - sizeof(stream_info), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&stream_info, payload->data, sizeof(stream_info)); - stream_info.stream_id = be64toh(stream_info.stream_id); - stream_info.last_net_seq_num = be64toh(stream_info.last_net_seq_num); - - stream = stream_get_by_id(stream_info.stream_id); - if (!stream) { - ret = -1; - goto end; - } - - /* - * Set last_net_seq_num before the close flag. Required by data - * pending check. - */ - pthread_mutex_lock(&stream->lock); - stream->last_net_seq_num = stream_info.last_net_seq_num; - pthread_mutex_unlock(&stream->lock); - - /* - * This is one of the conditions which may trigger a stream close - * with the others being: - * 1) A close command is received for a stream - * 2) The control connection owning the stream is closed - * 3) We have received all of the stream's data _after_ a close - * request. - */ - try_stream_close(stream); - if (stream->is_metadata) { - struct relay_viewer_stream *vstream; - - vstream = viewer_stream_get_by_id(stream->stream_handle); - if (vstream) { - if (stream->no_new_metadata_notified) { - /* - * Since all the metadata has been sent to the - * viewer and that we have a request to close - * its stream, we can safely teardown the - * corresponding metadata viewer stream. - */ - viewer_stream_put(vstream); - } - /* Put local reference. */ - viewer_stream_put(vstream); - } - } - stream_put(stream); - ret = 0; - -end: - memset(&reply, 0, sizeof(reply)); - if (ret < 0) { - reply.ret_code = htobe32(LTTNG_ERR_UNK); - } else { - reply.ret_code = htobe32(LTTNG_OK); - } - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(struct lttcomm_relayd_generic_reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"close stream\" command reply (ret = %zd)", - send_ret); - ret = -1; - } - -end_no_session: - return ret; -} - -/* - * relay_reset_metadata: reset a metadata stream - */ -static -int relay_reset_metadata(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_reset_metadata stream_info; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - - DBG("Reset metadata received"); - - if (!session || !conn->version_check_done) { - ERR("Trying to reset a metadata stream before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(stream_info)) { - ERR("Unexpected payload size in \"relay_reset_metadata\": expected >= %zu bytes, got %zu bytes", - sizeof(stream_info), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&stream_info, payload->data, sizeof(stream_info)); - stream_info.stream_id = be64toh(stream_info.stream_id); - stream_info.version = be64toh(stream_info.version); - - DBG("Update metadata to version %" PRIu64, stream_info.version); - - /* Unsupported for live sessions for now. */ - if (session->live_timer != 0) { - ret = -1; - goto end; - } - - stream = stream_get_by_id(stream_info.stream_id); - if (!stream) { - ret = -1; - goto end; - } - pthread_mutex_lock(&stream->lock); - if (!stream->is_metadata) { - ret = -1; - goto end_unlock; - } - - ret = stream_reset_file(stream); - if (ret < 0) { - ERR("Failed to reset metadata stream %" PRIu64 - ": stream_path = %s, channel = %s", - stream->stream_handle, stream->path_name, - stream->channel_name); - goto end_unlock; - } -end_unlock: - pthread_mutex_unlock(&stream->lock); - stream_put(stream); - -end: - memset(&reply, 0, sizeof(reply)); - if (ret < 0) { - reply.ret_code = htobe32(LTTNG_ERR_UNK); - } else { - reply.ret_code = htobe32(LTTNG_OK); - } - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(struct lttcomm_relayd_generic_reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"reset metadata\" command reply (ret = %zd)", - send_ret); - ret = -1; - } - -end_no_session: - return ret; -} - -/* - * relay_unknown_command: send -1 if received unknown command - */ -static void relay_unknown_command(struct relay_connection *conn) -{ - struct lttcomm_relayd_generic_reply reply; - ssize_t send_ret; - - memset(&reply, 0, sizeof(reply)); - reply.ret_code = htobe32(LTTNG_ERR_UNK); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < sizeof(reply)) { - ERR("Failed to send \"unknown command\" command reply (ret = %zd)", send_ret); - } -} - -/* - * relay_start: send an acknowledgment to the client to tell if we are - * ready to receive data. We are ready if a session is established. - */ -static int relay_start(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - ssize_t send_ret; - struct lttcomm_relayd_generic_reply reply; - struct relay_session *session = conn->session; - - if (!session) { - DBG("Trying to start the streaming without a session established"); - ret = htobe32(LTTNG_ERR_UNK); - } - - memset(&reply, 0, sizeof(reply)); - reply.ret_code = htobe32(LTTNG_OK); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"relay_start\" command reply (ret = %zd)", - send_ret); - ret = -1; - } - - return ret; -} - -/* - * relay_recv_metadata: receive the metadata for the session. - */ -static int relay_recv_metadata(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - struct relay_session *session = conn->session; - struct lttcomm_relayd_metadata_payload metadata_payload_header; - struct relay_stream *metadata_stream; - uint64_t metadata_payload_size; - struct lttng_buffer_view packet_view; - - if (!session) { - ERR("Metadata sent before version check"); - ret = -1; - goto end; - } - - if (recv_hdr->data_size < sizeof(struct lttcomm_relayd_metadata_payload)) { - ERR("Incorrect data size"); - ret = -1; - goto end; - } - metadata_payload_size = recv_hdr->data_size - - sizeof(struct lttcomm_relayd_metadata_payload); - - memcpy(&metadata_payload_header, payload->data, - sizeof(metadata_payload_header)); - metadata_payload_header.stream_id = be64toh( - metadata_payload_header.stream_id); - metadata_payload_header.padding_size = be32toh( - metadata_payload_header.padding_size); - - metadata_stream = stream_get_by_id(metadata_payload_header.stream_id); - if (!metadata_stream) { - ret = -1; - goto end; - } - - packet_view = lttng_buffer_view_from_view(payload, - sizeof(metadata_payload_header), metadata_payload_size); - if (!lttng_buffer_view_is_valid(&packet_view)) { - ERR("Invalid metadata packet length announced by header"); - ret = -1; - goto end_put; - } - - pthread_mutex_lock(&metadata_stream->lock); - ret = stream_write(metadata_stream, &packet_view, - metadata_payload_header.padding_size); - pthread_mutex_unlock(&metadata_stream->lock); - if (ret){ - ret = -1; - goto end_put; - } -end_put: - stream_put(metadata_stream); -end: - return ret; -} - -/* - * relay_send_version: send relayd version number - */ -static int relay_send_version(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct lttcomm_relayd_version reply, msg; - bool compatible = true; - - conn->version_check_done = true; - - /* Get version from the other side. */ - if (payload->size < sizeof(msg)) { - ERR("Unexpected payload size in \"relay_send_version\": expected >= %zu bytes, got %zu bytes", - sizeof(msg), payload->size); - ret = -1; - goto end; - } - - memcpy(&msg, payload->data, sizeof(msg)); - msg.major = be32toh(msg.major); - msg.minor = be32toh(msg.minor); - - memset(&reply, 0, sizeof(reply)); - reply.major = RELAYD_VERSION_COMM_MAJOR; - reply.minor = RELAYD_VERSION_COMM_MINOR; - - /* Major versions must be the same */ - if (reply.major != msg.major) { - DBG("Incompatible major versions (%u vs %u), deleting session", - reply.major, msg.major); - compatible = false; - } - - conn->major = reply.major; - /* We adapt to the lowest compatible version */ - if (reply.minor <= msg.minor) { - conn->minor = reply.minor; - } else { - conn->minor = msg.minor; - } - - reply.major = htobe32(reply.major); - reply.minor = htobe32(reply.minor); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"send version\" command reply (ret = %zd)", - send_ret); - ret = -1; - goto end; - } else { - ret = 0; - } - - if (!compatible) { - ret = -1; - goto end; - } - - DBG("Version check done using protocol %u.%u", conn->major, - conn->minor); - -end: - return ret; -} - -/* - * Check for data pending for a given stream id from the session daemon. - */ -static int relay_data_pending(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - struct relay_session *session = conn->session; - struct lttcomm_relayd_data_pending msg; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - ssize_t send_ret; - int ret; - uint64_t stream_seq; - - DBG("Data pending command received"); - - if (!session || !conn->version_check_done) { - ERR("Trying to check for data before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(msg)) { - ERR("Unexpected payload size in \"relay_data_pending\": expected >= %zu bytes, got %zu bytes", - sizeof(msg), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&msg, payload->data, sizeof(msg)); - msg.stream_id = be64toh(msg.stream_id); - msg.last_net_seq_num = be64toh(msg.last_net_seq_num); - - stream = stream_get_by_id(msg.stream_id); - if (stream == NULL) { - ret = -1; - goto end; - } - - pthread_mutex_lock(&stream->lock); - - if (session_streams_have_index(session)) { - /* - * Ensure that both the index and stream data have been - * flushed up to the requested point. - */ - stream_seq = min(stream->prev_data_seq, stream->prev_index_seq); - } else { - stream_seq = stream->prev_data_seq; - } - DBG("Data pending for stream id %" PRIu64 ": prev_data_seq %" PRIu64 - ", prev_index_seq %" PRIu64 - ", and last_seq %" PRIu64, msg.stream_id, - stream->prev_data_seq, stream->prev_index_seq, - msg.last_net_seq_num); - - /* Avoid wrapping issue */ - if (((int64_t) (stream_seq - msg.last_net_seq_num)) >= 0) { - /* Data has in fact been written and is NOT pending */ - ret = 0; - } else { - /* Data still being streamed thus pending */ - ret = 1; - } - - stream->data_pending_check_done = true; - pthread_mutex_unlock(&stream->lock); - - stream_put(stream); -end: - - memset(&reply, 0, sizeof(reply)); - reply.ret_code = htobe32(ret); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"data pending\" command reply (ret = %zd)", - send_ret); - ret = -1; - } - -end_no_session: - return ret; -} - -/* - * Wait for the control socket to reach a quiescent state. - * - * Note that for now, when receiving this command from the session - * daemon, this means that every subsequent commands or data received on - * the control socket has been handled. So, this is why we simply return - * OK here. - */ -static int relay_quiescent_control(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct relay_stream *stream; - struct lttcomm_relayd_quiescent_control msg; - struct lttcomm_relayd_generic_reply reply; - - DBG("Checking quiescent state on control socket"); - - if (!conn->session || !conn->version_check_done) { - ERR("Trying to check for data before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(msg)) { - ERR("Unexpected payload size in \"relay_quiescent_control\": expected >= %zu bytes, got %zu bytes", - sizeof(msg), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&msg, payload->data, sizeof(msg)); - msg.stream_id = be64toh(msg.stream_id); - - stream = stream_get_by_id(msg.stream_id); - if (!stream) { - goto reply; - } - pthread_mutex_lock(&stream->lock); - stream->data_pending_check_done = true; - pthread_mutex_unlock(&stream->lock); - - DBG("Relay quiescent control pending flag set to %" PRIu64, msg.stream_id); - stream_put(stream); -reply: - memset(&reply, 0, sizeof(reply)); - reply.ret_code = htobe32(LTTNG_OK); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"quiescent control\" command reply (ret = %zd)", - send_ret); - ret = -1; - } else { - ret = 0; - } - -end_no_session: - return ret; -} - -/* - * Initialize a data pending command. This means that a consumer is about - * to ask for data pending for each stream it holds. Simply iterate over - * all streams of a session and set the data_pending_check_done flag. - * - * This command returns to the client a LTTNG_OK code. - */ -static int relay_begin_data_pending(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct lttng_ht_iter iter; - struct lttcomm_relayd_begin_data_pending msg; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - - LTTNG_ASSERT(recv_hdr); - LTTNG_ASSERT(conn); - - DBG("Init streams for data pending"); - - if (!conn->session || !conn->version_check_done) { - ERR("Trying to check for data before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(msg)) { - ERR("Unexpected payload size in \"relay_begin_data_pending\": expected >= %zu bytes, got %zu bytes", - sizeof(msg), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&msg, payload->data, sizeof(msg)); - msg.session_id = be64toh(msg.session_id); - - /* - * Iterate over all streams to set the begin data pending flag. - * For now, the streams are indexed by stream handle so we have - * to iterate over all streams to find the one associated with - * the right session_id. - */ - rcu_read_lock(); - cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream, - node.node) { - if (!stream_get(stream)) { - continue; - } - if (stream->trace->session->id == msg.session_id) { - pthread_mutex_lock(&stream->lock); - stream->data_pending_check_done = false; - pthread_mutex_unlock(&stream->lock); - DBG("Set begin data pending flag to stream %" PRIu64, - stream->stream_handle); - } - stream_put(stream); - } - rcu_read_unlock(); - - memset(&reply, 0, sizeof(reply)); - /* All good, send back reply. */ - reply.ret_code = htobe32(LTTNG_OK); - - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"begin data pending\" command reply (ret = %zd)", - send_ret); - ret = -1; - } else { - ret = 0; - } - -end_no_session: - return ret; -} - -/* - * End data pending command. This will check, for a given session id, if - * each stream associated with it has its data_pending_check_done flag - * set. If not, this means that the client lost track of the stream but - * the data is still being streamed on our side. In this case, we inform - * the client that data is in flight. - * - * Return to the client if there is data in flight or not with a ret_code. - */ -static int relay_end_data_pending(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct lttng_ht_iter iter; - struct lttcomm_relayd_end_data_pending msg; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - uint32_t is_data_inflight = 0; - - DBG("End data pending command"); - - if (!conn->session || !conn->version_check_done) { - ERR("Trying to check for data before version check"); - ret = -1; - goto end_no_session; - } - - if (payload->size < sizeof(msg)) { - ERR("Unexpected payload size in \"relay_end_data_pending\": expected >= %zu bytes, got %zu bytes", - sizeof(msg), payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&msg, payload->data, sizeof(msg)); - msg.session_id = be64toh(msg.session_id); - - /* - * Iterate over all streams to see if the begin data pending - * flag is set. - */ - rcu_read_lock(); - cds_lfht_for_each_entry(relay_streams_ht->ht, &iter.iter, stream, - node.node) { - if (!stream_get(stream)) { - continue; - } - if (stream->trace->session->id != msg.session_id) { - stream_put(stream); - continue; - } - pthread_mutex_lock(&stream->lock); - if (!stream->data_pending_check_done) { - uint64_t stream_seq; - - if (session_streams_have_index(conn->session)) { - /* - * Ensure that both the index and stream data have been - * flushed up to the requested point. - */ - stream_seq = min(stream->prev_data_seq, stream->prev_index_seq); - } else { - stream_seq = stream->prev_data_seq; - } - if (!stream->closed || !(((int64_t) (stream_seq - stream->last_net_seq_num)) >= 0)) { - is_data_inflight = 1; - DBG("Data is still in flight for stream %" PRIu64, - stream->stream_handle); - pthread_mutex_unlock(&stream->lock); - stream_put(stream); - break; - } - } - pthread_mutex_unlock(&stream->lock); - stream_put(stream); - } - rcu_read_unlock(); - - memset(&reply, 0, sizeof(reply)); - /* All good, send back reply. */ - reply.ret_code = htobe32(is_data_inflight); - - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"end data pending\" command reply (ret = %zd)", - send_ret); - ret = -1; - } else { - ret = 0; - } - -end_no_session: - return ret; -} - -/* - * Receive an index for a specific stream. - * - * Return 0 on success else a negative value. - */ -static int relay_recv_index(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_index index_info; - struct lttcomm_relayd_generic_reply reply; - struct relay_stream *stream; - size_t msg_len; - - LTTNG_ASSERT(conn); - - DBG("Relay receiving index"); - - if (!session || !conn->version_check_done) { - ERR("Trying to close a stream before version check"); - ret = -1; - goto end_no_session; - } - - msg_len = lttcomm_relayd_index_len( - lttng_to_index_major(conn->major, conn->minor), - lttng_to_index_minor(conn->major, conn->minor)); - if (payload->size < msg_len) { - ERR("Unexpected payload size in \"relay_recv_index\": expected >= %zu bytes, got %zu bytes", - msg_len, payload->size); - ret = -1; - goto end_no_session; - } - memcpy(&index_info, payload->data, msg_len); - index_info.relay_stream_id = be64toh(index_info.relay_stream_id); - index_info.net_seq_num = be64toh(index_info.net_seq_num); - index_info.packet_size = be64toh(index_info.packet_size); - index_info.content_size = be64toh(index_info.content_size); - index_info.timestamp_begin = be64toh(index_info.timestamp_begin); - index_info.timestamp_end = be64toh(index_info.timestamp_end); - index_info.events_discarded = be64toh(index_info.events_discarded); - index_info.stream_id = be64toh(index_info.stream_id); - - if (conn->minor >= 8) { - index_info.stream_instance_id = - be64toh(index_info.stream_instance_id); - index_info.packet_seq_num = be64toh(index_info.packet_seq_num); - } else { - index_info.stream_instance_id = -1ULL; - index_info.packet_seq_num = -1ULL; - } - - stream = stream_get_by_id(index_info.relay_stream_id); - if (!stream) { - ERR("stream_get_by_id not found"); - ret = -1; - goto end; - } - - pthread_mutex_lock(&stream->lock); - ret = stream_add_index(stream, &index_info); - pthread_mutex_unlock(&stream->lock); - if (ret) { - goto end_stream_put; - } - -end_stream_put: - stream_put(stream); -end: - memset(&reply, 0, sizeof(reply)); - if (ret < 0) { - reply.ret_code = htobe32(LTTNG_ERR_UNK); - } else { - reply.ret_code = htobe32(LTTNG_OK); - } - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"recv index\" command reply (ret = %zd)", send_ret); - ret = -1; - } - -end_no_session: - return ret; -} - -/* - * Receive the streams_sent message. - * - * Return 0 on success else a negative value. - */ -static int relay_streams_sent(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret; - ssize_t send_ret; - struct lttcomm_relayd_generic_reply reply; - - LTTNG_ASSERT(conn); - - DBG("Relay receiving streams_sent"); - - if (!conn->session || !conn->version_check_done) { - ERR("Trying to close a stream before version check"); - ret = -1; - goto end_no_session; - } - - /* - * Publish every pending stream in the connection recv list which are - * now ready to be used by the viewer. - */ - publish_connection_local_streams(conn); - - memset(&reply, 0, sizeof(reply)); - reply.ret_code = htobe32(LTTNG_OK); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"streams sent\" command reply (ret = %zd)", - send_ret); - ret = -1; - } else { - /* Success. */ - ret = 0; - } - -end_no_session: - return ret; -} - -/* - * relay_rotate_session_stream: rotate a stream to a new tracefile for the - * session rotation feature (not the tracefile rotation feature). - */ -static int relay_rotate_session_streams( - const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - uint32_t i; - ssize_t send_ret; - enum lttng_error_code reply_code = LTTNG_ERR_UNK; - struct relay_session *session = conn->session; - struct lttcomm_relayd_rotate_streams rotate_streams; - struct lttcomm_relayd_generic_reply reply = {}; - struct relay_stream *stream = NULL; - const size_t header_len = sizeof(struct lttcomm_relayd_rotate_streams); - struct lttng_trace_chunk *next_trace_chunk = NULL; - struct lttng_buffer_view stream_positions; - char chunk_id_buf[MAX_INT_DEC_LEN(uint64_t)]; - const char *chunk_id_str = "none"; - - if (!session || !conn->version_check_done) { - ERR("Trying to rotate a stream before version check"); - ret = -1; - goto end_no_reply; - } - - if (session->major == 2 && session->minor < 11) { - ERR("Unsupported feature before 2.11"); - ret = -1; - goto end_no_reply; - } - - if (payload->size < header_len) { - ERR("Unexpected payload size in \"relay_rotate_session_stream\": expected >= %zu bytes, got %zu bytes", - header_len, payload->size); - ret = -1; - goto end_no_reply; - } - - memcpy(&rotate_streams, payload->data, header_len); - - /* Convert header to host endianness. */ - rotate_streams = (typeof(rotate_streams)) { - .stream_count = be32toh(rotate_streams.stream_count), - .new_chunk_id = (typeof(rotate_streams.new_chunk_id)) { - .is_set = !!rotate_streams.new_chunk_id.is_set, - .value = be64toh(rotate_streams.new_chunk_id.value), - } - }; - - if (rotate_streams.new_chunk_id.is_set) { - /* - * Retrieve the trace chunk the stream must transition to. As - * per the protocol, this chunk should have been created - * before this command is received. - */ - next_trace_chunk = sessiond_trace_chunk_registry_get_chunk( - sessiond_trace_chunk_registry, - session->sessiond_uuid, session->id, - rotate_streams.new_chunk_id.value); - if (!next_trace_chunk) { - char uuid_str[LTTNG_UUID_STR_LEN]; - - lttng_uuid_to_str(session->sessiond_uuid, uuid_str); - ERR("Unknown next trace chunk in ROTATE_STREAMS command: sessiond_uuid = {%s}, session_id = %" PRIu64 - ", trace_chunk_id = %" PRIu64, - uuid_str, session->id, - rotate_streams.new_chunk_id.value); - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - ret = -1; - goto end; - } - - ret = snprintf(chunk_id_buf, sizeof(chunk_id_buf), "%" PRIu64, - rotate_streams.new_chunk_id.value); - if (ret < 0 || ret >= sizeof(chunk_id_buf)) { - chunk_id_str = "formatting error"; - } else { - chunk_id_str = chunk_id_buf; - } - } - - DBG("Rotate %" PRIu32 " streams of session \"%s\" to chunk \"%s\"", - rotate_streams.stream_count, session->session_name, - chunk_id_str); - - stream_positions = lttng_buffer_view_from_view(payload, - sizeof(rotate_streams), -1); - if (!stream_positions.data || - stream_positions.size < - (rotate_streams.stream_count * - sizeof(struct lttcomm_relayd_stream_rotation_position))) { - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - ret = -1; - goto end; - } - - for (i = 0; i < rotate_streams.stream_count; i++) { - struct lttcomm_relayd_stream_rotation_position *position_comm = - &((typeof(position_comm)) stream_positions.data)[i]; - const struct lttcomm_relayd_stream_rotation_position pos = { - .stream_id = be64toh(position_comm->stream_id), - .rotate_at_seq_num = be64toh( - position_comm->rotate_at_seq_num), - }; - - stream = stream_get_by_id(pos.stream_id); - if (!stream) { - reply_code = LTTNG_ERR_INVALID; - ret = -1; - goto end; - } - - pthread_mutex_lock(&stream->lock); - ret = stream_set_pending_rotation(stream, next_trace_chunk, - pos.rotate_at_seq_num); - pthread_mutex_unlock(&stream->lock); - if (ret) { - reply_code = LTTNG_ERR_FILE_CREATION_ERROR; - goto end; - } - - stream_put(stream); - stream = NULL; - } - - reply_code = LTTNG_OK; - ret = 0; -end: - if (stream) { - stream_put(stream); - } - - reply.ret_code = htobe32((uint32_t) reply_code); - send_ret = conn->sock->ops->sendmsg(conn->sock, &reply, - sizeof(struct lttcomm_relayd_generic_reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"rotate session stream\" command reply (ret = %zd)", - send_ret); - ret = -1; - } -end_no_reply: - lttng_trace_chunk_put(next_trace_chunk); - return ret; -} - - - -/* - * relay_create_trace_chunk: create a new trace chunk - */ -static int relay_create_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_create_trace_chunk *msg; - struct lttcomm_relayd_generic_reply reply = {}; - struct lttng_buffer_view header_view; - struct lttng_trace_chunk *chunk = NULL, *published_chunk = NULL; - enum lttng_error_code reply_code = LTTNG_OK; - enum lttng_trace_chunk_status chunk_status; - const char *new_path; - - if (!session || !conn->version_check_done) { - ERR("Trying to create a trace chunk before version check"); - ret = -1; - goto end_no_reply; - } - - if (session->major == 2 && session->minor < 11) { - ERR("Chunk creation command is unsupported before 2.11"); - ret = -1; - goto end_no_reply; - } - - header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg)); - if (!lttng_buffer_view_is_valid(&header_view)) { - ERR("Failed to receive payload of chunk creation command"); - ret = -1; - goto end_no_reply; - } - - /* Convert to host endianness. */ - msg = (typeof(msg)) header_view.data; - msg->chunk_id = be64toh(msg->chunk_id); - msg->creation_timestamp = be64toh(msg->creation_timestamp); - msg->override_name_length = be32toh(msg->override_name_length); - - if (session->current_trace_chunk && - !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) { - chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk, - DEFAULT_CHUNK_TMP_OLD_DIRECTORY); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ERR("Failed to rename old chunk"); - ret = -1; - reply_code = LTTNG_ERR_UNK; - goto end; - } - } - session->ongoing_rotation = true; - if (!session->current_trace_chunk) { - if (!session->has_rotated) { - new_path = ""; - } else { - new_path = NULL; - } - } else { - new_path = DEFAULT_CHUNK_TMP_NEW_DIRECTORY; - } - chunk = lttng_trace_chunk_create( - msg->chunk_id, msg->creation_timestamp, new_path); - if (!chunk) { - ERR("Failed to create trace chunk in trace chunk creation command"); - ret = -1; - reply_code = LTTNG_ERR_NOMEM; - goto end; - } - lttng_trace_chunk_set_fd_tracker(chunk, the_fd_tracker); - - if (msg->override_name_length) { - const char *name; - const struct lttng_buffer_view chunk_name_view = - lttng_buffer_view_from_view(payload, - sizeof(*msg), - msg->override_name_length); - - if (!lttng_buffer_view_is_valid(&chunk_name_view)) { - ERR("Invalid payload of chunk creation command (protocol error): buffer too short for expected name length"); - ret = -1; - reply_code = LTTNG_ERR_INVALID; - goto end; - } - - name = chunk_name_view.data; - if (name[msg->override_name_length - 1]) { - ERR("Invalid payload of chunk creation command (protocol error): name is not null-terminated"); - ret = -1; - reply_code = LTTNG_ERR_INVALID; - goto end; - } - - chunk_status = lttng_trace_chunk_override_name( - chunk, chunk_name_view.data); - switch (chunk_status) { - case LTTNG_TRACE_CHUNK_STATUS_OK: - break; - case LTTNG_TRACE_CHUNK_STATUS_INVALID_ARGUMENT: - ERR("Failed to set the name of new trace chunk in trace chunk creation command (invalid name)"); - reply_code = LTTNG_ERR_INVALID; - ret = -1; - goto end; - default: - ERR("Failed to set the name of new trace chunk in trace chunk creation command (unknown error)"); - reply_code = LTTNG_ERR_UNK; - ret = -1; - goto end; - } - } - - chunk_status = lttng_trace_chunk_set_credentials_current_user(chunk); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - reply_code = LTTNG_ERR_UNK; - ret = -1; - goto end; - } - - LTTNG_ASSERT(conn->session->output_directory); - chunk_status = lttng_trace_chunk_set_as_owner(chunk, - conn->session->output_directory); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - reply_code = LTTNG_ERR_UNK; - ret = -1; - goto end; - } - - published_chunk = sessiond_trace_chunk_registry_publish_chunk( - sessiond_trace_chunk_registry, - conn->session->sessiond_uuid, - conn->session->id, - chunk); - if (!published_chunk) { - char uuid_str[LTTNG_UUID_STR_LEN]; - - lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str); - ERR("Failed to publish chunk: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64, - uuid_str, - conn->session->id, - msg->chunk_id); - ret = -1; - reply_code = LTTNG_ERR_NOMEM; - goto end; - } - - pthread_mutex_lock(&conn->session->lock); - if (conn->session->pending_closure_trace_chunk) { - /* - * Invalid; this means a second create_trace_chunk command was - * received before a close_trace_chunk. - */ - ERR("Invalid trace chunk close command received; a trace chunk is already waiting for a trace chunk close command"); - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - ret = -1; - goto end_unlock_session; - } - conn->session->pending_closure_trace_chunk = - conn->session->current_trace_chunk; - conn->session->current_trace_chunk = published_chunk; - published_chunk = NULL; - if (!conn->session->pending_closure_trace_chunk) { - session->ongoing_rotation = false; - } -end_unlock_session: - pthread_mutex_unlock(&conn->session->lock); -end: - reply.ret_code = htobe32((uint32_t) reply_code); - send_ret = conn->sock->ops->sendmsg(conn->sock, - &reply, - sizeof(struct lttcomm_relayd_generic_reply), - 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)", - send_ret); - ret = -1; - } -end_no_reply: - lttng_trace_chunk_put(chunk); - lttng_trace_chunk_put(published_chunk); - return ret; -} - -/* - * relay_close_trace_chunk: close a trace chunk - */ -static int relay_close_trace_chunk(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0, buf_ret; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_close_trace_chunk *msg; - struct lttcomm_relayd_close_trace_chunk_reply reply = {}; - struct lttng_buffer_view header_view; - struct lttng_trace_chunk *chunk = NULL; - enum lttng_error_code reply_code = LTTNG_OK; - enum lttng_trace_chunk_status chunk_status; - uint64_t chunk_id; - LTTNG_OPTIONAL(enum lttng_trace_chunk_command_type) close_command = {}; - time_t close_timestamp; - char closed_trace_chunk_path[LTTNG_PATH_MAX]; - size_t path_length = 0; - const char *chunk_name = NULL; - struct lttng_dynamic_buffer reply_payload; - const char *new_path; - - lttng_dynamic_buffer_init(&reply_payload); - - if (!session || !conn->version_check_done) { - ERR("Trying to close a trace chunk before version check"); - ret = -1; - goto end_no_reply; - } - - if (session->major == 2 && session->minor < 11) { - ERR("Chunk close command is unsupported before 2.11"); - ret = -1; - goto end_no_reply; - } - - header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg)); - if (!lttng_buffer_view_is_valid(&header_view)) { - ERR("Failed to receive payload of chunk close command"); - ret = -1; - goto end_no_reply; - } - - /* Convert to host endianness. */ - msg = (typeof(msg)) header_view.data; - chunk_id = be64toh(msg->chunk_id); - close_timestamp = (time_t) be64toh(msg->close_timestamp); - close_command = (typeof(close_command)){ - .value = be32toh(msg->close_command.value), - .is_set = msg->close_command.is_set, - }; - - chunk = sessiond_trace_chunk_registry_get_chunk( - sessiond_trace_chunk_registry, - conn->session->sessiond_uuid, - conn->session->id, - chunk_id); - if (!chunk) { - char uuid_str[LTTNG_UUID_STR_LEN]; - - lttng_uuid_to_str(conn->session->sessiond_uuid, uuid_str); - ERR("Failed to find chunk to close: sessiond_uuid = %s, session_id = %" PRIu64 ", chunk_id = %" PRIu64, - uuid_str, - conn->session->id, - msg->chunk_id); - ret = -1; - reply_code = LTTNG_ERR_NOMEM; - goto end; - } - - pthread_mutex_lock(&session->lock); - if (close_command.is_set && - close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE) { - /* - * Clear command. It is a protocol error to ask for a - * clear on a relay which does not allow it. Querying - * the configuration allows figuring out whether - * clearing is allowed before doing the clear. - */ - if (!opt_allow_clear) { - ret = -1; - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - goto end_unlock_session; - } - } - if (session->pending_closure_trace_chunk && - session->pending_closure_trace_chunk != chunk) { - ERR("Trace chunk close command for session \"%s\" does not target the trace chunk pending closure", - session->session_name); - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - ret = -1; - goto end_unlock_session; - } - - if (session->current_trace_chunk && session->current_trace_chunk != chunk && - !lttng_trace_chunk_get_name_overridden(session->current_trace_chunk)) { - if (close_command.is_set && - close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_DELETE && - !session->has_rotated) { - /* New chunk stays in session output directory. */ - new_path = ""; - } else { - /* Use chunk name for new chunk. */ - new_path = NULL; - } - /* Rename new chunk path. */ - chunk_status = lttng_trace_chunk_rename_path(session->current_trace_chunk, - new_path); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ret = -1; - goto end_unlock_session; - } - session->ongoing_rotation = false; - } - if ((!close_command.is_set || - close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_NO_OPERATION) && - !lttng_trace_chunk_get_name_overridden(chunk)) { - const char *old_path; - - if (!session->has_rotated) { - old_path = ""; - } else { - old_path = NULL; - } - /* We need to move back the .tmp_old_chunk to its rightful place. */ - chunk_status = lttng_trace_chunk_rename_path(chunk, old_path); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ret = -1; - goto end_unlock_session; - } - } - chunk_status = lttng_trace_chunk_set_close_timestamp( - chunk, close_timestamp); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ERR("Failed to set trace chunk close timestamp"); - ret = -1; - reply_code = LTTNG_ERR_UNK; - goto end_unlock_session; - } - - if (close_command.is_set) { - chunk_status = lttng_trace_chunk_set_close_command( - chunk, close_command.value); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ret = -1; - reply_code = LTTNG_ERR_INVALID; - goto end_unlock_session; - } - } - chunk_status = lttng_trace_chunk_get_name(chunk, &chunk_name, NULL); - if (chunk_status != LTTNG_TRACE_CHUNK_STATUS_OK) { - ERR("Failed to get chunk name"); - ret = -1; - reply_code = LTTNG_ERR_UNK; - goto end_unlock_session; - } - if (!session->has_rotated && !session->snapshot) { - ret = lttng_strncpy(closed_trace_chunk_path, - session->output_path, - sizeof(closed_trace_chunk_path)); - if (ret) { - ERR("Failed to send trace chunk path: path length of %zu bytes exceeds the maximal allowed length of %zu bytes", - strlen(session->output_path), - sizeof(closed_trace_chunk_path)); - reply_code = LTTNG_ERR_NOMEM; - ret = -1; - goto end_unlock_session; - } - } else { - if (session->snapshot) { - ret = snprintf(closed_trace_chunk_path, - sizeof(closed_trace_chunk_path), - "%s/%s", session->output_path, - chunk_name); - } else { - ret = snprintf(closed_trace_chunk_path, - sizeof(closed_trace_chunk_path), - "%s/" DEFAULT_ARCHIVED_TRACE_CHUNKS_DIRECTORY - "/%s", - session->output_path, chunk_name); - } - if (ret < 0 || ret == sizeof(closed_trace_chunk_path)) { - ERR("Failed to format closed trace chunk resulting path"); - reply_code = ret < 0 ? LTTNG_ERR_UNK : LTTNG_ERR_NOMEM; - ret = -1; - goto end_unlock_session; - } - } - if (close_command.is_set && - close_command.value == LTTNG_TRACE_CHUNK_COMMAND_TYPE_MOVE_TO_COMPLETED) { - session->has_rotated = true; - } - DBG("Reply chunk path on close: %s", closed_trace_chunk_path); - path_length = strlen(closed_trace_chunk_path) + 1; - if (path_length > UINT32_MAX) { - ERR("Closed trace chunk path exceeds the maximal length allowed by the protocol"); - ret = -1; - reply_code = LTTNG_ERR_INVALID_PROTOCOL; - goto end_unlock_session; - } - - if (session->current_trace_chunk == chunk) { - /* - * After a trace chunk close command, no new streams - * referencing the chunk may be created. Hence, on the - * event that no new trace chunk have been created for - * the session, the reference to the current trace chunk - * is released in order to allow it to be reclaimed when - * the last stream releases its reference to it. - */ - lttng_trace_chunk_put(session->current_trace_chunk); - session->current_trace_chunk = NULL; - } - lttng_trace_chunk_put(session->pending_closure_trace_chunk); - session->pending_closure_trace_chunk = NULL; -end_unlock_session: - pthread_mutex_unlock(&session->lock); - -end: - reply.generic.ret_code = htobe32((uint32_t) reply_code); - reply.path_length = htobe32((uint32_t) path_length); - buf_ret = lttng_dynamic_buffer_append( - &reply_payload, &reply, sizeof(reply)); - if (buf_ret) { - ERR("Failed to append \"close trace chunk\" command reply header to payload buffer"); - goto end_no_reply; - } - - if (reply_code == LTTNG_OK) { - buf_ret = lttng_dynamic_buffer_append(&reply_payload, - closed_trace_chunk_path, path_length); - if (buf_ret) { - ERR("Failed to append \"close trace chunk\" command reply path to payload buffer"); - goto end_no_reply; - } - } - - send_ret = conn->sock->ops->sendmsg(conn->sock, - reply_payload.data, - reply_payload.size, - 0); - if (send_ret < reply_payload.size) { - ERR("Failed to send \"close trace chunk\" command reply of %zu bytes (ret = %zd)", - reply_payload.size, send_ret); - ret = -1; - goto end_no_reply; - } -end_no_reply: - lttng_trace_chunk_put(chunk); - lttng_dynamic_buffer_reset(&reply_payload); - return ret; -} - -/* - * relay_trace_chunk_exists: check if a trace chunk exists - */ -static int relay_trace_chunk_exists(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - ssize_t send_ret; - struct relay_session *session = conn->session; - struct lttcomm_relayd_trace_chunk_exists *msg; - struct lttcomm_relayd_trace_chunk_exists_reply reply = {}; - struct lttng_buffer_view header_view; - uint64_t chunk_id; - bool chunk_exists; - - if (!session || !conn->version_check_done) { - ERR("Trying to check for the existance of a trace chunk before version check"); - ret = -1; - goto end_no_reply; - } - - if (session->major == 2 && session->minor < 11) { - ERR("Chunk exists command is unsupported before 2.11"); - ret = -1; - goto end_no_reply; - } - - header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg)); - if (!lttng_buffer_view_is_valid(&header_view)) { - ERR("Failed to receive payload of chunk exists command"); - ret = -1; - goto end_no_reply; - } - - /* Convert to host endianness. */ - msg = (typeof(msg)) header_view.data; - chunk_id = be64toh(msg->chunk_id); - - ret = sessiond_trace_chunk_registry_chunk_exists( - sessiond_trace_chunk_registry, - conn->session->sessiond_uuid, - conn->session->id, - chunk_id, &chunk_exists); - /* - * If ret is not 0, send the reply and report the error to the caller. - * It is a protocol (or internal) error and the session/connection - * should be torn down. - */ - reply = (typeof(reply)){ - .generic.ret_code = htobe32((uint32_t) - (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)), - .trace_chunk_exists = ret == 0 ? chunk_exists : 0, - }; - send_ret = conn->sock->ops->sendmsg( - conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"create trace chunk\" command reply (ret = %zd)", - send_ret); - ret = -1; - } -end_no_reply: - return ret; -} - -/* - * relay_get_configuration: query whether feature is available - */ -static int relay_get_configuration(const struct lttcomm_relayd_hdr *recv_hdr, - struct relay_connection *conn, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - ssize_t send_ret; - struct lttcomm_relayd_get_configuration *msg; - struct lttcomm_relayd_get_configuration_reply reply = {}; - struct lttng_buffer_view header_view; - uint64_t query_flags = 0; - uint64_t result_flags = 0; - - header_view = lttng_buffer_view_from_view(payload, 0, sizeof(*msg)); - if (!lttng_buffer_view_is_valid(&header_view)) { - ERR("Failed to receive payload of chunk close command"); - ret = -1; - goto end_no_reply; - } - - /* Convert to host endianness. */ - msg = (typeof(msg)) header_view.data; - query_flags = be64toh(msg->query_flags); - - if (query_flags) { - ret = LTTNG_ERR_INVALID_PROTOCOL; - goto reply; - } - if (opt_allow_clear) { - result_flags |= LTTCOMM_RELAYD_CONFIGURATION_FLAG_CLEAR_ALLOWED; - } - ret = 0; -reply: - reply = (typeof(reply)){ - .generic.ret_code = htobe32((uint32_t) - (ret == 0 ? LTTNG_OK : LTTNG_ERR_INVALID_PROTOCOL)), - .relayd_configuration_flags = htobe64(result_flags), - }; - send_ret = conn->sock->ops->sendmsg( - conn->sock, &reply, sizeof(reply), 0); - if (send_ret < (ssize_t) sizeof(reply)) { - ERR("Failed to send \"get configuration\" command reply (ret = %zd)", - send_ret); - ret = -1; - } -end_no_reply: - return ret; -} - -#define DBG_CMD(cmd_name, conn) \ - DBG3("Processing \"%s\" command for socket %i", cmd_name, conn->sock->fd); - -static int relay_process_control_command(struct relay_connection *conn, - const struct lttcomm_relayd_hdr *header, - const struct lttng_buffer_view *payload) -{ - int ret = 0; - - switch (header->cmd) { - case RELAYD_CREATE_SESSION: - DBG_CMD("RELAYD_CREATE_SESSION", conn); - ret = relay_create_session(header, conn, payload); - break; - case RELAYD_ADD_STREAM: - DBG_CMD("RELAYD_ADD_STREAM", conn); - ret = relay_add_stream(header, conn, payload); - break; - case RELAYD_START_DATA: - DBG_CMD("RELAYD_START_DATA", conn); - ret = relay_start(header, conn, payload); - break; - case RELAYD_SEND_METADATA: - DBG_CMD("RELAYD_SEND_METADATA", conn); - ret = relay_recv_metadata(header, conn, payload); - break; - case RELAYD_VERSION: - DBG_CMD("RELAYD_VERSION", conn); - ret = relay_send_version(header, conn, payload); - break; - case RELAYD_CLOSE_STREAM: - DBG_CMD("RELAYD_CLOSE_STREAM", conn); - ret = relay_close_stream(header, conn, payload); - break; - case RELAYD_DATA_PENDING: - DBG_CMD("RELAYD_DATA_PENDING", conn); - ret = relay_data_pending(header, conn, payload); - break; - case RELAYD_QUIESCENT_CONTROL: - DBG_CMD("RELAYD_QUIESCENT_CONTROL", conn); - ret = relay_quiescent_control(header, conn, payload); - break; - case RELAYD_BEGIN_DATA_PENDING: - DBG_CMD("RELAYD_BEGIN_DATA_PENDING", conn); - ret = relay_begin_data_pending(header, conn, payload); - break; - case RELAYD_END_DATA_PENDING: - DBG_CMD("RELAYD_END_DATA_PENDING", conn); - ret = relay_end_data_pending(header, conn, payload); - break; - case RELAYD_SEND_INDEX: - DBG_CMD("RELAYD_SEND_INDEX", conn); - ret = relay_recv_index(header, conn, payload); - break; - case RELAYD_STREAMS_SENT: - DBG_CMD("RELAYD_STREAMS_SENT", conn); - ret = relay_streams_sent(header, conn, payload); - break; - case RELAYD_RESET_METADATA: - DBG_CMD("RELAYD_RESET_METADATA", conn); - ret = relay_reset_metadata(header, conn, payload); - break; - case RELAYD_ROTATE_STREAMS: - DBG_CMD("RELAYD_ROTATE_STREAMS", conn); - ret = relay_rotate_session_streams(header, conn, payload); - break; - case RELAYD_CREATE_TRACE_CHUNK: - DBG_CMD("RELAYD_CREATE_TRACE_CHUNK", conn); - ret = relay_create_trace_chunk(header, conn, payload); - break; - case RELAYD_CLOSE_TRACE_CHUNK: - DBG_CMD("RELAYD_CLOSE_TRACE_CHUNK", conn); - ret = relay_close_trace_chunk(header, conn, payload); - break; - case RELAYD_TRACE_CHUNK_EXISTS: - DBG_CMD("RELAYD_TRACE_CHUNK_EXISTS", conn); - ret = relay_trace_chunk_exists(header, conn, payload); - break; - case RELAYD_GET_CONFIGURATION: - DBG_CMD("RELAYD_GET_CONFIGURATION", conn); - ret = relay_get_configuration(header, conn, payload); - break; - case RELAYD_UPDATE_SYNC_INFO: - default: - ERR("Received unknown command (%u)", header->cmd); - relay_unknown_command(conn); - ret = -1; - goto end; - } - -end: - return ret; -} - -static enum relay_connection_status relay_process_control_receive_payload( - struct relay_connection *conn) -{ - int ret = 0; - enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK; - struct lttng_dynamic_buffer *reception_buffer = - &conn->protocol.ctrl.reception_buffer; - struct ctrl_connection_state_receive_payload *state = - &conn->protocol.ctrl.state.receive_payload; - struct lttng_buffer_view payload_view; - - if (state->left_to_receive == 0) { - /* Short-circuit for payload-less commands. */ - goto reception_complete; - } - - ret = conn->sock->ops->recvmsg(conn->sock, - reception_buffer->data + state->received, - state->left_to_receive, MSG_DONTWAIT); - if (ret < 0) { - if (errno != EAGAIN && errno != EWOULDBLOCK) { - PERROR("Unable to receive command payload on sock %d", - conn->sock->fd); - status = RELAY_CONNECTION_STATUS_ERROR; - } - goto end; - } else if (ret == 0) { - DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd); - status = RELAY_CONNECTION_STATUS_CLOSED; - goto end; - } - - LTTNG_ASSERT(ret > 0); - LTTNG_ASSERT(ret <= state->left_to_receive); - - state->left_to_receive -= ret; - state->received += ret; - - if (state->left_to_receive > 0) { - /* - * Can't transition to the protocol's next state, wait to - * receive the rest of the header. - */ - DBG3("Partial reception of control connection protocol payload (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)", - state->received, state->left_to_receive, - conn->sock->fd); - goto end; - } - -reception_complete: - DBG("Done receiving control command payload: fd = %i, payload size = %" PRIu64 " bytes", - conn->sock->fd, state->received); - /* - * The payload required to process the command has been received. - * A view to the reception buffer is forwarded to the various - * commands and the state of the control is reset on success. - * - * Commands are responsible for sending their reply to the peer. - */ - payload_view = lttng_buffer_view_from_dynamic_buffer(reception_buffer, - 0, -1); - ret = relay_process_control_command(conn, - &state->header, &payload_view); - if (ret < 0) { - status = RELAY_CONNECTION_STATUS_ERROR; - goto end; - } - - ret = connection_reset_protocol_state(conn); - if (ret) { - status = RELAY_CONNECTION_STATUS_ERROR; - } -end: - return status; -} - -static enum relay_connection_status relay_process_control_receive_header( - struct relay_connection *conn) -{ - int ret = 0; - enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK; - struct lttcomm_relayd_hdr header; - struct lttng_dynamic_buffer *reception_buffer = - &conn->protocol.ctrl.reception_buffer; - struct ctrl_connection_state_receive_header *state = - &conn->protocol.ctrl.state.receive_header; - - LTTNG_ASSERT(state->left_to_receive != 0); - - ret = conn->sock->ops->recvmsg(conn->sock, - reception_buffer->data + state->received, - state->left_to_receive, MSG_DONTWAIT); - if (ret < 0) { - if (errno != EAGAIN && errno != EWOULDBLOCK) { - PERROR("Unable to receive control command header on sock %d", - conn->sock->fd); - status = RELAY_CONNECTION_STATUS_ERROR; - } - goto end; - } else if (ret == 0) { - DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd); - status = RELAY_CONNECTION_STATUS_CLOSED; - goto end; - } - - LTTNG_ASSERT(ret > 0); - LTTNG_ASSERT(ret <= state->left_to_receive); - - state->left_to_receive -= ret; - state->received += ret; - - if (state->left_to_receive > 0) { - /* - * Can't transition to the protocol's next state, wait to - * receive the rest of the header. - */ - DBG3("Partial reception of control connection protocol header (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)", - state->received, state->left_to_receive, - conn->sock->fd); - goto end; - } - - /* Transition to next state: receiving the command's payload. */ - conn->protocol.ctrl.state_id = - CTRL_CONNECTION_STATE_RECEIVE_PAYLOAD; - memcpy(&header, reception_buffer->data, sizeof(header)); - header.circuit_id = be64toh(header.circuit_id); - header.data_size = be64toh(header.data_size); - header.cmd = be32toh(header.cmd); - header.cmd_version = be32toh(header.cmd_version); - memcpy(&conn->protocol.ctrl.state.receive_payload.header, - &header, sizeof(header)); - - DBG("Done receiving control command header: fd = %i, cmd = %" PRIu32 ", cmd_version = %" PRIu32 ", payload size = %" PRIu64 " bytes", - conn->sock->fd, header.cmd, header.cmd_version, - header.data_size); - - if (header.data_size > DEFAULT_NETWORK_RELAYD_CTRL_MAX_PAYLOAD_SIZE) { - ERR("Command header indicates a payload (%" PRIu64 " bytes) that exceeds the maximal payload size allowed on a control connection.", - header.data_size); - status = RELAY_CONNECTION_STATUS_ERROR; - goto end; - } - - conn->protocol.ctrl.state.receive_payload.left_to_receive = - header.data_size; - conn->protocol.ctrl.state.receive_payload.received = 0; - ret = lttng_dynamic_buffer_set_size(reception_buffer, - header.data_size); - if (ret) { - status = RELAY_CONNECTION_STATUS_ERROR; - goto end; - } - - if (header.data_size == 0) { - /* - * Manually invoke the next state as the poll loop - * will not wake-up to allow us to proceed further. - */ - status = relay_process_control_receive_payload(conn); - } -end: - return status; -} - -/* - * Process the commands received on the control socket - */ -static enum relay_connection_status relay_process_control( - struct relay_connection *conn) -{ - enum relay_connection_status status; - - switch (conn->protocol.ctrl.state_id) { - case CTRL_CONNECTION_STATE_RECEIVE_HEADER: - status = relay_process_control_receive_header(conn); - break; - case CTRL_CONNECTION_STATE_RECEIVE_PAYLOAD: - status = relay_process_control_receive_payload(conn); - break; - default: - ERR("Unknown control connection protocol state encountered."); - abort(); - } - - return status; -} - -static enum relay_connection_status relay_process_data_receive_header( - struct relay_connection *conn) -{ - int ret; - enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK; - struct data_connection_state_receive_header *state = - &conn->protocol.data.state.receive_header; - struct lttcomm_relayd_data_hdr header; - struct relay_stream *stream; - - LTTNG_ASSERT(state->left_to_receive != 0); - - ret = conn->sock->ops->recvmsg(conn->sock, - state->header_reception_buffer + state->received, - state->left_to_receive, MSG_DONTWAIT); - if (ret < 0) { - if (errno != EAGAIN && errno != EWOULDBLOCK) { - PERROR("Unable to receive data header on sock %d", conn->sock->fd); - status = RELAY_CONNECTION_STATUS_ERROR; - } - goto end; - } else if (ret == 0) { - /* Orderly shutdown. Not necessary to print an error. */ - DBG("Socket %d performed an orderly shutdown (received EOF)", conn->sock->fd); - status = RELAY_CONNECTION_STATUS_CLOSED; - goto end; - } - - LTTNG_ASSERT(ret > 0); - LTTNG_ASSERT(ret <= state->left_to_receive); - - state->left_to_receive -= ret; - state->received += ret; - - if (state->left_to_receive > 0) { - /* - * Can't transition to the protocol's next state, wait to - * receive the rest of the header. - */ - DBG3("Partial reception of data connection header (received %" PRIu64 " bytes, %" PRIu64 " bytes left to receive, fd = %i)", - state->received, state->left_to_receive, - conn->sock->fd); - goto end; - } - - /* Transition to next state: receiving the payload. */ - conn->protocol.data.state_id = DATA_CONNECTION_STATE_RECEIVE_PAYLOAD; - - memcpy(&header, state->header_reception_buffer, sizeof(header)); - header.circuit_id = be64toh(header.circuit_id); - header.stream_id = be64toh(header.stream_id); - header.data_size = be32toh(header.data_size); - header.net_seq_num = be64toh(header.net_seq_num); - header.padding_size = be32toh(header.padding_size); - memcpy(&conn->protocol.data.state.receive_payload.header, &header, sizeof(header)); - - conn->protocol.data.state.receive_payload.left_to_receive = - header.data_size; - conn->protocol.data.state.receive_payload.received = 0; - conn->protocol.data.state.receive_payload.rotate_index = false; - - DBG("Received data connection header on fd %i: circuit_id = %" PRIu64 ", stream_id = %" PRIu64 ", data_size = %" PRIu32 ", net_seq_num = %" PRIu64 ", padding_size = %" PRIu32, - conn->sock->fd, header.circuit_id, - header.stream_id, header.data_size, - header.net_seq_num, header.padding_size); - - stream = stream_get_by_id(header.stream_id); - if (!stream) { - DBG("relay_process_data_receive_payload: Cannot find stream %" PRIu64, - header.stream_id); - /* Protocol error. */ - status = RELAY_CONNECTION_STATUS_ERROR; - goto end; - } - - pthread_mutex_lock(&stream->lock); - /* Prepare stream for the reception of a new packet. */ - ret = stream_init_packet(stream, header.data_size, - &conn->protocol.data.state.receive_payload.rotate_index); - pthread_mutex_unlock(&stream->lock); - if (ret) { - ERR("Failed to rotate stream output file"); - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - -end_stream_unlock: - stream_put(stream); -end: - return status; -} - -static enum relay_connection_status relay_process_data_receive_payload( - struct relay_connection *conn) -{ - int ret; - enum relay_connection_status status = RELAY_CONNECTION_STATUS_OK; - struct relay_stream *stream; - struct data_connection_state_receive_payload *state = - &conn->protocol.data.state.receive_payload; - const size_t chunk_size = RECV_DATA_BUFFER_SIZE; - char data_buffer[chunk_size]; - bool partial_recv = false; - bool new_stream = false, close_requested = false, index_flushed = false; - uint64_t left_to_receive = state->left_to_receive; - struct relay_session *session; - - DBG3("Receiving data for stream id %" PRIu64 " seqnum %" PRIu64 ", %" PRIu64" bytes received, %" PRIu64 " bytes left to receive", - state->header.stream_id, state->header.net_seq_num, - state->received, left_to_receive); - - stream = stream_get_by_id(state->header.stream_id); - if (!stream) { - /* Protocol error. */ - ERR("relay_process_data_receive_payload: cannot find stream %" PRIu64, - state->header.stream_id); - status = RELAY_CONNECTION_STATUS_ERROR; - goto end; - } - - pthread_mutex_lock(&stream->lock); - session = stream->trace->session; - if (!conn->session) { - ret = connection_set_session(conn, session); - if (ret) { - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - } - - /* - * The size of the "chunk" received on any iteration is bounded by: - * - the data left to receive, - * - the data immediately available on the socket, - * - the on-stack data buffer - */ - while (left_to_receive > 0 && !partial_recv) { - size_t recv_size = min(left_to_receive, chunk_size); - struct lttng_buffer_view packet_chunk; - - ret = conn->sock->ops->recvmsg(conn->sock, data_buffer, - recv_size, MSG_DONTWAIT); - if (ret < 0) { - if (errno != EAGAIN && errno != EWOULDBLOCK) { - PERROR("Socket %d error", conn->sock->fd); - status = RELAY_CONNECTION_STATUS_ERROR; - } - goto end_stream_unlock; - } else if (ret == 0) { - /* No more data ready to be consumed on socket. */ - DBG3("No more data ready for consumption on data socket of stream id %" PRIu64, - state->header.stream_id); - status = RELAY_CONNECTION_STATUS_CLOSED; - break; - } else if (ret < (int) recv_size) { - /* - * All the data available on the socket has been - * consumed. - */ - partial_recv = true; - recv_size = ret; - } - - packet_chunk = lttng_buffer_view_init(data_buffer, - 0, recv_size); - LTTNG_ASSERT(packet_chunk.data); - - ret = stream_write(stream, &packet_chunk, 0); - if (ret) { - ERR("Relay error writing data to file"); - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - - left_to_receive -= recv_size; - state->received += recv_size; - state->left_to_receive = left_to_receive; - } - - if (state->left_to_receive > 0) { - /* - * Did not receive all the data expected, wait for more data to - * become available on the socket. - */ - DBG3("Partial receive on data connection of stream id %" PRIu64 ", %" PRIu64 " bytes received, %" PRIu64 " bytes left to receive", - state->header.stream_id, state->received, - state->left_to_receive); - goto end_stream_unlock; - } - - ret = stream_write(stream, NULL, state->header.padding_size); - if (ret) { - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - - if (session_streams_have_index(session)) { - ret = stream_update_index(stream, state->header.net_seq_num, - state->rotate_index, &index_flushed, - state->header.data_size + state->header.padding_size); - if (ret < 0) { - ERR("Failed to update index: stream %" PRIu64 " net_seq_num %" PRIu64 " ret %d", - stream->stream_handle, - state->header.net_seq_num, ret); - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - } - - if (stream->prev_data_seq == -1ULL) { - new_stream = true; - } - - ret = stream_complete_packet(stream, state->header.data_size + - state->header.padding_size, state->header.net_seq_num, - index_flushed); - if (ret) { - status = RELAY_CONNECTION_STATUS_ERROR; - goto end_stream_unlock; - } - - /* - * Resetting the protocol state (to RECEIVE_HEADER) will trash the - * contents of *state which are aliased (union) to the same location as - * the new state. Don't use it beyond this point. - */ - connection_reset_protocol_state(conn); - state = NULL; - -end_stream_unlock: - close_requested = stream->close_requested; - pthread_mutex_unlock(&stream->lock); - if (close_requested && left_to_receive == 0) { - try_stream_close(stream); - } - - if (new_stream) { - pthread_mutex_lock(&session->lock); - uatomic_set(&session->new_streams, 1); - pthread_mutex_unlock(&session->lock); - } - - stream_put(stream); -end: - return status; -} - -/* - * relay_process_data: Process the data received on the data socket - */ -static enum relay_connection_status relay_process_data( - struct relay_connection *conn) -{ - enum relay_connection_status status; - - switch (conn->protocol.data.state_id) { - case DATA_CONNECTION_STATE_RECEIVE_HEADER: - status = relay_process_data_receive_header(conn); - break; - case DATA_CONNECTION_STATE_RECEIVE_PAYLOAD: - status = relay_process_data_receive_payload(conn); - break; - default: - ERR("Unexpected data connection communication state."); - abort(); - } - - return status; -} - -static void cleanup_connection_pollfd(struct lttng_poll_event *events, int pollfd) -{ - int ret; - - (void) lttng_poll_del(events, pollfd); - - ret = fd_tracker_close_unsuspendable_fd(the_fd_tracker, &pollfd, 1, - fd_tracker_util_close_fd, NULL); - if (ret < 0) { - ERR("Closing pollfd %d", pollfd); - } -} - -static void relay_thread_close_connection(struct lttng_poll_event *events, - int pollfd, struct relay_connection *conn) -{ - const char *type_str; - - switch (conn->type) { - case RELAY_DATA: - type_str = "Data"; - break; - case RELAY_CONTROL: - type_str = "Control"; - break; - case RELAY_VIEWER_COMMAND: - type_str = "Viewer Command"; - break; - case RELAY_VIEWER_NOTIFICATION: - type_str = "Viewer Notification"; - break; - default: - type_str = "Unknown"; - } - cleanup_connection_pollfd(events, pollfd); - connection_put(conn); - DBG("%s connection closed with %d", type_str, pollfd); -} - -/* - * This thread does the actual work - */ -static void *relay_thread_worker(void *data) -{ - int ret, err = -1, last_seen_data_fd = -1; - uint32_t nb_fd; - struct lttng_poll_event events; - struct lttng_ht *relay_connections_ht; - struct lttng_ht_iter iter; - struct relay_connection *destroy_conn = NULL; - - DBG("[thread] Relay worker started"); - - rcu_register_thread(); - - health_register(health_relayd, HEALTH_RELAYD_TYPE_WORKER); - - if (testpoint(relayd_thread_worker)) { - goto error_testpoint; - } - - health_code_update(); - - /* table of connections indexed on socket */ - relay_connections_ht = lttng_ht_new(0, LTTNG_HT_TYPE_ULONG); - if (!relay_connections_ht) { - goto relay_connections_ht_error; - } - - ret = create_named_thread_poll_set(&events, 2, "Worker thread epoll"); - if (ret < 0) { - goto error_poll_create; - } - - ret = lttng_poll_add(&events, relay_conn_pipe[0], LPOLLIN | LPOLLRDHUP); - if (ret < 0) { - goto error; - } - -restart: - while (1) { - int idx = -1, i, seen_control = 0, last_notdel_data_fd = -1; - - health_code_update(); - - /* Infinite blocking call, waiting for transmission */ - DBG3("Relayd worker thread polling..."); - health_poll_entry(); - ret = lttng_poll_wait(&events, -1); - health_poll_exit(); - if (ret < 0) { - /* - * Restart interrupted system call. - */ - if (errno == EINTR) { - goto restart; - } - goto error; - } - - nb_fd = ret; - - /* - * Process control. The control connection is - * prioritized so we don't starve it with high - * throughput tracing data on the data connection. - */ - for (i = 0; i < nb_fd; i++) { - /* Fetch once the poll data */ - uint32_t revents = LTTNG_POLL_GETEV(&events, i); - int pollfd = LTTNG_POLL_GETFD(&events, i); - - health_code_update(); - - /* Thread quit pipe has been closed. Killing thread. */ - ret = check_thread_quit_pipe(pollfd, revents); - if (ret) { - err = 0; - goto exit; - } - - /* Inspect the relay conn pipe for new connection */ - if (pollfd == relay_conn_pipe[0]) { - if (revents & LPOLLIN) { - struct relay_connection *conn; - - ret = lttng_read(relay_conn_pipe[0], &conn, sizeof(conn)); - if (ret < 0) { - goto error; - } - ret = lttng_poll_add(&events, - conn->sock->fd, - LPOLLIN | LPOLLRDHUP); - if (ret) { - ERR("Failed to add new connection file descriptor to poll set"); - goto error; - } - connection_ht_add(relay_connections_ht, conn); - DBG("Connection socket %d added", conn->sock->fd); - } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) { - ERR("Relay connection pipe error"); - goto error; - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - goto error; - } - } else { - struct relay_connection *ctrl_conn; - - ctrl_conn = connection_get_by_sock(relay_connections_ht, pollfd); - /* If not found, there is a synchronization issue. */ - LTTNG_ASSERT(ctrl_conn); - - if (ctrl_conn->type == RELAY_DATA) { - if (revents & LPOLLIN) { - /* - * Flag the last seen data fd not deleted. It will be - * used as the last seen fd if any fd gets deleted in - * this first loop. - */ - last_notdel_data_fd = pollfd; - } - goto put_ctrl_connection; - } - LTTNG_ASSERT(ctrl_conn->type == RELAY_CONTROL); - - if (revents & LPOLLIN) { - enum relay_connection_status status; - - status = relay_process_control(ctrl_conn); - if (status != RELAY_CONNECTION_STATUS_OK) { - /* - * On socket error flag the session as aborted to force - * the cleanup of its stream otherwise it can leak - * during the lifetime of the relayd. - * - * This prevents situations in which streams can be - * left opened because an index was received, the - * control connection is closed, and the data - * connection is closed (uncleanly) before the packet's - * data provided. - * - * Since the control connection encountered an error, - * it is okay to be conservative and close the - * session right now as we can't rely on the protocol - * being respected anymore. - */ - if (status == RELAY_CONNECTION_STATUS_ERROR) { - session_abort(ctrl_conn->session); - } - - /* Clear the connection on error or close. */ - relay_thread_close_connection(&events, - pollfd, - ctrl_conn); - } - seen_control = 1; - } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) { - relay_thread_close_connection(&events, - pollfd, ctrl_conn); - if (last_seen_data_fd == pollfd) { - last_seen_data_fd = last_notdel_data_fd; - } - } else { - ERR("Unexpected poll events %u for control sock %d", - revents, pollfd); - connection_put(ctrl_conn); - goto error; - } - put_ctrl_connection: - connection_put(ctrl_conn); - } - } - - /* - * The last loop handled a control request, go back to poll to make - * sure we prioritise the control socket. - */ - if (seen_control) { - continue; - } - - if (last_seen_data_fd >= 0) { - for (i = 0; i < nb_fd; i++) { - int pollfd = LTTNG_POLL_GETFD(&events, i); - - health_code_update(); - - if (last_seen_data_fd == pollfd) { - idx = i; - break; - } - } - } - - /* Process data connection. */ - for (i = idx + 1; i < nb_fd; i++) { - /* Fetch the poll data. */ - uint32_t revents = LTTNG_POLL_GETEV(&events, i); - int pollfd = LTTNG_POLL_GETFD(&events, i); - struct relay_connection *data_conn; - - health_code_update(); - - if (!revents) { - /* No activity for this FD (poll implementation). */ - continue; - } - - /* Skip the command pipe. It's handled in the first loop. */ - if (pollfd == relay_conn_pipe[0]) { - continue; - } - - data_conn = connection_get_by_sock(relay_connections_ht, pollfd); - if (!data_conn) { - /* Skip it. Might be removed before. */ - continue; - } - if (data_conn->type == RELAY_CONTROL) { - goto put_data_connection; - } - LTTNG_ASSERT(data_conn->type == RELAY_DATA); - - if (revents & LPOLLIN) { - enum relay_connection_status status; - - status = relay_process_data(data_conn); - /* Connection closed or error. */ - if (status != RELAY_CONNECTION_STATUS_OK) { - /* - * On socket error flag the session as aborted to force - * the cleanup of its stream otherwise it can leak - * during the lifetime of the relayd. - * - * This prevents situations in which streams can be - * left opened because an index was received, the - * control connection is closed, and the data - * connection is closed (uncleanly) before the packet's - * data provided. - * - * Since the data connection encountered an error, - * it is okay to be conservative and close the - * session right now as we can't rely on the protocol - * being respected anymore. - */ - if (status == RELAY_CONNECTION_STATUS_ERROR) { - session_abort(data_conn->session); - } - relay_thread_close_connection(&events, pollfd, - data_conn); - /* - * Every goto restart call sets the last seen fd where - * here we don't really care since we gracefully - * continue the loop after the connection is deleted. - */ - } else { - /* Keep last seen port. */ - last_seen_data_fd = pollfd; - connection_put(data_conn); - goto restart; - } - } else if (revents & (LPOLLERR | LPOLLHUP | LPOLLRDHUP)) { - relay_thread_close_connection(&events, pollfd, - data_conn); - } else { - ERR("Unknown poll events %u for data sock %d", - revents, pollfd); - } - put_data_connection: - connection_put(data_conn); - } - last_seen_data_fd = -1; - } - - /* Normal exit, no error */ - ret = 0; - -exit: -error: - /* Cleanup remaining connection object. */ - rcu_read_lock(); - cds_lfht_for_each_entry(relay_connections_ht->ht, &iter.iter, - destroy_conn, - sock_n.node) { - health_code_update(); - - session_abort(destroy_conn->session); - - /* - * No need to grab another ref, because we own - * destroy_conn. - */ - relay_thread_close_connection(&events, destroy_conn->sock->fd, - destroy_conn); - } - rcu_read_unlock(); - - (void) fd_tracker_util_poll_clean(the_fd_tracker, &events); -error_poll_create: - lttng_ht_destroy(relay_connections_ht); -relay_connections_ht_error: - /* Close relay conn pipes */ - (void) fd_tracker_util_pipe_close(the_fd_tracker, - relay_conn_pipe); - if (err) { - DBG("Thread exited with error"); - } - DBG("Worker thread cleanup complete"); -error_testpoint: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_relayd); - rcu_unregister_thread(); - lttng_relay_stop_threads(); - return NULL; -} - -/* - * Create the relay command pipe to wake thread_manage_apps. - * Closed in cleanup(). - */ -static int create_relay_conn_pipe(void) -{ - return fd_tracker_util_pipe_open_cloexec(the_fd_tracker, - "Relayd connection pipe", relay_conn_pipe); -} - -static int stdio_open(void *data, int *fds) -{ - fds[0] = fileno(stdout); - fds[1] = fileno(stderr); - return 0; -} - -static int track_stdio(void) -{ - int fds[2]; - const char *names[] = { "stdout", "stderr" }; - - return fd_tracker_open_unsuspendable_fd(the_fd_tracker, fds, - names, 2, stdio_open, NULL); -} - -/* - * main - */ -int main(int argc, char **argv) -{ - bool thread_is_rcu_registered = false; - int ret = 0, retval = 0; - void *status; - char *unlinked_file_directory_path = NULL, *output_path = NULL; - - /* Parse environment variables */ - ret = parse_env_options(); - if (ret) { - retval = -1; - goto exit_options; - } - - /* - * Parse arguments. - * Command line arguments overwrite environment. - */ - progname = argv[0]; - if (set_options(argc, argv)) { - retval = -1; - goto exit_options; - } - - if (set_signal_handler()) { - retval = -1; - goto exit_options; - } - - relayd_config_log(); - - if (opt_print_version) { - print_version(); - retval = 0; - goto exit_options; - } - - ret = fclose(stdin); - if (ret) { - PERROR("Failed to close stdin"); - goto exit_options; - } - - DBG("Clear command %s", opt_allow_clear ? "allowed" : "disallowed"); - - /* Try to create directory if -o, --output is specified. */ - if (opt_output_path) { - if (*opt_output_path != '/') { - ERR("Please specify an absolute path for -o, --output PATH"); - retval = -1; - goto exit_options; - } - - ret = utils_mkdir_recursive(opt_output_path, S_IRWXU | S_IRWXG, - -1, -1); - if (ret < 0) { - ERR("Unable to create %s", opt_output_path); - retval = -1; - goto exit_options; - } - } - - /* Daemonize */ - if (opt_daemon || opt_background) { - ret = lttng_daemonize(&child_ppid, &recv_child_signal, - !opt_background); - if (ret < 0) { - retval = -1; - goto exit_options; - } - } - - if (opt_working_directory) { - ret = utils_change_working_directory(opt_working_directory); - if (ret) { - /* All errors are already logged. */ - goto exit_options; - } - } - - sessiond_trace_chunk_registry = sessiond_trace_chunk_registry_create(); - if (!sessiond_trace_chunk_registry) { - ERR("Failed to initialize session daemon trace chunk registry"); - retval = -1; - goto exit_options; - } - - /* - * The RCU thread registration (and use, through the fd-tracker's - * creation) is done after the daemonization to allow us to not - * deal with liburcu's fork() management as the call RCU needs to - * be restored. - */ - rcu_register_thread(); - thread_is_rcu_registered = true; - - output_path = create_output_path(""); - if (!output_path) { - ERR("Failed to get output path"); - retval = -1; - goto exit_options; - } - ret = asprintf(&unlinked_file_directory_path, "%s/%s", output_path, - DEFAULT_UNLINKED_FILES_DIRECTORY); - free(output_path); - if (ret < 0) { - ERR("Failed to format unlinked file directory path"); - retval = -1; - goto exit_options; - } - the_fd_tracker = fd_tracker_create( - unlinked_file_directory_path, lttng_opt_fd_pool_size); - free(unlinked_file_directory_path); - if (!the_fd_tracker) { - retval = -1; - goto exit_options; - } - - ret = track_stdio(); - if (ret) { - retval = -1; - goto exit_options; - } - - /* Initialize thread health monitoring */ - health_relayd = health_app_create(NR_HEALTH_RELAYD_TYPES); - if (!health_relayd) { - PERROR("health_app_create error"); - retval = -1; - goto exit_options; - } - - /* Create thread quit pipe */ - if (init_thread_quit_pipe()) { - retval = -1; - goto exit_options; - } - - /* Setup the thread apps communication pipe. */ - if (create_relay_conn_pipe()) { - retval = -1; - goto exit_options; - } - - /* Init relay command queue. */ - cds_wfcq_init(&relay_conn_queue.head, &relay_conn_queue.tail); - - /* Initialize communication library */ - lttcomm_init(); - lttcomm_inet_init(); - - /* tables of sessions indexed by session ID */ - sessions_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!sessions_ht) { - retval = -1; - goto exit_options; - } - - /* tables of streams indexed by stream ID */ - relay_streams_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!relay_streams_ht) { - retval = -1; - goto exit_options; - } - - /* tables of streams indexed by stream ID */ - viewer_streams_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!viewer_streams_ht) { - retval = -1; - goto exit_options; - } - - ret = init_health_quit_pipe(); - if (ret) { - retval = -1; - goto exit_options; - } - - /* Create thread to manage the client socket */ - ret = pthread_create(&health_thread, default_pthread_attr(), - thread_manage_health, (void *) NULL); - if (ret) { - errno = ret; - PERROR("pthread_create health"); - retval = -1; - goto exit_options; - } - - /* Setup the dispatcher thread */ - ret = pthread_create(&dispatcher_thread, default_pthread_attr(), - relay_thread_dispatcher, (void *) NULL); - if (ret) { - errno = ret; - PERROR("pthread_create dispatcher"); - retval = -1; - goto exit_dispatcher_thread; - } - - /* Setup the worker thread */ - ret = pthread_create(&worker_thread, default_pthread_attr(), - relay_thread_worker, NULL); - if (ret) { - errno = ret; - PERROR("pthread_create worker"); - retval = -1; - goto exit_worker_thread; - } - - /* Setup the listener thread */ - ret = pthread_create(&listener_thread, default_pthread_attr(), - relay_thread_listener, (void *) NULL); - if (ret) { - errno = ret; - PERROR("pthread_create listener"); - retval = -1; - goto exit_listener_thread; - } - - ret = relayd_live_create(live_uri); - if (ret) { - ERR("Starting live viewer threads"); - retval = -1; - goto exit_live; - } - - /* - * This is where we start awaiting program completion (e.g. through - * signal that asks threads to teardown). - */ - - ret = relayd_live_join(); - if (ret) { - retval = -1; - } -exit_live: - - ret = pthread_join(listener_thread, &status); - if (ret) { - errno = ret; - PERROR("pthread_join listener_thread"); - retval = -1; - } - -exit_listener_thread: - ret = pthread_join(worker_thread, &status); - if (ret) { - errno = ret; - PERROR("pthread_join worker_thread"); - retval = -1; - } - -exit_worker_thread: - ret = pthread_join(dispatcher_thread, &status); - if (ret) { - errno = ret; - PERROR("pthread_join dispatcher_thread"); - retval = -1; - } -exit_dispatcher_thread: - - ret = pthread_join(health_thread, &status); - if (ret) { - errno = ret; - PERROR("pthread_join health_thread"); - retval = -1; - } -exit_options: - /* - * Wait for all pending call_rcu work to complete before tearing - * down data structures. call_rcu worker may be trying to - * perform lookups in those structures. - */ - rcu_barrier(); - relayd_cleanup(); - - /* Ensure all prior call_rcu are done. */ - rcu_barrier(); - - if (thread_is_rcu_registered) { - rcu_unregister_thread(); - } - - if (!retval) { - exit(EXIT_SUCCESS); - } else { - exit(EXIT_FAILURE); - } -}