projects / lttng-tools.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Refactoring: introduce lttng_tracker_ids data structure
[lttng-tools.git] / src / bin / lttng / commands / list.c
CommitLineData
f3ed775e
DG		 1/*
2 * Copyright (C) 2011 - David Goulet <david.goulet@polymtl.ca>
3 *
d14d33bf
AM		 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 only,
6 * as published by the Free Software Foundation.
f3ed775e
DG		 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 *
d14d33bf
AM		 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.
f3ed775e
DG		 16 */
17
6c1c0768 18#define _LGPL_SOURCE
9f19cc17 19#include <inttypes.h>
f3ed775e
DG		 20#include <popt.h>
21#include <stdio.h>
22#include <stdlib.h>
23#include <string.h>
7a3d1328 24#include <assert.h>
f3ed775e 25
fb14d0d8 26#include <common/mi-lttng.h>
5b89fc92 27#include <common/time.h>
fae9a062 28#include <lttng/constant.h>
2d97a006 29#include <lttng/tracker.h>
fb14d0d8 30
c399183f 31#include "../command.h"
f3ed775e 32
9f19cc17
DG		 33static int opt_userspace;
34static int opt_kernel;
3c6a091f 35static int opt_jul;
5cdb6027 36static int opt_log4j;
0e115563 37static int opt_python;
9f19cc17
DG		 38static char *opt_channel;
39static int opt_domain;
f37d259d 40static int opt_fields;
834978fd 41static int opt_syscall;
9f19cc17
DG		 42
43const char *indent4 = " ";
44const char *indent6 = " ";
45const char *indent8 = " ";
f3ed775e 46
4fc83d94
PP		 47#ifdef LTTNG_EMBED_HELP
48static const char help_msg[] =
49#include <lttng-list.1.h>
50;
51#endif
52
f3ed775e
DG		 53enum {
54 OPT_HELP = 1,
eeac7d46 55 OPT_USERSPACE,
679b4943 56 OPT_LIST_OPTIONS,
f3ed775e
DG		 57};
58
cd80958d 59static struct lttng_handle *handle;
fb14d0d8 60static struct mi_writer *writer;
cd80958d 61
e50e81d3
JG		 62/* Only set when listing a single session. */
63static struct lttng_session listed_session;
64
f3ed775e
DG		 65static struct poptOption long_options[] = {
66 /* longName, shortName, argInfo, argPtr, value, descrip, argDesc */
2fa605f7
JG		 67 {"help", 'h', POPT_ARG_NONE, 0, OPT_HELP, 0, 0},
68 {"kernel", 'k', POPT_ARG_VAL, &opt_kernel, 1, 0, 0},
69 {"jul", 'j', POPT_ARG_VAL, &opt_jul, 1, 0, 0},
70 {"log4j", 'l', POPT_ARG_VAL, &opt_log4j, 1, 0, 0},
71 {"python", 'p', POPT_ARG_VAL, &opt_python, 1, 0, 0},
72 {"userspace", 'u', POPT_ARG_NONE, 0, OPT_USERSPACE, 0, 0},
73 {"channel", 'c', POPT_ARG_STRING, &opt_channel, 0, 0, 0},
74 {"domain", 'd', POPT_ARG_VAL, &opt_domain, 1, 0, 0},
75 {"fields", 'f', POPT_ARG_VAL, &opt_fields, 1, 0, 0},
76 {"syscall", 'S', POPT_ARG_VAL, &opt_syscall, 1, 0, 0},
679b4943 77 {"list-options", 0, POPT_ARG_NONE, NULL, OPT_LIST_OPTIONS, NULL, NULL},
f3ed775e
DG		 78 {0, 0, 0, 0, 0, 0, 0}
79};
80
f3ed775e 81/*
9f19cc17 82 * Get command line from /proc for a specific pid.
f3ed775e 83 *
9f19cc17
DG		 84 * On success, return an allocated string pointer to the proc cmdline.
85 * On error, return NULL.
f3ed775e
DG		 86 */
87static char *get_cmdline_by_pid(pid_t pid)
88{
89 int ret;
1ad31aec 90 FILE *fp = NULL;
f3ed775e 91 char *cmdline = NULL;
fae9a062
JG		 92 /* Can't go bigger than /proc/LTTNG_MAX_PID/cmdline */
93 char path[sizeof("/proc//cmdline") + sizeof(LTTNG_MAX_PID_STR) - 1];
f3ed775e
DG		 94
95 snprintf(path, sizeof(path), "/proc/%d/cmdline", pid);
96 fp = fopen(path, "r");
97 if (fp == NULL) {
98 goto end;
99 }
100
101 /* Caller must free() *cmdline */
63a2c1bd 102 cmdline = zmalloc(PATH_MAX);
f6962219 103 if (!cmdline) {
6f04ed72 104 PERROR("malloc cmdline");
f6962219
JG		 105 goto end;
106 }
f3ed775e 107 ret = fread(cmdline, 1, PATH_MAX, fp);
f40799e8 108 if (ret < 0) {
6f04ed72 109 PERROR("fread proc list");
f40799e8 110 }
f3ed775e
DG		 111
112end:
1ad31aec
DG		 113 if (fp) {
114 fclose(fp);
115 }
f3ed775e
DG		 116 return cmdline;
117}
b551a063 118
464dd62d
MD		 119static
120const char *active_string(int value)
121{
122 switch (value) {
2cbf8fed
DG		 123 case 0: return "inactive";
124 case 1: return "active";
464dd62d
MD		 125 case -1: return "";
126 default: return NULL;
127 }
128}
129
2cbf8fed
DG		 130static const char *snapshot_string(int value)
131{
132 switch (value) {
133 case 1:
134 return " snapshot";
135 default:
136 return "";
137 }
138}
139
464dd62d
MD		 140static
141const char *enabled_string(int value)
142{
143 switch (value) {
b09f0429
MD		 144 case 0: return " [disabled]";
145 case 1: return " [enabled]";
464dd62d
MD		 146 case -1: return "";
147 default: return NULL;
148 }
149}
150
fceb65df 151static
7b4a95b1 152const char *safe_string(const char *str)
fceb65df 153{
7b4a95b1 154 return str ? str : "";
4634f12e
JI		 155}
156
1f0e17de
DG		 157static const char *logleveltype_string(enum lttng_loglevel_type value)
158{
159 switch (value) {
af6bce80
DG		 160 case LTTNG_EVENT_LOGLEVEL_ALL:
161 return ":";
1f0e17de 162 case LTTNG_EVENT_LOGLEVEL_RANGE:
af6bce80 163 return " <=";
1f0e17de 164 case LTTNG_EVENT_LOGLEVEL_SINGLE:
af6bce80 165 return " ==";
1f0e17de 166 default:
af6bce80 167 return " <<TYPE UNKN>>";
1f0e17de
DG		 168 }
169}
170
834978fd
DG		 171static const char *bitness_event(enum lttng_event_flag flags)
172{
173 if (flags & LTTNG_EVENT_FLAG_SYSCALL_32) {
174 if (flags & LTTNG_EVENT_FLAG_SYSCALL_64) {
175 return " [32/64-bit]";
176 } else {
177 return " [32-bit]";
178 }
179 } else if (flags & LTTNG_EVENT_FLAG_SYSCALL_64) {
180 return " [64-bit]";
181 } else {
182 return "";
183 }
184}
185
7b4a95b1
PP		 186/*
187 * Get exclusion names message for a single event.
188 *
189 * Returned pointer must be freed by caller. Returns NULL on error.
190 */
191static char *get_exclusion_names_msg(struct lttng_event *event)
192{
193 int ret;
194 int exclusion_count;
195 char *exclusion_msg = NULL;
196 char *at;
7b4a95b1
PP		 197 size_t i;
198 const char * const exclusion_fmt = " [exclusions: ";
19ed7632 199 const size_t exclusion_fmt_len = strlen(exclusion_fmt);
7b4a95b1
PP		 200
201 exclusion_count = lttng_event_get_exclusion_name_count(event);
202 if (exclusion_count < 0) {
203 goto end;
204 } else if (exclusion_count == 0) {
205 /*
206 * No exclusions: return copy of empty string so that
207 * it can be freed by caller.
208 */
209 exclusion_msg = strdup("");
210 goto end;
211 }
212
213 /*
214 * exclusion_msg's size is bounded by the exclusion_fmt string,
215 * a comma per entry, the entry count (fixed-size), a closing
216 * bracket, and a trailing \0.
217 */
218 exclusion_msg = malloc(exclusion_count +
219 exclusion_count * LTTNG_SYMBOL_NAME_LEN +
19ed7632 220 exclusion_fmt_len + 1);
7b4a95b1
PP		 221 if (!exclusion_msg) {
222 goto end;
223 }
224
19ed7632 225 at = strcpy(exclusion_msg, exclusion_fmt) + exclusion_fmt_len;
7b4a95b1
PP		 226 for (i = 0; i < exclusion_count; ++i) {
227 const char *name;
228
229 /* Append comma between exclusion names */
230 if (i > 0) {
231 *at = ',';
232 at++;
233 }
234
235 ret = lttng_event_get_exclusion_name(event, i, &name);
236 if (ret) {
237 /* Prints '?' on local error; should never happen */
238 *at = '?';
239 at++;
240 continue;
241 }
242
243 /* Append exclusion name */
31e40170 244 at += sprintf(at, "%s", name);
7b4a95b1
PP		 245 }
246
247 /* This also puts a final '\0' at the end of exclusion_msg */
19ed7632 248 strcpy(at, "]");
7b4a95b1
PP		 249
250end:
251 return exclusion_msg;
252}
253
b955b4d4
FD		 254static void print_userspace_probe_location(struct lttng_event *event)
255{
87597c2c
JG		 256 const struct lttng_userspace_probe_location *location;
257 const struct lttng_userspace_probe_location_lookup_method *lookup_method;
b955b4d4
FD		 258 enum lttng_userspace_probe_location_lookup_method_type lookup_type;
259
260 location = lttng_event_get_userspace_probe_location(event);
261 if (!location) {
262 MSG("Event has no userspace probe location");
263 return;
264 }
265
266 lookup_method = lttng_userspace_probe_location_get_lookup_method(location);
267 if (!lookup_method) {
268 MSG("Event has no userspace probe location lookup method");
269 return;
270 }
271
272 MSG("%s%s (type: userspace-probe)%s", indent6, event->name, enabled_string(event->enabled));
273
274 lookup_type = lttng_userspace_probe_location_lookup_method_get_type(lookup_method);
275
276 switch (lttng_userspace_probe_location_get_type(location)) {
277 case LTTNG_USERSPACE_PROBE_LOCATION_TYPE_UNKNOWN:
278 MSG("%sType: Unknown", indent8);
279 break;
280 case LTTNG_USERSPACE_PROBE_LOCATION_TYPE_FUNCTION:
281 {
282 const char *function_name;
283 const char *binary_path;
284
285 MSG("%sType: Function", indent8);
286 function_name = lttng_userspace_probe_location_function_get_function_name(location);
287 binary_path = realpath(lttng_userspace_probe_location_function_get_binary_path(location), NULL);
288
289 MSG("%sBinary path: %s", indent8, binary_path ? binary_path : "NULL");
290 MSG("%sFunction: %s()", indent8, function_name ? function_name : "NULL");
291 switch (lookup_type) {
292 case LTTNG_USERSPACE_PROBE_LOCATION_LOOKUP_METHOD_TYPE_FUNCTION_ELF:
293 MSG("%sLookup method: ELF", indent8);
294 break;
295 case LTTNG_USERSPACE_PROBE_LOCATION_LOOKUP_METHOD_TYPE_FUNCTION_DEFAULT:
296 MSG("%sLookup method: default", indent8);
297 break;
298 default:
299 MSG("%sLookup method: INVALID LOOKUP TYPE ENCOUNTERED", indent8);
300 break;
301 }
302 break;
303 }
304 case LTTNG_USERSPACE_PROBE_LOCATION_TYPE_TRACEPOINT:
305 {
306 const char *probe_name, *provider_name;
307 const char *binary_path;
308
309 MSG("%sType: Tracepoint", indent8);
310 probe_name = lttng_userspace_probe_location_tracepoint_get_probe_name(location);
311 provider_name = lttng_userspace_probe_location_tracepoint_get_provider_name(location);
312 binary_path = realpath(lttng_userspace_probe_location_tracepoint_get_binary_path(location), NULL);
313 MSG("%sBinary path: %s", indent8, binary_path ? binary_path : "NULL");
314 MSG("%sTracepoint: %s:%s", indent8, provider_name ? provider_name : "NULL", probe_name ? probe_name : "NULL");
315 switch (lookup_type) {
316 case LTTNG_USERSPACE_PROBE_LOCATION_LOOKUP_METHOD_TYPE_TRACEPOINT_SDT:
317 MSG("%sLookup method: SDT", indent8);
318 break;
319 default:
320 MSG("%sLookup method: INVALID LOOKUP TYPE ENCOUNTERED", indent8);
321 break;
322 }
323 break;
324 }
325 default:
326 ERR("Invalid probe type encountered");
327 }
328}
329
b551a063
DG		 330/*
331 * Pretty print single event.
332 */
333static void print_events(struct lttng_event *event)
334{
4adbcc72
PP		 335 int ret;
336 const char *filter_str;
337 char *filter_msg = NULL;
7b4a95b1 338 char *exclusion_msg = NULL;
4adbcc72 339
134e72ed 340 ret = lttng_event_get_filter_expression(event, &filter_str);
4adbcc72
PP		 341
342 if (ret) {
343 filter_msg = strdup(" [failed to retrieve filter]");
344 } else if (filter_str) {
345 const char * const filter_fmt = " [filter: '%s']";
346
347 filter_msg = malloc(strlen(filter_str) +
348 strlen(filter_fmt) + 1);
349 if (filter_msg) {
350 sprintf(filter_msg, filter_fmt,
351 filter_str);
352 }
353 }
354
7b4a95b1
PP		 355 exclusion_msg = get_exclusion_names_msg(event);
356 if (!exclusion_msg) {
357 exclusion_msg = strdup(" [failed to retrieve exclusions]");
358 }
359
b551a063
DG		 360 switch (event->type) {
361 case LTTNG_EVENT_TRACEPOINT:
e4baff1e 362 {
8b703175 363 if (event->loglevel != -1) {
af6bce80 364 MSG("%s%s (loglevel%s %s (%d)) (type: tracepoint)%s%s%s",
8b703175 365 indent6,
81afa345 366 event->name,
1f0e17de 367 logleveltype_string(event->loglevel_type),
970d848b 368 mi_lttng_loglevel_string(event->loglevel, handle->domain.type),
8b703175 369 event->loglevel,
fceb65df 370 enabled_string(event->enabled),
7b4a95b1
PP		 371 safe_string(exclusion_msg),
372 safe_string(filter_msg));
8b703175 373 } else {
4634f12e 374 MSG("%s%s (type: tracepoint)%s%s%s",
8b703175
MD		 375 indent6,
376 event->name,
fceb65df 377 enabled_string(event->enabled),
7b4a95b1
PP		 378 safe_string(exclusion_msg),
379 safe_string(filter_msg));
8b703175 380 }
b551a063 381 break;
e4baff1e 382 }
1896972b
DG		 383 case LTTNG_EVENT_FUNCTION:
384 MSG("%s%s (type: function)%s%s", indent6,
385 event->name, enabled_string(event->enabled),
7b4a95b1 386 safe_string(filter_msg));
1896972b
DG		 387 if (event->attr.probe.addr != 0) {
388 MSG("%saddr: 0x%" PRIx64, indent8, event->attr.probe.addr);
389 } else {
390 MSG("%soffset: 0x%" PRIx64, indent8, event->attr.probe.offset);
391 MSG("%ssymbol: %s", indent8, event->attr.probe.symbol_name);
392 }
393 break;
b551a063 394 case LTTNG_EVENT_PROBE:
fceb65df
MD		 395 MSG("%s%s (type: probe)%s%s", indent6,
396 event->name, enabled_string(event->enabled),
7b4a95b1 397 safe_string(filter_msg));
b551a063
DG		 398 if (event->attr.probe.addr != 0) {
399 MSG("%saddr: 0x%" PRIx64, indent8, event->attr.probe.addr);
400 } else {
401 MSG("%soffset: 0x%" PRIx64, indent8, event->attr.probe.offset);
402 MSG("%ssymbol: %s", indent8, event->attr.probe.symbol_name);
403 }
404 break;
b955b4d4
FD		 405 case LTTNG_EVENT_USERSPACE_PROBE:
406 print_userspace_probe_location(event);
407 break;
b551a063 408 case LTTNG_EVENT_FUNCTION_ENTRY:
fceb65df
MD		 409 MSG("%s%s (type: function)%s%s", indent6,
410 event->name, enabled_string(event->enabled),
7b4a95b1 411 safe_string(filter_msg));
b551a063
DG		 412 MSG("%ssymbol: \"%s\"", indent8, event->attr.ftrace.symbol_name);
413 break;
414 case LTTNG_EVENT_SYSCALL:
2199ad66 415 MSG("%s%s%s%s%s%s", indent6, event->name,
834978fd 416 (opt_syscall ? "" : " (type:syscall)"),
fceb65df 417 enabled_string(event->enabled),
2199ad66
JG		 418 bitness_event(event->flags),
419 safe_string(filter_msg));
b551a063
DG		 420 break;
421 case LTTNG_EVENT_NOOP:
fceb65df
MD		 422 MSG("%s (type: noop)%s%s", indent6,
423 enabled_string(event->enabled),
7b4a95b1 424 safe_string(filter_msg));
b551a063
DG		 425 break;
426 case LTTNG_EVENT_ALL:
410b78a0
FD		 427 /* Fall-through. */
428 default:
b551a063
DG		 429 /* We should never have "all" events in list. */
430 assert(0);
431 break;
432 }
4adbcc72
PP		 433
434 free(filter_msg);
7b4a95b1 435 free(exclusion_msg);
b551a063
DG		 436}
437
f37d259d
MD		 438static const char *field_type(struct lttng_event_field *field)
439{
440 switch(field->type) {
441 case LTTNG_EVENT_FIELD_INTEGER:
442 return "integer";
443 case LTTNG_EVENT_FIELD_ENUM:
444 return "enum";
445 case LTTNG_EVENT_FIELD_FLOAT:
446 return "float";
447 case LTTNG_EVENT_FIELD_STRING:
448 return "string";
449 case LTTNG_EVENT_FIELD_OTHER:
450 default: /* fall-through */
451 return "unknown";
452 }
453}
454
455/*
456 * Pretty print single event fields.
457 */
458static void print_event_field(struct lttng_event_field *field)
459{
460 if (!field->field_name[0]) {
461 return;
462 }
d8fbe2a9 463 MSG("%sfield: %s (%s)%s", indent8, field->field_name,
45a32634 464 field_type(field), field->nowrite ? " [no write]" : "");
f37d259d
MD		 465}
466
fb14d0d8
JR		 467/*
468 * Machine interface
469 * Jul and ust event listing
470 */
5cdb6027 471static int mi_list_agent_ust_events(struct lttng_event *events, int count,
fb14d0d8
JR		 472 struct lttng_domain *domain)
473{
474 int ret, i;
475 pid_t cur_pid = 0;
476 char *cmdline = NULL;
477 int pid_element_open = 0;
478
479 /* Open domains element */
480 ret = mi_lttng_domains_open(writer);
481 if (ret) {
482 goto end;
483 }
484
485 /* Write domain */
486 ret = mi_lttng_domain(writer, domain, 1);
487 if (ret) {
488 goto end;
489 }
490
bf239d4c
JR		 491 /* Open pids element element */
492 ret = mi_lttng_pids_open(writer);
fb14d0d8
JR		 493 if (ret) {
494 goto end;
495 }
496
497 for (i = 0; i < count; i++) {
498 if (cur_pid != events[i].pid) {
499 if (pid_element_open) {
2e9aecb9 500 /* Close the previous events and pid element */
fb14d0d8
JR		 501 ret = mi_lttng_close_multi_element(writer, 2);
502 if (ret) {
503 goto end;
504 }
505 pid_element_open = 0;
506 }
507
508 cur_pid = events[i].pid;
509 cmdline = get_cmdline_by_pid(cur_pid);
510 if (!cmdline) {
511 ret = CMD_ERROR;
512 goto end;
513 }
514
515 if (!pid_element_open) {
516 /* Open and write a pid element */
bf239d4c 517 ret = mi_lttng_pid(writer, cur_pid, cmdline, 1);
fb14d0d8
JR		 518 if (ret) {
519 goto error;
520 }
521
522 /* Open events element */
523 ret = mi_lttng_events_open(writer);
524 if (ret) {
525 goto error;
526 }
527
528 pid_element_open = 1;
529 }
530 free(cmdline);
531 }
532
533 /* Write an event */
970d848b 534 ret = mi_lttng_event(writer, &events[i], 0, handle->domain.type);
fb14d0d8
JR		 535 if (ret) {
536 goto end;
537 }
538 }
539
bf239d4c 540 /* Close pids */
fb14d0d8
JR		 541 ret = mi_lttng_writer_close_element(writer);
542 if (ret) {
543 goto end;
544 }
545
546 /* Close domain, domains */
547 ret = mi_lttng_close_multi_element(writer, 2);
548end:
549 return ret;
550error:
551 free(cmdline);
552 return ret;
553}
554
5cdb6027 555static int list_agent_events(void)
3c6a091f 556{
fb14d0d8 557 int i, size, ret = CMD_SUCCESS;
3c6a091f 558 struct lttng_domain domain;
26c610c9 559 struct lttng_handle *handle = NULL;
469b972b 560 struct lttng_event *event_list = NULL;
3c6a091f
DG		 561 pid_t cur_pid = 0;
562 char *cmdline = NULL;
5cdb6027 563 const char *agent_domain_str;
3c6a091f
DG		 564
565 memset(&domain, 0, sizeof(domain));
5cdb6027
DG		 566 if (opt_jul) {
567 domain.type = LTTNG_DOMAIN_JUL;
568 } else if (opt_log4j) {
569 domain.type = LTTNG_DOMAIN_LOG4J;
0e115563
DG		 570 } else if (opt_python) {
571 domain.type = LTTNG_DOMAIN_PYTHON;
26c610c9
JG		 572 } else {
573 ERR("Invalid agent domain selected.");
574 ret = CMD_ERROR;
575 goto error;
5cdb6027
DG		 576 }
577
578 agent_domain_str = get_domain_str(domain.type);
579
580 DBG("Getting %s tracing events", agent_domain_str);
3c6a091f
DG		 581
582 handle = lttng_create_handle(NULL, &domain);
583 if (handle == NULL) {
fb14d0d8
JR		 584 ret = CMD_ERROR;
585 goto end;
3c6a091f
DG		 586 }
587
588 size = lttng_list_tracepoints(handle, &event_list);
589 if (size < 0) {
5cdb6027
DG		 590 ERR("Unable to list %s events: %s", agent_domain_str,
591 lttng_strerror(size));
fb14d0d8
JR		 592 ret = CMD_ERROR;
593 goto end;
3c6a091f
DG		 594 }
595
fb14d0d8
JR		 596 if (lttng_opt_mi) {
597 /* Mi print */
5cdb6027 598 ret = mi_list_agent_ust_events(event_list, size, &domain);
fb14d0d8
JR		 599 if (ret) {
600 ret = CMD_ERROR;
601 goto error;
3c6a091f 602 }
fb14d0d8
JR		 603 } else {
604 /* Pretty print */
5cdb6027
DG		 605 MSG("%s events (Logger name):\n-------------------------",
606 agent_domain_str);
3c6a091f 607
fb14d0d8
JR		 608 if (size == 0) {
609 MSG("None");
610 }
3c6a091f 611
fb14d0d8
JR		 612 for (i = 0; i < size; i++) {
613 if (cur_pid != event_list[i].pid) {
614 cur_pid = event_list[i].pid;
615 cmdline = get_cmdline_by_pid(cur_pid);
616 if (cmdline == NULL) {
617 ret = CMD_ERROR;
618 goto error;
619 }
620 MSG("\nPID: %d - Name: %s", cur_pid, cmdline);
621 free(cmdline);
622 }
623 MSG("%s- %s", indent6, event_list[i].name);
624 }
3c6a091f 625
fb14d0d8
JR		 626 MSG("");
627 }
3c6a091f
DG		 628
629error:
fb14d0d8
JR		 630 free(event_list);
631end:
3c6a091f 632 lttng_destroy_handle(handle);
fb14d0d8 633 return ret;
3c6a091f
DG		 634}
635
b551a063
DG		 636/*
637 * Ask session daemon for all user space tracepoints available.
638 */
639static int list_ust_events(void)
640{
fb14d0d8 641 int i, size, ret = CMD_SUCCESS;
b551a063
DG		 642 struct lttng_domain domain;
643 struct lttng_handle *handle;
bec97646 644 struct lttng_event *event_list = NULL;
b551a063 645 pid_t cur_pid = 0;
ea5cbc00 646 char *cmdline = NULL;
b551a063 647
441c16a7
MD		 648 memset(&domain, 0, sizeof(domain));
649
b551a063
DG		 650 DBG("Getting UST tracing events");
651
652 domain.type = LTTNG_DOMAIN_UST;
653
654 handle = lttng_create_handle(NULL, &domain);
655 if (handle == NULL) {
fb14d0d8
JR		 656 ret = CMD_ERROR;
657 goto end;
b551a063
DG		 658 }
659
660 size = lttng_list_tracepoints(handle, &event_list);
661 if (size < 0) {
60e835ca 662 ERR("Unable to list UST events: %s", lttng_strerror(size));
fb14d0d8
JR		 663 ret = CMD_ERROR;
664 goto error;
b551a063
DG		 665 }
666
fb14d0d8
JR		 667 if (lttng_opt_mi) {
668 /* Mi print */
5cdb6027 669 ret = mi_list_agent_ust_events(event_list, size, &domain);
fb14d0d8
JR		 670 } else {
671 /* Pretty print */
672 MSG("UST events:\n-------------");
673
674 if (size == 0) {
675 MSG("None");
676 }
677
678 for (i = 0; i < size; i++) {
679 if (cur_pid != event_list[i].pid) {
680 cur_pid = event_list[i].pid;
681 cmdline = get_cmdline_by_pid(cur_pid);
682 if (cmdline == NULL) {
683 ret = CMD_ERROR;
684 goto error;
685 }
686 MSG("\nPID: %d - Name: %s", cur_pid, cmdline);
687 free(cmdline);
688 }
689 print_events(&event_list[i]);
690 }
b551a063 691
fb14d0d8 692 MSG("");
b551a063
DG		 693 }
694
fb14d0d8
JR		 695error:
696 free(event_list);
697end:
698 lttng_destroy_handle(handle);
699 return ret;
700}
701
702/*
703 * Machine interface
704 * List all ust event with their fields
705 */
706static int mi_list_ust_event_fields(struct lttng_event_field *fields, int count,
707 struct lttng_domain *domain)
708{
709 int ret, i;
710 pid_t cur_pid = 0;
711 char *cmdline = NULL;
712 int pid_element_open = 0;
713 int event_element_open = 0;
714 struct lttng_event cur_event;
715
d113fbc8
JR		 716 memset(&cur_event, 0, sizeof(cur_event));
717
fb14d0d8
JR		 718 /* Open domains element */
719 ret = mi_lttng_domains_open(writer);
720 if (ret) {
721 goto end;
722 }
723
724 /* Write domain */
725 ret = mi_lttng_domain(writer, domain, 1);
726 if (ret) {
727 goto end;
728 }
729
bf239d4c
JR		 730 /* Open pids element */
731 ret = mi_lttng_pids_open(writer);
fb14d0d8
JR		 732 if (ret) {
733 goto end;
734 }
735
736 for (i = 0; i < count; i++) {
737 if (cur_pid != fields[i].event.pid) {
738 if (pid_element_open) {
739 if (event_element_open) {
485ca16f 740 /* Close the previous field element and event. */
fb14d0d8
JR		 741 ret = mi_lttng_close_multi_element(writer, 2);
742 if (ret) {
743 goto end;
744 }
745 event_element_open = 0;
746 }
747 /* Close the previous events, pid element */
748 ret = mi_lttng_close_multi_element(writer, 2);
749 if (ret) {
750 goto end;
751 }
752 pid_element_open = 0;
753 }
754
755 cur_pid = fields[i].event.pid;
ea5cbc00 756 cmdline = get_cmdline_by_pid(cur_pid);
fb14d0d8 757 if (!pid_element_open) {
bf239d4c
JR		 758 /* Open and write a pid element */
759 ret = mi_lttng_pid(writer, cur_pid, cmdline, 1);
fb14d0d8
JR		 760 if (ret) {
761 goto error;
762 }
763
764 /* Open events element */
765 ret = mi_lttng_events_open(writer);
766 if (ret) {
767 goto error;
768 }
769 pid_element_open = 1;
770 }
ea5cbc00 771 free(cmdline);
fb14d0d8
JR		 772 /* Wipe current event since we are about to print a new PID. */
773 memset(&cur_event, 0, sizeof(cur_event));
b551a063 774 }
b551a063 775
fb14d0d8
JR		 776 if (strcmp(cur_event.name, fields[i].event.name) != 0) {
777 if (event_element_open) {
778 /* Close the previous fields element and the previous event */
779 ret = mi_lttng_close_multi_element(writer, 2);
780 if (ret) {
781 goto end;
782 }
783 event_element_open = 0;
784 }
785
786 memcpy(&cur_event, &fields[i].event,
787 sizeof(cur_event));
b551a063 788
fb14d0d8
JR		 789 if (!event_element_open) {
790 /* Open and write the event */
970d848b
DG		 791 ret = mi_lttng_event(writer, &cur_event, 1,
792 handle->domain.type);
fb14d0d8
JR		 793 if (ret) {
794 goto end;
795 }
796
797 /* Open a fields element */
798 ret = mi_lttng_event_fields_open(writer);
799 if (ret) {
800 goto end;
801 }
802 event_element_open = 1;
803 }
804 }
b551a063 805
fb14d0d8
JR		 806 /* Print the event_field */
807 ret = mi_lttng_event_field(writer, &fields[i]);
808 if (ret) {
809 goto end;
810 }
811 }
b551a063 812
83d6d6c4 813 /* Close pids, domain, domains */
fb14d0d8
JR		 814 ret = mi_lttng_close_multi_element(writer, 3);
815end:
816 return ret;
b551a063 817error:
fb14d0d8
JR		 818 free(cmdline);
819 return ret;
b551a063 820}
f3ed775e 821
f37d259d
MD		 822/*
823 * Ask session daemon for all user space tracepoint fields available.
824 */
825static int list_ust_event_fields(void)
826{
fb14d0d8 827 int i, size, ret = CMD_SUCCESS;
f37d259d
MD		 828 struct lttng_domain domain;
829 struct lttng_handle *handle;
830 struct lttng_event_field *event_field_list;
831 pid_t cur_pid = 0;
ea5cbc00
CB		 832 char *cmdline = NULL;
833
f37d259d
MD		 834 struct lttng_event cur_event;
835
836 memset(&domain, 0, sizeof(domain));
837 memset(&cur_event, 0, sizeof(cur_event));
838
839 DBG("Getting UST tracing event fields");
840
841 domain.type = LTTNG_DOMAIN_UST;
842
843 handle = lttng_create_handle(NULL, &domain);
844 if (handle == NULL) {
fb14d0d8
JR		 845 ret = CMD_ERROR;
846 goto end;
f37d259d
MD		 847 }
848
849 size = lttng_list_tracepoint_fields(handle, &event_field_list);
850 if (size < 0) {
60e835ca 851 ERR("Unable to list UST event fields: %s", lttng_strerror(size));
fb14d0d8
JR		 852 ret = CMD_ERROR;
853 goto end;
f37d259d
MD		 854 }
855
fb14d0d8
JR		 856 if (lttng_opt_mi) {
857 /* Mi print */
858 ret = mi_list_ust_event_fields(event_field_list, size, &domain);
859 if (ret) {
860 ret = CMD_ERROR;
861 goto error;
862 }
863 } else {
864 /* Pretty print */
865 MSG("UST events:\n-------------");
f37d259d 866
fb14d0d8
JR		 867 if (size == 0) {
868 MSG("None");
f37d259d 869 }
fb14d0d8
JR		 870
871 for (i = 0; i < size; i++) {
872 if (cur_pid != event_field_list[i].event.pid) {
873 cur_pid = event_field_list[i].event.pid;
874 cmdline = get_cmdline_by_pid(cur_pid);
875 if (cmdline == NULL) {
876 ret = CMD_ERROR;
877 goto error;
878 }
879 MSG("\nPID: %d - Name: %s", cur_pid, cmdline);
880 free(cmdline);
881 /* Wipe current event since we are about to print a new PID. */
882 memset(&cur_event, 0, sizeof(cur_event));
883 }
884 if (strcmp(cur_event.name, event_field_list[i].event.name) != 0) {
885 print_events(&event_field_list[i].event);
886 memcpy(&cur_event, &event_field_list[i].event,
887 sizeof(cur_event));
888 }
889 print_event_field(&event_field_list[i]);
f37d259d 890 }
f37d259d 891
fb14d0d8
JR		 892 MSG("");
893 }
f37d259d 894
fb14d0d8 895error:
f37d259d 896 free(event_field_list);
fb14d0d8 897end:
f37d259d 898 lttng_destroy_handle(handle);
fb14d0d8
JR		 899 return ret;
900}
f37d259d 901
fb14d0d8
JR		 902/*
903 * Machine interface
904 * Print a list of kernel events
905 */
906static int mi_list_kernel_events(struct lttng_event *events, int count,
907 struct lttng_domain *domain)
908{
909 int ret, i;
f37d259d 910
fb14d0d8
JR		 911 /* Open domains element */
912 ret = mi_lttng_domains_open(writer);
913 if (ret) {
914 goto end;
915 }
916
917 /* Write domain */
918 ret = mi_lttng_domain(writer, domain, 1);
919 if (ret) {
920 goto end;
921 }
922
923 /* Open events */
924 ret = mi_lttng_events_open(writer);
925 if (ret) {
926 goto end;
927 }
928
929 for (i = 0; i < count; i++) {
970d848b 930 ret = mi_lttng_event(writer, &events[i], 0, handle->domain.type);
fb14d0d8
JR		 931 if (ret) {
932 goto end;
933 }
934 }
935
936 /* close events, domain and domains */
937 ret = mi_lttng_close_multi_element(writer, 3);
938 if (ret) {
939 goto end;
940 }
941
942end:
943 return ret;
f37d259d
MD		 944}
945
f3ed775e 946/*
fb14d0d8 947 * Ask for all trace events in the kernel
f3ed775e 948 */
9f19cc17 949static int list_kernel_events(void)
f3ed775e 950{
fb14d0d8 951 int i, size, ret = CMD_SUCCESS;
b551a063
DG		 952 struct lttng_domain domain;
953 struct lttng_handle *handle;
9f19cc17 954 struct lttng_event *event_list;
f3ed775e 955
441c16a7
MD		 956 memset(&domain, 0, sizeof(domain));
957
b551a063
DG		 958 DBG("Getting kernel tracing events");
959
960 domain.type = LTTNG_DOMAIN_KERNEL;
961
962 handle = lttng_create_handle(NULL, &domain);
963 if (handle == NULL) {
fb14d0d8 964 ret = CMD_ERROR;
b551a063
DG		 965 goto error;
966 }
f3ed775e 967
cd80958d 968 size = lttng_list_tracepoints(handle, &event_list);
9f19cc17 969 if (size < 0) {
60e835ca 970 ERR("Unable to list kernel events: %s", lttng_strerror(size));
ef021732 971 lttng_destroy_handle(handle);
fb14d0d8 972 return CMD_ERROR;
f3ed775e
DG		 973 }
974
fb14d0d8
JR		 975 if (lttng_opt_mi) {
976 /* Mi print */
977 ret = mi_list_kernel_events(event_list, size, &domain);
978 if (ret) {
979 ret = CMD_ERROR;
980 goto end;
981 }
982 } else {
983 MSG("Kernel events:\n-------------");
f3ed775e 984
fb14d0d8
JR		 985 for (i = 0; i < size; i++) {
986 print_events(&event_list[i]);
987 }
f3ed775e 988
fb14d0d8
JR		 989 MSG("");
990 }
b551a063 991
fb14d0d8 992end:
f3ed775e
DG		 993 free(event_list);
994
ef021732 995 lttng_destroy_handle(handle);
fb14d0d8 996 return ret;
b551a063
DG		 997
998error:
ef021732 999 lttng_destroy_handle(handle);
fb14d0d8
JR		 1000 return ret;
1001}
1002
834978fd
DG		 1003/*
1004 * Machine interface
1005 * Print a list of system calls.
1006 */
1007static int mi_list_syscalls(struct lttng_event *events, int count)
1008{
1009 int ret, i;
1010
1011 /* Open events */
1012 ret = mi_lttng_events_open(writer);
1013 if (ret) {
1014 goto end;
1015 }
1016
1017 for (i = 0; i < count; i++) {
970d848b 1018 ret = mi_lttng_event(writer, &events[i], 0, handle->domain.type);
834978fd
DG		 1019 if (ret) {
1020 goto end;
1021 }
1022 }
1023
1024 /* Close events. */
1025 ret = mi_lttng_writer_close_element(writer);
1026 if (ret) {
1027 goto end;
1028 }
1029
1030end:
1031 return ret;
1032}
1033
1034/*
1035 * Ask for kernel system calls.
1036 */
1037static int list_syscalls(void)
1038{
1039 int i, size, ret = CMD_SUCCESS;
1040 struct lttng_event *event_list;
1041
1042 DBG("Getting kernel system call events");
1043
1044 size = lttng_list_syscalls(&event_list);
1045 if (size < 0) {
1046 ERR("Unable to list system calls: %s", lttng_strerror(size));
1047 ret = CMD_ERROR;
1048 goto error;
1049 }
1050
1051 if (lttng_opt_mi) {
1052 /* Mi print */
1053 ret = mi_list_syscalls(event_list, size);
1054 if (ret) {
1055 ret = CMD_ERROR;
1056 goto end;
1057 }
1058 } else {
1059 MSG("System calls:\n-------------");
1060
1061 for (i = 0; i < size; i++) {
1062 print_events(&event_list[i]);
1063 }
1064
1065 MSG("");
1066 }
1067
1068end:
1069 free(event_list);
1070 return ret;
1071
1072error:
1073 return ret;
1074}
1075
fb14d0d8
JR		 1076/*
1077 * Machine Interface
5cdb6027 1078 * Print a list of agent events
fb14d0d8 1079 */
5cdb6027 1080static int mi_list_session_agent_events(struct lttng_event *events, int count)
fb14d0d8
JR		 1081{
1082 int ret, i;
1083
1084 /* Open events element */
1085 ret = mi_lttng_events_open(writer);
1086 if (ret) {
1087 goto end;
1088 }
1089
1090 for (i = 0; i < count; i++) {
970d848b 1091 ret = mi_lttng_event(writer, &events[i], 0, handle->domain.type);
fb14d0d8
JR		 1092 if (ret) {
1093 goto end;
1094 }
1095 }
1096
1097 /* Close events element */
1098 ret = mi_lttng_writer_close_element(writer);
1099
1100end:
1101 return ret;
f3ed775e
DG		 1102}
1103
3c6a091f 1104/*
5cdb6027 1105 * List agent events for a specific session using the handle.
3c6a091f
DG		 1106 *
1107 * Return CMD_SUCCESS on success else a negative value.
1108 */
5cdb6027 1109static int list_session_agent_events(void)
3c6a091f 1110{
fb14d0d8 1111 int ret = CMD_SUCCESS, count, i;
3c6a091f
DG		 1112 struct lttng_event *events = NULL;
1113
1114 count = lttng_list_events(handle, "", &events);
1115 if (count < 0) {
fb14d0d8
JR		 1116 ret = CMD_ERROR;
1117 ERR("%s", lttng_strerror(count));
3c6a091f
DG		 1118 goto error;
1119 }
1120
fb14d0d8
JR		 1121 if (lttng_opt_mi) {
1122 /* Mi print */
5cdb6027 1123 ret = mi_list_session_agent_events(events, count);
fb14d0d8
JR		 1124 if (ret) {
1125 ret = CMD_ERROR;
1126 goto end;
1127 }
1128 } else {
1129 /* Pretty print */
1130 MSG("Events (Logger name):\n---------------------");
1131 if (count == 0) {
1132 MSG("%sNone\n", indent6);
1133 goto end;
1134 }
1135
1136 for (i = 0; i < count; i++) {
9a890ce8
JG		 1137 const char *filter_str;
1138 char *filter_msg = NULL;
1139 struct lttng_event *event = &events[i];
1140
134e72ed
JG		 1141 ret = lttng_event_get_filter_expression(event,
1142 &filter_str);
9a890ce8
JG		 1143 if (ret) {
1144 filter_msg = strdup(" [failed to retrieve filter]");
1145 } else if (filter_str) {
1146 const char * const filter_fmt =
1147 " [filter: '%s']";
1148
1149 filter_msg = malloc(strlen(filter_str) +
1150 strlen(filter_fmt) + 1);
1151 if (filter_msg) {
00505bae
JG		 1152 sprintf(filter_msg, filter_fmt,
1153 filter_str);
9a890ce8
JG		 1154 }
1155 }
1156
1157 if (event->loglevel_type !=
755066c2 1158 LTTNG_EVENT_LOGLEVEL_ALL) {
9a890ce8
JG		 1159 MSG("%s- %s%s (loglevel%s %s)%s", indent4,
1160 event->name,
1161 enabled_string(event->enabled),
755066c2 1162 logleveltype_string(
9a890ce8 1163 event->loglevel_type),
755066c2 1164 mi_lttng_loglevel_string(
9a890ce8
JG		 1165 event->loglevel,
1166 handle->domain.type),
7b4a95b1 1167 safe_string(filter_msg));
755066c2 1168 } else {
9a890ce8
JG		 1169 MSG("%s- %s%s%s", indent4, event->name,
1170 enabled_string(event->enabled),
7b4a95b1 1171 safe_string(filter_msg));
755066c2 1172 }
9a890ce8 1173 free(filter_msg);
fb14d0d8
JR		 1174 }
1175
1176 MSG("");
1177 }
1178
1179end:
1180 free(events);
1181error:
1182 return ret;
1183}
1184
1185/*
1186 * Machine interface
1187 * print a list of event
1188 */
1189static int mi_list_events(struct lttng_event *events, int count)
1190{
1191 int ret, i;
1192
1193 /* Open events element */
1194 ret = mi_lttng_events_open(writer);
1195 if (ret) {
3c6a091f
DG		 1196 goto end;
1197 }
1198
1199 for (i = 0; i < count; i++) {
970d848b 1200 ret = mi_lttng_event(writer, &events[i], 0, handle->domain.type);
fb14d0d8
JR		 1201 if (ret) {
1202 goto end;
1203 }
3c6a091f
DG		 1204 }
1205
fb14d0d8
JR		 1206 /* Close events element */
1207 ret = mi_lttng_writer_close_element(writer);
3c6a091f
DG		 1208
1209end:
3c6a091f
DG		 1210 return ret;
1211}
1212
f3ed775e 1213/*
9f19cc17 1214 * List events of channel of session and domain.
f3ed775e 1215 */
cd80958d 1216static int list_events(const char *channel_name)
f3ed775e 1217{
fb14d0d8 1218 int ret = CMD_SUCCESS, count, i;
9f19cc17 1219 struct lttng_event *events = NULL;
f3ed775e 1220
cd80958d 1221 count = lttng_list_events(handle, channel_name, &events);
f3ed775e 1222 if (count < 0) {
fb14d0d8
JR		 1223 ret = CMD_ERROR;
1224 ERR("%s", lttng_strerror(count));
f3ed775e
DG		 1225 goto error;
1226 }
1227
fb14d0d8
JR		 1228 if (lttng_opt_mi) {
1229 /* Mi print */
1230 ret = mi_list_events(events, count);
1231 if (ret) {
1232 ret = CMD_ERROR;
1233 goto end;
1234 }
1235 } else {
1236 /* Pretty print */
f3b3a67b 1237 MSG("\n%sEvent rules:", indent4);
fb14d0d8
JR		 1238 if (count == 0) {
1239 MSG("%sNone\n", indent6);
1240 goto end;
1241 }
f3ed775e 1242
fb14d0d8
JR		 1243 for (i = 0; i < count; i++) {
1244 print_events(&events[i]);
1245 }
f3ed775e 1246
fb14d0d8
JR		 1247 MSG("");
1248 }
9f19cc17 1249end:
0e428499 1250 free(events);
f3ed775e
DG		 1251error:
1252 return ret;
1253}
1254
f3b3a67b
JG		 1255static
1256void print_timer(const char *timer_name, uint32_t space_count, int64_t value)
1257{
1258 uint32_t i;
1259
1260 _MSG("%s%s:", indent6, timer_name);
1261 for (i = 0; i < space_count; i++) {
1262 _MSG(" ");
1263 }
1264
1265 if (value) {
2a1135fa 1266 MSG("%" PRId64 " %s", value, USEC_UNIT);
f3b3a67b
JG		 1267 } else {
1268 MSG("inactive");
1269 }
1270}
1271
f3ed775e 1272/*
9f19cc17
DG		 1273 * Pretty print channel
1274 */
1275static void print_channel(struct lttng_channel *channel)
1276{
fb83fe64 1277 int ret;
cf0bcb51 1278 uint64_t discarded_events, lost_packets, monitor_timer_interval;
491d1539 1279 int64_t blocking_timeout;
fb83fe64
JD		 1280
1281 ret = lttng_channel_get_discarded_event_count(channel,
1282 &discarded_events);
1283 if (ret) {
1284 ERR("Failed to retrieve discarded event count of channel");
1285 return;
1286 }
1287
1288 ret = lttng_channel_get_lost_packet_count(channel,
1289 &lost_packets);
1290 if (ret) {
1291 ERR("Failed to retrieve lost packet count of channel");
1292 return;
1293 }
1294
cf0bcb51
JG		 1295 ret = lttng_channel_get_monitor_timer_interval(channel,
1296 &monitor_timer_interval);
1297 if (ret) {
1298 ERR("Failed to retrieve monitor interval of channel");
1299 return;
1300 }
1301
491d1539
MD		 1302 ret = lttng_channel_get_blocking_timeout(channel,
1303 &blocking_timeout);
1304 if (ret) {
1305 ERR("Failed to retrieve blocking timeout of channel");
1306 return;
1307 }
1308
464dd62d 1309 MSG("- %s:%s\n", channel->name, enabled_string(channel->enabled));
9f19cc17 1310 MSG("%sAttributes:", indent4);
f3b3a67b
JG		 1311 MSG("%sEvent-loss mode: %s", indent6, channel->attr.overwrite ? "overwrite" : "discard");
1312 MSG("%sSub-buffer size: %" PRIu64 " bytes", indent6, channel->attr.subbuf_size);
1313 MSG("%sSub-buffer count: %" PRIu64, indent6, channel->attr.num_subbuf);
1314
1315 print_timer("Switch timer", 5, channel->attr.switch_timer_interval);
1316 print_timer("Read timer", 7, channel->attr.read_timer_interval);
1317 print_timer("Monitor timer", 4, monitor_timer_interval);
1318
1319 if (!channel->attr.overwrite) {
1320 if (blocking_timeout == -1) {
1321 MSG("%sBlocking timeout: infinite", indent6);
1322 } else {
2a1135fa
JG		 1323 MSG("%sBlocking timeout: %" PRId64 " %s", indent6,
1324 blocking_timeout, USEC_UNIT);
f3b3a67b
JG		 1325 }
1326 }
1327
1328 MSG("%sTrace file count: %" PRIu64 " per stream", indent6,
1329 channel->attr.tracefile_count == 0 ?
1330 1 : channel->attr.tracefile_count);
1331 if (channel->attr.tracefile_size != 0 ) {
1332 MSG("%sTrace file size: %" PRIu64 " bytes", indent6,
1333 channel->attr.tracefile_size);
1334 } else {
1335 MSG("%sTrace file size: %s", indent6, "unlimited");
1336 }
9f19cc17
DG		 1337 switch (channel->attr.output) {
1338 case LTTNG_EVENT_SPLICE:
f3b3a67b 1339 MSG("%sOutput mode: splice", indent6);
9f19cc17
DG		 1340 break;
1341 case LTTNG_EVENT_MMAP:
f3b3a67b 1342 MSG("%sOutput mode: mmap", indent6);
9f19cc17
DG		 1343 break;
1344 }
e50e81d3 1345
f3b3a67b
JG		 1346 MSG("\n%sStatistics:", indent4);
1347 if (listed_session.snapshot_mode) {
e50e81d3
JG		 1348 /*
1349 * The lost packet count is omitted for sessions in snapshot
1350 * mode as it is misleading: it would indicate the number of
1351 * packets that the consumer could not extract during the
1352 * course of recording the snapshot. It does not have the
1353 * same meaning as the "regular" lost packet count that
1354 * would result from the consumer not keeping up with
1355 * event production in an overwrite-mode channel.
1356 *
1357 * A more interesting statistic would be the number of
1358 * packets lost between the first and last extracted
1359 * packets of a given snapshot (which prevents most analyses).
1360 */
f3b3a67b 1361 MSG("%sNone", indent6);
e50e81d3
JG		 1362 goto skip_stats_printing;
1363 }
1364
1365 if (!channel->attr.overwrite) {
f3b3a67b 1366 MSG("%sDiscarded events: %" PRIu64, indent6, discarded_events);
e50e81d3 1367 } else {
f3b3a67b 1368 MSG("%sLost packets: %" PRIu64, indent6, lost_packets);
e50e81d3
JG		 1369 }
1370skip_stats_printing:
1371 return;
9f19cc17
DG		 1372}
1373
fb14d0d8
JR		 1374/*
1375 * Machine interface
1376 * Print a list of channel
1377 *
1378 */
1379static int mi_list_channels(struct lttng_channel *channels, int count,
1380 const char *channel_name)
1381{
1382 int i, ret;
1383 unsigned int chan_found = 0;
1384
1385 /* Open channels element */
1386 ret = mi_lttng_channels_open(writer);
1387 if (ret) {
1388 goto error;
1389 }
1390
1391 for (i = 0; i < count; i++) {
1392 if (channel_name != NULL) {
1393 if (strncmp(channels[i].name, channel_name, NAME_MAX) == 0) {
1394 chan_found = 1;
1395 } else {
1396 continue;
1397 }
1398 }
1399
1400 /* Write channel element and leave it open */
1401 ret = mi_lttng_channel(writer, &channels[i], 1);
1402 if (ret) {
1403 goto error;
1404 }
1405
1406 /* Listing events per channel */
1407 ret = list_events(channels[i].name);
1408 if (ret) {
1409 goto error;
1410 }
1411
1412 /* Closing the channel element we opened earlier */
1413 ret = mi_lttng_writer_close_element(writer);
1414 if (ret) {
1415 goto error;
1416 }
1417
1418 if (chan_found) {
1419 break;
1420 }
1421 }
1422
1423 /* Close channels element */
1424 ret = mi_lttng_writer_close_element(writer);
1425 if (ret) {
1426 goto error;
1427 }
1428
1429error:
1430 return ret;
1431}
1432
9f19cc17
DG		 1433/*
1434 * List channel(s) of session and domain.
f3ed775e 1435 *
9f19cc17 1436 * If channel_name is NULL, all channels are listed.
f3ed775e 1437 */
cd80958d 1438static int list_channels(const char *channel_name)
f3ed775e 1439{
9f19cc17
DG		 1440 int count, i, ret = CMD_SUCCESS;
1441 unsigned int chan_found = 0;
1442 struct lttng_channel *channels = NULL;
f3ed775e 1443
3e25cb20 1444 DBG("Listing channel(s) (%s)", channel_name ? : "<all>");
9f19cc17 1445
cd80958d 1446 count = lttng_list_channels(handle, &channels);
f3ed775e 1447 if (count < 0) {
c7d620a2
DG		 1448 switch (-count) {
1449 case LTTNG_ERR_KERN_CHAN_NOT_FOUND:
fb14d0d8
JR		 1450 if (lttng_opt_mi) {
1451 /* When printing mi this is not an error
1452 * but an empty channels element */
1453 count = 0;
1454 } else {
1455 ret = CMD_SUCCESS;
1456 WARN("No kernel channel");
1457 goto error_channels;
1458 }
c7d620a2
DG		 1459 break;
1460 default:
1461 /* We had a real error */
fb14d0d8
JR		 1462 ret = CMD_ERROR;
1463 ERR("%s", lttng_strerror(count));
1464 goto error_channels;
60e835ca 1465 break;
c7d620a2 1466 }
f3ed775e
DG		 1467 }
1468
fb14d0d8
JR		 1469 if (lttng_opt_mi) {
1470 /* Mi print */
1471 ret = mi_list_channels(channels, count, channel_name);
1472 if (ret) {
1473 ret = CMD_ERROR;
1474 goto error;
1475 }
1476 } else {
1477 /* Pretty print */
ade7ce52 1478 if (count) {
fb14d0d8
JR		 1479 MSG("Channels:\n-------------");
1480 }
9f19cc17 1481
fb14d0d8
JR		 1482 for (i = 0; i < count; i++) {
1483 if (channel_name != NULL) {
1484 if (strncmp(channels[i].name, channel_name, NAME_MAX) == 0) {
1485 chan_found = 1;
1486 } else {
1487 continue;
1488 }
1489 }
1490 print_channel(&channels[i]);
1491
1492 /* Listing events per channel */
1493 ret = list_events(channels[i].name);
1494 if (ret) {
1495 goto error;
1496 }
1497
1498 if (chan_found) {
1499 break;
9f19cc17
DG		 1500 }
1501 }
9f19cc17 1502
fb14d0d8
JR		 1503 if (!chan_found && channel_name != NULL) {
1504 ret = CMD_ERROR;
1505 ERR("Channel %s not found", channel_name);
1506 goto error;
9f19cc17 1507 }
fb14d0d8
JR		 1508 }
1509error:
1510 free(channels);
9f19cc17 1511
fb14d0d8
JR		 1512error_channels:
1513 return ret;
1514}
1515
83d6d6c4
JR		 1516static const char *get_tracker_str(enum lttng_tracker_type tracker_type)
1517{
1518 switch (tracker_type) {
1519 case LTTNG_TRACKER_PID:
1520 return "PID";
1521 case LTTNG_TRACKER_VPID:
1522 return "VPID";
1523 case LTTNG_TRACKER_UID:
1524 return "UID";
1525 case LTTNG_TRACKER_VUID:
1526 return "VUID";
1527 case LTTNG_TRACKER_GID:
1528 return "GID";
1529 case LTTNG_TRACKER_VGID:
1530 return "VGID";
1531 }
1532 return NULL;
1533}
1534
a5dfbb9d 1535/*
83d6d6c4 1536 * List tracker ID(s) of session and domain.
a5dfbb9d 1537 */
83d6d6c4 1538static int list_tracker_ids(enum lttng_tracker_type tracker_type)
a5dfbb9d 1539{
ebbf5ab7 1540 int ret = 0;
83d6d6c4 1541 int enabled = 1;
a7a533cd 1542 struct lttng_tracker_ids *ids = NULL;
83d6d6c4 1543 size_t nr_ids, i;
a7a533cd 1544 const struct lttng_tracker_id *id;
a5dfbb9d 1545
a7a533cd 1546 ret = lttng_list_tracker_ids(handle, tracker_type, &ids);
a5dfbb9d
MD		 1547 if (ret) {
1548 return ret;
1549 }
a7a533cd
JR		 1550
1551 nr_ids = lttng_tracker_ids_get_count(ids);
1552 if (nr_ids == 1) {
1553 id = lttng_tracker_ids_get_at_index(ids, 0);
1554 if (id && lttng_tracker_id_get_type(id) == LTTNG_ID_ALL) {
1555 enabled = 0;
1556 }
83d6d6c4 1557 }
a7a533cd 1558
a5dfbb9d 1559 if (enabled) {
83d6d6c4 1560 _MSG("%s tracker: [", get_tracker_str(tracker_type));
a5dfbb9d 1561
83d6d6c4 1562 /* Mi tracker_id element */
ebbf5ab7 1563 if (writer) {
83d6d6c4
JR		 1564 /* Open tracker_id and targets elements */
1565 ret = mi_lttng_id_tracker_open(writer, tracker_type);
ebbf5ab7
JR		 1566 if (ret) {
1567 goto end;
1568 }
1569 }
1570
83d6d6c4 1571 for (i = 0; i < nr_ids; i++) {
a7a533cd
JR		 1572 enum lttng_tracker_id_status status =
1573 LTTNG_TRACKER_ID_STATUS_OK;
2d97a006
JR		 1574 int value;
1575 const char *value_string;
1576
a7a533cd
JR		 1577 id = lttng_tracker_ids_get_at_index(ids, i);
1578 if (!id) {
1579 ret = CMD_ERROR;
1580 goto end;
1581 }
1582
2d97a006
JR		 1583 switch (lttng_tracker_id_get_type(id)) {
1584 case LTTNG_ID_ALL:
1585 break;
1586 case LTTNG_ID_VALUE:
1587 status = lttng_tracker_id_get_value(id, &value);
1588 break;
1589 case LTTNG_ID_STRING:
1590 status = lttng_tracker_id_get_string(
1591 id, &value_string);
1592 break;
1593 case LTTNG_ID_UNKNOWN:
1594 ret = CMD_ERROR;
1595 goto end;
1596 }
1597
1598 if (status != LTTNG_TRACKER_ID_STATUS_OK) {
1599 ERR("Invalid state for tracker id");
1600 ret = CMD_ERROR;
1601 goto end;
1602 }
83d6d6c4 1603
a5dfbb9d
MD		 1604 if (i) {
1605 _MSG(",");
1606 }
2d97a006 1607 switch (lttng_tracker_id_get_type(id)) {
83d6d6c4
JR		 1608 case LTTNG_ID_ALL:
1609 _MSG(" *");
1610 break;
1611 case LTTNG_ID_VALUE:
2d97a006 1612 _MSG(" %d", value);
83d6d6c4
JR		 1613 break;
1614 case LTTNG_ID_STRING:
2d97a006 1615 _MSG(" %s", value_string);
83d6d6c4
JR		 1616 break;
1617 case LTTNG_ID_UNKNOWN:
2d97a006
JR		 1618 ERR("Invalid state for tracker id");
1619 ret = CMD_ERROR;
1620 goto end;
83d6d6c4 1621 }
ebbf5ab7
JR		 1622
1623 /* Mi */
1624 if (writer) {
83d6d6c4
JR		 1625 ret = mi_lttng_id_target(
1626 writer, tracker_type, id, 0);
ebbf5ab7
JR		 1627 if (ret) {
1628 goto end;
1629 }
1630 }
a5dfbb9d 1631 }
6223570f 1632 _MSG(" ]\n\n");
ebbf5ab7 1633
83d6d6c4 1634 /* Mi close tracker_id and targets */
ebbf5ab7 1635 if (writer) {
83d6d6c4 1636 ret = mi_lttng_close_multi_element(writer, 2);
ebbf5ab7
JR		 1637 if (ret) {
1638 goto end;
1639 }
1640 }
a5dfbb9d 1641 }
ebbf5ab7 1642end:
a7a533cd 1643 lttng_tracker_ids_destroy(ids);
ebbf5ab7 1644 return ret;
ebbf5ab7
JR		 1645}
1646
1647/*
83d6d6c4 1648 * List all trackers of a domain
ebbf5ab7 1649 */
83d6d6c4 1650static int list_trackers(const struct lttng_domain *domain)
ebbf5ab7 1651{
0dda6728 1652 int ret = 0;
ebbf5ab7
JR		 1653
1654 /* Trackers listing */
1655 if (lttng_opt_mi) {
1656 ret = mi_lttng_trackers_open(writer);
1657 if (ret) {
1658 goto end;
1659 }
1660 }
1661
83d6d6c4
JR		 1662 switch (domain->type) {
1663 case LTTNG_DOMAIN_KERNEL:
1664 /* pid tracker */
1665 ret = list_tracker_ids(LTTNG_TRACKER_PID);
1666 if (ret) {
1667 goto end;
1668 }
1669 /* vpid tracker */
1670 ret = list_tracker_ids(LTTNG_TRACKER_VPID);
1671 if (ret) {
1672 goto end;
1673 }
1674 /* uid tracker */
1675 ret = list_tracker_ids(LTTNG_TRACKER_UID);
1676 if (ret) {
1677 goto end;
1678 }
1679 /* vuid tracker */
1680 ret = list_tracker_ids(LTTNG_TRACKER_VUID);
1681 if (ret) {
1682 goto end;
1683 }
1684 /* gid tracker */
1685 ret = list_tracker_ids(LTTNG_TRACKER_GID);
1686 if (ret) {
1687 goto end;
1688 }
1689 /* vgid tracker */
1690 ret = list_tracker_ids(LTTNG_TRACKER_VGID);
1691 if (ret) {
1692 goto end;
1693 }
1694 break;
1695 case LTTNG_DOMAIN_UST:
1696 /* vpid tracker */
1697 ret = list_tracker_ids(LTTNG_TRACKER_VPID);
1698 if (ret) {
1699 goto end;
1700 }
1701 /* vuid tracker */
1702 ret = list_tracker_ids(LTTNG_TRACKER_VUID);
1703 if (ret) {
1704 goto end;
1705 }
1706 /* vgid tracker */
1707 ret = list_tracker_ids(LTTNG_TRACKER_VGID);
1708 if (ret) {
1709 goto end;
1710 }
1711 break;
1712 default:
1713 break;
ebbf5ab7 1714 }
ebbf5ab7
JR		 1715 if (lttng_opt_mi) {
1716 /* Close trackers element */
1717 ret = mi_lttng_writer_close_element(writer);
1718 if (ret) {
1719 goto end;
1720 }
1721 }
1722
1723end:
1724 return ret;
a5dfbb9d
MD		 1725}
1726
66ea93b1
JG		 1727static enum cmd_error_code print_periodic_rotation_schedule(
1728 const struct lttng_rotation_schedule *schedule)
1729{
1730 enum cmd_error_code ret;
1731 enum lttng_rotation_status status;
1732 uint64_t value;
1733
1734 status = lttng_rotation_schedule_periodic_get_period(schedule,
1735 &value);
1736 if (status != LTTNG_ROTATION_STATUS_OK) {
1737 ERR("Failed to retrieve period parameter from periodic rotation schedule.");
1738 ret = CMD_ERROR;
1739 goto end;
1740 }
1741
2a1135fa 1742 MSG(" timer period: %" PRIu64" %s", value, USEC_UNIT);
66ea93b1
JG		 1743 ret = CMD_SUCCESS;
1744end:
1745 return ret;
1746}
1747
1748static enum cmd_error_code print_size_threshold_rotation_schedule(
1749 const struct lttng_rotation_schedule *schedule)
1750{
1751 enum cmd_error_code ret;
1752 enum lttng_rotation_status status;
1753 uint64_t value;
1754
1755 status = lttng_rotation_schedule_size_threshold_get_threshold(schedule,
1756 &value);
1757 if (status != LTTNG_ROTATION_STATUS_OK) {
1758 ERR("Failed to retrieve size parameter from size-based rotation schedule.");
1759 ret = CMD_ERROR;
1760 goto end;
1761 }
1762
1763 MSG(" size threshold: %" PRIu64" bytes", value);
66ea93b1
JG		 1764 ret = CMD_SUCCESS;
1765end:
1766 return ret;
1767}
1768
1769static enum cmd_error_code print_rotation_schedule(
1770 const struct lttng_rotation_schedule *schedule)
1771{
1772 enum cmd_error_code ret;
1773
1774 switch (lttng_rotation_schedule_get_type(schedule)) {
1775 case LTTNG_ROTATION_SCHEDULE_TYPE_SIZE_THRESHOLD:
1776 ret = print_size_threshold_rotation_schedule(schedule);
1777 break;
1778 case LTTNG_ROTATION_SCHEDULE_TYPE_PERIODIC:
1779 ret = print_periodic_rotation_schedule(schedule);
1780 break;
1781 default:
1782 ret = CMD_ERROR;
1783 }
1784 return ret;
1785}
1786
329f3443 1787/*
66ea93b1 1788 * List the automatic rotation settings.
329f3443 1789 */
66ea93b1 1790static enum cmd_error_code list_rotate_settings(const char *session_name)
329f3443
JD		 1791{
1792 int ret;
66ea93b1
JG		 1793 enum cmd_error_code cmd_ret = CMD_SUCCESS;
1794 unsigned int count, i;
1795 struct lttng_rotation_schedules *schedules = NULL;
1796 enum lttng_rotation_status status;
1797
1798 ret = lttng_session_list_rotation_schedules(session_name, &schedules);
1799 if (ret != LTTNG_OK) {
1800 ERR("Failed to list session rotation schedules: %s", lttng_strerror(ret));
1801 cmd_ret = CMD_ERROR;
329f3443
JD		 1802 goto end;
1803 }
1804
66ea93b1
JG		 1805 status = lttng_rotation_schedules_get_count(schedules, &count);
1806 if (status != LTTNG_ROTATION_STATUS_OK) {
1807 ERR("Failed to retrieve the number of session rotation schedules.");
1808 cmd_ret = CMD_ERROR;
329f3443
JD		 1809 goto end;
1810 }
1811
66ea93b1
JG		 1812 if (count == 0) {
1813 cmd_ret = CMD_SUCCESS;
329f3443
JD		 1814 goto end;
1815 }
1816
66ea93b1
JG		 1817 MSG("Automatic rotation schedules:");
1818 if (lttng_opt_mi) {
1819 ret = mi_lttng_writer_open_element(writer,
1820 mi_lttng_element_rotation_schedules);
1821 if (ret) {
1822 cmd_ret = CMD_ERROR;
1823 goto end;
329f3443
JD		 1824 }
1825 }
66ea93b1
JG		 1826
1827 for (i = 0; i < count; i++) {
1828 enum cmd_error_code tmp_ret = CMD_SUCCESS;
1829 const struct lttng_rotation_schedule *schedule;
1830
1831 schedule = lttng_rotation_schedules_get_at_index(schedules, i);
1832 if (!schedule) {
1833 ERR("Failed to retrieve session rotation schedule.");
1834 cmd_ret = CMD_ERROR;
1835 goto end;
1836 }
1837
329f3443 1838 if (lttng_opt_mi) {
66ea93b1 1839 ret = mi_lttng_rotation_schedule(writer, schedule);
329f3443 1840 if (ret) {
66ea93b1 1841 tmp_ret = CMD_ERROR;
329f3443 1842 }
66ea93b1
JG		 1843 } else {
1844 tmp_ret = print_rotation_schedule(schedule);
329f3443 1845 }
66ea93b1
JG		 1846
1847 /*
1848 * Report an error if the serialization of any of the
1849 * descriptors failed.
1850 */
1851 cmd_ret = cmd_ret ? cmd_ret : tmp_ret;
329f3443 1852 }
329f3443 1853
66ea93b1
JG		 1854 _MSG("\n");
1855 if (lttng_opt_mi) {
1856 /* Close the rotation_schedules element. */
1857 ret = mi_lttng_writer_close_element(writer);
1858 if (ret) {
1859 cmd_ret = CMD_ERROR;
1860 goto end;
1861 }
1862 }
329f3443 1863end:
66ea93b1
JG		 1864 lttng_rotation_schedules_destroy(schedules);
1865 return cmd_ret;
329f3443
JD		 1866}
1867
fb14d0d8
JR		 1868/*
1869 * Machine interface
1870 * Find the session with session_name as name
1871 * and print his informations.
1872 */
1873static int mi_list_session(const char *session_name,
1874 struct lttng_session *sessions, int count)
1875{
1876 int ret, i;
1877 unsigned int session_found = 0;
1878
1879 if (session_name == NULL) {
1880 ret = -LTTNG_ERR_SESS_NOT_FOUND;
1881 goto end;
1882 }
1883
1884 for (i = 0; i < count; i++) {
1885 if (strncmp(sessions[i].name, session_name, NAME_MAX) == 0) {
1886 /* We need to leave it open to append other informations
1887 * like domain, channel, events etc.*/
1888 session_found = 1;
1889 ret = mi_lttng_session(writer, &sessions[i], 1);
1890 if (ret) {
1891 goto end;
1892 }
9f19cc17 1893 break;
f3ed775e 1894 }
f3ed775e
DG		 1895 }
1896
fb14d0d8
JR		 1897 if (!session_found) {
1898 ERR("Session '%s' not found", session_name);
1899 ret = -LTTNG_ERR_SESS_NOT_FOUND;
1900 goto end;
9f19cc17 1901 }
f3ed775e 1902
fb14d0d8
JR		 1903end:
1904 return ret;
1905}
f3ed775e 1906
fb14d0d8
JR		 1907/*
1908 * Machine interface
1909 * List all availables session
1910 */
1911static int mi_list_sessions(struct lttng_session *sessions, int count)
1912{
1913 int ret, i;
ae856491 1914
fb14d0d8
JR		 1915 /* Opening sessions element */
1916 ret = mi_lttng_sessions_open(writer);
1917 if (ret) {
1918 goto end;
1919 }
1920
1921 /* Listing sessions */
1922 for (i = 0; i < count; i++) {
1923 ret = mi_lttng_session(writer, &sessions[i], 0);
1924 if (ret) {
1925 goto end;
1926 }
1927 }
1928
1929 /* Closing sessions element */
1930 ret = mi_lttng_writer_close_element(writer);
1931 if (ret) {
1932 goto end;
1933 }
1934
1935end:
f3ed775e
DG		 1936 return ret;
1937}
1938
1939/*
9f19cc17 1940 * List available tracing session. List only basic information.
f3ed775e 1941 *
9f19cc17 1942 * If session_name is NULL, all sessions are listed.
f3ed775e 1943 */
9f19cc17 1944static int list_sessions(const char *session_name)
f3ed775e 1945{
fb14d0d8
JR		 1946 int ret = CMD_SUCCESS;
1947 int count, i;
9f19cc17 1948 unsigned int session_found = 0;
aff0fa72 1949 struct lttng_session *sessions = NULL;
9f19cc17
DG		 1950
1951 count = lttng_list_sessions(&sessions);
1952 DBG("Session count %d", count);
1953 if (count < 0) {
fb14d0d8
JR		 1954 ret = CMD_ERROR;
1955 ERR("%s", lttng_strerror(count));
d32fb093 1956 goto end;
9f19cc17
DG		 1957 }
1958
fb14d0d8
JR		 1959 if (lttng_opt_mi) {
1960 /* Mi */
1961 if (session_name == NULL) {
aff0fa72 1962 /* List all sessions */
fb14d0d8
JR		 1963 ret = mi_list_sessions(sessions, count);
1964 } else {
1965 /* Note : this return an open session element */
1966 ret = mi_list_session(session_name, sessions, count);
1967 }
1968 if (ret) {
1969 ret = CMD_ERROR;
aff0fa72 1970 goto end;
fb14d0d8
JR		 1971 }
1972 } else {
1973 /* Pretty print */
1974 if (count == 0) {
1975 MSG("Currently no available tracing session");
fb14d0d8
JR		 1976 goto end;
1977 }
9f19cc17 1978
fb14d0d8
JR		 1979 if (session_name == NULL) {
1980 MSG("Available tracing sessions:");
1981 }
1982
fb14d0d8
JR		 1983 for (i = 0; i < count; i++) {
1984 if (session_name != NULL) {
1985 if (strncmp(sessions[i].name, session_name, NAME_MAX) == 0) {
1986 session_found = 1;
1987 MSG("Tracing session %s: [%s%s]", session_name,
1988 active_string(sessions[i].enabled),
1989 snapshot_string(sessions[i].snapshot_mode));
5b89fc92
JG		 1990 if (*sessions[i].path) {
1991 MSG("%sTrace output: %s\n", indent4, sessions[i].path);
1992 }
e50e81d3
JG		 1993 memcpy(&listed_session, &sessions[i],
1994 sizeof(listed_session));
fb14d0d8
JR		 1995 break;
1996 }
1997 } else {
5b89fc92
JG		 1998 MSG(" %d) %s [%s%s]", i + 1,
1999 sessions[i].name,
2cbf8fed
DG		 2000 active_string(sessions[i].enabled),
2001 snapshot_string(sessions[i].snapshot_mode));
5b89fc92
JG		 2002 if (*sessions[i].path) {
2003 MSG("%sTrace output: %s", indent4, sessions[i].path);
2004 }
fcbc96a2 2005 if (sessions[i].live_timer_interval != 0) {
5b89fc92
JG		 2006 MSG("%sLive timer interval: %u %s", indent4,
2007 sessions[i].live_timer_interval,
2008 USEC_UNIT);
fcbc96a2
JG		 2009 }
2010 MSG("");
9f19cc17 2011 }
fb14d0d8
JR		 2012 }
2013
2014 if (!session_found && session_name != NULL) {
2015 ERR("Session '%s' not found", session_name);
2016 ret = CMD_ERROR;
aff0fa72 2017 goto end;
fb14d0d8
JR		 2018 }
2019
2020 if (session_name == NULL) {
2021 MSG("\nUse lttng list <session_name> for more details");
9f19cc17
DG		 2022 }
2023 }
2024
fb14d0d8 2025end:
aff0fa72 2026 free(sessions);
fb14d0d8
JR		 2027 return ret;
2028}
9f19cc17 2029
fb14d0d8
JR		 2030
2031/*
2032 * Machine Interface
2033 * list available domain(s) for a session.
2034 */
2035static int mi_list_domains(struct lttng_domain *domains, int count)
2036{
2037 int i, ret;
2038 /* Open domains element */
2039 ret = mi_lttng_domains_open(writer);
2040 if (ret) {
2041 goto end;
9f19cc17
DG		 2042 }
2043
fb14d0d8
JR		 2044 for (i = 0; i < count; i++) {
2045 ret = mi_lttng_domain(writer, &domains[i] , 0);
2046 if (ret) {
2047 goto end;
2048 }
9f19cc17 2049 }
f3ed775e 2050
fb14d0d8
JR		 2051 /* Closing domains element */
2052 ret = mi_lttng_writer_close_element(writer);
2053 if (ret) {
2054 goto end;
2055 }
d32fb093 2056end:
f3ed775e
DG		 2057 return ret;
2058}
f3ed775e
DG		 2059
2060/*
9f19cc17 2061 * List available domain(s) for a session.
f3ed775e 2062 */
330be774 2063static int list_domains(const char *session_name)
f3ed775e 2064{
9f19cc17
DG		 2065 int i, count, ret = CMD_SUCCESS;
2066 struct lttng_domain *domains = NULL;
2067
9f19cc17 2068
330be774 2069 count = lttng_list_domains(session_name, &domains);
9f19cc17 2070 if (count < 0) {
fb14d0d8
JR		 2071 ret = CMD_ERROR;
2072 ERR("%s", lttng_strerror(count));
9f19cc17
DG		 2073 goto end;
2074 }
2075
fb14d0d8
JR		 2076 if (lttng_opt_mi) {
2077 /* Mi output */
2078 ret = mi_list_domains(domains, count);
2079 if (ret) {
2080 ret = CMD_ERROR;
2081 goto error;
2082 }
2083 } else {
2084 /* Pretty print */
2085 MSG("Domains:\n-------------");
2086 if (count == 0) {
2087 MSG(" None");
2088 goto end;
2089 }
2090
2091 for (i = 0; i < count; i++) {
2092 switch (domains[i].type) {
2093 case LTTNG_DOMAIN_KERNEL:
2094 MSG(" - Kernel");
2095 break;
2096 case LTTNG_DOMAIN_UST:
2097 MSG(" - UST global");
2098 break;
2099 case LTTNG_DOMAIN_JUL:
2100 MSG(" - JUL (Java Util Logging)");
2101 break;
5cdb6027
DG		 2102 case LTTNG_DOMAIN_LOG4J:
2103 MSG(" - LOG4j (Logging for Java)");
2104 break;
0e115563
DG		 2105 case LTTNG_DOMAIN_PYTHON:
2106 MSG(" - Python (logging)");
2107 break;
fb14d0d8
JR		 2108 default:
2109 break;
2110 }
9f19cc17
DG		 2111 }
2112 }
2113
fb14d0d8 2114error:
9f19cc17
DG		 2115 free(domains);
2116
fb14d0d8 2117end:
9f19cc17 2118 return ret;
f3ed775e 2119}
f3ed775e
DG		 2120
2121/*
9f19cc17 2122 * The 'list <options>' first level command
f3ed775e
DG		 2123 */
2124int cmd_list(int argc, const char **argv)
2125{
c617c0c6 2126 int opt, ret = CMD_SUCCESS;
68c7f6e5 2127 const char *session_name, *leftover = NULL;
f3ed775e 2128 static poptContext pc;
9f19cc17
DG		 2129 struct lttng_domain domain;
2130 struct lttng_domain *domains = NULL;
f3ed775e 2131
441c16a7
MD		 2132 memset(&domain, 0, sizeof(domain));
2133
9f19cc17 2134 if (argc < 1) {
ca1c3607 2135 ret = CMD_ERROR;
f3ed775e
DG		 2136 goto end;
2137 }
2138
2139 pc = poptGetContext(NULL, argc, argv, long_options, 0);
2140 poptReadDefaultConfig(pc, 0);
2141
2142 while ((opt = poptGetNextOpt(pc)) != -1) {
2143 switch (opt) {
2144 case OPT_HELP:
4ba92f18 2145 SHOW_HELP();
f3ed775e 2146 goto end;
eeac7d46
MD		 2147 case OPT_USERSPACE:
2148 opt_userspace = 1;
eeac7d46 2149 break;
679b4943
SM		 2150 case OPT_LIST_OPTIONS:
2151 list_cmd_options(stdout, long_options);
679b4943 2152 goto end;
f3ed775e 2153 default:
f3ed775e
DG		 2154 ret = CMD_UNDEFINED;
2155 goto end;
2156 }
2157 }
2158
fb14d0d8
JR		 2159 /* Mi check */
2160 if (lttng_opt_mi) {
2161 writer = mi_lttng_writer_create(fileno(stdout), lttng_opt_mi);
2162 if (!writer) {
2163 ret = CMD_ERROR;
2164 goto end;
2165 }
2166
2167 /* Open command element */
2168 ret = mi_lttng_writer_command_open(writer,
2169 mi_lttng_element_command_list);
2170 if (ret) {
2171 ret = CMD_ERROR;
2172 goto end;
2173 }
2174
2175 /* Open output element */
2176 ret = mi_lttng_writer_open_element(writer,
2177 mi_lttng_element_command_output);
2178 if (ret) {
2179 ret = CMD_ERROR;
2180 goto end;
2181 }
2182 }
2183
9f19cc17
DG		 2184 /* Get session name (trailing argument) */
2185 session_name = poptGetArg(pc);
b551a063 2186 DBG2("Session name: %s", session_name);
9f19cc17 2187
68c7f6e5
JD		 2188 leftover = poptGetArg(pc);
2189 if (leftover) {
2190 ERR("Unknown argument: %s", leftover);
2191 ret = CMD_ERROR;
2192 goto end;
2193 }
2194
cd80958d
DG		 2195 if (opt_kernel) {
2196 domain.type = LTTNG_DOMAIN_KERNEL;
b551a063
DG		 2197 } else if (opt_userspace) {
2198 DBG2("Listing userspace global domain");
2199 domain.type = LTTNG_DOMAIN_UST;
3c6a091f
DG		 2200 } else if (opt_jul) {
2201 DBG2("Listing JUL domain");
2202 domain.type = LTTNG_DOMAIN_JUL;
edf60534 2203 } else if (opt_log4j) {
5cdb6027 2204 domain.type = LTTNG_DOMAIN_LOG4J;
0e115563
DG		 2205 } else if (opt_python) {
2206 domain.type = LTTNG_DOMAIN_PYTHON;
cd80958d
DG		 2207 }
2208
834978fd
DG		 2209 if (!opt_kernel && opt_syscall) {
2210 WARN("--syscall will only work with the Kernel domain (-k)");
2211 ret = CMD_ERROR;
2212 goto end;
2213 }
2214
0e115563 2215 if (opt_kernel || opt_userspace || opt_jul || opt_log4j || opt_python) {
aa5de748
MD		 2216 handle = lttng_create_handle(session_name, &domain);
2217 if (handle == NULL) {
2218 ret = CMD_FATAL;
2219 goto end;
2220 }
cd80958d
DG		 2221 }
2222
9f19cc17 2223 if (session_name == NULL) {
0e115563
DG		 2224 if (!opt_kernel && !opt_userspace && !opt_jul && !opt_log4j
2225 && !opt_python) {
b551a063 2226 ret = list_sessions(NULL);
fb14d0d8 2227 if (ret) {
b551a063
DG		 2228 goto end;
2229 }
2230 }
9f19cc17 2231 if (opt_kernel) {
834978fd
DG		 2232 if (opt_syscall) {
2233 ret = list_syscalls();
2234 if (ret) {
2235 goto end;
2236 }
2237 } else {
2238 ret = list_kernel_events();
2239 if (ret) {
2240 goto end;
2241 }
9f19cc17 2242 }
b551a063
DG		 2243 }
2244 if (opt_userspace) {
f37d259d
MD		 2245 if (opt_fields) {
2246 ret = list_ust_event_fields();
2247 } else {
2248 ret = list_ust_events();
2249 }
fb14d0d8 2250 if (ret) {
9f19cc17
DG		 2251 goto end;
2252 }
2253 }
0e115563 2254 if (opt_jul || opt_log4j || opt_python) {
5cdb6027 2255 ret = list_agent_events();
fb14d0d8 2256 if (ret) {
3c6a091f
DG		 2257 goto end;
2258 }
2259 }
9f19cc17
DG		 2260 } else {
2261 /* List session attributes */
fb14d0d8
JR		 2262 if (lttng_opt_mi) {
2263 /* Open element sessions
2264 * Present for xml consistency */
2265 ret = mi_lttng_sessions_open(writer);
2266 if (ret) {
2267 goto end;
2268 }
2269 }
2270 /* MI: the ouptut of list_sessions is an unclosed session element */
9f19cc17 2271 ret = list_sessions(session_name);
fb14d0d8 2272 if (ret) {
9f19cc17
DG		 2273 goto end;
2274 }
2275
329f3443
JD		 2276 ret = list_rotate_settings(session_name);
2277 if (ret) {
2278 goto end;
2279 }
2280
9f19cc17
DG		 2281 /* Domain listing */
2282 if (opt_domain) {
330be774 2283 ret = list_domains(session_name);
9f19cc17
DG		 2284 goto end;
2285 }
2286
fb14d0d8 2287 /* Channel listing */
1c3de747 2288 if (opt_kernel || opt_userspace) {
fb14d0d8
JR		 2289 if (lttng_opt_mi) {
2290 /* Add of domains and domain element for xml
2291 * consistency and validation
2292 */
2293 ret = mi_lttng_domains_open(writer);
2294 if (ret) {
2295 goto end;
2296 }
2297
2298 /* Open domain and leave it open for
2299 * nested channels printing */
2300 ret = mi_lttng_domain(writer, &domain, 1);
2301 if (ret) {
2302 goto end;
2303 }
2304
2305 }
2306
ebbf5ab7
JR		 2307
2308 /* Trackers */
83d6d6c4 2309 ret = list_trackers(&domain);
a5dfbb9d
MD		 2310 if (ret) {
2311 goto end;
2312 }
2313
ebbf5ab7 2314 /* Channels */
cd80958d 2315 ret = list_channels(opt_channel);
fb14d0d8
JR		 2316 if (ret) {
2317 goto end;
2318 }
2319
2320 if (lttng_opt_mi) {
2321 /* Close domain and domain element */
2322 ret = mi_lttng_close_multi_element(writer, 2);
2323 }
2324 if (ret) {
9f19cc17
DG		 2325 goto end;
2326 }
fb14d0d8
JR		 2327
2328
9f19cc17 2329 } else {
c617c0c6
MD		 2330 int i, nb_domain;
2331
9f19cc17 2332 /* We want all domain(s) */
330be774 2333 nb_domain = lttng_list_domains(session_name, &domains);
b551a063 2334 if (nb_domain < 0) {
fb14d0d8
JR		 2335 ret = CMD_ERROR;
2336 ERR("%s", lttng_strerror(nb_domain));
9f19cc17
DG		 2337 goto end;
2338 }
2339
fb14d0d8
JR		 2340 if (lttng_opt_mi) {
2341 ret = mi_lttng_domains_open(writer);
2342 if (ret) {
2343 ret = CMD_ERROR;
2344 goto end;
2345 }
2346 }
2347
b551a063 2348 for (i = 0; i < nb_domain; i++) {
9f19cc17
DG		 2349 switch (domains[i].type) {
2350 case LTTNG_DOMAIN_KERNEL:
2351 MSG("=== Domain: Kernel ===\n");
2352 break;
b551a063
DG		 2353 case LTTNG_DOMAIN_UST:
2354 MSG("=== Domain: UST global ===\n");
88c5f0d8
DG		 2355 MSG("Buffer type: %s\n",
2356 domains[i].buf_type ==
2357 LTTNG_BUFFER_PER_PID ? "per PID" : "per UID");
b551a063 2358 break;
3c6a091f
DG		 2359 case LTTNG_DOMAIN_JUL:
2360 MSG("=== Domain: JUL (Java Util Logging) ===\n");
2361 break;
5cdb6027
DG		 2362 case LTTNG_DOMAIN_LOG4J:
2363 MSG("=== Domain: LOG4j (Logging for Java) ===\n");
2364 break;
0e115563
DG		 2365 case LTTNG_DOMAIN_PYTHON:
2366 MSG("=== Domain: Python (logging) ===\n");
2367 break;
9f19cc17
DG		 2368 default:
2369 MSG("=== Domain: Unimplemented ===\n");
2370 break;
2371 }
2372
fb14d0d8
JR		 2373 if (lttng_opt_mi) {
2374 ret = mi_lttng_domain(writer, &domains[i], 1);
2375 if (ret) {
2376 ret = CMD_ERROR;
2377 goto end;
2378 }
2379 }
2380
cd80958d 2381 /* Clean handle before creating a new one */
aa5de748
MD		 2382 if (handle) {
2383 lttng_destroy_handle(handle);
2384 }
cd80958d
DG		 2385
2386 handle = lttng_create_handle(session_name, &domains[i]);
2387 if (handle == NULL) {
ca1c3607 2388 ret = CMD_FATAL;
cd80958d
DG		 2389 goto end;
2390 }
2391
5cdb6027 2392 if (domains[i].type == LTTNG_DOMAIN_JUL ||
0e115563
DG		 2393 domains[i].type == LTTNG_DOMAIN_LOG4J ||
2394 domains[i].type == LTTNG_DOMAIN_PYTHON) {
5cdb6027 2395 ret = list_session_agent_events();
fb14d0d8 2396 if (ret) {
3c6a091f
DG		 2397 goto end;
2398 }
cd7b2927
PP		 2399
2400 goto next_domain;
3c6a091f 2401 }
a5dfbb9d
MD		 2402
2403 switch (domains[i].type) {
2404 case LTTNG_DOMAIN_KERNEL:
2405 case LTTNG_DOMAIN_UST:
83d6d6c4 2406 ret = list_trackers(&domains[i]);
a5dfbb9d
MD		 2407 if (ret) {
2408 goto end;
2409 }
2410 break;
2411 default:
2412 break;
2413 }
3c6a091f 2414
cd80958d 2415 ret = list_channels(opt_channel);
fb14d0d8
JR		 2416 if (ret) {
2417 goto end;
2418 }
2419
cd7b2927 2420next_domain:
fb14d0d8
JR		 2421 if (lttng_opt_mi) {
2422 /* Close domain element */
2423 ret = mi_lttng_writer_close_element(writer);
2424 if (ret) {
2425 ret = CMD_ERROR;
2426 goto end;
2427 }
2428 }
2429
2430 }
2431 if (lttng_opt_mi) {
2432 /* Close the domains, session and sessions element */
2433 ret = mi_lttng_close_multi_element(writer, 3);
2434 if (ret) {
2435 ret = CMD_ERROR;
9f19cc17
DG		 2436 goto end;
2437 }
2438 }
2439 }
f3ed775e
DG		 2440 }
2441
fb14d0d8
JR		 2442 /* Mi closing */
2443 if (lttng_opt_mi) {
2444 /* Close output element */
2445 ret = mi_lttng_writer_close_element(writer);
2446 if (ret) {
2447 ret = CMD_ERROR;
2448 goto end;
2449 }
2450
2451 /* Command element close */
2452 ret = mi_lttng_writer_command_close(writer);
2453 if (ret) {
2454 ret = CMD_ERROR;
2455 goto end;
2456 }
2457 }
f3ed775e 2458end:
fb14d0d8
JR		 2459 /* Mi clean-up */
2460 if (writer && mi_lttng_writer_destroy(writer)) {
2461 /* Preserve original error code */
2462 ret = ret ? ret : -LTTNG_ERR_MI_IO_FAIL;
2463 }
2464
0e428499 2465 free(domains);
aa5de748
MD		 2466 if (handle) {
2467 lttng_destroy_handle(handle);
2468 }
cd80958d 2469
ca1c3607 2470 poptFreeContext(pc);
f3ed775e
DG		 2471 return ret;
2472}
LTTng 2.0 tools and control repository
This page took 0.176997 seconds and 4 git commands to generate.