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