src/lttngtop.c

   1 /*
   2  * Copyright (C) 2013 Julien Desfossez
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License Version 2 as
   6  * published by the Free Software Foundation;
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  *
  13  * You should have received a copy of the GNU General Public License along
  14  * with this program; if not, write to the Free Software Foundation, Inc.,
  15  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  16  */
  17
  18 #define _GNU_SOURCE
  19 #include <config.h>
  20 #include <stdio.h>
  21 #include <stdint.h>
  22 #include <babeltrace/babeltrace.h>
  23 #include <babeltrace/ctf/events.h>
  24 #include <babeltrace/ctf/callbacks.h>
  25 #include <babeltrace/ctf/iterator.h>
  26 #include <fcntl.h>
  27 #include <pthread.h>
  28 #include <popt.h>
  29 #include <stdlib.h>
  30 #include <ftw.h>
  31 #include <dirent.h>
  32 #include <ctype.h>
  33 #include <sys/stat.h>
  34 #include <unistd.h>
  35 #include <string.h>
  36 #include <errno.h>
  37 #include <sys/types.h>
  38 #include <fts.h>
  39 #include <assert.h>
  40 #include <sys/mman.h>
  41 #include <lttng/lttng.h>
  42 #ifdef LTTNGTOP_MMAP_LIVE
  43 #include <lttng/lttngtop-helper.h>
  44 #include <babeltrace/lttngtopmmappacketseek.h>
  45 #include "mmap-live.h"
  46 #endif /* LTTNGTOP_MMAP_LIVE */
  47
  48 #include "lttngtoptypes.h"
  49 #include "cputop.h"
  50 #include "iostreamtop.h"
  51 #include "cursesdisplay.h"
  52 #include "common.h"
  53 #include "network-live.h"
  54
  55 #include "lttng-index.h"
  56
  57 #define DEFAULT_FILE_ARRAY_SIZE 1
  58
  59 const char *opt_input_path;
  60 static int opt_textdump;
  61 static int opt_child;
  62 static int opt_begin;
  63
  64 int quit = 0;
  65
  66 struct lttngtop *copy;
  67 pthread_t display_thread;
  68 pthread_t timer_thread;
  69
  70 unsigned long refresh_display = 1 * NSEC_PER_SEC;
  71 unsigned long last_display_update = 0;
  72 unsigned long last_event_ts = 0;
  73
  74 /* list of FDs available for being read with snapshots */
  75 struct bt_mmap_stream_list mmap_list;
  76 GPtrArray *lttng_consumer_stream_array;
  77 int sessiond_metadata, consumerd_metadata;
  78 struct lttng_consumer_local_data *ctx = NULL;
  79 /* list of snapshots currently not consumed */
  80 GPtrArray *available_snapshots;
  81 sem_t metadata_available;
  82 int reload_trace = 0;
  83
  84 int last_textdump_print_newline = 1;
  85
  86 enum {
  87         OPT_NONE = 0,
  88         OPT_HELP,
  89         OPT_TEXTDUMP,
  90         OPT_PID,
  91         OPT_CHILD,
  92         OPT_HOSTNAME,
  93         OPT_RELAY_HOSTNAME,
  94         OPT_KPROBES,
  95         OPT_BEGIN,
  96 };
  97
  98 static struct poptOption long_options[] = {
  99         /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
 100         { "help", 'h', POPT_ARG_NONE, NULL, OPT_HELP, NULL, NULL },
 101         { "textdump", 't', POPT_ARG_NONE, NULL, OPT_TEXTDUMP, NULL, NULL },
 102         { "child", 'f', POPT_ARG_NONE, NULL, OPT_CHILD, NULL, NULL },
 103         { "begin", 'b', POPT_ARG_NONE, NULL, OPT_BEGIN, NULL, NULL },
 104         { "pid", 'p', POPT_ARG_STRING, &opt_tid, OPT_PID, NULL, NULL },
 105         { "hostname", 'n', POPT_ARG_STRING, &opt_hostname, OPT_HOSTNAME, NULL, NULL },
 106         { "relay-hostname", 'r', POPT_ARG_STRING, &opt_relay_hostname,
 107                 OPT_RELAY_HOSTNAME, NULL, NULL },
 108         { "kprobes", 'k', POPT_ARG_STRING, &opt_kprobes, OPT_KPROBES, NULL, NULL },
 109         { NULL, 0, 0, NULL, 0, NULL, NULL },
 110 };
 111
 112 #ifdef LTTNGTOP_MMAP_LIVE
 113 static void handle_textdump_sigterm(int signal)
 114 {
 115         quit = 1;
 116         lttng_destroy_session("test");
 117 }
 118 #endif
 119
 120 void *refresh_thread(void *p)
 121 {
 122         while (1) {
 123                 if (quit) {
 124                         sem_post(&pause_sem);
 125                         sem_post(&timer);
 126                         sem_post(&end_trace_sem);
 127                         sem_post(&goodtodisplay);
 128                         sem_post(&goodtoupdate);
 129                         pthread_exit(0);
 130                 }
 131                 if (!opt_input_path) {
 132 #ifdef LTTNGTOP_MMAP_LIVE
 133                         mmap_live_flush(mmap_list);
 134 #endif
 135                 }
 136                 sem_wait(&pause_sem);
 137                 sem_post(&pause_sem);
 138                 sem_post(&timer);
 139                 sleep(refresh_display/NSEC_PER_SEC);
 140         }
 141 }
 142
 143 void *ncurses_display(void *p)
 144 {
 145         unsigned int current_display_index = 0;
 146
 147         sem_wait(&bootstrap);
 148         /*
 149          * Prevent the 1 second delay when we hit ESC
 150          */
 151         ESCDELAY = 0;
 152         init_ncurses();
 153
 154         while (1) {
 155                 sem_wait(&timer);
 156                 sem_wait(&goodtodisplay);
 157                 sem_wait(&pause_sem);
 158
 159                 if (quit) {
 160                         sem_post(&pause_sem);
 161                         sem_post(&timer);
 162                         reset_ncurses();
 163                         pthread_exit(0);
 164                 }
 165
 166                 copy = g_ptr_array_index(copies, current_display_index);
 167                 assert(copy);
 168                 display(current_display_index++);
 169
 170                 sem_post(&goodtoupdate);
 171                 sem_post(&pause_sem);
 172         }
 173 }
 174
 175 void print_fields(struct bt_ctf_event *event)
 176 {
 177         unsigned int cnt, i;
 178         const struct bt_definition *const * list;
 179         const struct bt_declaration *l;
 180         const struct bt_definition *scope;
 181         enum ctf_type_id type;
 182         const char *str;
 183
 184         scope = bt_ctf_get_top_level_scope(event, BT_EVENT_FIELDS);
 185
 186         bt_ctf_get_field_list(event, scope, &list, &cnt);
 187         for (i = 0; i < cnt; i++) {
 188                 if (i != 0)
 189                         printf(", ");
 190                 printf("%s = ", bt_ctf_field_name(list[i]));
 191                 l = bt_ctf_get_decl_from_def(list[i]);
 192                 type = bt_ctf_field_type(l);
 193                 if (type == CTF_TYPE_INTEGER) {
 194                         if (bt_ctf_get_int_signedness(l) == 0)
 195                                 printf("%" PRIu64 "", bt_ctf_get_uint64(list[i]));
 196                         else
 197                                 printf("%" PRId64 "", bt_ctf_get_int64(list[i]));
 198                 } else if (type == CTF_TYPE_STRING) {
 199                         printf("%s", bt_ctf_get_string(list[i]));
 200                 } else if (type == CTF_TYPE_ARRAY) {
 201                         str = bt_ctf_get_char_array(list[i]);
 202                         if (!bt_ctf_field_get_error() && str)
 203                                 printf("%s", str);
 204                 }
 205         }
 206 }
 207
 208 /*
 209  * hook on each event to check the timestamp and refresh the display if
 210  * necessary
 211  */
 212 enum bt_cb_ret print_timestamp(struct bt_ctf_event *call_data, void *private_data)
 213 {
 214         unsigned long timestamp;
 215         struct tm start;
 216         uint64_t ts_nsec_start;
 217         int pid, cpu_id;
 218         int64_t syscall_ret;
 219         const struct bt_definition *scope;
 220         const char *hostname, *procname;
 221
 222         timestamp = bt_ctf_get_timestamp(call_data);
 223
 224         /* can happen in network live when tracing is idle */
 225         if (timestamp < last_event_ts)
 226                 goto end_stop;
 227
 228         last_event_ts = timestamp;
 229
 230         start = format_timestamp(timestamp);
 231         ts_nsec_start = timestamp % NSEC_PER_SEC;
 232
 233         pid = get_context_pid(call_data);
 234         if (pid == -1ULL && opt_tid) {
 235                 goto error;
 236         }
 237
 238         hostname = get_context_hostname(call_data);
 239         if (opt_tid || opt_hostname)
 240                 if (!lookup_filter_tid_list(pid))
 241                         goto end;
 242
 243         cpu_id = get_cpu_id(call_data);
 244         procname = get_context_comm(call_data);
 245
 246         if ((strcmp(bt_ctf_event_name(call_data), "exit_syscall") == 0) &&
 247                         !last_textdump_print_newline) {
 248                 scope = bt_ctf_get_top_level_scope(call_data,
 249                                 BT_EVENT_FIELDS);
 250                 syscall_ret = bt_ctf_get_int64(bt_ctf_get_field(call_data,
 251                                         scope, "_ret"));
 252                 printf("= %ld\n", syscall_ret);
 253                 last_textdump_print_newline = 1;
 254         } else {
 255                 /* we might have lost the exit_syscall event, so need to
 256                  * print the newline in this case */
 257                 if (last_textdump_print_newline == 0)
 258                         printf("\n");
 259                 printf("%02d:%02d:%02d.%09" PRIu64 " (%s) (cpu %d) [%s (%d)] %s (",
 260                                 start.tm_hour, start.tm_min, start.tm_sec,
 261                                 ts_nsec_start, hostname, cpu_id, procname, pid,
 262                                 bt_ctf_event_name(call_data));
 263                 print_fields(call_data);
 264                 printf(") ");
 265                 if (strncmp(bt_ctf_event_name(call_data), "sys_", 4) != 0) {
 266                         printf("\n");
 267                         last_textdump_print_newline = 1;
 268                 } else {
 269                         last_textdump_print_newline = 0;
 270                 }
 271         }
 272
 273 end:
 274         return BT_CB_OK;
 275 error:
 276         return BT_CB_ERROR_STOP;
 277 end_stop:
 278         return BT_CB_OK_STOP;
 279 }
 280
 281 enum bt_cb_ret handle_kprobes(struct bt_ctf_event *call_data, void *private_data)
 282 {
 283         int i;
 284         struct kprobes *kprobe;
 285
 286         /* for kprobes */
 287         for (i = 0; i < lttngtop.kprobes_table->len; i++) {
 288                 kprobe = g_ptr_array_index(lttngtop.kprobes_table, i);
 289                 if (strcmp(bt_ctf_event_name(call_data), kprobe->probe_name) == 0) {
 290                         kprobe->count++;
 291                 }
 292         }
 293
 294         return BT_CB_OK;
 295 }
 296
 297 /*
 298  * hook on each event to check the timestamp and refresh the display if
 299  * necessary
 300  */
 301 enum bt_cb_ret check_timestamp(struct bt_ctf_event *call_data, void *private_data)
 302 {
 303         unsigned long timestamp;
 304
 305         timestamp = bt_ctf_get_timestamp(call_data);
 306         if (timestamp == -1ULL)
 307                 goto error;
 308
 309         /* can happen in network live when tracing is idle */
 310         if (timestamp < last_event_ts)
 311                 goto end_stop;
 312
 313         last_event_ts = timestamp;
 314
 315         if (last_display_update == 0)
 316                 last_display_update = timestamp;
 317
 318         if (timestamp - last_display_update >= refresh_display) {
 319                 sem_wait(&goodtoupdate);
 320                 g_ptr_array_add(copies, get_copy_lttngtop(last_display_update,
 321                                         timestamp));
 322                 sem_post(&goodtodisplay);
 323                 sem_post(&bootstrap);
 324                 last_display_update = timestamp;
 325         }
 326         return BT_CB_OK;
 327
 328 error:
 329         fprintf(stderr, "check_timestamp callback error\n");
 330         return BT_CB_ERROR_STOP;
 331
 332 end_stop:
 333         return BT_CB_OK_STOP;
 334 }
 335
 336 /*
 337  * get_perf_counter : get or create and return a perf_counter struct for
 338  * either a process or a cpu (only one of the 2 parameters mandatory)
 339  */
 340 struct perfcounter *get_perf_counter(const char *name, struct processtop *proc,
 341                 struct cputime *cpu)
 342 {
 343         struct perfcounter *ret;
 344         GHashTable *table;
 345
 346         if (proc)
 347                 table = proc->perf;
 348         else if (cpu)
 349                 table = cpu->perf;
 350         else
 351                 goto error;
 352
 353         ret = g_hash_table_lookup(table, (gpointer) name);
 354         if (ret)
 355                 goto end;
 356
 357         ret = g_new0(struct perfcounter, 1);
 358         /* by default, make it visible in the UI */
 359         ret->visible = 1;
 360         g_hash_table_insert(table, (gpointer) strdup(name), ret);
 361
 362 end:
 363         return ret;
 364
 365 error:
 366         return NULL;
 367 }
 368
 369 void update_perf_value(struct processtop *proc, struct cputime *cpu,
 370                 const char *name, int value)
 371 {
 372         struct perfcounter *cpu_perf, *process_perf;
 373
 374         cpu_perf = get_perf_counter(name, NULL, cpu);
 375         if (cpu_perf->count < value) {
 376                 process_perf = get_perf_counter(name, proc, NULL);
 377                 process_perf->count += value - cpu_perf->count;
 378                 cpu_perf->count = value;
 379         }
 380 }
 381
 382 void extract_perf_counter_scope(const struct bt_ctf_event *event,
 383                 const struct bt_definition *scope,
 384                 struct processtop *proc,
 385                 struct cputime *cpu)
 386 {
 387         struct bt_definition const * const *list = NULL;
 388         const struct bt_definition *field;
 389         unsigned int count;
 390         struct perfcounter *perfcounter;
 391         GHashTableIter iter;
 392         gpointer key;
 393         int ret;
 394
 395         if (!scope)
 396                 goto end;
 397
 398         ret = bt_ctf_get_field_list(event, scope, &list, &count);
 399         if (ret < 0)
 400                 goto end;
 401
 402         if (count == 0)
 403                 goto end;
 404
 405         g_hash_table_iter_init(&iter, global_perf_liszt);
 406         while (g_hash_table_iter_next (&iter, &key, (gpointer) &perfcounter)) {
 407                 field = bt_ctf_get_field(event, scope, (char *) key);
 408                 if (field) {
 409                         int value = bt_ctf_get_uint64(field);
 410                         if (bt_ctf_field_get_error())
 411                                 continue;
 412                         update_perf_value(proc, cpu, (char *) key, value);
 413                 }
 414         }
 415
 416 end:
 417         return;
 418 }
 419
 420 void update_perf_counter(struct processtop *proc, const struct bt_ctf_event *event)
 421 {
 422         struct cputime *cpu;
 423         const struct bt_definition *scope;
 424
 425         cpu = get_cpu(get_cpu_id(event));
 426
 427         scope = bt_ctf_get_top_level_scope(event, BT_STREAM_EVENT_CONTEXT);
 428         extract_perf_counter_scope(event, scope, proc, cpu);
 429
 430         scope = bt_ctf_get_top_level_scope(event, BT_STREAM_PACKET_CONTEXT);
 431         extract_perf_counter_scope(event, scope, proc, cpu);
 432
 433         scope = bt_ctf_get_top_level_scope(event, BT_EVENT_CONTEXT);
 434         extract_perf_counter_scope(event, scope, proc, cpu);
 435 }
 436
 437 enum bt_cb_ret fix_process_table(struct bt_ctf_event *call_data,
 438                 void *private_data)
 439 {
 440         int pid, tid, ppid, vpid, vtid, vppid;
 441         char *comm, *hostname;
 442         struct processtop *parent, *child;
 443         unsigned long timestamp;
 444
 445         timestamp = bt_ctf_get_timestamp(call_data);
 446         if (timestamp == -1ULL)
 447                 goto error;
 448
 449         pid = get_context_pid(call_data);
 450         if (pid == -1ULL) {
 451                 goto error;
 452         }
 453
 454         tid = get_context_tid(call_data);
 455         if (tid == -1ULL) {
 456                 goto error;
 457         }
 458         ppid = get_context_ppid(call_data);
 459         if (ppid == -1ULL) {
 460                 goto error;
 461         }
 462         vpid = get_context_vpid(call_data);
 463         if (pid == -1ULL) {
 464                 vpid = -1;
 465         }
 466         vtid = get_context_vtid(call_data);
 467         if (tid == -1ULL) {
 468                 vtid = -1;
 469         }
 470         vppid = get_context_vppid(call_data);
 471         if (ppid == -1ULL) {
 472                 vppid = -1;
 473         }
 474         comm = get_context_comm(call_data);
 475         if (!comm) {
 476                 goto error;
 477         }
 478         /* optional */
 479         hostname = get_context_hostname(call_data);
 480
 481         /* find or create the current process */
 482         child = find_process_tid(&lttngtop, tid, comm);
 483         if (!child)
 484                 child = add_proc(&lttngtop, tid, comm, timestamp, hostname);
 485         if (!child)
 486                 goto end;
 487         update_proc(child, pid, tid, ppid, vpid, vtid, vppid, comm, hostname);
 488
 489         if (pid != tid) {
 490                 /* find or create the parent */
 491                 parent = find_process_tid(&lttngtop, pid, comm);
 492                 if (!parent) {
 493                         parent = add_proc(&lttngtop, pid, comm, timestamp, hostname);
 494                         if (parent)
 495                                 parent->pid = pid;
 496                 }
 497
 498                 /* attach the parent to the current process */
 499                 child->threadparent = parent;
 500                 add_thread(parent, child);
 501         }
 502
 503         update_perf_counter(child, call_data);
 504
 505 end:
 506         return BT_CB_OK;
 507
 508 error:
 509         return BT_CB_ERROR_STOP;
 510 }
 511
 512 void init_lttngtop()
 513 {
 514         copies = g_ptr_array_new();
 515         global_perf_liszt = g_hash_table_new(g_str_hash, g_str_equal);
 516         global_filter_list = g_hash_table_new(g_str_hash, g_str_equal);
 517         global_host_list = g_hash_table_new(g_str_hash, g_str_equal);
 518
 519         sem_init(&goodtodisplay, 0, 0);
 520         sem_init(&goodtoupdate, 0, 1);
 521         sem_init(&timer, 0, 1);
 522         sem_init(&bootstrap, 0, 0);
 523         sem_init(&pause_sem, 0, 1);
 524         sem_init(&end_trace_sem, 0, 0);
 525
 526         reset_global_counters();
 527         lttngtop.nbproc = 0;
 528         lttngtop.nbthreads = 0;
 529         lttngtop.nbfiles = 0;
 530
 531         lttngtop.process_hash_table = g_hash_table_new(g_direct_hash,
 532                         g_direct_equal);
 533         lttngtop.process_table = g_ptr_array_new();
 534         lttngtop.files_table = g_ptr_array_new();
 535         lttngtop.cpu_table = g_ptr_array_new();
 536
 537         toggle_filter = -1;
 538 }
 539
 540 void usage(FILE *fp)
 541 {
 542         fprintf(fp, "LTTngTop %s\n\n", VERSION);
 543         fprintf(fp, "Usage : lttngtop [OPTIONS] [TRACE]\n");
 544         fprintf(fp, "  TRACE                    Path to the trace to analyse (no trace path for live tracing)\n");
 545         fprintf(fp, "  -h, --help               This help message\n");
 546         fprintf(fp, "  -t, --textdump           Display live events in text-only\n");
 547         fprintf(fp, "  -p, --pid                Comma-separated list of PIDs to display\n");
 548         fprintf(fp, "  -f, --child              Follow threads associated with selected PIDs\n");
 549         fprintf(fp, "  -n, --hostname           Comma-separated list of hostnames to display (require hostname context in trace)\n");
 550         fprintf(fp, "  -k, --kprobes            Comma-separated list of kprobes to insert (same format as lttng enable-event)\n");
 551         fprintf(fp, "  -r, --relay-hostname     Network live streaming : hostname of the lttng-relayd (default port)\n");
 552         fprintf(fp, "  -b, --begin              Network live streaming : read the trace for the beginning of the recording\n");
 553 }
 554
 555 /*
 556  * Parse probe options.
 557  * Shamelessly stolen from lttng-tools :
 558  * src/bin/lttng/commands/enable_events.c
 559  */
 560 static struct kprobes *parse_probe_opts(char *opt)
 561 {
 562         char s_hex[19];
 563         char name[LTTNG_SYMBOL_NAME_LEN];
 564         struct kprobes *kprobe;
 565         int ret;
 566
 567         /*
 568         kprobe->probe_addr = 0;
 569         kprobe->probe_offset = 0;
 570         asprintf(&kprobe->probe_name, "probe_sys_open");
 571         asprintf(&kprobe->symbol_name, "sys_open");
 572         */
 573
 574         if (opt == NULL) {
 575                 kprobe = NULL;
 576                 goto end;
 577         }
 578
 579         kprobe = g_new0(struct kprobes, 1);
 580
 581         /* Check for symbol+offset */
 582         ret = sscanf(opt, "%[^'+']+%s", name, s_hex);
 583         if (ret == 2) {
 584                 ret = asprintf(&kprobe->probe_name, "probe_%s", name);
 585                 ret = asprintf(&kprobe->symbol_name, "%s", name);
 586
 587                 if (strlen(s_hex) == 0) {
 588                         fprintf(stderr, "Invalid probe offset %s", s_hex);
 589                         ret = -1;
 590                         goto end;
 591                 }
 592                 kprobe->probe_offset = strtoul(s_hex, NULL, 0);
 593                 kprobe->probe_addr = 0;
 594                 goto end;
 595         }
 596
 597         /* Check for symbol */
 598         if (isalpha(name[0])) {
 599                 ret = sscanf(opt, "%s", name);
 600                 if (ret == 1) {
 601                         ret = asprintf(&kprobe->probe_name, "probe_%s", name);
 602                         ret = asprintf(&kprobe->symbol_name, "%s", name);
 603                         kprobe->probe_offset = 0;
 604                         kprobe->probe_addr = 0;
 605                         goto end;
 606                 }
 607         }
 608
 609         /* Check for address */
 610         ret = sscanf(opt, "%s", s_hex);
 611         if (ret > 0) {
 612                 if (strlen(s_hex) == 0) {
 613                         fprintf(stderr, "Invalid probe address %s", s_hex);
 614                         ret = -1;
 615                         goto end;
 616                 }
 617                 ret = asprintf(&kprobe->probe_name, "probe_%s", s_hex);
 618                 kprobe->probe_offset = 0;
 619                 kprobe->probe_addr = strtoul(s_hex, NULL, 0);
 620                 goto end;
 621         }
 622
 623         /* No match */
 624         kprobe = NULL;
 625
 626 end:
 627         return kprobe;
 628 }
 629
 630 /*
 631  * Return 0 if caller should continue, < 0 if caller should return
 632  * error, > 0 if caller should exit without reporting error.
 633  */
 634 static int parse_options(int argc, char **argv)
 635 {
 636         poptContext pc;
 637         int opt, ret = 0;
 638         char *tmp_str;
 639         int *tid;
 640
 641         remote_live = 0;
 642
 643         pc = poptGetContext(NULL, argc, (const char **) argv, long_options, 0);
 644         poptReadDefaultConfig(pc, 0);
 645
 646         while ((opt = poptGetNextOpt(pc)) != -1) {
 647                 switch (opt) {
 648                         case OPT_HELP:
 649                                 usage(stdout);
 650                                 ret = 1;    /* exit cleanly */
 651                                 goto end;
 652                         case OPT_TEXTDUMP:
 653                                 opt_textdump = 1;
 654                                 break;
 655                         case OPT_CHILD:
 656                                 opt_textdump = 1;
 657                                 opt_child = 1;
 658                                 break;
 659                         case OPT_PID:
 660                                 toggle_filter = 1;
 661                                 tid_filter_list = g_hash_table_new(g_str_hash,
 662                                                 g_str_equal);
 663                                 tmp_str = strtok(opt_tid, ",");
 664                                 while (tmp_str) {
 665                                         tid = malloc(sizeof(int));
 666                                         *tid = atoi(tmp_str);
 667                                         g_hash_table_insert(tid_filter_list,
 668                                                         (gpointer) tid, tid);
 669                                         tmp_str = strtok(NULL, ",");
 670                                 }
 671                                 break;
 672                         case OPT_BEGIN:
 673                                 /* start reading the live trace from the beginning */
 674                                 opt_begin = 1;
 675                                 break;
 676                         case OPT_HOSTNAME:
 677                                 toggle_filter = 1;
 678                                 tmp_str = strtok(opt_hostname, ",");
 679                                 while (tmp_str) {
 680                                         add_hostname_list(tmp_str, 1);
 681                                         tmp_str = strtok(NULL, ",");
 682                                 }
 683                                 break;
 684                         case OPT_RELAY_HOSTNAME:
 685                                 remote_live = 1;
 686                                 break;
 687                         case OPT_KPROBES:
 688                                 lttngtop.kprobes_table = g_ptr_array_new();
 689                                 tmp_str = strtok(opt_kprobes, ",");
 690                                 while (tmp_str) {
 691                                         struct kprobes *kprobe;
 692
 693                                         kprobe = parse_probe_opts(tmp_str);
 694                                         if (kprobe) {
 695                                                 g_ptr_array_add(
 696                                                         lttngtop.kprobes_table,
 697                                                         kprobe);
 698                                         } else {
 699                                                 ret = -EINVAL;
 700                                                 goto end;
 701                                         }
 702                                         tmp_str = strtok(NULL, ",");
 703                                 }
 704                                 break;
 705                         default:
 706                                 ret = -EINVAL;
 707                                 goto end;
 708                 }
 709         }
 710
 711         opt_input_path = poptGetArg(pc);
 712
 713 end:
 714         if (pc) {
 715                 poptFreeContext(pc);
 716         }
 717         return ret;
 718 }
 719
 720 void iter_trace(struct bt_context *bt_ctx)
 721 {
 722         struct bt_ctf_iter *iter;
 723         struct bt_iter_pos begin_pos;
 724         struct kprobes *kprobe;
 725         const struct bt_ctf_event *event;
 726         int i;
 727         int ret = 0;
 728
 729         begin_pos.type = BT_SEEK_BEGIN;
 730         iter = bt_ctf_iter_create(bt_ctx, &begin_pos, NULL);
 731
 732         /* at each event, verify the status of the process table */
 733         bt_ctf_iter_add_callback(iter, 0, NULL, 0,
 734                         fix_process_table,
 735                         NULL, NULL, NULL);
 736         if (opt_textdump) {
 737                 bt_ctf_iter_add_callback(iter, 0, NULL, 0,
 738                                 print_timestamp,
 739                                 NULL, NULL, NULL);
 740         } else {
 741                 /* at each event check if we need to refresh */
 742                 bt_ctf_iter_add_callback(iter, 0, NULL, 0,
 743                                 check_timestamp,
 744                                 NULL, NULL, NULL);
 745                 /* to handle the scheduling events */
 746                 bt_ctf_iter_add_callback(iter,
 747                                 g_quark_from_static_string("sched_switch"),
 748                                 NULL, 0, handle_sched_switch, NULL, NULL, NULL);
 749                 /* to clean up the process table */
 750                 bt_ctf_iter_add_callback(iter,
 751                                 g_quark_from_static_string("sched_process_free"),
 752                                 NULL, 0, handle_sched_process_free, NULL, NULL, NULL);
 753                 /* to get all the process from the statedumps */
 754                 bt_ctf_iter_add_callback(iter,
 755                                 g_quark_from_static_string(
 756                                         "lttng_statedump_process_state"),
 757                                 NULL, 0, handle_statedump_process_state,
 758                                 NULL, NULL, NULL);
 759
 760                 /* for IO top */
 761                 bt_ctf_iter_add_callback(iter,
 762                                 g_quark_from_static_string("exit_syscall"),
 763                                 NULL, 0, handle_exit_syscall, NULL, NULL, NULL);
 764                 bt_ctf_iter_add_callback(iter,
 765                                 g_quark_from_static_string("sys_write"),
 766                                 NULL, 0, handle_sys_write, NULL, NULL, NULL);
 767                 bt_ctf_iter_add_callback(iter,
 768                                 g_quark_from_static_string("sys_read"),
 769                                 NULL, 0, handle_sys_read, NULL, NULL, NULL);
 770                 bt_ctf_iter_add_callback(iter,
 771                                 g_quark_from_static_string("sys_open"),
 772                                 NULL, 0, handle_sys_open, NULL, NULL, NULL);
 773                 bt_ctf_iter_add_callback(iter,
 774                                 g_quark_from_static_string("sys_close"),
 775                                 NULL, 0, handle_sys_close, NULL, NULL, NULL);
 776                 bt_ctf_iter_add_callback(iter,
 777                                 g_quark_from_static_string(
 778                                         "lttng_statedump_file_descriptor"),
 779                                 NULL, 0, handle_statedump_file_descriptor,
 780                                 NULL, NULL, NULL);
 781
 782                 /* for kprobes */
 783                 if (lttngtop.kprobes_table) {
 784                         for (i = 0; i < lttngtop.kprobes_table->len; i++) {
 785                                 kprobe = g_ptr_array_index(lttngtop.kprobes_table, i);
 786                                 bt_ctf_iter_add_callback(iter,
 787                                                 g_quark_from_static_string(
 788                                                         kprobe->probe_name),
 789                                                 NULL, 0, handle_kprobes,
 790                                                 NULL, NULL, NULL);
 791                         }
 792                 }
 793         }
 794
 795         while ((event = bt_ctf_iter_read_event(iter)) != NULL) {
 796                 if (quit || reload_trace)
 797                         goto end_iter;
 798                 ret = bt_iter_next(bt_ctf_get_iter(iter));
 799                 if (ret < 0)
 800                         goto end_iter;
 801         }
 802
 803         /* block until quit, we reached the end of the trace */
 804         sem_wait(&end_trace_sem);
 805
 806 end_iter:
 807         bt_ctf_iter_destroy(iter);
 808 }
 809
 810 /*
 811  * bt_context_add_traces_recursive: Open a trace recursively
 812  * (copied from BSD code in converter/babeltrace.c)
 813  *
 814  * Find each trace present in the subdirectory starting from the given
 815  * path, and add them to the context. The packet_seek parameter can be
 816  * NULL: this specify to use the default format packet_seek.
 817  *
 818  * Return: 0 on success, nonzero on failure.
 819  * Unable to open toplevel: failure.
 820  * Unable to open some subdirectory or file: warn and continue;
 821  */
 822 int bt_context_add_traces_recursive(struct bt_context *ctx, const char *path,
 823                 const char *format_str,
 824                 void (*packet_seek)(struct bt_stream_pos *pos,
 825                         size_t offset, int whence))
 826 {
 827         FTS *tree;
 828         FTSENT *node;
 829         GArray *trace_ids;
 830         char lpath[PATH_MAX];
 831         char * const paths[2] = { lpath, NULL };
 832         int ret = -1;
 833
 834         /*
 835          * Need to copy path, because fts_open can change it.
 836          * It is the pointer array, not the strings, that are constant.
 837          */
 838         strncpy(lpath, path, PATH_MAX);
 839         lpath[PATH_MAX - 1] = '\0';
 840
 841         tree = fts_open(paths, FTS_NOCHDIR | FTS_LOGICAL, 0);
 842         if (tree == NULL) {
 843                 fprintf(stderr, "[error] [Context] Cannot traverse \"%s\" for reading.\n",
 844                                 path);
 845                 return -EINVAL;
 846         }
 847
 848         trace_ids = g_array_new(FALSE, TRUE, sizeof(int));
 849
 850         while ((node = fts_read(tree))) {
 851                 int dirfd, metafd;
 852
 853                 if (!(node->fts_info & FTS_D))
 854                         continue;
 855
 856                 dirfd = open(node->fts_accpath, 0);
 857                 if (dirfd < 0) {
 858                         fprintf(stderr, "[error] [Context] Unable to open trace "
 859                                 "directory file descriptor.\n");
 860                         ret = dirfd;
 861                         goto error;
 862                 }
 863                 metafd = openat(dirfd, "metadata", O_RDONLY);
 864                 if (metafd < 0) {
 865                         close(dirfd);
 866                         continue;
 867                 } else {
 868                         int trace_id;
 869
 870                         ret = close(metafd);
 871                         if (ret < 0) {
 872                                 perror("close");
 873                                 goto error;
 874                         }
 875                         ret = close(dirfd);
 876                         if (ret < 0) {
 877                                 perror("close");
 878                                 goto error;
 879                         }
 880
 881                         trace_id = bt_context_add_trace(ctx,
 882                                 node->fts_accpath, format_str,
 883                                 packet_seek, NULL, NULL);
 884                         if (trace_id < 0) {
 885                                 fprintf(stderr, "[warning] [Context] opening trace \"%s\" from %s "
 886                                         "for reading.\n", node->fts_accpath, path);
 887                                 /* Allow to skip erroneous traces. */
 888                                 continue;
 889                         }
 890                         g_array_append_val(trace_ids, trace_id);
 891                 }
 892         }
 893
 894         g_array_free(trace_ids, TRUE);
 895         return ret;
 896
 897 error:
 898         return ret;
 899 }
 900
 901 static int check_field_requirements(const struct bt_ctf_field_decl *const * field_list,
 902                 int field_cnt, int *tid_check, int *pid_check,
 903                 int *procname_check, int *ppid_check)
 904 {
 905         int j;
 906         struct perfcounter *global;
 907         const char *name;
 908
 909         for (j = 0; j < field_cnt; j++) {
 910                 name = bt_ctf_get_decl_field_name(field_list[j]);
 911                 if (*tid_check == 0) {
 912                         if (strncmp(name, "tid", 3) == 0)
 913                                 (*tid_check)++;
 914                 }
 915                 if (*pid_check == 0) {
 916                         if (strncmp(name, "pid", 3) == 0)
 917                                 (*pid_check)++;
 918                 }
 919                 if (*ppid_check == 0) {
 920                         if (strncmp(name, "ppid", 4) == 0)
 921                                 (*ppid_check)++;
 922                 }
 923                 if (*procname_check == 0) {
 924                         if (strncmp(name, "procname", 8) == 0)
 925                                 (*procname_check)++;
 926                 }
 927                 if (strncmp(name, "perf_", 5) == 0) {
 928                         global = g_hash_table_lookup(global_perf_liszt, (gpointer) name);
 929                         if (!global) {
 930                                 global = g_new0(struct perfcounter, 1);
 931                                 /* by default, sort on the first perf context */
 932                                 if (g_hash_table_size(global_perf_liszt) == 0)
 933                                         global->sort = 1;
 934                                 global->visible = 1;
 935                                 g_hash_table_insert(global_perf_liszt, (gpointer) strdup(name), global);
 936                         }
 937                 }
 938         }
 939
 940         if (*tid_check == 1 && *pid_check == 1 && *ppid_check == 1 &&
 941                         *procname_check == 1)
 942                 return 0;
 943
 944         return -1;
 945 }
 946
 947 /*
 948  * check_requirements: check if the required context informations are available
 949  *
 950  * If each mandatory context information is available for at least in one
 951  * event, return 0 otherwise return -1.
 952  */
 953 int check_requirements(struct bt_context *ctx)
 954 {
 955         unsigned int i, evt_cnt, field_cnt;
 956         struct bt_ctf_event_decl *const * evt_list;
 957         const struct bt_ctf_field_decl *const * field_list;
 958         int tid_check = 0;
 959         int pid_check = 0;
 960         int procname_check = 0;
 961         int ppid_check = 0;
 962         int ret = 0;
 963
 964         ret = bt_ctf_get_event_decl_list(0, ctx, &evt_list, &evt_cnt);
 965         if (ret < 0) {
 966                 goto end;
 967         }
 968
 969         for (i = 0; i < evt_cnt; i++) {
 970                 bt_ctf_get_decl_fields(evt_list[i], BT_STREAM_EVENT_CONTEXT,
 971                                 &field_list, &field_cnt);
 972                 ret = check_field_requirements(field_list, field_cnt,
 973                                 &tid_check, &pid_check, &procname_check,
 974                                 &ppid_check);
 975
 976                 bt_ctf_get_decl_fields(evt_list[i], BT_EVENT_CONTEXT,
 977                                 &field_list, &field_cnt);
 978                 ret = check_field_requirements(field_list, field_cnt,
 979                                 &tid_check, &pid_check, &procname_check,
 980                                 &ppid_check);
 981
 982                 bt_ctf_get_decl_fields(evt_list[i], BT_STREAM_PACKET_CONTEXT,
 983                                 &field_list, &field_cnt);
 984                 ret = check_field_requirements(field_list, field_cnt,
 985                                 &tid_check, &pid_check, &procname_check,
 986                                 &ppid_check);
 987         }
 988
 989         if (tid_check == 0) {
 990                 ret = -1;
 991                 fprintf(stderr, "[error] missing tid context information\n");
 992         }
 993         if (pid_check == 0) {
 994                 ret = -1;
 995                 fprintf(stderr, "[error] missing pid context information\n");
 996         }
 997         if (ppid_check == 0) {
 998                 ret = -1;
 999                 fprintf(stderr, "[error] missing ppid context information\n");
1000         }
1001         if (procname_check == 0) {
1002                 ret = -1;
1003                 fprintf(stderr, "[error] missing procname context information\n");
1004         }
1005
1006 end:
1007         return ret;
1008 }
1009
1010 int main(int argc, char **argv)
1011 {
1012         int ret;
1013         struct bt_context *bt_ctx = NULL;
1014
1015         init_lttngtop();
1016         ret = parse_options(argc, argv);
1017         if (ret < 0) {
1018                 fprintf(stdout, "Error parsing options.\n\n");
1019                 usage(stdout);
1020                 exit(EXIT_FAILURE);
1021         } else if (ret > 0) {
1022                 exit(EXIT_SUCCESS);
1023         }
1024
1025         if (!opt_input_path && !remote_live) {
1026                 /* mmap live */
1027 #ifdef LTTNGTOP_MMAP_LIVE
1028                 if (opt_textdump) {
1029                         signal(SIGTERM, handle_textdump_sigterm);
1030                         signal(SIGINT, handle_textdump_sigterm);
1031                 }
1032                 mmap_live_loop(bt_ctx);
1033                 pthread_join(timer_thread, NULL);
1034                 quit = 1;
1035                 pthread_join(display_thread, NULL);
1036
1037                 lttng_stop_tracing("test");
1038                 lttng_destroy_session("test");
1039
1040                 goto end;
1041 #else
1042                 fprintf(stderr, "Mmap live support not compiled\n");
1043                 goto end;
1044 #endif /* LTTNGTOP_MMAP_LIVE */
1045         } else if (!opt_input_path && remote_live) {
1046                 /* network live */
1047                 ret = setup_network_live(opt_relay_hostname, opt_begin);
1048                 if (ret < 0) {
1049                         goto end;
1050                 }
1051
1052                 ret = open_trace(&bt_ctx);
1053                 if (ret < 0) {
1054                         goto end;
1055                 }
1056         } else {
1057                 //init_lttngtop();
1058
1059                 bt_ctx = bt_context_create();
1060                 ret = bt_context_add_traces_recursive(bt_ctx, opt_input_path, "ctf", NULL);
1061                 if (ret < 0) {
1062                         fprintf(stderr, "[error] Opening the trace\n");
1063                         goto end;
1064                 }
1065         }
1066
1067         ret = check_requirements(bt_ctx);
1068         if (ret < 0) {
1069                 fprintf(stderr, "[error] some mandatory contexts were missing, exiting.\n");
1070                 goto end;
1071         }
1072         if (!opt_textdump) {
1073                 pthread_create(&display_thread, NULL, ncurses_display, (void *) NULL);
1074                 pthread_create(&timer_thread, NULL, refresh_thread, (void *) NULL);
1075         }
1076
1077         iter_trace(bt_ctx);
1078
1079         pthread_join(display_thread, NULL);
1080         quit = 1;
1081         pthread_join(timer_thread, NULL);
1082
1083 end:
1084         if (bt_ctx)
1085                 bt_context_put(bt_ctx);
1086
1087         return 0;
1088 }