+++ /dev/null
-/*
- * Copyright (C) 2013 - Julien Desfossez <jdesfossez@efficios.com>
- * David Goulet <dgoulet@efficios.com>
- * 2015 - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
- *
- * This program is free software; you can redistribute it and/or modify it
- * under the terms of the GNU General Public License, version 2 only, as
- * published by the Free Software Foundation.
- *
- * This program is distributed in the hope that it will be useful, but WITHOUT
- * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
- * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
- * more details.
- *
- * You should have received a copy of the GNU General Public License along with
- * this program; if not, write to the Free Software Foundation, Inc., 51
- * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- */
-
-#define _LGPL_SOURCE
-#include <common/common.h>
-#include <common/utils.h>
-#include <common/compat/uuid.h>
-#include <urcu/rculist.h>
-
-#include <sys/stat.h>
-
-#include "ctf-trace.h"
-#include "lttng-relayd.h"
-#include "session.h"
-#include "sessiond-trace-chunks.h"
-#include "stream.h"
-#include <common/defaults.h>
-#include "utils.h"
-
-/* Global session id used in the session creation. */
-static uint64_t last_relay_session_id;
-static pthread_mutex_t last_relay_session_id_lock = PTHREAD_MUTEX_INITIALIZER;
-
-static int init_session_output_path(struct relay_session *session)
-{
- /*
- * session_directory:
- *
- * if base_path is \0'
- * hostname/session_name
- * else
- * hostname/base_path
- */
- char *session_directory = NULL;
- int ret = 0;
-
- if (session->output_path[0] != '\0') {
- goto end;
- }
- /*
- * If base path is set, it overrides the session name for the
- * session relative base path. No timestamp is appended if the
- * base path is overridden.
- *
- * If the session name already contains the creation time (e.g.
- * auto-<timestamp>, don't append yet another timestamp after
- * the session name in the generated path.
- *
- * Otherwise, generate the path with session_name-<timestamp>.
- */
- if (session->base_path[0] != '\0') {
- ret = asprintf(&session_directory, "%s/%s", session->hostname,
- session->base_path);
- } else if (session->session_name_contains_creation_time) {
- ret = asprintf(&session_directory, "%s/%s", session->hostname,
- session->session_name);
- } else {
- char session_creation_datetime[16];
- size_t strftime_ret;
- struct tm *timeinfo;
- time_t creation_time;
-
- /*
- * The 2.11+ protocol guarantees that a creation time
- * is provided for a session. This would indicate a
- * protocol error or an improper use of this util.
- */
- if (!session->creation_time.is_set) {
- ERR("Creation time missing for session \"%s\" (protocol error)",
- session->session_name);
- ret = -1;
- goto end;
- }
- creation_time = LTTNG_OPTIONAL_GET(session->creation_time);
-
- timeinfo = localtime(&creation_time);
- if (!timeinfo) {
- ERR("Failed to get timeinfo while initializing session output directory handle");
- ret = -1;
- goto end;
- }
- strftime_ret = strftime(session_creation_datetime,
- sizeof(session_creation_datetime),
- "%Y%m%d-%H%M%S", timeinfo);
- if (strftime_ret == 0) {
- ERR("Failed to format session creation timestamp while initializing session output directory handle");
- ret = -1;
- goto end;
- }
- ret = asprintf(&session_directory, "%s/%s-%s",
- session->hostname, session->session_name,
- session_creation_datetime);
- }
- if (ret < 0) {
- PERROR("Failed to format session directory name");
- goto end;
- }
-
- if (strlen(session_directory) >= LTTNG_PATH_MAX) {
- ERR("Session output directory exceeds maximal length");
- ret = -1;
- goto end;
- }
- strcpy(session->output_path, session_directory);
- ret = 0;
-
-end:
- free(session_directory);
- return ret;
-}
-
-static int session_set_anonymous_chunk(struct relay_session *session)
-{
- int ret = 0;
- struct lttng_trace_chunk *chunk = NULL;
- enum lttng_trace_chunk_status status;
- struct lttng_directory_handle output_directory;
-
- ret = session_init_output_directory_handle(session, &output_directory);
- if (ret) {
- goto end;
- }
-
- chunk = lttng_trace_chunk_create_anonymous();
- if (!chunk) {
- goto end;
- }
-
- status = lttng_trace_chunk_set_credentials_current_user(chunk);
- if (status != LTTNG_TRACE_CHUNK_STATUS_OK) {
- ret = -1;
- goto end;
- }
-
- status = lttng_trace_chunk_set_as_owner(chunk, &output_directory);
- if (status != LTTNG_TRACE_CHUNK_STATUS_OK) {
- ret = -1;
- goto end;
- }
- session->current_trace_chunk = chunk;
- chunk = NULL;
-end:
- lttng_trace_chunk_put(chunk);
- lttng_directory_handle_fini(&output_directory);
- return ret;
-}
-
-/*
- * Create a new session by assigning a new session ID.
- *
- * Return allocated session or else NULL.
- */
-struct relay_session *session_create(const char *session_name,
- const char *hostname, const char *base_path,
- uint32_t live_timer,
- bool snapshot,
- const lttng_uuid sessiond_uuid,
- const uint64_t *id_sessiond,
- const uint64_t *current_chunk_id,
- const time_t *creation_time,
- uint32_t major,
- uint32_t minor,
- bool session_name_contains_creation_time)
-{
- int ret;
- struct relay_session *session = NULL;
-
- if (session_name && strstr(session_name, ".")) {
- ERR("Illegal character in session name: \"%s\"",
- session_name);
- goto error;
- }
- if (base_path && strstr(base_path, "../")) {
- ERR("Invalid session base path walks up the path hierarchy: \"%s\"",
- base_path);
- goto error;
- }
- if (hostname && strstr(hostname, ".")) {
- ERR("Invalid character in hostname: \"%s\"",
- hostname);
- goto error;
- }
-
- session = zmalloc(sizeof(*session));
- if (!session) {
- PERROR("Failed to allocate session");
- goto error;
- }
- if (lttng_strncpy(session->session_name, session_name,
- sizeof(session->session_name))) {
- WARN("Session name exceeds maximal allowed length");
- goto error;
- }
- if (lttng_strncpy(session->hostname, hostname,
- sizeof(session->hostname))) {
- WARN("Hostname exceeds maximal allowed length");
- goto error;
- }
- if (lttng_strncpy(session->base_path, base_path,
- sizeof(session->base_path))) {
- WARN("Base path exceeds maximal allowed length");
- goto error;
- }
- if (creation_time) {
- LTTNG_OPTIONAL_SET(&session->creation_time, *creation_time);
- }
- session->session_name_contains_creation_time =
- session_name_contains_creation_time;
-
- session->ctf_traces_ht = lttng_ht_new(0, LTTNG_HT_TYPE_STRING);
- if (!session->ctf_traces_ht) {
- goto error;
- }
-
- pthread_mutex_lock(&last_relay_session_id_lock);
- session->id = ++last_relay_session_id;
- pthread_mutex_unlock(&last_relay_session_id_lock);
-
- session->major = major;
- session->minor = minor;
- lttng_ht_node_init_u64(&session->session_n, session->id);
- urcu_ref_init(&session->ref);
- CDS_INIT_LIST_HEAD(&session->recv_list);
- pthread_mutex_init(&session->lock, NULL);
- pthread_mutex_init(&session->recv_list_lock, NULL);
-
- session->live_timer = live_timer;
- session->snapshot = snapshot;
- lttng_uuid_copy(session->sessiond_uuid, sessiond_uuid);
-
- if (id_sessiond) {
- LTTNG_OPTIONAL_SET(&session->id_sessiond, *id_sessiond);
- }
-
- if (major == 2 && minor >= 11) {
- /* Only applies for 2.11+ peers using trace chunks. */
- ret = init_session_output_path(session);
- if (ret) {
- goto error;
- }
- }
-
- ret = sessiond_trace_chunk_registry_session_created(
- sessiond_trace_chunk_registry, sessiond_uuid);
- if (ret) {
- goto error;
- }
-
- if (id_sessiond && current_chunk_id) {
- session->current_trace_chunk =
- sessiond_trace_chunk_registry_get_chunk(
- sessiond_trace_chunk_registry,
- session->sessiond_uuid,
- session->id_sessiond.value,
- *current_chunk_id);
- if (!session->current_trace_chunk) {
- char uuid_str[UUID_STR_LEN];
-
- lttng_uuid_to_str(sessiond_uuid, uuid_str);
- ERR("Could not find trace chunk: sessiond = {%s}, sessiond session id = %" PRIu64 ", trace chunk id = %" PRIu64,
- uuid_str, *id_sessiond,
- *current_chunk_id);
- }
- } else if (!id_sessiond) {
- /*
- * Pre-2.11 peers will not announce trace chunks. An
- * anonymous trace chunk which will remain set for the
- * duration of the session is created.
- */
- ret = session_set_anonymous_chunk(session);
- if (ret) {
- goto error;
- }
- }
-
- lttng_ht_add_unique_u64(sessions_ht, &session->session_n);
- return session;
-
-error:
- session_put(session);
- return NULL;
-}
-
-/* Should be called with RCU read-side lock held. */
-bool session_get(struct relay_session *session)
-{
- return urcu_ref_get_unless_zero(&session->ref);
-}
-
-/*
- * Lookup a session within the session hash table using the session id
- * as key. A session reference is taken when a session is returned.
- * session_put() must be called on that session.
- *
- * Return session or NULL if not found.
- */
-struct relay_session *session_get_by_id(uint64_t id)
-{
- struct relay_session *session = NULL;
- struct lttng_ht_node_u64 *node;
- struct lttng_ht_iter iter;
-
- rcu_read_lock();
- lttng_ht_lookup(sessions_ht, &id, &iter);
- node = lttng_ht_iter_get_node_u64(&iter);
- if (!node) {
- DBG("Session find by ID %" PRIu64 " id NOT found", id);
- goto end;
- }
- session = caa_container_of(node, struct relay_session, session_n);
- DBG("Session find by ID %" PRIu64 " id found", id);
- if (!session_get(session)) {
- session = NULL;
- }
-end:
- rcu_read_unlock();
- return session;
-}
-
-static void rcu_destroy_session(struct rcu_head *rcu_head)
-{
- struct relay_session *session =
- caa_container_of(rcu_head, struct relay_session,
- rcu_node);
- /*
- * Since each trace has a reference on the session, it means
- * that if we are at the point where we teardown the session, no
- * trace belonging to that session exist at this point.
- * Calling lttng_ht_destroy in call_rcu worker thread so we
- * don't hold the RCU read-side lock while calling it.
- */
- lttng_ht_destroy(session->ctf_traces_ht);
- free(session);
-}
-
-/*
- * Delete session from the given hash table.
- *
- * Return lttng ht del error code being 0 on success and 1 on failure.
- */
-static int session_delete(struct relay_session *session)
-{
- struct lttng_ht_iter iter;
-
- iter.iter.node = &session->session_n.node;
- return lttng_ht_del(sessions_ht, &iter);
-}
-
-
-static void destroy_session(struct relay_session *session)
-{
- int ret;
-
- ret = session_delete(session);
- assert(!ret);
- 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;
- ret = sessiond_trace_chunk_registry_session_destroyed(
- sessiond_trace_chunk_registry, session->sessiond_uuid);
- assert(!ret);
- call_rcu(&session->rcu_node, rcu_destroy_session);
-}
-
-void session_release(struct urcu_ref *ref)
-{
- struct relay_session *session =
- caa_container_of(ref, struct relay_session, ref);
-
- destroy_session(session);
-}
-
-void session_put(struct relay_session *session)
-{
- if (!session) {
- return;
- }
- rcu_read_lock();
- urcu_ref_put(&session->ref, session_release);
- rcu_read_unlock();
-}
-
-int session_close(struct relay_session *session)
-{
- int ret = 0;
- struct ctf_trace *trace;
- struct lttng_ht_iter iter;
- struct relay_stream *stream;
-
- pthread_mutex_lock(&session->lock);
- DBG("closing session %" PRIu64 ": is conn already closed %d",
- session->id, session->connection_closed);
- session->connection_closed = true;
- pthread_mutex_unlock(&session->lock);
-
- rcu_read_lock();
- cds_lfht_for_each_entry(session->ctf_traces_ht->ht,
- &iter.iter, trace, node.node) {
- ret = ctf_trace_close(trace);
- if (ret) {
- goto rcu_unlock;
- }
- }
- cds_list_for_each_entry_rcu(stream, &session->recv_list,
- recv_node) {
- /* Close streams which have not been published yet. */
- try_stream_close(stream);
- }
-rcu_unlock:
- rcu_read_unlock();
- if (ret) {
- return ret;
- }
- /* Put self-reference from create. */
- session_put(session);
- return ret;
-}
-
-int session_abort(struct relay_session *session)
-{
- int ret = 0;
-
- if (!session) {
- return 0;
- }
-
- pthread_mutex_lock(&session->lock);
- DBG("aborting session %" PRIu64, session->id);
- session->aborted = true;
- pthread_mutex_unlock(&session->lock);
- return ret;
-}
-
-void print_sessions(void)
-{
- struct lttng_ht_iter iter;
- struct relay_session *session;
-
- if (!sessions_ht) {
- return;
- }
-
- rcu_read_lock();
- cds_lfht_for_each_entry(sessions_ht->ht, &iter.iter, session,
- session_n.node) {
- if (!session_get(session)) {
- continue;
- }
- DBG("session %p refcount %ld session %" PRIu64,
- session,
- session->ref.refcount,
- session->id);
- session_put(session);
- }
- rcu_read_unlock();
-}
-
-int session_init_output_directory_handle(struct relay_session *session,
- struct lttng_directory_handle *handle)
-{
- int ret;
- /*
- * relayd_output_path/session_directory
- * e.g. /home/user/lttng-traces/hostname/session_name
- */
- char *full_session_path = NULL;
-
- pthread_mutex_lock(&session->lock);
- full_session_path = create_output_path(session->output_path);
- if (!full_session_path) {
- ret = -1;
- goto end;
- }
-
- ret = utils_mkdir_recursive(
- full_session_path, S_IRWXU | S_IRWXG, -1, -1);
- if (ret) {
- ERR("Failed to create session output path \"%s\"",
- full_session_path);
- goto end;
- }
-
- ret = lttng_directory_handle_init(handle, full_session_path);
- if (ret) {
- goto end;
- }
-end:
- pthread_mutex_unlock(&session->lock);
- free(full_session_path);
- return ret;
-}