1 // SPDX-License-Identifier: MIT
3 * Copyright 2022 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
14 #include <side/trace.h>
16 enum tracer_display_base
{
17 TRACER_DISPLAY_BASE_2
,
18 TRACER_DISPLAY_BASE_8
,
19 TRACER_DISPLAY_BASE_10
,
20 TRACER_DISPLAY_BASE_16
,
28 static struct side_tracer_handle
*tracer_handle
;
31 void tracer_print_struct(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
);
33 void tracer_print_array(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
);
35 void tracer_print_vla(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
);
37 void tracer_print_vla_visitor(const struct side_type
*type_desc
, void *app_ctx
);
39 void tracer_print_dynamic(const struct side_arg
*dynamic_item
);
41 uint32_t tracer_print_gather_bool_type(const struct side_type_gather
*type_gather
, const void *_ptr
);
43 uint32_t tracer_print_gather_byte_type(const struct side_type_gather
*type_gather
, const void *_ptr
);
45 uint32_t tracer_print_gather_integer_type(const struct side_type_gather
*type_gather
, const void *_ptr
,
46 enum tracer_display_base default_base
);
48 uint32_t tracer_print_gather_float_type(const struct side_type_gather
*type_gather
, const void *_ptr
);
50 uint32_t tracer_print_gather_string_type(const struct side_type_gather
*type_gather
, const void *_ptr
);
52 uint32_t tracer_print_gather_enum_type(const struct side_type_gather
*type_gather
, const void *_ptr
);
54 uint32_t tracer_print_gather_struct(const struct side_type_gather
*type_gather
, const void *_ptr
);
56 uint32_t tracer_print_gather_array(const struct side_type_gather
*type_gather
, const void *_ptr
);
58 uint32_t tracer_print_gather_vla(const struct side_type_gather
*type_gather
, const void *_ptr
,
59 const void *_length_ptr
);
61 void tracer_print_type(const struct side_type
*type_desc
, const struct side_arg
*item
);
64 void tracer_convert_string_to_utf8(const void *p
, uint8_t unit_size
, enum side_type_label_byte_order byte_order
,
65 size_t *strlen_with_null
,
68 size_t ret
, inbytesleft
= 0, outbytesleft
, bufsize
;
69 const char *str
= p
, *fromcode
;
70 char *inbuf
= (char *) p
, *outbuf
, *buf
;
76 *strlen_with_null
= strlen(str
) + 1;
77 *output_str
= (char *) str
;
81 const uint16_t *p16
= p
;
84 case SIDE_TYPE_BYTE_ORDER_LE
:
86 fromcode
= "UTF-16LE";
89 case SIDE_TYPE_BYTE_ORDER_BE
:
91 fromcode
= "UTF-16BE";
95 fprintf(stderr
, "Unknown byte order\n");
101 * Worse case is U+FFFF UTF-16 (2 bytes) converting to
102 * { ef, bf, bf } UTF-8 (3 bytes).
104 bufsize
= inbytesleft
/ 2 * 3 + 1;
109 const uint32_t *p32
= p
;
111 switch (byte_order
) {
112 case SIDE_TYPE_BYTE_ORDER_LE
:
114 fromcode
= "UTF-32LE";
117 case SIDE_TYPE_BYTE_ORDER_BE
:
119 fromcode
= "UTF-32BE";
123 fprintf(stderr
, "Unknown byte order\n");
129 * Each 4-byte UTF-32 character converts to at most a
130 * 4-byte UTF-8 character.
132 bufsize
= inbytesleft
+ 1;
136 fprintf(stderr
, "Unknown string unit size %" PRIu8
"\n", unit_size
);
140 cd
= iconv_open("UTF8", fromcode
);
141 if (cd
== (iconv_t
) -1) {
142 perror("iconv_open");
145 buf
= malloc(bufsize
);
149 outbuf
= (char *) buf
;
150 outbytesleft
= bufsize
;
151 ret
= iconv(cd
, &inbuf
, &inbytesleft
, &outbuf
, &outbytesleft
);
152 if (ret
== (size_t) -1) {
157 fprintf(stderr
, "Buffer too small to convert string input\n");
161 if (iconv_close(cd
) == -1) {
162 perror("iconv_close");
165 if (strlen_with_null
)
166 *strlen_with_null
= outbuf
- buf
;
171 void tracer_print_string(const void *p
, uint8_t unit_size
, enum side_type_label_byte_order byte_order
,
172 size_t *strlen_with_null
)
174 char *output_str
= NULL
;
176 tracer_convert_string_to_utf8(p
, unit_size
, byte_order
, strlen_with_null
, &output_str
);
177 printf("\"%s\"", output_str
);
183 int64_t get_attr_integer_value(const struct side_attr
*attr
)
187 switch (attr
->value
.type
) {
188 case SIDE_ATTR_TYPE_U8
:
189 val
= attr
->value
.u
.integer_value
.side_u8
;
191 case SIDE_ATTR_TYPE_U16
:
192 val
= attr
->value
.u
.integer_value
.side_u16
;
194 case SIDE_ATTR_TYPE_U32
:
195 val
= attr
->value
.u
.integer_value
.side_u32
;
197 case SIDE_ATTR_TYPE_U64
:
198 val
= attr
->value
.u
.integer_value
.side_u64
;
200 case SIDE_ATTR_TYPE_S8
:
201 val
= attr
->value
.u
.integer_value
.side_s8
;
203 case SIDE_ATTR_TYPE_S16
:
204 val
= attr
->value
.u
.integer_value
.side_s16
;
206 case SIDE_ATTR_TYPE_S32
:
207 val
= attr
->value
.u
.integer_value
.side_s32
;
209 case SIDE_ATTR_TYPE_S64
:
210 val
= attr
->value
.u
.integer_value
.side_s64
;
213 fprintf(stderr
, "Unexpected attribute type\n");
220 enum tracer_display_base
get_attr_display_base(const struct side_attr
*_attr
, uint32_t nr_attr
,
221 enum tracer_display_base default_base
)
225 for (i
= 0; i
< nr_attr
; i
++) {
226 const struct side_attr
*attr
= &_attr
[i
];
227 char *utf8_str
= NULL
;
230 tracer_convert_string_to_utf8(attr
->key
.p
, attr
->key
.unit_size
,
231 attr
->key
.byte_order
, NULL
, &utf8_str
);
232 cmp
= strcmp(utf8_str
, "std.integer.base");
233 if (utf8_str
!= attr
->key
.p
)
236 int64_t val
= get_attr_integer_value(attr
);
240 return TRACER_DISPLAY_BASE_2
;
242 return TRACER_DISPLAY_BASE_8
;
244 return TRACER_DISPLAY_BASE_10
;
246 return TRACER_DISPLAY_BASE_16
;
248 fprintf(stderr
, "Unexpected integer display base: %" PRId64
"\n", val
);
253 return default_base
; /* Default */
257 void tracer_print_attr_type(const char *separator
, const struct side_attr
*attr
)
259 char *utf8_str
= NULL
;
261 tracer_convert_string_to_utf8(attr
->key
.p
, attr
->key
.unit_size
,
262 attr
->key
.byte_order
, NULL
, &utf8_str
);
263 printf("{ key%s \"%s\", value%s ", separator
, utf8_str
, separator
);
264 if (utf8_str
!= attr
->key
.p
)
266 switch (attr
->value
.type
) {
267 case SIDE_ATTR_TYPE_BOOL
:
268 printf("%s", attr
->value
.u
.bool_value
? "true" : "false");
270 case SIDE_ATTR_TYPE_U8
:
271 printf("%" PRIu8
, attr
->value
.u
.integer_value
.side_u8
);
273 case SIDE_ATTR_TYPE_U16
:
274 printf("%" PRIu16
, attr
->value
.u
.integer_value
.side_u16
);
276 case SIDE_ATTR_TYPE_U32
:
277 printf("%" PRIu32
, attr
->value
.u
.integer_value
.side_u32
);
279 case SIDE_ATTR_TYPE_U64
:
280 printf("%" PRIu64
, attr
->value
.u
.integer_value
.side_u64
);
282 case SIDE_ATTR_TYPE_S8
:
283 printf("%" PRId8
, attr
->value
.u
.integer_value
.side_s8
);
285 case SIDE_ATTR_TYPE_S16
:
286 printf("%" PRId16
, attr
->value
.u
.integer_value
.side_s16
);
288 case SIDE_ATTR_TYPE_S32
:
289 printf("%" PRId32
, attr
->value
.u
.integer_value
.side_s32
);
291 case SIDE_ATTR_TYPE_S64
:
292 printf("%" PRId64
, attr
->value
.u
.integer_value
.side_s64
);
294 case SIDE_ATTR_TYPE_FLOAT_BINARY16
:
296 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary16
);
299 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
302 case SIDE_ATTR_TYPE_FLOAT_BINARY32
:
304 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary32
);
307 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
310 case SIDE_ATTR_TYPE_FLOAT_BINARY64
:
312 printf("%g", (double) attr
->value
.u
.float_value
.side_float_binary64
);
315 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
318 case SIDE_ATTR_TYPE_FLOAT_BINARY128
:
320 printf("%Lg", (long double) attr
->value
.u
.float_value
.side_float_binary128
);
323 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
326 case SIDE_ATTR_TYPE_STRING
:
327 tracer_print_string(attr
->value
.u
.string_value
.p
,
328 attr
->value
.u
.string_value
.unit_size
,
329 attr
->value
.u
.string_value
.byte_order
, NULL
);
332 fprintf(stderr
, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
339 void print_attributes(const char *prefix_str
, const char *separator
,
340 const struct side_attr
*attr
, uint32_t nr_attr
)
346 printf("%s%s [ ", prefix_str
, separator
);
347 for (i
= 0; i
< nr_attr
; i
++) {
348 printf("%s", i
? ", " : "");
349 tracer_print_attr_type(separator
, &attr
[i
]);
355 union int64_value
tracer_load_integer_value(const struct side_type_integer
*type_integer
,
356 const union side_integer_value
*value
,
357 uint16_t offset_bits
, uint16_t *_len_bits
)
359 union int64_value v64
;
363 if (!type_integer
->len_bits
)
364 len_bits
= type_integer
->integer_size
* CHAR_BIT
;
366 len_bits
= type_integer
->len_bits
;
367 if (len_bits
+ offset_bits
> type_integer
->integer_size
* CHAR_BIT
)
369 reverse_bo
= type_integer
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
;
370 switch (type_integer
->integer_size
) {
372 if (type_integer
->signedness
)
373 v64
.s
= value
->side_s8
;
375 v64
.u
= value
->side_u8
;
378 if (type_integer
->signedness
) {
381 side_s16
= value
->side_s16
;
383 side_s16
= side_bswap_16(side_s16
);
388 side_u16
= value
->side_u16
;
390 side_u16
= side_bswap_16(side_u16
);
395 if (type_integer
->signedness
) {
398 side_s32
= value
->side_s32
;
400 side_s32
= side_bswap_32(side_s32
);
405 side_u32
= value
->side_u32
;
407 side_u32
= side_bswap_32(side_u32
);
412 if (type_integer
->signedness
) {
415 side_s64
= value
->side_s64
;
417 side_s64
= side_bswap_64(side_s64
);
422 side_u64
= value
->side_u64
;
424 side_u64
= side_bswap_64(side_u64
);
431 v64
.u
>>= offset_bits
;
433 v64
.u
&= (1ULL << len_bits
) - 1;
434 if (type_integer
->signedness
) {
436 if (v64
.u
& (1ULL << (len_bits
- 1)))
437 v64
.u
|= ~((1ULL << len_bits
) - 1);
441 *_len_bits
= len_bits
;
446 void print_enum_labels(const struct side_enum_mappings
*mappings
, union int64_value v64
)
448 uint32_t i
, print_count
= 0;
450 printf(", labels: [ ");
451 for (i
= 0; i
< mappings
->nr_mappings
; i
++) {
452 const struct side_enum_mapping
*mapping
= &mappings
->mappings
[i
];
454 if (mapping
->range_end
< mapping
->range_begin
) {
455 fprintf(stderr
, "ERROR: Unexpected enum range: %" PRIu64
"-%" PRIu64
"\n",
456 mapping
->range_begin
, mapping
->range_end
);
459 if (v64
.s
>= mapping
->range_begin
&& v64
.s
<= mapping
->range_end
) {
460 printf("%s", print_count
++ ? ", " : "");
461 tracer_print_string(mapping
->label
.p
, mapping
->label
.unit_size
, mapping
->label
.byte_order
, NULL
);
465 printf("<NO LABEL>");
470 void tracer_print_enum(const struct side_type
*type_desc
, const struct side_arg
*item
)
472 const struct side_enum_mappings
*mappings
= type_desc
->u
.side_enum
.mappings
;
473 const struct side_type
*elem_type
= type_desc
->u
.side_enum
.elem_type
;
474 union int64_value v64
;
476 if (elem_type
->type
!= item
->type
) {
477 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
480 v64
= tracer_load_integer_value(&elem_type
->u
.side_integer
,
481 &item
->u
.side_static
.integer_value
, 0, NULL
);
482 print_attributes("attr", ":", mappings
->attr
, mappings
->nr_attr
);
483 printf("%s", mappings
->nr_attr
? ", " : "");
484 tracer_print_type(elem_type
, item
);
485 print_enum_labels(mappings
, v64
);
489 uint32_t elem_type_to_stride(const struct side_type
*elem_type
)
493 switch (elem_type
->type
) {
506 return elem_type
->u
.side_integer
.integer_size
* CHAR_BIT
;
508 fprintf(stderr
, "ERROR: Unexpected enum bitmap element type\n");
515 void tracer_print_enum_bitmap(const struct side_type
*type_desc
,
516 const struct side_arg
*item
)
518 const struct side_enum_bitmap_mappings
*side_enum_mappings
= type_desc
->u
.side_enum_bitmap
.mappings
;
519 const struct side_type
*enum_elem_type
= type_desc
->u
.side_enum_bitmap
.elem_type
, *elem_type
;
520 uint32_t i
, print_count
= 0, stride_bit
, nr_items
;
521 const struct side_arg
*array_item
;
523 switch (enum_elem_type
->type
) {
524 case SIDE_TYPE_U8
: /* Fall-through */
525 case SIDE_TYPE_BYTE
: /* Fall-through */
526 case SIDE_TYPE_U16
: /* Fall-through */
527 case SIDE_TYPE_U32
: /* Fall-through */
528 case SIDE_TYPE_U64
: /* Fall-through */
529 case SIDE_TYPE_S8
: /* Fall-through */
530 case SIDE_TYPE_S16
: /* Fall-through */
531 case SIDE_TYPE_S32
: /* Fall-through */
533 elem_type
= enum_elem_type
;
537 case SIDE_TYPE_ARRAY
:
538 elem_type
= enum_elem_type
->u
.side_array
.elem_type
;
539 array_item
= item
->u
.side_static
.side_array
->sav
;
540 nr_items
= type_desc
->u
.side_array
.length
;
543 elem_type
= enum_elem_type
->u
.side_vla
.elem_type
;
544 array_item
= item
->u
.side_static
.side_vla
->sav
;
545 nr_items
= item
->u
.side_static
.side_vla
->len
;
548 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
551 stride_bit
= elem_type_to_stride(elem_type
);
553 print_attributes("attr", ":", side_enum_mappings
->attr
, side_enum_mappings
->nr_attr
);
554 printf("%s", side_enum_mappings
->nr_attr
? ", " : "");
555 printf("labels: [ ");
556 for (i
= 0; i
< side_enum_mappings
->nr_mappings
; i
++) {
557 const struct side_enum_bitmap_mapping
*mapping
= &side_enum_mappings
->mappings
[i
];
561 if (mapping
->range_end
< mapping
->range_begin
) {
562 fprintf(stderr
, "ERROR: Unexpected enum bitmap range: %" PRIu64
"-%" PRIu64
"\n",
563 mapping
->range_begin
, mapping
->range_end
);
566 for (bit
= mapping
->range_begin
; bit
<= mapping
->range_end
; bit
++) {
567 if (bit
> (nr_items
* stride_bit
) - 1)
569 if (elem_type
->type
== SIDE_TYPE_BYTE
) {
570 uint8_t v
= array_item
[bit
/ 8].u
.side_static
.byte_value
;
571 if (v
& (1ULL << (bit
% 8))) {
576 union int64_value v64
;
578 v64
= tracer_load_integer_value(&elem_type
->u
.side_integer
,
579 &array_item
[bit
/ stride_bit
].u
.side_static
.integer_value
,
581 if (v64
.u
& (1ULL << (bit
% stride_bit
))) {
589 printf("%s", print_count
++ ? ", " : "");
590 tracer_print_string(mapping
->label
.p
, mapping
->label
.unit_size
, mapping
->label
.byte_order
, NULL
);
594 printf("<NO LABEL>");
599 void print_integer_binary(uint64_t v
, int bits
)
605 for (i
= 0; i
< bits
; i
++) {
606 printf("%c", v
& (1ULL << 63) ? '1' : '0');
612 void tracer_print_type_header(const char *separator
,
613 const struct side_attr
*attr
, uint32_t nr_attr
)
615 print_attributes("attr", separator
, attr
, nr_attr
);
616 printf("%s", nr_attr
? ", " : "");
617 printf("value%s ", separator
);
621 void tracer_print_type_bool(const char *separator
,
622 const struct side_type_bool
*type_bool
,
623 const union side_bool_value
*value
,
624 uint16_t offset_bits
)
630 if (!type_bool
->len_bits
)
631 len_bits
= type_bool
->bool_size
* CHAR_BIT
;
633 len_bits
= type_bool
->len_bits
;
634 if (len_bits
+ offset_bits
> type_bool
->bool_size
* CHAR_BIT
)
636 reverse_bo
= type_bool
->byte_order
!= SIDE_TYPE_BYTE_ORDER_HOST
;
637 switch (type_bool
->bool_size
) {
639 v
= value
->side_bool8
;
645 side_u16
= value
->side_bool16
;
647 side_u16
= side_bswap_16(side_u16
);
655 side_u32
= value
->side_bool32
;
657 side_u32
= side_bswap_32(side_u32
);
665 side_u64
= value
->side_bool64
;
667 side_u64
= side_bswap_64(side_u64
);
676 v
&= (1ULL << len_bits
) - 1;
677 tracer_print_type_header(separator
, type_bool
->attr
, type_bool
->nr_attr
);
678 printf("%s", v
? "true" : "false");
682 void tracer_print_type_integer(const char *separator
,
683 const struct side_type_integer
*type_integer
,
684 const union side_integer_value
*value
,
685 uint16_t offset_bits
,
686 enum tracer_display_base default_base
)
688 enum tracer_display_base base
;
689 union int64_value v64
;
692 v64
= tracer_load_integer_value(type_integer
, value
, offset_bits
, &len_bits
);
693 tracer_print_type_header(separator
, type_integer
->attr
, type_integer
->nr_attr
);
694 base
= get_attr_display_base(type_integer
->attr
, type_integer
->nr_attr
, default_base
);
696 case TRACER_DISPLAY_BASE_2
:
697 print_integer_binary(v64
.u
, len_bits
);
699 case TRACER_DISPLAY_BASE_8
:
700 /* Clear sign bits beyond len_bits */
702 v64
.u
&= (1ULL << len_bits
) - 1;
703 printf("0%" PRIo64
, v64
.u
);
705 case TRACER_DISPLAY_BASE_10
:
706 if (type_integer
->signedness
)
707 printf("%" PRId64
, v64
.s
);
709 printf("%" PRIu64
, v64
.u
);
711 case TRACER_DISPLAY_BASE_16
:
712 /* Clear sign bits beyond len_bits */
714 v64
.u
&= (1ULL << len_bits
) - 1;
715 printf("0x%" PRIx64
, v64
.u
);
723 void tracer_print_type_float(const char *separator
,
724 const struct side_type_float
*type_float
,
725 const union side_float_value
*value
)
729 tracer_print_type_header(separator
, type_float
->attr
, type_float
->nr_attr
);
730 reverse_bo
= type_float
->byte_order
!= SIDE_TYPE_FLOAT_WORD_ORDER_HOST
;
731 switch (type_float
->float_size
) {
739 .f
= value
->side_float_binary16
,
743 float16
.u
= side_bswap_16(float16
.u
);
744 printf("%g", (double) float16
.f
);
747 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
758 .f
= value
->side_float_binary32
,
762 float32
.u
= side_bswap_32(float32
.u
);
763 printf("%g", (double) float32
.f
);
766 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
777 .f
= value
->side_float_binary64
,
781 float64
.u
= side_bswap_64(float64
.u
);
782 printf("%g", (double) float64
.f
);
785 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
796 .f
= value
->side_float_binary128
,
800 side_bswap_128p(float128
.arr
);
801 printf("%Lg", (long double) float128
.f
);
804 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
809 fprintf(stderr
, "ERROR: Unknown float size\n");
815 void tracer_print_type(const struct side_type
*type_desc
, const struct side_arg
*item
)
817 enum side_type_label type
;
819 switch (type_desc
->type
) {
821 switch (item
->type
) {
832 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
838 case SIDE_TYPE_ENUM_BITMAP
:
839 switch (item
->type
) {
845 case SIDE_TYPE_ARRAY
:
849 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
855 case SIDE_TYPE_GATHER_ENUM
:
856 switch (item
->type
) {
857 case SIDE_TYPE_GATHER_INTEGER
:
860 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
866 case SIDE_TYPE_DYNAMIC
:
867 switch (item
->type
) {
868 case SIDE_TYPE_DYNAMIC_NULL
:
869 case SIDE_TYPE_DYNAMIC_BOOL
:
870 case SIDE_TYPE_DYNAMIC_INTEGER
:
871 case SIDE_TYPE_DYNAMIC_BYTE
:
872 case SIDE_TYPE_DYNAMIC_POINTER
:
873 case SIDE_TYPE_DYNAMIC_FLOAT
:
874 case SIDE_TYPE_DYNAMIC_STRING
:
875 case SIDE_TYPE_DYNAMIC_STRUCT
:
876 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR
:
877 case SIDE_TYPE_DYNAMIC_VLA
:
878 case SIDE_TYPE_DYNAMIC_VLA_VISITOR
:
881 fprintf(stderr
, "ERROR: Unexpected dynamic type\n");
888 if (type_desc
->type
!= item
->type
) {
889 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
895 if (type_desc
->type
== SIDE_TYPE_ENUM
|| type_desc
->type
== SIDE_TYPE_ENUM_BITMAP
||
896 type_desc
->type
== SIDE_TYPE_GATHER_ENUM
)
897 type
= (enum side_type_label
) type_desc
->type
;
899 type
= (enum side_type_label
) item
->type
;
903 /* Stack-copy basic types */
905 tracer_print_type_header(":", type_desc
->u
.side_null
.attr
, type_desc
->u
.side_null
.nr_attr
);
906 printf("<NULL TYPE>");
910 tracer_print_type_bool(":", &type_desc
->u
.side_bool
, &item
->u
.side_static
.bool_value
, 0);
921 tracer_print_type_integer(":", &type_desc
->u
.side_integer
, &item
->u
.side_static
.integer_value
, 0,
922 TRACER_DISPLAY_BASE_10
);
926 tracer_print_type_header(":", type_desc
->u
.side_byte
.attr
, type_desc
->u
.side_byte
.nr_attr
);
927 printf("0x%" PRIx8
, item
->u
.side_static
.byte_value
);
930 case SIDE_TYPE_POINTER
:
931 tracer_print_type_integer(":", &type_desc
->u
.side_integer
, &item
->u
.side_static
.integer_value
, 0,
932 TRACER_DISPLAY_BASE_16
);
935 case SIDE_TYPE_FLOAT_BINARY16
:
936 case SIDE_TYPE_FLOAT_BINARY32
:
937 case SIDE_TYPE_FLOAT_BINARY64
:
938 case SIDE_TYPE_FLOAT_BINARY128
:
939 tracer_print_type_float(":", &type_desc
->u
.side_float
, &item
->u
.side_static
.float_value
);
942 case SIDE_TYPE_STRING_UTF8
:
943 case SIDE_TYPE_STRING_UTF16
:
944 case SIDE_TYPE_STRING_UTF32
:
945 tracer_print_type_header(":", type_desc
->u
.side_string
.attr
, type_desc
->u
.side_string
.nr_attr
);
946 tracer_print_string((const void *)(uintptr_t) item
->u
.side_static
.string_value
,
947 type_desc
->u
.side_string
.unit_size
, type_desc
->u
.side_string
.byte_order
, NULL
);
950 /* Stack-copy compound types */
951 case SIDE_TYPE_STRUCT
:
952 tracer_print_struct(type_desc
, item
->u
.side_static
.side_struct
);
954 case SIDE_TYPE_ARRAY
:
955 tracer_print_array(type_desc
, item
->u
.side_static
.side_array
);
958 tracer_print_vla(type_desc
, item
->u
.side_static
.side_vla
);
960 case SIDE_TYPE_VLA_VISITOR
:
961 tracer_print_vla_visitor(type_desc
, item
->u
.side_static
.side_vla_app_visitor_ctx
);
964 /* Stack-copy enumeration types */
966 tracer_print_enum(type_desc
, item
);
968 case SIDE_TYPE_ENUM_BITMAP
:
969 tracer_print_enum_bitmap(type_desc
, item
);
972 /* Gather basic types */
973 case SIDE_TYPE_GATHER_BOOL
:
974 (void) tracer_print_gather_bool_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_bool_gather_ptr
);
976 case SIDE_TYPE_GATHER_INTEGER
:
977 (void) tracer_print_gather_integer_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_integer_gather_ptr
,
978 TRACER_DISPLAY_BASE_10
);
980 case SIDE_TYPE_GATHER_BYTE
:
981 (void) tracer_print_gather_byte_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_byte_gather_ptr
);
983 case SIDE_TYPE_GATHER_POINTER
:
984 (void) tracer_print_gather_integer_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_integer_gather_ptr
,
985 TRACER_DISPLAY_BASE_16
);
987 case SIDE_TYPE_GATHER_FLOAT
:
988 (void) tracer_print_gather_float_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_float_gather_ptr
);
990 case SIDE_TYPE_GATHER_STRING
:
991 (void) tracer_print_gather_string_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_string_gather_ptr
);
994 /* Gather compound type */
995 case SIDE_TYPE_GATHER_STRUCT
:
996 (void) tracer_print_gather_struct(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_struct_gather_ptr
);
998 case SIDE_TYPE_GATHER_ARRAY
:
999 (void) tracer_print_gather_array(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_array_gather_ptr
);
1001 case SIDE_TYPE_GATHER_VLA
:
1002 (void) tracer_print_gather_vla(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_vla_gather
.ptr
,
1003 item
->u
.side_static
.side_vla_gather
.length_ptr
);
1006 /* Gather enumeration types */
1007 case SIDE_TYPE_GATHER_ENUM
:
1008 (void) tracer_print_gather_enum_type(&type_desc
->u
.side_gather
, item
->u
.side_static
.side_integer_gather_ptr
);
1011 /* Dynamic basic types */
1012 case SIDE_TYPE_DYNAMIC_NULL
:
1013 case SIDE_TYPE_DYNAMIC_BOOL
:
1014 case SIDE_TYPE_DYNAMIC_INTEGER
:
1015 case SIDE_TYPE_DYNAMIC_BYTE
:
1016 case SIDE_TYPE_DYNAMIC_POINTER
:
1017 case SIDE_TYPE_DYNAMIC_FLOAT
:
1018 case SIDE_TYPE_DYNAMIC_STRING
:
1020 /* Dynamic compound types */
1021 case SIDE_TYPE_DYNAMIC_STRUCT
:
1022 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR
:
1023 case SIDE_TYPE_DYNAMIC_VLA
:
1024 case SIDE_TYPE_DYNAMIC_VLA_VISITOR
:
1025 tracer_print_dynamic(item
);
1028 fprintf(stderr
, "<UNKNOWN TYPE>\n");
1035 void tracer_print_field(const struct side_event_field
*item_desc
, const struct side_arg
*item
)
1037 printf("%s: ", item_desc
->field_name
);
1038 tracer_print_type(&item_desc
->side_type
, item
);
1042 void tracer_print_struct(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
)
1044 const struct side_arg
*sav
= side_arg_vec
->sav
;
1045 uint32_t i
, side_sav_len
= side_arg_vec
->len
;
1047 if (type_desc
->u
.side_struct
->nr_fields
!= side_sav_len
) {
1048 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments of structure\n");
1051 print_attributes("attr", ":", type_desc
->u
.side_struct
->attr
, type_desc
->u
.side_struct
->nr_attr
);
1052 printf("%s", type_desc
->u
.side_struct
->nr_attr
? ", " : "");
1053 printf("fields: { ");
1054 for (i
= 0; i
< side_sav_len
; i
++) {
1055 printf("%s", i
? ", " : "");
1056 tracer_print_field(&type_desc
->u
.side_struct
->fields
[i
], &sav
[i
]);
1062 void tracer_print_array(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
)
1064 const struct side_arg
*sav
= side_arg_vec
->sav
;
1065 uint32_t i
, side_sav_len
= side_arg_vec
->len
;
1067 if (type_desc
->u
.side_array
.length
!= side_sav_len
) {
1068 fprintf(stderr
, "ERROR: length mismatch between description and arguments of array\n");
1071 print_attributes("attr", ":", type_desc
->u
.side_array
.attr
, type_desc
->u
.side_array
.nr_attr
);
1072 printf("%s", type_desc
->u
.side_array
.nr_attr
? ", " : "");
1073 printf("elements: ");
1075 for (i
= 0; i
< side_sav_len
; i
++) {
1076 printf("%s", i
? ", " : "");
1077 tracer_print_type(type_desc
->u
.side_array
.elem_type
, &sav
[i
]);
1083 void tracer_print_vla(const struct side_type
*type_desc
, const struct side_arg_vec
*side_arg_vec
)
1085 const struct side_arg
*sav
= side_arg_vec
->sav
;
1086 uint32_t i
, side_sav_len
= side_arg_vec
->len
;
1088 print_attributes("attr", ":", type_desc
->u
.side_vla
.attr
, type_desc
->u
.side_vla
.nr_attr
);
1089 printf("%s", type_desc
->u
.side_vla
.nr_attr
? ", " : "");
1090 printf("elements: ");
1092 for (i
= 0; i
< side_sav_len
; i
++) {
1093 printf("%s", i
? ", " : "");
1094 tracer_print_type(type_desc
->u
.side_vla
.elem_type
, &sav
[i
]);
1100 const char *tracer_gather_access(enum side_type_gather_access_mode access_mode
, const char *ptr
)
1102 switch (access_mode
) {
1103 case SIDE_TYPE_GATHER_ACCESS_DIRECT
:
1105 case SIDE_TYPE_GATHER_ACCESS_POINTER
:
1106 /* Dereference pointer */
1107 memcpy(&ptr
, ptr
, sizeof(ptr
));
1115 uint32_t tracer_gather_size(enum side_type_gather_access_mode access_mode
, uint32_t len
)
1117 switch (access_mode
) {
1118 case SIDE_TYPE_GATHER_ACCESS_DIRECT
:
1120 case SIDE_TYPE_GATHER_ACCESS_POINTER
:
1121 return sizeof(void *);
1128 union int64_value
tracer_load_gather_integer_value(const struct side_type_gather_integer
*side_integer
,
1131 enum side_type_gather_access_mode access_mode
=
1132 (enum side_type_gather_access_mode
) side_integer
->access_mode
;
1133 uint32_t integer_size_bytes
= side_integer
->type
.integer_size
;
1134 const char *ptr
= (const char *) _ptr
;
1135 union side_integer_value value
;
1137 ptr
= tracer_gather_access(access_mode
, ptr
+ side_integer
->offset
);
1138 memcpy(&value
, ptr
, integer_size_bytes
);
1139 return tracer_load_integer_value(&side_integer
->type
, &value
,
1140 side_integer
->offset_bits
, NULL
);
1144 uint32_t tracer_print_gather_bool_type(const struct side_type_gather
*type_gather
, const void *_ptr
)
1146 enum side_type_gather_access_mode access_mode
=
1147 (enum side_type_gather_access_mode
) type_gather
->u
.side_bool
.access_mode
;
1148 uint32_t bool_size_bytes
= type_gather
->u
.side_bool
.type
.bool_size
;
1149 const char *ptr
= (const char *) _ptr
;
1150 union side_bool_value value
;
1152 switch (bool_size_bytes
) {
1161 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_bool
.offset
);
1162 memcpy(&value
, ptr
, bool_size_bytes
);
1163 tracer_print_type_bool(":", &type_gather
->u
.side_bool
.type
, &value
,
1164 type_gather
->u
.side_bool
.offset_bits
);
1165 return tracer_gather_size(access_mode
, bool_size_bytes
);
1169 uint32_t tracer_print_gather_byte_type(const struct side_type_gather
*type_gather
, const void *_ptr
)
1171 enum side_type_gather_access_mode access_mode
=
1172 (enum side_type_gather_access_mode
) type_gather
->u
.side_byte
.access_mode
;
1173 const char *ptr
= (const char *) _ptr
;
1176 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_byte
.offset
);
1177 memcpy(&value
, ptr
, 1);
1178 tracer_print_type_header(":", type_gather
->u
.side_byte
.type
.attr
,
1179 type_gather
->u
.side_byte
.type
.nr_attr
);
1180 printf("0x%" PRIx8
, value
);
1181 return tracer_gather_size(access_mode
, 1);
1185 uint32_t tracer_print_gather_integer_type(const struct side_type_gather
*type_gather
, const void *_ptr
,
1186 enum tracer_display_base default_base
)
1188 enum side_type_gather_access_mode access_mode
=
1189 (enum side_type_gather_access_mode
) type_gather
->u
.side_integer
.access_mode
;
1190 uint32_t integer_size_bytes
= type_gather
->u
.side_integer
.type
.integer_size
;
1191 const char *ptr
= (const char *) _ptr
;
1192 union side_integer_value value
;
1194 switch (integer_size_bytes
) {
1203 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_integer
.offset
);
1204 memcpy(&value
, ptr
, integer_size_bytes
);
1205 tracer_print_type_integer(":", &type_gather
->u
.side_integer
.type
, &value
,
1206 type_gather
->u
.side_integer
.offset_bits
, default_base
);
1207 return tracer_gather_size(access_mode
, integer_size_bytes
);
1211 uint32_t tracer_print_gather_float_type(const struct side_type_gather
*type_gather
, const void *_ptr
)
1213 enum side_type_gather_access_mode access_mode
=
1214 (enum side_type_gather_access_mode
) type_gather
->u
.side_float
.access_mode
;
1215 uint32_t float_size_bytes
= type_gather
->u
.side_float
.type
.float_size
;
1216 const char *ptr
= (const char *) _ptr
;
1217 union side_float_value value
;
1219 switch (float_size_bytes
) {
1228 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_float
.offset
);
1229 memcpy(&value
, ptr
, float_size_bytes
);
1230 tracer_print_type_float(":", &type_gather
->u
.side_float
.type
, &value
);
1231 return tracer_gather_size(access_mode
, float_size_bytes
);
1235 uint32_t tracer_print_gather_string_type(const struct side_type_gather
*type_gather
, const void *_ptr
)
1237 enum side_type_gather_access_mode access_mode
=
1238 (enum side_type_gather_access_mode
) type_gather
->u
.side_string
.access_mode
;
1239 const char *ptr
= (const char *) _ptr
;
1242 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_string
.offset
);
1243 tracer_print_type_header(":", type_gather
->u
.side_string
.type
.attr
,
1244 type_gather
->u
.side_string
.type
.nr_attr
);
1246 tracer_print_string(ptr
, type_gather
->u
.side_string
.type
.unit_size
,
1247 type_gather
->u
.side_string
.type
.byte_order
, &string_len
);
1250 string_len
= type_gather
->u
.side_string
.type
.unit_size
;
1252 return tracer_gather_size(access_mode
, string_len
);
1256 uint32_t tracer_print_gather_type(const struct side_type
*type_desc
, const void *ptr
)
1261 switch (type_desc
->type
) {
1262 /* Gather basic types */
1263 case SIDE_TYPE_GATHER_BOOL
:
1264 len
= tracer_print_gather_bool_type(&type_desc
->u
.side_gather
, ptr
);
1266 case SIDE_TYPE_GATHER_INTEGER
:
1267 len
= tracer_print_gather_integer_type(&type_desc
->u
.side_gather
, ptr
,
1268 TRACER_DISPLAY_BASE_10
);
1270 case SIDE_TYPE_GATHER_BYTE
:
1271 len
= tracer_print_gather_byte_type(&type_desc
->u
.side_gather
, ptr
);
1273 case SIDE_TYPE_GATHER_POINTER
:
1274 len
= tracer_print_gather_integer_type(&type_desc
->u
.side_gather
, ptr
,
1275 TRACER_DISPLAY_BASE_16
);
1277 case SIDE_TYPE_GATHER_FLOAT
:
1278 len
= tracer_print_gather_float_type(&type_desc
->u
.side_gather
, ptr
);
1280 case SIDE_TYPE_GATHER_STRING
:
1281 len
= tracer_print_gather_string_type(&type_desc
->u
.side_gather
, ptr
);
1284 /* Gather enum types */
1285 case SIDE_TYPE_GATHER_ENUM
:
1286 len
= tracer_print_gather_enum_type(&type_desc
->u
.side_gather
, ptr
);
1289 /* Gather compound types */
1290 case SIDE_TYPE_GATHER_STRUCT
:
1291 len
= tracer_print_gather_struct(&type_desc
->u
.side_gather
, ptr
);
1293 case SIDE_TYPE_GATHER_ARRAY
:
1294 len
= tracer_print_gather_array(&type_desc
->u
.side_gather
, ptr
);
1296 case SIDE_TYPE_GATHER_VLA
:
1297 len
= tracer_print_gather_vla(&type_desc
->u
.side_gather
, ptr
, ptr
);
1300 fprintf(stderr
, "<UNKNOWN GATHER TYPE>");
1308 uint32_t tracer_print_gather_enum_type(const struct side_type_gather
*type_gather
, const void *_ptr
)
1310 const struct side_enum_mappings
*mappings
= type_gather
->u
.side_enum
.mappings
;
1311 const struct side_type
*enum_elem_type
= type_gather
->u
.side_enum
.elem_type
;
1312 const struct side_type_gather_integer
*side_integer
= &enum_elem_type
->u
.side_gather
.u
.side_integer
;
1313 enum side_type_gather_access_mode access_mode
=
1314 (enum side_type_gather_access_mode
) side_integer
->access_mode
;
1315 uint32_t integer_size_bytes
= side_integer
->type
.integer_size
;
1316 const char *ptr
= (const char *) _ptr
;
1317 union side_integer_value value
;
1318 union int64_value v64
;
1320 switch (integer_size_bytes
) {
1329 ptr
= tracer_gather_access(access_mode
, ptr
+ side_integer
->offset
);
1330 memcpy(&value
, ptr
, integer_size_bytes
);
1331 v64
= tracer_load_gather_integer_value(side_integer
, &value
);
1332 print_attributes("attr", ":", mappings
->attr
, mappings
->nr_attr
);
1333 printf("%s", mappings
->nr_attr
? ", " : "");
1334 tracer_print_gather_type(enum_elem_type
, ptr
);
1335 print_enum_labels(mappings
, v64
);
1336 return tracer_gather_size(access_mode
, integer_size_bytes
);
1340 void tracer_print_gather_field(const struct side_event_field
*field
, const void *ptr
)
1342 printf("%s: ", field
->field_name
);
1343 (void) tracer_print_gather_type(&field
->side_type
, ptr
);
1347 uint32_t tracer_print_gather_struct(const struct side_type_gather
*type_gather
, const void *_ptr
)
1349 enum side_type_gather_access_mode access_mode
=
1350 (enum side_type_gather_access_mode
) type_gather
->u
.side_struct
.access_mode
;
1351 const char *ptr
= (const char *) _ptr
;
1354 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_struct
.offset
);
1355 print_attributes("attr", ":", type_gather
->u
.side_struct
.type
->attr
, type_gather
->u
.side_struct
.type
->nr_attr
);
1356 printf("%s", type_gather
->u
.side_struct
.type
->nr_attr
? ", " : "");
1357 printf("fields: { ");
1358 for (i
= 0; i
< type_gather
->u
.side_struct
.type
->nr_fields
; i
++) {
1359 printf("%s", i
? ", " : "");
1360 tracer_print_gather_field(&type_gather
->u
.side_struct
.type
->fields
[i
], ptr
);
1363 return tracer_gather_size(access_mode
, type_gather
->u
.side_struct
.size
);
1367 uint32_t tracer_print_gather_array(const struct side_type_gather
*type_gather
, const void *_ptr
)
1369 enum side_type_gather_access_mode access_mode
=
1370 (enum side_type_gather_access_mode
) type_gather
->u
.side_array
.access_mode
;
1371 const char *ptr
= (const char *) _ptr
, *orig_ptr
;
1374 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_array
.offset
);
1376 print_attributes("attr", ":", type_gather
->u
.side_array
.type
.attr
, type_gather
->u
.side_array
.type
.nr_attr
);
1377 printf("%s", type_gather
->u
.side_array
.type
.nr_attr
? ", " : "");
1378 printf("elements: ");
1380 for (i
= 0; i
< type_gather
->u
.side_array
.type
.length
; i
++) {
1381 switch (type_gather
->u
.side_array
.type
.elem_type
->type
) {
1382 case SIDE_TYPE_GATHER_VLA
:
1383 fprintf(stderr
, "<gather VLA only supported within gather structures>\n");
1388 printf("%s", i
? ", " : "");
1389 ptr
+= tracer_print_gather_type(type_gather
->u
.side_array
.type
.elem_type
, ptr
);
1392 return tracer_gather_size(access_mode
, ptr
- orig_ptr
);
1396 uint32_t tracer_print_gather_vla(const struct side_type_gather
*type_gather
, const void *_ptr
,
1397 const void *_length_ptr
)
1399 enum side_type_gather_access_mode access_mode
=
1400 (enum side_type_gather_access_mode
) type_gather
->u
.side_vla
.access_mode
;
1401 const char *ptr
= (const char *) _ptr
, *orig_ptr
;
1402 const char *length_ptr
= (const char *) _length_ptr
;
1403 union int64_value v64
;
1407 switch (type_gather
->u
.side_vla
.length_type
->type
) {
1408 case SIDE_TYPE_GATHER_INTEGER
:
1411 fprintf(stderr
, "<gather VLA expects integer gather length type>\n");
1414 v64
= tracer_load_gather_integer_value(&type_gather
->u
.side_vla
.length_type
->u
.side_gather
.u
.side_integer
,
1416 length
= (uint32_t) v64
.u
;
1417 ptr
= tracer_gather_access(access_mode
, ptr
+ type_gather
->u
.side_vla
.offset
);
1419 print_attributes("attr", ":", type_gather
->u
.side_vla
.type
.attr
, type_gather
->u
.side_vla
.type
.nr_attr
);
1420 printf("%s", type_gather
->u
.side_vla
.type
.nr_attr
? ", " : "");
1421 printf("elements: ");
1423 for (i
= 0; i
< length
; i
++) {
1424 switch (type_gather
->u
.side_vla
.type
.elem_type
->type
) {
1425 case SIDE_TYPE_GATHER_VLA
:
1426 fprintf(stderr
, "<gather VLA only supported within gather structures>\n");
1431 printf("%s", i
? ", " : "");
1432 ptr
+= tracer_print_gather_type(type_gather
->u
.side_vla
.type
.elem_type
, ptr
);
1435 return tracer_gather_size(access_mode
, ptr
- orig_ptr
);
1438 struct tracer_visitor_priv
{
1439 const struct side_type
*elem_type
;
1444 enum side_visitor_status
tracer_write_elem_cb(const struct side_tracer_visitor_ctx
*tracer_ctx
,
1445 const struct side_arg
*elem
)
1447 struct tracer_visitor_priv
*tracer_priv
= (struct tracer_visitor_priv
*) tracer_ctx
->priv
;
1449 printf("%s", tracer_priv
->i
++ ? ", " : "");
1450 tracer_print_type(tracer_priv
->elem_type
, elem
);
1451 return SIDE_VISITOR_STATUS_OK
;
1455 void tracer_print_vla_visitor(const struct side_type
*type_desc
, void *app_ctx
)
1457 enum side_visitor_status status
;
1458 struct tracer_visitor_priv tracer_priv
= {
1459 .elem_type
= type_desc
->u
.side_vla_visitor
.elem_type
,
1462 const struct side_tracer_visitor_ctx tracer_ctx
= {
1463 .write_elem
= tracer_write_elem_cb
,
1464 .priv
= &tracer_priv
,
1467 print_attributes("attr", ":", type_desc
->u
.side_vla_visitor
.attr
, type_desc
->u
.side_vla_visitor
.nr_attr
);
1468 printf("%s", type_desc
->u
.side_vla_visitor
.nr_attr
? ", " : "");
1469 printf("elements: ");
1471 status
= type_desc
->u
.side_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
1473 case SIDE_VISITOR_STATUS_OK
:
1475 case SIDE_VISITOR_STATUS_ERROR
:
1476 fprintf(stderr
, "ERROR: Visitor error\n");
1483 void tracer_print_dynamic_struct(const struct side_arg_dynamic_struct
*dynamic_struct
)
1485 const struct side_arg_dynamic_field
*fields
= dynamic_struct
->fields
;
1486 uint32_t i
, len
= dynamic_struct
->len
;
1488 print_attributes("attr", "::", dynamic_struct
->attr
, dynamic_struct
->nr_attr
);
1489 printf("%s", dynamic_struct
->nr_attr
? ", " : "");
1490 printf("fields:: ");
1492 for (i
= 0; i
< len
; i
++) {
1493 printf("%s", i
? ", " : "");
1494 printf("%s:: ", fields
[i
].field_name
);
1495 tracer_print_dynamic(&fields
[i
].elem
);
1500 struct tracer_dynamic_struct_visitor_priv
{
1505 enum side_visitor_status
tracer_dynamic_struct_write_elem_cb(
1506 const struct side_tracer_dynamic_struct_visitor_ctx
*tracer_ctx
,
1507 const struct side_arg_dynamic_field
*dynamic_field
)
1509 struct tracer_dynamic_struct_visitor_priv
*tracer_priv
=
1510 (struct tracer_dynamic_struct_visitor_priv
*) tracer_ctx
->priv
;
1512 printf("%s", tracer_priv
->i
++ ? ", " : "");
1513 printf("%s:: ", dynamic_field
->field_name
);
1514 tracer_print_dynamic(&dynamic_field
->elem
);
1515 return SIDE_VISITOR_STATUS_OK
;
1519 void tracer_print_dynamic_struct_visitor(const struct side_arg
*item
)
1521 enum side_visitor_status status
;
1522 struct tracer_dynamic_struct_visitor_priv tracer_priv
= {
1525 const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx
= {
1526 .write_field
= tracer_dynamic_struct_write_elem_cb
,
1527 .priv
= &tracer_priv
,
1529 void *app_ctx
= item
->u
.side_dynamic
.side_dynamic_struct_visitor
.app_ctx
;
1531 print_attributes("attr", "::", item
->u
.side_dynamic
.side_dynamic_struct_visitor
.attr
, item
->u
.side_dynamic
.side_dynamic_struct_visitor
.nr_attr
);
1532 printf("%s", item
->u
.side_dynamic
.side_dynamic_struct_visitor
.nr_attr
? ", " : "");
1533 printf("fields:: ");
1535 status
= item
->u
.side_dynamic
.side_dynamic_struct_visitor
.visitor(&tracer_ctx
, app_ctx
);
1537 case SIDE_VISITOR_STATUS_OK
:
1539 case SIDE_VISITOR_STATUS_ERROR
:
1540 fprintf(stderr
, "ERROR: Visitor error\n");
1547 void tracer_print_dynamic_vla(const struct side_arg_dynamic_vla
*vla
)
1549 const struct side_arg
*sav
= vla
->sav
;
1550 uint32_t i
, side_sav_len
= vla
->len
;
1552 print_attributes("attr", "::", vla
->attr
, vla
->nr_attr
);
1553 printf("%s", vla
->nr_attr
? ", " : "");
1554 printf("elements:: ");
1556 for (i
= 0; i
< side_sav_len
; i
++) {
1557 printf("%s", i
? ", " : "");
1558 tracer_print_dynamic(&sav
[i
]);
1563 struct tracer_dynamic_vla_visitor_priv
{
1568 enum side_visitor_status
tracer_dynamic_vla_write_elem_cb(
1569 const struct side_tracer_visitor_ctx
*tracer_ctx
,
1570 const struct side_arg
*elem
)
1572 struct tracer_dynamic_vla_visitor_priv
*tracer_priv
=
1573 (struct tracer_dynamic_vla_visitor_priv
*) tracer_ctx
->priv
;
1575 printf("%s", tracer_priv
->i
++ ? ", " : "");
1576 tracer_print_dynamic(elem
);
1577 return SIDE_VISITOR_STATUS_OK
;
1581 void tracer_print_dynamic_vla_visitor(const struct side_arg
*item
)
1583 enum side_visitor_status status
;
1584 struct tracer_dynamic_vla_visitor_priv tracer_priv
= {
1587 const struct side_tracer_visitor_ctx tracer_ctx
= {
1588 .write_elem
= tracer_dynamic_vla_write_elem_cb
,
1589 .priv
= &tracer_priv
,
1591 void *app_ctx
= item
->u
.side_dynamic
.side_dynamic_vla_visitor
.app_ctx
;
1593 print_attributes("attr", "::", item
->u
.side_dynamic
.side_dynamic_vla_visitor
.attr
, item
->u
.side_dynamic
.side_dynamic_vla_visitor
.nr_attr
);
1594 printf("%s", item
->u
.side_dynamic
.side_dynamic_vla_visitor
.nr_attr
? ", " : "");
1595 printf("elements:: ");
1597 status
= item
->u
.side_dynamic
.side_dynamic_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
1599 case SIDE_VISITOR_STATUS_OK
:
1601 case SIDE_VISITOR_STATUS_ERROR
:
1602 fprintf(stderr
, "ERROR: Visitor error\n");
1609 void tracer_print_dynamic(const struct side_arg
*item
)
1612 switch (item
->type
) {
1613 /* Dynamic basic types */
1614 case SIDE_TYPE_DYNAMIC_NULL
:
1615 tracer_print_type_header("::", item
->u
.side_dynamic
.side_null
.attr
, item
->u
.side_dynamic
.side_null
.nr_attr
);
1616 printf("<NULL TYPE>");
1618 case SIDE_TYPE_DYNAMIC_BOOL
:
1619 tracer_print_type_bool("::", &item
->u
.side_dynamic
.side_bool
.type
, &item
->u
.side_dynamic
.side_bool
.value
, 0);
1621 case SIDE_TYPE_DYNAMIC_INTEGER
:
1622 tracer_print_type_integer("::", &item
->u
.side_dynamic
.side_integer
.type
, &item
->u
.side_dynamic
.side_integer
.value
, 0,
1623 TRACER_DISPLAY_BASE_10
);
1625 case SIDE_TYPE_DYNAMIC_BYTE
:
1626 tracer_print_type_header("::", item
->u
.side_dynamic
.side_byte
.type
.attr
, item
->u
.side_dynamic
.side_byte
.type
.nr_attr
);
1627 printf("0x%" PRIx8
, item
->u
.side_dynamic
.side_byte
.value
);
1629 case SIDE_TYPE_DYNAMIC_POINTER
:
1630 tracer_print_type_integer("::", &item
->u
.side_dynamic
.side_integer
.type
, &item
->u
.side_dynamic
.side_integer
.value
, 0,
1631 TRACER_DISPLAY_BASE_16
);
1633 case SIDE_TYPE_DYNAMIC_FLOAT
:
1634 tracer_print_type_float("::", &item
->u
.side_dynamic
.side_float
.type
,
1635 &item
->u
.side_dynamic
.side_float
.value
);
1637 case SIDE_TYPE_DYNAMIC_STRING
:
1638 tracer_print_type_header("::", item
->u
.side_dynamic
.side_string
.type
.attr
, item
->u
.side_dynamic
.side_string
.type
.nr_attr
);
1639 tracer_print_string((const char *)(uintptr_t) item
->u
.side_dynamic
.side_string
.value
,
1640 item
->u
.side_dynamic
.side_string
.type
.unit_size
,
1641 item
->u
.side_dynamic
.side_string
.type
.byte_order
, NULL
);
1644 /* Dynamic compound types */
1645 case SIDE_TYPE_DYNAMIC_STRUCT
:
1646 tracer_print_dynamic_struct(item
->u
.side_dynamic
.side_dynamic_struct
);
1648 case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR
:
1649 tracer_print_dynamic_struct_visitor(item
);
1651 case SIDE_TYPE_DYNAMIC_VLA
:
1652 tracer_print_dynamic_vla(item
->u
.side_dynamic
.side_dynamic_vla
);
1654 case SIDE_TYPE_DYNAMIC_VLA_VISITOR
:
1655 tracer_print_dynamic_vla_visitor(item
);
1658 fprintf(stderr
, "<UNKNOWN TYPE>\n");
1665 void tracer_print_static_fields(const struct side_event_description
*desc
,
1666 const struct side_arg_vec
*side_arg_vec
,
1669 const struct side_arg
*sav
= side_arg_vec
->sav
;
1670 uint32_t i
, side_sav_len
= side_arg_vec
->len
;
1672 printf("provider: %s, event: %s", desc
->provider_name
, desc
->event_name
);
1673 if (desc
->nr_fields
!= side_sav_len
) {
1674 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments\n");
1677 print_attributes(", attr", ":", desc
->attr
, desc
->nr_attr
);
1678 printf("%s", side_sav_len
? ", fields: [ " : "");
1679 for (i
= 0; i
< side_sav_len
; i
++) {
1680 printf("%s", i
? ", " : "");
1681 tracer_print_field(&desc
->fields
[i
], &sav
[i
]);
1690 void tracer_call(const struct side_event_description
*desc
,
1691 const struct side_arg_vec
*side_arg_vec
,
1692 void *priv
__attribute__((unused
)))
1694 uint32_t nr_fields
= 0;
1696 tracer_print_static_fields(desc
, side_arg_vec
, &nr_fields
);
1701 void tracer_call_variadic(const struct side_event_description
*desc
,
1702 const struct side_arg_vec
*side_arg_vec
,
1703 const struct side_arg_dynamic_struct
*var_struct
,
1704 void *priv
__attribute__((unused
)))
1706 uint32_t nr_fields
= 0, i
, var_struct_len
= var_struct
->len
;
1708 tracer_print_static_fields(desc
, side_arg_vec
, &nr_fields
);
1710 if (side_unlikely(!(desc
->flags
& SIDE_EVENT_FLAG_VARIADIC
))) {
1711 fprintf(stderr
, "ERROR: unexpected non-variadic event description\n");
1714 print_attributes(", attr ", "::", var_struct
->attr
, var_struct
->nr_attr
);
1715 printf("%s", var_struct_len
? ", fields:: [ " : "");
1716 for (i
= 0; i
< var_struct_len
; i
++, nr_fields
++) {
1717 printf("%s", i
? ", " : "");
1718 printf("%s:: ", var_struct
->fields
[i
].field_name
);
1719 tracer_print_dynamic(&var_struct
->fields
[i
].elem
);
1727 void tracer_event_notification(enum side_tracer_notification notif
,
1728 struct side_event_description
**events
, uint32_t nr_events
,
1729 void *priv
__attribute__((unused
)))
1734 printf("----------------------------------------------------------\n");
1735 printf("Tracer notified of events %s\n",
1736 notif
== SIDE_TRACER_NOTIFICATION_INSERT_EVENTS
? "inserted" : "removed");
1737 for (i
= 0; i
< nr_events
; i
++) {
1738 struct side_event_description
*event
= events
[i
];
1740 /* Skip NULL pointers */
1743 printf("provider: %s, event: %s\n",
1744 event
->provider_name
, event
->event_name
);
1745 if (notif
== SIDE_TRACER_NOTIFICATION_INSERT_EVENTS
) {
1746 if (event
->flags
& SIDE_EVENT_FLAG_VARIADIC
) {
1747 ret
= side_tracer_callback_variadic_register(event
, tracer_call_variadic
, NULL
);
1751 ret
= side_tracer_callback_register(event
, tracer_call
, NULL
);
1756 if (event
->flags
& SIDE_EVENT_FLAG_VARIADIC
) {
1757 ret
= side_tracer_callback_variadic_unregister(event
, tracer_call_variadic
, NULL
);
1761 ret
= side_tracer_callback_unregister(event
, tracer_call
, NULL
);
1767 printf("----------------------------------------------------------\n");
1770 static __attribute__((constructor
))
1771 void tracer_init(void);
1773 void tracer_init(void)
1775 tracer_handle
= side_tracer_event_notification_register(tracer_event_notification
, NULL
);
1780 static __attribute__((destructor
))
1781 void tracer_exit(void);
1783 void tracer_exit(void)
1785 side_tracer_event_notification_unregister(tracer_handle
);