/*
- * Copyright (C) 2011 Julien Desfossez
+ * Copyright (C) 2011-2012 Julien Desfossez
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License Version 2 as
#include <sys/types.h>
#include <fts.h>
#include <assert.h>
+#include <sys/mman.h>
+#include <lttng/lttng.h>
+#include <lttng/lttngtop-helper.h>
#include "lttngtoptypes.h"
#include "cputop.h"
unsigned long last_display_update = 0;
int quit = 0;
+/* LIVE */
+/* list of FDs available for being read with snapshots */
+struct mmap_stream_list mmap_list;
+GPtrArray *lttng_consumer_stream_array;
+int sessiond_metadata, consumerd_metadata;
+
enum {
OPT_NONE = 0,
OPT_HELP,
unsigned int current_display_index = 0;
sem_wait(&bootstrap);
+ /*
+ * Prevent the 1 second delay when we hit ESC
+ */
+ ESCDELAY = 0;
init_ncurses();
while (1) {
struct perfcounter *get_perf_counter(const char *name, struct processtop *proc,
struct cputime *cpu)
{
- struct perfcounter *ret, *global;
+ struct perfcounter *ret;
GHashTable *table;
if (proc)
ret->visible = 1;
g_hash_table_insert(table, (gpointer) strdup(name), ret);
- global = g_hash_table_lookup(global_perf_liszt, (gpointer) name);
- if (!global) {
- global = g_new0(struct perfcounter, 1);
- memcpy(global, ret, sizeof(struct perfcounter));
- /* by default, sort on the first perf context */
- if (g_hash_table_size(global_perf_liszt) == 0)
- global->sort = 1;
- g_hash_table_insert(global_perf_liszt, (gpointer) strdup(name), global);
- }
-
end:
return ret;
}
void extract_perf_counter_scope(const struct bt_ctf_event *event,
- const struct definition *scope,
+ const struct bt_definition *scope,
struct processtop *proc,
struct cputime *cpu)
{
- struct definition const * const *list = NULL;
+ struct bt_definition const * const *list = NULL;
+ const struct bt_definition *field;
unsigned int count;
- int i, ret;
+ struct perfcounter *perfcounter;
+ GHashTableIter iter;
+ gpointer key;
+ int ret;
if (!scope)
goto end;
if (ret < 0)
goto end;
- for (i = 0; i < count; i++) {
- const char *name = bt_ctf_field_name(list[i]);
- if (strncmp(name, "perf_", 5) == 0) {
- int value = bt_ctf_get_uint64(list[i]);
+ if (count == 0)
+ goto end;
+
+ g_hash_table_iter_init(&iter, global_perf_liszt);
+ while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfcounter)) {
+ field = bt_ctf_get_field(event, scope, (char *) key);
+ if (field) {
+ int value = bt_ctf_get_uint64(field);
if (bt_ctf_field_get_error())
continue;
- update_perf_value(proc, cpu, name, value);
+ update_perf_value(proc, cpu, (char *) key, value);
}
}
void update_perf_counter(struct processtop *proc, const struct bt_ctf_event *event)
{
struct cputime *cpu;
- const struct definition *scope;
+ const struct bt_definition *scope;
cpu = get_cpu(get_cpu_id(event));
struct processtop *parent, *child;
unsigned long timestamp;
- /* FIXME : display nice error when missing context pid, tid, ppid and comm */
-
timestamp = bt_ctf_get_timestamp(call_data);
if (timestamp == -1ULL)
goto error;
pid = get_context_pid(call_data);
if (pid == -1ULL) {
-// fprintf(stderr, "Missing pid context info\n");
goto error;
}
tid = get_context_tid(call_data);
if (tid == -1ULL) {
-// fprintf(stderr, "Missing tid context info\n");
goto error;
}
ppid = get_context_ppid(call_data);
if (ppid == -1ULL) {
-// fprintf(stderr, "Missing ppid context info\n");
goto error;
}
comm = get_context_comm(call_data);
if (!comm) {
-// fprintf(stderr, "Missing procname context info\n");
goto error;
}
poptContext pc;
int opt, ret = 0;
- if (argc == 1) {
- usage(stdout);
- return 1; /* exit cleanly */
- }
-
pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 0);
poptReadDefaultConfig(pc, 0);
usage(stdout);
ret = 1; /* exit cleanly */
goto end;
- case OPT_LIST:
- // list_formats(stdout);
- ret = 1;
- goto end;
- case OPT_VERBOSE:
-// babeltrace_verbose = 1;
- break;
- case OPT_DEBUG:
-// babeltrace_debug = 1;
- break;
- case OPT_NAMES:
-// opt_field_names = 1;
- break;
default:
ret = -EINVAL;
goto end;
}
opt_input_path = poptGetArg(pc);
- if (!opt_input_path) {
- ret = -EINVAL;
- goto end;
- }
+
end:
if (pc) {
poptFreeContext(pc);
*/
int bt_context_add_traces_recursive(struct bt_context *ctx, const char *path,
const char *format_str,
- void (*packet_seek)(struct stream_pos *pos,
+ void (*packet_seek)(struct bt_stream_pos *pos,
size_t offset, int whence))
{
FTS *tree;
}
metafd = openat(dirfd, "metadata", O_RDONLY);
if (metafd < 0) {
- ret = close(dirfd);
- if (ret < 0) {
- perror("close");
- goto error;
- }
+ close(dirfd);
+ ret = -1;
+ continue;
} else {
int trace_id;
int *procname_check, int *ppid_check)
{
int j;
+ struct perfcounter *global;
+ const char *name;
for (j = 0; j < field_cnt; j++) {
+ name = bt_ctf_get_decl_field_name(field_list[j]);
if (*tid_check == 0) {
- if (strncmp(bt_ctf_get_decl_field_name(field_list[j]), "tid", 3) == 0) {
+ if (strncmp(name, "tid", 3) == 0)
(*tid_check)++;
- }
}
if (*pid_check == 0) {
- if (strncmp(bt_ctf_get_decl_field_name(field_list[j]), "pid", 3) == 0)
+ if (strncmp(name, "pid", 3) == 0)
(*pid_check)++;
}
if (*ppid_check == 0) {
- if (strncmp(bt_ctf_get_decl_field_name(field_list[j]), "ppid", 4) == 0)
+ if (strncmp(name, "ppid", 4) == 0)
(*ppid_check)++;
}
if (*procname_check == 0) {
- if (strncmp(bt_ctf_get_decl_field_name(field_list[j]), "procname", 8) == 0)
+ if (strncmp(name, "procname", 8) == 0)
(*procname_check)++;
}
+ if (strncmp(name, "perf_", 5) == 0) {
+ global = g_hash_table_lookup(global_perf_liszt, (gpointer) name);
+ if (!global) {
+ global = g_new0(struct perfcounter, 1);
+ /* by default, sort on the first perf context */
+ if (g_hash_table_size(global_perf_liszt) == 0)
+ global->sort = 1;
+ global->visible = 1;
+ g_hash_table_insert(global_perf_liszt, (gpointer) strdup(name), global);
+ }
+ }
}
- /* if all checks are OK, no need to continue the checks */
+
if (*tid_check == 1 && *pid_check == 1 && *ppid_check == 1 &&
*procname_check == 1)
return 0;
ret = check_field_requirements(field_list, field_cnt,
&tid_check, &pid_check, &procname_check,
&ppid_check);
- if (ret == 0)
- goto end;
bt_ctf_get_decl_fields(evt_list[i], BT_EVENT_CONTEXT,
&field_list, &field_cnt);
ret = check_field_requirements(field_list, field_cnt,
&tid_check, &pid_check, &procname_check,
&ppid_check);
- if (ret == 0)
- goto end;
bt_ctf_get_decl_fields(evt_list[i], BT_STREAM_PACKET_CONTEXT,
&field_list, &field_cnt);
ret = check_field_requirements(field_list, field_cnt,
&tid_check, &pid_check, &procname_check,
&ppid_check);
- if (ret == 0)
- goto end;
}
if (tid_check == 0) {
fprintf(stderr, "[error] missing procname context information\n");
}
+ return ret;
+}
+
+ssize_t read_subbuffer(struct lttng_consumer_stream *kconsumerd_fd,
+ struct lttng_consumer_local_data *ctx)
+{
+ unsigned long len;
+ int err;
+ long ret = 0;
+ int infd = helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd);
+
+ if (helper_get_lttng_consumer_stream_output(kconsumerd_fd) == LTTNG_EVENT_SPLICE) {
+ /* Get the next subbuffer */
+ printf("get_next : %d\n", infd);
+ err = helper_kernctl_get_next_subbuf(infd);
+ if (err != 0) {
+ ret = errno;
+ perror("Reserving sub buffer failed (everything is normal, "
+ "it is due to concurrency)");
+ goto end;
+ }
+ /* read the whole subbuffer */
+ err = helper_kernctl_get_padded_subbuf_size(infd, &len);
+ if (err != 0) {
+ ret = errno;
+ perror("Getting sub-buffer len failed.");
+ goto end;
+ }
+ printf("len : %ld\n", len);
+
+ /* splice the subbuffer to the tracefile */
+ ret = helper_lttng_consumer_on_read_subbuffer_splice(ctx, kconsumerd_fd, len);
+ if (ret < 0) {
+ /*
+ * display the error but continue processing to try
+ * to release the subbuffer
+ */
+ fprintf(stderr,"Error splicing to tracefile\n");
+ }
+ printf("ret : %ld\n", ret);
+ printf("put_next : %d\n", infd);
+ err = helper_kernctl_put_next_subbuf(infd);
+ if (err != 0) {
+ ret = errno;
+ perror("Reserving sub buffer failed (everything is normal, "
+ "it is due to concurrency)");
+ goto end;
+ }
+// sem_post(&metadata_available);
+ }
+
+end:
+ return 0;
+}
+
+int on_update_fd(int key, uint32_t state)
+{
+ /* let the lib handle the metadata FD */
+ if (key == sessiond_metadata)
+ return 0;
+ return 1;
+}
+
+int on_recv_fd(struct lttng_consumer_stream *kconsumerd_fd)
+{
+ int ret;
+ struct mmap_stream *new_info;
+ size_t tmp_mmap_len;
+
+ printf("Receiving %d\n", helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd));
+ /* Opening the tracefile in write mode */
+ if (helper_get_lttng_consumer_stream_path_name(kconsumerd_fd) != NULL) {
+ ret = open(helper_get_lttng_consumer_stream_path_name(kconsumerd_fd),
+ O_WRONLY|O_CREAT|O_TRUNC, S_IRWXU|S_IRWXG|S_IRWXO);
+ if (ret < 0) {
+ perror("open");
+ goto end;
+ }
+ helper_set_lttng_consumer_stream_out_fd(kconsumerd_fd, ret);
+ }
+
+ if (helper_get_lttng_consumer_stream_output(kconsumerd_fd) == LTTNG_EVENT_MMAP) {
+ new_info = malloc(sizeof(struct mmap_stream));
+ new_info->fd = helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd);
+ bt_list_add(&new_info->list, &mmap_list.head);
+
+ /* get the len of the mmap region */
+ ret = helper_kernctl_get_mmap_len(helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd),
+ &tmp_mmap_len);
+ if (ret != 0) {
+ ret = errno;
+ perror("helper_kernctl_get_mmap_len");
+ goto end;
+ }
+ helper_set_lttng_consumer_stream_mmap_len(kconsumerd_fd, tmp_mmap_len);
+ printf("mmap len : %ld\n", tmp_mmap_len);
+
+ helper_set_lttng_consumer_stream_mmap_base(kconsumerd_fd,
+ mmap(NULL, helper_get_lttng_consumer_stream_mmap_len(kconsumerd_fd),
+ PROT_READ, MAP_PRIVATE, helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd), 0));
+ if (helper_get_lttng_consumer_stream_mmap_base(kconsumerd_fd) == MAP_FAILED) {
+ perror("Error mmaping");
+ ret = -1;
+ goto end;
+ }
+
+ g_ptr_array_add(lttng_consumer_stream_array, kconsumerd_fd);
+ ret = 1;
+ } else {
+ consumerd_metadata = helper_get_lttng_consumer_stream_wait_fd(kconsumerd_fd);
+ sessiond_metadata = helper_get_lttng_consumer_stream_key(kconsumerd_fd);
+ ret = 0;
+ }
+
+end:
+ return ret;
+}
+
+
+int setup_consumer(char *command_sock_path, pthread_t *threads,
+ struct lttng_consumer_local_data *ctx)
+{
+ int ret = 0;
+
+ ctx = helper_lttng_consumer_create(HELPER_LTTNG_CONSUMER_KERNEL,
+ read_subbuffer, NULL, on_recv_fd, on_update_fd);
+ if (!ctx)
+ goto end;
+
+ unlink(command_sock_path);
+ helper_lttng_consumer_set_command_sock_path(ctx, command_sock_path);
+ helper_lttng_consumer_init();
+
+ /* Create the thread to manage the receive of fd */
+ ret = pthread_create(&threads[0], NULL, helper_lttng_consumer_thread_receive_fds,
+ (void *) ctx);
+ if (ret != 0) {
+ perror("pthread_create");
+ goto end;
+ }
+ /* Create thread to manage the polling/writing of traces */
+ ret = pthread_create(&threads[1], NULL, helper_lttng_consumer_thread_poll_fds,
+ (void *) ctx);
+ if (ret != 0) {
+ perror("pthread_create");
+ goto end;
+ }
+
+end:
+ return ret;
+}
+
+int setup_live_tracing()
+{
+ struct lttng_domain dom;
+ struct lttng_channel chan;
+ char *channel_name = "mmapchan";
+ struct lttng_consumer_local_data *ctx = NULL;
+ struct lttng_event ev;
+ int ret = 0;
+ char *command_sock_path = "/tmp/consumerd_sock";
+ static pthread_t threads[2]; /* recv_fd, poll */
+ struct lttng_event_context kctxpid, kctxcomm, kctxppid, kctxtid;
+ /* list of snapshots currently not consumed */
+ GPtrArray *available_snapshots;
+
+ struct lttng_handle *handle;
+
+ BT_INIT_LIST_HEAD(&mmap_list.head);
+
+ lttng_consumer_stream_array = g_ptr_array_new();
+
+ if ((ret = setup_consumer(command_sock_path, threads, ctx)) < 0) {
+ fprintf(stderr,"error setting up consumer\n");
+ goto end;
+ }
+
+ available_snapshots = g_ptr_array_new();
+
+ /* setup the session */
+ dom.type = LTTNG_DOMAIN_KERNEL;
+
+ ret = system("rm -rf /tmp/livesession");
+
+ if ((ret = lttng_create_session("test", "/tmp/livesession")) < 0) {
+ fprintf(stderr,"error creating the session : %s\n",
+ helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+
+ if ((handle = lttng_create_handle("test", &dom)) == NULL) {
+ fprintf(stderr,"error creating handle\n");
+ goto end;
+ }
+
+ if ((ret = lttng_register_consumer(handle, command_sock_path)) < 0) {
+ fprintf(stderr,"error registering consumer : %s\n",
+ helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+
+ strcpy(chan.name, channel_name);
+ chan.attr.overwrite = 1;
+// chan.attr.subbuf_size = 32768;
+ chan.attr.subbuf_size = 1048576; /* 1MB */
+ chan.attr.num_subbuf = 4;
+ chan.attr.switch_timer_interval = 0;
+ chan.attr.read_timer_interval = 200;
+ chan.attr.output = LTTNG_EVENT_MMAP;
+
+ if ((ret = lttng_enable_channel(handle, &chan)) < 0) {
+ fprintf(stderr,"error creating channel : %s\n", helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+
+ sprintf(ev.name, "sched_switch");
+ ev.type = LTTNG_EVENT_TRACEPOINT;
+
+ //if ((ret = lttng_enable_event(handle, NULL, channel_name)) < 0) {
+ if ((ret = lttng_enable_event(handle, &ev, channel_name)) < 0) {
+ fprintf(stderr,"error enabling event : %s\n", helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+
+ kctxpid.ctx = LTTNG_EVENT_CONTEXT_PID;
+ lttng_add_context(handle, &kctxpid, NULL, NULL);
+ kctxppid.ctx = LTTNG_EVENT_CONTEXT_PPID;
+ lttng_add_context(handle, &kctxppid, NULL, NULL);
+ kctxcomm.ctx = LTTNG_EVENT_CONTEXT_PROCNAME;
+ lttng_add_context(handle, &kctxcomm, NULL, NULL);
+ kctxtid.ctx = LTTNG_EVENT_CONTEXT_TID;
+ lttng_add_context(handle, &kctxtid, NULL, NULL);
+
+ if ((ret = lttng_start_tracing("test")) < 0) {
+ fprintf(stderr,"error starting tracing : %s\n", helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+
+ helper_kernctl_buffer_flush(consumerd_metadata);
+ sleep(10);
+
+ lttng_stop_tracing("test");
+ lttng_destroy_session("test");
+
+ /* block until metadata is ready */
+ //sem_init(&metadata_available, 0, 0);
+
+ //init_lttngtop();
+
end:
return ret;
}
exit(EXIT_SUCCESS);
}
- init_lttngtop();
-
- bt_ctx = bt_context_create();
- ret = bt_context_add_traces_recursive(bt_ctx, opt_input_path, "ctf", NULL);
- if (ret < 0) {
- fprintf(stderr, "[error] Opening the trace\n");
+ if (!opt_input_path) {
+ printf("live tracing enabled\n");
+ setup_live_tracing();
goto end;
- }
+ } else {
+ init_lttngtop();
- ret = check_requirements(bt_ctx);
- if (ret < 0) {
- fprintf(stderr, "[error] some mandatory contexts were missing, exiting.\n");
- goto end;
- }
+ bt_ctx = bt_context_create();
+ ret = bt_context_add_traces_recursive(bt_ctx, opt_input_path, "ctf", NULL);
+ if (ret < 0) {
+ fprintf(stderr, "[error] Opening the trace\n");
+ goto end;
+ }
- pthread_create(&display_thread, NULL, ncurses_display, (void *) NULL);
- pthread_create(&timer_thread, NULL, refresh_thread, (void *) NULL);
+ ret = check_requirements(bt_ctx);
+ if (ret < 0) {
+ fprintf(stderr, "[error] some mandatory contexts were missing, exiting.\n");
+ goto end;
+ }
+ pthread_create(&display_thread, NULL, ncurses_display, (void *) NULL);
+ pthread_create(&timer_thread, NULL, refresh_thread, (void *) NULL);
- iter_trace(bt_ctx);
+ iter_trace(bt_ctx);
- quit = 1;
- pthread_join(display_thread, NULL);
- pthread_join(timer_thread, NULL);
+ quit = 1;
+ pthread_join(display_thread, NULL);
+ pthread_join(timer_thread, NULL);
+ }
end:
- bt_context_put(bt_ctx);
+ if (bt_ctx)
+ bt_context_put(bt_ctx);
+
return 0;
}