lib: use dedicated BT_LOG*_ERRNO() instead of using strerror()
[babeltrace.git] / plugins / text / pretty / print.c
CommitLineData
af9a82eb
JG
1/*
2 * print.c
3 *
4 * Babeltrace CTF Text Output Plugin Event Printing
5 *
6 * Copyright 2016 Jérémie Galarneau <jeremie.galarneau@efficios.com>
f504043c 7 * Copyright 2016 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
af9a82eb
JG
8 *
9 * Author: Jérémie Galarneau <jeremie.galarneau@efficios.com>
10 *
11 * Permission is hereby granted, free of charge, to any person obtaining a copy
12 * of this software and associated documentation files (the "Software"), to deal
13 * in the Software without restriction, including without limitation the rights
14 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
15 * copies of the Software, and to permit persons to whom the Software is
16 * furnished to do so, subject to the following conditions:
17 *
18 * The above copyright notice and this permission notice shall be included in
19 * all copies or substantial portions of the Software.
20 *
21 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
22 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
23 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
24 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
25 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
26 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
27 * SOFTWARE.
28 */
29
30#include <babeltrace/ctf-ir/event.h>
31#include <babeltrace/ctf-ir/event-class.h>
6a18b281 32#include <babeltrace/ctf-ir/packet.h>
af9a82eb
JG
33#include <babeltrace/ctf-ir/stream.h>
34#include <babeltrace/ctf-ir/stream-class.h>
ac0c6bdd 35#include <babeltrace/ctf-ir/clock-class.h>
6a18b281
MD
36#include <babeltrace/ctf-ir/field-types.h>
37#include <babeltrace/ctf-ir/fields.h>
1556a1af 38#include <babeltrace/ctf-ir/trace.h>
d9f65f09 39#include <babeltrace/graph/notification-event.h>
08899d39
PP
40#include <babeltrace/graph/notification-discarded-events.h>
41#include <babeltrace/graph/notification-discarded-packets.h>
d9f65f09 42#include <babeltrace/graph/clock-class-priority-map.h>
3d9990ac 43#include <babeltrace/bitfield-internal.h>
ad96d936 44#include <babeltrace/common-internal.h>
58a2480d 45#include <babeltrace/compat/time-internal.h>
6a18b281 46#include <inttypes.h>
93a4161c 47#include <ctype.h>
3228cc1d 48#include "pretty.h"
af9a82eb 49
1556a1af
JG
50#define NSEC_PER_SEC 1000000000LL
51
5280f742 52#define COLOR_NAME BT_COMMON_COLOR_BOLD
08899d39 53#define COLOR_FIELD_NAME BT_COMMON_COLOR_FG_CYAN
5280f742
PP
54#define COLOR_RST BT_COMMON_COLOR_RESET
55#define COLOR_STRING_VALUE BT_COMMON_COLOR_BOLD
56#define COLOR_NUMBER_VALUE BT_COMMON_COLOR_BOLD
57#define COLOR_ENUM_MAPPING_NAME BT_COMMON_COLOR_BOLD
58#define COLOR_UNKNOWN BT_COMMON_COLOR_BOLD BT_COMMON_COLOR_FG_RED
08899d39 59#define COLOR_EVENT_NAME BT_COMMON_COLOR_BOLD BT_COMMON_COLOR_FG_MAGENTA
5280f742 60#define COLOR_TIMESTAMP BT_COMMON_COLOR_BOLD BT_COMMON_COLOR_FG_YELLOW
ad96d936 61
6a18b281
MD
62static inline
63const char *rem_(const char *str)
64{
65 if (str[0] == '_')
66 return &str[1];
67 else
68 return str;
69}
70
af9a82eb
JG
71struct timestamp {
72 int64_t real_timestamp; /* Relative to UNIX epoch. */
73 uint64_t clock_value; /* In cycles. */
74};
75
6a18b281 76static
3228cc1d 77enum bt_component_status print_field(struct pretty_component *pretty,
2b4c4a7c
JD
78 struct bt_ctf_field *field, bool print_names,
79 GQuark *filters_fields, int filter_array_len);
6a18b281 80
ad96d936 81static
3228cc1d 82void print_name_equal(struct pretty_component *pretty, const char *name)
ad96d936 83{
3228cc1d 84 if (pretty->use_colors) {
5280f742
PP
85 g_string_append_printf(pretty->string, "%s%s%s = ", COLOR_NAME,
86 name, COLOR_RST);
ad96d936 87 } else {
5280f742 88 g_string_append_printf(pretty->string, "%s = ", name);
ad96d936
PP
89 }
90}
91
92static
3228cc1d 93void print_field_name_equal(struct pretty_component *pretty, const char *name)
ad96d936 94{
3228cc1d 95 if (pretty->use_colors) {
5280f742
PP
96 g_string_append_printf(pretty->string, "%s%s%s = ",
97 COLOR_FIELD_NAME, name, COLOR_RST);
ad96d936 98 } else {
5280f742 99 g_string_append_printf(pretty->string, "%s = ", name);
ad96d936
PP
100 }
101}
102
af9a82eb 103static
3228cc1d 104void print_timestamp_cycles(struct pretty_component *pretty,
ac0c6bdd 105 struct bt_ctf_clock_class *clock_class,
af9a82eb
JG
106 struct bt_ctf_event *event)
107{
1556a1af
JG
108 int ret;
109 struct bt_ctf_clock_value *clock_value;
110 uint64_t cycles;
111
ac0c6bdd 112 clock_value = bt_ctf_event_get_clock_value(event, clock_class);
1556a1af 113 if (!clock_value) {
5280f742 114 g_string_append(pretty->string, "????????????????????");
1556a1af
JG
115 return;
116 }
117
118 ret = bt_ctf_clock_value_get_value(clock_value, &cycles);
119 bt_put(clock_value);
120 if (ret) {
5280f742
PP
121 // TODO: log, this is unexpected
122 g_string_append(pretty->string, "Error");
1556a1af
JG
123 return;
124 }
5280f742
PP
125
126 g_string_append_printf(pretty->string, "%020" PRIu64, cycles);
3af83b5a 127
3228cc1d
PP
128 if (pretty->last_cycles_timestamp != -1ULL) {
129 pretty->delta_cycles = cycles - pretty->last_cycles_timestamp;
3af83b5a 130 }
3228cc1d 131 pretty->last_cycles_timestamp = cycles;
af9a82eb
JG
132}
133
134static
3228cc1d 135void print_timestamp_wall(struct pretty_component *pretty,
08899d39 136 struct bt_ctf_clock_value *clock_value)
af9a82eb 137{
1556a1af 138 int ret;
1556a1af
JG
139 int64_t ts_nsec = 0; /* add configurable offset */
140 int64_t ts_sec = 0; /* add configurable offset */
141 uint64_t ts_sec_abs, ts_nsec_abs;
142 bool is_negative;
af9a82eb 143
1556a1af 144 if (!clock_value) {
5280f742 145 g_string_append(pretty->string, "??:??:??.?????????");
1556a1af
JG
146 return;
147 }
148
149 ret = bt_ctf_clock_value_get_value_ns_from_epoch(clock_value, &ts_nsec);
1556a1af 150 if (ret) {
5280f742
PP
151 // TODO: log, this is unexpected
152 g_string_append(pretty->string, "Error");
1556a1af
JG
153 return;
154 }
155
3228cc1d
PP
156 if (pretty->last_real_timestamp != -1ULL) {
157 pretty->delta_real_timestamp = ts_nsec - pretty->last_real_timestamp;
3af83b5a 158 }
3af83b5a 159
5280f742 160 pretty->last_real_timestamp = ts_nsec;
1556a1af
JG
161 ts_sec += ts_nsec / NSEC_PER_SEC;
162 ts_nsec = ts_nsec % NSEC_PER_SEC;
5280f742 163
1556a1af
JG
164 if (ts_sec >= 0 && ts_nsec >= 0) {
165 is_negative = false;
166 ts_sec_abs = ts_sec;
167 ts_nsec_abs = ts_nsec;
168 } else if (ts_sec > 0 && ts_nsec < 0) {
169 is_negative = false;
170 ts_sec_abs = ts_sec - 1;
171 ts_nsec_abs = NSEC_PER_SEC + ts_nsec;
172 } else if (ts_sec == 0 && ts_nsec < 0) {
173 is_negative = true;
174 ts_sec_abs = ts_sec;
175 ts_nsec_abs = -ts_nsec;
176 } else if (ts_sec < 0 && ts_nsec > 0) {
177 is_negative = true;
178 ts_sec_abs = -(ts_sec + 1);
179 ts_nsec_abs = NSEC_PER_SEC - ts_nsec;
180 } else if (ts_sec < 0 && ts_nsec == 0) {
181 is_negative = true;
182 ts_sec_abs = -ts_sec;
183 ts_nsec_abs = ts_nsec;
184 } else { /* (ts_sec < 0 && ts_nsec < 0) */
185 is_negative = true;
186 ts_sec_abs = -ts_sec;
187 ts_nsec_abs = -ts_nsec;
188 }
189
3228cc1d 190 if (!pretty->options.clock_seconds) {
1556a1af
JG
191 struct tm tm;
192 time_t time_s = (time_t) ts_sec_abs;
193
194 if (is_negative) {
5280f742 195 // TODO: log instead
1556a1af
JG
196 fprintf(stderr, "[warning] Fallback to [sec.ns] to print negative time value. Use --clock-seconds.\n");
197 goto seconds;
198 }
199
3228cc1d 200 if (!pretty->options.clock_gmt) {
1556a1af
JG
201 struct tm *res;
202
58a2480d 203 res = bt_localtime_r(&time_s, &tm);
1556a1af 204 if (!res) {
5280f742 205 // TODO: log instead
1556a1af
JG
206 fprintf(stderr, "[warning] Unable to get localtime.\n");
207 goto seconds;
208 }
209 } else {
210 struct tm *res;
211
58a2480d 212 res = bt_gmtime_r(&time_s, &tm);
1556a1af 213 if (!res) {
5280f742 214 // TODO: log instead
1556a1af
JG
215 fprintf(stderr, "[warning] Unable to get gmtime.\n");
216 goto seconds;
217 }
218 }
3228cc1d 219 if (pretty->options.clock_date) {
1556a1af
JG
220 char timestr[26];
221 size_t res;
222
223 /* Print date and time */
224 res = strftime(timestr, sizeof(timestr),
4d2a94f1 225 "%Y-%m-%d ", &tm);
1556a1af 226 if (!res) {
5280f742 227 // TODO: log instead
1556a1af
JG
228 fprintf(stderr, "[warning] Unable to print ascii time.\n");
229 goto seconds;
230 }
5280f742
PP
231
232 g_string_append(pretty->string, timestr);
1556a1af 233 }
5280f742 234
1556a1af 235 /* Print time in HH:MM:SS.ns */
5280f742
PP
236 g_string_append_printf(pretty->string,
237 "%02d:%02d:%02d.%09" PRIu64, tm.tm_hour, tm.tm_min,
238 tm.tm_sec, ts_nsec_abs);
1556a1af
JG
239 goto end;
240 }
241seconds:
5280f742
PP
242 g_string_append_printf(pretty->string, "%s%" PRId64 ".%09" PRIu64,
243 is_negative ? "-" : "", ts_sec_abs, ts_nsec_abs);
1556a1af
JG
244end:
245 return;
af9a82eb
JG
246}
247
248static
3228cc1d 249enum bt_component_status print_event_timestamp(struct pretty_component *pretty,
d9f65f09
PP
250 struct bt_ctf_event *event,
251 struct bt_clock_class_priority_map *cc_prio_map,
252 bool *start_line)
af9a82eb 253{
3228cc1d 254 bool print_names = pretty->options.print_header_field_names;
af9a82eb 255 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
6a18b281 256 struct bt_ctf_stream *stream = NULL;
1556a1af
JG
257 struct bt_ctf_stream_class *stream_class = NULL;
258 struct bt_ctf_trace *trace = NULL;
ac0c6bdd 259 struct bt_ctf_clock_class *clock_class = NULL;
af9a82eb
JG
260
261 stream = bt_ctf_event_get_stream(event);
262 if (!stream) {
263 ret = BT_COMPONENT_STATUS_ERROR;
264 goto end;
265 }
266
1556a1af 267 stream_class = bt_ctf_stream_get_class(stream);
f504043c
MD
268 if (!stream_class) {
269 ret = BT_COMPONENT_STATUS_ERROR;
270 goto end;
271 }
1556a1af 272 trace = bt_ctf_stream_class_get_trace(stream_class);
f504043c
MD
273 if (!trace) {
274 ret = BT_COMPONENT_STATUS_ERROR;
275 goto end;
276 }
d9f65f09
PP
277
278 if (bt_clock_class_priority_map_get_clock_class_count(cc_prio_map) == 0) {
279 /* No clock class: skip the timestamp without an error */
280 goto end;
281 }
282
283 clock_class =
284 bt_clock_class_priority_map_get_highest_priority_clock_class(
285 cc_prio_map);
ac0c6bdd 286 if (!clock_class) {
f504043c
MD
287 ret = BT_COMPONENT_STATUS_ERROR;
288 goto end;
289 }
af9a82eb 290
ad96d936 291 if (print_names) {
3228cc1d 292 print_name_equal(pretty, "timestamp");
ad96d936 293 } else {
5280f742 294 g_string_append(pretty->string, "[");
ad96d936 295 }
3228cc1d 296 if (pretty->use_colors) {
5280f742 297 g_string_append(pretty->string, COLOR_TIMESTAMP);
ad96d936 298 }
3228cc1d
PP
299 if (pretty->options.print_timestamp_cycles) {
300 print_timestamp_cycles(pretty, clock_class, event);
af9a82eb 301 } else {
08899d39
PP
302 struct bt_ctf_clock_value *clock_value =
303 bt_ctf_event_get_clock_value(event, clock_class);
304
305 print_timestamp_wall(pretty, clock_value);
306 bt_put(clock_value);
af9a82eb 307 }
3228cc1d 308 if (pretty->use_colors) {
5280f742 309 g_string_append(pretty->string, COLOR_RST);
ad96d936 310 }
af9a82eb 311
c3c30b08 312 if (!print_names)
5280f742 313 g_string_append(pretty->string, "] ");
c3c30b08 314
3228cc1d 315 if (pretty->options.print_delta_field) {
ad96d936 316 if (print_names) {
5280f742 317 g_string_append(pretty->string, ", ");
3228cc1d 318 print_name_equal(pretty, "delta");
ad96d936 319 } else {
5280f742 320 g_string_append(pretty->string, "(");
ad96d936 321 }
3228cc1d
PP
322 if (pretty->options.print_timestamp_cycles) {
323 if (pretty->delta_cycles == -1ULL) {
5280f742
PP
324 g_string_append(pretty->string,
325 "+??????????\?\?) "); /* Not a trigraph. */
3af83b5a 326 } else {
5280f742
PP
327 g_string_append_printf(pretty->string,
328 "+%012" PRIu64, pretty->delta_cycles);
3af83b5a
MD
329 }
330 } else {
3228cc1d 331 if (pretty->delta_real_timestamp != -1ULL) {
3af83b5a 332 uint64_t delta_sec, delta_nsec, delta;
f504043c 333
3228cc1d 334 delta = pretty->delta_real_timestamp;
3af83b5a
MD
335 delta_sec = delta / NSEC_PER_SEC;
336 delta_nsec = delta % NSEC_PER_SEC;
5280f742
PP
337 g_string_append_printf(pretty->string,
338 "+%" PRIu64 ".%09" PRIu64,
3af83b5a
MD
339 delta_sec, delta_nsec);
340 } else {
5280f742 341 g_string_append(pretty->string, "+?.?????????");
3af83b5a
MD
342 }
343 }
344 if (!print_names) {
5280f742 345 g_string_append(pretty->string, ") ");
3af83b5a
MD
346 }
347 }
348 *start_line = !print_names;
f504043c 349
af9a82eb
JG
350end:
351 bt_put(stream);
ac0c6bdd 352 bt_put(clock_class);
1556a1af
JG
353 bt_put(stream_class);
354 bt_put(trace);
af9a82eb
JG
355 return ret;
356}
357
6a18b281 358static
3228cc1d 359enum bt_component_status print_event_header(struct pretty_component *pretty,
d9f65f09
PP
360 struct bt_ctf_event *event,
361 struct bt_clock_class_priority_map *cc_prio_map)
af9a82eb 362{
3228cc1d 363 bool print_names = pretty->options.print_header_field_names;
6a18b281
MD
364 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
365 struct bt_ctf_event_class *event_class = NULL;
c3c30b08
MD
366 struct bt_ctf_stream_class *stream_class = NULL;
367 struct bt_ctf_trace *trace_class = NULL;
60535549 368 int dom_print = 0;
af9a82eb 369
6a18b281
MD
370 event_class = bt_ctf_event_get_class(event);
371 if (!event_class) {
372 ret = BT_COMPONENT_STATUS_ERROR;
373 goto end;
374 }
c3c30b08
MD
375 stream_class = bt_ctf_event_class_get_stream_class(event_class);
376 if (!stream_class) {
377 ret = BT_COMPONENT_STATUS_ERROR;
378 goto end;
379 }
380 trace_class = bt_ctf_stream_class_get_trace(stream_class);
381 if (!trace_class) {
382 ret = BT_COMPONENT_STATUS_ERROR;
383 goto end;
384 }
d9f65f09
PP
385 ret = print_event_timestamp(pretty, event, cc_prio_map,
386 &pretty->start_line);
af9a82eb
JG
387 if (ret != BT_COMPONENT_STATUS_OK) {
388 goto end;
389 }
3228cc1d 390 if (pretty->options.print_trace_field) {
c3c30b08
MD
391 const char *name;
392
393 name = bt_ctf_trace_get_name(trace_class);
394 if (name) {
3228cc1d 395 if (!pretty->start_line) {
5280f742 396 g_string_append(pretty->string, ", ");
c3c30b08 397 }
c3c30b08 398 if (print_names) {
3228cc1d 399 print_name_equal(pretty, "trace");
c3c30b08 400 }
5280f742
PP
401
402 g_string_append(pretty->string, name);
403
60535549 404 if (!print_names) {
5280f742 405 g_string_append(pretty->string, " ");
60535549 406 }
c3c30b08
MD
407 }
408 }
3228cc1d 409 if (pretty->options.print_trace_hostname_field) {
c3c30b08
MD
410 struct bt_value *hostname_str;
411
412 hostname_str = bt_ctf_trace_get_environment_field_value_by_name(trace_class,
413 "hostname");
414 if (hostname_str) {
415 const char *str;
416
3228cc1d 417 if (!pretty->start_line) {
5280f742 418 g_string_append(pretty->string, ", ");
c3c30b08 419 }
c3c30b08 420 if (print_names) {
3228cc1d 421 print_name_equal(pretty, "trace:hostname");
c3c30b08
MD
422 }
423 if (bt_value_string_get(hostname_str, &str)
424 == BT_VALUE_STATUS_OK) {
5280f742 425 g_string_append(pretty->string, str);
c3c30b08
MD
426 }
427 bt_put(hostname_str);
60535549 428 dom_print = 1;
c3c30b08
MD
429 }
430 }
3228cc1d 431 if (pretty->options.print_trace_domain_field) {
c3c30b08
MD
432 struct bt_value *domain_str;
433
434 domain_str = bt_ctf_trace_get_environment_field_value_by_name(trace_class,
435 "domain");
436 if (domain_str) {
437 const char *str;
438
3228cc1d 439 if (!pretty->start_line) {
5280f742 440 g_string_append(pretty->string, ", ");
c3c30b08 441 }
c3c30b08 442 if (print_names) {
3228cc1d 443 print_name_equal(pretty, "trace:domain");
60535549 444 } else if (dom_print) {
5280f742 445 g_string_append(pretty->string, ":");
c3c30b08
MD
446 }
447 if (bt_value_string_get(domain_str, &str)
448 == BT_VALUE_STATUS_OK) {
5280f742 449 g_string_append(pretty->string, str);
c3c30b08
MD
450 }
451 bt_put(domain_str);
60535549 452 dom_print = 1;
c3c30b08
MD
453 }
454 }
3228cc1d 455 if (pretty->options.print_trace_procname_field) {
c3c30b08
MD
456 struct bt_value *procname_str;
457
458 procname_str = bt_ctf_trace_get_environment_field_value_by_name(trace_class,
459 "procname");
460 if (procname_str) {
461 const char *str;
462
3228cc1d 463 if (!pretty->start_line) {
5280f742 464 g_string_append(pretty->string, ", ");
c3c30b08 465 }
c3c30b08 466 if (print_names) {
3228cc1d 467 print_name_equal(pretty, "trace:procname");
60535549 468 } else if (dom_print) {
5280f742 469 g_string_append(pretty->string, ":");
c3c30b08
MD
470 }
471 if (bt_value_string_get(procname_str, &str)
472 == BT_VALUE_STATUS_OK) {
5280f742 473 g_string_append(pretty->string, str);
c3c30b08
MD
474 }
475 bt_put(procname_str);
60535549 476 dom_print = 1;
c3c30b08
MD
477 }
478 }
3228cc1d 479 if (pretty->options.print_trace_vpid_field) {
c3c30b08
MD
480 struct bt_value *vpid_value;
481
482 vpid_value = bt_ctf_trace_get_environment_field_value_by_name(trace_class,
483 "vpid");
484 if (vpid_value) {
485 int64_t value;
486
3228cc1d 487 if (!pretty->start_line) {
5280f742 488 g_string_append(pretty->string, ", ");
c3c30b08 489 }
c3c30b08 490 if (print_names) {
3228cc1d 491 print_name_equal(pretty, "trace:vpid");
60535549 492 } else if (dom_print) {
5280f742 493 g_string_append(pretty->string, ":");
c3c30b08
MD
494 }
495 if (bt_value_integer_get(vpid_value, &value)
496 == BT_VALUE_STATUS_OK) {
5280f742 497 g_string_append_printf(pretty->string, "(%" PRId64 ")", value);
c3c30b08
MD
498 }
499 bt_put(vpid_value);
60535549 500 dom_print = 1;
c3c30b08
MD
501 }
502 }
3228cc1d 503 if (pretty->options.print_loglevel_field) {
cf76ce92
PP
504 static const char *log_level_names[] = {
505 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_EMERGENCY ] = "TRACE_EMERG",
506 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_ALERT ] = "TRACE_ALERT",
507 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_CRITICAL ] = "TRACE_CRIT",
508 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_ERROR ] = "TRACE_ERR",
509 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_WARNING ] = "TRACE_WARNING",
510 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_NOTICE ] = "TRACE_NOTICE",
511 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_INFO ] = "TRACE_INFO",
512 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_SYSTEM ] = "TRACE_DEBUG_SYSTEM",
513 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_PROGRAM ] = "TRACE_DEBUG_PROGRAM",
514 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_PROCESS ] = "TRACE_DEBUG_PROCESS",
515 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_MODULE ] = "TRACE_DEBUG_MODULE",
516 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_UNIT ] = "TRACE_DEBUG_UNIT",
517 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_FUNCTION ] = "TRACE_DEBUG_FUNCTION",
518 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG_LINE ] = "TRACE_DEBUG_LINE",
519 [ BT_CTF_EVENT_CLASS_LOG_LEVEL_DEBUG ] = "TRACE_DEBUG",
520 };
521 enum bt_ctf_event_class_log_level log_level;
522 const char *log_level_str = NULL;
523
524 log_level = bt_ctf_event_class_get_log_level(event_class);
525 assert(log_level != BT_CTF_EVENT_CLASS_LOG_LEVEL_UNKNOWN);
526 if (log_level != BT_CTF_EVENT_CLASS_LOG_LEVEL_UNSPECIFIED) {
527 log_level_str = log_level_names[log_level];
528 }
c3c30b08 529
cf76ce92 530 if (log_level_str) {
3228cc1d 531 if (!pretty->start_line) {
5280f742 532 g_string_append(pretty->string, ", ");
c3c30b08 533 }
c3c30b08 534 if (print_names) {
3228cc1d 535 print_name_equal(pretty, "loglevel");
60535549 536 } else if (dom_print) {
5280f742 537 g_string_append(pretty->string, ":");
c3c30b08 538 }
cf76ce92
PP
539
540 g_string_append(pretty->string, log_level_str);
541 g_string_append_printf(
542 pretty->string, " (%d)", (int) log_level);
60535549 543 dom_print = 1;
c3c30b08
MD
544 }
545 }
3228cc1d 546 if (pretty->options.print_emf_field) {
cf76ce92 547 const char *uri_str;
c3c30b08 548
cf76ce92 549 uri_str = bt_ctf_event_class_get_emf_uri(event_class);
c3c30b08 550 if (uri_str) {
3228cc1d 551 if (!pretty->start_line) {
5280f742 552 g_string_append(pretty->string, ", ");
c3c30b08 553 }
c3c30b08 554 if (print_names) {
3228cc1d 555 print_name_equal(pretty, "model.emf.uri");
60535549 556 } else if (dom_print) {
5280f742 557 g_string_append(pretty->string, ":");
c3c30b08 558 }
c3c30b08 559
cf76ce92 560 g_string_append(pretty->string, uri_str);
60535549 561 dom_print = 1;
c3c30b08
MD
562 }
563 }
60535549 564 if (dom_print && !print_names) {
5280f742 565 g_string_append(pretty->string, " ");
60535549 566 }
3228cc1d 567 if (!pretty->start_line) {
5280f742 568 g_string_append(pretty->string, ", ");
c3c30b08 569 }
3228cc1d 570 pretty->start_line = true;
6a18b281 571 if (print_names) {
3228cc1d 572 print_name_equal(pretty, "name");
ad96d936 573 }
3228cc1d 574 if (pretty->use_colors) {
5280f742 575 g_string_append(pretty->string, COLOR_EVENT_NAME);
6a18b281 576 }
5280f742 577 g_string_append(pretty->string, bt_ctf_event_class_get_name(event_class));
3228cc1d 578 if (pretty->use_colors) {
5280f742 579 g_string_append(pretty->string, COLOR_RST);
ad96d936 580 }
60535549 581 if (!print_names) {
5280f742 582 g_string_append(pretty->string, ": ");
60535549 583 } else {
5280f742 584 g_string_append(pretty->string, ", ");
60535549 585 }
af9a82eb 586end:
c3c30b08
MD
587 bt_put(trace_class);
588 bt_put(stream_class);
6a18b281
MD
589 bt_put(event_class);
590 return ret;
591}
592
593static
3228cc1d 594enum bt_component_status print_integer(struct pretty_component *pretty,
6a18b281
MD
595 struct bt_ctf_field *field)
596{
597 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
598 struct bt_ctf_field_type *field_type = NULL;
599 enum bt_ctf_integer_base base;
600 enum bt_ctf_string_encoding encoding;
601 int signedness;
602 union {
603 uint64_t u;
604 int64_t s;
605 } v;
ad96d936 606 bool rst_color = false;
6a18b281
MD
607
608 field_type = bt_ctf_field_get_type(field);
609 if (!field_type) {
610 ret = BT_COMPONENT_STATUS_ERROR;
611 goto end;
612 }
613 signedness = bt_ctf_field_type_integer_get_signed(field_type);
614 if (signedness < 0) {
615 ret = BT_COMPONENT_STATUS_ERROR;
616 goto end;
617 }
618 if (!signedness) {
619 if (bt_ctf_field_unsigned_integer_get_value(field, &v.u) < 0) {
620 ret = BT_COMPONENT_STATUS_ERROR;
621 goto end;
622 }
623 } else {
624 if (bt_ctf_field_signed_integer_get_value(field, &v.s) < 0) {
625 ret = BT_COMPONENT_STATUS_ERROR;
626 goto end;
627 }
628 }
629
630 encoding = bt_ctf_field_type_integer_get_encoding(field_type);
631 switch (encoding) {
632 case BT_CTF_STRING_ENCODING_UTF8:
633 case BT_CTF_STRING_ENCODING_ASCII:
5280f742 634 g_string_append_c(pretty->tmp_string, (int) v.u);
6a18b281
MD
635 goto end;
636 case BT_CTF_STRING_ENCODING_NONE:
637 case BT_CTF_STRING_ENCODING_UNKNOWN:
638 break;
639 default:
640 ret = BT_COMPONENT_STATUS_ERROR;
641 goto end;
642 }
643
3228cc1d 644 if (pretty->use_colors) {
5280f742 645 g_string_append(pretty->string, COLOR_NUMBER_VALUE);
ad96d936
PP
646 rst_color = true;
647 }
648
6a18b281
MD
649 base = bt_ctf_field_type_integer_get_base(field_type);
650 switch (base) {
651 case BT_CTF_INTEGER_BASE_BINARY:
652 {
653 int bitnr, len;
654
655 len = bt_ctf_field_type_integer_get_size(field_type);
656 if (len < 0) {
657 ret = BT_COMPONENT_STATUS_ERROR;
658 goto end;
659 }
5280f742 660 g_string_append(pretty->string, "0b");
6a18b281
MD
661 v.u = _bt_piecewise_lshift(v.u, 64 - len);
662 for (bitnr = 0; bitnr < len; bitnr++) {
5280f742 663 g_string_append_printf(pretty->string, "%u", (v.u & (1ULL << 63)) ? 1 : 0);
6a18b281
MD
664 v.u = _bt_piecewise_lshift(v.u, 1);
665 }
666 break;
667 }
668 case BT_CTF_INTEGER_BASE_OCTAL:
669 {
670 if (signedness) {
671 int len;
672
673 len = bt_ctf_field_type_integer_get_size(field_type);
674 if (len < 0) {
675 ret = BT_COMPONENT_STATUS_ERROR;
676 goto end;
677 }
678 if (len < 64) {
679 size_t rounded_len;
680
681 assert(len != 0);
682 /* Round length to the nearest 3-bit */
683 rounded_len = (((len - 1) / 3) + 1) * 3;
684 v.u &= ((uint64_t) 1 << rounded_len) - 1;
685 }
686 }
687
5280f742 688 g_string_append_printf(pretty->string, "0%" PRIo64, v.u);
6a18b281
MD
689 break;
690 }
691 case BT_CTF_INTEGER_BASE_DECIMAL:
d2bd5ad3 692 case BT_CTF_INTEGER_BASE_UNSPECIFIED:
6a18b281 693 if (!signedness) {
5280f742 694 g_string_append_printf(pretty->string, "%" PRIu64, v.u);
6a18b281 695 } else {
5280f742 696 g_string_append_printf(pretty->string, "%" PRId64, v.s);
6a18b281
MD
697 }
698 break;
699 case BT_CTF_INTEGER_BASE_HEXADECIMAL:
700 {
701 int len;
702
703 len = bt_ctf_field_type_integer_get_size(field_type);
704 if (len < 0) {
705 ret = BT_COMPONENT_STATUS_ERROR;
706 goto end;
707 }
708 if (len < 64) {
709 /* Round length to the nearest nibble */
710 uint8_t rounded_len = ((len + 3) & ~0x3);
711
712 v.u &= ((uint64_t) 1 << rounded_len) - 1;
713 }
714
5280f742 715 g_string_append_printf(pretty->string, "0x%" PRIX64, v.u);
6a18b281
MD
716 break;
717 }
718 default:
719 ret = BT_COMPONENT_STATUS_ERROR;
720 goto end;
721 }
722end:
ad96d936 723 if (rst_color) {
5280f742 724 g_string_append(pretty->string, COLOR_RST);
ad96d936 725 }
6a18b281
MD
726 bt_put(field_type);
727 return ret;
728}
729
93a4161c 730static
3228cc1d 731void print_escape_string(struct pretty_component *pretty, const char *str)
93a4161c
JD
732{
733 int i;
734
5280f742
PP
735 g_string_append_c(pretty->string, '"');
736
93a4161c
JD
737 for (i = 0; i < strlen(str); i++) {
738 /* Escape sequences not recognized by iscntrl(). */
739 switch (str[i]) {
740 case '\\':
5280f742 741 g_string_append(pretty->string, "\\\\");
93a4161c
JD
742 continue;
743 case '\'':
5280f742 744 g_string_append(pretty->string, "\\\'");
93a4161c
JD
745 continue;
746 case '\"':
5280f742 747 g_string_append(pretty->string, "\\\"");
93a4161c
JD
748 continue;
749 case '\?':
5280f742 750 g_string_append(pretty->string, "\\\?");
93a4161c
JD
751 continue;
752 }
753
754 /* Standard characters. */
755 if (!iscntrl(str[i])) {
5280f742 756 g_string_append_c(pretty->string, str[i]);
93a4161c
JD
757 continue;
758 }
759
760 switch (str[i]) {
761 case '\0':
5280f742 762 g_string_append(pretty->string, "\\0");
93a4161c
JD
763 break;
764 case '\a':
5280f742 765 g_string_append(pretty->string, "\\a");
93a4161c
JD
766 break;
767 case '\b':
5280f742 768 g_string_append(pretty->string, "\\b");
93a4161c
JD
769 break;
770 case '\e':
5280f742 771 g_string_append(pretty->string, "\\e");
93a4161c
JD
772 break;
773 case '\f':
5280f742 774 g_string_append(pretty->string, "\\f");
93a4161c
JD
775 break;
776 case '\n':
5280f742 777 g_string_append(pretty->string, "\\n");
93a4161c
JD
778 break;
779 case '\r':
5280f742 780 g_string_append(pretty->string, "\\r");
93a4161c
JD
781 break;
782 case '\t':
5280f742 783 g_string_append(pretty->string, "\\t");
93a4161c
JD
784 break;
785 case '\v':
5280f742 786 g_string_append(pretty->string, "\\v");
93a4161c
JD
787 break;
788 default:
789 /* Unhandled control-sequence, print as hex. */
5280f742 790 g_string_append_printf(pretty->string, "\\x%02x", str[i]);
93a4161c
JD
791 break;
792 }
793 }
5280f742
PP
794
795 g_string_append_c(pretty->string, '"');
93a4161c
JD
796}
797
6a18b281 798static
3228cc1d 799enum bt_component_status print_enum(struct pretty_component *pretty,
6a18b281
MD
800 struct bt_ctf_field *field)
801{
802 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
803 struct bt_ctf_field *container_field = NULL;
96e8f959
MD
804 struct bt_ctf_field_type *enumeration_field_type = NULL;
805 struct bt_ctf_field_type *container_field_type = NULL;
806 struct bt_ctf_field_type_enumeration_mapping_iterator *iter = NULL;
807 int nr_mappings = 0;
808 int is_signed;
809
810 enumeration_field_type = bt_ctf_field_get_type(field);
811 if (!enumeration_field_type) {
812 ret = BT_COMPONENT_STATUS_ERROR;
813 goto end;
814 }
6a18b281
MD
815 container_field = bt_ctf_field_enumeration_get_container(field);
816 if (!container_field) {
817 ret = BT_COMPONENT_STATUS_ERROR;
818 goto end;
819 }
96e8f959
MD
820 container_field_type = bt_ctf_field_get_type(container_field);
821 if (!container_field_type) {
822 ret = BT_COMPONENT_STATUS_ERROR;
823 goto end;
824 }
825 is_signed = bt_ctf_field_type_integer_get_signed(container_field_type);
826 if (is_signed < 0) {
827 ret = BT_COMPONENT_STATUS_ERROR;
828 goto end;
829 }
830 if (is_signed) {
831 int64_t value;
832
833 if (bt_ctf_field_signed_integer_get_value(container_field,
834 &value)) {
835 ret = BT_COMPONENT_STATUS_ERROR;
836 goto end;
837 }
838 iter = bt_ctf_field_type_enumeration_find_mappings_by_signed_value(
839 enumeration_field_type, value);
6a18b281 840 } else {
96e8f959
MD
841 uint64_t value;
842
843 if (bt_ctf_field_unsigned_integer_get_value(container_field,
844 &value)) {
845 ret = BT_COMPONENT_STATUS_ERROR;
846 goto end;
847 }
848 iter = bt_ctf_field_type_enumeration_find_mappings_by_unsigned_value(
849 enumeration_field_type, value);
850 }
851 if (!iter) {
852 ret = BT_COMPONENT_STATUS_ERROR;
853 goto end;
854 }
5280f742 855 g_string_append(pretty->string, "( ");
96e8f959
MD
856 for (;;) {
857 const char *mapping_name;
858
859 if (bt_ctf_field_type_enumeration_mapping_iterator_get_signed(
860 iter, &mapping_name, NULL, NULL) < 0) {
861 ret = BT_COMPONENT_STATUS_ERROR;
862 goto end;
863 }
864 if (nr_mappings++)
5280f742 865 g_string_append(pretty->string, ", ");
3228cc1d 866 if (pretty->use_colors) {
5280f742 867 g_string_append(pretty->string, COLOR_ENUM_MAPPING_NAME);
ad96d936 868 }
3228cc1d
PP
869 print_escape_string(pretty, mapping_name);
870 if (pretty->use_colors) {
5280f742 871 g_string_append(pretty->string, COLOR_RST);
ad96d936 872 }
96e8f959
MD
873 if (bt_ctf_field_type_enumeration_mapping_iterator_next(iter) < 0) {
874 break;
875 }
876 }
877 if (!nr_mappings) {
3228cc1d 878 if (pretty->use_colors) {
5280f742 879 g_string_append(pretty->string, COLOR_UNKNOWN);
ad96d936 880 }
5280f742 881 g_string_append(pretty->string, "<unknown>");
3228cc1d 882 if (pretty->use_colors) {
5280f742 883 g_string_append(pretty->string, COLOR_RST);
ad96d936 884 }
6a18b281 885 }
5280f742 886 g_string_append(pretty->string, " : container = ");
3228cc1d 887 ret = print_integer(pretty, container_field);
6a18b281
MD
888 if (ret != BT_COMPONENT_STATUS_OK) {
889 goto end;
890 }
5280f742 891 g_string_append(pretty->string, " )");
6a18b281 892end:
96e8f959
MD
893 bt_put(iter);
894 bt_put(container_field_type);
6a18b281 895 bt_put(container_field);
96e8f959 896 bt_put(enumeration_field_type);
6a18b281
MD
897 return ret;
898}
899
2b4c4a7c 900static
3228cc1d 901int filter_field_name(struct pretty_component *pretty, const char *field_name,
2b4c4a7c
JD
902 GQuark *filter_fields, int filter_array_len)
903{
904 int i;
905 GQuark field_quark = g_quark_try_string(field_name);
906
3228cc1d 907 if (!field_quark || pretty->options.verbose) {
2b4c4a7c
JD
908 return 1;
909 }
910
911 for (i = 0; i < filter_array_len; i++) {
912 if (field_quark == filter_fields[i]) {
913 return 0;
914 }
915 }
916 return 1;
917}
918
6a18b281 919static
3228cc1d 920enum bt_component_status print_struct_field(struct pretty_component *pretty,
6a18b281
MD
921 struct bt_ctf_field *_struct,
922 struct bt_ctf_field_type *struct_type,
2b4c4a7c
JD
923 int i, bool print_names, int *nr_printed_fields,
924 GQuark *filter_fields, int filter_array_len)
6a18b281
MD
925{
926 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
927 const char *field_name;
928 struct bt_ctf_field *field = NULL;
929 struct bt_ctf_field_type *field_type = NULL;;
930
931 field = bt_ctf_field_structure_get_field_by_index(_struct, i);
932 if (!field) {
933 ret = BT_COMPONENT_STATUS_ERROR;
934 goto end;
935 }
936 if (bt_ctf_field_type_structure_get_field(struct_type,
937 &field_name, &field_type, i) < 0) {
938 ret = BT_COMPONENT_STATUS_ERROR;
939 goto end;
940 }
941
3228cc1d 942 if (filter_fields && !filter_field_name(pretty, field_name,
2b4c4a7c
JD
943 filter_fields, filter_array_len)) {
944 ret = BT_COMPONENT_STATUS_OK;
945 goto end;
946 }
947
948 if (*nr_printed_fields > 0) {
5280f742 949 g_string_append(pretty->string, ", ");
6a18b281 950 } else {
5280f742 951 g_string_append(pretty->string, " ");
6a18b281
MD
952 }
953 if (print_names) {
3228cc1d 954 print_field_name_equal(pretty, rem_(field_name));
6a18b281 955 }
3228cc1d 956 ret = print_field(pretty, field, print_names, NULL, 0);
2b4c4a7c 957 *nr_printed_fields += 1;
6a18b281
MD
958end:
959 bt_put(field_type);
960 bt_put(field);
961 return ret;
962}
963
964static
3228cc1d 965enum bt_component_status print_struct(struct pretty_component *pretty,
2b4c4a7c
JD
966 struct bt_ctf_field *_struct, bool print_names,
967 GQuark *filter_fields, int filter_array_len)
6a18b281
MD
968{
969 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
970 struct bt_ctf_field_type *struct_type = NULL;
2b4c4a7c 971 int nr_fields, i, nr_printed_fields;
6a18b281
MD
972
973 struct_type = bt_ctf_field_get_type(_struct);
974 if (!struct_type) {
975 ret = BT_COMPONENT_STATUS_ERROR;
976 goto end;
977 }
978 nr_fields = bt_ctf_field_type_structure_get_field_count(struct_type);
979 if (nr_fields < 0) {
980 ret = BT_COMPONENT_STATUS_ERROR;
981 goto end;
982 }
5280f742 983 g_string_append(pretty->string, "{");
3228cc1d 984 pretty->depth++;
2b4c4a7c 985 nr_printed_fields = 0;
6a18b281 986 for (i = 0; i < nr_fields; i++) {
3228cc1d 987 ret = print_struct_field(pretty, _struct, struct_type, i,
2b4c4a7c
JD
988 print_names, &nr_printed_fields, filter_fields,
989 filter_array_len);
6a18b281
MD
990 if (ret != BT_COMPONENT_STATUS_OK) {
991 goto end;
992 }
993 }
3228cc1d 994 pretty->depth--;
5280f742 995 g_string_append(pretty->string, " }");
6a18b281
MD
996end:
997 bt_put(struct_type);
998 return ret;
999}
1000
1001static
3228cc1d 1002enum bt_component_status print_array_field(struct pretty_component *pretty,
6a18b281
MD
1003 struct bt_ctf_field *array, uint64_t i,
1004 bool is_string, bool print_names)
1005{
1006 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1007 struct bt_ctf_field *field = NULL;
1008
1009 if (!is_string) {
1010 if (i != 0) {
5280f742 1011 g_string_append(pretty->string, ", ");
6a18b281 1012 } else {
5280f742 1013 g_string_append(pretty->string, " ");
6a18b281 1014 }
60535549 1015 if (print_names) {
5280f742 1016 g_string_append_printf(pretty->string, "[%" PRIu64 "] = ", i);
60535549 1017 }
6a18b281
MD
1018 }
1019 field = bt_ctf_field_array_get_field(array, i);
1020 if (!field) {
1021 ret = BT_COMPONENT_STATUS_ERROR;
1022 goto end;
1023 }
3228cc1d 1024 ret = print_field(pretty, field, print_names, NULL, 0);
6a18b281
MD
1025end:
1026 bt_put(field);
1027 return ret;
1028}
1029
1030static
3228cc1d 1031enum bt_component_status print_array(struct pretty_component *pretty,
6a18b281
MD
1032 struct bt_ctf_field *array, bool print_names)
1033{
1034 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1035 struct bt_ctf_field_type *array_type = NULL, *field_type = NULL;
1487a16a 1036 enum bt_ctf_field_type_id type_id;
6a18b281
MD
1037 int64_t len;
1038 uint64_t i;
1039 bool is_string = false;
1040
1041 array_type = bt_ctf_field_get_type(array);
1042 if (!array_type) {
1043 ret = BT_COMPONENT_STATUS_ERROR;
1044 goto end;
1045 }
1046 field_type = bt_ctf_field_type_array_get_element_type(array_type);
1047 if (!field_type) {
1048 ret = BT_COMPONENT_STATUS_ERROR;
1049 goto end;
1050 }
1051 len = bt_ctf_field_type_array_get_length(array_type);
1052 if (len < 0) {
1053 ret = BT_COMPONENT_STATUS_ERROR;
1054 goto end;
1055 }
1056 type_id = bt_ctf_field_type_get_type_id(field_type);
1487a16a 1057 if (type_id == BT_CTF_FIELD_TYPE_ID_INTEGER) {
6a18b281
MD
1058 enum bt_ctf_string_encoding encoding;
1059
1060 encoding = bt_ctf_field_type_integer_get_encoding(field_type);
1061 if (encoding == BT_CTF_STRING_ENCODING_UTF8
1062 || encoding == BT_CTF_STRING_ENCODING_ASCII) {
1063 int integer_len, integer_alignment;
1064
1065 integer_len = bt_ctf_field_type_integer_get_size(field_type);
1066 if (integer_len < 0) {
1067 return BT_COMPONENT_STATUS_ERROR;
1068 }
1069 integer_alignment = bt_ctf_field_type_get_alignment(field_type);
1070 if (integer_alignment < 0) {
1071 return BT_COMPONENT_STATUS_ERROR;
1072 }
1073 if (integer_len == CHAR_BIT
1074 && integer_alignment == CHAR_BIT) {
1075 is_string = true;
1076 }
1077 }
1078 }
1079
1080 if (is_string) {
5280f742 1081 g_string_assign(pretty->tmp_string, "");
6a18b281 1082 } else {
5280f742 1083 g_string_append(pretty->string, "[");
6a18b281
MD
1084 }
1085
3228cc1d 1086 pretty->depth++;
6a18b281 1087 for (i = 0; i < len; i++) {
3228cc1d 1088 ret = print_array_field(pretty, array, i, is_string, print_names);
6a18b281
MD
1089 if (ret != BT_COMPONENT_STATUS_OK) {
1090 goto end;
1091 }
1092 }
3228cc1d 1093 pretty->depth--;
6a18b281
MD
1094
1095 if (is_string) {
3228cc1d 1096 if (pretty->use_colors) {
5280f742 1097 g_string_append(pretty->string, COLOR_STRING_VALUE);
ad96d936 1098 }
5280f742 1099 print_escape_string(pretty, pretty->tmp_string->str);
3228cc1d 1100 if (pretty->use_colors) {
5280f742 1101 g_string_append(pretty->string, COLOR_RST);
ad96d936 1102 }
6a18b281 1103 } else {
5280f742 1104 g_string_append(pretty->string, " ]");
6a18b281
MD
1105 }
1106end:
1107 bt_put(field_type);
1108 bt_put(array_type);
1109 return ret;
1110}
1111
1112static
3228cc1d 1113enum bt_component_status print_sequence_field(struct pretty_component *pretty,
6a18b281
MD
1114 struct bt_ctf_field *seq, uint64_t i,
1115 bool is_string, bool print_names)
1116{
1117 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1118 struct bt_ctf_field *field = NULL;
1119
1120 if (!is_string) {
1121 if (i != 0) {
5280f742 1122 g_string_append(pretty->string, ", ");
6a18b281 1123 } else {
5280f742 1124 g_string_append(pretty->string, " ");
6a18b281 1125 }
60535549 1126 if (print_names) {
5280f742 1127 g_string_append_printf(pretty->string, "[%" PRIu64 "] = ", i);
60535549 1128 }
6a18b281
MD
1129 }
1130 field = bt_ctf_field_sequence_get_field(seq, i);
1131 if (!field) {
1132 ret = BT_COMPONENT_STATUS_ERROR;
1133 goto end;
1134 }
3228cc1d 1135 ret = print_field(pretty, field, print_names, NULL, 0);
6a18b281
MD
1136end:
1137 bt_put(field);
1138 return ret;
1139}
1140
1141static
3228cc1d 1142enum bt_component_status print_sequence(struct pretty_component *pretty,
6a18b281
MD
1143 struct bt_ctf_field *seq, bool print_names)
1144{
1145 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1146 struct bt_ctf_field_type *seq_type = NULL, *field_type = NULL;
1147 struct bt_ctf_field *length_field = NULL;
1487a16a 1148 enum bt_ctf_field_type_id type_id;
6a18b281
MD
1149 uint64_t len;
1150 uint64_t i;
1151 bool is_string = false;
1152
1153 seq_type = bt_ctf_field_get_type(seq);
1154 if (!seq_type) {
1155 ret = BT_COMPONENT_STATUS_ERROR;
1156 goto end;
1157 }
1158 length_field = bt_ctf_field_sequence_get_length(seq);
1159 if (!length_field) {
1160 ret = BT_COMPONENT_STATUS_ERROR;
1161 goto end;
1162 }
1163 if (bt_ctf_field_unsigned_integer_get_value(length_field, &len) < 0) {
1164 ret = BT_COMPONENT_STATUS_ERROR;
1165 goto end;
1166 }
1167 field_type = bt_ctf_field_type_sequence_get_element_type(seq_type);
1168 if (!field_type) {
1169 ret = BT_COMPONENT_STATUS_ERROR;
1170 goto end;
1171 }
1172 type_id = bt_ctf_field_type_get_type_id(field_type);
1487a16a 1173 if (type_id == BT_CTF_FIELD_TYPE_ID_INTEGER) {
6a18b281
MD
1174 enum bt_ctf_string_encoding encoding;
1175
1176 encoding = bt_ctf_field_type_integer_get_encoding(field_type);
1177 if (encoding == BT_CTF_STRING_ENCODING_UTF8
1178 || encoding == BT_CTF_STRING_ENCODING_ASCII) {
1179 int integer_len, integer_alignment;
1180
1181 integer_len = bt_ctf_field_type_integer_get_size(field_type);
1182 if (integer_len < 0) {
1183 ret = BT_COMPONENT_STATUS_ERROR;
1184 goto end;
1185 }
1186 integer_alignment = bt_ctf_field_type_get_alignment(field_type);
1187 if (integer_alignment < 0) {
1188 ret = BT_COMPONENT_STATUS_ERROR;
1189 goto end;
1190 }
1191 if (integer_len == CHAR_BIT
1192 && integer_alignment == CHAR_BIT) {
1193 is_string = true;
1194 }
1195 }
1196 }
1197
1198 if (is_string) {
5280f742 1199 g_string_assign(pretty->tmp_string, "");
6a18b281 1200 } else {
5280f742 1201 g_string_append(pretty->string, "[");
6a18b281
MD
1202 }
1203
3228cc1d 1204 pretty->depth++;
6a18b281 1205 for (i = 0; i < len; i++) {
3228cc1d 1206 ret = print_sequence_field(pretty, seq, i,
6a18b281
MD
1207 is_string, print_names);
1208 if (ret != BT_COMPONENT_STATUS_OK) {
1209 goto end;
1210 }
1211 }
3228cc1d 1212 pretty->depth--;
6a18b281
MD
1213
1214 if (is_string) {
3228cc1d 1215 if (pretty->use_colors) {
5280f742 1216 g_string_append(pretty->string, COLOR_STRING_VALUE);
ad96d936 1217 }
5280f742 1218 print_escape_string(pretty, pretty->tmp_string->str);
3228cc1d 1219 if (pretty->use_colors) {
5280f742 1220 g_string_append(pretty->string, COLOR_RST);
ad96d936 1221 }
6a18b281 1222 } else {
5280f742 1223 g_string_append(pretty->string, " ]");
6a18b281
MD
1224 }
1225end:
1226 bt_put(length_field);
1227 bt_put(field_type);
1228 bt_put(seq_type);
1229 return ret;
1230}
1231
1232static
3228cc1d 1233enum bt_component_status print_variant(struct pretty_component *pretty,
6a18b281
MD
1234 struct bt_ctf_field *variant, bool print_names)
1235{
1236 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1237 struct bt_ctf_field *field = NULL;
1238
1239 field = bt_ctf_field_variant_get_current_field(variant);
1240 if (!field) {
1241 ret = BT_COMPONENT_STATUS_ERROR;
1242 goto end;
1243 }
5280f742 1244 g_string_append(pretty->string, "{ ");
3228cc1d 1245 pretty->depth++;
6a18b281 1246 if (print_names) {
e0f15669 1247 int iter_ret;
6a18b281
MD
1248 struct bt_ctf_field *tag_field = NULL;
1249 const char *tag_choice;
e0f15669 1250 struct bt_ctf_field_type_enumeration_mapping_iterator *iter;
6a18b281
MD
1251
1252 tag_field = bt_ctf_field_variant_get_tag(variant);
1253 if (!tag_field) {
1254 ret = BT_COMPONENT_STATUS_ERROR;
1255 goto end;
1256 }
e0f15669
JG
1257
1258 iter = bt_ctf_field_enumeration_get_mappings(tag_field);
1259 if (!iter) {
1260 bt_put(tag_field);
1261 ret = BT_COMPONENT_STATUS_ERROR;
1262 goto end;
1263 }
1264
1265 iter_ret =
8803be2a
JG
1266 bt_ctf_field_type_enumeration_mapping_iterator_get_signed(
1267 iter, &tag_choice, NULL, NULL);
e0f15669
JG
1268 if (iter_ret) {
1269 bt_put(iter);
6a18b281
MD
1270 bt_put(tag_field);
1271 ret = BT_COMPONENT_STATUS_ERROR;
1272 goto end;
1273 }
3228cc1d 1274 print_field_name_equal(pretty, rem_(tag_choice));
6a18b281 1275 bt_put(tag_field);
e0f15669 1276 bt_put(iter);
6a18b281 1277 }
3228cc1d 1278 ret = print_field(pretty, field, print_names, NULL, 0);
6a18b281
MD
1279 if (ret != BT_COMPONENT_STATUS_OK) {
1280 goto end;
1281 }
3228cc1d 1282 pretty->depth--;
5280f742 1283 g_string_append(pretty->string, " }");
6a18b281
MD
1284end:
1285 bt_put(field);
1286 return ret;
1287}
1288
1289static
3228cc1d 1290enum bt_component_status print_field(struct pretty_component *pretty,
2b4c4a7c
JD
1291 struct bt_ctf_field *field, bool print_names,
1292 GQuark *filter_fields, int filter_array_len)
6a18b281 1293{
1487a16a 1294 enum bt_ctf_field_type_id type_id;
6a18b281
MD
1295
1296 type_id = bt_ctf_field_get_type_id(field);
1297 switch (type_id) {
1298 case CTF_TYPE_INTEGER:
3228cc1d 1299 return print_integer(pretty, field);
6a18b281
MD
1300 case CTF_TYPE_FLOAT:
1301 {
1302 double v;
1303
1304 if (bt_ctf_field_floating_point_get_value(field, &v)) {
1305 return BT_COMPONENT_STATUS_ERROR;
1306 }
3228cc1d 1307 if (pretty->use_colors) {
5280f742 1308 g_string_append(pretty->string, COLOR_NUMBER_VALUE);
ad96d936 1309 }
5280f742 1310 g_string_append_printf(pretty->string, "%g", v);
3228cc1d 1311 if (pretty->use_colors) {
5280f742 1312 g_string_append(pretty->string, COLOR_RST);
ad96d936 1313 }
6a18b281
MD
1314 return BT_COMPONENT_STATUS_OK;
1315 }
1316 case CTF_TYPE_ENUM:
3228cc1d 1317 return print_enum(pretty, field);
6a18b281 1318 case CTF_TYPE_STRING:
3228cc1d 1319 if (pretty->use_colors) {
5280f742 1320 g_string_append(pretty->string, COLOR_STRING_VALUE);
ad96d936 1321 }
3228cc1d
PP
1322 print_escape_string(pretty, bt_ctf_field_string_get_value(field));
1323 if (pretty->use_colors) {
5280f742 1324 g_string_append(pretty->string, COLOR_RST);
ad96d936 1325 }
6a18b281
MD
1326 return BT_COMPONENT_STATUS_OK;
1327 case CTF_TYPE_STRUCT:
3228cc1d 1328 return print_struct(pretty, field, print_names, filter_fields,
2b4c4a7c 1329 filter_array_len);
6a18b281 1330 case CTF_TYPE_VARIANT:
3228cc1d 1331 return print_variant(pretty, field, print_names);
6a18b281 1332 case CTF_TYPE_ARRAY:
3228cc1d 1333 return print_array(pretty, field, print_names);
6a18b281 1334 case CTF_TYPE_SEQUENCE:
3228cc1d 1335 return print_sequence(pretty, field, print_names);
6a18b281 1336 default:
5280f742 1337 // TODO: log instead
3228cc1d 1338 fprintf(pretty->err, "[error] Unknown type id: %d\n", (int) type_id);
6a18b281
MD
1339 return BT_COMPONENT_STATUS_ERROR;
1340 }
1341}
1342
1343static
3228cc1d 1344enum bt_component_status print_stream_packet_context(struct pretty_component *pretty,
6a18b281
MD
1345 struct bt_ctf_event *event)
1346{
1347 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1348 struct bt_ctf_packet *packet = NULL;
1349 struct bt_ctf_field *main_field = NULL;
1350
1351 packet = bt_ctf_event_get_packet(event);
1352 if (!packet) {
1353 ret = BT_COMPONENT_STATUS_ERROR;
1354 goto end;
1355 }
1356 main_field = bt_ctf_packet_get_context(packet);
1357 if (!main_field) {
6a18b281
MD
1358 goto end;
1359 }
3228cc1d 1360 if (!pretty->start_line) {
5280f742 1361 g_string_append(pretty->string, ", ");
6e1bc0df 1362 }
3228cc1d
PP
1363 pretty->start_line = false;
1364 if (pretty->options.print_scope_field_names) {
1365 print_name_equal(pretty, "stream.packet.context");
6a18b281 1366 }
3228cc1d
PP
1367 ret = print_field(pretty, main_field,
1368 pretty->options.print_context_field_names,
2b4c4a7c
JD
1369 stream_packet_context_quarks,
1370 STREAM_PACKET_CONTEXT_QUARKS_LEN);
6a18b281
MD
1371end:
1372 bt_put(main_field);
1373 bt_put(packet);
1374 return ret;
1375}
1376
1377static
3228cc1d 1378enum bt_component_status print_event_header_raw(struct pretty_component *pretty,
6a18b281
MD
1379 struct bt_ctf_event *event)
1380{
1381 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1382 struct bt_ctf_field *main_field = NULL;
1383
1384 main_field = bt_ctf_event_get_header(event);
1385 if (!main_field) {
6a18b281
MD
1386 goto end;
1387 }
3228cc1d 1388 if (!pretty->start_line) {
5280f742 1389 g_string_append(pretty->string, ", ");
6e1bc0df 1390 }
3228cc1d
PP
1391 pretty->start_line = false;
1392 if (pretty->options.print_scope_field_names) {
1393 print_name_equal(pretty, "stream.event.header");
6a18b281 1394 }
3228cc1d
PP
1395 ret = print_field(pretty, main_field,
1396 pretty->options.print_header_field_names, NULL, 0);
6a18b281
MD
1397end:
1398 bt_put(main_field);
1399 return ret;
1400}
1401
1402static
3228cc1d 1403enum bt_component_status print_stream_event_context(struct pretty_component *pretty,
6a18b281
MD
1404 struct bt_ctf_event *event)
1405{
1406 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1407 struct bt_ctf_field *main_field = NULL;
1408
1409 main_field = bt_ctf_event_get_stream_event_context(event);
1410 if (!main_field) {
6a18b281
MD
1411 goto end;
1412 }
3228cc1d 1413 if (!pretty->start_line) {
5280f742 1414 g_string_append(pretty->string, ", ");
6e1bc0df 1415 }
3228cc1d
PP
1416 pretty->start_line = false;
1417 if (pretty->options.print_scope_field_names) {
1418 print_name_equal(pretty, "stream.event.context");
6a18b281 1419 }
3228cc1d
PP
1420 ret = print_field(pretty, main_field,
1421 pretty->options.print_context_field_names, NULL, 0);
6a18b281
MD
1422end:
1423 bt_put(main_field);
1424 return ret;
1425}
1426
1427static
3228cc1d 1428enum bt_component_status print_event_context(struct pretty_component *pretty,
6a18b281
MD
1429 struct bt_ctf_event *event)
1430{
1431 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1432 struct bt_ctf_field *main_field = NULL;
1433
1434 main_field = bt_ctf_event_get_event_context(event);
1435 if (!main_field) {
6a18b281
MD
1436 goto end;
1437 }
3228cc1d 1438 if (!pretty->start_line) {
5280f742 1439 g_string_append(pretty->string, ", ");
6e1bc0df 1440 }
3228cc1d
PP
1441 pretty->start_line = false;
1442 if (pretty->options.print_scope_field_names) {
1443 print_name_equal(pretty, "event.context");
6a18b281 1444 }
3228cc1d
PP
1445 ret = print_field(pretty, main_field,
1446 pretty->options.print_context_field_names, NULL, 0);
6a18b281
MD
1447end:
1448 bt_put(main_field);
1449 return ret;
1450}
1451
1452static
3228cc1d 1453enum bt_component_status print_event_payload(struct pretty_component *pretty,
6a18b281
MD
1454 struct bt_ctf_event *event)
1455{
1456 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1457 struct bt_ctf_field *main_field = NULL;
1458
9ac68eb1 1459 main_field = bt_ctf_event_get_event_payload(event);
6a18b281 1460 if (!main_field) {
6a18b281
MD
1461 goto end;
1462 }
3228cc1d 1463 if (!pretty->start_line) {
5280f742 1464 g_string_append(pretty->string, ", ");
6e1bc0df 1465 }
3228cc1d
PP
1466 pretty->start_line = false;
1467 if (pretty->options.print_scope_field_names) {
1468 print_name_equal(pretty, "event.fields");
6a18b281 1469 }
3228cc1d
PP
1470 ret = print_field(pretty, main_field,
1471 pretty->options.print_payload_field_names, NULL, 0);
6a18b281
MD
1472end:
1473 bt_put(main_field);
af9a82eb
JG
1474 return ret;
1475}
1476
08899d39
PP
1477static
1478int flush_buf(struct pretty_component *pretty)
1479{
1480 int ret = 0;
1481
1482 if (pretty->string->len == 0) {
1483 goto end;
1484 }
1485
1486 if (fwrite(pretty->string->str, pretty->string->len, 1, pretty->out) != 1) {
1487 ret = -1;
1488 }
1489
1490end:
1491 return ret;
1492}
1493
af9a82eb 1494BT_HIDDEN
3228cc1d 1495enum bt_component_status pretty_print_event(struct pretty_component *pretty,
d9f65f09 1496 struct bt_notification *event_notif)
af9a82eb
JG
1497{
1498 enum bt_component_status ret;
d9f65f09
PP
1499 struct bt_ctf_event *event =
1500 bt_notification_event_get_event(event_notif);
1501 struct bt_clock_class_priority_map *cc_prio_map =
1502 bt_notification_event_get_clock_class_priority_map(event_notif);
af9a82eb 1503
d9f65f09
PP
1504 assert(event);
1505 assert(cc_prio_map);
3228cc1d 1506 pretty->start_line = true;
5280f742 1507 g_string_assign(pretty->string, "");
d9f65f09 1508 ret = print_event_header(pretty, event, cc_prio_map);
af9a82eb
JG
1509 if (ret != BT_COMPONENT_STATUS_OK) {
1510 goto end;
1511 }
6a18b281 1512
3228cc1d 1513 ret = print_stream_packet_context(pretty, event);
6a18b281
MD
1514 if (ret != BT_COMPONENT_STATUS_OK) {
1515 goto end;
1516 }
6a18b281 1517
3228cc1d
PP
1518 if (pretty->options.verbose) {
1519 ret = print_event_header_raw(pretty, event);
60535549
JD
1520 if (ret != BT_COMPONENT_STATUS_OK) {
1521 goto end;
1522 }
6a18b281 1523 }
6a18b281 1524
3228cc1d 1525 ret = print_stream_event_context(pretty, event);
6a18b281
MD
1526 if (ret != BT_COMPONENT_STATUS_OK) {
1527 goto end;
1528 }
6a18b281 1529
3228cc1d 1530 ret = print_event_context(pretty, event);
6a18b281
MD
1531 if (ret != BT_COMPONENT_STATUS_OK) {
1532 goto end;
1533 }
6a18b281 1534
3228cc1d 1535 ret = print_event_payload(pretty, event);
6a18b281
MD
1536 if (ret != BT_COMPONENT_STATUS_OK) {
1537 goto end;
1538 }
af9a82eb 1539
5280f742 1540 g_string_append_c(pretty->string, '\n');
08899d39 1541 if (flush_buf(pretty)) {
5280f742
PP
1542 ret = BT_COMPONENT_STATUS_ERROR;
1543 goto end;
1544 }
1545
af9a82eb 1546end:
d9f65f09
PP
1547 bt_put(event);
1548 bt_put(cc_prio_map);
af9a82eb
JG
1549 return ret;
1550}
08899d39
PP
1551
1552BT_HIDDEN
1553enum bt_component_status pretty_print_discarded_elements(
1554 struct pretty_component *pretty,
1555 struct bt_notification *notif)
1556{
1557 enum bt_component_status ret = BT_COMPONENT_STATUS_OK;
1558 struct bt_ctf_stream *stream = NULL;
1559 struct bt_ctf_stream_class *stream_class = NULL;
1560 struct bt_ctf_trace *trace = NULL;
1561 const char *stream_name;
1562 const char *trace_name;
1563 const unsigned char *trace_uuid;
1564 int64_t stream_class_id;
1565 int64_t stream_id;
1566 bool is_discarded_events;
1567
1568 /* Stream name */
1569 switch (bt_notification_get_type(notif)) {
1570 case BT_NOTIFICATION_TYPE_DISCARDED_EVENTS:
1571 stream = bt_notification_discarded_events_get_stream(notif);
1572 is_discarded_events = true;
1573 break;
1574 case BT_NOTIFICATION_TYPE_DISCARDED_PACKETS:
1575 stream = bt_notification_discarded_packets_get_stream(notif);
1576 is_discarded_events = false;
1577 break;
1578 default:
1579 abort();
1580 }
1581
1582 assert(stream);
1583 stream_name = bt_ctf_stream_get_name(stream);
1584
1585 /* Stream class ID */
1586 stream_class = bt_ctf_stream_get_class(stream);
1587 assert(stream_class);
1588 stream_class_id = bt_ctf_stream_class_get_id(stream_class);
1589
1590 /* Stream ID */
1591 stream_id = bt_ctf_stream_get_id(stream);
1592
1593 /* Trace path */
1594 trace = bt_ctf_stream_class_get_trace(stream_class);
1595 assert(trace);
1596 trace_name = bt_ctf_trace_get_name(trace);
1597 if (!trace_name) {
1598 trace_name = "(unknown)";
1599 }
1600
1601 /* Trace UUID */
1602 trace_uuid = bt_ctf_trace_get_uuid(trace);
1603
1604 /*
1605 * Print to standard error stream to remain backward compatible
1606 * with Babeltrace 1.
1607 */
1608 fprintf(stderr,
1609 "%s%sWARNING%s%s: Tracer discarded %" PRId64 " %s between [",
1610 bt_common_color_fg_yellow(),
1611 bt_common_color_bold(),
1612 bt_common_color_reset(),
1613 bt_common_color_fg_yellow(),
1614 is_discarded_events ?
1615 bt_notification_discarded_events_get_count(notif) :
1616 bt_notification_discarded_packets_get_count(notif),
1617 is_discarded_events ? "events" : "packets");
1618 g_string_assign(pretty->string, "");
1619 print_timestamp_wall(pretty,
1620 is_discarded_events ?
1621 bt_notification_discarded_events_get_begin_clock_value(notif) :
1622 bt_notification_discarded_packets_get_begin_clock_value(notif));
1623 fprintf(stderr, "%s] and [", pretty->string->str);
1624 g_string_assign(pretty->string, "");
1625 print_timestamp_wall(pretty,
1626 is_discarded_events ?
1627 bt_notification_discarded_events_get_end_clock_value(notif) :
1628 bt_notification_discarded_packets_get_end_clock_value(notif));
1629 fprintf(stderr, "%s] in trace \"%s\" ",
1630 pretty->string->str, trace_name);
1631
1632 if (trace_uuid) {
1633 fprintf(stderr,
1634 "(UUID: %02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x) ",
1635 trace_uuid[0],
1636 trace_uuid[1],
1637 trace_uuid[2],
1638 trace_uuid[3],
1639 trace_uuid[4],
1640 trace_uuid[5],
1641 trace_uuid[6],
1642 trace_uuid[7],
1643 trace_uuid[8],
1644 trace_uuid[9],
1645 trace_uuid[10],
1646 trace_uuid[11],
1647 trace_uuid[12],
1648 trace_uuid[13],
1649 trace_uuid[14],
1650 trace_uuid[15]);
1651 } else {
1652 fprintf(stderr, "(no UUID) ");
1653 }
1654
1655 fprintf(stderr, "within stream \"%s\" (stream class ID: %" PRId64 ", ",
1656 stream_name, stream_class_id);
1657
1658 if (stream_id >= 0) {
1659 fprintf(stderr, "stream ID: %" PRId64, stream_id);
1660 } else {
1661 fprintf(stderr, "no stream ID");
1662 }
1663
1664 fprintf(stderr, ").%s\n", bt_common_color_reset());
1665 bt_put(stream);
1666 bt_put(stream_class);
1667 bt_put(trace);
1668 return ret;
1669}
This page took 0.11117 seconds and 4 git commands to generate.