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