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