* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
*/
+/* This file contains the implementation of the UST listener thread, which
+ * receives trace control commands. It also coordinates the initialization of
+ * libust.
+ */
+
#define _GNU_SOURCE
#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
+#include <pthread.h>
#include <signal.h>
+#include <sys/epoll.h>
+#include <sys/time.h>
#include <sys/types.h>
#include <sys/socket.h>
-#include <sys/un.h>
#include <fcntl.h>
#include <poll.h>
#include <regex.h>
#include <urcu/uatomic_arch.h>
+#include <urcu/list.h>
#include <ust/marker.h>
+#include <ust/tracepoint.h>
#include <ust/tracectl.h>
+#include <ust/clock.h>
#include "tracer.h"
#include "usterr.h"
#include "ustcomm.h"
#include "buffers.h"
#include "marker-control.h"
-#include "multipoll.h"
-
-#define USTSIGNAL SIGIO
-
-#define MAX_MSG_SIZE (100)
-#define MSG_NOTIF 1
-#define MSG_REGISTER_NOTIF 2
-
-char consumer_stack[10000];
/* This should only be accessed by the constructor, before the creation
* of the listener, and then only by the listener.
*/
s64 pidunique = -1LL;
-struct list_head blocked_consumers = LIST_HEAD_INIT(blocked_consumers);
+/* The process pid is used to detect a non-traceable fork
+ * and allow the non-traceable fork to be ignored
+ * by destructor sequences in libust
+ */
+static pid_t processpid = 0;
-static struct ustcomm_app ustcomm_app;
+static struct ustcomm_header _receive_header;
+static struct ustcomm_header *receive_header = &_receive_header;
+static char receive_buffer[USTCOMM_BUFFER_SIZE];
+static char send_buffer[USTCOMM_BUFFER_SIZE];
-struct tracecmd { /* no padding */
- uint32_t size;
- uint16_t command;
-};
+static int epoll_fd;
-/* volatile because shared between the listener and the main thread */
-volatile sig_atomic_t buffers_to_export = 0;
-
-struct trctl_msg {
- /* size: the size of all the fields except size itself */
- uint32_t size;
- uint16_t type;
- /* Only the necessary part of the payload is transferred. It
- * may even be none of it.
- */
- char payload[94];
-};
+/*
+ * Listener thread data vs fork() protection mechanism. Ensures that no listener
+ * thread mutexes and data structures are being concurrently modified or held by
+ * other threads when fork() is executed.
+ */
+static pthread_mutex_t listener_thread_data_mutex = PTHREAD_MUTEX_INITIALIZER;
-struct consumer_channel {
- int fd;
- struct ltt_channel_struct *chan;
-};
+/* Mutex protecting listen_sock. Nests inside listener_thread_data_mutex. */
+static pthread_mutex_t listen_sock_mutex = PTHREAD_MUTEX_INITIALIZER;
+static struct ustcomm_sock *listen_sock;
-struct blocked_consumer {
- int fd_consumer;
- int fd_producer;
- int tmp_poll_idx;
+extern struct chan_info_struct chan_infos[];
- /* args to ustcomm_send_reply */
- struct ustcomm_server server;
- struct ustcomm_source src;
+static struct cds_list_head ust_socks = CDS_LIST_HEAD_INIT(ust_socks);
- /* args to ust_buffers_get_subbuf */
- struct ust_buffer *buf;
+/* volatile because shared between the listener and the main thread */
+int buffers_to_export = 0;
- struct list_head list;
-};
+int ust_clock_source;
static long long make_pidunique(void)
{
s64 retval;
struct timeval tv;
-
+
gettimeofday(&tv, NULL);
retval = tv.tv_sec;
marker_iter_reset(&iter);
marker_iter_start(&iter);
- while(iter.marker) {
- fprintf(fp, "marker: %s/%s %d \"%s\" %p\n", iter.marker->channel, iter.marker->name, (int)imv_read(iter.marker->state), iter.marker->format, iter.marker->location);
+ while (iter.marker) {
+ fprintf(fp, "marker: %s/%s %d \"%s\" %p\n",
+ (*iter.marker)->channel,
+ (*iter.marker)->name,
+ (int)imv_read((*iter.marker)->state),
+ (*iter.marker)->format,
+ (*iter.marker)->location);
marker_iter_next(&iter);
}
unlock_markers();
}
-static int init_socket(void);
-
-/* Ask the daemon to collect a trace called trace_name and being
- * produced by this pid.
- *
- * The trace must be at least allocated. (It can also be started.)
- * This is because _ltt_trace_find is used.
- */
-
-static void inform_consumer_daemon(const char *trace_name)
+static void print_trace_events(FILE *fp)
{
- int i,j;
- struct ust_trace *trace;
- pid_t pid = getpid();
- int result;
+ struct trace_event_iter iter;
- ltt_lock_traces();
+ lock_trace_events();
+ trace_event_iter_reset(&iter);
+ trace_event_iter_start(&iter);
- trace = _ltt_trace_find(trace_name);
- if(trace == NULL) {
- WARN("inform_consumer_daemon: could not find trace \"%s\"; it is probably already destroyed", trace_name);
- goto finish;
- }
-
- for(i=0; i < trace->nr_channels; i++) {
- /* iterate on all cpus */
- for(j=0; j<trace->channels[i].n_cpus; j++) {
- char *buf;
- asprintf(&buf, "%s_%d", trace->channels[i].channel_name, j);
- result = ustcomm_request_consumer(pid, buf);
- if(result == -1) {
- WARN("Failed to request collection for channel %s. Is the daemon available?", trace->channels[i].channel_name);
- /* continue even if fail */
- }
- free(buf);
- buffers_to_export++;
- }
+ while (iter.trace_event) {
+ fprintf(fp, "trace_event: %s\n", (*iter.trace_event)->name);
+ trace_event_iter_next(&iter);
}
-
- finish:
- ltt_unlock_traces();
+ unlock_trace_events();
}
-int process_blkd_consumer_act(void *priv, int fd, short events)
+static int connect_ustconsumer(void)
{
- int result;
- long consumed_old = 0;
- char *reply;
- struct blocked_consumer *bc = (struct blocked_consumer *) priv;
- char inbuf;
-
- result = read(bc->fd_producer, &inbuf, 1);
- if(result == -1) {
- PERROR("read");
- return -1;
- }
- if(result == 0) {
- int res;
- DBG("listener: got messsage that a buffer ended");
-
- res = close(bc->fd_producer);
- if(res == -1) {
- PERROR("close");
- }
-
- list_del(&bc->list);
-
- result = ustcomm_send_reply(&bc->server, "END", &bc->src);
- if(result < 0) {
- ERR("ustcomm_send_reply failed");
- return -1;
- }
+ int result, fd;
+ char default_daemon_path[] = SOCK_DIR "/ustconsumer";
+ char *explicit_daemon_path, *daemon_path;
- return 0;
+ explicit_daemon_path = getenv("UST_DAEMON_SOCKET");
+ if (explicit_daemon_path) {
+ daemon_path = explicit_daemon_path;
+ } else {
+ daemon_path = default_daemon_path;
}
- result = ust_buffers_get_subbuf(bc->buf, &consumed_old);
- if(result == -EAGAIN) {
- WARN("missed buffer?");
- return 0;
- }
- else if(result < 0) {
- ERR("ust_buffers_get_subbuf: error: %s", strerror(-result));
- }
- asprintf(&reply, "%s %ld", "OK", consumed_old);
- result = ustcomm_send_reply(&bc->server, reply, &bc->src);
- if(result < 0) {
- ERR("ustcomm_send_reply failed");
- free(reply);
- return -1;
- }
- free(reply);
+ DBG("Connecting to daemon_path %s", daemon_path);
- list_del(&bc->list);
+ result = ustcomm_connect_path(daemon_path, &fd);
+ if (result < 0) {
+ WARN("connect_ustconsumer failed, daemon_path: %s",
+ daemon_path);
+ return result;
+ }
- return 0;
+ return fd;
}
-void blocked_consumers_add_to_mp(struct mpentries *ent)
-{
- struct blocked_consumer *bc;
- list_for_each_entry(bc, &blocked_consumers, list) {
- multipoll_add(ent, bc->fd_producer, POLLIN, process_blkd_consumer_act, bc, NULL);
+static void request_buffer_consumer(int sock,
+ const char *trace,
+ const char *channel,
+ int cpu)
+{
+ struct ustcomm_header send_header, recv_header;
+ struct ustcomm_buffer_info buf_inf;
+ int result = 0;
+
+ result = ustcomm_pack_buffer_info(&send_header,
+ &buf_inf,
+ trace,
+ channel,
+ cpu);
+
+ if (result < 0) {
+ ERR("failed to pack buffer info message %s_%d",
+ channel, cpu);
+ return;
}
-}
-
-void seperate_channel_cpu(const char *channel_and_cpu, char **channel, int *cpu)
-{
- const char *sep;
+ buf_inf.pid = getpid();
+ send_header.command = CONSUME_BUFFER;
- sep = rindex(channel_and_cpu, '_');
- if(sep == NULL) {
- *cpu = -1;
- sep = channel_and_cpu + strlen(channel_and_cpu);
- }
- else {
- *cpu = atoi(sep+1);
+ result = ustcomm_req(sock, &send_header, (char *) &buf_inf,
+ &recv_header, NULL);
+ if (result <= 0) {
+ PERROR("request for buffer consumer failed, is the daemon online?");
}
- asprintf(channel, "%.*s", (int)(sep-channel_and_cpu), channel_and_cpu);
+ return;
}
-static int do_cmd_get_shmid(const char *recvbuf, struct ustcomm_source *src)
+/* Ask the daemon to collect a trace called trace_name and being
+ * produced by this pid.
+ *
+ * The trace must be at least allocated. (It can also be started.)
+ * This is because _ltt_trace_find is used.
+ */
+
+static void inform_consumer_daemon(const char *trace_name)
{
- int retval = 0;
+ int sock, i,j;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- char *channel_and_cpu;
- int found = 0;
- int result;
- char *ch_name;
- int ch_cpu;
-
- DBG("get_shmid");
+ const char *ch_name;
- channel_and_cpu = nth_token(recvbuf, 1);
- if(channel_and_cpu == NULL) {
- ERR("cannot parse channel");
- goto end;
+ sock = connect_ustconsumer();
+ if (sock < 0) {
+ return;
}
- seperate_channel_cpu(channel_and_cpu, &ch_name, &ch_cpu);
- if(ch_cpu == -1) {
- ERR("problem parsing channel name");
- goto free_short_chan_name;
- }
+ DBG("Connected to ustconsumer");
ltt_lock_traces();
- trace = _ltt_trace_find(trace_name);
- ltt_unlock_traces();
- if(trace == NULL) {
- ERR("cannot find trace!");
- retval = -1;
- goto free_short_chan_name;
+ trace = _ltt_trace_find(trace_name);
+ if (trace == NULL) {
+ WARN("inform_consumer_daemon: could not find trace \"%s\"; it is probably already destroyed", trace_name);
+ goto unlock_traces;
}
- for(i=0; i<trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
- struct ust_buffer *buf = channel->buf[ch_cpu];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
- char *reply;
-
-// DBG("the shmid for the requested channel is %d", buf->shmid);
-// DBG("the shmid for its buffer structure is %d", channel->buf_struct_shmids);
- asprintf(&reply, "%d %d", buf->shmid, channel->buf_struct_shmids[ch_cpu]);
-
- result = ustcomm_send_reply(&ustcomm_app.server, reply, src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- free(reply);
- retval = -1;
- goto free_short_chan_name;
+ for (i=0; i < trace->nr_channels; i++) {
+ if (trace->channels[i].request_collection) {
+ /* iterate on all cpus */
+ for (j=0; j<trace->channels[i].n_cpus; j++) {
+ ch_name = trace->channels[i].channel_name;
+ request_buffer_consumer(sock, trace_name,
+ ch_name, j);
+ CMM_STORE_SHARED(buffers_to_export,
+ CMM_LOAD_SHARED(buffers_to_export)+1);
}
-
- free(reply);
-
- found = 1;
- break;
}
}
- if(!found) {
- ERR("channel not found (%s)", channel_and_cpu);
- }
-
- free_short_chan_name:
- free(ch_name);
+unlock_traces:
+ ltt_unlock_traces();
- end:
- return retval;
+ close(sock);
}
-static int do_cmd_get_n_subbufs(const char *recvbuf, struct ustcomm_source *src)
+static struct ust_channel *find_channel(const char *ch_name,
+ struct ust_trace *trace)
{
- int retval = 0;
- struct ust_trace *trace;
- char trace_name[] = "auto";
int i;
- char *channel_and_cpu;
- int found = 0;
- int result;
- char *ch_name;
- int ch_cpu;
- DBG("get_n_subbufs");
-
- channel_and_cpu = nth_token(recvbuf, 1);
- if(channel_and_cpu == NULL) {
- ERR("cannot parse channel");
- goto end;
+ for (i=0; i<trace->nr_channels; i++) {
+ if (!strcmp(trace->channels[i].channel_name, ch_name)) {
+ return &trace->channels[i];
+ }
}
- seperate_channel_cpu(channel_and_cpu, &ch_name, &ch_cpu);
- if(ch_cpu == -1) {
- ERR("problem parsing channel name");
- goto free_short_chan_name;
- }
+ return NULL;
+}
+
+static int get_buffer_shmid_pipe_fd(const char *trace_name, const char *ch_name,
+ int ch_cpu,
+ int *buf_shmid,
+ int *buf_struct_shmid,
+ int *buf_pipe_fd)
+{
+ struct ust_trace *trace;
+ struct ust_channel *channel;
+ struct ust_buffer *buf;
+
+ DBG("get_buffer_shmid_pipe_fd");
ltt_lock_traces();
trace = _ltt_trace_find(trace_name);
ltt_unlock_traces();
- if(trace == NULL) {
+ if (trace == NULL) {
ERR("cannot find trace!");
- retval = -1;
- goto free_short_chan_name;
+ return -ENODATA;
}
- for(i=0; i<trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
- char *reply;
-
- DBG("the n_subbufs for the requested channel is %d", channel->subbuf_cnt);
- asprintf(&reply, "%d", channel->subbuf_cnt);
-
- result = ustcomm_send_reply(&ustcomm_app.server, reply, src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- free(reply);
- retval = -1;
- goto free_short_chan_name;
- }
-
- free(reply);
- found = 1;
- break;
- }
- }
- if(found == 0) {
- ERR("unable to find channel");
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
+ ERR("cannot find channel %s!", ch_name);
+ return -ENODATA;
}
- free_short_chan_name:
- free(ch_name);
+ buf = channel->buf[ch_cpu];
- end:
- return retval;
+ *buf_shmid = buf->shmid;
+ *buf_struct_shmid = channel->buf_struct_shmids[ch_cpu];
+ *buf_pipe_fd = buf->data_ready_fd_read;
+
+ return 0;
}
-static int do_cmd_get_subbuf_size(const char *recvbuf, struct ustcomm_source *src)
+static int get_subbuf_num_size(const char *trace_name, const char *ch_name,
+ int *num, int *size)
{
- int retval = 0;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- char *channel_and_cpu;
- int found = 0;
- int result;
- char *ch_name;
- int ch_cpu;
+ struct ust_channel *channel;
DBG("get_subbuf_size");
- channel_and_cpu = nth_token(recvbuf, 1);
- if(channel_and_cpu == NULL) {
- ERR("cannot parse channel");
- goto end;
- }
-
- seperate_channel_cpu(channel_and_cpu, &ch_name, &ch_cpu);
- if(ch_cpu == -1) {
- ERR("problem parsing channel name");
- goto free_short_chan_name;
- }
-
ltt_lock_traces();
trace = _ltt_trace_find(trace_name);
ltt_unlock_traces();
- if(trace == NULL) {
+ if (!trace) {
ERR("cannot find trace!");
- retval = -1;
- goto free_short_chan_name;
+ return -ENODATA;
}
- for(i=0; i<trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
- char *reply;
-
- DBG("the subbuf_size for the requested channel is %zd", channel->subbuf_size);
- asprintf(&reply, "%zd", channel->subbuf_size);
-
- result = ustcomm_send_reply(&ustcomm_app.server, reply, src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- free(reply);
- retval = -1;
- goto free_short_chan_name;
- }
-
- free(reply);
- found = 1;
- break;
- }
- }
- if(found == 0) {
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
ERR("unable to find channel");
+ return -ENODATA;
}
- free_short_chan_name:
- free(ch_name);
+ *num = channel->subbuf_cnt;
+ *size = channel->subbuf_size;
- end:
- return retval;
+ return 0;
}
-static unsigned int poweroftwo(unsigned int x)
-{
- unsigned int power2 = 1;
- unsigned int hardcoded = 2147483648; /* FIX max 2^31 */
-
- if (x < 2)
- return 2;
+/* Return the power of two which is equal or higher to v */
- while (power2 < x && power2 < hardcoded)
- power2 *= 2;
+static unsigned int pow2_higher_or_eq(unsigned int v)
+{
+ int hb = fls(v);
+ int retval = 1<<(hb-1);
- return power2;
+ if (v-retval == 0)
+ return retval;
+ else
+ return retval<<1;
}
-static int do_cmd_set_subbuf_size(const char *recvbuf, struct ustcomm_source *src)
+static int set_subbuf_size(const char *trace_name, const char *ch_name,
+ unsigned int size)
{
- char *channel_slash_size;
- char ch_name[256]="";
- unsigned int size, power;
+ unsigned int power;
int retval = 0;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- int found = 0;
+ struct ust_channel *channel;
DBG("set_subbuf_size");
- channel_slash_size = nth_token(recvbuf, 1);
- sscanf(channel_slash_size, "%255[^/]/%u", ch_name, &size);
-
- if(ch_name == NULL) {
- ERR("cannot parse channel");
- goto end;
+ power = pow2_higher_or_eq(size);
+ power = max_t(unsigned int, 2u, power);
+ if (power != size) {
+ WARN("using the next power of two for buffer size = %u\n", power);
}
- power = poweroftwo(size);
- if (power != size)
- WARN("using the next 2^n = %u\n", power);
-
ltt_lock_traces();
trace = _ltt_trace_find_setup(trace_name);
- if(trace == NULL) {
+ if (trace == NULL) {
ERR("cannot find trace!");
- retval = -1;
- goto end;
+ retval = -ENODATA;
+ goto unlock_traces;
}
- for(i = 0; i < trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
-
- channel->subbuf_size = power;
- DBG("the set_subbuf_size for the requested channel is %zd", channel->subbuf_size);
-
- found = 1;
- break;
- }
- }
- if(found == 0) {
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
ERR("unable to find channel");
+ retval = -ENODATA;
+ goto unlock_traces;
}
- end:
+ channel->subbuf_size = power;
+ DBG("the set_subbuf_size for the requested channel is %zu", channel->subbuf_size);
+
+unlock_traces:
ltt_unlock_traces();
+
return retval;
}
-static int do_cmd_set_subbuf_num(const char *recvbuf, struct ustcomm_source *src)
+static int set_subbuf_num(const char *trace_name, const char *ch_name,
+ unsigned int num)
{
- char *channel_slash_num;
- char ch_name[256]="";
- unsigned int num;
- int retval = 0;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- int found = 0;
+ struct ust_channel *channel;
+ int retval = 0;
DBG("set_subbuf_num");
- channel_slash_num = nth_token(recvbuf, 1);
- sscanf(channel_slash_num, "%255[^/]/%u", ch_name, &num);
-
- if(ch_name == NULL) {
- ERR("cannot parse channel");
- goto end;
- }
if (num < 2) {
ERR("subbuffer count should be greater than 2");
- goto end;
+ return -EINVAL;
}
ltt_lock_traces();
trace = _ltt_trace_find_setup(trace_name);
- if(trace == NULL) {
+ if (trace == NULL) {
ERR("cannot find trace!");
- retval = -1;
- goto end;
+ retval = -ENODATA;
+ goto unlock_traces;
}
- for(i = 0; i < trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
-
- channel->subbuf_cnt = num;
- DBG("the set_subbuf_cnt for the requested channel is %zd", channel->subbuf_cnt);
-
- found = 1;
- break;
- }
- }
- if(found == 0) {
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
ERR("unable to find channel");
+ retval = -ENODATA;
+ goto unlock_traces;
}
- end:
+ channel->subbuf_cnt = num;
+ DBG("the set_subbuf_cnt for the requested channel is %u", channel->subbuf_cnt);
+
+unlock_traces:
ltt_unlock_traces();
return retval;
}
-static int do_cmd_get_subbuffer(const char *recvbuf, struct ustcomm_source *src)
+static int get_subbuffer(const char *trace_name, const char *ch_name,
+ int ch_cpu, long *consumed_old)
{
int retval = 0;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- char *channel_and_cpu;
- int found = 0;
- char *ch_name;
- int ch_cpu;
+ struct ust_channel *channel;
+ struct ust_buffer *buf;
DBG("get_subbuf");
- channel_and_cpu = nth_token(recvbuf, 1);
- if(channel_and_cpu == NULL) {
- ERR("cannot parse channel");
- goto end;
- }
-
- seperate_channel_cpu(channel_and_cpu, &ch_name, &ch_cpu);
- if(ch_cpu == -1) {
- ERR("problem parsing channel name");
- goto free_short_chan_name;
- }
+ *consumed_old = 0;
ltt_lock_traces();
trace = _ltt_trace_find(trace_name);
- if(trace == NULL) {
- int result;
-
+ if (!trace) {
DBG("Cannot find trace. It was likely destroyed by the user.");
- result = ustcomm_send_reply(&ustcomm_app.server, "NOTFOUND", src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- retval = -1;
- goto unlock_traces;
- }
-
+ retval = -ENODATA;
goto unlock_traces;
}
- for(i=0; i<trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
-
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
- struct ust_buffer *buf = channel->buf[ch_cpu];
- struct blocked_consumer *bc;
-
- found = 1;
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
+ ERR("unable to find channel");
+ retval = -ENODATA;
+ goto unlock_traces;
+ }
- bc = (struct blocked_consumer *) malloc(sizeof(struct blocked_consumer));
- if(bc == NULL) {
- ERR("malloc returned NULL");
- goto unlock_traces;
- }
- bc->fd_consumer = src->fd;
- bc->fd_producer = buf->data_ready_fd_read;
- bc->buf = buf;
- bc->src = *src;
- bc->server = ustcomm_app.server;
-
- list_add(&bc->list, &blocked_consumers);
-
- /* Being here is the proof the daemon has mapped the buffer in its
- * memory. We may now decrement buffers_to_export.
- */
- if(uatomic_read(&buf->consumed) == 0) {
- DBG("decrementing buffers_to_export");
- buffers_to_export--;
- }
+ buf = channel->buf[ch_cpu];
- break;
- }
- }
- if(found == 0) {
- ERR("unable to find channel");
+ retval = ust_buffers_get_subbuf(buf, consumed_old);
+ if (retval < 0) {
+ WARN("missed buffer?");
}
- unlock_traces:
+unlock_traces:
ltt_unlock_traces();
- free_short_chan_name:
- free(ch_name);
-
- end:
return retval;
}
-static int do_cmd_put_subbuffer(const char *recvbuf, struct ustcomm_source *src)
+
+static int notify_buffer_mapped(const char *trace_name,
+ const char *ch_name,
+ int ch_cpu)
{
int retval = 0;
struct ust_trace *trace;
- char trace_name[] = "auto";
- int i;
- char *channel_and_cpu;
- int found = 0;
- int result;
- char *ch_name;
- int ch_cpu;
- long consumed_old;
- char *consumed_old_str;
- char *endptr;
- char *reply = NULL;
-
- DBG("put_subbuf");
-
- channel_and_cpu = strdup(nth_token(recvbuf, 1));
- if(channel_and_cpu == NULL) {
- ERR("cannot parse channel");
- retval = -1;
- goto end;
- }
+ struct ust_channel *channel;
+ struct ust_buffer *buf;
- consumed_old_str = strdup(nth_token(recvbuf, 2));
- if(consumed_old_str == NULL) {
- ERR("cannot parse consumed_old");
- retval = -1;
- goto free_channel_and_cpu;
- }
- consumed_old = strtol(consumed_old_str, &endptr, 10);
- if(*endptr != '\0') {
- ERR("invalid value for consumed_old");
- retval = -1;
- goto free_consumed_old_str;
- }
-
- seperate_channel_cpu(channel_and_cpu, &ch_name, &ch_cpu);
- if(ch_cpu == -1) {
- ERR("problem parsing channel name");
- retval = -1;
- goto free_short_chan_name;
- }
+ DBG("get_buffer_fd");
ltt_lock_traces();
trace = _ltt_trace_find(trace_name);
- if(trace == NULL) {
+ if (!trace) {
+ retval = -ENODATA;
DBG("Cannot find trace. It was likely destroyed by the user.");
- result = ustcomm_send_reply(&ustcomm_app.server, "NOTFOUND", src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- retval = -1;
- goto unlock_traces;
- }
+ goto unlock_traces;
+ }
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
+ retval = -ENODATA;
+ ERR("unable to find channel");
goto unlock_traces;
}
- for(i=0; i<trace->nr_channels; i++) {
- struct ust_channel *channel = &trace->channels[i];
+ buf = channel->buf[ch_cpu];
- if(!strcmp(trace->channels[i].channel_name, ch_name)) {
- struct ust_buffer *buf = channel->buf[ch_cpu];
+ /* Being here is the proof the daemon has mapped the buffer in its
+ * memory. We may now decrement buffers_to_export.
+ */
+ if (uatomic_read(&buf->consumed) == 0) {
+ DBG("decrementing buffers_to_export");
+ CMM_STORE_SHARED(buffers_to_export, CMM_LOAD_SHARED(buffers_to_export)-1);
+ }
- found = 1;
+unlock_traces:
+ ltt_unlock_traces();
- result = ust_buffers_put_subbuf(buf, consumed_old);
- if(result < 0) {
- WARN("ust_buffers_put_subbuf: error (subbuf=%s)", channel_and_cpu);
- asprintf(&reply, "%s", "ERROR");
- }
- else {
- DBG("ust_buffers_put_subbuf: success (subbuf=%s)", channel_and_cpu);
- asprintf(&reply, "%s", "OK");
- }
+ return retval;
+}
- result = ustcomm_send_reply(&ustcomm_app.server, reply, src);
- if(result) {
- ERR("ustcomm_send_reply failed");
- free(reply);
- retval = -1;
- goto unlock_traces;
- }
+static int put_subbuffer(const char *trace_name, const char *ch_name,
+ int ch_cpu, long consumed_old)
+{
+ int retval = 0;
+ struct ust_trace *trace;
+ struct ust_channel *channel;
+ struct ust_buffer *buf;
- free(reply);
- break;
- }
+ DBG("put_subbuf");
+
+ ltt_lock_traces();
+ trace = _ltt_trace_find(trace_name);
+
+ if (!trace) {
+ retval = -ENODATA;
+ DBG("Cannot find trace. It was likely destroyed by the user.");
+ goto unlock_traces;
}
- if(found == 0) {
+
+ channel = find_channel(ch_name, trace);
+ if (!channel) {
+ retval = -ENODATA;
ERR("unable to find channel");
+ goto unlock_traces;
+ }
+
+ buf = channel->buf[ch_cpu];
+
+ retval = ust_buffers_put_subbuf(buf, consumed_old);
+ if (retval < 0) {
+ WARN("ust_buffers_put_subbuf: error (subbuf=%s_%d)",
+ ch_name, ch_cpu);
+ } else {
+ DBG("ust_buffers_put_subbuf: success (subbuf=%s_%d)",
+ ch_name, ch_cpu);
}
- unlock_traces:
+unlock_traces:
ltt_unlock_traces();
- free_short_chan_name:
- free(ch_name);
- free_consumed_old_str:
- free(consumed_old_str);
- free_channel_and_cpu:
- free(channel_and_cpu);
-
- end:
+
return retval;
}
+static void release_listener_mutex(void *ptr)
+{
+ pthread_mutex_unlock(&listener_thread_data_mutex);
+}
+
static void listener_cleanup(void *ptr)
{
- ustcomm_fini_app(&ustcomm_app, 0);
+ pthread_mutex_lock(&listen_sock_mutex);
+ if (listen_sock) {
+ ustcomm_del_named_sock(listen_sock, 0);
+ listen_sock = NULL;
+ }
+ pthread_mutex_unlock(&listen_sock_mutex);
}
-int process_client_cmd(char *recvbuf, struct ustcomm_source *src)
+static int force_subbuf_switch(const char *trace_name)
{
- int result;
- char trace_name[] = "auto";
- char trace_type[] = "ustrelay";
- int len;
+ struct ust_trace *trace;
+ int i, j, retval = 0;
- DBG("received a message! it's: %s", recvbuf);
- len = strlen(recvbuf);
+ ltt_lock_traces();
+ trace = _ltt_trace_find(trace_name);
+ if (!trace) {
+ retval = -ENODATA;
+ DBG("Cannot find trace. It was likely destroyed by the user.");
+ goto unlock_traces;
+ }
- if(!strcmp(recvbuf, "print_markers")) {
- print_markers(stderr);
+ for (i = 0; i < trace->nr_channels; i++) {
+ for (j = 0; j < trace->channels[i].n_cpus; j++) {
+ ltt_force_switch(trace->channels[i].buf[j],
+ FORCE_FLUSH);
+ }
}
- else if(!strcmp(recvbuf, "list_markers")) {
- char *ptr;
- size_t size;
- FILE *fp;
- fp = open_memstream(&ptr, &size);
- print_markers(fp);
- fclose(fp);
+unlock_traces:
+ ltt_unlock_traces();
+
+ return retval;
+}
- result = ustcomm_send_reply(&ustcomm_app.server, ptr, src);
+static int process_trace_cmd(int command, char *trace_name)
+{
+ int result;
+ char trace_type[] = "ustrelay";
- free(ptr);
- }
- else if(!strcmp(recvbuf, "start")) {
+ switch(command) {
+ case START:
/* start is an operation that setups the trace, allocates it and starts it */
result = ltt_trace_setup(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_setup failed");
- return -1;
+ return result;
}
result = ltt_trace_set_type(trace_name, trace_type);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_set_type failed");
- return -1;
+ return result;
}
result = ltt_trace_alloc(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_alloc failed");
- return -1;
+ return result;
}
inform_consumer_daemon(trace_name);
result = ltt_trace_start(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_start failed");
- return -1;
+ return result;
}
- }
- else if(!strcmp(recvbuf, "trace_setup")) {
+
+ return 0;
+ case SETUP_TRACE:
DBG("trace setup");
result = ltt_trace_setup(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_setup failed");
- return -1;
+ return result;
}
result = ltt_trace_set_type(trace_name, trace_type);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_set_type failed");
- return -1;
+ return result;
}
- }
- else if(!strcmp(recvbuf, "trace_alloc")) {
+
+ return 0;
+ case ALLOC_TRACE:
DBG("trace alloc");
result = ltt_trace_alloc(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_alloc failed");
- return -1;
+ return result;
}
inform_consumer_daemon(trace_name);
- }
- else if(!strcmp(recvbuf, "trace_create")) {
+
+ return 0;
+
+ case CREATE_TRACE:
DBG("trace create");
result = ltt_trace_setup(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_setup failed");
- return -1;
+ return result;
}
result = ltt_trace_set_type(trace_name, trace_type);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_set_type failed");
- return -1;
+ return result;
}
- }
- else if(!strcmp(recvbuf, "trace_start")) {
+
+ return 0;
+ case START_TRACE:
DBG("trace start");
result = ltt_trace_alloc(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_alloc failed");
- return -1;
+ return result;
}
- if(!result) {
+ if (!result) {
inform_consumer_daemon(trace_name);
}
result = ltt_trace_start(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_start failed");
- return -1;
+ return result;
}
- }
- else if(!strcmp(recvbuf, "trace_stop")) {
+
+ return 0;
+ case STOP_TRACE:
DBG("trace stop");
result = ltt_trace_stop(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_stop failed");
- return -1;
+ return result;
}
- }
- else if(!strcmp(recvbuf, "trace_destroy")) {
+ return 0;
+ case DESTROY_TRACE:
DBG("trace destroy");
result = ltt_trace_destroy(trace_name, 0);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_destroy failed");
- return -1;
+ return result;
+ }
+ return 0;
+ case FORCE_SUBBUF_SWITCH:
+ DBG("force switch");
+
+ result = force_subbuf_switch(trace_name);
+ if (result < 0) {
+ ERR("force_subbuf_switch failed");
+ return result;
}
+ return 0;
}
- else if(nth_token_is(recvbuf, "get_shmid", 0) == 1) {
- do_cmd_get_shmid(recvbuf, src);
+
+ return 0;
+}
+
+
+static void process_channel_cmd(int sock, int command,
+ struct ustcomm_channel_info *ch_inf)
+{
+ struct ustcomm_header _reply_header;
+ struct ustcomm_header *reply_header = &_reply_header;
+ struct ustcomm_channel_info *reply_msg =
+ (struct ustcomm_channel_info *)send_buffer;
+ int result, offset = 0, num, size;
+
+ memset(reply_header, 0, sizeof(*reply_header));
+
+ switch (command) {
+ case GET_SUBBUF_NUM_SIZE:
+ result = get_subbuf_num_size(ch_inf->trace,
+ ch_inf->channel,
+ &num, &size);
+ if (result < 0) {
+ reply_header->result = result;
+ break;
+ }
+
+ reply_msg->channel = USTCOMM_POISON_PTR;
+ reply_msg->subbuf_num = num;
+ reply_msg->subbuf_size = size;
+
+
+ reply_header->size = COMPUTE_MSG_SIZE(reply_msg, offset);
+
+ break;
+ case SET_SUBBUF_NUM:
+ reply_header->result = set_subbuf_num(ch_inf->trace,
+ ch_inf->channel,
+ ch_inf->subbuf_num);
+
+ break;
+ case SET_SUBBUF_SIZE:
+ reply_header->result = set_subbuf_size(ch_inf->trace,
+ ch_inf->channel,
+ ch_inf->subbuf_size);
+
+
+ break;
}
- else if(nth_token_is(recvbuf, "get_n_subbufs", 0) == 1) {
- do_cmd_get_n_subbufs(recvbuf, src);
+ if (ustcomm_send(sock, reply_header, (char *)reply_msg) < 0) {
+ ERR("ustcomm_send failed");
+ }
+}
+
+static void process_buffer_cmd(int sock, int command,
+ struct ustcomm_buffer_info *buf_inf)
+{
+ struct ustcomm_header _reply_header;
+ struct ustcomm_header *reply_header = &_reply_header;
+ struct ustcomm_buffer_info *reply_msg =
+ (struct ustcomm_buffer_info *)send_buffer;
+ int result, offset = 0, buf_shmid, buf_struct_shmid, buf_pipe_fd;
+ long consumed_old;
+
+ memset(reply_header, 0, sizeof(*reply_header));
+
+ switch (command) {
+ case GET_BUF_SHMID_PIPE_FD:
+ result = get_buffer_shmid_pipe_fd(buf_inf->trace,
+ buf_inf->channel,
+ buf_inf->ch_cpu,
+ &buf_shmid,
+ &buf_struct_shmid,
+ &buf_pipe_fd);
+ if (result < 0) {
+ reply_header->result = result;
+ break;
+ }
+
+ reply_msg->channel = USTCOMM_POISON_PTR;
+ reply_msg->buf_shmid = buf_shmid;
+ reply_msg->buf_struct_shmid = buf_struct_shmid;
+
+ reply_header->size = COMPUTE_MSG_SIZE(reply_msg, offset);
+ reply_header->fd_included = 1;
+
+ if (ustcomm_send_fd(sock, reply_header, (char *)reply_msg,
+ &buf_pipe_fd) < 0) {
+ ERR("ustcomm_send failed");
+ }
+ return;
+
+ case NOTIFY_BUF_MAPPED:
+ reply_header->result =
+ notify_buffer_mapped(buf_inf->trace,
+ buf_inf->channel,
+ buf_inf->ch_cpu);
+ break;
+ case GET_SUBBUFFER:
+ result = get_subbuffer(buf_inf->trace, buf_inf->channel,
+ buf_inf->ch_cpu, &consumed_old);
+ if (result < 0) {
+ reply_header->result = result;
+ break;
+ }
+
+ reply_msg->channel = USTCOMM_POISON_PTR;
+ reply_msg->consumed_old = consumed_old;
+
+ reply_header->size = COMPUTE_MSG_SIZE(reply_msg, offset);
+
+ break;
+ case PUT_SUBBUFFER:
+ result = put_subbuffer(buf_inf->trace, buf_inf->channel,
+ buf_inf->ch_cpu,
+ buf_inf->consumed_old);
+ reply_header->result = result;
+
+ break;
}
- else if(nth_token_is(recvbuf, "get_subbuf_size", 0) == 1) {
- do_cmd_get_subbuf_size(recvbuf, src);
+
+ if (ustcomm_send(sock, reply_header, (char *)reply_msg) < 0) {
+ ERR("ustcomm_send failed");
}
- else if(nth_token_is(recvbuf, "load_probe_lib", 0) == 1) {
- char *libfile;
- libfile = nth_token(recvbuf, 1);
+}
- DBG("load_probe_lib loading %s", libfile);
+static void process_marker_cmd(int sock, int command,
+ struct ustcomm_marker_info *marker_inf)
+{
+ struct ustcomm_header _reply_header;
+ struct ustcomm_header *reply_header = &_reply_header;
+ int result = 0;
+
+ memset(reply_header, 0, sizeof(*reply_header));
- free(libfile);
+ switch(command) {
+ case ENABLE_MARKER:
+
+ result = ltt_marker_connect(marker_inf->channel,
+ marker_inf->marker,
+ "default");
+ if (result < 0) {
+ WARN("could not enable marker; channel=%s,"
+ " name=%s",
+ marker_inf->channel,
+ marker_inf->marker);
+
+ }
+ break;
+ case DISABLE_MARKER:
+ result = ltt_marker_disconnect(marker_inf->channel,
+ marker_inf->marker,
+ "default");
+ if (result < 0) {
+ WARN("could not disable marker; channel=%s,"
+ " name=%s",
+ marker_inf->channel,
+ marker_inf->marker);
+ }
+ break;
}
- else if(nth_token_is(recvbuf, "get_subbuffer", 0) == 1) {
- do_cmd_get_subbuffer(recvbuf, src);
+
+ reply_header->result = result;
+
+ if (ustcomm_send(sock, reply_header, NULL) < 0) {
+ ERR("ustcomm_send failed");
}
- else if(nth_token_is(recvbuf, "put_subbuffer", 0) == 1) {
- do_cmd_put_subbuffer(recvbuf, src);
+
+}
+static void process_client_cmd(struct ustcomm_header *recv_header,
+ char *recv_buf, int sock)
+{
+ int result;
+ struct ustcomm_header _reply_header;
+ struct ustcomm_header *reply_header = &_reply_header;
+ char *send_buf = send_buffer;
+
+ memset(reply_header, 0, sizeof(*reply_header));
+ memset(send_buf, 0, sizeof(send_buffer));
+
+ switch(recv_header->command) {
+ case GET_SUBBUF_NUM_SIZE:
+ case SET_SUBBUF_NUM:
+ case SET_SUBBUF_SIZE:
+ {
+ struct ustcomm_channel_info *ch_inf;
+ ch_inf = (struct ustcomm_channel_info *)recv_buf;
+ result = ustcomm_unpack_channel_info(ch_inf);
+ if (result < 0) {
+ ERR("couldn't unpack channel info");
+ reply_header->result = -EINVAL;
+ goto send_response;
+ }
+ process_channel_cmd(sock, recv_header->command, ch_inf);
+ return;
}
- else if(nth_token_is(recvbuf, "set_subbuf_size", 0) == 1) {
- do_cmd_set_subbuf_size(recvbuf, src);
+ case GET_BUF_SHMID_PIPE_FD:
+ case NOTIFY_BUF_MAPPED:
+ case GET_SUBBUFFER:
+ case PUT_SUBBUFFER:
+ {
+ struct ustcomm_buffer_info *buf_inf;
+ buf_inf = (struct ustcomm_buffer_info *)recv_buf;
+ result = ustcomm_unpack_buffer_info(buf_inf);
+ if (result < 0) {
+ ERR("couldn't unpack buffer info");
+ reply_header->result = -EINVAL;
+ goto send_response;
+ }
+ process_buffer_cmd(sock, recv_header->command, buf_inf);
+ return;
}
- else if(nth_token_is(recvbuf, "set_subbuf_num", 0) == 1) {
- do_cmd_set_subbuf_num(recvbuf, src);
+ case ENABLE_MARKER:
+ case DISABLE_MARKER:
+ {
+ struct ustcomm_marker_info *marker_inf;
+ marker_inf = (struct ustcomm_marker_info *)recv_buf;
+ result = ustcomm_unpack_marker_info(marker_inf);
+ if (result < 0) {
+ ERR("couldn't unpack marker info");
+ reply_header->result = -EINVAL;
+ goto send_response;
+ }
+ process_marker_cmd(sock, recv_header->command, marker_inf);
+ return;
}
- else if(nth_token_is(recvbuf, "enable_marker", 0) == 1) {
- char *channel_slash_name = nth_token(recvbuf, 1);
- char channel_name[256]="";
- char marker_name[256]="";
-
- result = sscanf(channel_slash_name, "%255[^/]/%255s", channel_name, marker_name);
+ case LIST_MARKERS:
+ {
+ char *ptr;
+ size_t size;
+ FILE *fp;
- if(channel_name == NULL || marker_name == NULL) {
- WARN("invalid marker name");
- goto next_cmd;
+ fp = open_memstream(&ptr, &size);
+ if (fp == NULL) {
+ ERR("opening memstream failed");
+ return;
}
+ print_markers(fp);
+ fclose(fp);
+
+ reply_header->size = size + 1; /* Include final \0 */
+
+ result = ustcomm_send(sock, reply_header, ptr);
+
+ free(ptr);
- result = ltt_marker_connect(channel_name, marker_name, "default");
- if(result < 0) {
- WARN("could not enable marker; channel=%s, name=%s", channel_name, marker_name);
+ if (result < 0) {
+ PERROR("failed to send markers list");
}
- }
- else if(nth_token_is(recvbuf, "disable_marker", 0) == 1) {
- char *channel_slash_name = nth_token(recvbuf, 1);
- char *marker_name;
- char *channel_name;
- result = sscanf(channel_slash_name, "%a[^/]/%as", &channel_name, &marker_name);
+ break;
+ }
+ case LIST_TRACE_EVENTS:
+ {
+ char *ptr;
+ size_t size;
+ FILE *fp;
- if(marker_name == NULL) {
+ fp = open_memstream(&ptr, &size);
+ if (fp == NULL) {
+ ERR("opening memstream failed");
+ return;
}
+ print_trace_events(fp);
+ fclose(fp);
+
+ reply_header->size = size + 1; /* Include final \0 */
+
+ result = ustcomm_send(sock, reply_header, ptr);
- result = ltt_marker_disconnect(channel_name, marker_name, "default");
- if(result < 0) {
- WARN("could not disable marker; channel=%s, name=%s", channel_name, marker_name);
+ free(ptr);
+
+ if (result < 0) {
+ ERR("list_trace_events failed");
+ return;
}
+
+ break;
+ }
+ case LOAD_PROBE_LIB:
+ {
+ char *libfile;
+
+ /* FIXME: No functionality at all... */
+ libfile = recv_buf;
+
+ DBG("load_probe_lib loading %s", libfile);
+
+ break;
}
- else if(nth_token_is(recvbuf, "get_pidunique", 0) == 1) {
- char *reply;
+ case GET_PIDUNIQUE:
+ {
+ struct ustcomm_pidunique *pid_msg;
+ pid_msg = (struct ustcomm_pidunique *)send_buf;
+
+ pid_msg->pidunique = pidunique;
+ reply_header->size = sizeof(pid_msg);
+
+ goto send_response;
+
+ }
+ case GET_SOCK_PATH:
+ {
+ struct ustcomm_single_field *sock_msg;
+ char *sock_path_env;
+
+ sock_msg = (struct ustcomm_single_field *)send_buf;
+
+ sock_path_env = getenv("UST_DAEMON_SOCKET");
+
+ if (!sock_path_env) {
+ result = ustcomm_pack_single_field(reply_header,
+ sock_msg,
+ SOCK_DIR "/ustconsumer");
- asprintf(&reply, "%lld", pidunique);
+ } else {
+ result = ustcomm_pack_single_field(reply_header,
+ sock_msg,
+ sock_path_env);
+ }
+ reply_header->result = result;
+
+ goto send_response;
+ }
+ case SET_SOCK_PATH:
+ {
+ struct ustcomm_single_field *sock_msg;
+ sock_msg = (struct ustcomm_single_field *)recv_buf;
+ result = ustcomm_unpack_single_field(sock_msg);
+ if (result < 0) {
+ reply_header->result = -EINVAL;
+ goto send_response;
+ }
- result = ustcomm_send_reply(&ustcomm_app.server, reply, src);
- if(result) {
- ERR("listener: get_pidunique: ustcomm_send_reply failed");
- goto next_cmd;
+ reply_header->result = setenv("UST_DAEMON_SOCKET",
+ sock_msg->field, 1);
+
+ goto send_response;
+ }
+ case START:
+ case SETUP_TRACE:
+ case ALLOC_TRACE:
+ case CREATE_TRACE:
+ case START_TRACE:
+ case STOP_TRACE:
+ case DESTROY_TRACE:
+ case FORCE_SUBBUF_SWITCH:
+ {
+ struct ustcomm_single_field *trace_inf =
+ (struct ustcomm_single_field *)recv_buf;
+
+ result = ustcomm_unpack_single_field(trace_inf);
+ if (result < 0) {
+ ERR("couldn't unpack trace info");
+ reply_header->result = -EINVAL;
+ goto send_response;
}
- free(reply);
+ reply_header->result =
+ process_trace_cmd(recv_header->command,
+ trace_inf->field);
+ goto send_response;
+
}
- else {
- ERR("unable to parse message: %s", recvbuf);
+ default:
+ reply_header->result = -EINVAL;
+
+ goto send_response;
}
-next_cmd:
+ return;
- return 0;
+send_response:
+ ustcomm_send(sock, reply_header, send_buf);
}
+#define MAX_EVENTS 10
+
void *listener_main(void *p)
{
- int result;
+ struct ustcomm_sock *epoll_sock;
+ struct epoll_event events[MAX_EVENTS];
+ struct sockaddr addr;
+ int accept_fd, nfds, result, i, addr_size;
DBG("LISTENER");
pthread_cleanup_push(listener_cleanup, NULL);
for(;;) {
- struct mpentries mpent;
-
- multipoll_init(&mpent);
-
- blocked_consumers_add_to_mp(&mpent);
- ustcomm_mp_add_app_clients(&mpent, &ustcomm_app, process_client_cmd);
-
- result = multipoll_poll(&mpent, -1);
- if(result == -1) {
- ERR("error in multipoll_poll");
+ nfds = epoll_wait(epoll_fd, events, MAX_EVENTS, -1);
+ if (nfds == -1) {
+ PERROR("listener_main: epoll_wait failed");
+ continue;
}
- multipoll_destroy(&mpent);
+ for (i = 0; i < nfds; i++) {
+ pthread_mutex_lock(&listener_thread_data_mutex);
+ pthread_cleanup_push(release_listener_mutex, NULL);
+ epoll_sock = (struct ustcomm_sock *)events[i].data.ptr;
+ if (epoll_sock == listen_sock) {
+ addr_size = sizeof(struct sockaddr);
+ accept_fd = accept(epoll_sock->fd,
+ &addr,
+ (socklen_t *)&addr_size);
+ if (accept_fd == -1) {
+ PERROR("listener_main: accept failed");
+ continue;
+ }
+ ustcomm_init_sock(accept_fd, epoll_fd,
+ &ust_socks);
+ } else {
+ memset(receive_header, 0,
+ sizeof(*receive_header));
+ memset(receive_buffer, 0,
+ sizeof(receive_buffer));
+ result = ustcomm_recv(epoll_sock->fd,
+ receive_header,
+ receive_buffer);
+ if (result == 0) {
+ ustcomm_del_sock(epoll_sock, 0);
+ } else {
+ process_client_cmd(receive_header,
+ receive_buffer,
+ epoll_sock->fd);
+ }
+ }
+ pthread_cleanup_pop(1); /* release listener mutex */
+ }
}
pthread_cleanup_pop(1);
void create_listener(void)
{
int result;
+ sigset_t sig_all_blocked;
+ sigset_t orig_parent_mask;
- if(have_listener) {
+ if (have_listener) {
WARN("not creating listener because we already had one");
return;
}
+ /* A new thread created by pthread_create inherits the signal mask
+ * from the parent. To avoid any signal being received by the
+ * listener thread, we block all signals temporarily in the parent,
+ * while we create the listener thread.
+ */
+
+ sigfillset(&sig_all_blocked);
+
+ result = pthread_sigmask(SIG_SETMASK, &sig_all_blocked, &orig_parent_mask);
+ if (result) {
+ PERROR("pthread_sigmask: %s", strerror(result));
+ }
+
result = pthread_create(&listener_thread, NULL, listener_main, NULL);
- if(result == -1) {
+ if (result == -1) {
PERROR("pthread_create");
}
- have_listener = 1;
-}
-
-static int init_socket(void)
-{
- return ustcomm_init_app(getpid(), &ustcomm_app);
+ /* Restore original signal mask in parent */
+ result = pthread_sigmask(SIG_SETMASK, &orig_parent_mask, NULL);
+ if (result) {
+ PERROR("pthread_sigmask: %s", strerror(result));
+ } else {
+ have_listener = 1;
+ }
}
#define AUTOPROBE_DISABLED 0
char* concat_name = NULL;
const char *probe_name = "default";
- if(autoprobe_method == AUTOPROBE_DISABLED) {
+ if (autoprobe_method == AUTOPROBE_DISABLED) {
return;
- }
- else if(autoprobe_method == AUTOPROBE_ENABLE_REGEX) {
+ } else if (autoprobe_method == AUTOPROBE_ENABLE_REGEX) {
result = asprintf(&concat_name, "%s/%s", m->channel, m->name);
- if(result == -1) {
+ if (result == -1) {
ERR("auto_probe_connect: asprintf failed (marker %s/%s)",
m->channel, m->name);
return;
}
result = ltt_marker_connect(m->channel, m->name, probe_name);
- if(result && result != -EEXIST)
+ if (result && result != -EEXIST)
ERR("ltt_marker_connect (marker = %s/%s, errno = %d)", m->channel, m->name, -result);
DBG("auto connected marker %s (addr: %p) %s to probe default", m->channel, m, m->name);
}
+static struct ustcomm_sock * init_app_socket(int epoll_fd)
+{
+ char *name;
+ int result;
+ struct ustcomm_sock *sock;
+
+ result = asprintf(&name, "%s/%d", SOCK_DIR, (int)getpid());
+ if (result < 0) {
+ ERR("string overflow allocating socket name, "
+ "UST thread bailing");
+ return NULL;
+ }
+
+ result = ensure_dir_exists(SOCK_DIR);
+ if (result == -1) {
+ ERR("Unable to create socket directory %s, UST thread bailing",
+ SOCK_DIR);
+ goto free_name;
+ }
+
+ sock = ustcomm_init_named_socket(name, epoll_fd);
+ if (!sock) {
+ ERR("Error initializing named socket (%s). Check that directory"
+ "exists and that it is writable. UST thread bailing", name);
+ goto free_name;
+ }
+
+ free(name);
+ return sock;
+
+free_name:
+ free(name);
+ return NULL;
+}
+
static void __attribute__((constructor)) init()
{
+ struct timespec ts;
int result;
char* autoprobe_val = NULL;
+ char* subbuffer_size_val = NULL;
+ char* subbuffer_count_val = NULL;
+ unsigned int subbuffer_size;
+ unsigned int subbuffer_count;
+ unsigned int power;
/* Assign the pidunique, to be able to differentiate the processes with same
* pid, (before and after an exec).
*/
pidunique = make_pidunique();
+ processpid = getpid();
DBG("Tracectl constructor");
- result = init_socket();
- if(result == -1) {
- ERR("init_socket error");
+ /* Set up epoll */
+ epoll_fd = epoll_create(MAX_EVENTS);
+ if (epoll_fd == -1) {
+ ERR("epoll_create failed, tracing shutting down");
+ return;
+ }
+
+ /* Create the socket */
+ listen_sock = init_app_socket(epoll_fd);
+ if (!listen_sock) {
+ ERR("failed to create application socket,"
+ " tracing shutting down");
return;
}
create_listener();
+ /* Get clock the clock source type */
+
+ /* Default clock source */
+ ust_clock_source = CLOCK_TRACE;
+ if (clock_gettime(ust_clock_source, &ts) != 0) {
+ ust_clock_source = CLOCK_MONOTONIC;
+ DBG("UST traces will not be synchronized with LTTng traces");
+ }
+
autoprobe_val = getenv("UST_AUTOPROBE");
- if(autoprobe_val) {
+ if (autoprobe_val) {
struct marker_iter iter;
DBG("Autoprobe enabled.");
/* first, set the callback that will connect the
* probe on new markers
*/
- if(autoprobe_val[0] == '/') {
+ if (autoprobe_val[0] == '/') {
result = regcomp(&autoprobe_regex, autoprobe_val+1, 0);
if (result) {
char regexerr[150];
regerror(result, &autoprobe_regex, regexerr, sizeof(regexerr));
ERR("cannot parse regex %s (%s), will ignore UST_AUTOPROBE", autoprobe_val, regexerr);
/* don't crash the application just for this */
- }
- else {
+ } else {
autoprobe_method = AUTOPROBE_ENABLE_REGEX;
}
- }
- else {
+ } else {
/* just enable all instrumentation */
autoprobe_method = AUTOPROBE_ENABLE_ALL;
}
marker_iter_start(&iter);
DBG("now iterating on markers already registered");
- while(iter.marker) {
- DBG("now iterating on marker %s", iter.marker->name);
- auto_probe_connect(iter.marker);
+ while (iter.marker) {
+ DBG("now iterating on marker %s", (*iter.marker)->name);
+ auto_probe_connect(*iter.marker);
marker_iter_next(&iter);
}
}
- if(getenv("UST_TRACE")) {
+ if (getenv("UST_OVERWRITE")) {
+ int val = atoi(getenv("UST_OVERWRITE"));
+ if (val == 0 || val == 1) {
+ CMM_STORE_SHARED(ust_channels_overwrite_by_default, val);
+ } else {
+ WARN("invalid value for UST_OVERWRITE");
+ }
+ }
+
+ if (getenv("UST_AUTOCOLLECT")) {
+ int val = atoi(getenv("UST_AUTOCOLLECT"));
+ if (val == 0 || val == 1) {
+ CMM_STORE_SHARED(ust_channels_request_collection_by_default, val);
+ } else {
+ WARN("invalid value for UST_AUTOCOLLECT");
+ }
+ }
+
+ subbuffer_size_val = getenv("UST_SUBBUF_SIZE");
+ if (subbuffer_size_val) {
+ sscanf(subbuffer_size_val, "%u", &subbuffer_size);
+ power = pow2_higher_or_eq(subbuffer_size);
+ if (power != subbuffer_size)
+ WARN("using the next power of two for buffer size = %u\n", power);
+ chan_infos[LTT_CHANNEL_UST].def_subbufsize = power;
+ }
+
+ subbuffer_count_val = getenv("UST_SUBBUF_NUM");
+ if (subbuffer_count_val) {
+ sscanf(subbuffer_count_val, "%u", &subbuffer_count);
+ if (subbuffer_count < 2)
+ subbuffer_count = 2;
+ chan_infos[LTT_CHANNEL_UST].def_subbufcount = subbuffer_count;
+ }
+
+ if (getenv("UST_TRACE")) {
char trace_name[] = "auto";
char trace_type[] = "ustrelay";
ltt_channels_register("ust");
result = ltt_trace_setup(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_setup failed");
return;
}
result = ltt_trace_set_type(trace_name, trace_type);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_set_type failed");
return;
}
result = ltt_trace_alloc(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_alloc failed");
return;
}
result = ltt_trace_start(trace_name);
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_start failed");
return;
}
inform_consumer_daemon(trace_name);
}
-
return;
/* should decrementally destroy stuff if error */
DBG("destructor stopping traces");
result = ltt_trace_stop("auto");
- if(result == -1) {
+ if (result == -1) {
ERR("ltt_trace_stop error");
}
result = ltt_trace_destroy("auto", 0);
- if(result == -1) {
+ if (result == -1) {
ERR("ltt_trace_destroy error");
}
}
ltt_lock_traces();
- list_for_each_entry(trace, <t_traces.head, list) {
- if(trace->active) {
+ cds_list_for_each_entry(trace, <t_traces.head, list) {
+ if (trace->active) {
retval = 1;
break;
}
return retval;
}
-#if 0
-static int have_consumer(void)
-{
- return !list_empty(&blocked_consumers);
-}
-#endif
-
int restarting_usleep(useconds_t usecs)
{
- struct timespec tv;
- int result;
-
- tv.tv_sec = 0;
- tv.tv_nsec = usecs * 1000;
-
- do {
- result = nanosleep(&tv, &tv);
- } while(result == -1 && errno == EINTR);
+ struct timespec tv;
+ int result;
+
+ tv.tv_sec = 0;
+ tv.tv_nsec = usecs * 1000;
+
+ do {
+ result = nanosleep(&tv, &tv);
+ } while (result == -1 && errno == EINTR);
return result;
}
-static void stop_listener()
+static void stop_listener(void)
{
int result;
+ if (!have_listener)
+ return;
+
result = pthread_cancel(listener_thread);
- if(result != 0) {
+ if (result != 0) {
ERR("pthread_cancel: %s", strerror(result));
}
result = pthread_join(listener_thread, NULL);
- if(result != 0) {
+ if (result != 0) {
ERR("pthread_join: %s", strerror(result));
}
}
/* This destructor keeps the process alive for a few seconds in order
- * to leave time to ustd to connect to its buffers. This is necessary
+ * to leave time for ustconsumer to connect to its buffers. This is necessary
* for programs whose execution is very short. It is also useful in all
* programs when tracing is started close to the end of the program
* execution.
static void __attribute__((destructor)) keepalive()
{
- if(trace_recording() && buffers_to_export) {
+ if (processpid != getpid()) {
+ return;
+ }
+
+ if (trace_recording() && CMM_LOAD_SHARED(buffers_to_export)) {
int total = 0;
DBG("Keeping process alive for consumer daemon...");
- while(buffers_to_export) {
+ while (CMM_LOAD_SHARED(buffers_to_export)) {
const int interv = 200000;
restarting_usleep(interv);
total += interv;
- if(total >= 3000000) {
+ if (total >= 3000000) {
WARN("non-consumed buffers remaining after wait limit; not waiting anymore");
break;
}
static void ust_fork(void)
{
- struct blocked_consumer *bc;
- struct blocked_consumer *deletable_bc = NULL;
+ struct ust_buffer *buf, *buf_tmp;
+ struct ustcomm_sock *sock, *sock_tmp;
+ struct ust_trace *trace, *trace_tmp;
int result;
/* FIXME: technically, the locks could have been taken before the fork */
DBG("ust: forking");
- /* break lock if necessary */
- ltt_unlock_traces();
+ /* Get the pid of the new process */
+ processpid = getpid();
- ltt_trace_stop("auto");
- ltt_trace_destroy("auto", 1);
- /* Delete all active connections */
- ustcomm_close_all_connections(&ustcomm_app.server);
+ /*
+ * FIXME: This could be prettier, we loop over the list twice and
+ * following good locking practice should lock around the loop
+ */
+ cds_list_for_each_entry_safe(trace, trace_tmp, <t_traces.head, list) {
+ ltt_trace_stop(trace->trace_name);
+ }
- /* Delete all blocked consumers */
- list_for_each_entry(bc, &blocked_consumers, list) {
- result = close(bc->fd_producer);
- if(result == -1) {
- PERROR("close");
- }
- free(deletable_bc);
- deletable_bc = bc;
- list_del(&bc->list);
+ /* Delete all active connections, but leave them in the epoll set */
+ cds_list_for_each_entry_safe(sock, sock_tmp, &ust_socks, list) {
+ ustcomm_del_sock(sock, 1);
}
- /* free app, keeping socket file */
- ustcomm_fini_app(&ustcomm_app, 1);
+ /*
+ * FIXME: This could be prettier, we loop over the list twice and
+ * following good locking practice should lock around the loop
+ */
+ cds_list_for_each_entry_safe(trace, trace_tmp, <t_traces.head, list) {
+ ltt_trace_destroy(trace->trace_name, 1);
+ }
- buffers_to_export = 0;
+ /* Clean up the listener socket and epoll, keeping the socket file */
+ if (listen_sock) {
+ ustcomm_del_named_sock(listen_sock, 1);
+ listen_sock = NULL;
+ }
+ close(epoll_fd);
+
+ /* Re-start the launch sequence */
+ CMM_STORE_SHARED(buffers_to_export, 0);
have_listener = 0;
- init_socket();
+
+ /* Set up epoll */
+ epoll_fd = epoll_create(MAX_EVENTS);
+ if (epoll_fd == -1) {
+ ERR("epoll_create failed, tracing shutting down");
+ return;
+ }
+
+ /* Create the socket */
+ listen_sock = init_app_socket(epoll_fd);
+ if (!listen_sock) {
+ ERR("failed to create application socket,"
+ " tracing shutting down");
+ return;
+ }
create_listener();
ltt_trace_setup("auto");
result = ltt_trace_set_type("auto", "ustrelay");
- if(result < 0) {
+ if (result < 0) {
ERR("ltt_trace_set_type failed");
return;
}
/* Disable signals */
sigfillset(&all_sigs);
result = sigprocmask(SIG_BLOCK, &all_sigs, &fork_info->orig_sigs);
- if(result == -1) {
+ if (result == -1) {
PERROR("sigprocmask");
return;
}
+
+ /*
+ * Take the fork lock to make sure we are not in the middle of
+ * something in the listener thread.
+ */
+ pthread_mutex_lock(&listener_thread_data_mutex);
+ /*
+ * Hold listen_sock_mutex to protect from listen_sock teardown.
+ */
+ pthread_mutex_lock(&listen_sock_mutex);
+ rcu_bp_before_fork();
}
/* Don't call this function directly in a traced program */
{
int result;
+ pthread_mutex_unlock(&listen_sock_mutex);
+ pthread_mutex_unlock(&listener_thread_data_mutex);
+
/* Restore signals */
result = sigprocmask(SIG_SETMASK, &fork_info->orig_sigs, NULL);
- if(result == -1) {
+ if (result == -1) {
PERROR("sigprocmask");
return;
}
void ust_after_fork_parent(ust_fork_info_t *fork_info)
{
- /* Reenable signals */
+ rcu_bp_after_fork_parent();
+ /* Release mutexes and reenable signals */
ust_after_fork_common(fork_info);
}
void ust_after_fork_child(ust_fork_info_t *fork_info)
{
- /* First sanitize the child */
+ /* Release urcu mutexes */
+ rcu_bp_after_fork_child();
+
+ /* Sanitize the child */
ust_fork();
- /* Then reenable interrupts */
+ /* Then release mutexes and reenable signals */
ust_after_fork_common(fork_info);
}