X-Git-Url: https://git.lttng.org/?p=lttng-tools.git;a=blobdiff_plain;f=src%2Fcommon%2Fconsumer.c;fp=src%2Fcommon%2Fconsumer.c;h=0000000000000000000000000000000000000000;hp=9909fc13ce05cb32104c5d379f9f05fb150831f5;hb=c8fea79c745d42ea8143b7020ae11b4fc2da0d8a;hpb=ea26306076d26c40ed31e4f9170dc2852bda502f diff --git a/src/common/consumer.c b/src/common/consumer.c deleted file mode 100644 index 9909fc13c..000000000 --- a/src/common/consumer.c +++ /dev/null @@ -1,3713 +0,0 @@ -/* - * Copyright (C) 2011 - Julien Desfossez - * Mathieu Desnoyers - * 2012 - David Goulet - * - * 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 -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -#include "consumer.h" -#include "consumer-stream.h" -#include "consumer-testpoint.h" -#include "align.h" - -struct lttng_consumer_global_data consumer_data = { - .stream_count = 0, - .need_update = 1, - .type = LTTNG_CONSUMER_UNKNOWN, -}; - -enum consumer_channel_action { - CONSUMER_CHANNEL_ADD, - CONSUMER_CHANNEL_DEL, - CONSUMER_CHANNEL_QUIT, -}; - -struct consumer_channel_msg { - enum consumer_channel_action action; - struct lttng_consumer_channel *chan; /* add */ - uint64_t key; /* del */ -}; - -/* - * Flag to inform the polling thread to quit when all fd hung up. Updated by - * the consumer_thread_receive_fds when it notices that all fds has hung up. - * Also updated by the signal handler (consumer_should_exit()). Read by the - * polling threads. - */ -volatile int consumer_quit; - -/* - * Global hash table containing respectively metadata and data streams. The - * stream element in this ht should only be updated by the metadata poll thread - * for the metadata and the data poll thread for the data. - */ -static struct lttng_ht *metadata_ht; -static struct lttng_ht *data_ht; - -/* - * Notify a thread lttng pipe to poll back again. This usually means that some - * global state has changed so we just send back the thread in a poll wait - * call. - */ -static void notify_thread_lttng_pipe(struct lttng_pipe *pipe) -{ - struct lttng_consumer_stream *null_stream = NULL; - - assert(pipe); - - (void) lttng_pipe_write(pipe, &null_stream, sizeof(null_stream)); -} - -static void notify_health_quit_pipe(int *pipe) -{ - ssize_t ret; - - ret = lttng_write(pipe[1], "4", 1); - if (ret < 1) { - PERROR("write consumer health quit"); - } -} - -static void notify_channel_pipe(struct lttng_consumer_local_data *ctx, - struct lttng_consumer_channel *chan, - uint64_t key, - enum consumer_channel_action action) -{ - struct consumer_channel_msg msg; - ssize_t ret; - - memset(&msg, 0, sizeof(msg)); - - msg.action = action; - msg.chan = chan; - msg.key = key; - ret = lttng_write(ctx->consumer_channel_pipe[1], &msg, sizeof(msg)); - if (ret < sizeof(msg)) { - PERROR("notify_channel_pipe write error"); - } -} - -void notify_thread_del_channel(struct lttng_consumer_local_data *ctx, - uint64_t key) -{ - notify_channel_pipe(ctx, NULL, key, CONSUMER_CHANNEL_DEL); -} - -static int read_channel_pipe(struct lttng_consumer_local_data *ctx, - struct lttng_consumer_channel **chan, - uint64_t *key, - enum consumer_channel_action *action) -{ - struct consumer_channel_msg msg; - ssize_t ret; - - ret = lttng_read(ctx->consumer_channel_pipe[0], &msg, sizeof(msg)); - if (ret < sizeof(msg)) { - ret = -1; - goto error; - } - *action = msg.action; - *chan = msg.chan; - *key = msg.key; -error: - return (int) ret; -} - -/* - * Cleanup the stream list of a channel. Those streams are not yet globally - * visible - */ -static void clean_channel_stream_list(struct lttng_consumer_channel *channel) -{ - struct lttng_consumer_stream *stream, *stmp; - - assert(channel); - - /* Delete streams that might have been left in the stream list. */ - cds_list_for_each_entry_safe(stream, stmp, &channel->streams.head, - send_node) { - cds_list_del(&stream->send_node); - /* - * Once a stream is added to this list, the buffers were created so we - * have a guarantee that this call will succeed. Setting the monitor - * mode to 0 so we don't lock nor try to delete the stream from the - * global hash table. - */ - stream->monitor = 0; - consumer_stream_destroy(stream, NULL); - } -} - -/* - * Find a stream. The consumer_data.lock must be locked during this - * call. - */ -static struct lttng_consumer_stream *find_stream(uint64_t key, - struct lttng_ht *ht) -{ - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - struct lttng_consumer_stream *stream = NULL; - - assert(ht); - - /* -1ULL keys are lookup failures */ - if (key == (uint64_t) -1ULL) { - return NULL; - } - - rcu_read_lock(); - - lttng_ht_lookup(ht, &key, &iter); - node = lttng_ht_iter_get_node_u64(&iter); - if (node != NULL) { - stream = caa_container_of(node, struct lttng_consumer_stream, node); - } - - rcu_read_unlock(); - - return stream; -} - -static void steal_stream_key(uint64_t key, struct lttng_ht *ht) -{ - struct lttng_consumer_stream *stream; - - rcu_read_lock(); - stream = find_stream(key, ht); - if (stream) { - stream->key = (uint64_t) -1ULL; - /* - * We don't want the lookup to match, but we still need - * to iterate on this stream when iterating over the hash table. Just - * change the node key. - */ - stream->node.key = (uint64_t) -1ULL; - } - rcu_read_unlock(); -} - -/* - * Return a channel object for the given key. - * - * RCU read side lock MUST be acquired before calling this function and - * protects the channel ptr. - */ -struct lttng_consumer_channel *consumer_find_channel(uint64_t key) -{ - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - struct lttng_consumer_channel *channel = NULL; - - /* -1ULL keys are lookup failures */ - if (key == (uint64_t) -1ULL) { - return NULL; - } - - lttng_ht_lookup(consumer_data.channel_ht, &key, &iter); - node = lttng_ht_iter_get_node_u64(&iter); - if (node != NULL) { - channel = caa_container_of(node, struct lttng_consumer_channel, node); - } - - return channel; -} - -/* - * There is a possibility that the consumer does not have enough time between - * the close of the channel on the session daemon and the cleanup in here thus - * once we have a channel add with an existing key, we know for sure that this - * channel will eventually get cleaned up by all streams being closed. - * - * This function just nullifies the already existing channel key. - */ -static void steal_channel_key(uint64_t key) -{ - struct lttng_consumer_channel *channel; - - rcu_read_lock(); - channel = consumer_find_channel(key); - if (channel) { - channel->key = (uint64_t) -1ULL; - /* - * We don't want the lookup to match, but we still need to iterate on - * this channel when iterating over the hash table. Just change the - * node key. - */ - channel->node.key = (uint64_t) -1ULL; - } - rcu_read_unlock(); -} - -static void free_channel_rcu(struct rcu_head *head) -{ - struct lttng_ht_node_u64 *node = - caa_container_of(head, struct lttng_ht_node_u64, head); - struct lttng_consumer_channel *channel = - caa_container_of(node, struct lttng_consumer_channel, node); - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - lttng_ustconsumer_free_channel(channel); - break; - default: - ERR("Unknown consumer_data type"); - abort(); - } - free(channel); -} - -/* - * RCU protected relayd socket pair free. - */ -static void free_relayd_rcu(struct rcu_head *head) -{ - struct lttng_ht_node_u64 *node = - caa_container_of(head, struct lttng_ht_node_u64, head); - struct consumer_relayd_sock_pair *relayd = - caa_container_of(node, struct consumer_relayd_sock_pair, node); - - /* - * Close all sockets. This is done in the call RCU since we don't want the - * socket fds to be reassigned thus potentially creating bad state of the - * relayd object. - * - * We do not have to lock the control socket mutex here since at this stage - * there is no one referencing to this relayd object. - */ - (void) relayd_close(&relayd->control_sock); - (void) relayd_close(&relayd->data_sock); - - free(relayd); -} - -/* - * Destroy and free relayd socket pair object. - */ -void consumer_destroy_relayd(struct consumer_relayd_sock_pair *relayd) -{ - int ret; - struct lttng_ht_iter iter; - - if (relayd == NULL) { - return; - } - - DBG("Consumer destroy and close relayd socket pair"); - - iter.iter.node = &relayd->node.node; - ret = lttng_ht_del(consumer_data.relayd_ht, &iter); - if (ret != 0) { - /* We assume the relayd is being or is destroyed */ - return; - } - - /* RCU free() call */ - call_rcu(&relayd->node.head, free_relayd_rcu); -} - -/* - * Remove a channel from the global list protected by a mutex. This function is - * also responsible for freeing its data structures. - */ -void consumer_del_channel(struct lttng_consumer_channel *channel) -{ - int ret; - struct lttng_ht_iter iter; - - DBG("Consumer delete channel key %" PRIu64, channel->key); - - pthread_mutex_lock(&consumer_data.lock); - pthread_mutex_lock(&channel->lock); - - /* Destroy streams that might have been left in the stream list. */ - clean_channel_stream_list(channel); - - if (channel->live_timer_enabled == 1) { - consumer_timer_live_stop(channel); - } - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - lttng_ustconsumer_del_channel(channel); - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - goto end; - } - - rcu_read_lock(); - iter.iter.node = &channel->node.node; - ret = lttng_ht_del(consumer_data.channel_ht, &iter); - assert(!ret); - rcu_read_unlock(); - - call_rcu(&channel->node.head, free_channel_rcu); -end: - pthread_mutex_unlock(&channel->lock); - pthread_mutex_unlock(&consumer_data.lock); -} - -/* - * Iterate over the relayd hash table and destroy each element. Finally, - * destroy the whole hash table. - */ -static void cleanup_relayd_ht(void) -{ - struct lttng_ht_iter iter; - struct consumer_relayd_sock_pair *relayd; - - rcu_read_lock(); - - cds_lfht_for_each_entry(consumer_data.relayd_ht->ht, &iter.iter, relayd, - node.node) { - consumer_destroy_relayd(relayd); - } - - rcu_read_unlock(); - - lttng_ht_destroy(consumer_data.relayd_ht); -} - -/* - * Update the end point status of all streams having the given network sequence - * index (relayd index). - * - * It's atomically set without having the stream mutex locked which is fine - * because we handle the write/read race with a pipe wakeup for each thread. - */ -static void update_endpoint_status_by_netidx(uint64_t net_seq_idx, - enum consumer_endpoint_status status) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - DBG("Consumer set delete flag on stream by idx %" PRIu64, net_seq_idx); - - rcu_read_lock(); - - /* Let's begin with metadata */ - cds_lfht_for_each_entry(metadata_ht->ht, &iter.iter, stream, node.node) { - if (stream->net_seq_idx == net_seq_idx) { - uatomic_set(&stream->endpoint_status, status); - DBG("Delete flag set to metadata stream %d", stream->wait_fd); - } - } - - /* Follow up by the data streams */ - cds_lfht_for_each_entry(data_ht->ht, &iter.iter, stream, node.node) { - if (stream->net_seq_idx == net_seq_idx) { - uatomic_set(&stream->endpoint_status, status); - DBG("Delete flag set to data stream %d", stream->wait_fd); - } - } - rcu_read_unlock(); -} - -/* - * Cleanup a relayd object by flagging every associated streams for deletion, - * destroying the object meaning removing it from the relayd hash table, - * closing the sockets and freeing the memory in a RCU call. - * - * If a local data context is available, notify the threads that the streams' - * state have changed. - */ -static void cleanup_relayd(struct consumer_relayd_sock_pair *relayd, - struct lttng_consumer_local_data *ctx) -{ - uint64_t netidx; - - assert(relayd); - - DBG("Cleaning up relayd sockets"); - - /* Save the net sequence index before destroying the object */ - netidx = relayd->net_seq_idx; - - /* - * Delete the relayd from the relayd hash table, close the sockets and free - * the object in a RCU call. - */ - consumer_destroy_relayd(relayd); - - /* Set inactive endpoint to all streams */ - update_endpoint_status_by_netidx(netidx, CONSUMER_ENDPOINT_INACTIVE); - - /* - * With a local data context, notify the threads that the streams' state - * have changed. The write() action on the pipe acts as an "implicit" - * memory barrier ordering the updates of the end point status from the - * read of this status which happens AFTER receiving this notify. - */ - if (ctx) { - notify_thread_lttng_pipe(ctx->consumer_data_pipe); - notify_thread_lttng_pipe(ctx->consumer_metadata_pipe); - } -} - -/* - * Flag a relayd socket pair for destruction. Destroy it if the refcount - * reaches zero. - * - * RCU read side lock MUST be aquired before calling this function. - */ -void consumer_flag_relayd_for_destroy(struct consumer_relayd_sock_pair *relayd) -{ - assert(relayd); - - /* Set destroy flag for this object */ - uatomic_set(&relayd->destroy_flag, 1); - - /* Destroy the relayd if refcount is 0 */ - if (uatomic_read(&relayd->refcount) == 0) { - consumer_destroy_relayd(relayd); - } -} - -/* - * Completly destroy stream from every visiable data structure and the given - * hash table if one. - * - * One this call returns, the stream object is not longer usable nor visible. - */ -void consumer_del_stream(struct lttng_consumer_stream *stream, - struct lttng_ht *ht) -{ - consumer_stream_destroy(stream, ht); -} - -/* - * XXX naming of del vs destroy is all mixed up. - */ -void consumer_del_stream_for_data(struct lttng_consumer_stream *stream) -{ - consumer_stream_destroy(stream, data_ht); -} - -void consumer_del_stream_for_metadata(struct lttng_consumer_stream *stream) -{ - consumer_stream_destroy(stream, metadata_ht); -} - -struct lttng_consumer_stream *consumer_allocate_stream(uint64_t channel_key, - uint64_t stream_key, - enum lttng_consumer_stream_state state, - const char *channel_name, - uid_t uid, - gid_t gid, - uint64_t relayd_id, - uint64_t session_id, - int cpu, - int *alloc_ret, - enum consumer_channel_type type, - unsigned int monitor) -{ - int ret; - struct lttng_consumer_stream *stream; - - stream = zmalloc(sizeof(*stream)); - if (stream == NULL) { - PERROR("malloc struct lttng_consumer_stream"); - ret = -ENOMEM; - goto end; - } - - rcu_read_lock(); - - stream->key = stream_key; - stream->out_fd = -1; - stream->out_fd_offset = 0; - stream->output_written = 0; - stream->state = state; - stream->uid = uid; - stream->gid = gid; - stream->net_seq_idx = relayd_id; - stream->session_id = session_id; - stream->monitor = monitor; - stream->endpoint_status = CONSUMER_ENDPOINT_ACTIVE; - stream->index_fd = -1; - pthread_mutex_init(&stream->lock, NULL); - pthread_mutex_init(&stream->metadata_timer_lock, NULL); - - /* If channel is the metadata, flag this stream as metadata. */ - if (type == CONSUMER_CHANNEL_TYPE_METADATA) { - stream->metadata_flag = 1; - /* Metadata is flat out. */ - strncpy(stream->name, DEFAULT_METADATA_NAME, sizeof(stream->name)); - /* Live rendez-vous point. */ - pthread_cond_init(&stream->metadata_rdv, NULL); - pthread_mutex_init(&stream->metadata_rdv_lock, NULL); - } else { - /* Format stream name to _ */ - ret = snprintf(stream->name, sizeof(stream->name), "%s_%d", - channel_name, cpu); - if (ret < 0) { - PERROR("snprintf stream name"); - goto error; - } - } - - /* Key is always the wait_fd for streams. */ - lttng_ht_node_init_u64(&stream->node, stream->key); - - /* Init node per channel id key */ - lttng_ht_node_init_u64(&stream->node_channel_id, channel_key); - - /* Init session id node with the stream session id */ - lttng_ht_node_init_u64(&stream->node_session_id, stream->session_id); - - DBG3("Allocated stream %s (key %" PRIu64 ", chan_key %" PRIu64 - " relayd_id %" PRIu64 ", session_id %" PRIu64, - stream->name, stream->key, channel_key, - stream->net_seq_idx, stream->session_id); - - rcu_read_unlock(); - return stream; - -error: - rcu_read_unlock(); - free(stream); -end: - if (alloc_ret) { - *alloc_ret = ret; - } - return NULL; -} - -/* - * Add a stream to the global list protected by a mutex. - */ -int consumer_add_data_stream(struct lttng_consumer_stream *stream) -{ - struct lttng_ht *ht = data_ht; - int ret = 0; - - assert(stream); - assert(ht); - - DBG3("Adding consumer stream %" PRIu64, stream->key); - - pthread_mutex_lock(&consumer_data.lock); - pthread_mutex_lock(&stream->chan->lock); - pthread_mutex_lock(&stream->chan->timer_lock); - pthread_mutex_lock(&stream->lock); - rcu_read_lock(); - - /* Steal stream identifier to avoid having streams with the same key */ - steal_stream_key(stream->key, ht); - - lttng_ht_add_unique_u64(ht, &stream->node); - - lttng_ht_add_u64(consumer_data.stream_per_chan_id_ht, - &stream->node_channel_id); - - /* - * Add stream to the stream_list_ht of the consumer data. No need to steal - * the key since the HT does not use it and we allow to add redundant keys - * into this table. - */ - lttng_ht_add_u64(consumer_data.stream_list_ht, &stream->node_session_id); - - /* - * When nb_init_stream_left reaches 0, we don't need to trigger any action - * in terms of destroying the associated channel, because the action that - * causes the count to become 0 also causes a stream to be added. The - * channel deletion will thus be triggered by the following removal of this - * stream. - */ - if (uatomic_read(&stream->chan->nb_init_stream_left) > 0) { - /* Increment refcount before decrementing nb_init_stream_left */ - cmm_smp_wmb(); - uatomic_dec(&stream->chan->nb_init_stream_left); - } - - /* Update consumer data once the node is inserted. */ - consumer_data.stream_count++; - consumer_data.need_update = 1; - - rcu_read_unlock(); - pthread_mutex_unlock(&stream->lock); - pthread_mutex_unlock(&stream->chan->timer_lock); - pthread_mutex_unlock(&stream->chan->lock); - pthread_mutex_unlock(&consumer_data.lock); - - return ret; -} - -void consumer_del_data_stream(struct lttng_consumer_stream *stream) -{ - consumer_del_stream(stream, data_ht); -} - -/* - * Add relayd socket to global consumer data hashtable. RCU read side lock MUST - * be acquired before calling this. - */ -static int add_relayd(struct consumer_relayd_sock_pair *relayd) -{ - int ret = 0; - struct lttng_ht_node_u64 *node; - struct lttng_ht_iter iter; - - assert(relayd); - - lttng_ht_lookup(consumer_data.relayd_ht, - &relayd->net_seq_idx, &iter); - node = lttng_ht_iter_get_node_u64(&iter); - if (node != NULL) { - goto end; - } - lttng_ht_add_unique_u64(consumer_data.relayd_ht, &relayd->node); - -end: - return ret; -} - -/* - * Allocate and return a consumer relayd socket. - */ -static struct consumer_relayd_sock_pair *consumer_allocate_relayd_sock_pair( - uint64_t net_seq_idx) -{ - struct consumer_relayd_sock_pair *obj = NULL; - - /* net sequence index of -1 is a failure */ - if (net_seq_idx == (uint64_t) -1ULL) { - goto error; - } - - obj = zmalloc(sizeof(struct consumer_relayd_sock_pair)); - if (obj == NULL) { - PERROR("zmalloc relayd sock"); - goto error; - } - - obj->net_seq_idx = net_seq_idx; - obj->refcount = 0; - obj->destroy_flag = 0; - obj->control_sock.sock.fd = -1; - obj->data_sock.sock.fd = -1; - lttng_ht_node_init_u64(&obj->node, obj->net_seq_idx); - pthread_mutex_init(&obj->ctrl_sock_mutex, NULL); - -error: - return obj; -} - -/* - * Find a relayd socket pair in the global consumer data. - * - * Return the object if found else NULL. - * RCU read-side lock must be held across this call and while using the - * returned object. - */ -struct consumer_relayd_sock_pair *consumer_find_relayd(uint64_t key) -{ - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - struct consumer_relayd_sock_pair *relayd = NULL; - - /* Negative keys are lookup failures */ - if (key == (uint64_t) -1ULL) { - goto error; - } - - lttng_ht_lookup(consumer_data.relayd_ht, &key, - &iter); - node = lttng_ht_iter_get_node_u64(&iter); - if (node != NULL) { - relayd = caa_container_of(node, struct consumer_relayd_sock_pair, node); - } - -error: - return relayd; -} - -/* - * Find a relayd and send the stream - * - * Returns 0 on success, < 0 on error - */ -int consumer_send_relayd_stream(struct lttng_consumer_stream *stream, - char *path) -{ - int ret = 0; - struct consumer_relayd_sock_pair *relayd; - - assert(stream); - assert(stream->net_seq_idx != -1ULL); - assert(path); - - /* The stream is not metadata. Get relayd reference if exists. */ - rcu_read_lock(); - relayd = consumer_find_relayd(stream->net_seq_idx); - if (relayd != NULL) { - /* Add stream on the relayd */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - ret = relayd_add_stream(&relayd->control_sock, stream->name, - path, &stream->relayd_stream_id, - stream->chan->tracefile_size, stream->chan->tracefile_count); - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - if (ret < 0) { - goto end; - } - - uatomic_inc(&relayd->refcount); - stream->sent_to_relayd = 1; - } else { - ERR("Stream %" PRIu64 " relayd ID %" PRIu64 " unknown. Can't send it.", - stream->key, stream->net_seq_idx); - ret = -1; - goto end; - } - - DBG("Stream %s with key %" PRIu64 " sent to relayd id %" PRIu64, - stream->name, stream->key, stream->net_seq_idx); - -end: - rcu_read_unlock(); - return ret; -} - -/* - * Find a relayd and send the streams sent message - * - * Returns 0 on success, < 0 on error - */ -int consumer_send_relayd_streams_sent(uint64_t net_seq_idx) -{ - int ret = 0; - struct consumer_relayd_sock_pair *relayd; - - assert(net_seq_idx != -1ULL); - - /* The stream is not metadata. Get relayd reference if exists. */ - rcu_read_lock(); - relayd = consumer_find_relayd(net_seq_idx); - if (relayd != NULL) { - /* Add stream on the relayd */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - ret = relayd_streams_sent(&relayd->control_sock); - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - if (ret < 0) { - goto end; - } - } else { - ERR("Relayd ID %" PRIu64 " unknown. Can't send streams_sent.", - net_seq_idx); - ret = -1; - goto end; - } - - ret = 0; - DBG("All streams sent relayd id %" PRIu64, net_seq_idx); - -end: - rcu_read_unlock(); - return ret; -} - -/* - * Find a relayd and close the stream - */ -void close_relayd_stream(struct lttng_consumer_stream *stream) -{ - struct consumer_relayd_sock_pair *relayd; - - /* The stream is not metadata. Get relayd reference if exists. */ - rcu_read_lock(); - relayd = consumer_find_relayd(stream->net_seq_idx); - if (relayd) { - consumer_stream_relayd_close(stream, relayd); - } - rcu_read_unlock(); -} - -/* - * Handle stream for relayd transmission if the stream applies for network - * streaming where the net sequence index is set. - * - * Return destination file descriptor or negative value on error. - */ -static int write_relayd_stream_header(struct lttng_consumer_stream *stream, - size_t data_size, unsigned long padding, - struct consumer_relayd_sock_pair *relayd) -{ - int outfd = -1, ret; - struct lttcomm_relayd_data_hdr data_hdr; - - /* Safety net */ - assert(stream); - assert(relayd); - - /* Reset data header */ - memset(&data_hdr, 0, sizeof(data_hdr)); - - if (stream->metadata_flag) { - /* Caller MUST acquire the relayd control socket lock */ - ret = relayd_send_metadata(&relayd->control_sock, data_size); - if (ret < 0) { - goto error; - } - - /* Metadata are always sent on the control socket. */ - outfd = relayd->control_sock.sock.fd; - } else { - /* Set header with stream information */ - data_hdr.stream_id = htobe64(stream->relayd_stream_id); - data_hdr.data_size = htobe32(data_size); - data_hdr.padding_size = htobe32(padding); - /* - * Note that net_seq_num below is assigned with the *current* value of - * next_net_seq_num and only after that the next_net_seq_num will be - * increment. This is why when issuing a command on the relayd using - * this next value, 1 should always be substracted in order to compare - * the last seen sequence number on the relayd side to the last sent. - */ - data_hdr.net_seq_num = htobe64(stream->next_net_seq_num); - /* Other fields are zeroed previously */ - - ret = relayd_send_data_hdr(&relayd->data_sock, &data_hdr, - sizeof(data_hdr)); - if (ret < 0) { - goto error; - } - - ++stream->next_net_seq_num; - - /* Set to go on data socket */ - outfd = relayd->data_sock.sock.fd; - } - -error: - return outfd; -} - -/* - * Allocate and return a new lttng_consumer_channel object using the given key - * to initialize the hash table node. - * - * On error, return NULL. - */ -struct lttng_consumer_channel *consumer_allocate_channel(uint64_t key, - uint64_t session_id, - const char *pathname, - const char *name, - uid_t uid, - gid_t gid, - uint64_t relayd_id, - enum lttng_event_output output, - uint64_t tracefile_size, - uint64_t tracefile_count, - uint64_t session_id_per_pid, - unsigned int monitor, - unsigned int live_timer_interval, - const char *root_shm_path, - const char *shm_path) -{ - struct lttng_consumer_channel *channel; - - channel = zmalloc(sizeof(*channel)); - if (channel == NULL) { - PERROR("malloc struct lttng_consumer_channel"); - goto end; - } - - channel->key = key; - channel->refcount = 0; - channel->session_id = session_id; - channel->session_id_per_pid = session_id_per_pid; - channel->uid = uid; - channel->gid = gid; - channel->relayd_id = relayd_id; - channel->tracefile_size = tracefile_size; - channel->tracefile_count = tracefile_count; - channel->monitor = monitor; - channel->live_timer_interval = live_timer_interval; - pthread_mutex_init(&channel->lock, NULL); - pthread_mutex_init(&channel->timer_lock, NULL); - - switch (output) { - case LTTNG_EVENT_SPLICE: - channel->output = CONSUMER_CHANNEL_SPLICE; - break; - case LTTNG_EVENT_MMAP: - channel->output = CONSUMER_CHANNEL_MMAP; - break; - default: - assert(0); - free(channel); - channel = NULL; - goto end; - } - - /* - * In monitor mode, the streams associated with the channel will be put in - * a special list ONLY owned by this channel. So, the refcount is set to 1 - * here meaning that the channel itself has streams that are referenced. - * - * On a channel deletion, once the channel is no longer visible, the - * refcount is decremented and checked for a zero value to delete it. With - * streams in no monitor mode, it will now be safe to destroy the channel. - */ - if (!channel->monitor) { - channel->refcount = 1; - } - - strncpy(channel->pathname, pathname, sizeof(channel->pathname)); - channel->pathname[sizeof(channel->pathname) - 1] = '\0'; - - strncpy(channel->name, name, sizeof(channel->name)); - channel->name[sizeof(channel->name) - 1] = '\0'; - - if (root_shm_path) { - strncpy(channel->root_shm_path, root_shm_path, sizeof(channel->root_shm_path)); - channel->root_shm_path[sizeof(channel->root_shm_path) - 1] = '\0'; - } - if (shm_path) { - strncpy(channel->shm_path, shm_path, sizeof(channel->shm_path)); - channel->shm_path[sizeof(channel->shm_path) - 1] = '\0'; - } - - lttng_ht_node_init_u64(&channel->node, channel->key); - - channel->wait_fd = -1; - - CDS_INIT_LIST_HEAD(&channel->streams.head); - - DBG("Allocated channel (key %" PRIu64 ")", channel->key) - -end: - return channel; -} - -/* - * Add a channel to the global list protected by a mutex. - * - * Always return 0 indicating success. - */ -int consumer_add_channel(struct lttng_consumer_channel *channel, - struct lttng_consumer_local_data *ctx) -{ - pthread_mutex_lock(&consumer_data.lock); - pthread_mutex_lock(&channel->lock); - pthread_mutex_lock(&channel->timer_lock); - - /* - * This gives us a guarantee that the channel we are about to add to the - * channel hash table will be unique. See this function comment on the why - * we need to steel the channel key at this stage. - */ - steal_channel_key(channel->key); - - rcu_read_lock(); - lttng_ht_add_unique_u64(consumer_data.channel_ht, &channel->node); - rcu_read_unlock(); - - pthread_mutex_unlock(&channel->timer_lock); - pthread_mutex_unlock(&channel->lock); - pthread_mutex_unlock(&consumer_data.lock); - - if (channel->wait_fd != -1 && channel->type == CONSUMER_CHANNEL_TYPE_DATA) { - notify_channel_pipe(ctx, channel, -1, CONSUMER_CHANNEL_ADD); - } - - return 0; -} - -/* - * Allocate the pollfd structure and the local view of the out fds to avoid - * doing a lookup in the linked list and concurrency issues when writing is - * needed. Called with consumer_data.lock held. - * - * Returns the number of fds in the structures. - */ -static int update_poll_array(struct lttng_consumer_local_data *ctx, - struct pollfd **pollfd, struct lttng_consumer_stream **local_stream, - struct lttng_ht *ht) -{ - int i = 0; - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - assert(ctx); - assert(ht); - assert(pollfd); - assert(local_stream); - - DBG("Updating poll fd array"); - rcu_read_lock(); - cds_lfht_for_each_entry(ht->ht, &iter.iter, stream, node.node) { - /* - * Only active streams with an active end point can be added to the - * poll set and local stream storage of the thread. - * - * There is a potential race here for endpoint_status to be updated - * just after the check. However, this is OK since the stream(s) will - * be deleted once the thread is notified that the end point state has - * changed where this function will be called back again. - */ - if (stream->state != LTTNG_CONSUMER_ACTIVE_STREAM || - stream->endpoint_status == CONSUMER_ENDPOINT_INACTIVE) { - continue; - } - /* - * This clobbers way too much the debug output. Uncomment that if you - * need it for debugging purposes. - * - * DBG("Active FD %d", stream->wait_fd); - */ - (*pollfd)[i].fd = stream->wait_fd; - (*pollfd)[i].events = POLLIN | POLLPRI; - local_stream[i] = stream; - i++; - } - rcu_read_unlock(); - - /* - * Insert the consumer_data_pipe at the end of the array and don't - * increment i so nb_fd is the number of real FD. - */ - (*pollfd)[i].fd = lttng_pipe_get_readfd(ctx->consumer_data_pipe); - (*pollfd)[i].events = POLLIN | POLLPRI; - - (*pollfd)[i + 1].fd = lttng_pipe_get_readfd(ctx->consumer_wakeup_pipe); - (*pollfd)[i + 1].events = POLLIN | POLLPRI; - return i; -} - -/* - * Poll on the should_quit pipe and the command socket return -1 on - * error, 1 if should exit, 0 if data is available on the command socket - */ -int lttng_consumer_poll_socket(struct pollfd *consumer_sockpoll) -{ - int num_rdy; - -restart: - num_rdy = poll(consumer_sockpoll, 2, -1); - if (num_rdy == -1) { - /* - * Restart interrupted system call. - */ - if (errno == EINTR) { - goto restart; - } - PERROR("Poll error"); - return -1; - } - if (consumer_sockpoll[0].revents & (POLLIN | POLLPRI)) { - DBG("consumer_should_quit wake up"); - return 1; - } - return 0; -} - -/* - * Set the error socket. - */ -void lttng_consumer_set_error_sock(struct lttng_consumer_local_data *ctx, - int sock) -{ - ctx->consumer_error_socket = sock; -} - -/* - * Set the command socket path. - */ -void lttng_consumer_set_command_sock_path( - struct lttng_consumer_local_data *ctx, char *sock) -{ - ctx->consumer_command_sock_path = sock; -} - -/* - * Send return code to the session daemon. - * If the socket is not defined, we return 0, it is not a fatal error - */ -int lttng_consumer_send_error(struct lttng_consumer_local_data *ctx, int cmd) -{ - if (ctx->consumer_error_socket > 0) { - return lttcomm_send_unix_sock(ctx->consumer_error_socket, &cmd, - sizeof(enum lttcomm_sessiond_command)); - } - - return 0; -} - -/* - * Close all the tracefiles and stream fds and MUST be called when all - * instances are destroyed i.e. when all threads were joined and are ended. - */ -void lttng_consumer_cleanup(void) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_channel *channel; - - rcu_read_lock(); - - cds_lfht_for_each_entry(consumer_data.channel_ht->ht, &iter.iter, channel, - node.node) { - consumer_del_channel(channel); - } - - rcu_read_unlock(); - - lttng_ht_destroy(consumer_data.channel_ht); - - cleanup_relayd_ht(); - - lttng_ht_destroy(consumer_data.stream_per_chan_id_ht); - - /* - * This HT contains streams that are freed by either the metadata thread or - * the data thread so we do *nothing* on the hash table and simply destroy - * it. - */ - lttng_ht_destroy(consumer_data.stream_list_ht); -} - -/* - * Called from signal handler. - */ -void lttng_consumer_should_exit(struct lttng_consumer_local_data *ctx) -{ - ssize_t ret; - - consumer_quit = 1; - ret = lttng_write(ctx->consumer_should_quit[1], "4", 1); - if (ret < 1) { - PERROR("write consumer quit"); - } - - DBG("Consumer flag that it should quit"); -} - -void lttng_consumer_sync_trace_file(struct lttng_consumer_stream *stream, - off_t orig_offset) -{ - int outfd = stream->out_fd; - - /* - * This does a blocking write-and-wait on any page that belongs to the - * subbuffer prior to the one we just wrote. - * Don't care about error values, as these are just hints and ways to - * limit the amount of page cache used. - */ - if (orig_offset < stream->max_sb_size) { - return; - } - lttng_sync_file_range(outfd, orig_offset - stream->max_sb_size, - stream->max_sb_size, - SYNC_FILE_RANGE_WAIT_BEFORE - | SYNC_FILE_RANGE_WRITE - | SYNC_FILE_RANGE_WAIT_AFTER); - /* - * Give hints to the kernel about how we access the file: - * POSIX_FADV_DONTNEED : we won't re-access data in a near future after - * we write it. - * - * We need to call fadvise again after the file grows because the - * kernel does not seem to apply fadvise to non-existing parts of the - * file. - * - * Call fadvise _after_ having waited for the page writeback to - * complete because the dirty page writeback semantic is not well - * defined. So it can be expected to lead to lower throughput in - * streaming. - */ - posix_fadvise(outfd, orig_offset - stream->max_sb_size, - stream->max_sb_size, POSIX_FADV_DONTNEED); -} - -/* - * Initialise the necessary environnement : - * - create a new context - * - create the poll_pipe - * - create the should_quit pipe (for signal handler) - * - create the thread pipe (for splice) - * - * Takes a function pointer as argument, this function is called when data is - * available on a buffer. This function is responsible to do the - * kernctl_get_next_subbuf, read the data with mmap or splice depending on the - * buffer configuration and then kernctl_put_next_subbuf at the end. - * - * Returns a pointer to the new context or NULL on error. - */ -struct lttng_consumer_local_data *lttng_consumer_create( - enum lttng_consumer_type type, - ssize_t (*buffer_ready)(struct lttng_consumer_stream *stream, - struct lttng_consumer_local_data *ctx), - int (*recv_channel)(struct lttng_consumer_channel *channel), - int (*recv_stream)(struct lttng_consumer_stream *stream), - int (*update_stream)(uint64_t stream_key, uint32_t state)) -{ - int ret; - struct lttng_consumer_local_data *ctx; - - assert(consumer_data.type == LTTNG_CONSUMER_UNKNOWN || - consumer_data.type == type); - consumer_data.type = type; - - ctx = zmalloc(sizeof(struct lttng_consumer_local_data)); - if (ctx == NULL) { - PERROR("allocating context"); - goto error; - } - - ctx->consumer_error_socket = -1; - ctx->consumer_metadata_socket = -1; - pthread_mutex_init(&ctx->metadata_socket_lock, NULL); - /* assign the callbacks */ - ctx->on_buffer_ready = buffer_ready; - ctx->on_recv_channel = recv_channel; - ctx->on_recv_stream = recv_stream; - ctx->on_update_stream = update_stream; - - ctx->consumer_data_pipe = lttng_pipe_open(0); - if (!ctx->consumer_data_pipe) { - goto error_poll_pipe; - } - - ctx->consumer_wakeup_pipe = lttng_pipe_open(0); - if (!ctx->consumer_wakeup_pipe) { - goto error_wakeup_pipe; - } - - ret = pipe(ctx->consumer_should_quit); - if (ret < 0) { - PERROR("Error creating recv pipe"); - goto error_quit_pipe; - } - - ret = pipe(ctx->consumer_channel_pipe); - if (ret < 0) { - PERROR("Error creating channel pipe"); - goto error_channel_pipe; - } - - ctx->consumer_metadata_pipe = lttng_pipe_open(0); - if (!ctx->consumer_metadata_pipe) { - goto error_metadata_pipe; - } - - return ctx; - -error_metadata_pipe: - utils_close_pipe(ctx->consumer_channel_pipe); -error_channel_pipe: - utils_close_pipe(ctx->consumer_should_quit); -error_quit_pipe: - lttng_pipe_destroy(ctx->consumer_wakeup_pipe); -error_wakeup_pipe: - lttng_pipe_destroy(ctx->consumer_data_pipe); -error_poll_pipe: - free(ctx); -error: - return NULL; -} - -/* - * Iterate over all streams of the hashtable and free them properly. - */ -static void destroy_data_stream_ht(struct lttng_ht *ht) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - if (ht == NULL) { - return; - } - - rcu_read_lock(); - cds_lfht_for_each_entry(ht->ht, &iter.iter, stream, node.node) { - /* - * Ignore return value since we are currently cleaning up so any error - * can't be handled. - */ - (void) consumer_del_stream(stream, ht); - } - rcu_read_unlock(); - - lttng_ht_destroy(ht); -} - -/* - * Iterate over all streams of the metadata hashtable and free them - * properly. - */ -static void destroy_metadata_stream_ht(struct lttng_ht *ht) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - if (ht == NULL) { - return; - } - - rcu_read_lock(); - cds_lfht_for_each_entry(ht->ht, &iter.iter, stream, node.node) { - /* - * Ignore return value since we are currently cleaning up so any error - * can't be handled. - */ - (void) consumer_del_metadata_stream(stream, ht); - } - rcu_read_unlock(); - - lttng_ht_destroy(ht); -} - -/* - * Close all fds associated with the instance and free the context. - */ -void lttng_consumer_destroy(struct lttng_consumer_local_data *ctx) -{ - int ret; - - DBG("Consumer destroying it. Closing everything."); - - if (!ctx) { - return; - } - - destroy_data_stream_ht(data_ht); - destroy_metadata_stream_ht(metadata_ht); - - ret = close(ctx->consumer_error_socket); - if (ret) { - PERROR("close"); - } - ret = close(ctx->consumer_metadata_socket); - if (ret) { - PERROR("close"); - } - utils_close_pipe(ctx->consumer_channel_pipe); - lttng_pipe_destroy(ctx->consumer_data_pipe); - lttng_pipe_destroy(ctx->consumer_metadata_pipe); - lttng_pipe_destroy(ctx->consumer_wakeup_pipe); - utils_close_pipe(ctx->consumer_should_quit); - - unlink(ctx->consumer_command_sock_path); - free(ctx); -} - -/* - * Write the metadata stream id on the specified file descriptor. - */ -static int write_relayd_metadata_id(int fd, - struct lttng_consumer_stream *stream, - struct consumer_relayd_sock_pair *relayd, unsigned long padding) -{ - ssize_t ret; - struct lttcomm_relayd_metadata_payload hdr; - - hdr.stream_id = htobe64(stream->relayd_stream_id); - hdr.padding_size = htobe32(padding); - ret = lttng_write(fd, (void *) &hdr, sizeof(hdr)); - if (ret < sizeof(hdr)) { - /* - * This error means that the fd's end is closed so ignore the PERROR - * not to clubber the error output since this can happen in a normal - * code path. - */ - if (errno != EPIPE) { - PERROR("write metadata stream id"); - } - DBG3("Consumer failed to write relayd metadata id (errno: %d)", errno); - /* - * Set ret to a negative value because if ret != sizeof(hdr), we don't - * handle writting the missing part so report that as an error and - * don't lie to the caller. - */ - ret = -1; - goto end; - } - DBG("Metadata stream id %" PRIu64 " with padding %lu written before data", - stream->relayd_stream_id, padding); - -end: - return (int) ret; -} - -/* - * Mmap the ring buffer, read it and write the data to the tracefile. This is a - * core function for writing trace buffers to either the local filesystem or - * the network. - * - * It must be called with the stream lock held. - * - * Careful review MUST be put if any changes occur! - * - * Returns the number of bytes written - */ -ssize_t lttng_consumer_on_read_subbuffer_mmap( - struct lttng_consumer_local_data *ctx, - struct lttng_consumer_stream *stream, unsigned long len, - unsigned long padding, - struct ctf_packet_index *index) -{ - unsigned long mmap_offset; - void *mmap_base; - ssize_t ret = 0; - off_t orig_offset = stream->out_fd_offset; - /* Default is on the disk */ - int outfd = stream->out_fd; - struct consumer_relayd_sock_pair *relayd = NULL; - unsigned int relayd_hang_up = 0; - - /* RCU lock for the relayd pointer */ - rcu_read_lock(); - - /* Flag that the current stream if set for network streaming. */ - if (stream->net_seq_idx != (uint64_t) -1ULL) { - relayd = consumer_find_relayd(stream->net_seq_idx); - if (relayd == NULL) { - ret = -EPIPE; - goto end; - } - } - - /* get the offset inside the fd to mmap */ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - mmap_base = stream->mmap_base; - ret = kernctl_get_mmap_read_offset(stream->wait_fd, &mmap_offset); - if (ret < 0) { - ret = -errno; - PERROR("tracer ctl get_mmap_read_offset"); - goto end; - } - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - mmap_base = lttng_ustctl_get_mmap_base(stream); - if (!mmap_base) { - ERR("read mmap get mmap base for stream %s", stream->name); - ret = -EPERM; - goto end; - } - ret = lttng_ustctl_get_mmap_read_offset(stream, &mmap_offset); - if (ret != 0) { - PERROR("tracer ctl get_mmap_read_offset"); - ret = -EINVAL; - goto end; - } - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - } - - /* Handle stream on the relayd if the output is on the network */ - if (relayd) { - unsigned long netlen = len; - - /* - * Lock the control socket for the complete duration of the function - * since from this point on we will use the socket. - */ - if (stream->metadata_flag) { - /* Metadata requires the control socket. */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - netlen += sizeof(struct lttcomm_relayd_metadata_payload); - } - - ret = write_relayd_stream_header(stream, netlen, padding, relayd); - if (ret < 0) { - relayd_hang_up = 1; - goto write_error; - } - /* Use the returned socket. */ - outfd = ret; - - /* Write metadata stream id before payload */ - if (stream->metadata_flag) { - ret = write_relayd_metadata_id(outfd, stream, relayd, padding); - if (ret < 0) { - relayd_hang_up = 1; - goto write_error; - } - } - } else { - /* No streaming, we have to set the len with the full padding */ - len += padding; - - /* - * Check if we need to change the tracefile before writing the packet. - */ - if (stream->chan->tracefile_size > 0 && - (stream->tracefile_size_current + len) > - stream->chan->tracefile_size) { - ret = utils_rotate_stream_file(stream->chan->pathname, - stream->name, stream->chan->tracefile_size, - stream->chan->tracefile_count, stream->uid, stream->gid, - stream->out_fd, &(stream->tracefile_count_current), - &stream->out_fd); - if (ret < 0) { - ERR("Rotating output file"); - goto end; - } - outfd = stream->out_fd; - - if (stream->index_fd >= 0) { - ret = index_create_file(stream->chan->pathname, - stream->name, stream->uid, stream->gid, - stream->chan->tracefile_size, - stream->tracefile_count_current); - if (ret < 0) { - goto end; - } - stream->index_fd = ret; - } - - /* Reset current size because we just perform a rotation. */ - stream->tracefile_size_current = 0; - stream->out_fd_offset = 0; - orig_offset = 0; - } - stream->tracefile_size_current += len; - if (index) { - index->offset = htobe64(stream->out_fd_offset); - } - } - - /* - * This call guarantee that len or less is returned. It's impossible to - * receive a ret value that is bigger than len. - */ - ret = lttng_write(outfd, mmap_base + mmap_offset, len); - DBG("Consumer mmap write() ret %zd (len %lu)", ret, len); - if (ret < 0 || ((size_t) ret != len)) { - /* - * Report error to caller if nothing was written else at least send the - * amount written. - */ - if (ret < 0) { - ret = -errno; - } - relayd_hang_up = 1; - - /* Socket operation failed. We consider the relayd dead */ - if (errno == EPIPE || errno == EINVAL || errno == EBADF) { - /* - * This is possible if the fd is closed on the other side - * (outfd) or any write problem. It can be verbose a bit for a - * normal execution if for instance the relayd is stopped - * abruptly. This can happen so set this to a DBG statement. - */ - DBG("Consumer mmap write detected relayd hang up"); - } else { - /* Unhandled error, print it and stop function right now. */ - PERROR("Error in write mmap (ret %zd != len %lu)", ret, len); - } - goto write_error; - } - stream->output_written += ret; - - /* This call is useless on a socket so better save a syscall. */ - if (!relayd) { - /* This won't block, but will start writeout asynchronously */ - lttng_sync_file_range(outfd, stream->out_fd_offset, len, - SYNC_FILE_RANGE_WRITE); - stream->out_fd_offset += len; - } - lttng_consumer_sync_trace_file(stream, orig_offset); - -write_error: - /* - * This is a special case that the relayd has closed its socket. Let's - * cleanup the relayd object and all associated streams. - */ - if (relayd && relayd_hang_up) { - cleanup_relayd(relayd, ctx); - } - -end: - /* Unlock only if ctrl socket used */ - if (relayd && stream->metadata_flag) { - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - } - - rcu_read_unlock(); - return ret; -} - -/* - * Splice the data from the ring buffer to the tracefile. - * - * It must be called with the stream lock held. - * - * Returns the number of bytes spliced. - */ -ssize_t lttng_consumer_on_read_subbuffer_splice( - struct lttng_consumer_local_data *ctx, - struct lttng_consumer_stream *stream, unsigned long len, - unsigned long padding, - struct ctf_packet_index *index) -{ - ssize_t ret = 0, written = 0, ret_splice = 0; - loff_t offset = 0; - off_t orig_offset = stream->out_fd_offset; - int fd = stream->wait_fd; - /* Default is on the disk */ - int outfd = stream->out_fd; - struct consumer_relayd_sock_pair *relayd = NULL; - int *splice_pipe; - unsigned int relayd_hang_up = 0; - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - /* Not supported for user space tracing */ - return -ENOSYS; - default: - ERR("Unknown consumer_data type"); - assert(0); - } - - /* RCU lock for the relayd pointer */ - rcu_read_lock(); - - /* Flag that the current stream if set for network streaming. */ - if (stream->net_seq_idx != (uint64_t) -1ULL) { - relayd = consumer_find_relayd(stream->net_seq_idx); - if (relayd == NULL) { - written = -ret; - goto end; - } - } - splice_pipe = stream->splice_pipe; - - /* Write metadata stream id before payload */ - if (relayd) { - unsigned long total_len = len; - - if (stream->metadata_flag) { - /* - * Lock the control socket for the complete duration of the function - * since from this point on we will use the socket. - */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - - ret = write_relayd_metadata_id(splice_pipe[1], stream, relayd, - padding); - if (ret < 0) { - written = ret; - relayd_hang_up = 1; - goto write_error; - } - - total_len += sizeof(struct lttcomm_relayd_metadata_payload); - } - - ret = write_relayd_stream_header(stream, total_len, padding, relayd); - if (ret < 0) { - written = ret; - relayd_hang_up = 1; - goto write_error; - } - /* Use the returned socket. */ - outfd = ret; - } else { - /* No streaming, we have to set the len with the full padding */ - len += padding; - - /* - * Check if we need to change the tracefile before writing the packet. - */ - if (stream->chan->tracefile_size > 0 && - (stream->tracefile_size_current + len) > - stream->chan->tracefile_size) { - ret = utils_rotate_stream_file(stream->chan->pathname, - stream->name, stream->chan->tracefile_size, - stream->chan->tracefile_count, stream->uid, stream->gid, - stream->out_fd, &(stream->tracefile_count_current), - &stream->out_fd); - if (ret < 0) { - written = ret; - ERR("Rotating output file"); - goto end; - } - outfd = stream->out_fd; - - if (stream->index_fd >= 0) { - ret = index_create_file(stream->chan->pathname, - stream->name, stream->uid, stream->gid, - stream->chan->tracefile_size, - stream->tracefile_count_current); - if (ret < 0) { - written = ret; - goto end; - } - stream->index_fd = ret; - } - - /* Reset current size because we just perform a rotation. */ - stream->tracefile_size_current = 0; - stream->out_fd_offset = 0; - orig_offset = 0; - } - stream->tracefile_size_current += len; - index->offset = htobe64(stream->out_fd_offset); - } - - while (len > 0) { - DBG("splice chan to pipe offset %lu of len %lu (fd : %d, pipe: %d)", - (unsigned long)offset, len, fd, splice_pipe[1]); - ret_splice = splice(fd, &offset, splice_pipe[1], NULL, len, - SPLICE_F_MOVE | SPLICE_F_MORE); - DBG("splice chan to pipe, ret %zd", ret_splice); - if (ret_splice < 0) { - ret = errno; - written = -ret; - PERROR("Error in relay splice"); - goto splice_error; - } - - /* Handle stream on the relayd if the output is on the network */ - if (relayd && stream->metadata_flag) { - size_t metadata_payload_size = - sizeof(struct lttcomm_relayd_metadata_payload); - - /* Update counter to fit the spliced data */ - ret_splice += metadata_payload_size; - len += metadata_payload_size; - /* - * We do this so the return value can match the len passed as - * argument to this function. - */ - written -= metadata_payload_size; - } - - /* Splice data out */ - ret_splice = splice(splice_pipe[0], NULL, outfd, NULL, - ret_splice, SPLICE_F_MOVE | SPLICE_F_MORE); - DBG("Consumer splice pipe to file (out_fd: %d), ret %zd", - outfd, ret_splice); - if (ret_splice < 0) { - ret = errno; - written = -ret; - relayd_hang_up = 1; - goto write_error; - } else if (ret_splice > len) { - /* - * We don't expect this code path to be executed but you never know - * so this is an extra protection agains a buggy splice(). - */ - ret = errno; - written += ret_splice; - PERROR("Wrote more data than requested %zd (len: %lu)", ret_splice, - len); - goto splice_error; - } else { - /* All good, update current len and continue. */ - len -= ret_splice; - } - - /* This call is useless on a socket so better save a syscall. */ - if (!relayd) { - /* This won't block, but will start writeout asynchronously */ - lttng_sync_file_range(outfd, stream->out_fd_offset, ret_splice, - SYNC_FILE_RANGE_WRITE); - stream->out_fd_offset += ret_splice; - } - stream->output_written += ret_splice; - written += ret_splice; - } - lttng_consumer_sync_trace_file(stream, orig_offset); - goto end; - -write_error: - /* - * This is a special case that the relayd has closed its socket. Let's - * cleanup the relayd object and all associated streams. - */ - if (relayd && relayd_hang_up) { - cleanup_relayd(relayd, ctx); - /* Skip splice error so the consumer does not fail */ - goto end; - } - -splice_error: - /* send the appropriate error description to sessiond */ - switch (ret) { - case EINVAL: - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_SPLICE_EINVAL); - break; - case ENOMEM: - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_SPLICE_ENOMEM); - break; - case ESPIPE: - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_SPLICE_ESPIPE); - break; - } - -end: - if (relayd && stream->metadata_flag) { - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - } - - rcu_read_unlock(); - return written; -} - -/* - * Take a snapshot for a specific fd - * - * Returns 0 on success, < 0 on error - */ -int lttng_consumer_take_snapshot(struct lttng_consumer_stream *stream) -{ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - return lttng_kconsumer_take_snapshot(stream); - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - return lttng_ustconsumer_take_snapshot(stream); - default: - ERR("Unknown consumer_data type"); - assert(0); - return -ENOSYS; - } -} - -/* - * Get the produced position - * - * Returns 0 on success, < 0 on error - */ -int lttng_consumer_get_produced_snapshot(struct lttng_consumer_stream *stream, - unsigned long *pos) -{ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - return lttng_kconsumer_get_produced_snapshot(stream, pos); - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - return lttng_ustconsumer_get_produced_snapshot(stream, pos); - default: - ERR("Unknown consumer_data type"); - assert(0); - return -ENOSYS; - } -} - -int lttng_consumer_recv_cmd(struct lttng_consumer_local_data *ctx, - int sock, struct pollfd *consumer_sockpoll) -{ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - return lttng_kconsumer_recv_cmd(ctx, sock, consumer_sockpoll); - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - return lttng_ustconsumer_recv_cmd(ctx, sock, consumer_sockpoll); - default: - ERR("Unknown consumer_data type"); - assert(0); - return -ENOSYS; - } -} - -void lttng_consumer_close_all_metadata(void) -{ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - /* - * The Kernel consumer has a different metadata scheme so we don't - * close anything because the stream will be closed by the session - * daemon. - */ - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - /* - * Close all metadata streams. The metadata hash table is passed and - * this call iterates over it by closing all wakeup fd. This is safe - * because at this point we are sure that the metadata producer is - * either dead or blocked. - */ - lttng_ustconsumer_close_all_metadata(metadata_ht); - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - } -} - -/* - * Clean up a metadata stream and free its memory. - */ -void consumer_del_metadata_stream(struct lttng_consumer_stream *stream, - struct lttng_ht *ht) -{ - struct lttng_consumer_channel *free_chan = NULL; - - assert(stream); - /* - * This call should NEVER receive regular stream. It must always be - * metadata stream and this is crucial for data structure synchronization. - */ - assert(stream->metadata_flag); - - DBG3("Consumer delete metadata stream %d", stream->wait_fd); - - pthread_mutex_lock(&consumer_data.lock); - pthread_mutex_lock(&stream->chan->lock); - pthread_mutex_lock(&stream->lock); - - /* Remove any reference to that stream. */ - consumer_stream_delete(stream, ht); - - /* Close down everything including the relayd if one. */ - consumer_stream_close(stream); - /* Destroy tracer buffers of the stream. */ - consumer_stream_destroy_buffers(stream); - - /* Atomically decrement channel refcount since other threads can use it. */ - if (!uatomic_sub_return(&stream->chan->refcount, 1) - && !uatomic_read(&stream->chan->nb_init_stream_left)) { - /* Go for channel deletion! */ - free_chan = stream->chan; - } - - /* - * Nullify the stream reference so it is not used after deletion. The - * channel lock MUST be acquired before being able to check for a NULL - * pointer value. - */ - stream->chan->metadata_stream = NULL; - - pthread_mutex_unlock(&stream->lock); - pthread_mutex_unlock(&stream->chan->lock); - pthread_mutex_unlock(&consumer_data.lock); - - if (free_chan) { - consumer_del_channel(free_chan); - } - - consumer_stream_free(stream); -} - -/* - * Action done with the metadata stream when adding it to the consumer internal - * data structures to handle it. - */ -int consumer_add_metadata_stream(struct lttng_consumer_stream *stream) -{ - struct lttng_ht *ht = metadata_ht; - int ret = 0; - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - - assert(stream); - assert(ht); - - DBG3("Adding metadata stream %" PRIu64 " to hash table", stream->key); - - pthread_mutex_lock(&consumer_data.lock); - pthread_mutex_lock(&stream->chan->lock); - pthread_mutex_lock(&stream->chan->timer_lock); - pthread_mutex_lock(&stream->lock); - - /* - * From here, refcounts are updated so be _careful_ when returning an error - * after this point. - */ - - rcu_read_lock(); - - /* - * Lookup the stream just to make sure it does not exist in our internal - * state. This should NEVER happen. - */ - lttng_ht_lookup(ht, &stream->key, &iter); - node = lttng_ht_iter_get_node_u64(&iter); - assert(!node); - - /* - * When nb_init_stream_left reaches 0, we don't need to trigger any action - * in terms of destroying the associated channel, because the action that - * causes the count to become 0 also causes a stream to be added. The - * channel deletion will thus be triggered by the following removal of this - * stream. - */ - if (uatomic_read(&stream->chan->nb_init_stream_left) > 0) { - /* Increment refcount before decrementing nb_init_stream_left */ - cmm_smp_wmb(); - uatomic_dec(&stream->chan->nb_init_stream_left); - } - - lttng_ht_add_unique_u64(ht, &stream->node); - - lttng_ht_add_unique_u64(consumer_data.stream_per_chan_id_ht, - &stream->node_channel_id); - - /* - * Add stream to the stream_list_ht of the consumer data. No need to steal - * the key since the HT does not use it and we allow to add redundant keys - * into this table. - */ - lttng_ht_add_u64(consumer_data.stream_list_ht, &stream->node_session_id); - - rcu_read_unlock(); - - pthread_mutex_unlock(&stream->lock); - pthread_mutex_unlock(&stream->chan->lock); - pthread_mutex_unlock(&stream->chan->timer_lock); - pthread_mutex_unlock(&consumer_data.lock); - return ret; -} - -/* - * Delete data stream that are flagged for deletion (endpoint_status). - */ -static void validate_endpoint_status_data_stream(void) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - DBG("Consumer delete flagged data stream"); - - rcu_read_lock(); - cds_lfht_for_each_entry(data_ht->ht, &iter.iter, stream, node.node) { - /* Validate delete flag of the stream */ - if (stream->endpoint_status == CONSUMER_ENDPOINT_ACTIVE) { - continue; - } - /* Delete it right now */ - consumer_del_stream(stream, data_ht); - } - rcu_read_unlock(); -} - -/* - * Delete metadata stream that are flagged for deletion (endpoint_status). - */ -static void validate_endpoint_status_metadata_stream( - struct lttng_poll_event *pollset) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_stream *stream; - - DBG("Consumer delete flagged metadata stream"); - - assert(pollset); - - rcu_read_lock(); - cds_lfht_for_each_entry(metadata_ht->ht, &iter.iter, stream, node.node) { - /* Validate delete flag of the stream */ - if (stream->endpoint_status == CONSUMER_ENDPOINT_ACTIVE) { - continue; - } - /* - * Remove from pollset so the metadata thread can continue without - * blocking on a deleted stream. - */ - lttng_poll_del(pollset, stream->wait_fd); - - /* Delete it right now */ - consumer_del_metadata_stream(stream, metadata_ht); - } - rcu_read_unlock(); -} - -/* - * Thread polls on metadata file descriptor and write them on disk or on the - * network. - */ -void *consumer_thread_metadata_poll(void *data) -{ - int ret, i, pollfd, err = -1; - uint32_t revents, nb_fd; - struct lttng_consumer_stream *stream = NULL; - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - struct lttng_poll_event events; - struct lttng_consumer_local_data *ctx = data; - ssize_t len; - - rcu_register_thread(); - - health_register(health_consumerd, HEALTH_CONSUMERD_TYPE_METADATA); - - if (testpoint(consumerd_thread_metadata)) { - goto error_testpoint; - } - - health_code_update(); - - DBG("Thread metadata poll started"); - - /* Size is set to 1 for the consumer_metadata pipe */ - ret = lttng_poll_create(&events, 2, LTTNG_CLOEXEC); - if (ret < 0) { - ERR("Poll set creation failed"); - goto end_poll; - } - - ret = lttng_poll_add(&events, - lttng_pipe_get_readfd(ctx->consumer_metadata_pipe), LPOLLIN); - if (ret < 0) { - goto end; - } - - /* Main loop */ - DBG("Metadata main loop started"); - - while (1) { -restart: - health_code_update(); - health_poll_entry(); - DBG("Metadata poll wait"); - ret = lttng_poll_wait(&events, -1); - DBG("Metadata poll return from wait with %d fd(s)", - LTTNG_POLL_GETNB(&events)); - health_poll_exit(); - DBG("Metadata event catched in thread"); - if (ret < 0) { - if (errno == EINTR) { - ERR("Poll EINTR catched"); - goto restart; - } - if (LTTNG_POLL_GETNB(&events) == 0) { - err = 0; /* All is OK */ - } - goto end; - } - - nb_fd = ret; - - /* From here, the event is a metadata wait fd */ - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - revents = LTTNG_POLL_GETEV(&events, i); - pollfd = LTTNG_POLL_GETFD(&events, i); - - if (!revents) { - /* No activity for this FD (poll implementation). */ - continue; - } - - if (pollfd == lttng_pipe_get_readfd(ctx->consumer_metadata_pipe)) { - if (revents & LPOLLIN) { - ssize_t pipe_len; - - pipe_len = lttng_pipe_read(ctx->consumer_metadata_pipe, - &stream, sizeof(stream)); - if (pipe_len < sizeof(stream)) { - if (pipe_len < 0) { - PERROR("read metadata stream"); - } - /* - * Remove the pipe from the poll set and continue the loop - * since their might be data to consume. - */ - lttng_poll_del(&events, - lttng_pipe_get_readfd(ctx->consumer_metadata_pipe)); - lttng_pipe_read_close(ctx->consumer_metadata_pipe); - continue; - } - - /* A NULL stream means that the state has changed. */ - if (stream == NULL) { - /* Check for deleted streams. */ - validate_endpoint_status_metadata_stream(&events); - goto restart; - } - - DBG("Adding metadata stream %d to poll set", - stream->wait_fd); - - /* Add metadata stream to the global poll events list */ - lttng_poll_add(&events, stream->wait_fd, - LPOLLIN | LPOLLPRI | LPOLLHUP); - } else if (revents & (LPOLLERR | LPOLLHUP)) { - DBG("Metadata thread pipe hung up"); - /* - * Remove the pipe from the poll set and continue the loop - * since their might be data to consume. - */ - lttng_poll_del(&events, - lttng_pipe_get_readfd(ctx->consumer_metadata_pipe)); - lttng_pipe_read_close(ctx->consumer_metadata_pipe); - continue; - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - goto end; - } - - /* Handle other stream */ - continue; - } - - rcu_read_lock(); - { - uint64_t tmp_id = (uint64_t) pollfd; - - lttng_ht_lookup(metadata_ht, &tmp_id, &iter); - } - node = lttng_ht_iter_get_node_u64(&iter); - assert(node); - - stream = caa_container_of(node, struct lttng_consumer_stream, - node); - - if (revents & (LPOLLIN | LPOLLPRI)) { - /* Get the data out of the metadata file descriptor */ - DBG("Metadata available on fd %d", pollfd); - assert(stream->wait_fd == pollfd); - - do { - health_code_update(); - - len = ctx->on_buffer_ready(stream, ctx); - /* - * We don't check the return value here since if we get - * a negative len, it means an error occured thus we - * simply remove it from the poll set and free the - * stream. - */ - } while (len > 0); - - /* It's ok to have an unavailable sub-buffer */ - if (len < 0 && len != -EAGAIN && len != -ENODATA) { - /* Clean up stream from consumer and free it. */ - lttng_poll_del(&events, stream->wait_fd); - consumer_del_metadata_stream(stream, metadata_ht); - } - } else if (revents & (LPOLLERR | LPOLLHUP)) { - DBG("Metadata fd %d is hup|err.", pollfd); - if (!stream->hangup_flush_done - && (consumer_data.type == LTTNG_CONSUMER32_UST - || consumer_data.type == LTTNG_CONSUMER64_UST)) { - DBG("Attempting to flush and consume the UST buffers"); - lttng_ustconsumer_on_stream_hangup(stream); - - /* We just flushed the stream now read it. */ - do { - health_code_update(); - - len = ctx->on_buffer_ready(stream, ctx); - /* - * We don't check the return value here since if we get - * a negative len, it means an error occured thus we - * simply remove it from the poll set and free the - * stream. - */ - } while (len > 0); - } - - lttng_poll_del(&events, stream->wait_fd); - /* - * This call update the channel states, closes file descriptors - * and securely free the stream. - */ - consumer_del_metadata_stream(stream, metadata_ht); - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - rcu_read_unlock(); - goto end; - } - /* Release RCU lock for the stream looked up */ - rcu_read_unlock(); - } - } - - /* All is OK */ - err = 0; -end: - DBG("Metadata poll thread exiting"); - - lttng_poll_clean(&events); -end_poll: -error_testpoint: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_consumerd); - rcu_unregister_thread(); - return NULL; -} - -/* - * This thread polls the fds in the set to consume the data and write - * it to tracefile if necessary. - */ -void *consumer_thread_data_poll(void *data) -{ - int num_rdy, num_hup, high_prio, ret, i, err = -1; - struct pollfd *pollfd = NULL; - /* local view of the streams */ - struct lttng_consumer_stream **local_stream = NULL, *new_stream = NULL; - /* local view of consumer_data.fds_count */ - int nb_fd = 0; - struct lttng_consumer_local_data *ctx = data; - ssize_t len; - - rcu_register_thread(); - - health_register(health_consumerd, HEALTH_CONSUMERD_TYPE_DATA); - - if (testpoint(consumerd_thread_data)) { - goto error_testpoint; - } - - health_code_update(); - - local_stream = zmalloc(sizeof(struct lttng_consumer_stream *)); - if (local_stream == NULL) { - PERROR("local_stream malloc"); - goto end; - } - - while (1) { - health_code_update(); - - high_prio = 0; - num_hup = 0; - - /* - * the fds set has been updated, we need to update our - * local array as well - */ - pthread_mutex_lock(&consumer_data.lock); - if (consumer_data.need_update) { - free(pollfd); - pollfd = NULL; - - free(local_stream); - local_stream = NULL; - - /* - * Allocate for all fds +1 for the consumer_data_pipe and +1 for - * wake up pipe. - */ - pollfd = zmalloc((consumer_data.stream_count + 2) * sizeof(struct pollfd)); - if (pollfd == NULL) { - PERROR("pollfd malloc"); - pthread_mutex_unlock(&consumer_data.lock); - goto end; - } - - local_stream = zmalloc((consumer_data.stream_count + 2) * - sizeof(struct lttng_consumer_stream *)); - if (local_stream == NULL) { - PERROR("local_stream malloc"); - pthread_mutex_unlock(&consumer_data.lock); - goto end; - } - ret = update_poll_array(ctx, &pollfd, local_stream, - data_ht); - if (ret < 0) { - ERR("Error in allocating pollfd or local_outfds"); - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_POLL_ERROR); - pthread_mutex_unlock(&consumer_data.lock); - goto end; - } - nb_fd = ret; - consumer_data.need_update = 0; - } - pthread_mutex_unlock(&consumer_data.lock); - - /* No FDs and consumer_quit, consumer_cleanup the thread */ - if (nb_fd == 0 && consumer_quit == 1) { - err = 0; /* All is OK */ - goto end; - } - /* poll on the array of fds */ - restart: - DBG("polling on %d fd", nb_fd + 2); - health_poll_entry(); - num_rdy = poll(pollfd, nb_fd + 2, -1); - health_poll_exit(); - DBG("poll num_rdy : %d", num_rdy); - if (num_rdy == -1) { - /* - * Restart interrupted system call. - */ - if (errno == EINTR) { - goto restart; - } - PERROR("Poll error"); - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_POLL_ERROR); - goto end; - } else if (num_rdy == 0) { - DBG("Polling thread timed out"); - goto end; - } - - /* - * If the consumer_data_pipe triggered poll go directly to the - * beginning of the loop to update the array. We want to prioritize - * array update over low-priority reads. - */ - if (pollfd[nb_fd].revents & (POLLIN | POLLPRI)) { - ssize_t pipe_readlen; - - DBG("consumer_data_pipe wake up"); - pipe_readlen = lttng_pipe_read(ctx->consumer_data_pipe, - &new_stream, sizeof(new_stream)); - if (pipe_readlen < sizeof(new_stream)) { - PERROR("Consumer data pipe"); - /* Continue so we can at least handle the current stream(s). */ - continue; - } - - /* - * If the stream is NULL, just ignore it. It's also possible that - * the sessiond poll thread changed the consumer_quit state and is - * waking us up to test it. - */ - if (new_stream == NULL) { - validate_endpoint_status_data_stream(); - continue; - } - - /* Continue to update the local streams and handle prio ones */ - continue; - } - - /* Handle wakeup pipe. */ - if (pollfd[nb_fd + 1].revents & (POLLIN | POLLPRI)) { - char dummy; - ssize_t pipe_readlen; - - pipe_readlen = lttng_pipe_read(ctx->consumer_wakeup_pipe, &dummy, - sizeof(dummy)); - if (pipe_readlen < 0) { - PERROR("Consumer data wakeup pipe"); - } - /* We've been awakened to handle stream(s). */ - ctx->has_wakeup = 0; - } - - /* Take care of high priority channels first. */ - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - if (local_stream[i] == NULL) { - continue; - } - if (pollfd[i].revents & POLLPRI) { - DBG("Urgent read on fd %d", pollfd[i].fd); - high_prio = 1; - len = ctx->on_buffer_ready(local_stream[i], ctx); - /* it's ok to have an unavailable sub-buffer */ - if (len < 0 && len != -EAGAIN && len != -ENODATA) { - /* Clean the stream and free it. */ - consumer_del_stream(local_stream[i], data_ht); - local_stream[i] = NULL; - } else if (len > 0) { - local_stream[i]->data_read = 1; - } - } - } - - /* - * If we read high prio channel in this loop, try again - * for more high prio data. - */ - if (high_prio) { - continue; - } - - /* Take care of low priority channels. */ - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - if (local_stream[i] == NULL) { - continue; - } - if ((pollfd[i].revents & POLLIN) || - local_stream[i]->hangup_flush_done || - local_stream[i]->has_data) { - DBG("Normal read on fd %d", pollfd[i].fd); - len = ctx->on_buffer_ready(local_stream[i], ctx); - /* it's ok to have an unavailable sub-buffer */ - if (len < 0 && len != -EAGAIN && len != -ENODATA) { - /* Clean the stream and free it. */ - consumer_del_stream(local_stream[i], data_ht); - local_stream[i] = NULL; - } else if (len > 0) { - local_stream[i]->data_read = 1; - } - } - } - - /* Handle hangup and errors */ - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - if (local_stream[i] == NULL) { - continue; - } - if (!local_stream[i]->hangup_flush_done - && (pollfd[i].revents & (POLLHUP | POLLERR | POLLNVAL)) - && (consumer_data.type == LTTNG_CONSUMER32_UST - || consumer_data.type == LTTNG_CONSUMER64_UST)) { - DBG("fd %d is hup|err|nval. Attempting flush and read.", - pollfd[i].fd); - lttng_ustconsumer_on_stream_hangup(local_stream[i]); - /* Attempt read again, for the data we just flushed. */ - local_stream[i]->data_read = 1; - } - /* - * If the poll flag is HUP/ERR/NVAL and we have - * read no data in this pass, we can remove the - * stream from its hash table. - */ - if ((pollfd[i].revents & POLLHUP)) { - DBG("Polling fd %d tells it has hung up.", pollfd[i].fd); - if (!local_stream[i]->data_read) { - consumer_del_stream(local_stream[i], data_ht); - local_stream[i] = NULL; - num_hup++; - } - } else if (pollfd[i].revents & POLLERR) { - ERR("Error returned in polling fd %d.", pollfd[i].fd); - if (!local_stream[i]->data_read) { - consumer_del_stream(local_stream[i], data_ht); - local_stream[i] = NULL; - num_hup++; - } - } else if (pollfd[i].revents & POLLNVAL) { - ERR("Polling fd %d tells fd is not open.", pollfd[i].fd); - if (!local_stream[i]->data_read) { - consumer_del_stream(local_stream[i], data_ht); - local_stream[i] = NULL; - num_hup++; - } - } - if (local_stream[i] != NULL) { - local_stream[i]->data_read = 0; - } - } - } - /* All is OK */ - err = 0; -end: - DBG("polling thread exiting"); - free(pollfd); - free(local_stream); - - /* - * Close the write side of the pipe so epoll_wait() in - * consumer_thread_metadata_poll can catch it. The thread is monitoring the - * read side of the pipe. If we close them both, epoll_wait strangely does - * not return and could create a endless wait period if the pipe is the - * only tracked fd in the poll set. The thread will take care of closing - * the read side. - */ - (void) lttng_pipe_write_close(ctx->consumer_metadata_pipe); - -error_testpoint: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_consumerd); - - rcu_unregister_thread(); - return NULL; -} - -/* - * Close wake-up end of each stream belonging to the channel. This will - * allow the poll() on the stream read-side to detect when the - * write-side (application) finally closes them. - */ -static -void consumer_close_channel_streams(struct lttng_consumer_channel *channel) -{ - struct lttng_ht *ht; - struct lttng_consumer_stream *stream; - struct lttng_ht_iter iter; - - ht = consumer_data.stream_per_chan_id_ht; - - rcu_read_lock(); - cds_lfht_for_each_entry_duplicate(ht->ht, - ht->hash_fct(&channel->key, lttng_ht_seed), - ht->match_fct, &channel->key, - &iter.iter, stream, node_channel_id.node) { - /* - * Protect against teardown with mutex. - */ - pthread_mutex_lock(&stream->lock); - if (cds_lfht_is_node_deleted(&stream->node.node)) { - goto next; - } - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - if (stream->metadata_flag) { - /* Safe and protected by the stream lock. */ - lttng_ustconsumer_close_metadata(stream->chan); - } else { - /* - * Note: a mutex is taken internally within - * liblttng-ust-ctl to protect timer wakeup_fd - * use from concurrent close. - */ - lttng_ustconsumer_close_stream_wakeup(stream); - } - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - } - next: - pthread_mutex_unlock(&stream->lock); - } - rcu_read_unlock(); -} - -static void destroy_channel_ht(struct lttng_ht *ht) -{ - struct lttng_ht_iter iter; - struct lttng_consumer_channel *channel; - int ret; - - if (ht == NULL) { - return; - } - - rcu_read_lock(); - cds_lfht_for_each_entry(ht->ht, &iter.iter, channel, wait_fd_node.node) { - ret = lttng_ht_del(ht, &iter); - assert(ret != 0); - } - rcu_read_unlock(); - - lttng_ht_destroy(ht); -} - -/* - * This thread polls the channel fds to detect when they are being - * closed. It closes all related streams if the channel is detected as - * closed. It is currently only used as a shim layer for UST because the - * consumerd needs to keep the per-stream wakeup end of pipes open for - * periodical flush. - */ -void *consumer_thread_channel_poll(void *data) -{ - int ret, i, pollfd, err = -1; - uint32_t revents, nb_fd; - struct lttng_consumer_channel *chan = NULL; - struct lttng_ht_iter iter; - struct lttng_ht_node_u64 *node; - struct lttng_poll_event events; - struct lttng_consumer_local_data *ctx = data; - struct lttng_ht *channel_ht; - - rcu_register_thread(); - - health_register(health_consumerd, HEALTH_CONSUMERD_TYPE_CHANNEL); - - if (testpoint(consumerd_thread_channel)) { - goto error_testpoint; - } - - health_code_update(); - - channel_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!channel_ht) { - /* ENOMEM at this point. Better to bail out. */ - goto end_ht; - } - - DBG("Thread channel poll started"); - - /* Size is set to 1 for the consumer_channel pipe */ - ret = lttng_poll_create(&events, 2, LTTNG_CLOEXEC); - if (ret < 0) { - ERR("Poll set creation failed"); - goto end_poll; - } - - ret = lttng_poll_add(&events, ctx->consumer_channel_pipe[0], LPOLLIN); - if (ret < 0) { - goto end; - } - - /* Main loop */ - DBG("Channel main loop started"); - - while (1) { -restart: - health_code_update(); - DBG("Channel poll wait"); - health_poll_entry(); - ret = lttng_poll_wait(&events, -1); - DBG("Channel poll return from wait with %d fd(s)", - LTTNG_POLL_GETNB(&events)); - health_poll_exit(); - DBG("Channel event catched in thread"); - if (ret < 0) { - if (errno == EINTR) { - ERR("Poll EINTR catched"); - goto restart; - } - if (LTTNG_POLL_GETNB(&events) == 0) { - err = 0; /* All is OK */ - } - goto end; - } - - nb_fd = ret; - - /* From here, the event is a channel wait fd */ - for (i = 0; i < nb_fd; i++) { - health_code_update(); - - revents = LTTNG_POLL_GETEV(&events, i); - pollfd = LTTNG_POLL_GETFD(&events, i); - - if (!revents) { - /* No activity for this FD (poll implementation). */ - continue; - } - - if (pollfd == ctx->consumer_channel_pipe[0]) { - if (revents & LPOLLIN) { - enum consumer_channel_action action; - uint64_t key; - - ret = read_channel_pipe(ctx, &chan, &key, &action); - if (ret <= 0) { - if (ret < 0) { - ERR("Error reading channel pipe"); - } - lttng_poll_del(&events, ctx->consumer_channel_pipe[0]); - continue; - } - - switch (action) { - case CONSUMER_CHANNEL_ADD: - DBG("Adding channel %d to poll set", - chan->wait_fd); - - lttng_ht_node_init_u64(&chan->wait_fd_node, - chan->wait_fd); - rcu_read_lock(); - lttng_ht_add_unique_u64(channel_ht, - &chan->wait_fd_node); - rcu_read_unlock(); - /* Add channel to the global poll events list */ - lttng_poll_add(&events, chan->wait_fd, - LPOLLERR | LPOLLHUP); - break; - case CONSUMER_CHANNEL_DEL: - { - /* - * This command should never be called if the channel - * has streams monitored by either the data or metadata - * thread. The consumer only notify this thread with a - * channel del. command if it receives a destroy - * channel command from the session daemon that send it - * if a command prior to the GET_CHANNEL failed. - */ - - rcu_read_lock(); - chan = consumer_find_channel(key); - if (!chan) { - rcu_read_unlock(); - ERR("UST consumer get channel key %" PRIu64 " not found for del channel", key); - break; - } - lttng_poll_del(&events, chan->wait_fd); - iter.iter.node = &chan->wait_fd_node.node; - ret = lttng_ht_del(channel_ht, &iter); - assert(ret == 0); - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - health_code_update(); - /* Destroy streams that might have been left in the stream list. */ - clean_channel_stream_list(chan); - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - } - - /* - * Release our own refcount. Force channel deletion even if - * streams were not initialized. - */ - if (!uatomic_sub_return(&chan->refcount, 1)) { - consumer_del_channel(chan); - } - rcu_read_unlock(); - goto restart; - } - case CONSUMER_CHANNEL_QUIT: - /* - * Remove the pipe from the poll set and continue the loop - * since their might be data to consume. - */ - lttng_poll_del(&events, ctx->consumer_channel_pipe[0]); - continue; - default: - ERR("Unknown action"); - break; - } - } else if (revents & (LPOLLERR | LPOLLHUP)) { - DBG("Channel thread pipe hung up"); - /* - * Remove the pipe from the poll set and continue the loop - * since their might be data to consume. - */ - lttng_poll_del(&events, ctx->consumer_channel_pipe[0]); - continue; - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - goto end; - } - - /* Handle other stream */ - continue; - } - - rcu_read_lock(); - { - uint64_t tmp_id = (uint64_t) pollfd; - - lttng_ht_lookup(channel_ht, &tmp_id, &iter); - } - node = lttng_ht_iter_get_node_u64(&iter); - assert(node); - - chan = caa_container_of(node, struct lttng_consumer_channel, - wait_fd_node); - - /* Check for error event */ - if (revents & (LPOLLERR | LPOLLHUP)) { - DBG("Channel fd %d is hup|err.", pollfd); - - lttng_poll_del(&events, chan->wait_fd); - ret = lttng_ht_del(channel_ht, &iter); - assert(ret == 0); - - /* - * This will close the wait fd for each stream associated to - * this channel AND monitored by the data/metadata thread thus - * will be clean by the right thread. - */ - consumer_close_channel_streams(chan); - - /* Release our own refcount */ - if (!uatomic_sub_return(&chan->refcount, 1) - && !uatomic_read(&chan->nb_init_stream_left)) { - consumer_del_channel(chan); - } - } else { - ERR("Unexpected poll events %u for sock %d", revents, pollfd); - rcu_read_unlock(); - goto end; - } - - /* Release RCU lock for the channel looked up */ - rcu_read_unlock(); - } - } - - /* All is OK */ - err = 0; -end: - lttng_poll_clean(&events); -end_poll: - destroy_channel_ht(channel_ht); -end_ht: -error_testpoint: - DBG("Channel poll thread exiting"); - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_consumerd); - rcu_unregister_thread(); - return NULL; -} - -static int set_metadata_socket(struct lttng_consumer_local_data *ctx, - struct pollfd *sockpoll, int client_socket) -{ - int ret; - - assert(ctx); - assert(sockpoll); - - ret = lttng_consumer_poll_socket(sockpoll); - if (ret) { - goto error; - } - DBG("Metadata connection on client_socket"); - - /* Blocking call, waiting for transmission */ - ctx->consumer_metadata_socket = lttcomm_accept_unix_sock(client_socket); - if (ctx->consumer_metadata_socket < 0) { - WARN("On accept metadata"); - ret = -1; - goto error; - } - ret = 0; - -error: - return ret; -} - -/* - * This thread listens on the consumerd socket and receives the file - * descriptors from the session daemon. - */ -void *consumer_thread_sessiond_poll(void *data) -{ - int sock = -1, client_socket, ret, err = -1; - /* - * structure to poll for incoming data on communication socket avoids - * making blocking sockets. - */ - struct pollfd consumer_sockpoll[2]; - struct lttng_consumer_local_data *ctx = data; - - rcu_register_thread(); - - health_register(health_consumerd, HEALTH_CONSUMERD_TYPE_SESSIOND); - - if (testpoint(consumerd_thread_sessiond)) { - goto error_testpoint; - } - - health_code_update(); - - DBG("Creating command socket %s", ctx->consumer_command_sock_path); - unlink(ctx->consumer_command_sock_path); - client_socket = lttcomm_create_unix_sock(ctx->consumer_command_sock_path); - if (client_socket < 0) { - ERR("Cannot create command socket"); - goto end; - } - - ret = lttcomm_listen_unix_sock(client_socket); - if (ret < 0) { - goto end; - } - - DBG("Sending ready command to lttng-sessiond"); - ret = lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_COMMAND_SOCK_READY); - /* return < 0 on error, but == 0 is not fatal */ - if (ret < 0) { - ERR("Error sending ready command to lttng-sessiond"); - goto end; - } - - /* prepare the FDs to poll : to client socket and the should_quit pipe */ - consumer_sockpoll[0].fd = ctx->consumer_should_quit[0]; - consumer_sockpoll[0].events = POLLIN | POLLPRI; - consumer_sockpoll[1].fd = client_socket; - consumer_sockpoll[1].events = POLLIN | POLLPRI; - - ret = lttng_consumer_poll_socket(consumer_sockpoll); - if (ret) { - if (ret > 0) { - /* should exit */ - err = 0; - } - goto end; - } - DBG("Connection on client_socket"); - - /* Blocking call, waiting for transmission */ - sock = lttcomm_accept_unix_sock(client_socket); - if (sock < 0) { - WARN("On accept"); - goto end; - } - - /* - * Setup metadata socket which is the second socket connection on the - * command unix socket. - */ - ret = set_metadata_socket(ctx, consumer_sockpoll, client_socket); - if (ret) { - if (ret > 0) { - /* should exit */ - err = 0; - } - goto end; - } - - /* This socket is not useful anymore. */ - ret = close(client_socket); - if (ret < 0) { - PERROR("close client_socket"); - } - client_socket = -1; - - /* update the polling structure to poll on the established socket */ - consumer_sockpoll[1].fd = sock; - consumer_sockpoll[1].events = POLLIN | POLLPRI; - - while (1) { - health_code_update(); - - health_poll_entry(); - ret = lttng_consumer_poll_socket(consumer_sockpoll); - health_poll_exit(); - if (ret) { - if (ret > 0) { - /* should exit */ - err = 0; - } - goto end; - } - DBG("Incoming command on sock"); - ret = lttng_consumer_recv_cmd(ctx, sock, consumer_sockpoll); - if (ret <= 0) { - /* - * This could simply be a session daemon quitting. Don't output - * ERR() here. - */ - DBG("Communication interrupted on command socket"); - err = 0; - goto end; - } - if (consumer_quit) { - DBG("consumer_thread_receive_fds received quit from signal"); - err = 0; /* All is OK */ - goto end; - } - DBG("received command on sock"); - } - /* All is OK */ - err = 0; - -end: - DBG("Consumer thread sessiond poll exiting"); - - /* - * Close metadata streams since the producer is the session daemon which - * just died. - * - * NOTE: for now, this only applies to the UST tracer. - */ - lttng_consumer_close_all_metadata(); - - /* - * when all fds have hung up, the polling thread - * can exit cleanly - */ - consumer_quit = 1; - - /* - * Notify the data poll thread to poll back again and test the - * consumer_quit state that we just set so to quit gracefully. - */ - notify_thread_lttng_pipe(ctx->consumer_data_pipe); - - notify_channel_pipe(ctx, NULL, -1, CONSUMER_CHANNEL_QUIT); - - notify_health_quit_pipe(health_quit_pipe); - - /* Cleaning up possibly open sockets. */ - if (sock >= 0) { - ret = close(sock); - if (ret < 0) { - PERROR("close sock sessiond poll"); - } - } - if (client_socket >= 0) { - ret = close(client_socket); - if (ret < 0) { - PERROR("close client_socket sessiond poll"); - } - } - -error_testpoint: - if (err) { - health_error(); - ERR("Health error occurred in %s", __func__); - } - health_unregister(health_consumerd); - - rcu_unregister_thread(); - return NULL; -} - -ssize_t lttng_consumer_read_subbuffer(struct lttng_consumer_stream *stream, - struct lttng_consumer_local_data *ctx) -{ - ssize_t ret; - - pthread_mutex_lock(&stream->lock); - if (stream->metadata_flag) { - pthread_mutex_lock(&stream->metadata_rdv_lock); - } - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - ret = lttng_kconsumer_read_subbuffer(stream, ctx); - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - ret = lttng_ustconsumer_read_subbuffer(stream, ctx); - break; - default: - ERR("Unknown consumer_data type"); - assert(0); - ret = -ENOSYS; - break; - } - - if (stream->metadata_flag) { - pthread_cond_broadcast(&stream->metadata_rdv); - pthread_mutex_unlock(&stream->metadata_rdv_lock); - } - pthread_mutex_unlock(&stream->lock); - return ret; -} - -int lttng_consumer_on_recv_stream(struct lttng_consumer_stream *stream) -{ - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - return lttng_kconsumer_on_recv_stream(stream); - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - return lttng_ustconsumer_on_recv_stream(stream); - default: - ERR("Unknown consumer_data type"); - assert(0); - return -ENOSYS; - } -} - -/* - * Allocate and set consumer data hash tables. - */ -int lttng_consumer_init(void) -{ - consumer_data.channel_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!consumer_data.channel_ht) { - goto error; - } - - consumer_data.relayd_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!consumer_data.relayd_ht) { - goto error; - } - - consumer_data.stream_list_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!consumer_data.stream_list_ht) { - goto error; - } - - consumer_data.stream_per_chan_id_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!consumer_data.stream_per_chan_id_ht) { - goto error; - } - - data_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!data_ht) { - goto error; - } - - metadata_ht = lttng_ht_new(0, LTTNG_HT_TYPE_U64); - if (!metadata_ht) { - goto error; - } - - return 0; - -error: - return -1; -} - -/* - * Process the ADD_RELAYD command receive by a consumer. - * - * This will create a relayd socket pair and add it to the relayd hash table. - * The caller MUST acquire a RCU read side lock before calling it. - */ -int consumer_add_relayd_socket(uint64_t net_seq_idx, int sock_type, - struct lttng_consumer_local_data *ctx, int sock, - struct pollfd *consumer_sockpoll, - struct lttcomm_relayd_sock *relayd_sock, uint64_t sessiond_id, - uint64_t relayd_session_id) -{ - int fd = -1, ret = -1, relayd_created = 0; - enum lttcomm_return_code ret_code = LTTCOMM_CONSUMERD_SUCCESS; - struct consumer_relayd_sock_pair *relayd = NULL; - - assert(ctx); - assert(relayd_sock); - - DBG("Consumer adding relayd socket (idx: %" PRIu64 ")", net_seq_idx); - - /* Get relayd reference if exists. */ - relayd = consumer_find_relayd(net_seq_idx); - if (relayd == NULL) { - assert(sock_type == LTTNG_STREAM_CONTROL); - /* Not found. Allocate one. */ - relayd = consumer_allocate_relayd_sock_pair(net_seq_idx); - if (relayd == NULL) { - ret = -ENOMEM; - ret_code = LTTCOMM_CONSUMERD_ENOMEM; - goto error; - } else { - relayd->sessiond_session_id = sessiond_id; - relayd_created = 1; - } - - /* - * This code path MUST continue to the consumer send status message to - * we can notify the session daemon and continue our work without - * killing everything. - */ - } else { - /* - * relayd key should never be found for control socket. - */ - assert(sock_type != LTTNG_STREAM_CONTROL); - } - - /* First send a status message before receiving the fds. */ - ret = consumer_send_status_msg(sock, LTTCOMM_CONSUMERD_SUCCESS); - if (ret < 0) { - /* Somehow, the session daemon is not responding anymore. */ - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_FATAL); - goto error_nosignal; - } - - /* Poll on consumer socket. */ - ret = lttng_consumer_poll_socket(consumer_sockpoll); - if (ret) { - /* Needing to exit in the middle of a command: error. */ - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_POLL_ERROR); - ret = -EINTR; - goto error_nosignal; - } - - /* Get relayd socket from session daemon */ - ret = lttcomm_recv_fds_unix_sock(sock, &fd, 1); - if (ret != sizeof(fd)) { - ret = -1; - fd = -1; /* Just in case it gets set with an invalid value. */ - - /* - * Failing to receive FDs might indicate a major problem such as - * reaching a fd limit during the receive where the kernel returns a - * MSG_CTRUNC and fails to cleanup the fd in the queue. Any case, we - * don't take any chances and stop everything. - * - * XXX: Feature request #558 will fix that and avoid this possible - * issue when reaching the fd limit. - */ - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_ERROR_RECV_FD); - ret_code = LTTCOMM_CONSUMERD_ERROR_RECV_FD; - goto error; - } - - /* Copy socket information and received FD */ - switch (sock_type) { - case LTTNG_STREAM_CONTROL: - /* Copy received lttcomm socket */ - lttcomm_copy_sock(&relayd->control_sock.sock, &relayd_sock->sock); - ret = lttcomm_create_sock(&relayd->control_sock.sock); - /* Handle create_sock error. */ - if (ret < 0) { - ret_code = LTTCOMM_CONSUMERD_ENOMEM; - goto error; - } - /* - * Close the socket created internally by - * lttcomm_create_sock, so we can replace it by the one - * received from sessiond. - */ - if (close(relayd->control_sock.sock.fd)) { - PERROR("close"); - } - - /* Assign new file descriptor */ - relayd->control_sock.sock.fd = fd; - fd = -1; /* For error path */ - /* Assign version values. */ - relayd->control_sock.major = relayd_sock->major; - relayd->control_sock.minor = relayd_sock->minor; - - relayd->relayd_session_id = relayd_session_id; - - break; - case LTTNG_STREAM_DATA: - /* Copy received lttcomm socket */ - lttcomm_copy_sock(&relayd->data_sock.sock, &relayd_sock->sock); - ret = lttcomm_create_sock(&relayd->data_sock.sock); - /* Handle create_sock error. */ - if (ret < 0) { - ret_code = LTTCOMM_CONSUMERD_ENOMEM; - goto error; - } - /* - * Close the socket created internally by - * lttcomm_create_sock, so we can replace it by the one - * received from sessiond. - */ - if (close(relayd->data_sock.sock.fd)) { - PERROR("close"); - } - - /* Assign new file descriptor */ - relayd->data_sock.sock.fd = fd; - fd = -1; /* for eventual error paths */ - /* Assign version values. */ - relayd->data_sock.major = relayd_sock->major; - relayd->data_sock.minor = relayd_sock->minor; - break; - default: - ERR("Unknown relayd socket type (%d)", sock_type); - ret = -1; - ret_code = LTTCOMM_CONSUMERD_FATAL; - goto error; - } - - DBG("Consumer %s socket created successfully with net idx %" PRIu64 " (fd: %d)", - sock_type == LTTNG_STREAM_CONTROL ? "control" : "data", - relayd->net_seq_idx, fd); - - /* We successfully added the socket. Send status back. */ - ret = consumer_send_status_msg(sock, ret_code); - if (ret < 0) { - /* Somehow, the session daemon is not responding anymore. */ - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_FATAL); - goto error_nosignal; - } - - /* - * Add relayd socket pair to consumer data hashtable. If object already - * exists or on error, the function gracefully returns. - */ - add_relayd(relayd); - - /* All good! */ - return 0; - -error: - if (consumer_send_status_msg(sock, ret_code) < 0) { - lttng_consumer_send_error(ctx, LTTCOMM_CONSUMERD_FATAL); - } - -error_nosignal: - /* Close received socket if valid. */ - if (fd >= 0) { - if (close(fd)) { - PERROR("close received socket"); - } - } - - if (relayd_created) { - free(relayd); - } - - return ret; -} - -/* - * Try to lock the stream mutex. - * - * On success, 1 is returned else 0 indicating that the mutex is NOT lock. - */ -static int stream_try_lock(struct lttng_consumer_stream *stream) -{ - int ret; - - assert(stream); - - /* - * Try to lock the stream mutex. On failure, we know that the stream is - * being used else where hence there is data still being extracted. - */ - ret = pthread_mutex_trylock(&stream->lock); - if (ret) { - /* For both EBUSY and EINVAL error, the mutex is NOT locked. */ - ret = 0; - goto end; - } - - ret = 1; - -end: - return ret; -} - -/* - * Search for a relayd associated to the session id and return the reference. - * - * A rcu read side lock MUST be acquire before calling this function and locked - * until the relayd object is no longer necessary. - */ -static struct consumer_relayd_sock_pair *find_relayd_by_session_id(uint64_t id) -{ - struct lttng_ht_iter iter; - struct consumer_relayd_sock_pair *relayd = NULL; - - /* Iterate over all relayd since they are indexed by net_seq_idx. */ - cds_lfht_for_each_entry(consumer_data.relayd_ht->ht, &iter.iter, relayd, - node.node) { - /* - * Check by sessiond id which is unique here where the relayd session - * id might not be when having multiple relayd. - */ - if (relayd->sessiond_session_id == id) { - /* Found the relayd. There can be only one per id. */ - goto found; - } - } - - return NULL; - -found: - return relayd; -} - -/* - * Check if for a given session id there is still data needed to be extract - * from the buffers. - * - * Return 1 if data is pending or else 0 meaning ready to be read. - */ -int consumer_data_pending(uint64_t id) -{ - int ret; - struct lttng_ht_iter iter; - struct lttng_ht *ht; - struct lttng_consumer_stream *stream; - struct consumer_relayd_sock_pair *relayd = NULL; - int (*data_pending)(struct lttng_consumer_stream *); - - DBG("Consumer data pending command on session id %" PRIu64, id); - - rcu_read_lock(); - pthread_mutex_lock(&consumer_data.lock); - - switch (consumer_data.type) { - case LTTNG_CONSUMER_KERNEL: - data_pending = lttng_kconsumer_data_pending; - break; - case LTTNG_CONSUMER32_UST: - case LTTNG_CONSUMER64_UST: - data_pending = lttng_ustconsumer_data_pending; - break; - default: - ERR("Unknown consumer data type"); - assert(0); - } - - /* Ease our life a bit */ - ht = consumer_data.stream_list_ht; - - relayd = find_relayd_by_session_id(id); - if (relayd) { - /* Send init command for data pending. */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - ret = relayd_begin_data_pending(&relayd->control_sock, - relayd->relayd_session_id); - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - if (ret < 0) { - /* Communication error thus the relayd so no data pending. */ - goto data_not_pending; - } - } - - cds_lfht_for_each_entry_duplicate(ht->ht, - ht->hash_fct(&id, lttng_ht_seed), - ht->match_fct, &id, - &iter.iter, stream, node_session_id.node) { - /* If this call fails, the stream is being used hence data pending. */ - ret = stream_try_lock(stream); - if (!ret) { - goto data_pending; - } - - /* - * A removed node from the hash table indicates that the stream has - * been deleted thus having a guarantee that the buffers are closed - * on the consumer side. However, data can still be transmitted - * over the network so don't skip the relayd check. - */ - ret = cds_lfht_is_node_deleted(&stream->node.node); - if (!ret) { - /* Check the stream if there is data in the buffers. */ - ret = data_pending(stream); - if (ret == 1) { - pthread_mutex_unlock(&stream->lock); - goto data_pending; - } - } - - /* Relayd check */ - if (relayd) { - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - if (stream->metadata_flag) { - ret = relayd_quiescent_control(&relayd->control_sock, - stream->relayd_stream_id); - } else { - ret = relayd_data_pending(&relayd->control_sock, - stream->relayd_stream_id, - stream->next_net_seq_num - 1); - } - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - if (ret == 1) { - pthread_mutex_unlock(&stream->lock); - goto data_pending; - } - } - pthread_mutex_unlock(&stream->lock); - } - - if (relayd) { - unsigned int is_data_inflight = 0; - - /* Send init command for data pending. */ - pthread_mutex_lock(&relayd->ctrl_sock_mutex); - ret = relayd_end_data_pending(&relayd->control_sock, - relayd->relayd_session_id, &is_data_inflight); - pthread_mutex_unlock(&relayd->ctrl_sock_mutex); - if (ret < 0) { - goto data_not_pending; - } - if (is_data_inflight) { - goto data_pending; - } - } - - /* - * Finding _no_ node in the hash table and no inflight data means that the - * stream(s) have been removed thus data is guaranteed to be available for - * analysis from the trace files. - */ - -data_not_pending: - /* Data is available to be read by a viewer. */ - pthread_mutex_unlock(&consumer_data.lock); - rcu_read_unlock(); - return 0; - -data_pending: - /* Data is still being extracted from buffers. */ - pthread_mutex_unlock(&consumer_data.lock); - rcu_read_unlock(); - return 1; -} - -/* - * Send a ret code status message to the sessiond daemon. - * - * Return the sendmsg() return value. - */ -int consumer_send_status_msg(int sock, int ret_code) -{ - struct lttcomm_consumer_status_msg msg; - - memset(&msg, 0, sizeof(msg)); - msg.ret_code = ret_code; - - return lttcomm_send_unix_sock(sock, &msg, sizeof(msg)); -} - -/* - * Send a channel status message to the sessiond daemon. - * - * Return the sendmsg() return value. - */ -int consumer_send_status_channel(int sock, - struct lttng_consumer_channel *channel) -{ - struct lttcomm_consumer_status_channel msg; - - assert(sock >= 0); - - memset(&msg, 0, sizeof(msg)); - if (!channel) { - msg.ret_code = LTTCOMM_CONSUMERD_CHANNEL_FAIL; - } else { - msg.ret_code = LTTCOMM_CONSUMERD_SUCCESS; - msg.key = channel->key; - msg.stream_count = channel->streams.count; - } - - return lttcomm_send_unix_sock(sock, &msg, sizeof(msg)); -} - -unsigned long consumer_get_consume_start_pos(unsigned long consumed_pos, - unsigned long produced_pos, uint64_t nb_packets_per_stream, - uint64_t max_sb_size) -{ - unsigned long start_pos; - - if (!nb_packets_per_stream) { - return consumed_pos; /* Grab everything */ - } - start_pos = produced_pos - offset_align_floor(produced_pos, max_sb_size); - start_pos -= max_sb_size * nb_packets_per_stream; - if ((long) (start_pos - consumed_pos) < 0) { - return consumed_pos; /* Grab everything */ - } - return start_pos; -}