projects / libside.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Fix g++ build
[libside.git] / src / tracer.c
CommitLineData
f611d0c3
MD		 1// SPDX-License-Identifier: MIT
2/*
3 * Copyright 2022 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
4 */
5
6#include <stdint.h>
7#include <inttypes.h>
8#include <stdlib.h>
9#include <stdio.h>
ea32e5fc 10#include <stdbool.h>
1d9c515c 11#include <string.h>
f611d0c3
MD		 12
13#include <side/trace.h>
14
1d9c515c
MD		 15enum tracer_display_base {
16 TRACER_DISPLAY_BASE_2,
17 TRACER_DISPLAY_BASE_8,
18 TRACER_DISPLAY_BASE_10,
19 TRACER_DISPLAY_BASE_16,
20};
21
1e8aec23
MD		 22static struct side_tracer_handle *tracer_handle;
23
f611d0c3 24static
9a6ca773 25void tracer_print_struct(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
f611d0c3 26static
9a6ca773 27void tracer_print_array(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
f611d0c3 28static
9a6ca773 29void tracer_print_vla(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
f611d0c3 30static
66de373e 31void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx);
ba845af5 32static
66de373e 33void tracer_print_dynamic(const struct side_arg *dynamic_item);
d8be25de 34static
8ad2f385
MD		 35uint32_t tracer_print_gather_bool_type(const struct side_type_gather *type_gather, const void *_ptr);
36static
d69918cc 37uint32_t tracer_print_gather_byte_type(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 38static
4e1b0e0e
MD		 39uint32_t tracer_print_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr,
40 enum tracer_display_base default_base);
d9359cfa 41static
d41cb7ee 42uint32_t tracer_print_gather_float_type(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 43static
d69918cc
MD		 44uint32_t tracer_print_gather_struct(const struct side_type_gather *type_gather, const void *_ptr);
45static
d41cb7ee 46uint32_t tracer_print_gather_array(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 47static
80429681
MD		 48uint32_t tracer_print_gather_vla(const struct side_type_gather *type_gather, const void *_ptr,
49 const void *_length_ptr);
65b8734a 50static
66de373e 51void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item);
f611d0c3 52
1d9c515c
MD		 53static
54int64_t get_attr_integer_value(const struct side_attr *attr)
55{
56 int64_t val;
57
58 switch (attr->value.type) {
59 case SIDE_ATTR_TYPE_U8:
43d85239 60 val = attr->value.u.integer_value.side_u8;
1d9c515c
MD		 61 break;
62 case SIDE_ATTR_TYPE_U16:
43d85239 63 val = attr->value.u.integer_value.side_u16;
1d9c515c
MD		 64 break;
65 case SIDE_ATTR_TYPE_U32:
43d85239 66 val = attr->value.u.integer_value.side_u32;
1d9c515c
MD		 67 break;
68 case SIDE_ATTR_TYPE_U64:
43d85239 69 val = attr->value.u.integer_value.side_u64;
1d9c515c
MD		 70 break;
71 case SIDE_ATTR_TYPE_S8:
43d85239 72 val = attr->value.u.integer_value.side_s8;
1d9c515c
MD		 73 break;
74 case SIDE_ATTR_TYPE_S16:
43d85239 75 val = attr->value.u.integer_value.side_s16;
1d9c515c
MD		 76 break;
77 case SIDE_ATTR_TYPE_S32:
43d85239 78 val = attr->value.u.integer_value.side_s32;
1d9c515c
MD		 79 break;
80 case SIDE_ATTR_TYPE_S64:
43d85239 81 val = attr->value.u.integer_value.side_s64;
1d9c515c
MD		 82 break;
83 default:
84 fprintf(stderr, "Unexpected attribute type\n");
85 abort();
86 }
87 return val;
88}
89
90static
f0dafd60
MD		 91enum tracer_display_base get_attr_display_base(const struct side_attr *_attr, uint32_t nr_attr,
92 enum tracer_display_base default_base)
1d9c515c
MD		 93{
94 uint32_t i;
95
96 for (i = 0; i < nr_attr; i++) {
97 const struct side_attr *attr = &_attr[i];
98
99 if (!strcmp(attr->key, "std.integer.base")) {
100 int64_t val = get_attr_integer_value(attr);
101
102 switch (val) {
103 case 2:
104 return TRACER_DISPLAY_BASE_2;
105 case 8:
106 return TRACER_DISPLAY_BASE_8;
107 case 10:
108 return TRACER_DISPLAY_BASE_10;
109 case 16:
110 return TRACER_DISPLAY_BASE_16;
111 default:
112 fprintf(stderr, "Unexpected integer display base: %" PRId64 "\n", val);
113 abort();
114 }
115 }
116 }
f0dafd60 117 return default_base; /* Default */
1d9c515c
MD		 118}
119
8bdd5c12 120static
66de373e 121bool type_to_host_reverse_bo(const struct side_type *type_desc)
8bdd5c12
MD		 122{
123 switch (type_desc->type) {
124 case SIDE_TYPE_U8:
125 case SIDE_TYPE_S8:
126 case SIDE_TYPE_BYTE:
127 return false;
128 case SIDE_TYPE_U16:
129 case SIDE_TYPE_U32:
130 case SIDE_TYPE_U64:
131 case SIDE_TYPE_S16:
132 case SIDE_TYPE_S32:
133 case SIDE_TYPE_S64:
452329a6 134 case SIDE_TYPE_POINTER:
ac81c466 135 if (type_desc->u.side_integer.byte_order != SIDE_TYPE_BYTE_ORDER_HOST)
8bdd5c12
MD		 136 return true;
137 else
138 return false;
139 break;
140 case SIDE_TYPE_FLOAT_BINARY16:
141 case SIDE_TYPE_FLOAT_BINARY32:
142 case SIDE_TYPE_FLOAT_BINARY64:
143 case SIDE_TYPE_FLOAT_BINARY128:
aac52685 144 if (type_desc->u.side_float.byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST)
8bdd5c12
MD		 145 return true;
146 else
147 return false;
148 break;
149 default:
150 fprintf(stderr, "Unexpected type\n");
151 abort();
152 }
153}
154
bc3c89b3 155static
905c328e 156void tracer_print_attr_type(const char *separator, const struct side_attr *attr)
bc3c89b3 157{
905c328e 158 printf("{ key%s \"%s\", value%s ", separator, attr->key, separator);
bc3c89b3
MD		 159 switch (attr->value.type) {
160 case SIDE_ATTR_TYPE_BOOL:
5f82db91 161 printf("%s", attr->value.u.bool_value ? "true" : "false");
bc3c89b3
MD		 162 break;
163 case SIDE_ATTR_TYPE_U8:
43d85239 164 printf("%" PRIu8, attr->value.u.integer_value.side_u8);
bc3c89b3
MD		 165 break;
166 case SIDE_ATTR_TYPE_U16:
43d85239 167 printf("%" PRIu16, attr->value.u.integer_value.side_u16);
bc3c89b3
MD		 168 break;
169 case SIDE_ATTR_TYPE_U32:
43d85239 170 printf("%" PRIu32, attr->value.u.integer_value.side_u32);
bc3c89b3
MD		 171 break;
172 case SIDE_ATTR_TYPE_U64:
43d85239 173 printf("%" PRIu64, attr->value.u.integer_value.side_u64);
bc3c89b3
MD		 174 break;
175 case SIDE_ATTR_TYPE_S8:
43d85239 176 printf("%" PRId8, attr->value.u.integer_value.side_s8);
bc3c89b3
MD		 177 break;
178 case SIDE_ATTR_TYPE_S16:
43d85239 179 printf("%" PRId16, attr->value.u.integer_value.side_s16);
bc3c89b3
MD		 180 break;
181 case SIDE_ATTR_TYPE_S32:
43d85239 182 printf("%" PRId32, attr->value.u.integer_value.side_s32);
bc3c89b3
MD		 183 break;
184 case SIDE_ATTR_TYPE_S64:
43d85239 185 printf("%" PRId64, attr->value.u.integer_value.side_s64);
bc3c89b3
MD		 186 break;
187 case SIDE_ATTR_TYPE_FLOAT_BINARY16:
188#if __HAVE_FLOAT16
a4969f31 189 printf("%g", (double) attr->value.u.float_value.side_float_binary16);
bc3c89b3
MD		 190 break;
191#else
de1b3cd2 192 fprintf(stderr, "ERROR: Unsupported binary16 float type\n");
bc3c89b3
MD		 193 abort();
194#endif
195 case SIDE_ATTR_TYPE_FLOAT_BINARY32:
196#if __HAVE_FLOAT32
a4969f31 197 printf("%g", (double) attr->value.u.float_value.side_float_binary32);
bc3c89b3
MD		 198 break;
199#else
de1b3cd2 200 fprintf(stderr, "ERROR: Unsupported binary32 float type\n");
bc3c89b3
MD		 201 abort();
202#endif
203 case SIDE_ATTR_TYPE_FLOAT_BINARY64:
204#if __HAVE_FLOAT64
a4969f31 205 printf("%g", (double) attr->value.u.float_value.side_float_binary64);
bc3c89b3
MD		 206 break;
207#else
de1b3cd2 208 fprintf(stderr, "ERROR: Unsupported binary64 float type\n");
bc3c89b3
MD		 209 abort();
210#endif
211 case SIDE_ATTR_TYPE_FLOAT_BINARY128:
212#if __HAVE_FLOAT128
a4969f31 213 printf("%Lg", (long double) attr->value.u.float_value.side_float_binary128);
bc3c89b3
MD		 214 break;
215#else
de1b3cd2 216 fprintf(stderr, "ERROR: Unsupported binary128 float type\n");
bc3c89b3
MD		 217 abort();
218#endif
219 case SIDE_ATTR_TYPE_STRING:
5f82db91 220 printf("\"%s\"", (const char *)(uintptr_t) attr->value.u.string_value);
bc3c89b3
MD		 221 break;
222 default:
de1b3cd2 223 fprintf(stderr, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
bc3c89b3
MD		 224 abort();
225 }
226 printf(" }");
227}
228
7d21cf51 229static
905c328e
MD		 230void print_attributes(const char *prefix_str, const char *separator,
231 const struct side_attr *attr, uint32_t nr_attr)
7d21cf51 232{
e65f9ce5 233 uint32_t i;
7d21cf51
MD		 234
235 if (!nr_attr)
236 return;
905c328e 237 printf("%s%s [ ", prefix_str, separator);
7d21cf51
MD		 238 for (i = 0; i < nr_attr; i++) {
239 printf("%s", i ? ", " : "");
905c328e 240 tracer_print_attr_type(separator, &attr[i]);
7d21cf51
MD		 241 }
242 printf(" ]");
243}
244
79f677ba 245static
66de373e 246void print_enum(const struct side_type *type_desc, const struct side_arg *item)
79f677ba 247{
d8be25de 248 const struct side_enum_mappings *mappings = type_desc->u.side_enum.mappings;
66de373e 249 const struct side_type *elem_type = type_desc->u.side_enum.elem_type;
e65f9ce5 250 uint32_t i, print_count = 0;
d8be25de 251 int64_t value;
79f677ba 252
8bdd5c12 253 if (elem_type->type != item->type) {
de1b3cd2 254 fprintf(stderr, "ERROR: Unexpected enum element type\n");
d8be25de
MD		 255 abort();
256 }
257 switch (item->type) {
258 case SIDE_TYPE_U8:
66de373e 259 value = (int64_t) item->u.side_static.integer_value.side_u8;
d8be25de
MD		 260 break;
261 case SIDE_TYPE_U16:
8bdd5c12
MD		 262 {
263 uint16_t v;
264
66de373e 265 v = item->u.side_static.integer_value.side_u16;
8bdd5c12
MD		 266 if (type_to_host_reverse_bo(elem_type))
267 v = side_bswap_16(v);
268 value = (int64_t) v;
d8be25de 269 break;
8bdd5c12 270 }
d8be25de 271 case SIDE_TYPE_U32:
8bdd5c12
MD		 272 {
273 uint32_t v;
274
66de373e 275 v = item->u.side_static.integer_value.side_u32;
8bdd5c12
MD		 276 if (type_to_host_reverse_bo(elem_type))
277 v = side_bswap_32(v);
278 value = (int64_t) v;
d8be25de 279 break;
8bdd5c12 280 }
d8be25de 281 case SIDE_TYPE_U64:
8bdd5c12
MD		 282 {
283 uint64_t v;
284
66de373e 285 v = item->u.side_static.integer_value.side_u64;
8bdd5c12
MD		 286 if (type_to_host_reverse_bo(elem_type))
287 v = side_bswap_64(v);
288 value = (int64_t) v;
d8be25de 289 break;
8bdd5c12 290 }
d8be25de 291 case SIDE_TYPE_S8:
66de373e 292 value = (int64_t) item->u.side_static.integer_value.side_s8;
d8be25de
MD		 293 break;
294 case SIDE_TYPE_S16:
8bdd5c12
MD		 295 {
296 int16_t v;
297
66de373e 298 v = item->u.side_static.integer_value.side_s16;
8bdd5c12
MD		 299 if (type_to_host_reverse_bo(elem_type))
300 v = side_bswap_16(v);
301 value = (int64_t) v;
d8be25de 302 break;
8bdd5c12 303 }
d8be25de 304 case SIDE_TYPE_S32:
8bdd5c12
MD		 305 {
306 int32_t v;
307
66de373e 308 v = item->u.side_static.integer_value.side_s32;
8bdd5c12
MD		 309 if (type_to_host_reverse_bo(elem_type))
310 v = side_bswap_32(v);
311 value = (int64_t) v;
d8be25de 312 break;
8bdd5c12 313 }
d8be25de 314 case SIDE_TYPE_S64:
8bdd5c12
MD		 315 {
316 int64_t v;
317
66de373e 318 v = item->u.side_static.integer_value.side_s64;
8bdd5c12
MD		 319 if (type_to_host_reverse_bo(elem_type))
320 v = side_bswap_64(v);
321 value = v;
d8be25de 322 break;
8bdd5c12 323 }
d8be25de 324 default:
de1b3cd2 325 fprintf(stderr, "ERROR: Unexpected enum element type\n");
d8be25de
MD		 326 abort();
327 }
905c328e 328 print_attributes("attr", ":", mappings->attr, mappings->nr_attr);
d8be25de
MD		 329 printf("%s", mappings->nr_attr ? ", " : "");
330 tracer_print_type(type_desc->u.side_enum.elem_type, item);
331 printf(", labels: [ ");
332 for (i = 0; i < mappings->nr_mappings; i++) {
333 const struct side_enum_mapping *mapping = &mappings->mappings[i];
79f677ba 334
ea32e5fc 335 if (mapping->range_end < mapping->range_begin) {
de1b3cd2 336 fprintf(stderr, "ERROR: Unexpected enum range: %" PRIu64 "-%" PRIu64 "\n",
ea32e5fc
MD		 337 mapping->range_begin, mapping->range_end);
338 abort();
339 }
79f677ba
MD		 340 if (value >= mapping->range_begin && value <= mapping->range_end) {
341 printf("%s", print_count++ ? ", " : "");
342 printf("\"%s\"", mapping->label);
343 }
344 }
345 if (!print_count)
346 printf("<NO LABEL>");
347 printf(" ]");
348}
349
ea32e5fc 350static
66de373e 351uint32_t enum_elem_type_to_stride(const struct side_type *elem_type)
ea32e5fc 352{
af6aa6e1
MD		 353 uint32_t stride_bit;
354
bab5d6e4 355 switch (elem_type->type) {
4cc2880b
MD		 356 case SIDE_TYPE_U8: /* Fall-through */
357 case SIDE_TYPE_BYTE:
af6aa6e1
MD		 358 stride_bit = 8;
359 break;
af6aa6e1 360 case SIDE_TYPE_U16:
af6aa6e1
MD		 361 stride_bit = 16;
362 break;
af6aa6e1 363 case SIDE_TYPE_U32:
af6aa6e1
MD		 364 stride_bit = 32;
365 break;
af6aa6e1 366 case SIDE_TYPE_U64:
af6aa6e1
MD		 367 stride_bit = 64;
368 break;
af6aa6e1 369 default:
de1b3cd2 370 fprintf(stderr, "ERROR: Unexpected enum element type\n");
af6aa6e1
MD		 371 abort();
372 }
373 return stride_bit;
374}
375
376static
66de373e
MD		 377void print_enum_bitmap(const struct side_type *type_desc,
378 const struct side_arg *item)
af6aa6e1 379{
66de373e 380 const struct side_type *elem_type = type_desc->u.side_enum_bitmap.elem_type;
bab5d6e4 381 const struct side_enum_bitmap_mappings *side_enum_mappings = type_desc->u.side_enum_bitmap.mappings;
e65f9ce5 382 uint32_t i, print_count = 0, stride_bit, nr_items;
8bdd5c12 383 bool reverse_byte_order = false;
66de373e 384 const struct side_arg *array_item;
af6aa6e1 385
bab5d6e4
MD		 386 switch (elem_type->type) {
387 case SIDE_TYPE_U8: /* Fall-through */
4cc2880b 388 case SIDE_TYPE_BYTE: /* Fall-through */
bab5d6e4
MD		 389 case SIDE_TYPE_U16: /* Fall-through */
390 case SIDE_TYPE_U32: /* Fall-through */
4cc2880b 391 case SIDE_TYPE_U64:
45392033 392 stride_bit = enum_elem_type_to_stride(elem_type);
8bdd5c12 393 reverse_byte_order = type_to_host_reverse_bo(elem_type);
af6aa6e1
MD		 394 array_item = item;
395 nr_items = 1;
af6aa6e1 396 break;
bab5d6e4 397 case SIDE_TYPE_ARRAY:
45392033 398 stride_bit = enum_elem_type_to_stride(elem_type->u.side_array.elem_type);
8bdd5c12 399 reverse_byte_order = type_to_host_reverse_bo(elem_type->u.side_array.elem_type);
66de373e 400 array_item = item->u.side_static.side_array->sav;
bab5d6e4 401 nr_items = type_desc->u.side_array.length;
af6aa6e1 402 break;
bab5d6e4 403 case SIDE_TYPE_VLA:
45392033 404 stride_bit = enum_elem_type_to_stride(elem_type->u.side_vla.elem_type);
8bdd5c12 405 reverse_byte_order = type_to_host_reverse_bo(elem_type->u.side_vla.elem_type);
66de373e
MD		 406 array_item = item->u.side_static.side_vla->sav;
407 nr_items = item->u.side_static.side_vla->len;
af6aa6e1
MD		 408 break;
409 default:
de1b3cd2 410 fprintf(stderr, "ERROR: Unexpected enum element type\n");
af6aa6e1
MD		 411 abort();
412 }
ea32e5fc 413
905c328e 414 print_attributes("attr", ":", side_enum_mappings->attr, side_enum_mappings->nr_attr);
d4328528 415 printf("%s", side_enum_mappings->nr_attr ? ", " : "");
af6aa6e1 416 printf("labels: [ ");
ea32e5fc 417 for (i = 0; i < side_enum_mappings->nr_mappings; i++) {
66cff328 418 const struct side_enum_bitmap_mapping *mapping = &side_enum_mappings->mappings[i];
ea32e5fc 419 bool match = false;
9ff49ee4 420 uint64_t bit;
ea32e5fc 421
9ff49ee4 422 if (mapping->range_end < mapping->range_begin) {
de1b3cd2 423 fprintf(stderr, "ERROR: Unexpected enum bitmap range: %" PRIu64 "-%" PRIu64 "\n",
ea32e5fc
MD		 424 mapping->range_begin, mapping->range_end);
425 abort();
426 }
427 for (bit = mapping->range_begin; bit <= mapping->range_end; bit++) {
af6aa6e1
MD		 428 if (bit > (nr_items * stride_bit) - 1)
429 break;
430 switch (stride_bit) {
431 case 8:
432 {
66de373e 433 uint8_t v = array_item[bit / 8].u.side_static.integer_value.side_u8;
af6aa6e1
MD		 434 if (v & (1ULL << (bit % 8))) {
435 match = true;
436 goto match;
437 }
438 break;
439 }
440 case 16:
441 {
66de373e 442 uint16_t v = array_item[bit / 16].u.side_static.integer_value.side_u16;
8bdd5c12
MD		 443 if (reverse_byte_order)
444 v = side_bswap_16(v);
af6aa6e1
MD		 445 if (v & (1ULL << (bit % 16))) {
446 match = true;
447 goto match;
448 }
449 break;
450 }
451 case 32:
452 {
66de373e 453 uint32_t v = array_item[bit / 32].u.side_static.integer_value.side_u32;
8bdd5c12
MD		 454 if (reverse_byte_order)
455 v = side_bswap_32(v);
af6aa6e1
MD		 456 if (v & (1ULL << (bit % 32))) {
457 match = true;
458 goto match;
459 }
ea32e5fc
MD		 460 break;
461 }
af6aa6e1
MD		 462 case 64:
463 {
66de373e 464 uint64_t v = array_item[bit / 64].u.side_static.integer_value.side_u64;
8bdd5c12
MD		 465 if (reverse_byte_order)
466 v = side_bswap_64(v);
af6aa6e1
MD		 467 if (v & (1ULL << (bit % 64))) {
468 match = true;
469 goto match;
470 }
471 break;
472 }
473 default:
474 abort();
475 }
ea32e5fc 476 }
af6aa6e1 477match:
ea32e5fc
MD		 478 if (match) {
479 printf("%s", print_count++ ? ", " : "");
480 printf("\"%s\"", mapping->label);
481 }
482 }
483 if (!print_count)
484 printf("<NO LABEL>");
485 printf(" ]");
486}
487
1d9c515c
MD		 488static
489void print_integer_binary(uint64_t v, int bits)
490{
491 int i;
492
493 printf("0b");
494 v <<= 64 - bits;
495 for (i = 0; i < bits; i++) {
496 printf("%c", v & (1ULL << 63) ? '1' : '0');
497 v <<= 1;
498 }
499}
500
0e9be766 501static
aac52685
MD		 502void tracer_print_type_header(const char *separator,
503 const struct side_attr *attr, uint32_t nr_attr)
ac81c466 504{
aac52685
MD		 505 print_attributes("attr", separator, attr, nr_attr);
506 printf("%s", nr_attr ? ", " : "");
507 printf("value%s ", separator);
ac81c466
MD		 508}
509
8ad2f385
MD		 510static
511void tracer_print_type_bool(const char *separator,
512 const struct side_type_bool *type_bool,
d6f684e4 513 const union side_bool_value *value,
8ad2f385
MD		 514 uint16_t offset_bits)
515{
88bab79c 516 uint32_t len_bits;
8ad2f385
MD		 517 bool reverse_bo;
518 uint64_t v;
519
88bab79c
MD		 520 if (!type_bool->len_bits)
521 len_bits = type_bool->bool_size * CHAR_BIT;
522 else
523 len_bits = type_bool->len_bits;
524 if (len_bits + offset_bits > type_bool->bool_size * CHAR_BIT)
8ad2f385
MD		 525 abort();
526 reverse_bo = type_bool->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
88bab79c
MD		 527 switch (type_bool->bool_size) {
528 case 1:
d6f684e4 529 v = value->side_bool8;
8ad2f385 530 break;
88bab79c 531 case 2:
8ad2f385
MD		 532 {
533 uint16_t side_u16;
534
d6f684e4 535 side_u16 = value->side_bool16;
8ad2f385
MD		 536 if (reverse_bo)
537 side_u16 = side_bswap_16(side_u16);
538 v = side_u16;
539 break;
540 }
88bab79c 541 case 4:
8ad2f385
MD		 542 {
543 uint32_t side_u32;
544
d6f684e4 545 side_u32 = value->side_bool32;
8ad2f385
MD		 546 if (reverse_bo)
547 side_u32 = side_bswap_32(side_u32);
548 v = side_u32;
549 break;
550 }
88bab79c 551 case 8:
8ad2f385
MD		 552 {
553 uint64_t side_u64;
554
d6f684e4 555 side_u64 = value->side_bool64;
8ad2f385
MD		 556 if (reverse_bo)
557 side_u64 = side_bswap_64(side_u64);
558 v = side_u64;
559 break;
560 }
561 default:
562 abort();
563 }
564 v >>= offset_bits;
88bab79c
MD		 565 if (len_bits < 64)
566 v &= (1ULL << len_bits) - 1;
8ad2f385
MD		 567 tracer_print_type_header(separator, type_bool->attr, type_bool->nr_attr);
568 printf("%s", v ? "true" : "false");
569}
570
56c21987 571static
e3080b2a
MD		 572void tracer_print_type_integer(const char *separator,
573 const struct side_type_integer *type_integer,
87405d12 574 const union side_integer_value *value,
f0dafd60
MD		 575 uint16_t offset_bits,
576 enum tracer_display_base default_base)
56c21987
MD		 577{
578 enum tracer_display_base base;
88bab79c 579 uint32_t len_bits;
cb589216 580 bool reverse_bo;
56c21987
MD		 581 union {
582 uint64_t v_unsigned;
583 int64_t v_signed;
584 } v;
585
88bab79c
MD		 586 if (!type_integer->len_bits)
587 len_bits = type_integer->integer_size * CHAR_BIT;
588 else
589 len_bits = type_integer->len_bits;
590 if (len_bits + offset_bits > type_integer->integer_size * CHAR_BIT)
56c21987 591 abort();
cb589216 592 reverse_bo = type_integer->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
e3080b2a 593 base = get_attr_display_base(type_integer->attr,
f0dafd60
MD		 594 type_integer->nr_attr,
595 default_base);
88bab79c
MD		 596 switch (type_integer->integer_size) {
597 case 1:
e3080b2a
MD		 598 if (type_integer->signedness)
599 v.v_signed = value->side_s8;
600 else
601 v.v_unsigned = value->side_u8;
56c21987 602 break;
88bab79c 603 case 2:
e3080b2a
MD		 604 if (type_integer->signedness) {
605 int16_t side_s16;
56c21987 606
e3080b2a 607 side_s16 = value->side_s16;
cb589216 608 if (reverse_bo)
e3080b2a
MD		 609 side_s16 = side_bswap_16(side_s16);
610 v.v_signed = side_s16;
611 } else {
612 uint16_t side_u16;
56c21987 613
e3080b2a 614 side_u16 = value->side_u16;
cb589216 615 if (reverse_bo)
e3080b2a
MD		 616 side_u16 = side_bswap_16(side_u16);
617 v.v_unsigned = side_u16;
618 }
56c21987 619 break;
88bab79c 620 case 4:
e3080b2a
MD		 621 if (type_integer->signedness) {
622 int32_t side_s32;
56c21987 623
e3080b2a 624 side_s32 = value->side_s32;
cb589216 625 if (reverse_bo)
e3080b2a
MD		 626 side_s32 = side_bswap_32(side_s32);
627 v.v_signed = side_s32;
628 } else {
629 uint32_t side_u32;
56c21987 630
e3080b2a 631 side_u32 = value->side_u32;
cb589216 632 if (reverse_bo)
e3080b2a
MD		 633 side_u32 = side_bswap_32(side_u32);
634 v.v_unsigned = side_u32;
635 }
56c21987 636 break;
88bab79c 637 case 8:
e3080b2a
MD		 638 if (type_integer->signedness) {
639 int64_t side_s64;
56c21987 640
e3080b2a 641 side_s64 = value->side_s64;
cb589216 642 if (reverse_bo)
e3080b2a
MD		 643 side_s64 = side_bswap_64(side_s64);
644 v.v_signed = side_s64;
645 } else {
646 uint64_t side_u64;
56c21987 647
e3080b2a 648 side_u64 = value->side_u64;
cb589216 649 if (reverse_bo)
e3080b2a
MD		 650 side_u64 = side_bswap_64(side_u64);
651 v.v_unsigned = side_u64;
652 }
56c21987 653 break;
56c21987
MD		 654 default:
655 abort();
656 }
87405d12 657 v.v_unsigned >>= offset_bits;
88bab79c
MD		 658 if (len_bits < 64)
659 v.v_unsigned &= (1ULL << len_bits) - 1;
e3080b2a 660 tracer_print_type_header(separator, type_integer->attr, type_integer->nr_attr);
56c21987
MD		 661 switch (base) {
662 case TRACER_DISPLAY_BASE_2:
88bab79c 663 print_integer_binary(v.v_unsigned, len_bits);
56c21987
MD		 664 break;
665 case TRACER_DISPLAY_BASE_8:
666 printf("0%" PRIo64, v.v_unsigned);
667 break;
668 case TRACER_DISPLAY_BASE_10:
e3080b2a 669 if (type_integer->signedness) {
56c21987 670 /* Sign-extend. */
88bab79c
MD		 671 if (len_bits < 64) {
672 if (v.v_unsigned & (1ULL << (len_bits - 1)))
673 v.v_unsigned |= ~((1ULL << len_bits) - 1);
56c21987
MD		 674 }
675 printf("%" PRId64, v.v_signed);
676 } else {
677 printf("%" PRIu64, v.v_unsigned);
678 }
679 break;
680 case TRACER_DISPLAY_BASE_16:
681 printf("0x%" PRIx64, v.v_unsigned);
682 break;
683 default:
684 abort();
685 }
686}
687
3aa7ca5e
MD		 688static
689void tracer_print_type_float(const char *separator,
690 const struct side_type_float *type_float,
691 const union side_float_value *value)
692{
693 bool reverse_bo;
694
695 reverse_bo = type_float->byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
696 tracer_print_type_header(separator, type_float->attr, type_float->nr_attr);
88bab79c
MD		 697 switch (type_float->float_size) {
698 case 2:
3aa7ca5e
MD		 699 {
700#if __HAVE_FLOAT16
701 union {
702 _Float16 f;
703 uint16_t u;
704 } float16 = {
705 .f = value->side_float_binary16,
706 };
707
708 if (reverse_bo)
709 float16.u = side_bswap_16(float16.u);
710 tracer_print_type_header(":", type_desc->u.side_float.attr, type_desc->u.side_float.nr_attr);
711 printf("%g", (double) float16.f);
712 break;
713#else
714 fprintf(stderr, "ERROR: Unsupported binary16 float type\n");
715 abort();
716#endif
717 }
88bab79c 718 case 4:
3aa7ca5e
MD		 719 {
720#if __HAVE_FLOAT32
721 union {
722 _Float32 f;
723 uint32_t u;
724 } float32 = {
725 .f = value->side_float_binary32,
726 };
727
728 if (reverse_bo)
729 float32.u = side_bswap_32(float32.u);
730 printf("%g", (double) float32.f);
731 break;
732#else
733 fprintf(stderr, "ERROR: Unsupported binary32 float type\n");
734 abort();
735#endif
736 }
88bab79c 737 case 8:
3aa7ca5e
MD		 738 {
739#if __HAVE_FLOAT64
740 union {
741 _Float64 f;
742 uint64_t u;
743 } float64 = {
744 .f = value->side_float_binary64,
745 };
746
747 if (reverse_bo)
748 float64.u = side_bswap_64(float64.u);
749 printf("%g", (double) float64.f);
750 break;
751#else
752 fprintf(stderr, "ERROR: Unsupported binary64 float type\n");
753 abort();
754#endif
755 }
88bab79c 756 case 16:
3aa7ca5e
MD		 757 {
758#if __HAVE_FLOAT128
759 union {
760 _Float128 f;
761 char arr[16];
762 } float128 = {
763 .f = value->side_float_binary128,
764 };
765
766 if (reverse_bo)
767 side_bswap_128p(float128.arr);
768 printf("%Lg", (long double) float128.f);
769 break;
770#else
771 fprintf(stderr, "ERROR: Unsupported binary128 float type\n");
772 abort();
773#endif
774 }
775 default:
776 fprintf(stderr, "ERROR: Unknown float size\n");
777 abort();
778 }
779}
780
f611d0c3 781static
66de373e 782void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item)
f611d0c3 783{
66de373e 784 enum side_type_label type;
d8be25de 785
45392033 786 switch (type_desc->type) {
45392033
MD		 787 case SIDE_TYPE_ENUM:
788 switch (item->type) {
789 case SIDE_TYPE_U8:
790 case SIDE_TYPE_U16:
791 case SIDE_TYPE_U32:
792 case SIDE_TYPE_U64:
793 case SIDE_TYPE_S8:
794 case SIDE_TYPE_S16:
795 case SIDE_TYPE_S32:
796 case SIDE_TYPE_S64:
bab5d6e4
MD		 797 break;
798 default:
de1b3cd2 799 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
45392033
MD		 800 abort();
801 break;
802 }
803 break;
804
805 case SIDE_TYPE_ENUM_BITMAP:
806 switch (item->type) {
807 case SIDE_TYPE_U8:
4cc2880b 808 case SIDE_TYPE_BYTE:
45392033
MD		 809 case SIDE_TYPE_U16:
810 case SIDE_TYPE_U32:
811 case SIDE_TYPE_U64:
812 case SIDE_TYPE_ARRAY:
813 case SIDE_TYPE_VLA:
814 break;
815 default:
de1b3cd2 816 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
45392033
MD		 817 abort();
818 break;
d8be25de
MD		 819 }
820 break;
821
66de373e
MD		 822 case SIDE_TYPE_DYNAMIC:
823 switch (item->type) {
824 case SIDE_TYPE_DYNAMIC_NULL:
825 case SIDE_TYPE_DYNAMIC_BOOL:
f9db30c3 826 case SIDE_TYPE_DYNAMIC_INTEGER:
66de373e 827 case SIDE_TYPE_DYNAMIC_BYTE:
452329a6 828 case SIDE_TYPE_DYNAMIC_POINTER:
e5b6a8ce 829 case SIDE_TYPE_DYNAMIC_FLOAT:
66de373e
MD		 830 case SIDE_TYPE_DYNAMIC_STRING:
831 case SIDE_TYPE_DYNAMIC_STRUCT:
832 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
833 case SIDE_TYPE_DYNAMIC_VLA:
834 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
835 break;
836 default:
837 fprintf(stderr, "ERROR: Unexpected dynamic type\n");
838 abort();
839 break;
840 }
841 break;
842
ba845af5 843 default:
a2e2357e 844 if (type_desc->type != item->type) {
de1b3cd2 845 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
ba845af5
MD		 846 abort();
847 }
848 break;
f611d0c3 849 }
d8be25de 850
bab5d6e4 851 if (type_desc->type == SIDE_TYPE_ENUM || type_desc->type == SIDE_TYPE_ENUM_BITMAP)
e65f9ce5 852 type = (enum side_type_label) type_desc->type;
d8be25de 853 else
e65f9ce5 854 type = (enum side_type_label) item->type;
d8be25de 855
a848763d 856 printf("{ ");
d8be25de 857 switch (type) {
9b641221
MD		 858 case SIDE_TYPE_NULL:
859 tracer_print_type_header(":", type_desc->u.side_null.attr, type_desc->u.side_null.nr_attr);
860 printf("<NULL TYPE>");
861 break;
862
4f40d951 863 case SIDE_TYPE_BOOL:
d6f684e4 864 tracer_print_type_bool(":", &type_desc->u.side_bool, &item->u.side_static.bool_value, 0);
4f40d951 865 break;
1d9c515c 866
56c21987 867 case SIDE_TYPE_U8:
f611d0c3 868 case SIDE_TYPE_U16:
f611d0c3 869 case SIDE_TYPE_U32:
f611d0c3 870 case SIDE_TYPE_U64:
f611d0c3 871 case SIDE_TYPE_S8:
f611d0c3 872 case SIDE_TYPE_S16:
f611d0c3 873 case SIDE_TYPE_S32:
f611d0c3 874 case SIDE_TYPE_S64:
66de373e 875 tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
f0dafd60 876 TRACER_DISPLAY_BASE_10);
f611d0c3 877 break;
56c21987 878
452329a6 879 case SIDE_TYPE_POINTER:
66de373e 880 tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
f0dafd60 881 TRACER_DISPLAY_BASE_16);
f5e650d7 882 break;
f0dafd60 883
f7653b43 884 case SIDE_TYPE_BYTE:
5f82db91 885 tracer_print_type_header(":", type_desc->u.side_byte.attr, type_desc->u.side_byte.nr_attr);
66de373e 886 printf("0x%" PRIx8, item->u.side_static.byte_value);
7aec0d09 887 break;
79f677ba 888
d8be25de
MD		 889 case SIDE_TYPE_ENUM:
890 print_enum(type_desc, item);
79f677ba
MD		 891 break;
892
bab5d6e4 893 case SIDE_TYPE_ENUM_BITMAP:
af6aa6e1 894 print_enum_bitmap(type_desc, item);
ea32e5fc
MD		 895 break;
896
fb25b355 897 case SIDE_TYPE_FLOAT_BINARY16:
fb25b355 898 case SIDE_TYPE_FLOAT_BINARY32:
fb25b355 899 case SIDE_TYPE_FLOAT_BINARY64:
fb25b355 900 case SIDE_TYPE_FLOAT_BINARY128:
66de373e 901 tracer_print_type_float(":", &type_desc->u.side_float, &item->u.side_static.float_value);
fb25b355 902 break;
3aa7ca5e 903
f611d0c3 904 case SIDE_TYPE_STRING:
5f82db91 905 tracer_print_type_header(":", type_desc->u.side_string.attr, type_desc->u.side_string.nr_attr);
66de373e 906 printf("\"%s\"", (const char *)(uintptr_t) item->u.side_static.string_value);
f611d0c3
MD		 907 break;
908 case SIDE_TYPE_STRUCT:
66de373e 909 tracer_print_struct(type_desc, item->u.side_static.side_struct);
f611d0c3 910 break;
d41cb7ee 911 case SIDE_TYPE_GATHER_STRUCT:
fb8c26c9 912 (void) tracer_print_gather_struct(&type_desc->u.side_gather, item->u.side_static.side_struct_gather_ptr);
d9359cfa 913 break;
d41cb7ee 914 case SIDE_TYPE_GATHER_ARRAY:
fb8c26c9 915 (void) tracer_print_gather_array(&type_desc->u.side_gather, item->u.side_static.side_array_gather_ptr);
33956c71 916 break;
80429681
MD		 917 case SIDE_TYPE_GATHER_VLA:
918 (void) tracer_print_gather_vla(&type_desc->u.side_gather, item->u.side_static.side_vla_gather.ptr,
919 item->u.side_static.side_vla_gather.length_ptr);
920 break;
8ad2f385
MD		 921 case SIDE_TYPE_GATHER_BOOL:
922 (void) tracer_print_gather_bool_type(&type_desc->u.side_gather, item->u.side_static.side_bool_gather_ptr);
923 break;
d69918cc 924 case SIDE_TYPE_GATHER_BYTE:
fb8c26c9 925 (void) tracer_print_gather_byte_type(&type_desc->u.side_gather, item->u.side_static.side_byte_gather_ptr);
d69918cc 926 break;
4e1b0e0e
MD		 927 case SIDE_TYPE_GATHER_POINTER:
928 (void) tracer_print_gather_integer_type(&type_desc->u.side_gather, item->u.side_static.side_integer_gather_ptr,
929 TRACER_DISPLAY_BASE_16);
930 break;
f9db30c3 931 case SIDE_TYPE_GATHER_INTEGER:
4e1b0e0e
MD		 932 (void) tracer_print_gather_integer_type(&type_desc->u.side_gather, item->u.side_static.side_integer_gather_ptr,
933 TRACER_DISPLAY_BASE_10);
7a1cb105 934 break;
d41cb7ee
MD		 935 case SIDE_TYPE_GATHER_FLOAT:
936 (void) tracer_print_gather_float_type(&type_desc->u.side_gather, item->u.side_static.side_float_gather_ptr);
905f68e3 937 break;
f611d0c3 938 case SIDE_TYPE_ARRAY:
66de373e 939 tracer_print_array(type_desc, item->u.side_static.side_array);
f611d0c3
MD		 940 break;
941 case SIDE_TYPE_VLA:
66de373e 942 tracer_print_vla(type_desc, item->u.side_static.side_vla);
f611d0c3
MD		 943 break;
944 case SIDE_TYPE_VLA_VISITOR:
66de373e 945 tracer_print_vla_visitor(type_desc, item->u.side_static.side_vla_app_visitor_ctx);
f611d0c3 946 break;
66de373e
MD		 947
948 /* Dynamic types */
949 case SIDE_TYPE_DYNAMIC_NULL:
950 case SIDE_TYPE_DYNAMIC_BOOL:
f9db30c3 951 case SIDE_TYPE_DYNAMIC_INTEGER:
66de373e 952 case SIDE_TYPE_DYNAMIC_BYTE:
452329a6 953 case SIDE_TYPE_DYNAMIC_POINTER:
e5b6a8ce 954 case SIDE_TYPE_DYNAMIC_FLOAT:
66de373e
MD		 955 case SIDE_TYPE_DYNAMIC_STRING:
956 case SIDE_TYPE_DYNAMIC_STRUCT:
957 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
958 case SIDE_TYPE_DYNAMIC_VLA:
959 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
960 tracer_print_dynamic(item);
a2e2357e 961 break;
f611d0c3 962 default:
f6c02218 963 fprintf(stderr, "<UNKNOWN TYPE>\n");
f611d0c3
MD		 964 abort();
965 }
a848763d 966 printf(" }");
f611d0c3
MD		 967}
968
969static
66de373e 970void tracer_print_field(const struct side_event_field *item_desc, const struct side_arg *item)
f611d0c3 971{
19fa6aa2 972 printf("%s: ", item_desc->field_name);
f611d0c3 973 tracer_print_type(&item_desc->side_type, item);
f611d0c3
MD		 974}
975
976static
9a6ca773 977void tracer_print_struct(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
f611d0c3 978{
9a6ca773 979 const struct side_arg *sav = side_arg_vec->sav;
e65f9ce5 980 uint32_t i, side_sav_len = side_arg_vec->len;
f611d0c3 981
c7a14585 982 if (type_desc->u.side_struct->nr_fields != side_sav_len) {
de1b3cd2 983 fprintf(stderr, "ERROR: number of fields mismatch between description and arguments of structure\n");
f611d0c3
MD		 984 abort();
985 }
905c328e 986 print_attributes("attr", ":", type_desc->u.side_struct->attr, type_desc->u.side_struct->nr_attr);
73b2b0c2
MD		 987 printf("%s", type_desc->u.side_struct->nr_attr ? ", " : "");
988 printf("fields: { ");
f611d0c3
MD		 989 for (i = 0; i < side_sav_len; i++) {
990 printf("%s", i ? ", " : "");
c7a14585 991 tracer_print_field(&type_desc->u.side_struct->fields[i], &sav[i]);
f611d0c3 992 }
d4328528 993 printf(" }");
f611d0c3
MD		 994}
995
7a1cb105 996static
d9359cfa
MD		 997void tracer_print_array(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
998{
999 const struct side_arg *sav = side_arg_vec->sav;
1000 uint32_t i, side_sav_len = side_arg_vec->len;
1001
1002 if (type_desc->u.side_array.length != side_sav_len) {
1003 fprintf(stderr, "ERROR: length mismatch between description and arguments of array\n");
1004 abort();
1005 }
1006 print_attributes("attr", ":", type_desc->u.side_array.attr, type_desc->u.side_array.nr_attr);
1007 printf("%s", type_desc->u.side_array.nr_attr ? ", " : "");
1008 printf("elements: ");
1009 printf("[ ");
1010 for (i = 0; i < side_sav_len; i++) {
1011 printf("%s", i ? ", " : "");
1012 tracer_print_type(type_desc->u.side_array.elem_type, &sav[i]);
1013 }
1014 printf(" ]");
1015}
1016
1017static
1018void tracer_print_vla(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
1019{
1020 const struct side_arg *sav = side_arg_vec->sav;
1021 uint32_t i, side_sav_len = side_arg_vec->len;
1022
1023 print_attributes("attr", ":", type_desc->u.side_vla.attr, type_desc->u.side_vla.nr_attr);
1024 printf("%s", type_desc->u.side_vla.nr_attr ? ", " : "");
1025 printf("elements: ");
1026 printf("[ ");
1027 for (i = 0; i < side_sav_len; i++) {
1028 printf("%s", i ? ", " : "");
1029 tracer_print_type(type_desc->u.side_vla.elem_type, &sav[i]);
1030 }
1031 printf(" ]");
1032}
1033
dd7947bf 1034static
d41cb7ee 1035const char *tracer_gather_access(enum side_type_gather_access_mode access_mode, const char *ptr)
dd7947bf 1036{
65b8734a 1037 switch (access_mode) {
84c04cc8 1038 case SIDE_TYPE_GATHER_ACCESS_DIRECT:
dd7947bf 1039 return ptr;
d41cb7ee 1040 case SIDE_TYPE_GATHER_ACCESS_POINTER:
dd7947bf
MD		 1041 /* Dereference pointer */
1042 memcpy(&ptr, ptr, sizeof(ptr));
1043 return ptr;
1044 default:
1045 abort();
1046 }
1047}
1048
1049static
d41cb7ee 1050uint32_t tracer_gather_size(enum side_type_gather_access_mode access_mode, uint32_t len)
dd7947bf 1051{
65b8734a 1052 switch (access_mode) {
84c04cc8 1053 case SIDE_TYPE_GATHER_ACCESS_DIRECT:
dd7947bf 1054 return len;
d41cb7ee 1055 case SIDE_TYPE_GATHER_ACCESS_POINTER:
dd7947bf
MD		 1056 return sizeof(void *);
1057 default:
1058 abort();
1059 }
1060}
1061
d9359cfa 1062static
d41cb7ee 1063uint64_t tracer_load_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr)
7a1cb105 1064{
358281a1
MD		 1065 enum side_type_gather_access_mode access_mode =
1066 (enum side_type_gather_access_mode) type_gather->u.side_integer.access_mode;
88bab79c 1067 uint32_t integer_size_bytes = type_gather->u.side_integer.type.integer_size;
7a1cb105 1068 const char *ptr = (const char *) _ptr;
87405d12 1069 union side_integer_value value;
65b8734a 1070
d41cb7ee 1071 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_integer.offset);
65b8734a 1072 memcpy(&value, ptr, integer_size_bytes);
88bab79c
MD		 1073 switch (type_gather->u.side_integer.type.integer_size) {
1074 case 1:
65b8734a 1075 return (uint64_t) value.side_u8;
88bab79c 1076 case 2:
65b8734a 1077 return (uint64_t) value.side_u16;
88bab79c 1078 case 4:
65b8734a 1079 return (uint64_t) value.side_u32;
88bab79c 1080 case 8:
65b8734a
MD		 1081 return (uint64_t) value.side_u64;
1082 default:
1083 abort();
1084 }
1085}
1086
8ad2f385
MD		 1087static
1088uint32_t tracer_print_gather_bool_type(const struct side_type_gather *type_gather, const void *_ptr)
1089{
358281a1
MD		 1090 enum side_type_gather_access_mode access_mode =
1091 (enum side_type_gather_access_mode) type_gather->u.side_bool.access_mode;
88bab79c 1092 uint32_t bool_size_bytes = type_gather->u.side_bool.type.bool_size;
8ad2f385 1093 const char *ptr = (const char *) _ptr;
d6f684e4 1094 union side_bool_value value;
8ad2f385 1095
88bab79c
MD		 1096 switch (bool_size_bytes) {
1097 case 1:
1098 case 2:
1099 case 4:
8ad2f385 1100 case 8:
8ad2f385
MD		 1101 break;
1102 default:
1103 abort();
1104 }
1105 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_bool.offset);
1106 memcpy(&value, ptr, bool_size_bytes);
1107 tracer_print_type_bool(":", &type_gather->u.side_bool.type, &value,
1108 type_gather->u.side_bool.offset_bits);
1109 return tracer_gather_size(access_mode, bool_size_bytes);
1110}
1111
d69918cc
MD		 1112static
1113uint32_t tracer_print_gather_byte_type(const struct side_type_gather *type_gather, const void *_ptr)
1114{
358281a1
MD		 1115 enum side_type_gather_access_mode access_mode =
1116 (enum side_type_gather_access_mode) type_gather->u.side_byte.access_mode;
d69918cc
MD		 1117 const char *ptr = (const char *) _ptr;
1118 uint8_t value;
1119
1120 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_byte.offset);
1121 memcpy(&value, ptr, 1);
1122 tracer_print_type_header(":", type_gather->u.side_byte.type.attr,
1123 type_gather->u.side_byte.type.nr_attr);
1124 printf("0x%" PRIx8, value);
1125 return tracer_gather_size(access_mode, 1);
1126}
1127
65b8734a 1128static
4e1b0e0e
MD		 1129uint32_t tracer_print_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr,
1130 enum tracer_display_base default_base)
65b8734a 1131{
358281a1
MD		 1132 enum side_type_gather_access_mode access_mode =
1133 (enum side_type_gather_access_mode) type_gather->u.side_integer.access_mode;
88bab79c 1134 uint32_t integer_size_bytes = type_gather->u.side_integer.type.integer_size;
65b8734a
MD		 1135 const char *ptr = (const char *) _ptr;
1136 union side_integer_value value;
7a1cb105 1137
88bab79c
MD		 1138 switch (integer_size_bytes) {
1139 case 1:
1140 case 2:
1141 case 4:
33956c71 1142 case 8:
9b641221 1143 break;
33956c71
MD		 1144 default:
1145 abort();
1146 }
d41cb7ee 1147 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_integer.offset);
dd7947bf 1148 memcpy(&value, ptr, integer_size_bytes);
d41cb7ee 1149 tracer_print_type_integer(":", &type_gather->u.side_integer.type, &value,
4e1b0e0e 1150 type_gather->u.side_integer.offset_bits, default_base);
d41cb7ee 1151 return tracer_gather_size(access_mode, integer_size_bytes);
33956c71 1152}
9b641221 1153
905f68e3 1154static
d41cb7ee 1155uint32_t tracer_print_gather_float_type(const struct side_type_gather *type_gather, const void *_ptr)
905f68e3 1156{
358281a1
MD		 1157 enum side_type_gather_access_mode access_mode =
1158 (enum side_type_gather_access_mode) type_gather->u.side_float.access_mode;
88bab79c 1159 uint32_t float_size_bytes = type_gather->u.side_float.type.float_size;
905f68e3
MD		 1160 const char *ptr = (const char *) _ptr;
1161 union side_float_value value;
1162
88bab79c
MD		 1163 switch (float_size_bytes) {
1164 case 2:
1165 case 4:
1166 case 8:
905f68e3 1167 case 16:
905f68e3
MD		 1168 break;
1169 default:
1170 abort();
1171 }
d41cb7ee 1172 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_float.offset);
dd7947bf 1173 memcpy(&value, ptr, float_size_bytes);
d41cb7ee
MD		 1174 tracer_print_type_float(":", &type_gather->u.side_float.type, &value);
1175 return tracer_gather_size(access_mode, float_size_bytes);
905f68e3
MD		 1176}
1177
33956c71 1178static
d41cb7ee 1179uint32_t tracer_print_gather_type(const struct side_type *type_desc, const void *ptr)
33956c71 1180{
d9359cfa
MD		 1181 uint32_t len;
1182
33956c71
MD		 1183 printf("{ ");
1184 switch (type_desc->type) {
8ad2f385
MD		 1185 case SIDE_TYPE_GATHER_BOOL:
1186 len = tracer_print_gather_bool_type(&type_desc->u.side_gather, ptr);
1187 break;
d69918cc
MD		 1188 case SIDE_TYPE_GATHER_BYTE:
1189 len = tracer_print_gather_byte_type(&type_desc->u.side_gather, ptr);
1190 break;
4e1b0e0e
MD		 1191 case SIDE_TYPE_GATHER_POINTER:
1192 len = tracer_print_gather_integer_type(&type_desc->u.side_gather, ptr,
1193 TRACER_DISPLAY_BASE_16);
1194 break;
f9db30c3 1195 case SIDE_TYPE_GATHER_INTEGER:
4e1b0e0e
MD		 1196 len = tracer_print_gather_integer_type(&type_desc->u.side_gather, ptr,
1197 TRACER_DISPLAY_BASE_10);
905f68e3 1198 break;
d41cb7ee
MD		 1199 case SIDE_TYPE_GATHER_FLOAT:
1200 len = tracer_print_gather_float_type(&type_desc->u.side_gather, ptr);
33956c71 1201 break;
d41cb7ee
MD		 1202 case SIDE_TYPE_GATHER_STRUCT:
1203 len = tracer_print_gather_struct(&type_desc->u.side_gather, ptr);
d9359cfa 1204 break;
d41cb7ee
MD		 1205 case SIDE_TYPE_GATHER_ARRAY:
1206 len = tracer_print_gather_array(&type_desc->u.side_gather, ptr);
9b641221 1207 break;
d41cb7ee 1208 case SIDE_TYPE_GATHER_VLA:
80429681 1209 len = tracer_print_gather_vla(&type_desc->u.side_gather, ptr, ptr);
65b8734a 1210 break;
9b641221 1211 default:
d41cb7ee 1212 fprintf(stderr, "<UNKNOWN GATHER TYPE>");
9b641221 1213 abort();
7a1cb105
MD		 1214 }
1215 printf(" }");
d9359cfa 1216 return len;
7a1cb105
MD		 1217}
1218
1219static
d41cb7ee 1220void tracer_print_gather_field(const struct side_event_field *field, const void *ptr)
7a1cb105 1221{
33956c71 1222 printf("%s: ", field->field_name);
d41cb7ee 1223 (void) tracer_print_gather_type(&field->side_type, ptr);
7a1cb105
MD		 1224}
1225
1226static
d41cb7ee 1227uint32_t tracer_print_gather_struct(const struct side_type_gather *type_gather, const void *_ptr)
7a1cb105 1228{
358281a1
MD		 1229 enum side_type_gather_access_mode access_mode =
1230 (enum side_type_gather_access_mode) type_gather->u.side_struct.access_mode;
dd7947bf 1231 const char *ptr = (const char *) _ptr;
e65f9ce5 1232 uint32_t i;
7a1cb105 1233
d41cb7ee
MD		 1234 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_struct.offset);
1235 print_attributes("attr", ":", type_gather->u.side_struct.type->attr, type_gather->u.side_struct.type->nr_attr);
1236 printf("%s", type_gather->u.side_struct.type->nr_attr ? ", " : "");
7a1cb105 1237 printf("fields: { ");
d41cb7ee 1238 for (i = 0; i < type_gather->u.side_struct.type->nr_fields; i++) {
7a1cb105 1239 printf("%s", i ? ", " : "");
d41cb7ee 1240 tracer_print_gather_field(&type_gather->u.side_struct.type->fields[i], ptr);
7a1cb105
MD		 1241 }
1242 printf(" }");
d41cb7ee 1243 return tracer_gather_size(access_mode, type_gather->u.side_struct.size);
7a1cb105
MD		 1244}
1245
f611d0c3 1246static
d41cb7ee 1247uint32_t tracer_print_gather_array(const struct side_type_gather *type_gather, const void *_ptr)
f611d0c3 1248{
358281a1
MD		 1249 enum side_type_gather_access_mode access_mode =
1250 (enum side_type_gather_access_mode) type_gather->u.side_array.access_mode;
dd7947bf 1251 const char *ptr = (const char *) _ptr, *orig_ptr;
d9359cfa 1252 uint32_t i;
f611d0c3 1253
d41cb7ee 1254 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_array.offset);
65b8734a 1255 orig_ptr = ptr;
d41cb7ee
MD		 1256 print_attributes("attr", ":", type_gather->u.side_array.type.attr, type_gather->u.side_array.type.nr_attr);
1257 printf("%s", type_gather->u.side_array.type.nr_attr ? ", " : "");
65b8734a
MD		 1258 printf("elements: ");
1259 printf("[ ");
d41cb7ee
MD		 1260 for (i = 0; i < type_gather->u.side_array.type.length; i++) {
1261 switch (type_gather->u.side_array.type.elem_type->type) {
1262 case SIDE_TYPE_GATHER_VLA:
1263 fprintf(stderr, "<gather VLA only supported within gather structures>\n");
65b8734a
MD		 1264 abort();
1265 default:
1266 break;
1267 }
1268 printf("%s", i ? ", " : "");
d41cb7ee 1269 ptr += tracer_print_gather_type(type_gather->u.side_array.type.elem_type, ptr);
65b8734a
MD		 1270 }
1271 printf(" ]");
d41cb7ee 1272 return tracer_gather_size(access_mode, ptr - orig_ptr);
65b8734a
MD		 1273}
1274
1275static
80429681
MD		 1276uint32_t tracer_print_gather_vla(const struct side_type_gather *type_gather, const void *_ptr,
1277 const void *_length_ptr)
65b8734a 1278{
358281a1
MD		 1279 enum side_type_gather_access_mode access_mode =
1280 (enum side_type_gather_access_mode) type_gather->u.side_vla.access_mode;
65b8734a 1281 const char *ptr = (const char *) _ptr, *orig_ptr;
80429681 1282 const char *length_ptr = (const char *) _length_ptr;
65b8734a
MD		 1283 uint32_t i, length;
1284
1285 /* Access length */
d41cb7ee 1286 switch (type_gather->u.side_vla.length_type->type) {
f9db30c3 1287 case SIDE_TYPE_GATHER_INTEGER:
65b8734a
MD		 1288 break;
1289 default:
d41cb7ee 1290 fprintf(stderr, "<gather VLA expects integer gather length type>\n");
65b8734a
MD		 1291 abort();
1292 }
80429681 1293 length = (uint32_t) tracer_load_gather_integer_type(&type_gather->u.side_vla.length_type->u.side_gather, length_ptr);
d41cb7ee 1294 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_vla.offset);
dd7947bf 1295 orig_ptr = ptr;
d41cb7ee
MD		 1296 print_attributes("attr", ":", type_gather->u.side_vla.type.attr, type_gather->u.side_vla.type.nr_attr);
1297 printf("%s", type_gather->u.side_vla.type.nr_attr ? ", " : "");
20574104 1298 printf("elements: ");
f611d0c3 1299 printf("[ ");
65b8734a 1300 for (i = 0; i < length; i++) {
d41cb7ee
MD		 1301 switch (type_gather->u.side_vla.type.elem_type->type) {
1302 case SIDE_TYPE_GATHER_VLA:
1303 fprintf(stderr, "<gather VLA only supported within gather structures>\n");
65b8734a
MD		 1304 abort();
1305 default:
1306 break;
1307 }
f611d0c3 1308 printf("%s", i ? ", " : "");
d41cb7ee 1309 ptr += tracer_print_gather_type(type_gather->u.side_vla.type.elem_type, ptr);
f611d0c3
MD		 1310 }
1311 printf(" ]");
d41cb7ee 1312 return tracer_gather_size(access_mode, ptr - orig_ptr);
f611d0c3
MD		 1313}
1314
352a4b77 1315struct tracer_visitor_priv {
66de373e 1316 const struct side_type *elem_type;
352a4b77
MD		 1317 int i;
1318};
1319
1320static
1321enum side_visitor_status tracer_write_elem_cb(const struct side_tracer_visitor_ctx *tracer_ctx,
66de373e 1322 const struct side_arg *elem)
352a4b77 1323{
e65f9ce5 1324 struct tracer_visitor_priv *tracer_priv = (struct tracer_visitor_priv *) tracer_ctx->priv;
352a4b77
MD		 1325
1326 printf("%s", tracer_priv->i++ ? ", " : "");
1327 tracer_print_type(tracer_priv->elem_type, elem);
1328 return SIDE_VISITOR_STATUS_OK;
1329}
1330
f611d0c3 1331static
66de373e 1332void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx)
f611d0c3
MD		 1333{
1334 enum side_visitor_status status;
352a4b77
MD		 1335 struct tracer_visitor_priv tracer_priv = {
1336 .elem_type = type_desc->u.side_vla_visitor.elem_type,
1337 .i = 0,
1338 };
1339 const struct side_tracer_visitor_ctx tracer_ctx = {
1340 .write_elem = tracer_write_elem_cb,
1341 .priv = &tracer_priv,
1342 };
f611d0c3 1343
905c328e 1344 print_attributes("attr", ":", type_desc->u.side_vla_visitor.attr, type_desc->u.side_vla_visitor.nr_attr);
d4328528 1345 printf("%s", type_desc->u.side_vla_visitor.nr_attr ? ", " : "");
20574104 1346 printf("elements: ");
352a4b77
MD		 1347 printf("[ ");
1348 status = type_desc->u.side_vla_visitor.visitor(&tracer_ctx, app_ctx);
1349 switch (status) {
1350 case SIDE_VISITOR_STATUS_OK:
1351 break;
1352 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1353 fprintf(stderr, "ERROR: Visitor error\n");
f611d0c3 1354 abort();
f611d0c3
MD		 1355 }
1356 printf(" ]");
f611d0c3
MD		 1357}
1358
a2e2357e 1359static
0c7abe2b 1360void tracer_print_dynamic_struct(const struct side_arg_dynamic_struct *dynamic_struct)
a2e2357e 1361{
0c7abe2b 1362 const struct side_arg_dynamic_field *fields = dynamic_struct->fields;
e65f9ce5 1363 uint32_t i, len = dynamic_struct->len;
465e5e7e 1364
905c328e 1365 print_attributes("attr", "::", dynamic_struct->attr, dynamic_struct->nr_attr);
8d20e708 1366 printf("%s", dynamic_struct->nr_attr ? ", " : "");
f0061366 1367 printf("fields:: ");
465e5e7e
MD		 1368 printf("[ ");
1369 for (i = 0; i < len; i++) {
1370 printf("%s", i ? ", " : "");
1371 printf("%s:: ", fields[i].field_name);
1372 tracer_print_dynamic(&fields[i].elem);
1373 }
1374 printf(" ]");
a2e2357e
MD		 1375}
1376
2b359235
MD		 1377struct tracer_dynamic_struct_visitor_priv {
1378 int i;
1379};
1380
1381static
1382enum side_visitor_status tracer_dynamic_struct_write_elem_cb(
1383 const struct side_tracer_dynamic_struct_visitor_ctx *tracer_ctx,
0c7abe2b 1384 const struct side_arg_dynamic_field *dynamic_field)
2b359235 1385{
e65f9ce5
MD		 1386 struct tracer_dynamic_struct_visitor_priv *tracer_priv =
1387 (struct tracer_dynamic_struct_visitor_priv *) tracer_ctx->priv;
2b359235
MD		 1388
1389 printf("%s", tracer_priv->i++ ? ", " : "");
1390 printf("%s:: ", dynamic_field->field_name);
1391 tracer_print_dynamic(&dynamic_field->elem);
1392 return SIDE_VISITOR_STATUS_OK;
1393}
1394
a2e2357e 1395static
66de373e 1396void tracer_print_dynamic_struct_visitor(const struct side_arg *item)
a2e2357e 1397{
2b359235
MD		 1398 enum side_visitor_status status;
1399 struct tracer_dynamic_struct_visitor_priv tracer_priv = {
1400 .i = 0,
1401 };
1402 const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx = {
1403 .write_field = tracer_dynamic_struct_write_elem_cb,
1404 .priv = &tracer_priv,
1405 };
66de373e 1406 void *app_ctx = item->u.side_dynamic.side_dynamic_struct_visitor.app_ctx;
2b359235 1407
66de373e
MD		 1408 print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_struct_visitor.attr, item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr);
1409 printf("%s", item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr ? ", " : "");
f0061366 1410 printf("fields:: ");
2b359235 1411 printf("[ ");
66de373e 1412 status = item->u.side_dynamic.side_dynamic_struct_visitor.visitor(&tracer_ctx, app_ctx);
2b359235
MD		 1413 switch (status) {
1414 case SIDE_VISITOR_STATUS_OK:
1415 break;
1416 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1417 fprintf(stderr, "ERROR: Visitor error\n");
2b359235
MD		 1418 abort();
1419 }
1420 printf(" ]");
a2e2357e
MD		 1421}
1422
1423static
66de373e 1424void tracer_print_dynamic_vla(const struct side_arg_dynamic_vla *vla)
a2e2357e 1425{
66de373e 1426 const struct side_arg *sav = vla->sav;
e65f9ce5 1427 uint32_t i, side_sav_len = vla->len;
a2e2357e 1428
905c328e 1429 print_attributes("attr", "::", vla->attr, vla->nr_attr);
8d20e708 1430 printf("%s", vla->nr_attr ? ", " : "");
f0061366 1431 printf("elements:: ");
a2e2357e
MD		 1432 printf("[ ");
1433 for (i = 0; i < side_sav_len; i++) {
1434 printf("%s", i ? ", " : "");
1435 tracer_print_dynamic(&sav[i]);
1436 }
1437 printf(" ]");
1438}
1439
8ceca0cd
MD		 1440struct tracer_dynamic_vla_visitor_priv {
1441 int i;
1442};
1443
1444static
1445enum side_visitor_status tracer_dynamic_vla_write_elem_cb(
6a744a79 1446 const struct side_tracer_visitor_ctx *tracer_ctx,
66de373e 1447 const struct side_arg *elem)
8ceca0cd 1448{
e65f9ce5
MD		 1449 struct tracer_dynamic_vla_visitor_priv *tracer_priv =
1450 (struct tracer_dynamic_vla_visitor_priv *) tracer_ctx->priv;
8ceca0cd
MD		 1451
1452 printf("%s", tracer_priv->i++ ? ", " : "");
1453 tracer_print_dynamic(elem);
1454 return SIDE_VISITOR_STATUS_OK;
1455}
1456
a2e2357e 1457static
66de373e 1458void tracer_print_dynamic_vla_visitor(const struct side_arg *item)
a2e2357e 1459{
8ceca0cd
MD		 1460 enum side_visitor_status status;
1461 struct tracer_dynamic_vla_visitor_priv tracer_priv = {
1462 .i = 0,
1463 };
6a744a79 1464 const struct side_tracer_visitor_ctx tracer_ctx = {
8ceca0cd
MD		 1465 .write_elem = tracer_dynamic_vla_write_elem_cb,
1466 .priv = &tracer_priv,
1467 };
66de373e 1468 void *app_ctx = item->u.side_dynamic.side_dynamic_vla_visitor.app_ctx;
8ceca0cd 1469
66de373e
MD		 1470 print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_vla_visitor.attr, item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr);
1471 printf("%s", item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr ? ", " : "");
f0061366 1472 printf("elements:: ");
8ceca0cd 1473 printf("[ ");
66de373e 1474 status = item->u.side_dynamic.side_dynamic_vla_visitor.visitor(&tracer_ctx, app_ctx);
8ceca0cd
MD		 1475 switch (status) {
1476 case SIDE_VISITOR_STATUS_OK:
1477 break;
1478 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1479 fprintf(stderr, "ERROR: Visitor error\n");
8ceca0cd
MD		 1480 abort();
1481 }
1482 printf(" ]");
a2e2357e
MD		 1483}
1484
1485static
66de373e 1486void tracer_print_dynamic(const struct side_arg *item)
a2e2357e 1487{
808bd9bf 1488 printf("{ ");
66de373e
MD		 1489 switch (item->type) {
1490 case SIDE_TYPE_DYNAMIC_NULL:
1491 tracer_print_type_header("::", item->u.side_dynamic.side_null.attr, item->u.side_dynamic.side_null.nr_attr);
a2e2357e
MD		 1492 printf("<NULL TYPE>");
1493 break;
d6f684e4 1494
66de373e 1495 case SIDE_TYPE_DYNAMIC_BOOL:
d6f684e4 1496 tracer_print_type_bool("::", &item->u.side_dynamic.side_bool.type, &item->u.side_dynamic.side_bool.value, 0);
66de373e 1497 break;
d6f684e4 1498
f9db30c3 1499 case SIDE_TYPE_DYNAMIC_INTEGER:
66de373e 1500 tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
f0dafd60 1501 TRACER_DISPLAY_BASE_10);
a2e2357e 1502 break;
66de373e
MD		 1503 case SIDE_TYPE_DYNAMIC_BYTE:
1504 tracer_print_type_header("::", item->u.side_dynamic.side_byte.type.attr, item->u.side_dynamic.side_byte.type.nr_attr);
1505 printf("0x%" PRIx8, item->u.side_dynamic.side_byte.value);
199e7aa9 1506 break;
dd6e76cb 1507
452329a6 1508 case SIDE_TYPE_DYNAMIC_POINTER:
66de373e 1509 tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
f0dafd60 1510 TRACER_DISPLAY_BASE_16);
f5e650d7 1511 break;
199e7aa9 1512
e5b6a8ce 1513 case SIDE_TYPE_DYNAMIC_FLOAT:
66de373e
MD		 1514 tracer_print_type_float("::", &item->u.side_dynamic.side_float.type,
1515 &item->u.side_dynamic.side_float.value);
fb25b355 1516 break;
3aa7ca5e 1517
66de373e
MD		 1518 case SIDE_TYPE_DYNAMIC_STRING:
1519 tracer_print_type_header("::", item->u.side_dynamic.side_string.type.attr, item->u.side_dynamic.side_string.type.nr_attr);
1520 printf("\"%s\"", (const char *)(uintptr_t) item->u.side_dynamic.side_string.value);
a2e2357e 1521 break;
66de373e
MD		 1522 case SIDE_TYPE_DYNAMIC_STRUCT:
1523 tracer_print_dynamic_struct(item->u.side_dynamic.side_dynamic_struct);
a2e2357e 1524 break;
66de373e 1525 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
c208889e 1526 tracer_print_dynamic_struct_visitor(item);
a2e2357e 1527 break;
66de373e
MD		 1528 case SIDE_TYPE_DYNAMIC_VLA:
1529 tracer_print_dynamic_vla(item->u.side_dynamic.side_dynamic_vla);
a2e2357e 1530 break;
66de373e 1531 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
a2e2357e
MD		 1532 tracer_print_dynamic_vla_visitor(item);
1533 break;
1534 default:
f6c02218 1535 fprintf(stderr, "<UNKNOWN TYPE>\n");
a2e2357e
MD		 1536 abort();
1537 }
808bd9bf 1538 printf(" }");
a2e2357e
MD		 1539}
1540
68f8cfbe
MD		 1541static
1542void tracer_print_static_fields(const struct side_event_description *desc,
9a6ca773 1543 const struct side_arg_vec *side_arg_vec,
e65f9ce5 1544 uint32_t *nr_items)
f611d0c3 1545{
9a6ca773 1546 const struct side_arg *sav = side_arg_vec->sav;
e65f9ce5 1547 uint32_t i, side_sav_len = side_arg_vec->len;
f611d0c3 1548
65010f43 1549 printf("provider: %s, event: %s", desc->provider_name, desc->event_name);
f611d0c3 1550 if (desc->nr_fields != side_sav_len) {
de1b3cd2 1551 fprintf(stderr, "ERROR: number of fields mismatch between description and arguments\n");
f611d0c3
MD		 1552 abort();
1553 }
905c328e 1554 print_attributes(", attr", ":", desc->attr, desc->nr_attr);
a848763d 1555 printf("%s", side_sav_len ? ", fields: [ " : "");
f611d0c3
MD		 1556 for (i = 0; i < side_sav_len; i++) {
1557 printf("%s", i ? ", " : "");
1558 tracer_print_field(&desc->fields[i], &sav[i]);
1559 }
68f8cfbe
MD		 1560 if (nr_items)
1561 *nr_items = i;
c7d338e2
MD		 1562 if (side_sav_len)
1563 printf(" ]");
68f8cfbe
MD		 1564}
1565
4a7d8700 1566void tracer_call(const struct side_event_description *desc,
9a6ca773 1567 const struct side_arg_vec *side_arg_vec,
4a7d8700 1568 void *priv __attribute__((unused)))
68f8cfbe 1569{
e65f9ce5 1570 uint32_t nr_fields = 0;
a848763d 1571
9a6ca773 1572 tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
f611d0c3
MD		 1573 printf("\n");
1574}
19fa6aa2
MD		 1575
1576void tracer_call_variadic(const struct side_event_description *desc,
9a6ca773 1577 const struct side_arg_vec *side_arg_vec,
0c7abe2b 1578 const struct side_arg_dynamic_struct *var_struct,
4a7d8700 1579 void *priv __attribute__((unused)))
19fa6aa2 1580{
e65f9ce5 1581 uint32_t nr_fields = 0, i, var_struct_len = var_struct->len;
19fa6aa2 1582
9a6ca773 1583 tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
68f8cfbe 1584
8a25ce77 1585 if (side_unlikely(!(desc->flags & SIDE_EVENT_FLAG_VARIADIC))) {
de1b3cd2 1586 fprintf(stderr, "ERROR: unexpected non-variadic event description\n");
8a25ce77
MD		 1587 abort();
1588 }
905c328e
MD		 1589 print_attributes(", attr ", "::", var_struct->attr, var_struct->nr_attr);
1590 printf("%s", var_struct_len ? ", fields:: [ " : "");
68f8cfbe 1591 for (i = 0; i < var_struct_len; i++, nr_fields++) {
c7d338e2 1592 printf("%s", i ? ", " : "");
68f8cfbe
MD		 1593 printf("%s:: ", var_struct->fields[i].field_name);
1594 tracer_print_dynamic(&var_struct->fields[i].elem);
19fa6aa2 1595 }
a848763d
MD		 1596 if (i)
1597 printf(" ]");
19fa6aa2
MD		 1598 printf("\n");
1599}
1e8aec23
MD		 1600
1601void tracer_event_notification(enum side_tracer_notification notif,
1602 struct side_event_description **events, uint32_t nr_events, void *priv)
1603{
1604 uint32_t i;
314c22c3 1605 int ret;
1e8aec23
MD		 1606
1607 printf("----------------------------------------------------------\n");
1608 printf("Tracer notified of events %s\n",
314c22c3 1609 notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS ? "inserted" : "removed");
1e8aec23
MD		 1610 for (i = 0; i < nr_events; i++) {
1611 struct side_event_description *event = events[i];
1612
1613 /* Skip NULL pointers */
1614 if (!event)
1615 continue;
1616 printf("provider: %s, event: %s\n",
1617 event->provider_name, event->event_name);
314c22c3
MD		 1618 if (notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS) {
1619 if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
1620 ret = side_tracer_callback_variadic_register(event, tracer_call_variadic, NULL);
1621 if (ret)
1622 abort();
1623 } else {
1624 ret = side_tracer_callback_register(event, tracer_call, NULL);
1625 if (ret)
1626 abort();
1627 }
1628 } else {
1629 if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
1630 ret = side_tracer_callback_variadic_unregister(event, tracer_call_variadic, NULL);
1631 if (ret)
1632 abort();
1633 } else {
1634 ret = side_tracer_callback_unregister(event, tracer_call, NULL);
1635 if (ret)
1636 abort();
1637 }
1638 }
1e8aec23
MD		 1639 }
1640 printf("----------------------------------------------------------\n");
1641}
1642
1643static __attribute__((constructor))
1644void tracer_init(void);
1645static
1646void tracer_init(void)
1647{
1648 tracer_handle = side_tracer_event_notification_register(tracer_event_notification, NULL);
1649 if (!tracer_handle)
1650 abort();
1651}
1652
1653static __attribute__((destructor))
1654void tracer_exit(void);
1655static
1656void tracer_exit(void)
1657{
1658 side_tracer_event_notification_unregister(tracer_handle);
1659}
Software Instrumentation Dynamically Enabled
This page took 0.120916 seconds and 4 git commands to generate.