1 // SPDX-License-Identifier: MIT
3 * Copyright 2022 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
12 #include <side/trace.h>
14 static struct side_tracer_handle
*tracer_handle
;
17 void tracer_print_struct(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
19 void tracer_print_array(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
21 void tracer_print_vla(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
);
23 void tracer_print_vla_visitor(const struct side_type_description
*type_desc
, void *app_ctx
);
25 void tracer_print_array_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
27 void tracer_print_vla_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
29 void tracer_print_dynamic(const struct side_arg_dynamic_vec
*dynamic_item
);
31 void tracer_print_type(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
);
34 void tracer_print_attr_type(const char *separator
, const struct side_attr
*attr
)
36 printf("{ key%s \"%s\", value%s ", separator
, attr
->key
, separator
);
37 switch (attr
->value
.type
) {
38 case SIDE_ATTR_TYPE_BOOL
:
39 printf("%s", attr
->value
.u
.side_bool
? "true" : "false");
41 case SIDE_ATTR_TYPE_U8
:
42 printf("%" PRIu8
, attr
->value
.u
.side_u8
);
44 case SIDE_ATTR_TYPE_U16
:
45 printf("%" PRIu16
, attr
->value
.u
.side_u16
);
47 case SIDE_ATTR_TYPE_U32
:
48 printf("%" PRIu32
, attr
->value
.u
.side_u32
);
50 case SIDE_ATTR_TYPE_U64
:
51 printf("%" PRIu64
, attr
->value
.u
.side_u64
);
53 case SIDE_ATTR_TYPE_S8
:
54 printf("%" PRId8
, attr
->value
.u
.side_s8
);
56 case SIDE_ATTR_TYPE_S16
:
57 printf("%" PRId16
, attr
->value
.u
.side_s16
);
59 case SIDE_ATTR_TYPE_S32
:
60 printf("%" PRId32
, attr
->value
.u
.side_s32
);
62 case SIDE_ATTR_TYPE_S64
:
63 printf("%" PRId64
, attr
->value
.u
.side_s64
);
65 case SIDE_ATTR_TYPE_FLOAT_BINARY16
:
67 printf("%g", (double) attr
->value
.u
.side_float_binary16
);
70 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
73 case SIDE_ATTR_TYPE_FLOAT_BINARY32
:
75 printf("%g", (double) attr
->value
.u
.side_float_binary32
);
78 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
81 case SIDE_ATTR_TYPE_FLOAT_BINARY64
:
83 printf("%g", (double) attr
->value
.u
.side_float_binary64
);
86 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
89 case SIDE_ATTR_TYPE_FLOAT_BINARY128
:
91 printf("%Lg", (long double) attr
->value
.u
.side_float_binary128
);
94 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
97 case SIDE_ATTR_TYPE_STRING
:
98 printf("\"%s\"", attr
->value
.u
.string
);
101 fprintf(stderr
, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
108 void print_attributes(const char *prefix_str
, const char *separator
,
109 const struct side_attr
*attr
, uint32_t nr_attr
)
115 printf("%s%s [ ", prefix_str
, separator
);
116 for (i
= 0; i
< nr_attr
; i
++) {
117 printf("%s", i
? ", " : "");
118 tracer_print_attr_type(separator
, &attr
[i
]);
124 void print_enum(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
126 const struct side_enum_mappings
*mappings
= type_desc
->u
.side_enum
.mappings
;
127 int i
, print_count
= 0;
130 if (type_desc
->u
.side_enum
.elem_type
->type
!= item
->type
) {
131 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
134 switch (item
->type
) {
136 value
= (int64_t) item
->u
.side_u8
;
139 value
= (int64_t) item
->u
.side_u16
;
142 value
= (int64_t) item
->u
.side_u32
;
145 value
= (int64_t) item
->u
.side_u64
;
148 value
= (int64_t) item
->u
.side_s8
;
151 value
= (int64_t) item
->u
.side_s16
;
154 value
= (int64_t) item
->u
.side_s32
;
157 value
= (int64_t) item
->u
.side_s64
;
160 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
163 print_attributes("attr", ":", mappings
->attr
, mappings
->nr_attr
);
164 printf("%s", mappings
->nr_attr
? ", " : "");
165 tracer_print_type(type_desc
->u
.side_enum
.elem_type
, item
);
166 printf(", labels: [ ");
167 for (i
= 0; i
< mappings
->nr_mappings
; i
++) {
168 const struct side_enum_mapping
*mapping
= &mappings
->mappings
[i
];
170 if (mapping
->range_end
< mapping
->range_begin
) {
171 fprintf(stderr
, "ERROR: Unexpected enum range: %" PRIu64
"-%" PRIu64
"\n",
172 mapping
->range_begin
, mapping
->range_end
);
175 if (value
>= mapping
->range_begin
&& value
<= mapping
->range_end
) {
176 printf("%s", print_count
++ ? ", " : "");
177 printf("\"%s\"", mapping
->label
);
181 printf("<NO LABEL>");
186 uint32_t enum_elem_type_to_stride(const struct side_type_description
*elem_type
)
190 switch (elem_type
->type
) {
191 case SIDE_TYPE_U8
: /* Fall-through */
205 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
212 void print_enum_bitmap(const struct side_type_description
*type_desc
,
213 const struct side_arg_vec
*item
)
215 const struct side_type_description
*elem_type
= type_desc
->u
.side_enum_bitmap
.elem_type
;
216 const struct side_enum_bitmap_mappings
*side_enum_mappings
= type_desc
->u
.side_enum_bitmap
.mappings
;
217 int i
, print_count
= 0;
218 uint32_t stride_bit
, nr_items
;
219 const struct side_arg_vec
*array_item
;
221 switch (elem_type
->type
) {
222 case SIDE_TYPE_U8
: /* Fall-through */
223 case SIDE_TYPE_BYTE
: /* Fall-through */
224 case SIDE_TYPE_U16
: /* Fall-through */
225 case SIDE_TYPE_U32
: /* Fall-through */
227 stride_bit
= enum_elem_type_to_stride(elem_type
);
231 case SIDE_TYPE_ARRAY
:
232 stride_bit
= enum_elem_type_to_stride(elem_type
->u
.side_array
.elem_type
);
233 array_item
= item
->u
.side_array
->sav
;
234 nr_items
= type_desc
->u
.side_array
.length
;
237 stride_bit
= enum_elem_type_to_stride(elem_type
->u
.side_vla
.elem_type
);
238 array_item
= item
->u
.side_vla
->sav
;
239 nr_items
= item
->u
.side_vla
->len
;
242 fprintf(stderr
, "ERROR: Unexpected enum element type\n");
246 print_attributes("attr", ":", side_enum_mappings
->attr
, side_enum_mappings
->nr_attr
);
247 printf("%s", side_enum_mappings
->nr_attr
? ", " : "");
248 printf("labels: [ ");
249 for (i
= 0; i
< side_enum_mappings
->nr_mappings
; i
++) {
250 const struct side_enum_bitmap_mapping
*mapping
= &side_enum_mappings
->mappings
[i
];
254 if (mapping
->range_end
< mapping
->range_begin
) {
255 fprintf(stderr
, "ERROR: Unexpected enum bitmap range: %" PRIu64
"-%" PRIu64
"\n",
256 mapping
->range_begin
, mapping
->range_end
);
259 for (bit
= mapping
->range_begin
; bit
<= mapping
->range_end
; bit
++) {
260 if (bit
> (nr_items
* stride_bit
) - 1)
262 switch (stride_bit
) {
265 uint8_t v
= array_item
[bit
/ 8].u
.side_u8
;
266 if (v
& (1ULL << (bit
% 8))) {
274 uint16_t v
= array_item
[bit
/ 16].u
.side_u16
;
275 if (v
& (1ULL << (bit
% 16))) {
283 uint32_t v
= array_item
[bit
/ 32].u
.side_u32
;
284 if (v
& (1ULL << (bit
% 32))) {
292 uint64_t v
= array_item
[bit
/ 64].u
.side_u64
;
293 if (v
& (1ULL << (bit
% 64))) {
305 printf("%s", print_count
++ ? ", " : "");
306 printf("\"%s\"", mapping
->label
);
310 printf("<NO LABEL>");
315 void tracer_print_basic_type_header(const struct side_type_description
*type_desc
)
317 print_attributes("attr", ":", type_desc
->u
.side_basic
.attr
, type_desc
->u
.side_basic
.nr_attr
);
318 printf("%s", type_desc
->u
.side_basic
.nr_attr
? ", " : "");
323 void tracer_print_type(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
327 switch (type_desc
->type
) {
328 case SIDE_TYPE_ARRAY
:
329 switch (item
->type
) {
330 case SIDE_TYPE_ARRAY_U8
:
331 case SIDE_TYPE_ARRAY_U16
:
332 case SIDE_TYPE_ARRAY_U32
:
333 case SIDE_TYPE_ARRAY_U64
:
334 case SIDE_TYPE_ARRAY_S8
:
335 case SIDE_TYPE_ARRAY_S16
:
336 case SIDE_TYPE_ARRAY_S32
:
337 case SIDE_TYPE_ARRAY_S64
:
338 case SIDE_TYPE_ARRAY_BYTE
:
339 case SIDE_TYPE_ARRAY
:
342 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
349 switch (item
->type
) {
350 case SIDE_TYPE_VLA_U8
:
351 case SIDE_TYPE_VLA_U16
:
352 case SIDE_TYPE_VLA_U32
:
353 case SIDE_TYPE_VLA_U64
:
354 case SIDE_TYPE_VLA_S8
:
355 case SIDE_TYPE_VLA_S16
:
356 case SIDE_TYPE_VLA_S32
:
357 case SIDE_TYPE_VLA_S64
:
358 case SIDE_TYPE_VLA_BYTE
:
362 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
369 switch (item
->type
) {
380 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
386 case SIDE_TYPE_ENUM_BITMAP
:
387 switch (item
->type
) {
393 case SIDE_TYPE_ARRAY
:
397 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
404 if (type_desc
->type
!= item
->type
) {
405 fprintf(stderr
, "ERROR: type mismatch between description and arguments\n");
411 if (type_desc
->type
== SIDE_TYPE_ENUM
|| type_desc
->type
== SIDE_TYPE_ENUM_BITMAP
)
412 type
= type_desc
->type
;
419 tracer_print_basic_type_header(type_desc
);
420 printf("%s", item
->u
.side_bool
? "true" : "false");
423 tracer_print_basic_type_header(type_desc
);
424 printf("%" PRIu8
, item
->u
.side_u8
);
427 tracer_print_basic_type_header(type_desc
);
428 printf("%" PRIu16
, item
->u
.side_u16
);
431 tracer_print_basic_type_header(type_desc
);
432 printf("%" PRIu32
, item
->u
.side_u32
);
435 tracer_print_basic_type_header(type_desc
);
436 printf("%" PRIu64
, item
->u
.side_u64
);
439 tracer_print_basic_type_header(type_desc
);
440 printf("%" PRId8
, item
->u
.side_s8
);
443 tracer_print_basic_type_header(type_desc
);
444 printf("%" PRId16
, item
->u
.side_s16
);
447 tracer_print_basic_type_header(type_desc
);
448 printf("%" PRId32
, item
->u
.side_s32
);
451 tracer_print_basic_type_header(type_desc
);
452 printf("%" PRId64
, item
->u
.side_s64
);
455 tracer_print_basic_type_header(type_desc
);
456 printf("0x%" PRIx8
, item
->u
.side_byte
);
460 print_enum(type_desc
, item
);
463 case SIDE_TYPE_ENUM_BITMAP
:
464 print_enum_bitmap(type_desc
, item
);
467 case SIDE_TYPE_FLOAT_BINARY16
:
468 tracer_print_basic_type_header(type_desc
);
470 printf("%g", (double) item
->u
.side_float_binary16
);
473 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
476 case SIDE_TYPE_FLOAT_BINARY32
:
477 tracer_print_basic_type_header(type_desc
);
479 printf("%g", (double) item
->u
.side_float_binary32
);
482 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
485 case SIDE_TYPE_FLOAT_BINARY64
:
486 tracer_print_basic_type_header(type_desc
);
488 printf("%g", (double) item
->u
.side_float_binary64
);
491 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
494 case SIDE_TYPE_FLOAT_BINARY128
:
495 tracer_print_basic_type_header(type_desc
);
497 printf("%Lg", (long double) item
->u
.side_float_binary128
);
500 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
503 case SIDE_TYPE_STRING
:
504 tracer_print_basic_type_header(type_desc
);
505 printf("\"%s\"", item
->u
.string
);
507 case SIDE_TYPE_STRUCT
:
508 tracer_print_struct(type_desc
, item
->u
.side_struct
);
510 case SIDE_TYPE_ARRAY
:
511 tracer_print_array(type_desc
, item
->u
.side_array
);
514 tracer_print_vla(type_desc
, item
->u
.side_vla
);
516 case SIDE_TYPE_VLA_VISITOR
:
517 tracer_print_vla_visitor(type_desc
, item
->u
.side_vla_app_visitor_ctx
);
519 case SIDE_TYPE_ARRAY_U8
:
520 case SIDE_TYPE_ARRAY_U16
:
521 case SIDE_TYPE_ARRAY_U32
:
522 case SIDE_TYPE_ARRAY_U64
:
523 case SIDE_TYPE_ARRAY_S8
:
524 case SIDE_TYPE_ARRAY_S16
:
525 case SIDE_TYPE_ARRAY_S32
:
526 case SIDE_TYPE_ARRAY_S64
:
527 case SIDE_TYPE_ARRAY_BYTE
:
528 tracer_print_array_fixint(type_desc
, item
);
530 case SIDE_TYPE_VLA_U8
:
531 case SIDE_TYPE_VLA_U16
:
532 case SIDE_TYPE_VLA_U32
:
533 case SIDE_TYPE_VLA_U64
:
534 case SIDE_TYPE_VLA_S8
:
535 case SIDE_TYPE_VLA_S16
:
536 case SIDE_TYPE_VLA_S32
:
537 case SIDE_TYPE_VLA_S64
:
538 case SIDE_TYPE_VLA_BYTE
:
539 tracer_print_vla_fixint(type_desc
, item
);
541 case SIDE_TYPE_DYNAMIC
:
542 tracer_print_basic_type_header(type_desc
);
543 tracer_print_dynamic(&item
->u
.dynamic
);
546 fprintf(stderr
, "<UNKNOWN TYPE>");
553 void tracer_print_field(const struct side_event_field
*item_desc
, const struct side_arg_vec
*item
)
555 printf("%s: ", item_desc
->field_name
);
556 tracer_print_type(&item_desc
->side_type
, item
);
560 void tracer_print_struct(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
562 const struct side_arg_vec
*sav
= sav_desc
->sav
;
563 uint32_t side_sav_len
= sav_desc
->len
;
566 if (type_desc
->u
.side_struct
->nr_fields
!= side_sav_len
) {
567 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments of structure\n");
570 print_attributes("attr", ":", type_desc
->u
.side_struct
->attr
, type_desc
->u
.side_struct
->nr_attr
);
571 printf("%s", type_desc
->u
.side_struct
->nr_attr
? ", " : "");
572 printf("fields: { ");
573 for (i
= 0; i
< side_sav_len
; i
++) {
574 printf("%s", i
? ", " : "");
575 tracer_print_field(&type_desc
->u
.side_struct
->fields
[i
], &sav
[i
]);
581 void tracer_print_array(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
583 const struct side_arg_vec
*sav
= sav_desc
->sav
;
584 uint32_t side_sav_len
= sav_desc
->len
;
587 if (type_desc
->u
.side_array
.length
!= side_sav_len
) {
588 fprintf(stderr
, "ERROR: length mismatch between description and arguments of array\n");
591 print_attributes("attr", ":", type_desc
->u
.side_array
.attr
, type_desc
->u
.side_array
.nr_attr
);
592 printf("%s", type_desc
->u
.side_array
.nr_attr
? ", " : "");
593 printf("elements: ");
595 for (i
= 0; i
< side_sav_len
; i
++) {
596 printf("%s", i
? ", " : "");
597 tracer_print_type(type_desc
->u
.side_array
.elem_type
, &sav
[i
]);
603 void tracer_print_vla(const struct side_type_description
*type_desc
, const struct side_arg_vec_description
*sav_desc
)
605 const struct side_arg_vec
*sav
= sav_desc
->sav
;
606 uint32_t side_sav_len
= sav_desc
->len
;
609 print_attributes("attr", ":", type_desc
->u
.side_vla
.attr
, type_desc
->u
.side_vla
.nr_attr
);
610 printf("%s", type_desc
->u
.side_vla
.nr_attr
? ", " : "");
611 printf("elements: ");
613 for (i
= 0; i
< side_sav_len
; i
++) {
614 printf("%s", i
? ", " : "");
615 tracer_print_type(type_desc
->u
.side_vla
.elem_type
, &sav
[i
]);
620 struct tracer_visitor_priv
{
621 const struct side_type_description
*elem_type
;
626 enum side_visitor_status
tracer_write_elem_cb(const struct side_tracer_visitor_ctx
*tracer_ctx
,
627 const struct side_arg_vec
*elem
)
629 struct tracer_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
631 printf("%s", tracer_priv
->i
++ ? ", " : "");
632 tracer_print_type(tracer_priv
->elem_type
, elem
);
633 return SIDE_VISITOR_STATUS_OK
;
637 void tracer_print_vla_visitor(const struct side_type_description
*type_desc
, void *app_ctx
)
639 enum side_visitor_status status
;
640 struct tracer_visitor_priv tracer_priv
= {
641 .elem_type
= type_desc
->u
.side_vla_visitor
.elem_type
,
644 const struct side_tracer_visitor_ctx tracer_ctx
= {
645 .write_elem
= tracer_write_elem_cb
,
646 .priv
= &tracer_priv
,
649 print_attributes("attr", ":", type_desc
->u
.side_vla_visitor
.attr
, type_desc
->u
.side_vla_visitor
.nr_attr
);
650 printf("%s", type_desc
->u
.side_vla_visitor
.nr_attr
? ", " : "");
651 printf("elements: ");
653 status
= type_desc
->u
.side_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
655 case SIDE_VISITOR_STATUS_OK
:
657 case SIDE_VISITOR_STATUS_ERROR
:
658 fprintf(stderr
, "ERROR: Visitor error\n");
664 void tracer_print_array_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
666 const struct side_type_description
*elem_type
= type_desc
->u
.side_array
.elem_type
;
667 uint32_t side_sav_len
= type_desc
->u
.side_array
.length
;
668 void *p
= item
->u
.side_array_fixint
;
669 enum side_type side_type
;
672 print_attributes("attr", ":", type_desc
->u
.side_array
.attr
, type_desc
->u
.side_array
.nr_attr
);
673 printf("%s", type_desc
->u
.side_array
.nr_attr
? ", " : "");
674 printf("elements: ");
675 switch (item
->type
) {
676 case SIDE_TYPE_ARRAY_U8
:
677 if (elem_type
->type
!= SIDE_TYPE_U8
)
680 case SIDE_TYPE_ARRAY_U16
:
681 if (elem_type
->type
!= SIDE_TYPE_U16
)
684 case SIDE_TYPE_ARRAY_U32
:
685 if (elem_type
->type
!= SIDE_TYPE_U32
)
688 case SIDE_TYPE_ARRAY_U64
:
689 if (elem_type
->type
!= SIDE_TYPE_U64
)
692 case SIDE_TYPE_ARRAY_S8
:
693 if (elem_type
->type
!= SIDE_TYPE_S8
)
696 case SIDE_TYPE_ARRAY_S16
:
697 if (elem_type
->type
!= SIDE_TYPE_S16
)
700 case SIDE_TYPE_ARRAY_S32
:
701 if (elem_type
->type
!= SIDE_TYPE_S32
)
704 case SIDE_TYPE_ARRAY_S64
:
705 if (elem_type
->type
!= SIDE_TYPE_S64
)
708 case SIDE_TYPE_ARRAY_BYTE
:
709 if (elem_type
->type
!= SIDE_TYPE_BYTE
)
715 side_type
= elem_type
->type
;
718 for (i
= 0; i
< side_sav_len
; i
++) {
719 struct side_arg_vec sav_elem
= {
725 sav_elem
.u
.side_u8
= ((const uint8_t *) p
)[i
];
728 sav_elem
.u
.side_s8
= ((const int8_t *) p
)[i
];
731 sav_elem
.u
.side_u16
= ((const uint16_t *) p
)[i
];
734 sav_elem
.u
.side_s16
= ((const int16_t *) p
)[i
];
737 sav_elem
.u
.side_u32
= ((const uint32_t *) p
)[i
];
740 sav_elem
.u
.side_s32
= ((const int32_t *) p
)[i
];
743 sav_elem
.u
.side_u64
= ((const uint64_t *) p
)[i
];
746 sav_elem
.u
.side_s64
= ((const int64_t *) p
)[i
];
749 sav_elem
.u
.side_byte
= ((const uint8_t *) p
)[i
];
753 fprintf(stderr
, "ERROR: Unexpected type\n");
757 printf("%s", i
? ", " : "");
758 tracer_print_type(elem_type
, &sav_elem
);
764 fprintf(stderr
, "ERROR: type mismatch\n");
768 void tracer_print_vla_fixint(const struct side_type_description
*type_desc
, const struct side_arg_vec
*item
)
770 const struct side_type_description
*elem_type
= type_desc
->u
.side_vla
.elem_type
;
771 uint32_t side_sav_len
= item
->u
.side_vla_fixint
.length
;
772 void *p
= item
->u
.side_vla_fixint
.p
;
773 enum side_type side_type
;
776 print_attributes("attr", ":", type_desc
->u
.side_vla
.attr
, type_desc
->u
.side_vla
.nr_attr
);
777 printf("%s", type_desc
->u
.side_vla
.nr_attr
? ", " : "");
778 printf("elements: ");
779 switch (item
->type
) {
780 case SIDE_TYPE_VLA_U8
:
781 if (elem_type
->type
!= SIDE_TYPE_U8
)
784 case SIDE_TYPE_VLA_U16
:
785 if (elem_type
->type
!= SIDE_TYPE_U16
)
788 case SIDE_TYPE_VLA_U32
:
789 if (elem_type
->type
!= SIDE_TYPE_U32
)
792 case SIDE_TYPE_VLA_U64
:
793 if (elem_type
->type
!= SIDE_TYPE_U64
)
796 case SIDE_TYPE_VLA_S8
:
797 if (elem_type
->type
!= SIDE_TYPE_S8
)
800 case SIDE_TYPE_VLA_S16
:
801 if (elem_type
->type
!= SIDE_TYPE_S16
)
804 case SIDE_TYPE_VLA_S32
:
805 if (elem_type
->type
!= SIDE_TYPE_S32
)
808 case SIDE_TYPE_VLA_S64
:
809 if (elem_type
->type
!= SIDE_TYPE_S64
)
812 case SIDE_TYPE_VLA_BYTE
:
813 if (elem_type
->type
!= SIDE_TYPE_BYTE
)
819 side_type
= elem_type
->type
;
822 for (i
= 0; i
< side_sav_len
; i
++) {
823 struct side_arg_vec sav_elem
= {
829 sav_elem
.u
.side_u8
= ((const uint8_t *) p
)[i
];
832 sav_elem
.u
.side_s8
= ((const int8_t *) p
)[i
];
835 sav_elem
.u
.side_u16
= ((const uint16_t *) p
)[i
];
838 sav_elem
.u
.side_s16
= ((const int16_t *) p
)[i
];
841 sav_elem
.u
.side_u32
= ((const uint32_t *) p
)[i
];
844 sav_elem
.u
.side_s32
= ((const int32_t *) p
)[i
];
847 sav_elem
.u
.side_u64
= ((const uint64_t *) p
)[i
];
850 sav_elem
.u
.side_s64
= ((const int64_t *) p
)[i
];
853 sav_elem
.u
.side_byte
= ((const uint8_t *) p
)[i
];
857 fprintf(stderr
, "ERROR: Unexpected type\n");
861 printf("%s", i
? ", " : "");
862 tracer_print_type(elem_type
, &sav_elem
);
868 fprintf(stderr
, "ERROR: type mismatch\n");
873 void tracer_print_dynamic_struct(const struct side_arg_dynamic_event_struct
*dynamic_struct
)
875 const struct side_arg_dynamic_event_field
*fields
= dynamic_struct
->fields
;
876 uint32_t len
= dynamic_struct
->len
;
879 print_attributes("attr", "::", dynamic_struct
->attr
, dynamic_struct
->nr_attr
);
880 printf("%s", dynamic_struct
->nr_attr
? ", " : "");
883 for (i
= 0; i
< len
; i
++) {
884 printf("%s", i
? ", " : "");
885 printf("%s:: ", fields
[i
].field_name
);
886 tracer_print_dynamic(&fields
[i
].elem
);
891 struct tracer_dynamic_struct_visitor_priv
{
896 enum side_visitor_status
tracer_dynamic_struct_write_elem_cb(
897 const struct side_tracer_dynamic_struct_visitor_ctx
*tracer_ctx
,
898 const struct side_arg_dynamic_event_field
*dynamic_field
)
900 struct tracer_dynamic_struct_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
902 printf("%s", tracer_priv
->i
++ ? ", " : "");
903 printf("%s:: ", dynamic_field
->field_name
);
904 tracer_print_dynamic(&dynamic_field
->elem
);
905 return SIDE_VISITOR_STATUS_OK
;
909 void tracer_print_dynamic_struct_visitor(const struct side_arg_dynamic_vec
*item
)
911 enum side_visitor_status status
;
912 struct tracer_dynamic_struct_visitor_priv tracer_priv
= {
915 const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx
= {
916 .write_field
= tracer_dynamic_struct_write_elem_cb
,
917 .priv
= &tracer_priv
,
919 void *app_ctx
= item
->u
.side_dynamic_struct_visitor
.app_ctx
;
921 print_attributes("attr", "::", item
->u
.side_dynamic_struct_visitor
.attr
, item
->u
.side_dynamic_struct_visitor
.nr_attr
);
922 printf("%s", item
->u
.side_dynamic_struct_visitor
.nr_attr
? ", " : "");
925 status
= item
->u
.side_dynamic_struct_visitor
.visitor(&tracer_ctx
, app_ctx
);
927 case SIDE_VISITOR_STATUS_OK
:
929 case SIDE_VISITOR_STATUS_ERROR
:
930 fprintf(stderr
, "ERROR: Visitor error\n");
937 void tracer_print_dynamic_vla(const struct side_arg_dynamic_vec_vla
*vla
)
939 const struct side_arg_dynamic_vec
*sav
= vla
->sav
;
940 uint32_t side_sav_len
= vla
->len
;
943 print_attributes("attr", "::", vla
->attr
, vla
->nr_attr
);
944 printf("%s", vla
->nr_attr
? ", " : "");
945 printf("elements:: ");
947 for (i
= 0; i
< side_sav_len
; i
++) {
948 printf("%s", i
? ", " : "");
949 tracer_print_dynamic(&sav
[i
]);
954 struct tracer_dynamic_vla_visitor_priv
{
959 enum side_visitor_status
tracer_dynamic_vla_write_elem_cb(
960 const struct side_tracer_dynamic_vla_visitor_ctx
*tracer_ctx
,
961 const struct side_arg_dynamic_vec
*elem
)
963 struct tracer_dynamic_vla_visitor_priv
*tracer_priv
= tracer_ctx
->priv
;
965 printf("%s", tracer_priv
->i
++ ? ", " : "");
966 tracer_print_dynamic(elem
);
967 return SIDE_VISITOR_STATUS_OK
;
971 void tracer_print_dynamic_vla_visitor(const struct side_arg_dynamic_vec
*item
)
973 enum side_visitor_status status
;
974 struct tracer_dynamic_vla_visitor_priv tracer_priv
= {
977 const struct side_tracer_dynamic_vla_visitor_ctx tracer_ctx
= {
978 .write_elem
= tracer_dynamic_vla_write_elem_cb
,
979 .priv
= &tracer_priv
,
981 void *app_ctx
= item
->u
.side_dynamic_vla_visitor
.app_ctx
;
983 print_attributes("attr", "::", item
->u
.side_dynamic_vla_visitor
.attr
, item
->u
.side_dynamic_vla_visitor
.nr_attr
);
984 printf("%s", item
->u
.side_dynamic_vla_visitor
.nr_attr
? ", " : "");
985 printf("elements:: ");
987 status
= item
->u
.side_dynamic_vla_visitor
.visitor(&tracer_ctx
, app_ctx
);
989 case SIDE_VISITOR_STATUS_OK
:
991 case SIDE_VISITOR_STATUS_ERROR
:
992 fprintf(stderr
, "ERROR: Visitor error\n");
999 void tracer_print_dynamic_basic_type_header(const struct side_arg_dynamic_vec
*item
)
1001 print_attributes("attr", "::", item
->u
.side_basic
.attr
, item
->u
.side_basic
.nr_attr
);
1002 printf("%s", item
->u
.side_basic
.nr_attr
? ", " : "");
1007 void tracer_print_dynamic(const struct side_arg_dynamic_vec
*item
)
1010 switch (item
->dynamic_type
) {
1011 case SIDE_DYNAMIC_TYPE_NULL
:
1012 tracer_print_dynamic_basic_type_header(item
);
1013 printf("<NULL TYPE>");
1015 case SIDE_DYNAMIC_TYPE_BOOL
:
1016 tracer_print_dynamic_basic_type_header(item
);
1017 printf("%s", item
->u
.side_basic
.u
.side_bool
? "true" : "false");
1019 case SIDE_DYNAMIC_TYPE_U8
:
1020 tracer_print_dynamic_basic_type_header(item
);
1021 printf("%" PRIu8
, item
->u
.side_basic
.u
.side_u8
);
1023 case SIDE_DYNAMIC_TYPE_U16
:
1024 tracer_print_dynamic_basic_type_header(item
);
1025 printf("%" PRIu16
, item
->u
.side_basic
.u
.side_u16
);
1027 case SIDE_DYNAMIC_TYPE_U32
:
1028 tracer_print_dynamic_basic_type_header(item
);
1029 printf("%" PRIu32
, item
->u
.side_basic
.u
.side_u32
);
1031 case SIDE_DYNAMIC_TYPE_U64
:
1032 tracer_print_dynamic_basic_type_header(item
);
1033 printf("%" PRIu64
, item
->u
.side_basic
.u
.side_u64
);
1035 case SIDE_DYNAMIC_TYPE_S8
:
1036 tracer_print_dynamic_basic_type_header(item
);
1037 printf("%" PRId8
, item
->u
.side_basic
.u
.side_s8
);
1039 case SIDE_DYNAMIC_TYPE_S16
:
1040 tracer_print_dynamic_basic_type_header(item
);
1041 printf("%" PRId16
, item
->u
.side_basic
.u
.side_s16
);
1043 case SIDE_DYNAMIC_TYPE_S32
:
1044 tracer_print_dynamic_basic_type_header(item
);
1045 printf("%" PRId32
, item
->u
.side_basic
.u
.side_s32
);
1047 case SIDE_DYNAMIC_TYPE_S64
:
1048 tracer_print_dynamic_basic_type_header(item
);
1049 printf("%" PRId64
, item
->u
.side_basic
.u
.side_s64
);
1051 case SIDE_DYNAMIC_TYPE_BYTE
:
1052 tracer_print_dynamic_basic_type_header(item
);
1053 printf("0x%" PRIx8
, item
->u
.side_basic
.u
.side_byte
);
1056 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY16
:
1057 tracer_print_dynamic_basic_type_header(item
);
1059 printf("%g", (double) item
->u
.side_basic
.u
.side_float_binary16
);
1062 fprintf(stderr
, "ERROR: Unsupported binary16 float type\n");
1065 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY32
:
1066 tracer_print_dynamic_basic_type_header(item
);
1068 printf("%g", (double) item
->u
.side_basic
.u
.side_float_binary32
);
1071 fprintf(stderr
, "ERROR: Unsupported binary32 float type\n");
1074 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY64
:
1075 tracer_print_dynamic_basic_type_header(item
);
1077 printf("%g", (double) item
->u
.side_basic
.u
.side_float_binary64
);
1080 fprintf(stderr
, "ERROR: Unsupported binary64 float type\n");
1083 case SIDE_DYNAMIC_TYPE_FLOAT_BINARY128
:
1084 tracer_print_dynamic_basic_type_header(item
);
1086 printf("%Lg", (long double) item
->u
.side_basic
.u
.side_float_binary128
);
1089 fprintf(stderr
, "ERROR: Unsupported binary128 float type\n");
1092 case SIDE_DYNAMIC_TYPE_STRING
:
1093 tracer_print_dynamic_basic_type_header(item
);
1094 printf("\"%s\"", item
->u
.side_basic
.u
.string
);
1096 case SIDE_DYNAMIC_TYPE_STRUCT
:
1097 tracer_print_dynamic_struct(item
->u
.side_dynamic_struct
);
1099 case SIDE_DYNAMIC_TYPE_STRUCT_VISITOR
:
1100 tracer_print_dynamic_struct_visitor(item
);
1102 case SIDE_DYNAMIC_TYPE_VLA
:
1103 tracer_print_dynamic_vla(item
->u
.side_dynamic_vla
);
1105 case SIDE_DYNAMIC_TYPE_VLA_VISITOR
:
1106 tracer_print_dynamic_vla_visitor(item
);
1109 fprintf(stderr
, "<UNKNOWN TYPE>");
1116 void tracer_print_static_fields(const struct side_event_description
*desc
,
1117 const struct side_arg_vec_description
*sav_desc
,
1120 const struct side_arg_vec
*sav
= sav_desc
->sav
;
1121 uint32_t side_sav_len
= sav_desc
->len
;
1124 printf("provider: %s, event: %s", desc
->provider_name
, desc
->event_name
);
1125 if (desc
->nr_fields
!= side_sav_len
) {
1126 fprintf(stderr
, "ERROR: number of fields mismatch between description and arguments\n");
1129 print_attributes(", attr", ":", desc
->attr
, desc
->nr_attr
);
1130 printf("%s", side_sav_len
? ", fields: [ " : "");
1131 for (i
= 0; i
< side_sav_len
; i
++) {
1132 printf("%s", i
? ", " : "");
1133 tracer_print_field(&desc
->fields
[i
], &sav
[i
]);
1141 void tracer_call(const struct side_event_description
*desc
,
1142 const struct side_arg_vec_description
*sav_desc
,
1143 void *priv
__attribute__((unused
)))
1147 tracer_print_static_fields(desc
, sav_desc
, &nr_fields
);
1151 void tracer_call_variadic(const struct side_event_description
*desc
,
1152 const struct side_arg_vec_description
*sav_desc
,
1153 const struct side_arg_dynamic_event_struct
*var_struct
,
1154 void *priv
__attribute__((unused
)))
1156 uint32_t var_struct_len
= var_struct
->len
;
1157 int nr_fields
= 0, i
;
1159 tracer_print_static_fields(desc
, sav_desc
, &nr_fields
);
1161 if (side_unlikely(!(desc
->flags
& SIDE_EVENT_FLAG_VARIADIC
))) {
1162 fprintf(stderr
, "ERROR: unexpected non-variadic event description\n");
1165 print_attributes(", attr ", "::", var_struct
->attr
, var_struct
->nr_attr
);
1166 printf("%s", var_struct_len
? ", fields:: [ " : "");
1167 for (i
= 0; i
< var_struct_len
; i
++, nr_fields
++) {
1168 printf("%s", i
? ", " : "");
1169 printf("%s:: ", var_struct
->fields
[i
].field_name
);
1170 tracer_print_dynamic(&var_struct
->fields
[i
].elem
);
1177 void tracer_event_notification(enum side_tracer_notification notif
,
1178 struct side_event_description
**events
, uint32_t nr_events
, void *priv
)
1182 printf("----------------------------------------------------------\n");
1183 printf("Tracer notified of events %s\n",
1184 SIDE_TRACER_NOTIFICATION_INSERT_EVENTS
? "inserted" : "removed");
1185 for (i
= 0; i
< nr_events
; i
++) {
1186 struct side_event_description
*event
= events
[i
];
1188 /* Skip NULL pointers */
1191 printf("provider: %s, event: %s\n",
1192 event
->provider_name
, event
->event_name
);
1194 printf("----------------------------------------------------------\n");
1197 static __attribute__((constructor
))
1198 void tracer_init(void);
1200 void tracer_init(void)
1202 tracer_handle
= side_tracer_event_notification_register(tracer_event_notification
, NULL
);
1207 static __attribute__((destructor
))
1208 void tracer_exit(void);
1210 void tracer_exit(void)
1212 side_tracer_event_notification_unregister(tracer_handle
);