projects / libside.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Introduce union side_bool_value
[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
d41cb7ee 39uint32_t tracer_print_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 40static
d41cb7ee 41uint32_t tracer_print_gather_float_type(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 42static
d69918cc
MD		 43uint32_t tracer_print_gather_struct(const struct side_type_gather *type_gather, const void *_ptr);
44static
d41cb7ee 45uint32_t tracer_print_gather_array(const struct side_type_gather *type_gather, const void *_ptr);
d9359cfa 46static
80429681
MD		 47uint32_t tracer_print_gather_vla(const struct side_type_gather *type_gather, const void *_ptr,
48 const void *_length_ptr);
65b8734a 49static
66de373e 50void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item);
f611d0c3 51
1d9c515c
MD		 52static
53int64_t get_attr_integer_value(const struct side_attr *attr)
54{
55 int64_t val;
56
57 switch (attr->value.type) {
58 case SIDE_ATTR_TYPE_U8:
43d85239 59 val = attr->value.u.integer_value.side_u8;
1d9c515c
MD		 60 break;
61 case SIDE_ATTR_TYPE_U16:
43d85239 62 val = attr->value.u.integer_value.side_u16;
1d9c515c
MD		 63 break;
64 case SIDE_ATTR_TYPE_U32:
43d85239 65 val = attr->value.u.integer_value.side_u32;
1d9c515c
MD		 66 break;
67 case SIDE_ATTR_TYPE_U64:
43d85239 68 val = attr->value.u.integer_value.side_u64;
1d9c515c
MD		 69 break;
70 case SIDE_ATTR_TYPE_S8:
43d85239 71 val = attr->value.u.integer_value.side_s8;
1d9c515c
MD		 72 break;
73 case SIDE_ATTR_TYPE_S16:
43d85239 74 val = attr->value.u.integer_value.side_s16;
1d9c515c
MD		 75 break;
76 case SIDE_ATTR_TYPE_S32:
43d85239 77 val = attr->value.u.integer_value.side_s32;
1d9c515c
MD		 78 break;
79 case SIDE_ATTR_TYPE_S64:
43d85239 80 val = attr->value.u.integer_value.side_s64;
1d9c515c
MD		 81 break;
82 default:
83 fprintf(stderr, "Unexpected attribute type\n");
84 abort();
85 }
86 return val;
87}
88
89static
f0dafd60
MD		 90enum tracer_display_base get_attr_display_base(const struct side_attr *_attr, uint32_t nr_attr,
91 enum tracer_display_base default_base)
1d9c515c
MD		 92{
93 uint32_t i;
94
95 for (i = 0; i < nr_attr; i++) {
96 const struct side_attr *attr = &_attr[i];
97
98 if (!strcmp(attr->key, "std.integer.base")) {
99 int64_t val = get_attr_integer_value(attr);
100
101 switch (val) {
102 case 2:
103 return TRACER_DISPLAY_BASE_2;
104 case 8:
105 return TRACER_DISPLAY_BASE_8;
106 case 10:
107 return TRACER_DISPLAY_BASE_10;
108 case 16:
109 return TRACER_DISPLAY_BASE_16;
110 default:
111 fprintf(stderr, "Unexpected integer display base: %" PRId64 "\n", val);
112 abort();
113 }
114 }
115 }
f0dafd60 116 return default_base; /* Default */
1d9c515c
MD		 117}
118
8bdd5c12 119static
66de373e 120bool type_to_host_reverse_bo(const struct side_type *type_desc)
8bdd5c12
MD		 121{
122 switch (type_desc->type) {
123 case SIDE_TYPE_U8:
124 case SIDE_TYPE_S8:
125 case SIDE_TYPE_BYTE:
126 return false;
127 case SIDE_TYPE_U16:
128 case SIDE_TYPE_U32:
129 case SIDE_TYPE_U64:
130 case SIDE_TYPE_S16:
131 case SIDE_TYPE_S32:
132 case SIDE_TYPE_S64:
dd6e76cb
MD		 133 case SIDE_TYPE_POINTER32:
134 case SIDE_TYPE_POINTER64:
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{
522 bool reverse_bo;
523 uint64_t v;
524
525 if (!type_bool->len_bits ||
526 type_bool->len_bits + offset_bits > type_bool->bool_size_bits)
527 abort();
528 reverse_bo = type_bool->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
529 switch (type_bool->bool_size_bits) {
530 case 8:
d6f684e4 531 v = value->side_bool8;
8ad2f385
MD		 532 break;
533 case 16:
534 {
535 uint16_t side_u16;
536
d6f684e4 537 side_u16 = value->side_bool16;
8ad2f385
MD		 538 if (reverse_bo)
539 side_u16 = side_bswap_16(side_u16);
540 v = side_u16;
541 break;
542 }
543 case 32:
544 {
545 uint32_t side_u32;
546
d6f684e4 547 side_u32 = value->side_bool32;
8ad2f385
MD		 548 if (reverse_bo)
549 side_u32 = side_bswap_32(side_u32);
550 v = side_u32;
551 break;
552 }
553 case 64:
554 {
555 uint64_t side_u64;
556
d6f684e4 557 side_u64 = value->side_bool64;
8ad2f385
MD		 558 if (reverse_bo)
559 side_u64 = side_bswap_64(side_u64);
560 v = side_u64;
561 break;
562 }
563 default:
564 abort();
565 }
566 v >>= offset_bits;
567 if (type_bool->len_bits < 64)
568 v &= (1ULL << type_bool->len_bits) - 1;
569 tracer_print_type_header(separator, type_bool->attr, type_bool->nr_attr);
570 printf("%s", v ? "true" : "false");
571}
572
56c21987 573static
e3080b2a
MD		 574void tracer_print_type_integer(const char *separator,
575 const struct side_type_integer *type_integer,
87405d12 576 const union side_integer_value *value,
f0dafd60
MD		 577 uint16_t offset_bits,
578 enum tracer_display_base default_base)
56c21987
MD		 579{
580 enum tracer_display_base base;
cb589216 581 bool reverse_bo;
56c21987
MD		 582 union {
583 uint64_t v_unsigned;
584 int64_t v_signed;
585 } v;
586
e3080b2a 587 if (!type_integer->len_bits ||
87405d12 588 type_integer->len_bits + offset_bits > type_integer->integer_size_bits)
56c21987 589 abort();
cb589216 590 reverse_bo = type_integer->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
e3080b2a 591 base = get_attr_display_base(type_integer->attr,
f0dafd60
MD		 592 type_integer->nr_attr,
593 default_base);
e3080b2a
MD		 594 switch (type_integer->integer_size_bits) {
595 case 8:
596 if (type_integer->signedness)
597 v.v_signed = value->side_s8;
598 else
599 v.v_unsigned = value->side_u8;
56c21987 600 break;
e3080b2a
MD		 601 case 16:
602 if (type_integer->signedness) {
603 int16_t side_s16;
56c21987 604
e3080b2a 605 side_s16 = value->side_s16;
cb589216 606 if (reverse_bo)
e3080b2a
MD		 607 side_s16 = side_bswap_16(side_s16);
608 v.v_signed = side_s16;
609 } else {
610 uint16_t side_u16;
56c21987 611
e3080b2a 612 side_u16 = value->side_u16;
cb589216 613 if (reverse_bo)
e3080b2a
MD		 614 side_u16 = side_bswap_16(side_u16);
615 v.v_unsigned = side_u16;
616 }
56c21987 617 break;
e3080b2a
MD		 618 case 32:
619 if (type_integer->signedness) {
620 int32_t side_s32;
56c21987 621
e3080b2a 622 side_s32 = value->side_s32;
cb589216 623 if (reverse_bo)
e3080b2a
MD		 624 side_s32 = side_bswap_32(side_s32);
625 v.v_signed = side_s32;
626 } else {
627 uint32_t side_u32;
56c21987 628
e3080b2a 629 side_u32 = value->side_u32;
cb589216 630 if (reverse_bo)
e3080b2a
MD		 631 side_u32 = side_bswap_32(side_u32);
632 v.v_unsigned = side_u32;
633 }
56c21987 634 break;
e3080b2a
MD		 635 case 64:
636 if (type_integer->signedness) {
637 int64_t side_s64;
56c21987 638
e3080b2a 639 side_s64 = value->side_s64;
cb589216 640 if (reverse_bo)
e3080b2a
MD		 641 side_s64 = side_bswap_64(side_s64);
642 v.v_signed = side_s64;
643 } else {
644 uint64_t side_u64;
56c21987 645
e3080b2a 646 side_u64 = value->side_u64;
cb589216 647 if (reverse_bo)
e3080b2a
MD		 648 side_u64 = side_bswap_64(side_u64);
649 v.v_unsigned = side_u64;
650 }
56c21987 651 break;
56c21987
MD		 652 default:
653 abort();
654 }
87405d12 655 v.v_unsigned >>= offset_bits;
e3080b2a
MD		 656 if (type_integer->len_bits < 64)
657 v.v_unsigned &= (1ULL << type_integer->len_bits) - 1;
658 tracer_print_type_header(separator, type_integer->attr, type_integer->nr_attr);
56c21987
MD		 659 switch (base) {
660 case TRACER_DISPLAY_BASE_2:
e3080b2a 661 print_integer_binary(v.v_unsigned, type_integer->len_bits);
56c21987
MD		 662 break;
663 case TRACER_DISPLAY_BASE_8:
664 printf("0%" PRIo64, v.v_unsigned);
665 break;
666 case TRACER_DISPLAY_BASE_10:
e3080b2a 667 if (type_integer->signedness) {
56c21987 668 /* Sign-extend. */
e3080b2a
MD		 669 if (type_integer->len_bits < 64) {
670 if (v.v_unsigned & (1ULL << (type_integer->len_bits - 1)))
671 v.v_unsigned |= ~((1ULL << type_integer->len_bits) - 1);
56c21987
MD		 672 }
673 printf("%" PRId64, v.v_signed);
674 } else {
675 printf("%" PRIu64, v.v_unsigned);
676 }
677 break;
678 case TRACER_DISPLAY_BASE_16:
679 printf("0x%" PRIx64, v.v_unsigned);
680 break;
681 default:
682 abort();
683 }
684}
685
3aa7ca5e
MD		 686static
687void tracer_print_type_float(const char *separator,
688 const struct side_type_float *type_float,
689 const union side_float_value *value)
690{
691 bool reverse_bo;
692
693 reverse_bo = type_float->byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
694 tracer_print_type_header(separator, type_float->attr, type_float->nr_attr);
695 switch (type_float->float_size_bits) {
696 case 16:
697 {
698#if __HAVE_FLOAT16
699 union {
700 _Float16 f;
701 uint16_t u;
702 } float16 = {
703 .f = value->side_float_binary16,
704 };
705
706 if (reverse_bo)
707 float16.u = side_bswap_16(float16.u);
708 tracer_print_type_header(":", type_desc->u.side_float.attr, type_desc->u.side_float.nr_attr);
709 printf("%g", (double) float16.f);
710 break;
711#else
712 fprintf(stderr, "ERROR: Unsupported binary16 float type\n");
713 abort();
714#endif
715 }
716 case 32:
717 {
718#if __HAVE_FLOAT32
719 union {
720 _Float32 f;
721 uint32_t u;
722 } float32 = {
723 .f = value->side_float_binary32,
724 };
725
726 if (reverse_bo)
727 float32.u = side_bswap_32(float32.u);
728 printf("%g", (double) float32.f);
729 break;
730#else
731 fprintf(stderr, "ERROR: Unsupported binary32 float type\n");
732 abort();
733#endif
734 }
735 case 64:
736 {
737#if __HAVE_FLOAT64
738 union {
739 _Float64 f;
740 uint64_t u;
741 } float64 = {
742 .f = value->side_float_binary64,
743 };
744
745 if (reverse_bo)
746 float64.u = side_bswap_64(float64.u);
747 printf("%g", (double) float64.f);
748 break;
749#else
750 fprintf(stderr, "ERROR: Unsupported binary64 float type\n");
751 abort();
752#endif
753 }
754 case 128:
755 {
756#if __HAVE_FLOAT128
757 union {
758 _Float128 f;
759 char arr[16];
760 } float128 = {
761 .f = value->side_float_binary128,
762 };
763
764 if (reverse_bo)
765 side_bswap_128p(float128.arr);
766 printf("%Lg", (long double) float128.f);
767 break;
768#else
769 fprintf(stderr, "ERROR: Unsupported binary128 float type\n");
770 abort();
771#endif
772 }
773 default:
774 fprintf(stderr, "ERROR: Unknown float size\n");
775 abort();
776 }
777}
778
f611d0c3 779static
66de373e 780void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item)
f611d0c3 781{
66de373e 782 enum side_type_label type;
d8be25de 783
45392033 784 switch (type_desc->type) {
45392033
MD		 785 case SIDE_TYPE_ENUM:
786 switch (item->type) {
787 case SIDE_TYPE_U8:
788 case SIDE_TYPE_U16:
789 case SIDE_TYPE_U32:
790 case SIDE_TYPE_U64:
791 case SIDE_TYPE_S8:
792 case SIDE_TYPE_S16:
793 case SIDE_TYPE_S32:
794 case SIDE_TYPE_S64:
bab5d6e4
MD		 795 break;
796 default:
de1b3cd2 797 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
45392033
MD		 798 abort();
799 break;
800 }
801 break;
802
803 case SIDE_TYPE_ENUM_BITMAP:
804 switch (item->type) {
805 case SIDE_TYPE_U8:
4cc2880b 806 case SIDE_TYPE_BYTE:
45392033
MD		 807 case SIDE_TYPE_U16:
808 case SIDE_TYPE_U32:
809 case SIDE_TYPE_U64:
810 case SIDE_TYPE_ARRAY:
811 case SIDE_TYPE_VLA:
812 break;
813 default:
de1b3cd2 814 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
45392033
MD		 815 abort();
816 break;
d8be25de
MD		 817 }
818 break;
819
66de373e
MD		 820 case SIDE_TYPE_DYNAMIC:
821 switch (item->type) {
822 case SIDE_TYPE_DYNAMIC_NULL:
823 case SIDE_TYPE_DYNAMIC_BOOL:
824 case SIDE_TYPE_DYNAMIC_U8:
825 case SIDE_TYPE_DYNAMIC_U16:
826 case SIDE_TYPE_DYNAMIC_U32:
827 case SIDE_TYPE_DYNAMIC_U64:
828 case SIDE_TYPE_DYNAMIC_S8:
829 case SIDE_TYPE_DYNAMIC_S16:
830 case SIDE_TYPE_DYNAMIC_S32:
831 case SIDE_TYPE_DYNAMIC_S64:
832 case SIDE_TYPE_DYNAMIC_BYTE:
833 case SIDE_TYPE_DYNAMIC_POINTER32:
834 case SIDE_TYPE_DYNAMIC_POINTER64:
835 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
836 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
837 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
838 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
839 case SIDE_TYPE_DYNAMIC_STRING:
840 case SIDE_TYPE_DYNAMIC_STRUCT:
841 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
842 case SIDE_TYPE_DYNAMIC_VLA:
843 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
844 break;
845 default:
846 fprintf(stderr, "ERROR: Unexpected dynamic type\n");
847 abort();
848 break;
849 }
850 break;
851
ba845af5 852 default:
a2e2357e 853 if (type_desc->type != item->type) {
de1b3cd2 854 fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
ba845af5
MD		 855 abort();
856 }
857 break;
f611d0c3 858 }
d8be25de 859
bab5d6e4 860 if (type_desc->type == SIDE_TYPE_ENUM || type_desc->type == SIDE_TYPE_ENUM_BITMAP)
e65f9ce5 861 type = (enum side_type_label) type_desc->type;
d8be25de 862 else
e65f9ce5 863 type = (enum side_type_label) item->type;
d8be25de 864
a848763d 865 printf("{ ");
d8be25de 866 switch (type) {
9b641221
MD		 867 case SIDE_TYPE_NULL:
868 tracer_print_type_header(":", type_desc->u.side_null.attr, type_desc->u.side_null.nr_attr);
869 printf("<NULL TYPE>");
870 break;
871
4f40d951 872 case SIDE_TYPE_BOOL:
d6f684e4 873 tracer_print_type_bool(":", &type_desc->u.side_bool, &item->u.side_static.bool_value, 0);
4f40d951 874 break;
1d9c515c 875
56c21987 876 case SIDE_TYPE_U8:
f611d0c3 877 case SIDE_TYPE_U16:
f611d0c3 878 case SIDE_TYPE_U32:
f611d0c3 879 case SIDE_TYPE_U64:
f611d0c3 880 case SIDE_TYPE_S8:
f611d0c3 881 case SIDE_TYPE_S16:
f611d0c3 882 case SIDE_TYPE_S32:
f611d0c3 883 case SIDE_TYPE_S64:
66de373e 884 tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
f0dafd60 885 TRACER_DISPLAY_BASE_10);
f611d0c3 886 break;
56c21987 887
dd6e76cb 888 case SIDE_TYPE_POINTER32:
dd6e76cb 889 case SIDE_TYPE_POINTER64:
66de373e 890 tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
f0dafd60 891 TRACER_DISPLAY_BASE_16);
f5e650d7 892 break;
f0dafd60 893
f7653b43 894 case SIDE_TYPE_BYTE:
5f82db91 895 tracer_print_type_header(":", type_desc->u.side_byte.attr, type_desc->u.side_byte.nr_attr);
66de373e 896 printf("0x%" PRIx8, item->u.side_static.byte_value);
7aec0d09 897 break;
79f677ba 898
d8be25de
MD		 899 case SIDE_TYPE_ENUM:
900 print_enum(type_desc, item);
79f677ba
MD		 901 break;
902
bab5d6e4 903 case SIDE_TYPE_ENUM_BITMAP:
af6aa6e1 904 print_enum_bitmap(type_desc, item);
ea32e5fc
MD		 905 break;
906
fb25b355 907 case SIDE_TYPE_FLOAT_BINARY16:
fb25b355 908 case SIDE_TYPE_FLOAT_BINARY32:
fb25b355 909 case SIDE_TYPE_FLOAT_BINARY64:
fb25b355 910 case SIDE_TYPE_FLOAT_BINARY128:
66de373e 911 tracer_print_type_float(":", &type_desc->u.side_float, &item->u.side_static.float_value);
fb25b355 912 break;
3aa7ca5e 913
f611d0c3 914 case SIDE_TYPE_STRING:
5f82db91 915 tracer_print_type_header(":", type_desc->u.side_string.attr, type_desc->u.side_string.nr_attr);
66de373e 916 printf("\"%s\"", (const char *)(uintptr_t) item->u.side_static.string_value);
f611d0c3
MD		 917 break;
918 case SIDE_TYPE_STRUCT:
66de373e 919 tracer_print_struct(type_desc, item->u.side_static.side_struct);
f611d0c3 920 break;
d41cb7ee 921 case SIDE_TYPE_GATHER_STRUCT:
fb8c26c9 922 (void) tracer_print_gather_struct(&type_desc->u.side_gather, item->u.side_static.side_struct_gather_ptr);
d9359cfa 923 break;
d41cb7ee 924 case SIDE_TYPE_GATHER_ARRAY:
fb8c26c9 925 (void) tracer_print_gather_array(&type_desc->u.side_gather, item->u.side_static.side_array_gather_ptr);
33956c71 926 break;
80429681
MD		 927 case SIDE_TYPE_GATHER_VLA:
928 (void) tracer_print_gather_vla(&type_desc->u.side_gather, item->u.side_static.side_vla_gather.ptr,
929 item->u.side_static.side_vla_gather.length_ptr);
930 break;
8ad2f385
MD		 931 case SIDE_TYPE_GATHER_BOOL:
932 (void) tracer_print_gather_bool_type(&type_desc->u.side_gather, item->u.side_static.side_bool_gather_ptr);
933 break;
d69918cc 934 case SIDE_TYPE_GATHER_BYTE:
fb8c26c9 935 (void) tracer_print_gather_byte_type(&type_desc->u.side_gather, item->u.side_static.side_byte_gather_ptr);
d69918cc 936 break;
d41cb7ee
MD		 937 case SIDE_TYPE_GATHER_UNSIGNED_INT:
938 case SIDE_TYPE_GATHER_SIGNED_INT:
939 (void) tracer_print_gather_integer_type(&type_desc->u.side_gather, item->u.side_static.side_integer_gather_ptr);
7a1cb105 940 break;
d41cb7ee
MD		 941 case SIDE_TYPE_GATHER_FLOAT:
942 (void) tracer_print_gather_float_type(&type_desc->u.side_gather, item->u.side_static.side_float_gather_ptr);
905f68e3 943 break;
f611d0c3 944 case SIDE_TYPE_ARRAY:
66de373e 945 tracer_print_array(type_desc, item->u.side_static.side_array);
f611d0c3
MD		 946 break;
947 case SIDE_TYPE_VLA:
66de373e 948 tracer_print_vla(type_desc, item->u.side_static.side_vla);
f611d0c3
MD		 949 break;
950 case SIDE_TYPE_VLA_VISITOR:
66de373e 951 tracer_print_vla_visitor(type_desc, item->u.side_static.side_vla_app_visitor_ctx);
f611d0c3 952 break;
66de373e
MD		 953
954 /* Dynamic types */
955 case SIDE_TYPE_DYNAMIC_NULL:
956 case SIDE_TYPE_DYNAMIC_BOOL:
957 case SIDE_TYPE_DYNAMIC_U8:
958 case SIDE_TYPE_DYNAMIC_U16:
959 case SIDE_TYPE_DYNAMIC_U32:
960 case SIDE_TYPE_DYNAMIC_U64:
961 case SIDE_TYPE_DYNAMIC_S8:
962 case SIDE_TYPE_DYNAMIC_S16:
963 case SIDE_TYPE_DYNAMIC_S32:
964 case SIDE_TYPE_DYNAMIC_S64:
965 case SIDE_TYPE_DYNAMIC_BYTE:
966 case SIDE_TYPE_DYNAMIC_POINTER32:
967 case SIDE_TYPE_DYNAMIC_POINTER64:
968 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
969 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
970 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
971 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
972 case SIDE_TYPE_DYNAMIC_STRING:
973 case SIDE_TYPE_DYNAMIC_STRUCT:
974 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
975 case SIDE_TYPE_DYNAMIC_VLA:
976 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
977 tracer_print_dynamic(item);
a2e2357e 978 break;
f611d0c3 979 default:
f6c02218 980 fprintf(stderr, "<UNKNOWN TYPE>\n");
f611d0c3
MD		 981 abort();
982 }
a848763d 983 printf(" }");
f611d0c3
MD		 984}
985
986static
66de373e 987void tracer_print_field(const struct side_event_field *item_desc, const struct side_arg *item)
f611d0c3 988{
19fa6aa2 989 printf("%s: ", item_desc->field_name);
f611d0c3 990 tracer_print_type(&item_desc->side_type, item);
f611d0c3
MD		 991}
992
993static
9a6ca773 994void tracer_print_struct(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
f611d0c3 995{
9a6ca773 996 const struct side_arg *sav = side_arg_vec->sav;
e65f9ce5 997 uint32_t i, side_sav_len = side_arg_vec->len;
f611d0c3 998
c7a14585 999 if (type_desc->u.side_struct->nr_fields != side_sav_len) {
de1b3cd2 1000 fprintf(stderr, "ERROR: number of fields mismatch between description and arguments of structure\n");
f611d0c3
MD		 1001 abort();
1002 }
905c328e 1003 print_attributes("attr", ":", type_desc->u.side_struct->attr, type_desc->u.side_struct->nr_attr);
73b2b0c2
MD		 1004 printf("%s", type_desc->u.side_struct->nr_attr ? ", " : "");
1005 printf("fields: { ");
f611d0c3
MD		 1006 for (i = 0; i < side_sav_len; i++) {
1007 printf("%s", i ? ", " : "");
c7a14585 1008 tracer_print_field(&type_desc->u.side_struct->fields[i], &sav[i]);
f611d0c3 1009 }
d4328528 1010 printf(" }");
f611d0c3
MD		 1011}
1012
7a1cb105 1013static
d9359cfa
MD		 1014void tracer_print_array(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
1015{
1016 const struct side_arg *sav = side_arg_vec->sav;
1017 uint32_t i, side_sav_len = side_arg_vec->len;
1018
1019 if (type_desc->u.side_array.length != side_sav_len) {
1020 fprintf(stderr, "ERROR: length mismatch between description and arguments of array\n");
1021 abort();
1022 }
1023 print_attributes("attr", ":", type_desc->u.side_array.attr, type_desc->u.side_array.nr_attr);
1024 printf("%s", type_desc->u.side_array.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_array.elem_type, &sav[i]);
1030 }
1031 printf(" ]");
1032}
1033
1034static
1035void tracer_print_vla(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
1036{
1037 const struct side_arg *sav = side_arg_vec->sav;
1038 uint32_t i, side_sav_len = side_arg_vec->len;
1039
1040 print_attributes("attr", ":", type_desc->u.side_vla.attr, type_desc->u.side_vla.nr_attr);
1041 printf("%s", type_desc->u.side_vla.nr_attr ? ", " : "");
1042 printf("elements: ");
1043 printf("[ ");
1044 for (i = 0; i < side_sav_len; i++) {
1045 printf("%s", i ? ", " : "");
1046 tracer_print_type(type_desc->u.side_vla.elem_type, &sav[i]);
1047 }
1048 printf(" ]");
1049}
1050
dd7947bf 1051static
d41cb7ee 1052const char *tracer_gather_access(enum side_type_gather_access_mode access_mode, const char *ptr)
dd7947bf 1053{
65b8734a 1054 switch (access_mode) {
84c04cc8 1055 case SIDE_TYPE_GATHER_ACCESS_DIRECT:
dd7947bf 1056 return ptr;
d41cb7ee 1057 case SIDE_TYPE_GATHER_ACCESS_POINTER:
dd7947bf
MD		 1058 /* Dereference pointer */
1059 memcpy(&ptr, ptr, sizeof(ptr));
1060 return ptr;
1061 default:
1062 abort();
1063 }
1064}
1065
1066static
d41cb7ee 1067uint32_t tracer_gather_size(enum side_type_gather_access_mode access_mode, uint32_t len)
dd7947bf 1068{
65b8734a 1069 switch (access_mode) {
84c04cc8 1070 case SIDE_TYPE_GATHER_ACCESS_DIRECT:
dd7947bf 1071 return len;
d41cb7ee 1072 case SIDE_TYPE_GATHER_ACCESS_POINTER:
dd7947bf
MD		 1073 return sizeof(void *);
1074 default:
1075 abort();
1076 }
1077}
1078
d9359cfa 1079static
d41cb7ee 1080uint64_t tracer_load_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr)
7a1cb105 1081{
d41cb7ee
MD		 1082 enum side_type_gather_access_mode access_mode = type_gather->u.side_integer.access_mode;
1083 uint32_t integer_size_bytes = type_gather->u.side_integer.type.integer_size_bits >> 3;
7a1cb105 1084 const char *ptr = (const char *) _ptr;
87405d12 1085 union side_integer_value value;
65b8734a 1086
d41cb7ee 1087 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_integer.offset);
65b8734a 1088 memcpy(&value, ptr, integer_size_bytes);
d41cb7ee 1089 switch (type_gather->u.side_integer.type.integer_size_bits) {
65b8734a
MD		 1090 case 8:
1091 return (uint64_t) value.side_u8;
1092 case 16:
1093 return (uint64_t) value.side_u16;
1094 case 32:
1095 return (uint64_t) value.side_u32;
1096 case 64:
1097 return (uint64_t) value.side_u64;
1098 default:
1099 abort();
1100 }
1101}
1102
8ad2f385
MD		 1103static
1104uint32_t tracer_print_gather_bool_type(const struct side_type_gather *type_gather, const void *_ptr)
1105{
1106 enum side_type_gather_access_mode access_mode = type_gather->u.side_bool.access_mode;
1107 uint32_t bool_size_bytes = type_gather->u.side_bool.type.bool_size_bits >> 3;
1108 const char *ptr = (const char *) _ptr;
d6f684e4 1109 union side_bool_value value;
8ad2f385
MD		 1110
1111 switch (type_gather->u.side_bool.type.bool_size_bits) {
1112 case 8:
1113 case 16:
1114 case 32:
1115 case 64:
1116 break;
1117 default:
1118 abort();
1119 }
1120 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_bool.offset);
1121 memcpy(&value, ptr, bool_size_bytes);
1122 tracer_print_type_bool(":", &type_gather->u.side_bool.type, &value,
1123 type_gather->u.side_bool.offset_bits);
1124 return tracer_gather_size(access_mode, bool_size_bytes);
1125}
1126
d69918cc
MD		 1127static
1128uint32_t tracer_print_gather_byte_type(const struct side_type_gather *type_gather, const void *_ptr)
1129{
1130 enum side_type_gather_access_mode access_mode = type_gather->u.side_byte.access_mode;
1131 const char *ptr = (const char *) _ptr;
1132 uint8_t value;
1133
1134 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_byte.offset);
1135 memcpy(&value, ptr, 1);
1136 tracer_print_type_header(":", type_gather->u.side_byte.type.attr,
1137 type_gather->u.side_byte.type.nr_attr);
1138 printf("0x%" PRIx8, value);
1139 return tracer_gather_size(access_mode, 1);
1140}
1141
65b8734a 1142static
d41cb7ee 1143uint32_t tracer_print_gather_integer_type(const struct side_type_gather *type_gather, const void *_ptr)
65b8734a 1144{
d41cb7ee
MD		 1145 enum side_type_gather_access_mode access_mode = type_gather->u.side_integer.access_mode;
1146 uint32_t integer_size_bytes = type_gather->u.side_integer.type.integer_size_bits >> 3;
65b8734a
MD		 1147 const char *ptr = (const char *) _ptr;
1148 union side_integer_value value;
7a1cb105 1149
d41cb7ee 1150 switch (type_gather->u.side_integer.type.integer_size_bits) {
33956c71
MD		 1151 case 8:
1152 case 16:
1153 case 32:
1154 case 64:
9b641221 1155 break;
33956c71
MD		 1156 default:
1157 abort();
1158 }
d41cb7ee 1159 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_integer.offset);
dd7947bf 1160 memcpy(&value, ptr, integer_size_bytes);
d41cb7ee
MD		 1161 tracer_print_type_integer(":", &type_gather->u.side_integer.type, &value,
1162 type_gather->u.side_integer.offset_bits, TRACER_DISPLAY_BASE_10);
1163 return tracer_gather_size(access_mode, integer_size_bytes);
33956c71 1164}
9b641221 1165
905f68e3 1166static
d41cb7ee 1167uint32_t tracer_print_gather_float_type(const struct side_type_gather *type_gather, const void *_ptr)
905f68e3 1168{
d41cb7ee
MD		 1169 enum side_type_gather_access_mode access_mode = type_gather->u.side_float.access_mode;
1170 uint32_t float_size_bytes = type_gather->u.side_float.type.float_size_bits >> 3;
905f68e3
MD		 1171 const char *ptr = (const char *) _ptr;
1172 union side_float_value value;
1173
d41cb7ee 1174 switch (type_gather->u.side_float.type.float_size_bits) {
905f68e3
MD		 1175 case 16:
1176 case 32:
1177 case 64:
1178 case 128:
1179 break;
1180 default:
1181 abort();
1182 }
d41cb7ee 1183 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_float.offset);
dd7947bf 1184 memcpy(&value, ptr, float_size_bytes);
d41cb7ee
MD		 1185 tracer_print_type_float(":", &type_gather->u.side_float.type, &value);
1186 return tracer_gather_size(access_mode, float_size_bytes);
905f68e3
MD		 1187}
1188
33956c71 1189static
d41cb7ee 1190uint32_t tracer_print_gather_type(const struct side_type *type_desc, const void *ptr)
33956c71 1191{
d9359cfa
MD		 1192 uint32_t len;
1193
33956c71
MD		 1194 printf("{ ");
1195 switch (type_desc->type) {
8ad2f385
MD		 1196 case SIDE_TYPE_GATHER_BOOL:
1197 len = tracer_print_gather_bool_type(&type_desc->u.side_gather, ptr);
1198 break;
d69918cc
MD		 1199 case SIDE_TYPE_GATHER_BYTE:
1200 len = tracer_print_gather_byte_type(&type_desc->u.side_gather, ptr);
1201 break;
d41cb7ee
MD		 1202 case SIDE_TYPE_GATHER_UNSIGNED_INT:
1203 case SIDE_TYPE_GATHER_SIGNED_INT:
1204 len = tracer_print_gather_integer_type(&type_desc->u.side_gather, ptr);
905f68e3 1205 break;
d41cb7ee
MD		 1206 case SIDE_TYPE_GATHER_FLOAT:
1207 len = tracer_print_gather_float_type(&type_desc->u.side_gather, ptr);
33956c71 1208 break;
d41cb7ee
MD		 1209 case SIDE_TYPE_GATHER_STRUCT:
1210 len = tracer_print_gather_struct(&type_desc->u.side_gather, ptr);
d9359cfa 1211 break;
d41cb7ee
MD		 1212 case SIDE_TYPE_GATHER_ARRAY:
1213 len = tracer_print_gather_array(&type_desc->u.side_gather, ptr);
9b641221 1214 break;
d41cb7ee 1215 case SIDE_TYPE_GATHER_VLA:
80429681 1216 len = tracer_print_gather_vla(&type_desc->u.side_gather, ptr, ptr);
65b8734a 1217 break;
9b641221 1218 default:
d41cb7ee 1219 fprintf(stderr, "<UNKNOWN GATHER TYPE>");
9b641221 1220 abort();
7a1cb105
MD		 1221 }
1222 printf(" }");
d9359cfa 1223 return len;
7a1cb105
MD		 1224}
1225
1226static
d41cb7ee 1227void tracer_print_gather_field(const struct side_event_field *field, const void *ptr)
7a1cb105 1228{
33956c71 1229 printf("%s: ", field->field_name);
d41cb7ee 1230 (void) tracer_print_gather_type(&field->side_type, ptr);
7a1cb105
MD		 1231}
1232
1233static
d41cb7ee 1234uint32_t tracer_print_gather_struct(const struct side_type_gather *type_gather, const void *_ptr)
7a1cb105 1235{
d41cb7ee 1236 enum side_type_gather_access_mode access_mode = type_gather->u.side_struct.access_mode;
dd7947bf 1237 const char *ptr = (const char *) _ptr;
e65f9ce5 1238 uint32_t i;
7a1cb105 1239
d41cb7ee
MD		 1240 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_struct.offset);
1241 print_attributes("attr", ":", type_gather->u.side_struct.type->attr, type_gather->u.side_struct.type->nr_attr);
1242 printf("%s", type_gather->u.side_struct.type->nr_attr ? ", " : "");
7a1cb105 1243 printf("fields: { ");
d41cb7ee 1244 for (i = 0; i < type_gather->u.side_struct.type->nr_fields; i++) {
7a1cb105 1245 printf("%s", i ? ", " : "");
d41cb7ee 1246 tracer_print_gather_field(&type_gather->u.side_struct.type->fields[i], ptr);
7a1cb105
MD		 1247 }
1248 printf(" }");
d41cb7ee 1249 return tracer_gather_size(access_mode, type_gather->u.side_struct.size);
7a1cb105
MD		 1250}
1251
f611d0c3 1252static
d41cb7ee 1253uint32_t tracer_print_gather_array(const struct side_type_gather *type_gather, const void *_ptr)
f611d0c3 1254{
d41cb7ee 1255 enum side_type_gather_access_mode access_mode = type_gather->u.side_array.access_mode;
dd7947bf 1256 const char *ptr = (const char *) _ptr, *orig_ptr;
d9359cfa 1257 uint32_t i;
f611d0c3 1258
d41cb7ee 1259 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_array.offset);
65b8734a 1260 orig_ptr = ptr;
d41cb7ee
MD		 1261 print_attributes("attr", ":", type_gather->u.side_array.type.attr, type_gather->u.side_array.type.nr_attr);
1262 printf("%s", type_gather->u.side_array.type.nr_attr ? ", " : "");
65b8734a
MD		 1263 printf("elements: ");
1264 printf("[ ");
d41cb7ee
MD		 1265 for (i = 0; i < type_gather->u.side_array.type.length; i++) {
1266 switch (type_gather->u.side_array.type.elem_type->type) {
1267 case SIDE_TYPE_GATHER_VLA:
1268 fprintf(stderr, "<gather VLA only supported within gather structures>\n");
65b8734a
MD		 1269 abort();
1270 default:
1271 break;
1272 }
1273 printf("%s", i ? ", " : "");
d41cb7ee 1274 ptr += tracer_print_gather_type(type_gather->u.side_array.type.elem_type, ptr);
65b8734a
MD		 1275 }
1276 printf(" ]");
d41cb7ee 1277 return tracer_gather_size(access_mode, ptr - orig_ptr);
65b8734a
MD		 1278}
1279
1280static
80429681
MD		 1281uint32_t tracer_print_gather_vla(const struct side_type_gather *type_gather, const void *_ptr,
1282 const void *_length_ptr)
65b8734a 1283{
d41cb7ee 1284 enum side_type_gather_access_mode access_mode = type_gather->u.side_vla.access_mode;
65b8734a 1285 const char *ptr = (const char *) _ptr, *orig_ptr;
80429681 1286 const char *length_ptr = (const char *) _length_ptr;
65b8734a
MD		 1287 uint32_t i, length;
1288
1289 /* Access length */
d41cb7ee
MD		 1290 switch (type_gather->u.side_vla.length_type->type) {
1291 case SIDE_TYPE_GATHER_UNSIGNED_INT:
1292 case SIDE_TYPE_GATHER_SIGNED_INT:
65b8734a
MD		 1293 break;
1294 default:
d41cb7ee 1295 fprintf(stderr, "<gather VLA expects integer gather length type>\n");
65b8734a
MD		 1296 abort();
1297 }
80429681 1298 length = (uint32_t) tracer_load_gather_integer_type(&type_gather->u.side_vla.length_type->u.side_gather, length_ptr);
d41cb7ee 1299 ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_vla.offset);
dd7947bf 1300 orig_ptr = ptr;
d41cb7ee
MD		 1301 print_attributes("attr", ":", type_gather->u.side_vla.type.attr, type_gather->u.side_vla.type.nr_attr);
1302 printf("%s", type_gather->u.side_vla.type.nr_attr ? ", " : "");
20574104 1303 printf("elements: ");
f611d0c3 1304 printf("[ ");
65b8734a 1305 for (i = 0; i < length; i++) {
d41cb7ee
MD		 1306 switch (type_gather->u.side_vla.type.elem_type->type) {
1307 case SIDE_TYPE_GATHER_VLA:
1308 fprintf(stderr, "<gather VLA only supported within gather structures>\n");
65b8734a
MD		 1309 abort();
1310 default:
1311 break;
1312 }
f611d0c3 1313 printf("%s", i ? ", " : "");
d41cb7ee 1314 ptr += tracer_print_gather_type(type_gather->u.side_vla.type.elem_type, ptr);
f611d0c3
MD		 1315 }
1316 printf(" ]");
d41cb7ee 1317 return tracer_gather_size(access_mode, ptr - orig_ptr);
f611d0c3
MD		 1318}
1319
352a4b77 1320struct tracer_visitor_priv {
66de373e 1321 const struct side_type *elem_type;
352a4b77
MD		 1322 int i;
1323};
1324
1325static
1326enum side_visitor_status tracer_write_elem_cb(const struct side_tracer_visitor_ctx *tracer_ctx,
66de373e 1327 const struct side_arg *elem)
352a4b77 1328{
e65f9ce5 1329 struct tracer_visitor_priv *tracer_priv = (struct tracer_visitor_priv *) tracer_ctx->priv;
352a4b77
MD		 1330
1331 printf("%s", tracer_priv->i++ ? ", " : "");
1332 tracer_print_type(tracer_priv->elem_type, elem);
1333 return SIDE_VISITOR_STATUS_OK;
1334}
1335
f611d0c3 1336static
66de373e 1337void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx)
f611d0c3
MD		 1338{
1339 enum side_visitor_status status;
352a4b77
MD		 1340 struct tracer_visitor_priv tracer_priv = {
1341 .elem_type = type_desc->u.side_vla_visitor.elem_type,
1342 .i = 0,
1343 };
1344 const struct side_tracer_visitor_ctx tracer_ctx = {
1345 .write_elem = tracer_write_elem_cb,
1346 .priv = &tracer_priv,
1347 };
f611d0c3 1348
905c328e 1349 print_attributes("attr", ":", type_desc->u.side_vla_visitor.attr, type_desc->u.side_vla_visitor.nr_attr);
d4328528 1350 printf("%s", type_desc->u.side_vla_visitor.nr_attr ? ", " : "");
20574104 1351 printf("elements: ");
352a4b77
MD		 1352 printf("[ ");
1353 status = type_desc->u.side_vla_visitor.visitor(&tracer_ctx, app_ctx);
1354 switch (status) {
1355 case SIDE_VISITOR_STATUS_OK:
1356 break;
1357 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1358 fprintf(stderr, "ERROR: Visitor error\n");
f611d0c3 1359 abort();
f611d0c3
MD		 1360 }
1361 printf(" ]");
f611d0c3
MD		 1362}
1363
a2e2357e 1364static
0c7abe2b 1365void tracer_print_dynamic_struct(const struct side_arg_dynamic_struct *dynamic_struct)
a2e2357e 1366{
0c7abe2b 1367 const struct side_arg_dynamic_field *fields = dynamic_struct->fields;
e65f9ce5 1368 uint32_t i, len = dynamic_struct->len;
465e5e7e 1369
905c328e 1370 print_attributes("attr", "::", dynamic_struct->attr, dynamic_struct->nr_attr);
8d20e708 1371 printf("%s", dynamic_struct->nr_attr ? ", " : "");
f0061366 1372 printf("fields:: ");
465e5e7e
MD		 1373 printf("[ ");
1374 for (i = 0; i < len; i++) {
1375 printf("%s", i ? ", " : "");
1376 printf("%s:: ", fields[i].field_name);
1377 tracer_print_dynamic(&fields[i].elem);
1378 }
1379 printf(" ]");
a2e2357e
MD		 1380}
1381
2b359235
MD		 1382struct tracer_dynamic_struct_visitor_priv {
1383 int i;
1384};
1385
1386static
1387enum side_visitor_status tracer_dynamic_struct_write_elem_cb(
1388 const struct side_tracer_dynamic_struct_visitor_ctx *tracer_ctx,
0c7abe2b 1389 const struct side_arg_dynamic_field *dynamic_field)
2b359235 1390{
e65f9ce5
MD		 1391 struct tracer_dynamic_struct_visitor_priv *tracer_priv =
1392 (struct tracer_dynamic_struct_visitor_priv *) tracer_ctx->priv;
2b359235
MD		 1393
1394 printf("%s", tracer_priv->i++ ? ", " : "");
1395 printf("%s:: ", dynamic_field->field_name);
1396 tracer_print_dynamic(&dynamic_field->elem);
1397 return SIDE_VISITOR_STATUS_OK;
1398}
1399
a2e2357e 1400static
66de373e 1401void tracer_print_dynamic_struct_visitor(const struct side_arg *item)
a2e2357e 1402{
2b359235
MD		 1403 enum side_visitor_status status;
1404 struct tracer_dynamic_struct_visitor_priv tracer_priv = {
1405 .i = 0,
1406 };
1407 const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx = {
1408 .write_field = tracer_dynamic_struct_write_elem_cb,
1409 .priv = &tracer_priv,
1410 };
66de373e 1411 void *app_ctx = item->u.side_dynamic.side_dynamic_struct_visitor.app_ctx;
2b359235 1412
66de373e
MD		 1413 print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_struct_visitor.attr, item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr);
1414 printf("%s", item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr ? ", " : "");
f0061366 1415 printf("fields:: ");
2b359235 1416 printf("[ ");
66de373e 1417 status = item->u.side_dynamic.side_dynamic_struct_visitor.visitor(&tracer_ctx, app_ctx);
2b359235
MD		 1418 switch (status) {
1419 case SIDE_VISITOR_STATUS_OK:
1420 break;
1421 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1422 fprintf(stderr, "ERROR: Visitor error\n");
2b359235
MD		 1423 abort();
1424 }
1425 printf(" ]");
a2e2357e
MD		 1426}
1427
1428static
66de373e 1429void tracer_print_dynamic_vla(const struct side_arg_dynamic_vla *vla)
a2e2357e 1430{
66de373e 1431 const struct side_arg *sav = vla->sav;
e65f9ce5 1432 uint32_t i, side_sav_len = vla->len;
a2e2357e 1433
905c328e 1434 print_attributes("attr", "::", vla->attr, vla->nr_attr);
8d20e708 1435 printf("%s", vla->nr_attr ? ", " : "");
f0061366 1436 printf("elements:: ");
a2e2357e
MD		 1437 printf("[ ");
1438 for (i = 0; i < side_sav_len; i++) {
1439 printf("%s", i ? ", " : "");
1440 tracer_print_dynamic(&sav[i]);
1441 }
1442 printf(" ]");
1443}
1444
8ceca0cd
MD		 1445struct tracer_dynamic_vla_visitor_priv {
1446 int i;
1447};
1448
1449static
1450enum side_visitor_status tracer_dynamic_vla_write_elem_cb(
6a744a79 1451 const struct side_tracer_visitor_ctx *tracer_ctx,
66de373e 1452 const struct side_arg *elem)
8ceca0cd 1453{
e65f9ce5
MD		 1454 struct tracer_dynamic_vla_visitor_priv *tracer_priv =
1455 (struct tracer_dynamic_vla_visitor_priv *) tracer_ctx->priv;
8ceca0cd
MD		 1456
1457 printf("%s", tracer_priv->i++ ? ", " : "");
1458 tracer_print_dynamic(elem);
1459 return SIDE_VISITOR_STATUS_OK;
1460}
1461
a2e2357e 1462static
66de373e 1463void tracer_print_dynamic_vla_visitor(const struct side_arg *item)
a2e2357e 1464{
8ceca0cd
MD		 1465 enum side_visitor_status status;
1466 struct tracer_dynamic_vla_visitor_priv tracer_priv = {
1467 .i = 0,
1468 };
6a744a79 1469 const struct side_tracer_visitor_ctx tracer_ctx = {
8ceca0cd
MD		 1470 .write_elem = tracer_dynamic_vla_write_elem_cb,
1471 .priv = &tracer_priv,
1472 };
66de373e 1473 void *app_ctx = item->u.side_dynamic.side_dynamic_vla_visitor.app_ctx;
8ceca0cd 1474
66de373e
MD		 1475 print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_vla_visitor.attr, item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr);
1476 printf("%s", item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr ? ", " : "");
f0061366 1477 printf("elements:: ");
8ceca0cd 1478 printf("[ ");
66de373e 1479 status = item->u.side_dynamic.side_dynamic_vla_visitor.visitor(&tracer_ctx, app_ctx);
8ceca0cd
MD		 1480 switch (status) {
1481 case SIDE_VISITOR_STATUS_OK:
1482 break;
1483 case SIDE_VISITOR_STATUS_ERROR:
de1b3cd2 1484 fprintf(stderr, "ERROR: Visitor error\n");
8ceca0cd
MD		 1485 abort();
1486 }
1487 printf(" ]");
a2e2357e
MD		 1488}
1489
1490static
66de373e 1491void tracer_print_dynamic(const struct side_arg *item)
a2e2357e 1492{
808bd9bf 1493 printf("{ ");
66de373e
MD		 1494 switch (item->type) {
1495 case SIDE_TYPE_DYNAMIC_NULL:
1496 tracer_print_type_header("::", item->u.side_dynamic.side_null.attr, item->u.side_dynamic.side_null.nr_attr);
a2e2357e
MD		 1497 printf("<NULL TYPE>");
1498 break;
d6f684e4 1499
66de373e 1500 case SIDE_TYPE_DYNAMIC_BOOL:
d6f684e4 1501 tracer_print_type_bool("::", &item->u.side_dynamic.side_bool.type, &item->u.side_dynamic.side_bool.value, 0);
66de373e 1502 break;
d6f684e4 1503
66de373e
MD		 1504 case SIDE_TYPE_DYNAMIC_U8:
1505 case SIDE_TYPE_DYNAMIC_U16:
1506 case SIDE_TYPE_DYNAMIC_U32:
1507 case SIDE_TYPE_DYNAMIC_U64:
1508 case SIDE_TYPE_DYNAMIC_S8:
1509 case SIDE_TYPE_DYNAMIC_S16:
1510 case SIDE_TYPE_DYNAMIC_S32:
1511 case SIDE_TYPE_DYNAMIC_S64:
1512 tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
f0dafd60 1513 TRACER_DISPLAY_BASE_10);
a2e2357e 1514 break;
66de373e
MD		 1515 case SIDE_TYPE_DYNAMIC_BYTE:
1516 tracer_print_type_header("::", item->u.side_dynamic.side_byte.type.attr, item->u.side_dynamic.side_byte.type.nr_attr);
1517 printf("0x%" PRIx8, item->u.side_dynamic.side_byte.value);
199e7aa9 1518 break;
dd6e76cb 1519
66de373e
MD		 1520 case SIDE_TYPE_DYNAMIC_POINTER32:
1521 case SIDE_TYPE_DYNAMIC_POINTER64:
1522 tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
f0dafd60 1523 TRACER_DISPLAY_BASE_16);
f5e650d7 1524 break;
199e7aa9 1525
66de373e
MD		 1526 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
1527 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
1528 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
1529 case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
1530 tracer_print_type_float("::", &item->u.side_dynamic.side_float.type,
1531 &item->u.side_dynamic.side_float.value);
fb25b355 1532 break;
3aa7ca5e 1533
66de373e
MD		 1534 case SIDE_TYPE_DYNAMIC_STRING:
1535 tracer_print_type_header("::", item->u.side_dynamic.side_string.type.attr, item->u.side_dynamic.side_string.type.nr_attr);
1536 printf("\"%s\"", (const char *)(uintptr_t) item->u.side_dynamic.side_string.value);
a2e2357e 1537 break;
66de373e
MD		 1538 case SIDE_TYPE_DYNAMIC_STRUCT:
1539 tracer_print_dynamic_struct(item->u.side_dynamic.side_dynamic_struct);
a2e2357e 1540 break;
66de373e 1541 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
c208889e 1542 tracer_print_dynamic_struct_visitor(item);
a2e2357e 1543 break;
66de373e
MD		 1544 case SIDE_TYPE_DYNAMIC_VLA:
1545 tracer_print_dynamic_vla(item->u.side_dynamic.side_dynamic_vla);
a2e2357e 1546 break;
66de373e 1547 case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
a2e2357e
MD		 1548 tracer_print_dynamic_vla_visitor(item);
1549 break;
1550 default:
f6c02218 1551 fprintf(stderr, "<UNKNOWN TYPE>\n");
a2e2357e
MD		 1552 abort();
1553 }
808bd9bf 1554 printf(" }");
a2e2357e
MD		 1555}
1556
68f8cfbe
MD		 1557static
1558void tracer_print_static_fields(const struct side_event_description *desc,
9a6ca773 1559 const struct side_arg_vec *side_arg_vec,
e65f9ce5 1560 uint32_t *nr_items)
f611d0c3 1561{
9a6ca773 1562 const struct side_arg *sav = side_arg_vec->sav;
e65f9ce5 1563 uint32_t i, side_sav_len = side_arg_vec->len;
f611d0c3 1564
65010f43 1565 printf("provider: %s, event: %s", desc->provider_name, desc->event_name);
f611d0c3 1566 if (desc->nr_fields != side_sav_len) {
de1b3cd2 1567 fprintf(stderr, "ERROR: number of fields mismatch between description and arguments\n");
f611d0c3
MD		 1568 abort();
1569 }
905c328e 1570 print_attributes(", attr", ":", desc->attr, desc->nr_attr);
a848763d 1571 printf("%s", side_sav_len ? ", fields: [ " : "");
f611d0c3
MD		 1572 for (i = 0; i < side_sav_len; i++) {
1573 printf("%s", i ? ", " : "");
1574 tracer_print_field(&desc->fields[i], &sav[i]);
1575 }
68f8cfbe
MD		 1576 if (nr_items)
1577 *nr_items = i;
c7d338e2
MD		 1578 if (side_sav_len)
1579 printf(" ]");
68f8cfbe
MD		 1580}
1581
4a7d8700 1582void tracer_call(const struct side_event_description *desc,
9a6ca773 1583 const struct side_arg_vec *side_arg_vec,
4a7d8700 1584 void *priv __attribute__((unused)))
68f8cfbe 1585{
e65f9ce5 1586 uint32_t nr_fields = 0;
a848763d 1587
9a6ca773 1588 tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
f611d0c3
MD		 1589 printf("\n");
1590}
19fa6aa2
MD		 1591
1592void tracer_call_variadic(const struct side_event_description *desc,
9a6ca773 1593 const struct side_arg_vec *side_arg_vec,
0c7abe2b 1594 const struct side_arg_dynamic_struct *var_struct,
4a7d8700 1595 void *priv __attribute__((unused)))
19fa6aa2 1596{
e65f9ce5 1597 uint32_t nr_fields = 0, i, var_struct_len = var_struct->len;
19fa6aa2 1598
9a6ca773 1599 tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
68f8cfbe 1600
8a25ce77 1601 if (side_unlikely(!(desc->flags & SIDE_EVENT_FLAG_VARIADIC))) {
de1b3cd2 1602 fprintf(stderr, "ERROR: unexpected non-variadic event description\n");
8a25ce77
MD		 1603 abort();
1604 }
905c328e
MD		 1605 print_attributes(", attr ", "::", var_struct->attr, var_struct->nr_attr);
1606 printf("%s", var_struct_len ? ", fields:: [ " : "");
68f8cfbe 1607 for (i = 0; i < var_struct_len; i++, nr_fields++) {
c7d338e2 1608 printf("%s", i ? ", " : "");
68f8cfbe
MD		 1609 printf("%s:: ", var_struct->fields[i].field_name);
1610 tracer_print_dynamic(&var_struct->fields[i].elem);
19fa6aa2 1611 }
a848763d
MD		 1612 if (i)
1613 printf(" ]");
19fa6aa2
MD		 1614 printf("\n");
1615}
1e8aec23
MD		 1616
1617void tracer_event_notification(enum side_tracer_notification notif,
1618 struct side_event_description **events, uint32_t nr_events, void *priv)
1619{
1620 uint32_t i;
314c22c3 1621 int ret;
1e8aec23
MD		 1622
1623 printf("----------------------------------------------------------\n");
1624 printf("Tracer notified of events %s\n",
314c22c3 1625 notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS ? "inserted" : "removed");
1e8aec23
MD		 1626 for (i = 0; i < nr_events; i++) {
1627 struct side_event_description *event = events[i];
1628
1629 /* Skip NULL pointers */
1630 if (!event)
1631 continue;
1632 printf("provider: %s, event: %s\n",
1633 event->provider_name, event->event_name);
314c22c3
MD		 1634 if (notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS) {
1635 if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
1636 ret = side_tracer_callback_variadic_register(event, tracer_call_variadic, NULL);
1637 if (ret)
1638 abort();
1639 } else {
1640 ret = side_tracer_callback_register(event, tracer_call, NULL);
1641 if (ret)
1642 abort();
1643 }
1644 } else {
1645 if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
1646 ret = side_tracer_callback_variadic_unregister(event, tracer_call_variadic, NULL);
1647 if (ret)
1648 abort();
1649 } else {
1650 ret = side_tracer_callback_unregister(event, tracer_call, NULL);
1651 if (ret)
1652 abort();
1653 }
1654 }
1e8aec23
MD		 1655 }
1656 printf("----------------------------------------------------------\n");
1657}
1658
1659static __attribute__((constructor))
1660void tracer_init(void);
1661static
1662void tracer_init(void)
1663{
1664 tracer_handle = side_tracer_event_notification_register(tracer_event_notification, NULL);
1665 if (!tracer_handle)
1666 abort();
1667}
1668
1669static __attribute__((destructor))
1670void tracer_exit(void);
1671static
1672void tracer_exit(void)
1673{
1674 side_tracer_event_notification_unregister(tracer_handle);
1675}
Software Instrumentation Dynamically Enabled
This page took 0.119456 seconds and 4 git commands to generate.