#define DEFAULT_FILE_ARRAY_SIZE 1
const char *opt_input_path;
-int opt_textdump;
+static int opt_textdump;
+static int opt_child;
int quit = 0;
sem_t metadata_available;
int reload_trace = 0;
+int last_textdump_print_newline = 1;
+
enum {
OPT_NONE = 0,
OPT_HELP,
OPT_TEXTDUMP,
+ OPT_PID,
+ OPT_CHILD,
+ OPT_HOSTNAME,
+ OPT_KPROBES,
};
static struct poptOption long_options[] = {
/* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
{ "help", 'h', POPT_ARG_NONE, NULL, OPT_HELP, NULL, NULL },
{ "textdump", 't', POPT_ARG_NONE, NULL, OPT_TEXTDUMP, NULL, NULL },
+ { "child", 'f', POPT_ARG_NONE, NULL, OPT_CHILD, NULL, NULL },
+ { "pid", 'p', POPT_ARG_STRING, &opt_tid, OPT_PID, NULL, NULL },
+ { "hostname", 'n', POPT_ARG_STRING, &opt_hostname, OPT_HOSTNAME, NULL, NULL },
+ { "kprobes", 'k', POPT_ARG_STRING, &opt_kprobes, OPT_KPROBES, NULL, NULL },
{ NULL, 0, 0, NULL, 0, NULL, NULL },
};
+static void handle_textdump_sigterm(int signal)
+{
+ quit = 1;
+ lttng_destroy_session("test");
+}
+
void *refresh_thread(void *p)
{
struct mmap_stream *mmap_info;
pthread_exit(0);
}
if (!opt_input_path) {
- bt_list_for_each_entry(mmap_info, &mmap_list.head, list)
- helper_kernctl_buffer_flush(mmap_info->fd);
+ bt_list_for_each_entry(mmap_info, &mmap_list.head, list)
+ helper_kernctl_buffer_flush(mmap_info->fd);
}
sem_wait(&pause_sem);
sem_post(&pause_sem);
}
}
+void print_fields(struct bt_ctf_event *event)
+{
+ unsigned int cnt, i;
+ const struct definition *const * list;
+ const struct declaration *l;
+ const struct definition *scope;
+ enum ctf_type_id type;
+ const char *str;
+
+ scope = bt_ctf_get_top_level_scope(event, BT_EVENT_FIELDS);
+
+ bt_ctf_get_field_list(event, scope, &list, &cnt);
+ for (i = 0; i < cnt; i++) {
+ if (i != 0)
+ printf(", ");
+ printf("%s = ", bt_ctf_field_name(list[i]));
+ l = bt_ctf_get_decl_from_def(list[i]);
+ type = bt_ctf_field_type(l);
+ if (type == CTF_TYPE_INTEGER) {
+ if (bt_ctf_get_int_signedness(l) == 0)
+ printf("%" PRIu64 "", bt_ctf_get_uint64(list[i]));
+ else
+ printf("%" PRId64 "", bt_ctf_get_int64(list[i]));
+ } else if (type == CTF_TYPE_STRING) {
+ printf("%s", bt_ctf_get_string(list[i]));
+ } else if (type == CTF_TYPE_ARRAY) {
+ str = bt_ctf_get_char_array(list[i]);
+ if (!bt_ctf_field_get_error() && str)
+ printf("%s", str);
+ }
+ }
+}
+
/*
* hook on each event to check the timestamp and refresh the display if
* necessary
unsigned long timestamp;
struct tm start;
uint64_t ts_nsec_start;
+ int pid, cpu_id;
+ int64_t syscall_ret;
+ const struct definition *scope;
+ const char *hostname, *procname;
timestamp = bt_ctf_get_timestamp(call_data);
start = format_timestamp(timestamp);
ts_nsec_start = timestamp % NSEC_PER_SEC;
- printf("%02d:%02d:%02d.%09" PRIu64 " %s\n", start.tm_hour,
- start.tm_min, start.tm_sec, ts_nsec_start,
- bt_ctf_event_name(call_data));
+ pid = get_context_pid(call_data);
+ if (pid == -1ULL && opt_tid) {
+ goto error;
+ }
+
+ hostname = get_context_hostname(call_data);
+ if (opt_tid || opt_hostname)
+ if (!lookup_filter_tid_list(pid))
+ goto end;
+
+ cpu_id = get_cpu_id(call_data);
+ procname = get_context_comm(call_data);
+
+ if ((strcmp(bt_ctf_event_name(call_data), "exit_syscall") == 0) &&
+ !last_textdump_print_newline) {
+ scope = bt_ctf_get_top_level_scope(call_data,
+ BT_EVENT_FIELDS);
+ syscall_ret = bt_ctf_get_int64(bt_ctf_get_field(call_data,
+ scope, "_ret"));
+ printf("= %ld\n", syscall_ret);
+ last_textdump_print_newline = 1;
+ } else {
+ /* we might have lost the exit_syscall event, so need to
+ * print the newline in this case */
+ if (last_textdump_print_newline == 0)
+ printf("\n");
+ printf("%02d:%02d:%02d.%09" PRIu64 " (%s) (cpu %d) [%s (%d)] %s (",
+ start.tm_hour, start.tm_min, start.tm_sec,
+ ts_nsec_start, hostname, cpu_id, procname, pid,
+ bt_ctf_event_name(call_data));
+ print_fields(call_data);
+ printf(") ");
+ if (strncmp(bt_ctf_event_name(call_data), "sys_", 4) != 0) {
+ printf("\n");
+ last_textdump_print_newline = 1;
+ } else {
+ last_textdump_print_newline = 0;
+ }
+ }
+
+end:
+ return BT_CB_OK;
+error:
+ return BT_CB_ERROR_STOP;
+}
+
+enum bt_cb_ret handle_kprobes(struct bt_ctf_event *call_data, void *private_data)
+{
+ int i;
+ struct kprobes *kprobe;
+
+ /* for kprobes */
+ for (i = 0; i < lttngtop.kprobes_table->len; i++) {
+ kprobe = g_ptr_array_index(lttngtop.kprobes_table, i);
+ if (strcmp(bt_ctf_event_name(call_data), kprobe->probe_name) == 0) {
+ kprobe->count++;
+ }
+ }
return BT_CB_OK;
}
void *private_data)
{
int pid, tid, ppid, vpid, vtid, vppid;
- char *comm;
+ char *comm, *hostname;
struct processtop *parent, *child;
unsigned long timestamp;
if (pid == -1ULL) {
goto error;
}
+
tid = get_context_tid(call_data);
if (tid == -1ULL) {
goto error;
if (!comm) {
goto error;
}
+ /* optional */
+ hostname = get_context_hostname(call_data);
/* find or create the current process */
child = find_process_tid(<tngtop, tid, comm);
if (!child)
- child = add_proc(<tngtop, tid, comm, timestamp);
- update_proc(child, pid, tid, ppid, vpid, vtid, vppid, comm);
+ child = add_proc(<tngtop, tid, comm, timestamp, hostname);
+ if (!child)
+ goto end;
+ update_proc(child, pid, tid, ppid, vpid, vtid, vppid, comm, hostname);
if (pid != tid) {
/* find or create the parent */
parent = find_process_tid(<tngtop, pid, comm);
if (!parent) {
- parent = add_proc(<tngtop, pid, comm, timestamp);
- parent->pid = pid;
+ parent = add_proc(<tngtop, pid, comm, timestamp, hostname);
+ if (parent)
+ parent->pid = pid;
}
/* attach the parent to the current process */
update_perf_counter(child, call_data);
+end:
return BT_CB_OK;
error:
{
copies = g_ptr_array_new();
global_perf_liszt = g_hash_table_new(g_str_hash, g_str_equal);
+ global_filter_list = g_hash_table_new(g_str_hash, g_str_equal);
+ global_host_list = g_hash_table_new(g_str_hash, g_str_equal);
sem_init(&goodtodisplay, 0, 0);
sem_init(&goodtoupdate, 0, 1);
lttngtop.process_table = g_ptr_array_new();
lttngtop.files_table = g_ptr_array_new();
lttngtop.cpu_table = g_ptr_array_new();
+
+ toggle_filter = -1;
}
void usage(FILE *fp)
{
fprintf(fp, "LTTngTop %s\n\n", VERSION);
- fprintf(fp, "Usage : lttngtop /path/to/trace\n");
+ fprintf(fp, "Usage : lttngtop [OPTIONS] [TRACE]\n");
+ fprintf(fp, " TRACE Path to the trace to analyse (no trace path for live tracing)\n");
+ fprintf(fp, " -h, --help This help message\n");
+ fprintf(fp, " -t, --textdump Display live events in text-only\n");
+ fprintf(fp, " -p, --pid Comma-separated list of PIDs to display\n");
+ fprintf(fp, " -f, --child Follow threads associated with selected PIDs\n");
+ fprintf(fp, " -n, --hostname Comma-separated list of hostnames to display (require hostname context in trace)\n");
+ fprintf(fp, " -k, --kprobes Comma-separated list of kprobes to insert (same format as lttng enable-event)\n");
+}
+
+/*
+ * Parse probe options.
+ * Shamelessly stolen from lttng-tools :
+ * src/bin/lttng/commands/enable_events.c
+ */
+static struct kprobes *parse_probe_opts(char *opt)
+{
+ char s_hex[19];
+ char name[LTTNG_SYMBOL_NAME_LEN];
+ struct kprobes *kprobe;
+ int ret;
+
+ /*
+ kprobe->probe_addr = 0;
+ kprobe->probe_offset = 0;
+ asprintf(&kprobe->probe_name, "probe_sys_open");
+ asprintf(&kprobe->symbol_name, "sys_open");
+ */
+
+ if (opt == NULL) {
+ kprobe = NULL;
+ goto end;
+ }
+
+ kprobe = g_new0(struct kprobes, 1);
+
+ /* Check for symbol+offset */
+ ret = sscanf(opt, "%[^'+']+%s", name, s_hex);
+ if (ret == 2) {
+ asprintf(&kprobe->probe_name, "probe_%s", name);
+ asprintf(&kprobe->symbol_name, "%s", name);
+
+ if (strlen(s_hex) == 0) {
+ fprintf(stderr, "Invalid probe offset %s", s_hex);
+ ret = -1;
+ goto end;
+ }
+ kprobe->probe_offset = strtoul(s_hex, NULL, 0);
+ kprobe->probe_addr = 0;
+ goto end;
+ }
+
+ /* Check for symbol */
+ if (isalpha(name[0])) {
+ ret = sscanf(opt, "%s", name);
+ if (ret == 1) {
+ asprintf(&kprobe->probe_name, "probe_%s", name);
+ asprintf(&kprobe->symbol_name, "%s", name);
+ kprobe->probe_offset = 0;
+ kprobe->probe_addr = 0;
+ goto end;
+ }
+ }
+
+ /* Check for address */
+ ret = sscanf(opt, "%s", s_hex);
+ if (ret > 0) {
+ if (strlen(s_hex) == 0) {
+ fprintf(stderr, "Invalid probe address %s", s_hex);
+ ret = -1;
+ goto end;
+ }
+ asprintf(&kprobe->probe_name, "probe_%s", s_hex);
+ kprobe->probe_offset = 0;
+ kprobe->probe_addr = strtoul(s_hex, NULL, 0);
+ goto end;
+ }
+
+ /* No match */
+ kprobe = NULL;
+
+end:
+ return kprobe;
}
/*
{
poptContext pc;
int opt, ret = 0;
+ char *tmp_str;
+ int *tid;
pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 0);
poptReadDefaultConfig(pc, 0);
goto end;
case OPT_TEXTDUMP:
opt_textdump = 1;
- goto end;
+ break;
+ case OPT_CHILD:
+ opt_textdump = 1;
+ opt_child = 1;
+ break;
+ case OPT_PID:
+ toggle_filter = 1;
+ tid_filter_list = g_hash_table_new(g_str_hash,
+ g_str_equal);
+ tmp_str = strtok(opt_tid, ",");
+ while (tmp_str) {
+ tid = malloc(sizeof(int));
+ *tid = atoi(tmp_str);
+ g_hash_table_insert(tid_filter_list,
+ (gpointer) tid, tid);
+ tmp_str = strtok(NULL, ",");
+ }
+ break;
+ case OPT_HOSTNAME:
+ toggle_filter = 1;
+ tmp_str = strtok(opt_hostname, ",");
+ while (tmp_str) {
+ add_hostname_list(tmp_str, 1);
+ tmp_str = strtok(NULL, ",");
+ }
+ break;
+ case OPT_KPROBES:
+ lttngtop.kprobes_table = g_ptr_array_new();
+ tmp_str = strtok(opt_kprobes, ",");
+ while (tmp_str) {
+ struct kprobes *kprobe;
+
+ kprobe = parse_probe_opts(tmp_str);
+ if (kprobe) {
+ g_ptr_array_add(
+ lttngtop.kprobes_table,
+ kprobe);
+ } else {
+ ret = -EINVAL;
+ goto end;
+ }
+ tmp_str = strtok(NULL, ",");
+ }
+ break;
default:
ret = -EINVAL;
goto end;
{
struct bt_ctf_iter *iter;
struct bt_iter_pos begin_pos;
+ struct kprobes *kprobe;
const struct bt_ctf_event *event;
+ int i;
int ret = 0;
begin_pos.type = BT_SEEK_BEGIN;
iter = bt_ctf_iter_create(bt_ctx, &begin_pos, NULL);
+ /* at each event, verify the status of the process table */
+ bt_ctf_iter_add_callback(iter, 0, NULL, 0,
+ fix_process_table,
+ NULL, NULL, NULL);
if (opt_textdump) {
bt_ctf_iter_add_callback(iter, 0, NULL, 0,
print_timestamp,
bt_ctf_iter_add_callback(iter, 0, NULL, 0,
check_timestamp,
NULL, NULL, NULL);
- /* at each event, verify the status of the process table */
- bt_ctf_iter_add_callback(iter, 0, NULL, 0,
- fix_process_table,
- NULL, NULL, NULL);
/* to handle the scheduling events */
bt_ctf_iter_add_callback(iter,
g_quark_from_static_string("sched_switch"),
"lttng_statedump_file_descriptor"),
NULL, 0, handle_statedump_file_descriptor,
NULL, NULL, NULL);
+
+ /* for kprobes */
+ if (lttngtop.kprobes_table) {
+ for (i = 0; i < lttngtop.kprobes_table->len; i++) {
+ kprobe = g_ptr_array_index(lttngtop.kprobes_table, i);
+ bt_ctf_iter_add_callback(iter,
+ g_quark_from_static_string(
+ kprobe->probe_name),
+ NULL, 0, handle_kprobes,
+ NULL, NULL, NULL);
+ }
+ }
}
- while ((event = bt_ctf_iter_read_event(iter, NULL)) != NULL) {
+ while ((event = bt_ctf_iter_read_event(iter)) != NULL) {
if (quit || reload_trace)
goto end_iter;
ret = bt_iter_next(bt_ctf_get_iter(iter));
}
/* splice the subbuffer to the tracefile */
- ret = helper_lttng_consumer_on_read_subbuffer_splice(ctx, kconsumerd_fd, len);
+ ret = helper_lttng_consumer_on_read_subbuffer_splice(ctx, kconsumerd_fd, len, 0);
if (ret < 0) {
/*
* display the error but continue processing to try
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,
+ ret = pthread_create(&threads[0], NULL, helper_lttng_consumer_thread_sessiond_poll,
(void *) ctx);
if (ret != 0) {
perror("pthread_create receive fd");
goto end;
}
/* Create thread to manage the polling/writing of traces */
- ret = pthread_create(&threads[1], NULL, helper_lttng_consumer_thread_poll_fds,
+ ret = pthread_create(&threads[1], NULL, helper_lttng_consumer_thread_metadata_poll,
(void *) ctx);
if (ret != 0) {
perror("pthread_create poll fd");
return ret;
}
+int enable_kprobes(struct lttng_handle *handle, char *channel_name)
+{
+ struct lttng_event ev;
+ struct kprobes *kprobe;
+ int ret = 0;
+ int i;
+
+ for (i = 0; i < lttngtop.kprobes_table->len; i++) {
+ kprobe = g_ptr_array_index(lttngtop.kprobes_table, i);
+
+ memset(&ev, '\0', sizeof(struct lttng_event));
+ ev.type = LTTNG_EVENT_PROBE;
+ if (kprobe->symbol_name)
+ sprintf(ev.attr.probe.symbol_name, "%s", kprobe->symbol_name);
+ sprintf(ev.name, "%s", kprobe->probe_name);
+ ev.attr.probe.addr = kprobe->probe_addr;
+ ev.attr.probe.offset = kprobe->probe_offset;
+ if ((ret = lttng_enable_event(handle, &ev, channel_name)) < 0) {
+ fprintf(stderr,"error enabling kprobes : %s\n",
+ helper_lttcomm_get_readable_code(ret));
+ goto end;
+ }
+ }
+
+end:
+ return ret;
+}
+
int setup_live_tracing()
{
struct lttng_domain dom;
strcpy(chan.name, channel_name);
chan.attr.overwrite = 0;
-// chan.attr.subbuf_size = 32768;
- chan.attr.subbuf_size = 1048576; /* 1MB */
- chan.attr.num_subbuf = 4;
+ if (opt_tid && opt_textdump) {
+ chan.attr.subbuf_size = 32768;
+ chan.attr.num_subbuf = 8;
+ } else {
+ //chan.attr.subbuf_size = 1048576; /* 1MB */
+ chan.attr.subbuf_size = 2097152; /* 1MB */
+ chan.attr.num_subbuf = 4;
+ }
chan.attr.switch_timer_interval = 0;
chan.attr.read_timer_interval = 200;
chan.attr.output = LTTNG_EVENT_MMAP;
goto error_session;
}
+ memset(&ev, '\0', sizeof(struct lttng_event));
ev.type = LTTNG_EVENT_SYSCALL;
if ((ret = lttng_enable_event(handle, &ev, channel_name)) < 0) {
fprintf(stderr,"error enabling syscalls : %s\n",
goto error_session;
}
+ if (lttngtop.kprobes_table) {
+ ret = enable_kprobes(handle, channel_name);
+ if (ret < 0) {
+ goto error_session;
+ }
+ }
+
kctxpid.ctx = LTTNG_EVENT_CONTEXT_PID;
lttng_add_context(handle, &kctxpid, NULL, NULL);
+ kctxtid.ctx = LTTNG_EVENT_CONTEXT_TID;
+ lttng_add_context(handle, &kctxtid, 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);
kctxpid.ctx = LTTNG_EVENT_CONTEXT_VPID;
lttng_add_context(handle, &kctxpid, NULL, NULL);
kctxtid.ctx = LTTNG_EVENT_CONTEXT_VTID;
lttng_add_context(handle, &kctxtid, NULL, NULL);
+ kctxtid.ctx = LTTNG_EVENT_CONTEXT_HOSTNAME;
+ lttng_add_context(handle, &kctxtid, NULL, NULL);
if ((ret = lttng_start_tracing("test")) < 0) {
fprintf(stderr,"error starting tracing : %s\n",
struct mmap_stream *mmap_info;
unsigned long mmap_len;
+ init_lttngtop();
ret = parse_options(argc, argv);
if (ret < 0) {
fprintf(stdout, "Error parsing options.\n\n");
}
if (!opt_input_path) {
+ if (opt_textdump) {
+ signal(SIGTERM, handle_textdump_sigterm);
+ signal(SIGINT, handle_textdump_sigterm);
+ }
ret = setup_live_tracing();
if (ret < 0) {
goto end;
}
- init_lttngtop();
if (!opt_textdump) {
pthread_create(&display_thread, NULL, ncurses_display, (void *) NULL);
pthread_create(&timer_thread, NULL, refresh_thread, (void *) NULL);
reload_trace = 0;
live_consume(&bt_ctx);
iter_trace(bt_ctx);
+ /*
+ * FIXME : pb with cleanup in libbabeltrace
ret = bt_context_remove_trace(bt_ctx, 0);
- if (ret != 0)
+ if (ret != 0) {
fprintf(stderr, "error removing trace\n");
+ goto error;
+ }
+ */
if (bt_ctx) {
bt_context_put(bt_ctx);
}
goto end;
} else {
- init_lttngtop();
+ //init_lttngtop();
bt_ctx = bt_context_create();
ret = bt_context_add_traces_recursive(bt_ctx, opt_input_path, "ctf", NULL);
bt_context_put(bt_ctx);
return 0;
+
+error:
+ return -1;
}