1 // SPDX-License-Identifier: MIT
3 * Copyright 2022 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
13 #include <side/trace.h>
15 enum tracer_display_base
{
16 TRACER_DISPLAY_BASE_2
,
17 TRACER_DISPLAY_BASE_8
,
18 TRACER_DISPLAY_BASE_10
,
19 TRACER_DISPLAY_BASE_16
,
22 static struct side_tracer_handle
*tracer_handle
;
25 void tracer_print_struct(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
27 void tracer_print_struct_sg(const struct side_type_description
*type_desc
, void *ptr
);
29 void tracer_print_array(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
31 void tracer_print_vla(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
33 void tracer_print_vla_visitor(const struct side_type_description
*type_desc
, void *app_ctx
);
35 void tracer_print_array_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
37 void tracer_print_vla_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
39 void tracer_print_dynamic(const struct side_arg_dynamic_vec
*dynamic_item
);
41 void tracer_print_type(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
44 int64_t get_attr_integer_value(const struct side_attr
*attr
)
48 switch (attr
->value
.type
) {
49 case SIDE_ATTR_TYPE_U8
:
50 val
= attr
->value
.u
.integer_value
.side_u8
;
52 case SIDE_ATTR_TYPE_U16
:
53 val
= attr
->value
.u
.integer_value
.side_u16
;
55 case SIDE_ATTR_TYPE_U32
:
56 val
= attr
->value
.u
.integer_value
.side_u32
;
58 case SIDE_ATTR_TYPE_U64
:
59 val
= attr
->value
.u
.integer_value
.side_u64
;
61 case SIDE_ATTR_TYPE_S8
:
62 val
= attr
->value
.u
.integer_value
.side_s8
;
64 case SIDE_ATTR_TYPE_S16
:
65 val
= attr
->value
.u
.integer_value
.side_s16
;
67 case SIDE_ATTR_TYPE_S32
:
68 val
= attr
->value
.u
.integer_value
.side_s32
;
70 case SIDE_ATTR_TYPE_S64
:
71 val
= attr
->value
.u
.integer_value
.side_s64
;
74 fprintf(stderr
, "Unexpected attribute type\n");
81 enum tracer_display_base
get_attr_display_base(const struct side_attr
*_attr
, uint32_t nr_attr
)
85 for (i
= 0; i
< nr_attr
; i
++) {
86 const struct side_attr
*attr
= &_attr
[i
];
88 if (!strcmp(attr
->key
, "std.integer.base")) {
89 int64_t val
= get_attr_integer_value(attr
);
93 return TRACER_DISPLAY_BASE_2
;
95 return TRACER_DISPLAY_BASE_8
;
97 return TRACER_DISPLAY_BASE_10
;
99 return TRACER_DISPLAY_BASE_16
;
101 fprintf(stderr
, "Unexpected integer display base: %" PRId64
"\n", val
);
106 return TRACER_DISPLAY_BASE_10
; /* Default */
110 bool type_to_host_reverse_bo(const struct side_type_description
*type_desc
)
112 switch (type_desc
->type
) {
123 if (type_desc
->u
.side_integer
.byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
128 case SIDE_TYPE_POINTER32
:
129 case SIDE_TYPE_POINTER64
:
130 if (type_desc
->u
.side_integer
.byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
135 case SIDE_TYPE_FLOAT_BINARY16
:
136 case SIDE_TYPE_FLOAT_BINARY32
:
137 case SIDE_TYPE_FLOAT_BINARY64
:
138 case SIDE_TYPE_FLOAT_BINARY128
:
139 if (type_desc
->u
.side_float
.byte_order
!= SIDE_TYPE_FLOAT_WORD_ORDER_HOST
)
145 fprintf(stderr
, "Unexpected type\n");
151 bool sg_type_to_host_reverse_bo(const struct side_type_sg_description
*sg_type
)
153 switch (sg_type
->type
) {
154 case SIDE_TYPE_SG_UNSIGNED_INT
:
155 case SIDE_TYPE_SG_SIGNED_INT
:
156 if (sg_type
->u
.side_basic
.byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
162 fprintf(stderr
, "Unexpected type\n");
168 bool dynamic_type_to_host_reverse_bo(const struct side_arg_dynamic_vec
*item
)
170 switch (item
->dynamic_type
) {
171 case SIDE_DYNAMIC_TYPE_U8
:
172 case SIDE_DYNAMIC_TYPE_S8
:
173 case SIDE_DYNAMIC_TYPE_BYTE
:
175 case SIDE_DYNAMIC_TYPE_U16
:
176 case SIDE_DYNAMIC_TYPE_U32
:
177 case SIDE_DYNAMIC_TYPE_U64
:
178 case SIDE_DYNAMIC_TYPE_S16
:
179 case SIDE_DYNAMIC_TYPE_S32
:
180 case SIDE_DYNAMIC_TYPE_S64
:
181 case SIDE_DYNAMIC_TYPE_POINTER32
:
182 case SIDE_DYNAMIC_TYPE_POINTER64
:
183 if (item
->u
.side_integer
.type
.byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
188 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY16
:
189 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY32
:
190 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY64
:
191 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY128
:
192 if (item
->u
.side_float
.type
.byte_order
!= SIDE_TYPE_FLOAT_WORD_ORDER_HOST
)
198 fprintf(stderr
, "Unexpected type\n");
204 void tracer_print_attr_type(const char *separator
, const struct side_attr
*attr
)
206 printf("{ key%s \"%s\", value%s ", separator
, attr
->key
, separator
);
207 switch (attr
->value
.type
) {
208 case SIDE_ATTR_TYPE_BOOL
:
209 printf("%s", attr
->value
.u
.side_bool
? "true" : "false");
211 case SIDE_ATTR_TYPE_U8
:
212 printf("%" PRIu8
, attr
->value
.u
.integer_value
.side_u8
);
214 case SIDE_ATTR_TYPE_U16
:
215 printf("%" PRIu16
, attr
->value
.u
.integer_value
.side_u16
);
217 case SIDE_ATTR_TYPE_U32
:
218 printf("%" PRIu32
, attr
->value
.u
.integer_value
.side_u32
);
220 case SIDE_ATTR_TYPE_U64
:
221 printf("%" PRIu64
, attr
->value
.u
.integer_value
.side_u64
);
223 case SIDE_ATTR_TYPE_S8
:
224 printf("%" PRId8
, attr
->value
.u
.integer_value
.side_s8
);
226 case SIDE_ATTR_TYPE_S16
:
227 printf("%" PRId16
, attr
->value
.u
.integer_value
.side_s16
);
229 case SIDE_ATTR_TYPE_S32
:
230 printf("%" PRId32
, attr
->value
.u
.integer_value
.side_s32
);
232 case SIDE_ATTR_TYPE_S64
:
233 printf("%" PRId64
, attr
->value
.u
.integer_value
.side_s64
);
235 case SIDE_ATTR_TYPE_POINTER32
:
236 printf("0x%" PRIx32
, attr
->value
.u
.integer_value
.side_u32
);
238 case SIDE_ATTR_TYPE_POINTER64
:
239 printf("0x%" PRIx64
, attr
->value
.u
.integer_value
.side_u64
);
241 case SIDE_ATTR_TYPE_FLOAT_BINARY16
:
243 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary16
);
246 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
249 case SIDE_ATTR_TYPE_FLOAT_BINARY32
:
251 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary32
);
254 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
257 case SIDE_ATTR_TYPE_FLOAT_BINARY64
:
259 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary64
);
262 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
265 case SIDE_ATTR_TYPE_FLOAT_BINARY128
:
267 printf("%Lg", (long double) attr
->value
.u
.float_value
.side_float_binary128
);
270 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
273 case SIDE_ATTR_TYPE_STRING
:
274 printf("\"%s\"", (const char *)(uintptr_t) attr
->value
.u
.string
);
277 fprintf(stderr
, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
284 void print_attributes(const char *prefix_str
, const char *separator
,
285 const struct side_attr
*attr
, uint32_t nr_attr
)
291 printf("%s%s [ ", prefix_str
, separator
);
292 for (i
= 0; i
< nr_attr
; i
++) {
293 printf("%s", i
? ", " : "");
294 tracer_print_attr_type(separator
, &attr
[i
]);
300 void print_enum(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
302 const struct side_enum_mappings
*mappings
= type_desc
->u
.side_enum
.mappings
;
303 const struct side_type_description
*elem_type
= type_desc
->u
.side_enum
.elem_type
;
304 int i
, print_count
= 0;
307 if (elem_type
->type
!= item
->type
) {
308 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
311 switch (item
->type
) {
313 value
= (int64_t) item
->u
.integer_value
.side_u8
;
319 v
= item
->u
.integer_value
.side_u16
;
320 if (type_to_host_reverse_bo(elem_type
))
321 v
= side_bswap_16(v
);
329 v
= item
->u
.integer_value
.side_u32
;
330 if (type_to_host_reverse_bo(elem_type
))
331 v
= side_bswap_32(v
);
339 v
= item
->u
.integer_value
.side_u64
;
340 if (type_to_host_reverse_bo(elem_type
))
341 v
= side_bswap_64(v
);
346 value
= (int64_t) item
->u
.integer_value
.side_s8
;
352 v
= item
->u
.integer_value
.side_s16
;
353 if (type_to_host_reverse_bo(elem_type
))
354 v
= side_bswap_16(v
);
362 v
= item
->u
.integer_value
.side_s32
;
363 if (type_to_host_reverse_bo(elem_type
))
364 v
= side_bswap_32(v
);
372 v
= item
->u
.integer_value
.side_s64
;
373 if (type_to_host_reverse_bo(elem_type
))
374 v
= side_bswap_64(v
);
379 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
382 print_attributes("attr", ":", mappings
->attr
, mappings
->nr_attr
);
383 printf("%s", mappings
->nr_attr
? ", " : "");
384 tracer_print_type(type_desc
->u
.side_enum
.elem_type
, item
);
385 printf(", labels: [ ");
386 for (i
= 0; i
< mappings
->nr_mappings
; i
++) {
387 const struct side_enum_mapping
*mapping
= &mappings
->mappings
[i
];
389 if (mapping
->range_end
< mapping
->range_begin
) {
390 fprintf(stderr
, "ERROR: Unexpected enum range: %" PRIu64
"-%" PRIu64
"\n",
391 mapping
->range_begin
, mapping
->range_end
);
394 if (value
>= mapping
->range_begin
&& value
<= mapping
->range_end
) {
395 printf("%s", print_count
++ ? ", " : "");
396 printf("\"%s\"", mapping
->label
);
400 printf("<NO LABEL>");
405 uint32_t enum_elem_type_to_stride(const struct side_type_description
*elem_type
)
409 switch (elem_type
->type
) {
410 case SIDE_TYPE_U8
: /* Fall-through */
424 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
431 void print_enum_bitmap(const struct side_type_description
*type_desc
,
432 const struct side_arg_vec
*item
)
434 const struct side_type_description
*elem_type
= type_desc
->u
.side_enum_bitmap
.elem_type
;
435 const struct side_enum_bitmap_mappings
*side_enum_mappings
= type_desc
->u
.side_enum_bitmap
.mappings
;
436 int i
, print_count
= 0;
437 uint32_t stride_bit
, nr_items
;
438 bool reverse_byte_order
= false;
439 const struct side_arg_vec
*array_item
;
441 switch (elem_type
->type
) {
442 case SIDE_TYPE_U8
: /* Fall-through */
443 case SIDE_TYPE_BYTE
: /* Fall-through */
444 case SIDE_TYPE_U16
: /* Fall-through */
445 case SIDE_TYPE_U32
: /* Fall-through */
447 stride_bit
= enum_elem_type_to_stride(elem_type
);
448 reverse_byte_order
= type_to_host_reverse_bo(elem_type
);
452 case SIDE_TYPE_ARRAY
:
453 stride_bit
= enum_elem_type_to_stride(elem_type
->u
.side_array
.elem_type
);
454 reverse_byte_order
= type_to_host_reverse_bo(elem_type
->u
.side_array
.elem_type
);
455 array_item
= item
->u
.side_array
->sav
;
456 nr_items
= type_desc
->u
.side_array
.length
;
459 stride_bit
= enum_elem_type_to_stride(elem_type
->u
.side_vla
.elem_type
);
460 reverse_byte_order
= type_to_host_reverse_bo(elem_type
->u
.side_vla
.elem_type
);
461 array_item
= item
->u
.side_vla
->sav
;
462 nr_items
= item
->u
.side_vla
->len
;
465 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
469 print_attributes("attr", ":", side_enum_mappings
->attr
, side_enum_mappings
->nr_attr
);
470 printf("%s", side_enum_mappings
->nr_attr
? ", " : "");
471 printf("labels: [ ");
472 for (i
= 0; i
< side_enum_mappings
->nr_mappings
; i
++) {
473 const struct side_enum_bitmap_mapping
*mapping
= &side_enum_mappings
->mappings
[i
];
477 if (mapping
->range_end
< mapping
->range_begin
) {
478 fprintf(stderr
, "ERROR: Unexpected enum bitmap range: %" PRIu64
"-%" PRIu64
"\n",
479 mapping
->range_begin
, mapping
->range_end
);
482 for (bit
= mapping
->range_begin
; bit
<= mapping
->range_end
; bit
++) {
483 if (bit
> (nr_items
* stride_bit
) - 1)
485 switch (stride_bit
) {
488 uint8_t v
= array_item
[bit
/ 8].u
.integer_value
.side_u8
;
489 if (v
& (1ULL << (bit
% 8))) {
497 uint16_t v
= array_item
[bit
/ 16].u
.integer_value
.side_u16
;
498 if (reverse_byte_order
)
499 v
= side_bswap_16(v
);
500 if (v
& (1ULL << (bit
% 16))) {
508 uint32_t v
= array_item
[bit
/ 32].u
.integer_value
.side_u32
;
509 if (reverse_byte_order
)
510 v
= side_bswap_32(v
);
511 if (v
& (1ULL << (bit
% 32))) {
519 uint64_t v
= array_item
[bit
/ 64].u
.integer_value
.side_u64
;
520 if (reverse_byte_order
)
521 v
= side_bswap_64(v
);
522 if (v
& (1ULL << (bit
% 64))) {
534 printf("%s", print_count
++ ? ", " : "");
535 printf("\"%s\"", mapping
->label
);
539 printf("<NO LABEL>");
544 void print_integer_binary(uint64_t v
, int bits
)
550 for (i
= 0; i
< bits
; i
++) {
551 printf("%c", v
& (1ULL << 63) ? '1' : '0');
557 void tracer_print_type_header(const char *separator
,
558 const struct side_attr
*attr
, uint32_t nr_attr
)
560 print_attributes("attr", separator
, attr
, nr_attr
);
561 printf("%s", nr_attr
? ", " : "");
562 printf("value%s ", separator
);
566 void tracer_print_type_integer(const char *separator
,
567 const struct side_type_integer
*type_integer
,
568 const union side_integer_value
*value
)
570 enum tracer_display_base base
;
576 if (!type_integer
->len_bits
||
577 type_integer
->len_bits
> type_integer
->integer_size_bits
)
579 base
= get_attr_display_base(type_integer
->attr
,
580 type_integer
->nr_attr
);
581 switch (type_integer
->integer_size_bits
) {
583 if (type_integer
->signedness
)
584 v
.v_signed
= value
->side_s8
;
586 v
.v_unsigned
= value
->side_u8
;
589 if (type_integer
->signedness
) {
592 side_s16
= value
->side_s16
;
593 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
594 side_s16
= side_bswap_16(side_s16
);
595 v
.v_signed
= side_s16
;
599 side_u16
= value
->side_u16
;
600 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
601 side_u16
= side_bswap_16(side_u16
);
602 v
.v_unsigned
= side_u16
;
606 if (type_integer
->signedness
) {
609 side_s32
= value
->side_s32
;
610 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
611 side_s32
= side_bswap_32(side_s32
);
612 v
.v_signed
= side_s32
;
616 side_u32
= value
->side_u32
;
617 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
618 side_u32
= side_bswap_32(side_u32
);
619 v
.v_unsigned
= side_u32
;
623 if (type_integer
->signedness
) {
626 side_s64
= value
->side_s64
;
627 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
628 side_s64
= side_bswap_64(side_s64
);
629 v
.v_signed
= side_s64
;
633 side_u64
= value
->side_u64
;
634 if (type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
)
635 side_u64
= side_bswap_64(side_u64
);
636 v
.v_unsigned
= side_u64
;
642 if (type_integer
->len_bits
< 64)
643 v
.v_unsigned
&= (1ULL << type_integer
->len_bits
) - 1;
644 tracer_print_type_header(separator
, type_integer
->attr
, type_integer
->nr_attr
);
646 case TRACER_DISPLAY_BASE_2
:
647 print_integer_binary(v
.v_unsigned
, type_integer
->len_bits
);
649 case TRACER_DISPLAY_BASE_8
:
650 printf("0%" PRIo64
, v
.v_unsigned
);
652 case TRACER_DISPLAY_BASE_10
:
653 if (type_integer
->signedness
) {
655 if (type_integer
->len_bits
< 64) {
656 if (v
.v_unsigned
& (1ULL << (type_integer
->len_bits
- 1)))
657 v
.v_unsigned
|= ~((1ULL << type_integer
->len_bits
) - 1);
659 printf("%" PRId64
, v
.v_signed
);
661 printf("%" PRIu64
, v
.v_unsigned
);
664 case TRACER_DISPLAY_BASE_16
:
665 printf("0x%" PRIx64
, v
.v_unsigned
);
673 void tracer_print_type(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
677 switch (type_desc
->type
) {
678 case SIDE_TYPE_ARRAY
:
679 switch (item
->type
) {
680 case SIDE_TYPE_ARRAY_U8
:
681 case SIDE_TYPE_ARRAY_U16
:
682 case SIDE_TYPE_ARRAY_U32
:
683 case SIDE_TYPE_ARRAY_U64
:
684 case SIDE_TYPE_ARRAY_S8
:
685 case SIDE_TYPE_ARRAY_S16
:
686 case SIDE_TYPE_ARRAY_S32
:
687 case SIDE_TYPE_ARRAY_S64
:
688 case SIDE_TYPE_ARRAY_POINTER32
:
689 case SIDE_TYPE_ARRAY_POINTER64
:
690 case SIDE_TYPE_ARRAY_BYTE
:
691 case SIDE_TYPE_ARRAY
:
694 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
701 switch (item
->type
) {
702 case SIDE_TYPE_VLA_U8
:
703 case SIDE_TYPE_VLA_U16
:
704 case SIDE_TYPE_VLA_U32
:
705 case SIDE_TYPE_VLA_U64
:
706 case SIDE_TYPE_VLA_S8
:
707 case SIDE_TYPE_VLA_S16
:
708 case SIDE_TYPE_VLA_S32
:
709 case SIDE_TYPE_VLA_S64
:
710 case SIDE_TYPE_VLA_BYTE
:
711 case SIDE_TYPE_VLA_POINTER32
:
712 case SIDE_TYPE_VLA_POINTER64
:
716 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
723 switch (item
->type
) {
734 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
740 case SIDE_TYPE_ENUM_BITMAP
:
741 switch (item
->type
) {
747 case SIDE_TYPE_ARRAY
:
751 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
758 if (type_desc
->type
!= item
->type
) {
759 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
765 if (type_desc
->type
== SIDE_TYPE_ENUM
|| type_desc
->type
== SIDE_TYPE_ENUM_BITMAP
)
766 type
= type_desc
->type
;
773 tracer_print_type_header(":", type_desc
->u
.side_basic
.attr
, type_desc
->u
.side_basic
.nr_attr
);
774 printf("%s", item
->u
.side_bool
? "true" : "false");
785 tracer_print_type_integer(":", &type_desc
->u
.side_integer
,
786 &item
->u
.integer_value
);
789 case SIDE_TYPE_POINTER32
:
793 v
= item
->u
.integer_value
.side_u32
;
794 if (type_to_host_reverse_bo(type_desc
))
795 v
= side_bswap_32(v
);
796 tracer_print_type_header(":", type_desc
->u
.side_integer
.attr
, type_desc
->u
.side_integer
.nr_attr
);
797 printf("0x%" PRIx32
, v
);
800 case SIDE_TYPE_POINTER64
:
804 v
= item
->u
.integer_value
.side_u64
;
805 if (type_to_host_reverse_bo(type_desc
))
806 v
= side_bswap_64(v
);
807 tracer_print_type_header(":", type_desc
->u
.side_integer
.attr
, type_desc
->u
.side_integer
.nr_attr
);
808 printf("0x%" PRIx64
, v
);
812 tracer_print_type_header(":", type_desc
->u
.side_basic
.attr
, type_desc
->u
.side_basic
.nr_attr
);
813 printf("0x%" PRIx8
, item
->u
.side_byte
);
817 print_enum(type_desc
, item
);
820 case SIDE_TYPE_ENUM_BITMAP
:
821 print_enum_bitmap(type_desc
, item
);
824 case SIDE_TYPE_FLOAT_BINARY16
:
831 .f
= item
->u
.float_value
.side_float_binary16
,
834 if (type_to_host_reverse_bo(type_desc
))
835 float16
.u
= side_bswap_16(float16
.u
);
836 tracer_print_type_header(":", type_desc
->u
.side_float
.attr
, type_desc
->u
.side_float
.nr_attr
);
837 printf("%g", (double) float16
.f
);
840 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
844 case SIDE_TYPE_FLOAT_BINARY32
:
851 .f
= item
->u
.float_value
.side_float_binary32
,
854 if (type_to_host_reverse_bo(type_desc
))
855 float32
.u
= side_bswap_32(float32
.u
);
856 tracer_print_type_header(":", type_desc
->u
.side_float
.attr
, type_desc
->u
.side_float
.nr_attr
);
857 printf("%g", (double) float32
.f
);
860 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
864 case SIDE_TYPE_FLOAT_BINARY64
:
871 .f
= item
->u
.float_value
.side_float_binary64
,
874 if (type_to_host_reverse_bo(type_desc
))
875 float64
.u
= side_bswap_64(float64
.u
);
876 tracer_print_type_header(":", type_desc
->u
.side_float
.attr
, type_desc
->u
.side_float
.nr_attr
);
877 printf("%g", (double) float64
.f
);
880 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
884 case SIDE_TYPE_FLOAT_BINARY128
:
891 .f
= item
->u
.float_value
.side_float_binary128
,
894 if (type_to_host_reverse_bo(type_desc
))
895 side_bswap_128p(float128
.arr
);
896 tracer_print_type_header(":", type_desc
->u
.side_float
.attr
, type_desc
->u
.side_float
.nr_attr
);
897 printf("%Lg", (long double) float128
.f
);
900 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
904 case SIDE_TYPE_STRING
:
905 tracer_print_type_header(":", type_desc
->u
.side_basic
.attr
, type_desc
->u
.side_basic
.nr_attr
);
906 printf("\"%s\"", (const char *)(uintptr_t) item
->u
.string
);
908 case SIDE_TYPE_STRUCT
:
909 tracer_print_struct(type_desc
, item
->u
.side_struct
);
911 case SIDE_TYPE_STRUCT_SG
:
912 tracer_print_struct_sg(type_desc
, item
->u
.side_struct_sg_ptr
);
914 case SIDE_TYPE_ARRAY
:
915 tracer_print_array(type_desc
, item
->u
.side_array
);
918 tracer_print_vla(type_desc
, item
->u
.side_vla
);
920 case SIDE_TYPE_VLA_VISITOR
:
921 tracer_print_vla_visitor(type_desc
, item
->u
.side_vla_app_visitor_ctx
);
923 case SIDE_TYPE_ARRAY_U8
:
924 case SIDE_TYPE_ARRAY_U16
:
925 case SIDE_TYPE_ARRAY_U32
:
926 case SIDE_TYPE_ARRAY_U64
:
927 case SIDE_TYPE_ARRAY_S8
:
928 case SIDE_TYPE_ARRAY_S16
:
929 case SIDE_TYPE_ARRAY_S32
:
930 case SIDE_TYPE_ARRAY_S64
:
931 case SIDE_TYPE_ARRAY_BYTE
:
932 case SIDE_TYPE_ARRAY_POINTER32
:
933 case SIDE_TYPE_ARRAY_POINTER64
:
934 tracer_print_array_fixint(type_desc
, item
);
936 case SIDE_TYPE_VLA_U8
:
937 case SIDE_TYPE_VLA_U16
:
938 case SIDE_TYPE_VLA_U32
:
939 case SIDE_TYPE_VLA_U64
:
940 case SIDE_TYPE_VLA_S8
:
941 case SIDE_TYPE_VLA_S16
:
942 case SIDE_TYPE_VLA_S32
:
943 case SIDE_TYPE_VLA_S64
:
944 case SIDE_TYPE_VLA_BYTE
:
945 case SIDE_TYPE_VLA_POINTER32
:
946 case SIDE_TYPE_VLA_POINTER64
:
947 tracer_print_vla_fixint(type_desc
, item
);
949 case SIDE_TYPE_DYNAMIC
:
950 tracer_print_type_header(":", type_desc
->u
.side_basic
.attr
, type_desc
->u
.side_basic
.nr_attr
);
951 tracer_print_dynamic(&item
->u
.dynamic
);
954 fprintf(stderr
, "<UNKNOWN TYPE>");
961 void tracer_print_field(const struct side_event_field
*item_desc
, const struct side_arg_vec
*item
)
963 printf("%s: ", item_desc
->field_name
);
964 tracer_print_type(&item_desc
->side_type
, item
);
968 void tracer_print_struct(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
970 const struct side_arg_vec
*sav
= sav_desc
->sav
;
971 uint32_t side_sav_len
= sav_desc
->len
;
974 if (type_desc
->u
.side_struct
->nr_fields
!= side_sav_len
) {
975 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments of structure\n");
978 print_attributes("attr", ":", type_desc
->u
.side_struct
->attr
, type_desc
->u
.side_struct
->nr_attr
);
979 printf("%s", type_desc
->u
.side_struct
->nr_attr
? ", " : "");
980 printf("fields: { ");
981 for (i
= 0; i
< side_sav_len
; i
++) {
982 printf("%s", i
? ", " : "");
983 tracer_print_field(&type_desc
->u
.side_struct
->fields
[i
], &sav
[i
]);
989 void tracer_print_sg_integer_type_header(const struct side_type_sg_description
*sg_type
)
991 print_attributes("attr", ":", sg_type
->u
.side_basic
.attr
, sg_type
->u
.side_basic
.nr_attr
);
992 printf("%s", sg_type
->u
.side_basic
.nr_attr
? ", " : "");
997 void tracer_print_sg_type(const struct side_type_sg_description
*sg_type
, void *_ptr
)
999 enum tracer_display_base base
= TRACER_DISPLAY_BASE_10
;
1000 const char *ptr
= (const char *) _ptr
;
1002 switch (sg_type
->type
) {
1003 case SIDE_TYPE_SG_UNSIGNED_INT
:
1004 case SIDE_TYPE_SG_SIGNED_INT
:
1005 base
= get_attr_display_base(sg_type
->u
.side_basic
.attr
,
1006 sg_type
->u
.side_basic
.nr_attr
);
1013 switch (sg_type
->type
) {
1014 case SIDE_TYPE_SG_UNSIGNED_INT
:
1016 tracer_print_sg_integer_type_header(sg_type
);
1017 switch (sg_type
->u
.side_basic
.integer_size_bits
) {
1022 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 8)
1024 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1025 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1026 if (sg_type
->u
.side_basic
.len_bits
< 8)
1027 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1029 case TRACER_DISPLAY_BASE_2
:
1030 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1032 case TRACER_DISPLAY_BASE_8
:
1033 printf("0%" PRIo8
, v
);
1035 case TRACER_DISPLAY_BASE_10
:
1036 printf("%" PRIu8
, v
);
1038 case TRACER_DISPLAY_BASE_16
:
1039 printf("0x%" PRIx8
, v
);
1050 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 16)
1052 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1053 if (sg_type_to_host_reverse_bo(sg_type
))
1054 v
= side_bswap_16(v
);
1055 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1056 if (sg_type
->u
.side_basic
.len_bits
< 16)
1057 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1059 case TRACER_DISPLAY_BASE_2
:
1060 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1062 case TRACER_DISPLAY_BASE_8
:
1063 printf("0%" PRIo16
, v
);
1065 case TRACER_DISPLAY_BASE_10
:
1066 printf("%" PRIu16
, v
);
1068 case TRACER_DISPLAY_BASE_16
:
1069 printf("0x%" PRIx16
, v
);
1080 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 32)
1082 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1083 if (sg_type_to_host_reverse_bo(sg_type
))
1084 v
= side_bswap_32(v
);
1085 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1086 if (sg_type
->u
.side_basic
.len_bits
< 32)
1087 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1089 case TRACER_DISPLAY_BASE_2
:
1090 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1092 case TRACER_DISPLAY_BASE_8
:
1093 printf("0%" PRIo32
, v
);
1095 case TRACER_DISPLAY_BASE_10
:
1096 printf("%" PRIu32
, v
);
1098 case TRACER_DISPLAY_BASE_16
:
1099 printf("0x%" PRIx32
, v
);
1110 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 64)
1112 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1113 if (sg_type_to_host_reverse_bo(sg_type
))
1114 v
= side_bswap_64(v
);
1115 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1116 if (sg_type
->u
.side_basic
.len_bits
< 64)
1117 v
&= (1ULL << sg_type
->u
.side_basic
.len_bits
) - 1;
1119 case TRACER_DISPLAY_BASE_2
:
1120 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1122 case TRACER_DISPLAY_BASE_8
:
1123 printf("0%" PRIo64
, v
);
1125 case TRACER_DISPLAY_BASE_10
:
1126 printf("%" PRIu64
, v
);
1128 case TRACER_DISPLAY_BASE_16
:
1129 printf("0x%" PRIx64
, v
);
1137 fprintf(stderr
, "<UNKNOWN SCATTER-GATHER INTEGER SIZE>");
1142 case SIDE_TYPE_SG_SIGNED_INT
:
1144 tracer_print_sg_integer_type_header(sg_type
);
1145 switch (sg_type
->u
.side_basic
.integer_size_bits
) {
1150 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 8)
1152 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1153 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1154 if (sg_type
->u
.side_basic
.len_bits
< 8)
1155 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1157 case TRACER_DISPLAY_BASE_2
:
1158 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1160 case TRACER_DISPLAY_BASE_8
:
1161 printf("0%" PRIo8
, v
);
1163 case TRACER_DISPLAY_BASE_10
:
1165 if (sg_type
->u
.side_basic
.len_bits
< 8) {
1166 if (v
& (1U << (sg_type
->u
.side_basic
.len_bits
- 1)))
1167 v
|= ~((1U << sg_type
->u
.side_basic
.len_bits
) - 1);
1169 printf("%" PRId8
, v
);
1171 case TRACER_DISPLAY_BASE_16
:
1172 printf("0x%" PRIx8
, v
);
1183 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 16)
1185 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1186 if (sg_type_to_host_reverse_bo(sg_type
))
1187 v
= side_bswap_16(v
);
1188 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1189 if (sg_type
->u
.side_basic
.len_bits
< 16)
1190 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1192 case TRACER_DISPLAY_BASE_2
:
1193 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1195 case TRACER_DISPLAY_BASE_8
:
1196 printf("0%" PRIo16
, v
);
1198 case TRACER_DISPLAY_BASE_10
:
1200 if (sg_type
->u
.side_basic
.len_bits
< 16) {
1201 if (v
& (1U << (sg_type
->u
.side_basic
.len_bits
- 1)))
1202 v
|= ~((1U << sg_type
->u
.side_basic
.len_bits
) - 1);
1204 printf("%" PRId16
, v
);
1206 case TRACER_DISPLAY_BASE_16
:
1207 printf("0x%" PRIx16
, v
);
1218 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 32)
1220 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1221 if (sg_type_to_host_reverse_bo(sg_type
))
1222 v
= side_bswap_32(v
);
1223 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1224 if (sg_type
->u
.side_basic
.len_bits
< 32)
1225 v
&= (1U << sg_type
->u
.side_basic
.len_bits
) - 1;
1227 case TRACER_DISPLAY_BASE_2
:
1228 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1230 case TRACER_DISPLAY_BASE_8
:
1231 printf("0%" PRIo32
, v
);
1233 case TRACER_DISPLAY_BASE_10
:
1235 if (sg_type
->u
.side_basic
.len_bits
< 32) {
1236 if (v
& (1U << (sg_type
->u
.side_basic
.len_bits
- 1)))
1237 v
|= ~((1U << sg_type
->u
.side_basic
.len_bits
) - 1);
1239 printf("%" PRId32
, v
);
1241 case TRACER_DISPLAY_BASE_16
:
1242 printf("0x%" PRIx32
, v
);
1253 if (!sg_type
->u
.side_basic
.len_bits
|| sg_type
->u
.side_basic
.len_bits
+ sg_type
->u
.side_basic
.offset_bits
> 64)
1255 memcpy(&v
, ptr
+ sg_type
->u
.side_basic
.integer_offset
, sizeof(v
));
1256 if (sg_type_to_host_reverse_bo(sg_type
))
1257 v
= side_bswap_64(v
);
1258 v
>>= sg_type
->u
.side_basic
.offset_bits
;
1259 if (sg_type
->u
.side_basic
.len_bits
< 64)
1260 v
&= (1ULL << sg_type
->u
.side_basic
.len_bits
) - 1;
1262 case TRACER_DISPLAY_BASE_2
:
1263 print_integer_binary(v
, sg_type
->u
.side_basic
.len_bits
);
1265 case TRACER_DISPLAY_BASE_8
:
1266 printf("0%" PRIo64
, v
);
1268 case TRACER_DISPLAY_BASE_10
:
1270 if (sg_type
->u
.side_basic
.len_bits
< 64) {
1271 if (v
& (1ULL << (sg_type
->u
.side_basic
.len_bits
- 1)))
1272 v
|= ~((1ULL << sg_type
->u
.side_basic
.len_bits
) - 1);
1274 printf("%" PRId64
, v
);
1276 case TRACER_DISPLAY_BASE_16
:
1277 printf("0x%" PRIx64
, v
);
1285 fprintf(stderr
, "<UNKNOWN SCATTER-GATHER INTEGER SIZE>");
1291 fprintf(stderr
, "<UNKNOWN SCATTER-GATHER TYPE>");
1298 void tracer_print_sg_field(const struct side_struct_field_sg
*field_sg
, void *ptr
)
1300 printf("%s: ", field_sg
->field_name
);
1301 tracer_print_sg_type(&field_sg
->side_type
, ptr
);
1305 void tracer_print_struct_sg(const struct side_type_description
*type_desc
, void *ptr
)
1307 const struct side_type_struct_sg
*struct_sg
= type_desc
->u
.side_struct_sg
;
1310 print_attributes("attr", ":", struct_sg
->attr
, struct_sg
->nr_attr
);
1311 printf("%s", struct_sg
->nr_attr
? ", " : "");
1312 printf("fields: { ");
1313 for (i
= 0; i
< struct_sg
->nr_fields
; i
++) {
1314 printf("%s", i
? ", " : "");
1315 tracer_print_sg_field(&struct_sg
->fields_sg
[i
], ptr
);
1321 void tracer_print_array(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
1323 const struct side_arg_vec
*sav
= sav_desc
->sav
;
1324 uint32_t side_sav_len
= sav_desc
->len
;
1327 if (type_desc
->u
.side_array
.length
!= side_sav_len
) {
1328 fprintf(stderr
, "ERROR: length mismatch between description and arguments of array\n");
1331 print_attributes("attr", ":", type_desc
->u
.side_array
.attr
, type_desc
->u
.side_array
.nr_attr
);
1332 printf("%s", type_desc
->u
.side_array
.nr_attr
? ", " : "");
1333 printf("elements: ");
1335 for (i
= 0; i
< side_sav_len
; i
++) {
1336 printf("%s", i
? ", " : "");
1337 tracer_print_type(type_desc
->u
.side_array
.elem_type
, &sav
[i
]);
1343 void tracer_print_vla(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
1345 const struct side_arg_vec
*sav
= sav_desc
->sav
;
1346 uint32_t side_sav_len
= sav_desc
->len
;
1349 print_attributes("attr", ":", type_desc
->u
.side_vla
.attr
, type_desc
->u
.side_vla
.nr_attr
);
1350 printf("%s", type_desc
->u
.side_vla
.nr_attr
? ", " : "");
1351 printf("elements: ");
1353 for (i
= 0; i
< side_sav_len
; i
++) {
1354 printf("%s", i
? ", " : "");
1355 tracer_print_type(type_desc
->u
.side_vla
.elem_type
, &sav
[i
]);
1360 struct tracer_visitor_priv
{
1361 const struct side_type_description
*elem_type
;
1366 enum side_visitor_status
tracer_write_elem_cb(const struct side_tracer_visitor_ctx
*tracer_ctx
,
1367 const struct side_arg_vec
*elem
)
1369 struct tracer_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
1371 printf("%s", tracer_priv
->i
++ ? ", " : "");
1372 tracer_print_type(tracer_priv
->elem_type
, elem
);
1373 return SIDE_VISITOR_STATUS_OK
;
1377 void tracer_print_vla_visitor(const struct side_type_description
*type_desc
, void *app_ctx
)
1379 enum side_visitor_status status
;
1380 struct tracer_visitor_priv tracer_priv
= {
1381 .elem_type
= type_desc
->u
.side_vla_visitor
.elem_type
,
1384 const struct side_tracer_visitor_ctx tracer_ctx
= {
1385 .write_elem
= tracer_write_elem_cb
,
1386 .priv
= &tracer_priv
,
1389 print_attributes("attr", ":", type_desc
->u
.side_vla_visitor
.attr
, type_desc
->u
.side_vla_visitor
.nr_attr
);
1390 printf("%s", type_desc
->u
.side_vla_visitor
.nr_attr
? ", " : "");
1391 printf("elements: ");
1393 status
= type_desc
->u
.side_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
1395 case SIDE_VISITOR_STATUS_OK
:
1397 case SIDE_VISITOR_STATUS_ERROR
:
1398 fprintf(stderr
, "ERROR: Visitor error\n");
1404 void tracer_print_array_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
1406 const struct side_type_description
*elem_type
= type_desc
->u
.side_array
.elem_type
;
1407 uint32_t side_sav_len
= type_desc
->u
.side_array
.length
;
1408 void *p
= item
->u
.side_array_fixint
;
1409 enum side_type side_type
;
1412 print_attributes("attr", ":", type_desc
->u
.side_array
.attr
, type_desc
->u
.side_array
.nr_attr
);
1413 printf("%s", type_desc
->u
.side_array
.nr_attr
? ", " : "");
1414 printf("elements: ");
1415 switch (item
->type
) {
1416 case SIDE_TYPE_ARRAY_U8
:
1417 if (elem_type
->type
!= SIDE_TYPE_U8
)
1420 case SIDE_TYPE_ARRAY_U16
:
1421 if (elem_type
->type
!= SIDE_TYPE_U16
)
1424 case SIDE_TYPE_ARRAY_U32
:
1425 if (elem_type
->type
!= SIDE_TYPE_U32
)
1428 case SIDE_TYPE_ARRAY_U64
:
1429 if (elem_type
->type
!= SIDE_TYPE_U64
)
1432 case SIDE_TYPE_ARRAY_S8
:
1433 if (elem_type
->type
!= SIDE_TYPE_S8
)
1436 case SIDE_TYPE_ARRAY_S16
:
1437 if (elem_type
->type
!= SIDE_TYPE_S16
)
1440 case SIDE_TYPE_ARRAY_S32
:
1441 if (elem_type
->type
!= SIDE_TYPE_S32
)
1444 case SIDE_TYPE_ARRAY_S64
:
1445 if (elem_type
->type
!= SIDE_TYPE_S64
)
1448 case SIDE_TYPE_ARRAY_BYTE
:
1449 if (elem_type
->type
!= SIDE_TYPE_BYTE
)
1452 case SIDE_TYPE_ARRAY_POINTER32
:
1453 if (elem_type
->type
!= SIDE_TYPE_POINTER32
)
1455 case SIDE_TYPE_ARRAY_POINTER64
:
1456 if (elem_type
->type
!= SIDE_TYPE_POINTER64
)
1462 side_type
= elem_type
->type
;
1465 for (i
= 0; i
< side_sav_len
; i
++) {
1466 struct side_arg_vec sav_elem
= {
1470 switch (side_type
) {
1472 sav_elem
.u
.integer_value
.side_u8
= ((const uint8_t *) p
)[i
];
1475 sav_elem
.u
.integer_value
.side_s8
= ((const int8_t *) p
)[i
];
1478 sav_elem
.u
.integer_value
.side_u16
= ((const uint16_t *) p
)[i
];
1481 sav_elem
.u
.integer_value
.side_s16
= ((const int16_t *) p
)[i
];
1484 sav_elem
.u
.integer_value
.side_u32
= ((const uint32_t *) p
)[i
];
1487 sav_elem
.u
.integer_value
.side_s32
= ((const int32_t *) p
)[i
];
1490 sav_elem
.u
.integer_value
.side_u64
= ((const uint64_t *) p
)[i
];
1493 sav_elem
.u
.integer_value
.side_s64
= ((const int64_t *) p
)[i
];
1495 case SIDE_TYPE_BYTE
:
1496 sav_elem
.u
.side_byte
= ((const uint8_t *) p
)[i
];
1498 case SIDE_TYPE_POINTER32
:
1499 sav_elem
.u
.integer_value
.side_u32
= ((const uint32_t *) p
)[i
];
1501 case SIDE_TYPE_POINTER64
:
1502 sav_elem
.u
.integer_value
.side_u64
= ((const uint64_t *) p
)[i
];
1506 fprintf(stderr
, "ERROR: Unexpected type\n");
1510 printf("%s", i
? ", " : "");
1511 tracer_print_type(elem_type
, &sav_elem
);
1517 fprintf(stderr
, "ERROR: type mismatch\n");
1521 void tracer_print_vla_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
1523 const struct side_type_description
*elem_type
= type_desc
->u
.side_vla
.elem_type
;
1524 uint32_t side_sav_len
= item
->u
.side_vla_fixint
.length
;
1525 void *p
= item
->u
.side_vla_fixint
.p
;
1526 enum side_type side_type
;
1529 print_attributes("attr", ":", type_desc
->u
.side_vla
.attr
, type_desc
->u
.side_vla
.nr_attr
);
1530 printf("%s", type_desc
->u
.side_vla
.nr_attr
? ", " : "");
1531 printf("elements: ");
1532 switch (item
->type
) {
1533 case SIDE_TYPE_VLA_U8
:
1534 if (elem_type
->type
!= SIDE_TYPE_U8
)
1537 case SIDE_TYPE_VLA_U16
:
1538 if (elem_type
->type
!= SIDE_TYPE_U16
)
1541 case SIDE_TYPE_VLA_U32
:
1542 if (elem_type
->type
!= SIDE_TYPE_U32
)
1545 case SIDE_TYPE_VLA_U64
:
1546 if (elem_type
->type
!= SIDE_TYPE_U64
)
1549 case SIDE_TYPE_VLA_S8
:
1550 if (elem_type
->type
!= SIDE_TYPE_S8
)
1553 case SIDE_TYPE_VLA_S16
:
1554 if (elem_type
->type
!= SIDE_TYPE_S16
)
1557 case SIDE_TYPE_VLA_S32
:
1558 if (elem_type
->type
!= SIDE_TYPE_S32
)
1561 case SIDE_TYPE_VLA_S64
:
1562 if (elem_type
->type
!= SIDE_TYPE_S64
)
1565 case SIDE_TYPE_VLA_BYTE
:
1566 if (elem_type
->type
!= SIDE_TYPE_BYTE
)
1569 case SIDE_TYPE_VLA_POINTER32
:
1570 if (elem_type
->type
!= SIDE_TYPE_POINTER32
)
1572 case SIDE_TYPE_VLA_POINTER64
:
1573 if (elem_type
->type
!= SIDE_TYPE_POINTER64
)
1579 side_type
= elem_type
->type
;
1582 for (i
= 0; i
< side_sav_len
; i
++) {
1583 struct side_arg_vec sav_elem
= {
1587 switch (side_type
) {
1589 sav_elem
.u
.integer_value
.side_u8
= ((const uint8_t *) p
)[i
];
1592 sav_elem
.u
.integer_value
.side_s8
= ((const int8_t *) p
)[i
];
1595 sav_elem
.u
.integer_value
.side_u16
= ((const uint16_t *) p
)[i
];
1598 sav_elem
.u
.integer_value
.side_s16
= ((const int16_t *) p
)[i
];
1601 sav_elem
.u
.integer_value
.side_u32
= ((const uint32_t *) p
)[i
];
1604 sav_elem
.u
.integer_value
.side_s32
= ((const int32_t *) p
)[i
];
1607 sav_elem
.u
.integer_value
.side_u64
= ((const uint64_t *) p
)[i
];
1610 sav_elem
.u
.integer_value
.side_s64
= ((const int64_t *) p
)[i
];
1612 case SIDE_TYPE_BYTE
:
1613 sav_elem
.u
.side_byte
= ((const uint8_t *) p
)[i
];
1615 case SIDE_TYPE_POINTER32
:
1616 sav_elem
.u
.integer_value
.side_u32
= ((const uint32_t *) p
)[i
];
1618 case SIDE_TYPE_POINTER64
:
1619 sav_elem
.u
.integer_value
.side_u64
= ((const uint64_t *) p
)[i
];
1623 fprintf(stderr
, "ERROR: Unexpected type\n");
1627 printf("%s", i
? ", " : "");
1628 tracer_print_type(elem_type
, &sav_elem
);
1634 fprintf(stderr
, "ERROR: type mismatch\n");
1639 void tracer_print_dynamic_struct(const struct side_arg_dynamic_event_struct
*dynamic_struct
)
1641 const struct side_arg_dynamic_event_field
*fields
= dynamic_struct
->fields
;
1642 uint32_t len
= dynamic_struct
->len
;
1645 print_attributes("attr", "::", dynamic_struct
->attr
, dynamic_struct
->nr_attr
);
1646 printf("%s", dynamic_struct
->nr_attr
? ", " : "");
1647 printf("fields:: ");
1649 for (i
= 0; i
< len
; i
++) {
1650 printf("%s", i
? ", " : "");
1651 printf("%s:: ", fields
[i
].field_name
);
1652 tracer_print_dynamic(&fields
[i
].elem
);
1657 struct tracer_dynamic_struct_visitor_priv
{
1662 enum side_visitor_status
tracer_dynamic_struct_write_elem_cb(
1663 const struct side_tracer_dynamic_struct_visitor_ctx
*tracer_ctx
,
1664 const struct side_arg_dynamic_event_field
*dynamic_field
)
1666 struct tracer_dynamic_struct_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
1668 printf("%s", tracer_priv
->i
++ ? ", " : "");
1669 printf("%s:: ", dynamic_field
->field_name
);
1670 tracer_print_dynamic(&dynamic_field
->elem
);
1671 return SIDE_VISITOR_STATUS_OK
;
1675 void tracer_print_dynamic_struct_visitor(const struct side_arg_dynamic_vec
*item
)
1677 enum side_visitor_status status
;
1678 struct tracer_dynamic_struct_visitor_priv tracer_priv
= {
1681 const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx
= {
1682 .write_field
= tracer_dynamic_struct_write_elem_cb
,
1683 .priv
= &tracer_priv
,
1685 void *app_ctx
= item
->u
.side_dynamic_struct_visitor
.app_ctx
;
1687 print_attributes("attr", "::", item
->u
.side_dynamic_struct_visitor
.attr
, item
->u
.side_dynamic_struct_visitor
.nr_attr
);
1688 printf("%s", item
->u
.side_dynamic_struct_visitor
.nr_attr
? ", " : "");
1689 printf("fields:: ");
1691 status
= item
->u
.side_dynamic_struct_visitor
.visitor(&tracer_ctx
, app_ctx
);
1693 case SIDE_VISITOR_STATUS_OK
:
1695 case SIDE_VISITOR_STATUS_ERROR
:
1696 fprintf(stderr
, "ERROR: Visitor error\n");
1703 void tracer_print_dynamic_vla(const struct side_arg_dynamic_vec_vla
*vla
)
1705 const struct side_arg_dynamic_vec
*sav
= vla
->sav
;
1706 uint32_t side_sav_len
= vla
->len
;
1709 print_attributes("attr", "::", vla
->attr
, vla
->nr_attr
);
1710 printf("%s", vla
->nr_attr
? ", " : "");
1711 printf("elements:: ");
1713 for (i
= 0; i
< side_sav_len
; i
++) {
1714 printf("%s", i
? ", " : "");
1715 tracer_print_dynamic(&sav
[i
]);
1720 struct tracer_dynamic_vla_visitor_priv
{
1725 enum side_visitor_status
tracer_dynamic_vla_write_elem_cb(
1726 const struct side_tracer_dynamic_vla_visitor_ctx
*tracer_ctx
,
1727 const struct side_arg_dynamic_vec
*elem
)
1729 struct tracer_dynamic_vla_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
1731 printf("%s", tracer_priv
->i
++ ? ", " : "");
1732 tracer_print_dynamic(elem
);
1733 return SIDE_VISITOR_STATUS_OK
;
1737 void tracer_print_dynamic_vla_visitor(const struct side_arg_dynamic_vec
*item
)
1739 enum side_visitor_status status
;
1740 struct tracer_dynamic_vla_visitor_priv tracer_priv
= {
1743 const struct side_tracer_dynamic_vla_visitor_ctx tracer_ctx
= {
1744 .write_elem
= tracer_dynamic_vla_write_elem_cb
,
1745 .priv
= &tracer_priv
,
1747 void *app_ctx
= item
->u
.side_dynamic_vla_visitor
.app_ctx
;
1749 print_attributes("attr", "::", item
->u
.side_dynamic_vla_visitor
.attr
, item
->u
.side_dynamic_vla_visitor
.nr_attr
);
1750 printf("%s", item
->u
.side_dynamic_vla_visitor
.nr_attr
? ", " : "");
1751 printf("elements:: ");
1753 status
= item
->u
.side_dynamic_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
1755 case SIDE_VISITOR_STATUS_OK
:
1757 case SIDE_VISITOR_STATUS_ERROR
:
1758 fprintf(stderr
, "ERROR: Visitor error\n");
1765 void tracer_print_dynamic(const struct side_arg_dynamic_vec
*item
)
1767 enum tracer_display_base base
= TRACER_DISPLAY_BASE_10
;
1769 switch (item
->dynamic_type
) {
1770 case SIDE_DYNAMIC_TYPE_U8
:
1771 case SIDE_DYNAMIC_TYPE_U16
:
1772 case SIDE_DYNAMIC_TYPE_U32
:
1773 case SIDE_DYNAMIC_TYPE_U64
:
1774 case SIDE_DYNAMIC_TYPE_S8
:
1775 case SIDE_DYNAMIC_TYPE_S16
:
1776 case SIDE_DYNAMIC_TYPE_S32
:
1777 case SIDE_DYNAMIC_TYPE_S64
:
1778 base
= get_attr_display_base(item
->u
.side_integer
.type
.attr
,
1779 item
->u
.side_integer
.type
.nr_attr
);
1786 switch (item
->dynamic_type
) {
1787 case SIDE_DYNAMIC_TYPE_NULL
:
1788 tracer_print_type_header("::", item
->u
.side_basic
.attr
, item
->u
.side_basic
.nr_attr
);
1789 printf("<NULL TYPE>");
1791 case SIDE_DYNAMIC_TYPE_BOOL
:
1792 tracer_print_type_header("::", item
->u
.side_basic
.attr
, item
->u
.side_basic
.nr_attr
);
1793 printf("%s", item
->u
.side_basic
.u
.side_bool
? "true" : "false");
1795 case SIDE_DYNAMIC_TYPE_U8
:
1799 v
= item
->u
.side_integer
.value
.side_u8
;
1800 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1802 case TRACER_DISPLAY_BASE_2
:
1803 print_integer_binary(v
, 8);
1805 case TRACER_DISPLAY_BASE_8
:
1806 printf("0%" PRIo8
, v
);
1808 case TRACER_DISPLAY_BASE_10
:
1809 printf("%" PRIu8
, v
);
1811 case TRACER_DISPLAY_BASE_16
:
1812 printf("0x%" PRIx8
, v
);
1819 case SIDE_DYNAMIC_TYPE_U16
:
1823 v
= item
->u
.side_integer
.value
.side_u16
;
1824 if (dynamic_type_to_host_reverse_bo(item
))
1825 v
= side_bswap_16(v
);
1826 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1828 case TRACER_DISPLAY_BASE_2
:
1829 print_integer_binary(v
, 16);
1831 case TRACER_DISPLAY_BASE_8
:
1832 printf("0%" PRIo16
, v
);
1834 case TRACER_DISPLAY_BASE_10
:
1835 printf("%" PRIu16
, v
);
1837 case TRACER_DISPLAY_BASE_16
:
1838 printf("0x%" PRIx16
, v
);
1845 case SIDE_DYNAMIC_TYPE_U32
:
1849 v
= item
->u
.side_integer
.value
.side_u32
;
1850 if (dynamic_type_to_host_reverse_bo(item
))
1851 v
= side_bswap_32(v
);
1852 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1854 case TRACER_DISPLAY_BASE_2
:
1855 print_integer_binary(v
, 32);
1857 case TRACER_DISPLAY_BASE_8
:
1858 printf("0%" PRIo32
, v
);
1860 case TRACER_DISPLAY_BASE_10
:
1861 printf("%" PRIu32
, v
);
1863 case TRACER_DISPLAY_BASE_16
:
1864 printf("0x%" PRIx32
, v
);
1871 case SIDE_DYNAMIC_TYPE_U64
:
1875 v
= item
->u
.side_integer
.value
.side_u64
;
1876 if (dynamic_type_to_host_reverse_bo(item
))
1877 v
= side_bswap_64(v
);
1878 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1880 case TRACER_DISPLAY_BASE_2
:
1881 print_integer_binary(v
, 64);
1883 case TRACER_DISPLAY_BASE_8
:
1884 printf("0%" PRIo64
, v
);
1886 case TRACER_DISPLAY_BASE_10
:
1887 printf("%" PRIu64
, v
);
1889 case TRACER_DISPLAY_BASE_16
:
1890 printf("0x%" PRIx64
, v
);
1897 case SIDE_DYNAMIC_TYPE_S8
:
1901 v
= item
->u
.side_integer
.value
.side_s8
;
1902 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1904 case TRACER_DISPLAY_BASE_2
:
1905 print_integer_binary(v
, 8);
1907 case TRACER_DISPLAY_BASE_8
:
1908 printf("0%" PRIo8
, v
);
1910 case TRACER_DISPLAY_BASE_10
:
1911 printf("%" PRId8
, v
);
1913 case TRACER_DISPLAY_BASE_16
:
1914 printf("0x%" PRIx8
, v
);
1921 case SIDE_DYNAMIC_TYPE_S16
:
1925 v
= item
->u
.side_integer
.value
.side_s16
;
1926 if (dynamic_type_to_host_reverse_bo(item
))
1927 v
= side_bswap_16(v
);
1928 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1930 case TRACER_DISPLAY_BASE_2
:
1931 print_integer_binary(v
, 16);
1933 case TRACER_DISPLAY_BASE_8
:
1934 printf("0%" PRIo16
, v
);
1936 case TRACER_DISPLAY_BASE_10
:
1937 printf("%" PRId16
, v
);
1939 case TRACER_DISPLAY_BASE_16
:
1940 printf("0x%" PRIx16
, v
);
1947 case SIDE_DYNAMIC_TYPE_S32
:
1951 v
= item
->u
.side_integer
.value
.side_s32
;
1952 if (dynamic_type_to_host_reverse_bo(item
))
1953 v
= side_bswap_32(v
);
1954 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1956 case TRACER_DISPLAY_BASE_2
:
1957 print_integer_binary(v
, 32);
1959 case TRACER_DISPLAY_BASE_8
:
1960 printf("0%" PRIo32
, v
);
1962 case TRACER_DISPLAY_BASE_10
:
1963 printf("%" PRId32
, v
);
1965 case TRACER_DISPLAY_BASE_16
:
1966 printf("0x%" PRIx32
, v
);
1973 case SIDE_DYNAMIC_TYPE_S64
:
1977 v
= item
->u
.side_integer
.value
.side_s64
;
1978 if (dynamic_type_to_host_reverse_bo(item
))
1979 v
= side_bswap_64(v
);
1980 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
1982 case TRACER_DISPLAY_BASE_2
:
1983 print_integer_binary(v
, 64);
1985 case TRACER_DISPLAY_BASE_8
:
1986 printf("0%" PRIo64
, v
);
1988 case TRACER_DISPLAY_BASE_10
:
1989 printf("%" PRId64
, v
);
1991 case TRACER_DISPLAY_BASE_16
:
1992 printf("0x%" PRIx64
, v
);
1999 case SIDE_DYNAMIC_TYPE_BYTE
:
2000 tracer_print_type_header("::", item
->u
.side_basic
.attr
, item
->u
.side_basic
.nr_attr
);
2001 printf("0x%" PRIx8
, item
->u
.side_basic
.u
.side_byte
);
2003 case SIDE_DYNAMIC_TYPE_POINTER32
:
2007 v
= item
->u
.side_integer
.value
.side_u32
;
2008 if (dynamic_type_to_host_reverse_bo(item
))
2009 v
= side_bswap_32(v
);
2010 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
2011 printf("0x%" PRIx32
, v
);
2015 case SIDE_DYNAMIC_TYPE_POINTER64
:
2019 v
= item
->u
.side_integer
.value
.side_u64
;
2020 if (dynamic_type_to_host_reverse_bo(item
))
2021 v
= side_bswap_64(v
);
2022 tracer_print_type_header("::", item
->u
.side_integer
.type
.attr
, item
->u
.side_integer
.type
.nr_attr
);
2023 printf("0x%" PRIx64
, v
);
2027 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY16
:
2034 .f
= item
->u
.side_float
.value
.side_float_binary16
,
2037 if (dynamic_type_to_host_reverse_bo(item
))
2038 float16
.u
= side_bswap_16(float16
.u
);
2039 tracer_print_type_header("::", item
->u
.side_float
.type
.attr
, item
->u
.side_float
.type
.nr_attr
);
2040 printf("%g", (double) float16
.f
);
2043 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
2047 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY32
:
2054 .f
= item
->u
.side_float
.value
.side_float_binary32
,
2057 if (dynamic_type_to_host_reverse_bo(item
))
2058 float32
.u
= side_bswap_32(float32
.u
);
2059 tracer_print_type_header("::", item
->u
.side_float
.type
.attr
, item
->u
.side_float
.type
.nr_attr
);
2060 printf("%g", (double) float32
.f
);
2063 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
2067 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY64
:
2074 .f
= item
->u
.side_float
.value
.side_float_binary64
,
2077 if (dynamic_type_to_host_reverse_bo(item
))
2078 float64
.u
= side_bswap_64(float64
.u
);
2079 tracer_print_type_header("::", item
->u
.side_float
.type
.attr
, item
->u
.side_float
.type
.nr_attr
);
2080 printf("%g", (double) float64
.f
);
2083 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
2087 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY128
:
2094 .f
= item
->u
.side_float
.value
.side_float_binary128
,
2097 if (dynamic_type_to_host_reverse_bo(item
))
2098 side_bswap_128p(float128
.arr
);
2099 tracer_print_type_header("::", item
->u
.side_float
.type
.attr
, item
->u
.side_float
.type
.nr_attr
);
2100 printf("%Lg", (long double) float128
.f
);
2103 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
2107 case SIDE_DYNAMIC_TYPE_STRING
:
2108 tracer_print_type_header("::", item
->u
.side_basic
.attr
, item
->u
.side_basic
.nr_attr
);
2109 printf("\"%s\"", (const char *)(uintptr_t) item
->u
.side_basic
.u
.string
);
2111 case SIDE_DYNAMIC_TYPE_STRUCT
:
2112 tracer_print_dynamic_struct(item
->u
.side_dynamic_struct
);
2114 case SIDE_DYNAMIC_TYPE_STRUCT_VISITOR
:
2115 tracer_print_dynamic_struct_visitor(item
);
2117 case SIDE_DYNAMIC_TYPE_VLA
:
2118 tracer_print_dynamic_vla(item
->u
.side_dynamic_vla
);
2120 case SIDE_DYNAMIC_TYPE_VLA_VISITOR
:
2121 tracer_print_dynamic_vla_visitor(item
);
2124 fprintf(stderr
, "<UNKNOWN TYPE>");
2131 void tracer_print_static_fields(const struct side_event_description
*desc
,
2132 const struct side_arg_vec_description
*sav_desc
,
2135 const struct side_arg_vec
*sav
= sav_desc
->sav
;
2136 uint32_t side_sav_len
= sav_desc
->len
;
2139 printf("provider: %s, event: %s", desc
->provider_name
, desc
->event_name
);
2140 if (desc
->nr_fields
!= side_sav_len
) {
2141 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments\n");
2144 print_attributes(", attr", ":", desc
->attr
, desc
->nr_attr
);
2145 printf("%s", side_sav_len
? ", fields: [ " : "");
2146 for (i
= 0; i
< side_sav_len
; i
++) {
2147 printf("%s", i
? ", " : "");
2148 tracer_print_field(&desc
->fields
[i
], &sav
[i
]);
2156 void tracer_call(const struct side_event_description
*desc
,
2157 const struct side_arg_vec_description
*sav_desc
,
2158 void *priv
__attribute__((unused
)))
2162 tracer_print_static_fields(desc
, sav_desc
, &nr_fields
);
2166 void tracer_call_variadic(const struct side_event_description
*desc
,
2167 const struct side_arg_vec_description
*sav_desc
,
2168 const struct side_arg_dynamic_event_struct
*var_struct
,
2169 void *priv
__attribute__((unused
)))
2171 uint32_t var_struct_len
= var_struct
->len
;
2172 int nr_fields
= 0, i
;
2174 tracer_print_static_fields(desc
, sav_desc
, &nr_fields
);
2176 if (side_unlikely(!(desc
->flags
& SIDE_EVENT_FLAG_VARIADIC
))) {
2177 fprintf(stderr
, "ERROR: unexpected non-variadic event description\n");
2180 print_attributes(", attr ", "::", var_struct
->attr
, var_struct
->nr_attr
);
2181 printf("%s", var_struct_len
? ", fields:: [ " : "");
2182 for (i
= 0; i
< var_struct_len
; i
++, nr_fields
++) {
2183 printf("%s", i
? ", " : "");
2184 printf("%s:: ", var_struct
->fields
[i
].field_name
);
2185 tracer_print_dynamic(&var_struct
->fields
[i
].elem
);
2192 void tracer_event_notification(enum side_tracer_notification notif
,
2193 struct side_event_description
**events
, uint32_t nr_events
, void *priv
)
2198 printf("----------------------------------------------------------\n");
2199 printf("Tracer notified of events %s\n",
2200 notif
== SIDE_TRACER_NOTIFICATION_INSERT_EVENTS
? "inserted" : "removed");
2201 for (i
= 0; i
< nr_events
; i
++) {
2202 struct side_event_description
*event
= events
[i
];
2204 /* Skip NULL pointers */
2207 printf("provider: %s, event: %s\n",
2208 event
->provider_name
, event
->event_name
);
2209 if (notif
== SIDE_TRACER_NOTIFICATION_INSERT_EVENTS
) {
2210 if (event
->flags
& SIDE_EVENT_FLAG_VARIADIC
) {
2211 ret
= side_tracer_callback_variadic_register(event
, tracer_call_variadic
, NULL
);
2215 ret
= side_tracer_callback_register(event
, tracer_call
, NULL
);
2220 if (event
->flags
& SIDE_EVENT_FLAG_VARIADIC
) {
2221 ret
= side_tracer_callback_variadic_unregister(event
, tracer_call_variadic
, NULL
);
2225 ret
= side_tracer_callback_unregister(event
, tracer_call
, NULL
);
2231 printf("----------------------------------------------------------\n");
2234 static __attribute__((constructor
))
2235 void tracer_init(void);
2237 void tracer_init(void)
2239 tracer_handle
= side_tracer_event_notification_register(tracer_event_notification
, NULL
);
2244 static __attribute__((destructor
))
2245 void tracer_exit(void);
2247 void tracer_exit(void)
2249 side_tracer_event_notification_unregister(tracer_handle
);