+static int check_field_requirements(const struct bt_ctf_field_decl *const * field_list,
+ int field_cnt, int *tid_check, int *pid_check,
+ 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(name, "tid", 3) == 0)
+ (*tid_check)++;
+ }
+ if (*pid_check == 0) {
+ if (strncmp(name, "pid", 3) == 0)
+ (*pid_check)++;
+ }
+ if (*ppid_check == 0) {
+ if (strncmp(name, "ppid", 4) == 0)
+ (*ppid_check)++;
+ }
+ if (*procname_check == 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 (*tid_check == 1 && *pid_check == 1 && *ppid_check == 1 &&
+ *procname_check == 1)
+ return 0;
+
+ return -1;
+}
+
+/*
+ * check_requirements: check if the required context informations are available
+ *
+ * If each mandatory context information is available for at least in one
+ * event, return 0 otherwise return -1.
+ */
+int check_requirements(struct bt_context *ctx)
+{
+ unsigned int i, evt_cnt, field_cnt;
+ struct bt_ctf_event_decl *const * evt_list;
+ const struct bt_ctf_field_decl *const * field_list;
+ int tid_check = 0;
+ int pid_check = 0;
+ int procname_check = 0;
+ int ppid_check = 0;
+ int ret = 0;
+
+ bt_ctf_get_event_decl_list(0, ctx, &evt_list, &evt_cnt);
+ for (i = 0; i < evt_cnt; i++) {
+ bt_ctf_get_decl_fields(evt_list[i], BT_STREAM_EVENT_CONTEXT,
+ &field_list, &field_cnt);
+ ret = check_field_requirements(field_list, field_cnt,
+ &tid_check, &pid_check, &procname_check,
+ &ppid_check);
+
+ 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);
+
+ 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 (tid_check == 0) {
+ ret = -1;
+ fprintf(stderr, "[error] missing tid context information\n");
+ }
+ if (pid_check == 0) {
+ ret = -1;
+ fprintf(stderr, "[error] missing pid context information\n");
+ }
+ if (ppid_check == 0) {
+ ret = -1;
+ fprintf(stderr, "[error] missing ppid context information\n");
+ }
+ if (procname_check == 0) {
+ ret = -1;
+ fprintf(stderr, "[error] missing procname context information\n");
+ }
+
+ return ret;
+}
+
+void dump_snapshot()
+{
+#if 0
+ struct lttng_consumer_stream *iter;
+ unsigned long spos;
+ struct mmap_stream *new_snapshot;
+
+ int ret = 0;
+ int i;
+ /*
+ * try lock mutex ressource courante (overrun)
+ * if fail : overrun
+ * stop trace (flush implicite avant stop)
+ * lttng_consumer_take_snapshot
+ * read timestamp packet end (use time as end pos)
+ * - stream_packet_context
+ * - reculer de 1 subbuf : pos - max_subbuff_size
+ *
+ * - position de fin (take_snapshot)
+ * - mov_pos_slow ( fin - max_subbuff_size) lire timestamp packet end
+ * - prend min(end) (activité sur tous les streams)
+ *
+ * start trace
+ * unlock mutex
+ */
+
+ helper_kernctl_buffer_flush(consumerd_metadata);
+ for (i = 0; i < lttng_consumer_stream_array->len; i++) {
+ iter = g_ptr_array_index(lttng_consumer_stream_array, i);
+ helper_kernctl_buffer_flush(helper_get_lttng_consumer_stream_wait_fd(iter));
+ printf("Taking snapshot of fd : %d\n", helper_get_lttng_consumer_stream_wait_fd(iter));
+ ret = helper_lttng_consumer_take_snapshot(ctx, iter);
+ if (ret != 0) {
+ ret = errno;
+ perror("lttng_consumer_take_snapshots");
+ goto end;
+ }
+ }
+ for (i = 0; i < lttng_consumer_stream_array->len; i++) {
+ iter = g_ptr_array_index(lttng_consumer_stream_array, i);
+ ret = helper_lttng_consumer_get_produced_snapshot(ctx, iter, &spos);
+ if (ret != 0) {
+ ret = errno;
+ perror("helper_lttng_consumer_get_produced_snapshot");
+ goto end;
+ }
+ while (helper_get_lttng_consumer_stream_wait_last_pos(iter) < spos) {
+ new_snapshot = g_new0(struct mmap_stream, 1);
+ new_snapshot->fd = helper_get_lttng_consumer_stream_wait_fd(iter);
+ new_snapshot->last_pos = helper_get_lttng_consumer_stream_wait_last_pos(iter);
+ fprintf(stderr,"ADDING AVAILABLE SNAPSHOT ON FD %d AT POSITION %lu\n",
+ new_snapshot->fd,
+ new_snapshot->last_pos);
+ g_ptr_array_add(available_snapshots, new_snapshot);
+ helper_set_lttng_consumer_stream_wait_last_pos(iter,
+ helper_get_lttng_consumer_stream_wait_last_pos(iter) +
+ helper_get_lttng_consumer_stream_chan_max_sb_size(iter));
+ }
+ }
+
+ if (!metadata_ready) {
+ fprintf(stderr, "BLOCKING BEFORE METADATA\n");
+ sem_wait(&metadata_available);
+ fprintf(stderr,"OPENING TRACE\n");
+ if (access("/tmp/livesession/kernel/metadata", F_OK) != 0) {
+ fprintf(stderr,"NO METADATA FILE, SKIPPING\n");
+ return;
+ }
+ metadata_ready = 1;
+ metadata_fp = fopen("/tmp/livesession/kernel/metadata", "r");
+ }
+
+
+end:
+ return;
+#endif
+}
+
+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;
+
+ /* 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);
+
+ 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 = 0;
+ } 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;
+}
+
+void *live_consume()
+{
+ struct bt_context *bt_ctx = NULL;
+ int ret;
+
+ while (1) {
+// dump_snapshot();
+
+ if (!metadata_ready) {
+ fprintf(stderr, "BLOCKING BEFORE METADATA\n");
+ sem_wait(&metadata_available);
+ fprintf(stderr,"OPENING TRACE\n");
+ if (access("/tmp/livesession/kernel/metadata", F_OK) != 0) {
+ fprintf(stderr,"NO METADATA FILE, SKIPPING\n");
+ return;
+ }
+ metadata_ready = 1;
+ metadata_fp = fopen("/tmp/livesession/kernel/metadata", "r");
+ }
+
+ if (!trace_opened) {
+ bt_ctx = bt_context_create();
+ ret = bt_context_add_trace(bt_ctx, NULL, "ctf",
+ lttngtop_ctf_packet_seek, &mmap_list, metadata_fp);
+ trace_opened = 1;
+ }
+ iter_trace(bt_ctx);
+ sleep(1);
+ }
+}
+
+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 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,
+ (void *) ctx);
+ if (ret != 0) {
+ perror("pthread_create poll fd");
+ goto end;
+ }
+
+end:
+ return ret;
+}
+
+void *setup_live_tracing()
+{
+ struct lttng_domain dom;
+ struct lttng_channel chan;
+ char *channel_name = "mmapchan";
+ 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;
+
+ 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 = 0;
+ 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);
+
+ /* Create thread to manage the polling/writing of traces */
+ ret = pthread_create(&thread_live_consume, NULL, live_consume, NULL);
+ if (ret != 0) {
+ perror("pthread_create");
+ goto end;
+ }
+
+// pthread_cancel(live_trace_thread);
+
+ /* block until metadata is ready */
+ sem_init(&metadata_available, 0, 0);
+
+ //init_lttngtop();
+
+end:
+ return ret;
+}
+