#include <stdio.h>
#include <stdbool.h>
#include <string.h>
+#include <iconv.h>
#include <side/trace.h>
+#include "visit-arg-vec.h"
+
+/* TODO: optionally print caller address. */
+static bool print_caller = false;
+
+#define MAX_NESTING 32
+
enum tracer_display_base {
TRACER_DISPLAY_BASE_2,
TRACER_DISPLAY_BASE_8,
TRACER_DISPLAY_BASE_16,
};
+union int_value {
+ uint64_t u[NR_SIDE_INTEGER128_SPLIT];
+ int64_t s[NR_SIDE_INTEGER128_SPLIT];
+};
+
+struct print_ctx {
+ int nesting; /* Keep track of nesting, useful for tabulations. */
+ int item_nr[MAX_NESTING]; /* Item number in current nesting level, useful for comma-separated lists. */
+};
+
static struct side_tracer_handle *tracer_handle;
+static uint64_t tracer_key;
+
static
-void tracer_print_struct(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
-static
-void tracer_print_sg_struct(const struct side_type_sg *type_sg, const void *_ptr);
-static
-void tracer_print_sg_integer_type(const struct side_type_sg *type_sg, const void *_ptr);
-static
-void tracer_print_sg_float_type(const struct side_type_sg *type_sg, const void *_ptr);
-static
-void tracer_print_array(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
-static
-void tracer_print_vla(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec);
-static
-void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx);
-static
-void tracer_print_array_fixint(const struct side_type *type_desc, const struct side_arg *item);
+void tracer_convert_string_to_utf8(const void *p, uint8_t unit_size, enum side_type_label_byte_order byte_order,
+ size_t *strlen_with_null,
+ char **output_str)
+{
+ size_t ret, inbytesleft = 0, outbytesleft, bufsize, input_size;
+ const char *str = p, *fromcode;
+ char *inbuf = (char *) p, *outbuf, *buf;
+ iconv_t cd;
+
+ switch (unit_size) {
+ case 1:
+ if (strlen_with_null)
+ *strlen_with_null = strlen(str) + 1;
+ *output_str = (char *) str;
+ return;
+ case 2:
+ {
+ const uint16_t *p16 = p;
+
+ switch (byte_order) {
+ case SIDE_TYPE_BYTE_ORDER_LE:
+ {
+ fromcode = "UTF-16LE";
+ break;
+ }
+ case SIDE_TYPE_BYTE_ORDER_BE:
+ {
+ fromcode = "UTF-16BE";
+ break;
+ }
+ default:
+ fprintf(stderr, "Unknown byte order\n");
+ abort();
+ }
+ for (; *p16; p16++)
+ inbytesleft += 2;
+ input_size = inbytesleft + 2;
+ /*
+ * Worse case is U+FFFF UTF-16 (2 bytes) converting to
+ * { ef, bf, bf } UTF-8 (3 bytes).
+ */
+ bufsize = inbytesleft / 2 * 3 + 1;
+ break;
+ }
+ case 4:
+ {
+ const uint32_t *p32 = p;
+
+ switch (byte_order) {
+ case SIDE_TYPE_BYTE_ORDER_LE:
+ {
+ fromcode = "UTF-32LE";
+ break;
+ }
+ case SIDE_TYPE_BYTE_ORDER_BE:
+ {
+ fromcode = "UTF-32BE";
+ break;
+ }
+ default:
+ fprintf(stderr, "Unknown byte order\n");
+ abort();
+ }
+ for (; *p32; p32++)
+ inbytesleft += 4;
+ input_size = inbytesleft + 4;
+ /*
+ * Each 4-byte UTF-32 character converts to at most a
+ * 4-byte UTF-8 character.
+ */
+ bufsize = inbytesleft + 1;
+ break;
+ }
+ default:
+ fprintf(stderr, "Unknown string unit size %" PRIu8 "\n", unit_size);
+ abort();
+ }
+
+ cd = iconv_open("UTF8", fromcode);
+ if (cd == (iconv_t) -1) {
+ perror("iconv_open");
+ abort();
+ }
+ buf = malloc(bufsize);
+ if (!buf) {
+ abort();
+ }
+ outbuf = (char *) buf;
+ outbytesleft = bufsize;
+ ret = iconv(cd, &inbuf, &inbytesleft, &outbuf, &outbytesleft);
+ if (ret == (size_t) -1) {
+ perror("iconv");
+ abort();
+ }
+ if (inbytesleft) {
+ fprintf(stderr, "Buffer too small to convert string input\n");
+ abort();
+ }
+ (*outbuf++) = '\0';
+ if (iconv_close(cd) == -1) {
+ perror("iconv_close");
+ abort();
+ }
+ if (strlen_with_null)
+ *strlen_with_null = input_size;
+ *output_str = buf;
+}
+
static
-void tracer_print_vla_fixint(const struct side_type *type_desc, const struct side_arg *item);
+void tracer_print_type_string(const void *p, uint8_t unit_size, enum side_type_label_byte_order byte_order,
+ size_t *strlen_with_null)
+{
+ char *output_str = NULL;
+
+ tracer_convert_string_to_utf8(p, unit_size, byte_order, strlen_with_null, &output_str);
+ printf("\"%s\"", output_str);
+ if (output_str != p)
+ free(output_str);
+}
+
static
-void tracer_print_dynamic(const struct side_arg *dynamic_item);
+void side_check_value_u64(union int_value v)
+{
+ if (v.u[SIDE_INTEGER128_SPLIT_HIGH]) {
+ fprintf(stderr, "Unexpected integer value\n");
+ abort();
+ }
+}
+
static
-void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item);
+void side_check_value_s64(union int_value v)
+{
+ if (v.s[SIDE_INTEGER128_SPLIT_LOW] & (1ULL << 63)) {
+ if (v.s[SIDE_INTEGER128_SPLIT_HIGH] != ~0LL) {
+ fprintf(stderr, "Unexpected integer value\n");
+ abort();
+ }
+ } else {
+ if (v.s[SIDE_INTEGER128_SPLIT_HIGH]) {
+ fprintf(stderr, "Unexpected integer value\n");
+ abort();
+ }
+ }
+}
static
-int64_t get_attr_integer_value(const struct side_attr *attr)
+int64_t get_attr_integer64_value(const struct side_attr *attr)
{
int64_t val;
- switch (attr->value.type) {
+ switch (side_enum_get(attr->value.type)) {
case SIDE_ATTR_TYPE_U8:
val = attr->value.u.integer_value.side_u8;
break;
case SIDE_ATTR_TYPE_U64:
val = attr->value.u.integer_value.side_u64;
break;
+ case SIDE_ATTR_TYPE_U128:
+ {
+ union int_value v = {
+ .u = {
+ [SIDE_INTEGER128_SPLIT_LOW] = attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_LOW],
+ [SIDE_INTEGER128_SPLIT_HIGH] = attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_HIGH],
+ },
+ };
+ side_check_value_u64(v);
+ val = v.u[SIDE_INTEGER128_SPLIT_LOW];
+ break;
+ }
case SIDE_ATTR_TYPE_S8:
val = attr->value.u.integer_value.side_s8;
break;
case SIDE_ATTR_TYPE_S64:
val = attr->value.u.integer_value.side_s64;
break;
+ case SIDE_ATTR_TYPE_S128:
+ {
+ union int_value v = {
+ .s = {
+ [SIDE_INTEGER128_SPLIT_LOW] = attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_LOW],
+ [SIDE_INTEGER128_SPLIT_HIGH] = attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_HIGH],
+ },
+ };
+ side_check_value_s64(v);
+ val = v.s[SIDE_INTEGER128_SPLIT_LOW];
+ break;
+ }
default:
fprintf(stderr, "Unexpected attribute type\n");
abort();
for (i = 0; i < nr_attr; i++) {
const struct side_attr *attr = &_attr[i];
+ char *utf8_str = NULL;
+ bool cmp;
- if (!strcmp(attr->key, "std.integer.base")) {
- int64_t val = get_attr_integer_value(attr);
+ tracer_convert_string_to_utf8(side_ptr_get(attr->key.p), attr->key.unit_size,
+ side_enum_get(attr->key.byte_order), NULL, &utf8_str);
+ cmp = strcmp(utf8_str, "std.integer.base");
+ if (utf8_str != side_ptr_get(attr->key.p))
+ free(utf8_str);
+ if (!cmp) {
+ int64_t val = get_attr_integer64_value(attr);
switch (val) {
case 2:
return default_base; /* Default */
}
-static
-bool type_to_host_reverse_bo(const struct side_type *type_desc)
-{
- switch (type_desc->type) {
- case SIDE_TYPE_U8:
- case SIDE_TYPE_S8:
- case SIDE_TYPE_BYTE:
- return false;
- case SIDE_TYPE_U16:
- case SIDE_TYPE_U32:
- case SIDE_TYPE_U64:
- case SIDE_TYPE_S16:
- case SIDE_TYPE_S32:
- case SIDE_TYPE_S64:
- case SIDE_TYPE_POINTER32:
- case SIDE_TYPE_POINTER64:
- if (type_desc->u.side_integer.byte_order != SIDE_TYPE_BYTE_ORDER_HOST)
- return true;
- else
- return false;
- break;
- case SIDE_TYPE_FLOAT_BINARY16:
- case SIDE_TYPE_FLOAT_BINARY32:
- case SIDE_TYPE_FLOAT_BINARY64:
- case SIDE_TYPE_FLOAT_BINARY128:
- if (type_desc->u.side_float.byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST)
- return true;
- else
- return false;
- break;
- default:
- fprintf(stderr, "Unexpected type\n");
- abort();
- }
-}
-
static
void tracer_print_attr_type(const char *separator, const struct side_attr *attr)
{
- printf("{ key%s \"%s\", value%s ", separator, attr->key, separator);
- switch (attr->value.type) {
+ char *utf8_str = NULL;
+
+ tracer_convert_string_to_utf8(side_ptr_get(attr->key.p), attr->key.unit_size,
+ side_enum_get(attr->key.byte_order), NULL, &utf8_str);
+ printf("{ key%s \"%s\", value%s ", separator, utf8_str, separator);
+ if (utf8_str != side_ptr_get(attr->key.p))
+ free(utf8_str);
+ switch (side_enum_get(attr->value.type)) {
case SIDE_ATTR_TYPE_BOOL:
printf("%s", attr->value.u.bool_value ? "true" : "false");
break;
case SIDE_ATTR_TYPE_U64:
printf("%" PRIu64, attr->value.u.integer_value.side_u64);
break;
+ case SIDE_ATTR_TYPE_U128:
+ if (attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_HIGH] == 0) {
+ printf("0x%" PRIx64, attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_LOW]);
+ } else {
+ printf("0x%" PRIx64 "%016" PRIx64,
+ attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_HIGH],
+ attr->value.u.integer_value.side_u128_split[SIDE_INTEGER128_SPLIT_LOW]);
+ }
+ break;
case SIDE_ATTR_TYPE_S8:
printf("%" PRId8, attr->value.u.integer_value.side_s8);
break;
case SIDE_ATTR_TYPE_S64:
printf("%" PRId64, attr->value.u.integer_value.side_s64);
break;
- case SIDE_ATTR_TYPE_POINTER32:
- printf("0x%" PRIx32, attr->value.u.integer_value.side_u32);
- break;
- case SIDE_ATTR_TYPE_POINTER64:
- printf("0x%" PRIx64, attr->value.u.integer_value.side_u64);
+ case SIDE_ATTR_TYPE_S128:
+ if (attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_HIGH] == 0) {
+ printf("0x%" PRIx64, attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_LOW]);
+ } else {
+ printf("0x%" PRIx64 "%016" PRIx64,
+ attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_HIGH],
+ attr->value.u.integer_value.side_s128_split[SIDE_INTEGER128_SPLIT_LOW]);
+ }
break;
case SIDE_ATTR_TYPE_FLOAT_BINARY16:
#if __HAVE_FLOAT16
abort();
#endif
case SIDE_ATTR_TYPE_STRING:
- printf("\"%s\"", (const char *)(uintptr_t) attr->value.u.string_value);
+ tracer_print_type_string(side_ptr_get(attr->value.u.string_value.p),
+ attr->value.u.string_value.unit_size,
+ side_enum_get(attr->value.u.string_value.byte_order), NULL);
break;
default:
fprintf(stderr, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
if (!nr_attr)
return;
- printf("%s%s [ ", prefix_str, separator);
+ printf("%s%s [", prefix_str, separator);
for (i = 0; i < nr_attr; i++) {
- printf("%s", i ? ", " : "");
+ printf("%s", i ? ", " : " ");
tracer_print_attr_type(separator, &attr[i]);
}
printf(" ]");
}
static
-void print_enum(const struct side_type *type_desc, const struct side_arg *item)
+union int_value tracer_load_integer_value(const struct side_type_integer *type_integer,
+ const union side_integer_value *value,
+ uint16_t offset_bits, uint16_t *_len_bits)
{
- const struct side_enum_mappings *mappings = type_desc->u.side_enum.mappings;
- const struct side_type *elem_type = type_desc->u.side_enum.elem_type;
- uint32_t i, print_count = 0;
- int64_t value;
+ union int_value v = {};
+ uint16_t len_bits;
+ bool reverse_bo;
- if (elem_type->type != item->type) {
- fprintf(stderr, "ERROR: Unexpected enum element type\n");
+ if (!type_integer->len_bits)
+ len_bits = type_integer->integer_size * CHAR_BIT;
+ else
+ len_bits = type_integer->len_bits;
+ if (len_bits + offset_bits > type_integer->integer_size * CHAR_BIT)
abort();
- }
- switch (item->type) {
- case SIDE_TYPE_U8:
- value = (int64_t) item->u.side_static.integer_value.side_u8;
+ reverse_bo = side_enum_get(type_integer->byte_order) != SIDE_TYPE_BYTE_ORDER_HOST;
+ switch (type_integer->integer_size) {
+ case 1:
+ if (type_integer->signedness)
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = value->side_s8;
+ else
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = value->side_u8;
break;
- case SIDE_TYPE_U16:
- {
- uint16_t v;
+ case 2:
+ if (type_integer->signedness) {
+ int16_t side_s16;
- v = item->u.side_static.integer_value.side_u16;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_16(v);
- value = (int64_t) v;
- break;
- }
- case SIDE_TYPE_U32:
- {
- uint32_t v;
+ side_s16 = value->side_s16;
+ if (reverse_bo)
+ side_s16 = side_bswap_16(side_s16);
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s16;
+ } else {
+ uint16_t side_u16;
- v = item->u.side_static.integer_value.side_u32;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_32(v);
- value = (int64_t) v;
+ side_u16 = value->side_u16;
+ if (reverse_bo)
+ side_u16 = side_bswap_16(side_u16);
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u16;
+ }
break;
- }
- case SIDE_TYPE_U64:
- {
- uint64_t v;
+ case 4:
+ if (type_integer->signedness) {
+ int32_t side_s32;
- v = item->u.side_static.integer_value.side_u64;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_64(v);
- value = (int64_t) v;
- break;
- }
- case SIDE_TYPE_S8:
- value = (int64_t) item->u.side_static.integer_value.side_s8;
- break;
- case SIDE_TYPE_S16:
- {
- int16_t v;
+ side_s32 = value->side_s32;
+ if (reverse_bo)
+ side_s32 = side_bswap_32(side_s32);
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s32;
+ } else {
+ uint32_t side_u32;
- v = item->u.side_static.integer_value.side_s16;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_16(v);
- value = (int64_t) v;
+ side_u32 = value->side_u32;
+ if (reverse_bo)
+ side_u32 = side_bswap_32(side_u32);
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u32;
+ }
break;
- }
- case SIDE_TYPE_S32:
- {
- int32_t v;
+ case 8:
+ if (type_integer->signedness) {
+ int64_t side_s64;
- v = item->u.side_static.integer_value.side_s32;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_32(v);
- value = (int64_t) v;
- break;
- }
- case SIDE_TYPE_S64:
- {
- int64_t v;
+ side_s64 = value->side_s64;
+ if (reverse_bo)
+ side_s64 = side_bswap_64(side_s64);
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s64;
+ } else {
+ uint64_t side_u64;
- v = item->u.side_static.integer_value.side_s64;
- if (type_to_host_reverse_bo(elem_type))
- v = side_bswap_64(v);
- value = v;
+ side_u64 = value->side_u64;
+ if (reverse_bo)
+ side_u64 = side_bswap_64(side_u64);
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u64;
+ }
+ break;
+ case 16:
+ if (type_integer->signedness) {
+ int64_t side_s64[NR_SIDE_INTEGER128_SPLIT];
+
+ side_s64[SIDE_INTEGER128_SPLIT_LOW] = value->side_s128_split[SIDE_INTEGER128_SPLIT_LOW];
+ side_s64[SIDE_INTEGER128_SPLIT_HIGH] = value->side_s128_split[SIDE_INTEGER128_SPLIT_HIGH];
+ if (reverse_bo) {
+ side_s64[SIDE_INTEGER128_SPLIT_LOW] = side_bswap_64(side_s64[SIDE_INTEGER128_SPLIT_LOW]);
+ side_s64[SIDE_INTEGER128_SPLIT_HIGH] = side_bswap_64(side_s64[SIDE_INTEGER128_SPLIT_HIGH]);
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s64[SIDE_INTEGER128_SPLIT_HIGH];
+ v.s[SIDE_INTEGER128_SPLIT_HIGH] = side_s64[SIDE_INTEGER128_SPLIT_LOW];
+ } else {
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s64[SIDE_INTEGER128_SPLIT_LOW];
+ v.s[SIDE_INTEGER128_SPLIT_HIGH] = side_s64[SIDE_INTEGER128_SPLIT_HIGH];
+ }
+ } else {
+ uint64_t side_u64[NR_SIDE_INTEGER128_SPLIT];
+
+ side_u64[SIDE_INTEGER128_SPLIT_LOW] = value->side_u128_split[SIDE_INTEGER128_SPLIT_LOW];
+ side_u64[SIDE_INTEGER128_SPLIT_HIGH] = value->side_u128_split[SIDE_INTEGER128_SPLIT_HIGH];
+ if (reverse_bo) {
+ side_u64[SIDE_INTEGER128_SPLIT_LOW] = side_bswap_64(side_u64[SIDE_INTEGER128_SPLIT_LOW]);
+ side_u64[SIDE_INTEGER128_SPLIT_HIGH] = side_bswap_64(side_u64[SIDE_INTEGER128_SPLIT_HIGH]);
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u64[SIDE_INTEGER128_SPLIT_HIGH];
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = side_u64[SIDE_INTEGER128_SPLIT_LOW];
+ } else {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u64[SIDE_INTEGER128_SPLIT_LOW];
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = side_u64[SIDE_INTEGER128_SPLIT_HIGH];
+ }
+ }
break;
- }
default:
- fprintf(stderr, "ERROR: Unexpected enum element type\n");
abort();
}
- print_attributes("attr", ":", mappings->attr, mappings->nr_attr);
- printf("%s", mappings->nr_attr ? ", " : "");
- tracer_print_type(type_desc->u.side_enum.elem_type, item);
+ if (type_integer->integer_size <= 8) {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] >>= offset_bits;
+ if (len_bits < 64) {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] &= (1ULL << len_bits) - 1;
+ if (type_integer->signedness) {
+ /* Sign-extend. */
+ if (v.u[SIDE_INTEGER128_SPLIT_LOW] & (1ULL << (len_bits - 1))) {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] |= ~((1ULL << len_bits) - 1);
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = ~0ULL;
+ }
+ }
+ }
+ } else {
+ //TODO: Implement 128-bit integer with len_bits != 128 or nonzero offset_bits
+ if (len_bits < 128 || offset_bits != 0)
+ abort();
+ }
+ if (_len_bits)
+ *_len_bits = len_bits;
+ return v;
+}
+
+static
+void print_enum_labels(const struct side_enum_mappings *mappings, union int_value v)
+{
+ uint32_t i, print_count = 0;
+
+ side_check_value_s64(v);
printf(", labels: [ ");
for (i = 0; i < mappings->nr_mappings; i++) {
- const struct side_enum_mapping *mapping = &mappings->mappings[i];
+ const struct side_enum_mapping *mapping = &side_ptr_get(mappings->mappings)[i];
if (mapping->range_end < mapping->range_begin) {
fprintf(stderr, "ERROR: Unexpected enum range: %" PRIu64 "-%" PRIu64 "\n",
mapping->range_begin, mapping->range_end);
abort();
}
- if (value >= mapping->range_begin && value <= mapping->range_end) {
+ if (v.s[SIDE_INTEGER128_SPLIT_LOW] >= mapping->range_begin && v.s[SIDE_INTEGER128_SPLIT_LOW] <= mapping->range_end) {
printf("%s", print_count++ ? ", " : "");
- printf("\"%s\"", mapping->label);
+ tracer_print_type_string(side_ptr_get(mapping->label.p), mapping->label.unit_size,
+ side_enum_get(mapping->label.byte_order), NULL);
}
}
if (!print_count)
}
static
-uint32_t enum_elem_type_to_stride(const struct side_type *elem_type)
+uint32_t elem_type_to_stride(const struct side_type *elem_type)
{
uint32_t stride_bit;
- switch (elem_type->type) {
- case SIDE_TYPE_U8: /* Fall-through */
+ switch (side_enum_get(elem_type->type)) {
case SIDE_TYPE_BYTE:
stride_bit = 8;
break;
+
+ case SIDE_TYPE_U8:
case SIDE_TYPE_U16:
- stride_bit = 16;
- break;
case SIDE_TYPE_U32:
- stride_bit = 32;
- break;
case SIDE_TYPE_U64:
- stride_bit = 64;
- break;
+ case SIDE_TYPE_U128:
+ case SIDE_TYPE_S8:
+ case SIDE_TYPE_S16:
+ case SIDE_TYPE_S32:
+ case SIDE_TYPE_S64:
+ case SIDE_TYPE_S128:
+ return elem_type->u.side_integer.integer_size * CHAR_BIT;
default:
- fprintf(stderr, "ERROR: Unexpected enum element type\n");
+ fprintf(stderr, "ERROR: Unexpected enum bitmap element type\n");
abort();
}
return stride_bit;
}
static
-void print_enum_bitmap(const struct side_type *type_desc,
- const struct side_arg *item)
+void print_integer_binary(uint64_t v[NR_SIDE_INTEGER128_SPLIT], int bits)
{
- const struct side_type *elem_type = type_desc->u.side_enum_bitmap.elem_type;
- const struct side_enum_bitmap_mappings *side_enum_mappings = type_desc->u.side_enum_bitmap.mappings;
- uint32_t i, print_count = 0, stride_bit, nr_items;
- bool reverse_byte_order = false;
- const struct side_arg *array_item;
+ int bit;
- switch (elem_type->type) {
- case SIDE_TYPE_U8: /* Fall-through */
- case SIDE_TYPE_BYTE: /* Fall-through */
- case SIDE_TYPE_U16: /* Fall-through */
- case SIDE_TYPE_U32: /* Fall-through */
- case SIDE_TYPE_U64:
- stride_bit = enum_elem_type_to_stride(elem_type);
- reverse_byte_order = type_to_host_reverse_bo(elem_type);
- array_item = item;
- nr_items = 1;
+ printf("0b");
+ if (bits > 64) {
+ bits -= 64;
+ v[SIDE_INTEGER128_SPLIT_HIGH] <<= 64 - bits;
+ for (bit = 0; bit < bits; bit++) {
+ printf("%c", v[SIDE_INTEGER128_SPLIT_HIGH] & (1ULL << 63) ? '1' : '0');
+ v[SIDE_INTEGER128_SPLIT_HIGH] <<= 1;
+ }
+ bits = 64;
+ }
+ v[SIDE_INTEGER128_SPLIT_LOW] <<= 64 - bits;
+ for (bit = 0; bit < bits; bit++) {
+ printf("%c", v[SIDE_INTEGER128_SPLIT_LOW] & (1ULL << 63) ? '1' : '0');
+ v[SIDE_INTEGER128_SPLIT_LOW] <<= 1;
+ }
+}
+
+static
+void tracer_print_type_header(const char *separator,
+ const struct side_attr *attr, uint32_t nr_attr)
+{
+ print_attributes("attr", separator, attr, nr_attr);
+ printf("%s", nr_attr ? ", " : "");
+ printf("value%s ", separator);
+}
+
+static
+void tracer_print_type_bool(const char *separator,
+ const struct side_type_bool *type_bool,
+ const union side_bool_value *value,
+ uint16_t offset_bits)
+{
+ uint32_t len_bits;
+ bool reverse_bo;
+ uint64_t v;
+
+ if (!type_bool->len_bits)
+ len_bits = type_bool->bool_size * CHAR_BIT;
+ else
+ len_bits = type_bool->len_bits;
+ if (len_bits + offset_bits > type_bool->bool_size * CHAR_BIT)
+ abort();
+ reverse_bo = side_enum_get(type_bool->byte_order) != SIDE_TYPE_BYTE_ORDER_HOST;
+ switch (type_bool->bool_size) {
+ case 1:
+ v = value->side_bool8;
break;
- case SIDE_TYPE_ARRAY:
- stride_bit = enum_elem_type_to_stride(elem_type->u.side_array.elem_type);
- reverse_byte_order = type_to_host_reverse_bo(elem_type->u.side_array.elem_type);
- array_item = item->u.side_static.side_array->sav;
- nr_items = type_desc->u.side_array.length;
+ case 2:
+ {
+ uint16_t side_u16;
+
+ side_u16 = value->side_bool16;
+ if (reverse_bo)
+ side_u16 = side_bswap_16(side_u16);
+ v = side_u16;
break;
- case SIDE_TYPE_VLA:
- stride_bit = enum_elem_type_to_stride(elem_type->u.side_vla.elem_type);
- reverse_byte_order = type_to_host_reverse_bo(elem_type->u.side_vla.elem_type);
- array_item = item->u.side_static.side_vla->sav;
- nr_items = item->u.side_static.side_vla->len;
+ }
+ case 4:
+ {
+ uint32_t side_u32;
+
+ side_u32 = value->side_bool32;
+ if (reverse_bo)
+ side_u32 = side_bswap_32(side_u32);
+ v = side_u32;
+ break;
+ }
+ case 8:
+ {
+ uint64_t side_u64;
+
+ side_u64 = value->side_bool64;
+ if (reverse_bo)
+ side_u64 = side_bswap_64(side_u64);
+ v = side_u64;
break;
+ }
default:
- fprintf(stderr, "ERROR: Unexpected enum element type\n");
abort();
}
+ v >>= offset_bits;
+ if (len_bits < 64)
+ v &= (1ULL << len_bits) - 1;
+ tracer_print_type_header(separator, side_ptr_get(type_bool->attr), type_bool->nr_attr);
+ printf("%s", v ? "true" : "false");
+}
- print_attributes("attr", ":", side_enum_mappings->attr, side_enum_mappings->nr_attr);
- printf("%s", side_enum_mappings->nr_attr ? ", " : "");
- printf("labels: [ ");
- for (i = 0; i < side_enum_mappings->nr_mappings; i++) {
- const struct side_enum_bitmap_mapping *mapping = &side_enum_mappings->mappings[i];
- bool match = false;
- uint64_t bit;
+/* 2^128 - 1 */
+#define U128_BASE_10_ARRAY_LEN sizeof("340282366920938463463374607431768211455")
+/* -2^127 */
+#define S128_BASE_10_ARRAY_LEN sizeof("-170141183460469231731687303715884105728")
- if (mapping->range_end < mapping->range_begin) {
- fprintf(stderr, "ERROR: Unexpected enum bitmap range: %" PRIu64 "-%" PRIu64 "\n",
- mapping->range_begin, mapping->range_end);
- abort();
- }
- for (bit = mapping->range_begin; bit <= mapping->range_end; bit++) {
- if (bit > (nr_items * stride_bit) - 1)
- break;
- switch (stride_bit) {
- case 8:
- {
- uint8_t v = array_item[bit / 8].u.side_static.integer_value.side_u8;
- if (v & (1ULL << (bit % 8))) {
- match = true;
- goto match;
- }
- break;
- }
- case 16:
- {
- uint16_t v = array_item[bit / 16].u.side_static.integer_value.side_u16;
- if (reverse_byte_order)
- v = side_bswap_16(v);
- if (v & (1ULL << (bit % 16))) {
- match = true;
- goto match;
- }
- break;
- }
- case 32:
- {
- uint32_t v = array_item[bit / 32].u.side_static.integer_value.side_u32;
- if (reverse_byte_order)
- v = side_bswap_32(v);
- if (v & (1ULL << (bit % 32))) {
- match = true;
- goto match;
- }
- break;
- }
- case 64:
- {
- uint64_t v = array_item[bit / 64].u.side_static.integer_value.side_u64;
- if (reverse_byte_order)
- v = side_bswap_64(v);
- if (v & (1ULL << (bit % 64))) {
- match = true;
- goto match;
- }
- break;
- }
- default:
- abort();
- }
+/*
+ * u128_tostring_base_10 is inspired from https://stackoverflow.com/a/4364365
+ */
+static
+void u128_tostring_base_10(union int_value v, char str[U128_BASE_10_ARRAY_LEN])
+{
+ int d[39] = {}, i, j, str_i = 0;
+
+ for (i = 63; i > -1; i--) {
+ if ((v.u[SIDE_INTEGER128_SPLIT_HIGH] >> i) & 1)
+ d[0]++;
+ for (j = 0; j < 39; j++)
+ d[j] *= 2;
+ for (j = 0; j < 38; j++) {
+ d[j + 1] += d[j] / 10;
+ d[j] %= 10;
}
-match:
- if (match) {
- printf("%s", print_count++ ? ", " : "");
- printf("\"%s\"", mapping->label);
+ }
+ for (i = 63; i > -1; i--) {
+ if ((v.u[SIDE_INTEGER128_SPLIT_LOW] >> i) & 1)
+ d[0]++;
+ if (i > 0) {
+ for (j = 0; j < 39; j++)
+ d[j] *= 2;
+ }
+ for (j = 0; j < 38; j++) {
+ d[j + 1] += d[j] / 10;
+ d[j] %= 10;
}
}
- if (!print_count)
- printf("<NO LABEL>");
- printf(" ]");
+ for (i = 38; i > 0; i--)
+ if (d[i] > 0)
+ break;
+ for (; i > -1; i--) {
+ str[str_i++] = '0' + d[i];
+ }
+ str[str_i] = '\0';
}
static
-void print_integer_binary(uint64_t v, int bits)
+void s128_tostring_base_10(union int_value v, char str[S128_BASE_10_ARRAY_LEN])
{
- int i;
+ uint64_t low, high, tmp;
- printf("0b");
- v <<= 64 - bits;
- for (i = 0; i < bits; i++) {
- printf("%c", v & (1ULL << 63) ? '1' : '0');
- v <<= 1;
+ if (v.s[SIDE_INTEGER128_SPLIT_HIGH] >= 0) {
+ /* Positive. */
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = (uint64_t) v.s[SIDE_INTEGER128_SPLIT_LOW];
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = (uint64_t) v.s[SIDE_INTEGER128_SPLIT_HIGH];
+ u128_tostring_base_10(v, str);
+ return;
}
+
+ /* Negative. */
+
+ /* Special-case minimum value, which has no positive signed representation. */
+ if ((v.s[SIDE_INTEGER128_SPLIT_HIGH] == INT64_MIN) && (v.s[SIDE_INTEGER128_SPLIT_LOW] == 0)) {
+ memcpy(str, "-170141183460469231731687303715884105728", S128_BASE_10_ARRAY_LEN);
+ return;
+ }
+ /* Convert from two's complement. */
+ high = ~(uint64_t) v.s[SIDE_INTEGER128_SPLIT_HIGH];
+ low = ~(uint64_t) v.s[SIDE_INTEGER128_SPLIT_LOW];
+ tmp = low + 1;
+ if (tmp < low) {
+ high++;
+ /* Clear overflow to sign bit. */
+ high &= ~0x8000000000000000ULL;
+ }
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = tmp;
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = high;
+ str[0] = '-';
+ u128_tostring_base_10(v, str + 1);
}
+/* 2^128 - 1 */
+#define U128_BASE_8_ARRAY_LEN sizeof("3777777777777777777777777777777777777777777")
+
static
-void tracer_print_type_header(const char *separator,
- const struct side_attr *attr, uint32_t nr_attr)
+void u128_tostring_base_8(union int_value v, char str[U128_BASE_8_ARRAY_LEN])
{
- print_attributes("attr", separator, attr, nr_attr);
- printf("%s", nr_attr ? ", " : "");
- printf("value%s ", separator);
+ int d[43] = {}, i, j, str_i = 0;
+
+ for (i = 63; i > -1; i--) {
+ if ((v.u[SIDE_INTEGER128_SPLIT_HIGH] >> i) & 1)
+ d[0]++;
+ for (j = 0; j < 43; j++)
+ d[j] *= 2;
+ for (j = 0; j < 42; j++) {
+ d[j + 1] += d[j] / 8;
+ d[j] %= 8;
+ }
+ }
+ for (i = 63; i > -1; i--) {
+ if ((v.u[SIDE_INTEGER128_SPLIT_LOW] >> i) & 1)
+ d[0]++;
+ if (i > 0) {
+ for (j = 0; j < 43; j++)
+ d[j] *= 2;
+ }
+ for (j = 0; j < 42; j++) {
+ d[j + 1] += d[j] / 8;
+ d[j] %= 8;
+ }
+ }
+ for (i = 42; i > 0; i--)
+ if (d[i] > 0)
+ break;
+ for (; i > -1; i--) {
+ str[str_i++] = '0' + d[i];
+ }
+ str[str_i] = '\0';
}
static
enum tracer_display_base default_base)
{
enum tracer_display_base base;
- bool reverse_bo;
- union {
- uint64_t v_unsigned;
- int64_t v_signed;
- } v;
-
- if (!type_integer->len_bits ||
- type_integer->len_bits + offset_bits > type_integer->integer_size_bits)
- abort();
- reverse_bo = type_integer->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
- base = get_attr_display_base(type_integer->attr,
- type_integer->nr_attr,
- default_base);
- switch (type_integer->integer_size_bits) {
- case 8:
- if (type_integer->signedness)
- v.v_signed = value->side_s8;
- else
- v.v_unsigned = value->side_u8;
- break;
- case 16:
- if (type_integer->signedness) {
- int16_t side_s16;
-
- side_s16 = value->side_s16;
- if (reverse_bo)
- side_s16 = side_bswap_16(side_s16);
- v.v_signed = side_s16;
- } else {
- uint16_t side_u16;
+ union int_value v;
+ uint16_t len_bits;
- side_u16 = value->side_u16;
- if (reverse_bo)
- side_u16 = side_bswap_16(side_u16);
- v.v_unsigned = side_u16;
- }
+ v = tracer_load_integer_value(type_integer, value, offset_bits, &len_bits);
+ tracer_print_type_header(separator, side_ptr_get(type_integer->attr), type_integer->nr_attr);
+ base = get_attr_display_base(side_ptr_get(type_integer->attr), type_integer->nr_attr, default_base);
+ switch (base) {
+ case TRACER_DISPLAY_BASE_2:
+ print_integer_binary(v.u, len_bits);
break;
- case 32:
- if (type_integer->signedness) {
- int32_t side_s32;
-
- side_s32 = value->side_s32;
- if (reverse_bo)
- side_s32 = side_bswap_32(side_s32);
- v.v_signed = side_s32;
- } else {
- uint32_t side_u32;
-
- side_u32 = value->side_u32;
- if (reverse_bo)
- side_u32 = side_bswap_32(side_u32);
- v.v_unsigned = side_u32;
+ case TRACER_DISPLAY_BASE_8:
+ /* Clear sign bits beyond len_bits */
+ if (len_bits < 64) {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] &= (1ULL << len_bits) - 1;
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = 0;
+ } else if (len_bits < 128) {
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] &= (1ULL << (len_bits - 64)) - 1;
}
- break;
- case 64:
- if (type_integer->signedness) {
- int64_t side_s64;
-
- side_s64 = value->side_s64;
- if (reverse_bo)
- side_s64 = side_bswap_64(side_s64);
- v.v_signed = side_s64;
+ if (len_bits <= 64) {
+ printf("0o%" PRIo64, v.u[SIDE_INTEGER128_SPLIT_LOW]);
} else {
- uint64_t side_u64;
+ char str[U128_BASE_8_ARRAY_LEN];
- side_u64 = value->side_u64;
- if (reverse_bo)
- side_u64 = side_bswap_64(side_u64);
- v.v_unsigned = side_u64;
+ u128_tostring_base_8(v, str);
+ printf("0o%s", str);
}
break;
- default:
- abort();
- }
- v.v_unsigned >>= offset_bits;
- if (type_integer->len_bits < 64)
- v.v_unsigned &= (1ULL << type_integer->len_bits) - 1;
- tracer_print_type_header(separator, type_integer->attr, type_integer->nr_attr);
- switch (base) {
- case TRACER_DISPLAY_BASE_2:
- print_integer_binary(v.v_unsigned, type_integer->len_bits);
- break;
- case TRACER_DISPLAY_BASE_8:
- printf("0%" PRIo64, v.v_unsigned);
- break;
case TRACER_DISPLAY_BASE_10:
- if (type_integer->signedness) {
- /* Sign-extend. */
- if (type_integer->len_bits < 64) {
- if (v.v_unsigned & (1ULL << (type_integer->len_bits - 1)))
- v.v_unsigned |= ~((1ULL << type_integer->len_bits) - 1);
- }
- printf("%" PRId64, v.v_signed);
+ if (len_bits <= 64) {
+ if (type_integer->signedness)
+ printf("%" PRId64, v.s[SIDE_INTEGER128_SPLIT_LOW]);
+ else
+ printf("%" PRIu64, v.u[SIDE_INTEGER128_SPLIT_LOW]);
} else {
- printf("%" PRIu64, v.v_unsigned);
+ if (type_integer->signedness) {
+ char str[S128_BASE_10_ARRAY_LEN];
+ s128_tostring_base_10(v, str);
+ printf("%s", str);
+ } else {
+ char str[U128_BASE_10_ARRAY_LEN];
+ u128_tostring_base_10(v, str);
+ printf("%s", str);
+ }
}
break;
case TRACER_DISPLAY_BASE_16:
- printf("0x%" PRIx64, v.v_unsigned);
+ /* Clear sign bits beyond len_bits */
+ if (len_bits < 64) {
+ v.u[SIDE_INTEGER128_SPLIT_LOW] &= (1ULL << len_bits) - 1;
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] = 0;
+ } else if (len_bits < 128) {
+ v.u[SIDE_INTEGER128_SPLIT_HIGH] &= (1ULL << (len_bits - 64)) - 1;
+ }
+ if (len_bits <= 64 || v.u[SIDE_INTEGER128_SPLIT_HIGH] == 0) {
+ printf("0x%" PRIx64, v.u[SIDE_INTEGER128_SPLIT_LOW]);
+ } else {
+ printf("0x%" PRIx64 "%016" PRIx64,
+ v.u[SIDE_INTEGER128_SPLIT_HIGH],
+ v.u[SIDE_INTEGER128_SPLIT_LOW]);
+ }
break;
default:
abort();
{
bool reverse_bo;
- reverse_bo = type_float->byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
- tracer_print_type_header(separator, type_float->attr, type_float->nr_attr);
- switch (type_float->float_size_bits) {
- case 16:
+ tracer_print_type_header(separator, side_ptr_get(type_float->attr), type_float->nr_attr);
+ reverse_bo = side_enum_get(type_float->byte_order) != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
+ switch (type_float->float_size) {
+ case 2:
{
#if __HAVE_FLOAT16
union {
if (reverse_bo)
float16.u = side_bswap_16(float16.u);
- tracer_print_type_header(":", type_desc->u.side_float.attr, type_desc->u.side_float.nr_attr);
printf("%g", (double) float16.f);
break;
#else
abort();
#endif
}
- case 32:
+ case 4:
{
#if __HAVE_FLOAT32
union {
abort();
#endif
}
- case 64:
+ case 8:
{
#if __HAVE_FLOAT64
union {
abort();
#endif
}
- case 128:
+ case 16:
{
#if __HAVE_FLOAT128
union {
}
static
-void tracer_print_type(const struct side_type *type_desc, const struct side_arg *item)
+void push_nesting(struct print_ctx *ctx)
{
- enum side_type_label type;
+ if (++ctx->nesting >= MAX_NESTING) {
+ fprintf(stderr, "ERROR: Nesting too deep.\n");
+ abort();
+ }
+ ctx->item_nr[ctx->nesting] = 0;
+}
- switch (type_desc->type) {
- case SIDE_TYPE_ARRAY:
- switch (item->type) {
- case SIDE_TYPE_ARRAY_U8:
- case SIDE_TYPE_ARRAY_U16:
- case SIDE_TYPE_ARRAY_U32:
- case SIDE_TYPE_ARRAY_U64:
- case SIDE_TYPE_ARRAY_S8:
- case SIDE_TYPE_ARRAY_S16:
- case SIDE_TYPE_ARRAY_S32:
- case SIDE_TYPE_ARRAY_S64:
- case SIDE_TYPE_ARRAY_POINTER32:
- case SIDE_TYPE_ARRAY_POINTER64:
- case SIDE_TYPE_ARRAY_BYTE:
- case SIDE_TYPE_ARRAY:
- break;
- default:
- fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
- abort();
- break;
- }
- break;
+static
+void pop_nesting(struct print_ctx *ctx)
+{
+ ctx->item_nr[ctx->nesting] = 0;
+ if (ctx->nesting-- <= 0) {
+ fprintf(stderr, "ERROR: Nesting underflow.\n");
+ abort();
+ }
+}
- case SIDE_TYPE_VLA:
- switch (item->type) {
- case SIDE_TYPE_VLA_U8:
- case SIDE_TYPE_VLA_U16:
- case SIDE_TYPE_VLA_U32:
- case SIDE_TYPE_VLA_U64:
- case SIDE_TYPE_VLA_S8:
- case SIDE_TYPE_VLA_S16:
- case SIDE_TYPE_VLA_S32:
- case SIDE_TYPE_VLA_S64:
- case SIDE_TYPE_VLA_BYTE:
- case SIDE_TYPE_VLA_POINTER32:
- case SIDE_TYPE_VLA_POINTER64:
- case SIDE_TYPE_VLA:
- break;
- default:
- fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
- abort();
- break;
- }
- break;
+static
+int get_nested_item_nr(struct print_ctx *ctx)
+{
+ return ctx->item_nr[ctx->nesting];
+}
- case SIDE_TYPE_ENUM:
- switch (item->type) {
- case SIDE_TYPE_U8:
- case SIDE_TYPE_U16:
- case SIDE_TYPE_U32:
- case SIDE_TYPE_U64:
- case SIDE_TYPE_S8:
- case SIDE_TYPE_S16:
- case SIDE_TYPE_S32:
- case SIDE_TYPE_S64:
- break;
- default:
- fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
- abort();
- break;
- }
- break;
+static
+void inc_nested_item_nr(struct print_ctx *ctx)
+{
+ ctx->item_nr[ctx->nesting]++;
+}
- case SIDE_TYPE_ENUM_BITMAP:
- switch (item->type) {
- case SIDE_TYPE_U8:
- case SIDE_TYPE_BYTE:
- case SIDE_TYPE_U16:
- case SIDE_TYPE_U32:
- case SIDE_TYPE_U64:
- case SIDE_TYPE_ARRAY:
- case SIDE_TYPE_VLA:
- break;
- default:
- fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
- abort();
- break;
- }
- break;
+static
+void tracer_print_event(enum side_type_visitor_location loc,
+ const struct side_event_description *desc,
+ const struct side_arg_vec *side_arg_vec,
+ const struct side_arg_dynamic_struct *var_struct __attribute__((unused)),
+ void *caller_addr, void *priv __attribute__((unused)))
+{
+ uint32_t side_sav_len = side_arg_vec->len;
- case SIDE_TYPE_DYNAMIC:
- switch (item->type) {
- case SIDE_TYPE_DYNAMIC_NULL:
- case SIDE_TYPE_DYNAMIC_BOOL:
- case SIDE_TYPE_DYNAMIC_U8:
- case SIDE_TYPE_DYNAMIC_U16:
- case SIDE_TYPE_DYNAMIC_U32:
- case SIDE_TYPE_DYNAMIC_U64:
- case SIDE_TYPE_DYNAMIC_S8:
- case SIDE_TYPE_DYNAMIC_S16:
- case SIDE_TYPE_DYNAMIC_S32:
- case SIDE_TYPE_DYNAMIC_S64:
- case SIDE_TYPE_DYNAMIC_BYTE:
- case SIDE_TYPE_DYNAMIC_POINTER32:
- case SIDE_TYPE_DYNAMIC_POINTER64:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
- case SIDE_TYPE_DYNAMIC_STRING:
- case SIDE_TYPE_DYNAMIC_STRUCT:
- case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
- case SIDE_TYPE_DYNAMIC_VLA:
- case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
- break;
- default:
- fprintf(stderr, "ERROR: Unexpected dynamic type\n");
- abort();
- break;
- }
- break;
+ if (desc->nr_fields != side_sav_len) {
+ fprintf(stderr, "ERROR: number of fields mismatch between description and arguments\n");
+ abort();
+ }
- default:
- if (type_desc->type != item->type) {
- fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
- abort();
- }
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ if (print_caller)
+ printf("caller: [%p], ", caller_addr);
+ printf("provider: %s, event: %s",
+ side_ptr_get(desc->provider_name),
+ side_ptr_get(desc->event_name));
+ print_attributes(", attr", ":", side_ptr_get(desc->attr), desc->nr_attr);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ printf("\n");
break;
}
+}
- if (type_desc->type == SIDE_TYPE_ENUM || type_desc->type == SIDE_TYPE_ENUM_BITMAP)
- type = (enum side_type_label) type_desc->type;
- else
- type = (enum side_type_label) item->type;
+static
+void tracer_print_static_fields(enum side_type_visitor_location loc,
+ const struct side_arg_vec *side_arg_vec,
+ void *priv)
+{
+ struct print_ctx *ctx = (struct print_ctx *) priv;
+ uint32_t side_sav_len = side_arg_vec->len;
- printf("{ ");
- switch (type) {
- case SIDE_TYPE_NULL:
- tracer_print_type_header(":", type_desc->u.side_null.attr, type_desc->u.side_null.nr_attr);
- printf("<NULL TYPE>");
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ printf("%s", side_sav_len ? ", fields: {" : "");
+ push_nesting(ctx);
break;
-
- case SIDE_TYPE_BOOL:
- tracer_print_type_header(":", type_desc->u.side_bool.attr, type_desc->u.side_bool.nr_attr);
- printf("%s", item->u.side_static.bool_value ? "true" : "false");
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ if (side_sav_len)
+ printf(" }");
break;
+ }
+}
- case SIDE_TYPE_U8:
- case SIDE_TYPE_U16:
- case SIDE_TYPE_U32:
- case SIDE_TYPE_U64:
- case SIDE_TYPE_S8:
- case SIDE_TYPE_S16:
- case SIDE_TYPE_S32:
- case SIDE_TYPE_S64:
- tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
- TRACER_DISPLAY_BASE_10);
- break;
+static
+void tracer_print_variadic_fields(enum side_type_visitor_location loc,
+ const struct side_arg_dynamic_struct *var_struct,
+ void *priv)
+{
+ struct print_ctx *ctx = (struct print_ctx *) priv;
+ uint32_t var_struct_len = var_struct->len;
- case SIDE_TYPE_POINTER32:
- case SIDE_TYPE_POINTER64:
- tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
- TRACER_DISPLAY_BASE_16);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes(", attr ", "::", side_ptr_get(var_struct->attr), var_struct->nr_attr);
+ printf("%s", var_struct_len ? ", fields:: {" : "");
+ push_nesting(ctx);
break;
-
- case SIDE_TYPE_BYTE:
- tracer_print_type_header(":", type_desc->u.side_byte.attr, type_desc->u.side_byte.nr_attr);
- printf("0x%" PRIx8, item->u.side_static.byte_value);
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ if (var_struct_len)
+ printf(" }");
break;
+ }
+}
- case SIDE_TYPE_ENUM:
- print_enum(type_desc, item);
- break;
+static
+void tracer_print_field(enum side_type_visitor_location loc, const struct side_event_field *item_desc, void *priv)
+{
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- case SIDE_TYPE_ENUM_BITMAP:
- print_enum_bitmap(type_desc, item);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ if (get_nested_item_nr(ctx) != 0)
+ printf(",");
+ printf(" %s: { ", side_ptr_get(item_desc->field_name));
break;
-
- case SIDE_TYPE_FLOAT_BINARY16:
- case SIDE_TYPE_FLOAT_BINARY32:
- case SIDE_TYPE_FLOAT_BINARY64:
- case SIDE_TYPE_FLOAT_BINARY128:
- tracer_print_type_float(":", &type_desc->u.side_float, &item->u.side_static.float_value);
+ case SIDE_TYPE_VISITOR_AFTER:
+ printf(" }");
+ inc_nested_item_nr(ctx);
break;
+ }
+}
- case SIDE_TYPE_STRING:
- tracer_print_type_header(":", type_desc->u.side_string.attr, type_desc->u.side_string.nr_attr);
- printf("\"%s\"", (const char *)(uintptr_t) item->u.side_static.string_value);
- break;
- case SIDE_TYPE_STRUCT:
- tracer_print_struct(type_desc, item->u.side_static.side_struct);
- break;
- case SIDE_TYPE_SG_STRUCT:
- tracer_print_sg_struct(&type_desc->u.side_sg, &item->u.side_static.side_struct_sg_ptr);
- break;
- case SIDE_TYPE_SG_UNSIGNED_INT:
- case SIDE_TYPE_SG_SIGNED_INT:
- tracer_print_sg_integer_type(&type_desc->u.side_sg, item->u.side_static.side_integer_sg_ptr);
- break;
- case SIDE_TYPE_SG_FLOAT:
- tracer_print_sg_float_type(&type_desc->u.side_sg, item->u.side_static.side_float_sg_ptr);
+static
+void tracer_print_elem(enum side_type_visitor_location loc, const struct side_type *type_desc __attribute__((unused)), void *priv)
+{
+ struct print_ctx *ctx = (struct print_ctx *) priv;
+
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ if (get_nested_item_nr(ctx) != 0)
+ printf(", { ");
+ else
+ printf(" { ");
break;
- case SIDE_TYPE_ARRAY:
- tracer_print_array(type_desc, item->u.side_static.side_array);
+ case SIDE_TYPE_VISITOR_AFTER:
+ printf(" }");
+ inc_nested_item_nr(ctx);
break;
- case SIDE_TYPE_VLA:
- tracer_print_vla(type_desc, item->u.side_static.side_vla);
- break;
- case SIDE_TYPE_VLA_VISITOR:
- tracer_print_vla_visitor(type_desc, item->u.side_static.side_vla_app_visitor_ctx);
- break;
- case SIDE_TYPE_ARRAY_U8:
- case SIDE_TYPE_ARRAY_U16:
- case SIDE_TYPE_ARRAY_U32:
- case SIDE_TYPE_ARRAY_U64:
- case SIDE_TYPE_ARRAY_S8:
- case SIDE_TYPE_ARRAY_S16:
- case SIDE_TYPE_ARRAY_S32:
- case SIDE_TYPE_ARRAY_S64:
- case SIDE_TYPE_ARRAY_BYTE:
- case SIDE_TYPE_ARRAY_POINTER32:
- case SIDE_TYPE_ARRAY_POINTER64:
- tracer_print_array_fixint(type_desc, item);
- break;
- case SIDE_TYPE_VLA_U8:
- case SIDE_TYPE_VLA_U16:
- case SIDE_TYPE_VLA_U32:
- case SIDE_TYPE_VLA_U64:
- case SIDE_TYPE_VLA_S8:
- case SIDE_TYPE_VLA_S16:
- case SIDE_TYPE_VLA_S32:
- case SIDE_TYPE_VLA_S64:
- case SIDE_TYPE_VLA_BYTE:
- case SIDE_TYPE_VLA_POINTER32:
- case SIDE_TYPE_VLA_POINTER64:
- tracer_print_vla_fixint(type_desc, item);
- break;
-
- /* Dynamic types */
- case SIDE_TYPE_DYNAMIC_NULL:
- case SIDE_TYPE_DYNAMIC_BOOL:
- case SIDE_TYPE_DYNAMIC_U8:
- case SIDE_TYPE_DYNAMIC_U16:
- case SIDE_TYPE_DYNAMIC_U32:
- case SIDE_TYPE_DYNAMIC_U64:
- case SIDE_TYPE_DYNAMIC_S8:
- case SIDE_TYPE_DYNAMIC_S16:
- case SIDE_TYPE_DYNAMIC_S32:
- case SIDE_TYPE_DYNAMIC_S64:
- case SIDE_TYPE_DYNAMIC_BYTE:
- case SIDE_TYPE_DYNAMIC_POINTER32:
- case SIDE_TYPE_DYNAMIC_POINTER64:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
- case SIDE_TYPE_DYNAMIC_STRING:
- case SIDE_TYPE_DYNAMIC_STRUCT:
- case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
- case SIDE_TYPE_DYNAMIC_VLA:
- case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
- tracer_print_dynamic(item);
- break;
- default:
- fprintf(stderr, "<UNKNOWN TYPE>");
- abort();
}
- printf(" }");
}
static
-void tracer_print_field(const struct side_event_field *item_desc, const struct side_arg *item)
+void tracer_print_null(const struct side_type *type_desc,
+ const struct side_arg *item __attribute__((unused)),
+ void *priv __attribute__((unused)))
{
- printf("%s: ", item_desc->field_name);
- tracer_print_type(&item_desc->side_type, item);
+ tracer_print_type_header(":", side_ptr_get(type_desc->u.side_null.attr),
+ type_desc->u.side_null.nr_attr);
+ printf("<NULL TYPE>");
}
static
-void tracer_print_struct(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
+void tracer_print_bool(const struct side_type *type_desc,
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- const struct side_arg *sav = side_arg_vec->sav;
- uint32_t i, side_sav_len = side_arg_vec->len;
-
- if (type_desc->u.side_struct->nr_fields != side_sav_len) {
- fprintf(stderr, "ERROR: number of fields mismatch between description and arguments of structure\n");
- abort();
- }
- print_attributes("attr", ":", type_desc->u.side_struct->attr, type_desc->u.side_struct->nr_attr);
- printf("%s", type_desc->u.side_struct->nr_attr ? ", " : "");
- printf("fields: { ");
- for (i = 0; i < side_sav_len; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_field(&type_desc->u.side_struct->fields[i], &sav[i]);
- }
- printf(" }");
+ tracer_print_type_bool(":", &type_desc->u.side_bool, &item->u.side_static.bool_value, 0);
}
static
-void tracer_print_sg_integer_type(const struct side_type_sg *type_sg, const void *_ptr)
+void tracer_print_integer(const struct side_type *type_desc,
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- const char *ptr = (const char *) _ptr;
- union side_integer_value value;
-
- switch (type_sg->u.side_integer.type.integer_size_bits) {
- case 8:
- case 16:
- case 32:
- case 64:
- break;
- default:
- abort();
- }
- memcpy(&value, ptr + type_sg->offset, type_sg->u.side_integer.type.integer_size_bits >> 3);
- tracer_print_type_integer(":", &type_sg->u.side_integer.type, &value,
- type_sg->u.side_integer.offset_bits, TRACER_DISPLAY_BASE_10);
+ tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0, TRACER_DISPLAY_BASE_10);
}
static
-void tracer_print_sg_float_type(const struct side_type_sg *type_sg, const void *_ptr)
+void tracer_print_byte(const struct side_type *type_desc __attribute__((unused)),
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- const char *ptr = (const char *) _ptr;
- union side_float_value value;
+ tracer_print_type_header(":", side_ptr_get(type_desc->u.side_byte.attr), type_desc->u.side_byte.nr_attr);
+ printf("0x%" PRIx8, item->u.side_static.byte_value);
+}
- switch (type_sg->u.side_float.float_size_bits) {
- case 16:
- case 32:
- case 64:
- case 128:
- break;
- default:
- abort();
- }
- memcpy(&value, ptr + type_sg->offset, type_sg->u.side_float.float_size_bits >> 3);
- tracer_print_type_float(":", &type_sg->u.side_float, &value);
+static
+void tracer_print_pointer(const struct side_type *type_desc,
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0, TRACER_DISPLAY_BASE_16);
}
static
-void tracer_print_sg_type(const struct side_type *type_desc, void *ptr)
+void tracer_print_float(const struct side_type *type_desc,
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- printf("{ ");
- switch (type_desc->type) {
- case SIDE_TYPE_SG_UNSIGNED_INT:
- case SIDE_TYPE_SG_SIGNED_INT:
- tracer_print_sg_integer_type(&type_desc->u.side_sg, ptr);
- break;
- case SIDE_TYPE_SG_FLOAT:
- tracer_print_sg_float_type(&type_desc->u.side_sg, ptr);
- break;
- case SIDE_TYPE_SG_STRUCT:
- tracer_print_sg_struct(&type_desc->u.side_sg, ptr);
- break;
- default:
- fprintf(stderr, "<UNKNOWN SCATTER-GATHER TYPE>");
- abort();
- }
- printf(" }");
+ tracer_print_type_float(":", &type_desc->u.side_float, &item->u.side_static.float_value);
}
static
-void tracer_print_sg_field(const struct side_event_field *field, void *ptr)
+void tracer_print_string(const struct side_type *type_desc,
+ const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- printf("%s: ", field->field_name);
- tracer_print_sg_type(&field->side_type, ptr);
+ tracer_print_type_header(":", side_ptr_get(type_desc->u.side_string.attr), type_desc->u.side_string.nr_attr);
+ tracer_print_type_string(side_ptr_get(item->u.side_static.string_value),
+ type_desc->u.side_string.unit_size,
+ side_enum_get(type_desc->u.side_string.byte_order), NULL);
}
static
-void tracer_print_sg_struct(const struct side_type_sg *type_sg, const void *_ptr)
+void tracer_print_struct(enum side_type_visitor_location loc,
+ const struct side_type_struct *side_struct,
+ const struct side_arg_vec *side_arg_vec __attribute__((unused)), void *priv)
{
- char *ptr = (char *) _ptr;
- uint32_t i;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- memcpy(&ptr, ptr + type_sg->offset, sizeof(ptr));
- print_attributes("attr", ":", type_sg->u.side_struct->attr, type_sg->u.side_struct->nr_attr);
- printf("%s", type_sg->u.side_struct->nr_attr ? ", " : "");
- printf("fields: { ");
- for (i = 0; i < type_sg->u.side_struct->nr_fields; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_sg_field(&type_sg->u.side_struct->fields[i], ptr);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", ":", side_ptr_get(side_struct->attr), side_struct->nr_attr);
+ printf("%s", side_struct->nr_attr ? ", " : "");
+ printf("fields: {");
+ push_nesting(ctx);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" }");
+ break;
}
- printf(" }");
}
static
-void tracer_print_array(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
+void tracer_print_array(enum side_type_visitor_location loc,
+ const struct side_type_array *side_array,
+ const struct side_arg_vec *side_arg_vec __attribute__((unused)), void *priv)
{
- const struct side_arg *sav = side_arg_vec->sav;
- uint32_t i, side_sav_len = side_arg_vec->len;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- if (type_desc->u.side_array.length != side_sav_len) {
- fprintf(stderr, "ERROR: length mismatch between description and arguments of array\n");
- abort();
- }
- print_attributes("attr", ":", type_desc->u.side_array.attr, type_desc->u.side_array.nr_attr);
- printf("%s", type_desc->u.side_array.nr_attr ? ", " : "");
- printf("elements: ");
- printf("[ ");
- for (i = 0; i < side_sav_len; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_type(type_desc->u.side_array.elem_type, &sav[i]);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", ":", side_ptr_get(side_array->attr), side_array->nr_attr);
+ printf("%s", side_array->nr_attr ? ", " : "");
+ printf("elements: [");
+ push_nesting(ctx);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" ]");
+ break;
}
- printf(" ]");
}
static
-void tracer_print_vla(const struct side_type *type_desc, const struct side_arg_vec *side_arg_vec)
+void tracer_print_vla(enum side_type_visitor_location loc,
+ const struct side_type_vla *side_vla,
+ const struct side_arg_vec *side_arg_vec __attribute__((unused)), void *priv)
{
- const struct side_arg *sav = side_arg_vec->sav;
- uint32_t i, side_sav_len = side_arg_vec->len;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- print_attributes("attr", ":", type_desc->u.side_vla.attr, type_desc->u.side_vla.nr_attr);
- printf("%s", type_desc->u.side_vla.nr_attr ? ", " : "");
- printf("elements: ");
- printf("[ ");
- for (i = 0; i < side_sav_len; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_type(type_desc->u.side_vla.elem_type, &sav[i]);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", ":", side_ptr_get(side_vla->attr), side_vla->nr_attr);
+ printf("%s", side_vla->nr_attr ? ", " : "");
+ printf("elements: [");
+ push_nesting(ctx);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" ]");
+ break;
}
- printf(" ]");
}
-struct tracer_visitor_priv {
- const struct side_type *elem_type;
- int i;
-};
-
static
-enum side_visitor_status tracer_write_elem_cb(const struct side_tracer_visitor_ctx *tracer_ctx,
- const struct side_arg *elem)
+void tracer_print_vla_visitor(enum side_type_visitor_location loc,
+ const struct side_type_vla_visitor *side_vla_visitor,
+ const struct side_arg_vla_visitor *side_arg_vla_visitor __attribute__((unused)), void *priv)
{
- struct tracer_visitor_priv *tracer_priv = (struct tracer_visitor_priv *) tracer_ctx->priv;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- printf("%s", tracer_priv->i++ ? ", " : "");
- tracer_print_type(tracer_priv->elem_type, elem);
- return SIDE_VISITOR_STATUS_OK;
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", ":", side_ptr_get(side_vla_visitor->attr), side_vla_visitor->nr_attr);
+ printf("%s", side_vla_visitor->nr_attr ? ", " : "");
+ printf("elements: [");
+ push_nesting(ctx);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" ]");
+ break;
+ }
}
-static
-void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx)
+static void tracer_print_enum(const struct side_type *type_desc,
+ const struct side_arg *item, void *priv)
{
- enum side_visitor_status status;
- struct tracer_visitor_priv tracer_priv = {
- .elem_type = type_desc->u.side_vla_visitor.elem_type,
- .i = 0,
- };
- const struct side_tracer_visitor_ctx tracer_ctx = {
- .write_elem = tracer_write_elem_cb,
- .priv = &tracer_priv,
- };
+ const struct side_enum_mappings *mappings = side_ptr_get(type_desc->u.side_enum.mappings);
+ const struct side_type *elem_type = side_ptr_get(type_desc->u.side_enum.elem_type);
+ union int_value v;
- print_attributes("attr", ":", type_desc->u.side_vla_visitor.attr, type_desc->u.side_vla_visitor.nr_attr);
- printf("%s", type_desc->u.side_vla_visitor.nr_attr ? ", " : "");
- printf("elements: ");
- printf("[ ");
- status = type_desc->u.side_vla_visitor.visitor(&tracer_ctx, app_ctx);
- switch (status) {
- case SIDE_VISITOR_STATUS_OK:
- break;
- case SIDE_VISITOR_STATUS_ERROR:
- fprintf(stderr, "ERROR: Visitor error\n");
+ if (side_enum_get(elem_type->type) != side_enum_get(item->type)) {
+ fprintf(stderr, "ERROR: Unexpected enum element type\n");
abort();
}
- printf(" ]");
+ v = tracer_load_integer_value(&elem_type->u.side_integer,
+ &item->u.side_static.integer_value, 0, NULL);
+ print_attributes("attr", ":", side_ptr_get(mappings->attr), mappings->nr_attr);
+ printf("%s", mappings->nr_attr ? ", " : "");
+ printf("{ ");
+ tracer_print_integer(elem_type, item, priv);
+ printf(" }");
+ print_enum_labels(mappings, v);
}
-void tracer_print_array_fixint(const struct side_type *type_desc, const struct side_arg *item)
+static void tracer_print_enum_bitmap(const struct side_type *type_desc,
+ const struct side_arg *item, void *priv __attribute__((unused)))
{
- const struct side_type *elem_type = type_desc->u.side_array.elem_type;
- uint32_t i, side_sav_len = type_desc->u.side_array.length;
- void *p = item->u.side_static.side_array_fixint;
- enum side_type_label side_type;
+ const struct side_enum_bitmap_mappings *side_enum_mappings = side_ptr_get(type_desc->u.side_enum_bitmap.mappings);
+ const struct side_type *enum_elem_type = side_ptr_get(type_desc->u.side_enum_bitmap.elem_type), *elem_type;
+ uint32_t i, print_count = 0, stride_bit, nr_items;
+ const struct side_arg *array_item;
- print_attributes("attr", ":", type_desc->u.side_array.attr, type_desc->u.side_array.nr_attr);
- printf("%s", type_desc->u.side_array.nr_attr ? ", " : "");
- printf("elements: ");
- switch (item->type) {
- case SIDE_TYPE_ARRAY_U8:
- if (elem_type->type != SIDE_TYPE_U8)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_U16:
- if (elem_type->type != SIDE_TYPE_U16)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_U32:
- if (elem_type->type != SIDE_TYPE_U32)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_U64:
- if (elem_type->type != SIDE_TYPE_U64)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_S8:
- if (elem_type->type != SIDE_TYPE_S8)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_S16:
- if (elem_type->type != SIDE_TYPE_S16)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_S32:
- if (elem_type->type != SIDE_TYPE_S32)
- goto type_error;
- break;
- case SIDE_TYPE_ARRAY_S64:
- if (elem_type->type != SIDE_TYPE_S64)
- goto type_error;
+ switch (side_enum_get(enum_elem_type->type)) {
+ case SIDE_TYPE_U8: /* Fall-through */
+ case SIDE_TYPE_BYTE: /* Fall-through */
+ case SIDE_TYPE_U16: /* Fall-through */
+ case SIDE_TYPE_U32: /* Fall-through */
+ case SIDE_TYPE_U64: /* Fall-through */
+ case SIDE_TYPE_U128: /* Fall-through */
+ case SIDE_TYPE_S8: /* Fall-through */
+ case SIDE_TYPE_S16: /* Fall-through */
+ case SIDE_TYPE_S32: /* Fall-through */
+ case SIDE_TYPE_S64: /* Fall-through */
+ case SIDE_TYPE_S128:
+ elem_type = enum_elem_type;
+ array_item = item;
+ nr_items = 1;
break;
- case SIDE_TYPE_ARRAY_BYTE:
- if (elem_type->type != SIDE_TYPE_BYTE)
- goto type_error;
+ case SIDE_TYPE_ARRAY:
+ elem_type = side_ptr_get(enum_elem_type->u.side_array.elem_type);
+ array_item = side_ptr_get(side_ptr_get(item->u.side_static.side_array)->sav);
+ nr_items = type_desc->u.side_array.length;
break;
- case SIDE_TYPE_ARRAY_POINTER32:
- if (elem_type->type != SIDE_TYPE_POINTER32)
- goto type_error;
- case SIDE_TYPE_ARRAY_POINTER64:
- if (elem_type->type != SIDE_TYPE_POINTER64)
- goto type_error;
+ case SIDE_TYPE_VLA:
+ elem_type = side_ptr_get(enum_elem_type->u.side_vla.elem_type);
+ array_item = side_ptr_get(side_ptr_get(item->u.side_static.side_vla)->sav);
+ nr_items = side_ptr_get(item->u.side_static.side_vla)->len;
break;
default:
- goto type_error;
+ fprintf(stderr, "ERROR: Unexpected enum element type\n");
+ abort();
}
- side_type = (enum side_type_label) elem_type->type;
-
- printf("[ ");
- for (i = 0; i < side_sav_len; i++) {
- struct side_arg sav_elem = {
- .type = side_type,
- };
+ stride_bit = elem_type_to_stride(elem_type);
- switch (side_type) {
- case SIDE_TYPE_U8:
- sav_elem.u.side_static.integer_value.side_u8 = ((const uint8_t *) p)[i];
- break;
- case SIDE_TYPE_S8:
- sav_elem.u.side_static.integer_value.side_s8 = ((const int8_t *) p)[i];
- break;
- case SIDE_TYPE_U16:
- sav_elem.u.side_static.integer_value.side_u16 = ((const uint16_t *) p)[i];
- break;
- case SIDE_TYPE_S16:
- sav_elem.u.side_static.integer_value.side_s16 = ((const int16_t *) p)[i];
- break;
- case SIDE_TYPE_U32:
- sav_elem.u.side_static.integer_value.side_u32 = ((const uint32_t *) p)[i];
- break;
- case SIDE_TYPE_S32:
- sav_elem.u.side_static.integer_value.side_s32 = ((const int32_t *) p)[i];
- break;
- case SIDE_TYPE_U64:
- sav_elem.u.side_static.integer_value.side_u64 = ((const uint64_t *) p)[i];
- break;
- case SIDE_TYPE_S64:
- sav_elem.u.side_static.integer_value.side_s64 = ((const int64_t *) p)[i];
- break;
- case SIDE_TYPE_BYTE:
- sav_elem.u.side_static.byte_value = ((const uint8_t *) p)[i];
- break;
- case SIDE_TYPE_POINTER32:
- sav_elem.u.side_static.integer_value.side_u32 = ((const uint32_t *) p)[i];
- break;
- case SIDE_TYPE_POINTER64:
- sav_elem.u.side_static.integer_value.side_u64 = ((const uint64_t *) p)[i];
- break;
+ print_attributes("attr", ":", side_ptr_get(side_enum_mappings->attr), side_enum_mappings->nr_attr);
+ printf("%s", side_enum_mappings->nr_attr ? ", " : "");
+ printf("labels: [ ");
+ for (i = 0; i < side_enum_mappings->nr_mappings; i++) {
+ const struct side_enum_bitmap_mapping *mapping = &side_ptr_get(side_enum_mappings->mappings)[i];
+ bool match = false;
+ uint64_t bit;
- default:
- fprintf(stderr, "ERROR: Unexpected type\n");
+ if (mapping->range_end < mapping->range_begin) {
+ fprintf(stderr, "ERROR: Unexpected enum bitmap range: %" PRIu64 "-%" PRIu64 "\n",
+ mapping->range_begin, mapping->range_end);
abort();
}
+ for (bit = mapping->range_begin; bit <= mapping->range_end; bit++) {
+ if (bit > (nr_items * stride_bit) - 1)
+ break;
+ if (side_enum_get(elem_type->type) == SIDE_TYPE_BYTE) {
+ uint8_t v = array_item[bit / 8].u.side_static.byte_value;
+ if (v & (1ULL << (bit % 8))) {
+ match = true;
+ goto match;
+ }
+ } else {
+ union int_value v = {};
- printf("%s", i ? ", " : "");
- tracer_print_type(elem_type, &sav_elem);
+ v = tracer_load_integer_value(&elem_type->u.side_integer,
+ &array_item[bit / stride_bit].u.side_static.integer_value,
+ 0, NULL);
+ side_check_value_u64(v);
+ if (v.u[SIDE_INTEGER128_SPLIT_LOW] & (1ULL << (bit % stride_bit))) {
+ match = true;
+ goto match;
+ }
+ }
+ }
+match:
+ if (match) {
+ printf("%s", print_count++ ? ", " : "");
+ tracer_print_type_string(side_ptr_get(mapping->label.p), mapping->label.unit_size,
+ side_enum_get(mapping->label.byte_order), NULL);
+ }
}
+ if (!print_count)
+ printf("<NO LABEL>");
printf(" ]");
- return;
-
-type_error:
- fprintf(stderr, "ERROR: type mismatch\n");
- abort();
}
-void tracer_print_vla_fixint(const struct side_type *type_desc, const struct side_arg *item)
+static
+void tracer_print_gather_bool(const struct side_type_gather_bool *type,
+ const union side_bool_value *value,
+ void *priv __attribute__((unused)))
{
- const struct side_type *elem_type = type_desc->u.side_vla.elem_type;
- uint32_t i, side_sav_len = item->u.side_static.side_vla_fixint.length;
- void *p = item->u.side_static.side_vla_fixint.p;
- enum side_type_label side_type;
-
- print_attributes("attr", ":", type_desc->u.side_vla.attr, type_desc->u.side_vla.nr_attr);
- printf("%s", type_desc->u.side_vla.nr_attr ? ", " : "");
- printf("elements: ");
- switch (item->type) {
- case SIDE_TYPE_VLA_U8:
- if (elem_type->type != SIDE_TYPE_U8)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_U16:
- if (elem_type->type != SIDE_TYPE_U16)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_U32:
- if (elem_type->type != SIDE_TYPE_U32)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_U64:
- if (elem_type->type != SIDE_TYPE_U64)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_S8:
- if (elem_type->type != SIDE_TYPE_S8)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_S16:
- if (elem_type->type != SIDE_TYPE_S16)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_S32:
- if (elem_type->type != SIDE_TYPE_S32)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_S64:
- if (elem_type->type != SIDE_TYPE_S64)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_BYTE:
- if (elem_type->type != SIDE_TYPE_BYTE)
- goto type_error;
- break;
- case SIDE_TYPE_VLA_POINTER32:
- if (elem_type->type != SIDE_TYPE_POINTER32)
- goto type_error;
- case SIDE_TYPE_VLA_POINTER64:
- if (elem_type->type != SIDE_TYPE_POINTER64)
- goto type_error;
- break;
- default:
- goto type_error;
- }
- side_type = (enum side_type_label) elem_type->type;
+ tracer_print_type_bool(":", &type->type, value, type->offset_bits);
+}
- printf("[ ");
- for (i = 0; i < side_sav_len; i++) {
- struct side_arg sav_elem = {
- .type = side_type,
- };
+static
+void tracer_print_gather_byte(const struct side_type_gather_byte *type,
+ const uint8_t *_ptr,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_header(":", side_ptr_get(type->type.attr),
+ type->type.nr_attr);
+ printf("0x%" PRIx8, *_ptr);
+}
- switch (side_type) {
- case SIDE_TYPE_U8:
- sav_elem.u.side_static.integer_value.side_u8 = ((const uint8_t *) p)[i];
- break;
- case SIDE_TYPE_S8:
- sav_elem.u.side_static.integer_value.side_s8 = ((const int8_t *) p)[i];
- break;
- case SIDE_TYPE_U16:
- sav_elem.u.side_static.integer_value.side_u16 = ((const uint16_t *) p)[i];
- break;
- case SIDE_TYPE_S16:
- sav_elem.u.side_static.integer_value.side_s16 = ((const int16_t *) p)[i];
- break;
- case SIDE_TYPE_U32:
- sav_elem.u.side_static.integer_value.side_u32 = ((const uint32_t *) p)[i];
- break;
- case SIDE_TYPE_S32:
- sav_elem.u.side_static.integer_value.side_s32 = ((const int32_t *) p)[i];
- break;
- case SIDE_TYPE_U64:
- sav_elem.u.side_static.integer_value.side_u64 = ((const uint64_t *) p)[i];
- break;
- case SIDE_TYPE_S64:
- sav_elem.u.side_static.integer_value.side_s64 = ((const int64_t *) p)[i];
- break;
- case SIDE_TYPE_BYTE:
- sav_elem.u.side_static.byte_value = ((const uint8_t *) p)[i];
- break;
- case SIDE_TYPE_POINTER32:
- sav_elem.u.side_static.integer_value.side_u32 = ((const uint32_t *) p)[i];
- break;
- case SIDE_TYPE_POINTER64:
- sav_elem.u.side_static.integer_value.side_u64 = ((const uint64_t *) p)[i];
- break;
+static
+void tracer_print_gather_integer(const struct side_type_gather_integer *type,
+ const union side_integer_value *value,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_integer(":", &type->type, value, type->offset_bits, TRACER_DISPLAY_BASE_10);
+}
- default:
- fprintf(stderr, "ERROR: Unexpected type\n");
- abort();
- }
+static
+void tracer_print_gather_pointer(const struct side_type_gather_integer *type,
+ const union side_integer_value *value,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_integer(":", &type->type, value, type->offset_bits, TRACER_DISPLAY_BASE_16);
+}
- printf("%s", i ? ", " : "");
- tracer_print_type(elem_type, &sav_elem);
- }
- printf(" ]");
- return;
+static
+void tracer_print_gather_float(const struct side_type_gather_float *type,
+ const union side_float_value *value,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_float(":", &type->type, value);
+}
-type_error:
- fprintf(stderr, "ERROR: type mismatch\n");
- abort();
+static
+void tracer_print_gather_string(const struct side_type_gather_string *type,
+ const void *p, uint8_t unit_size,
+ enum side_type_label_byte_order byte_order,
+ size_t strlen_with_null __attribute__((unused)),
+ void *priv __attribute__((unused)))
+{
+ //TODO use strlen_with_null input
+ tracer_print_type_header(":", side_ptr_get(type->type.attr),
+ type->type.nr_attr);
+ tracer_print_type_string(p, unit_size, byte_order, NULL);
}
static
-void tracer_print_dynamic_struct(const struct side_arg_dynamic_struct *dynamic_struct)
+void tracer_print_gather_struct(enum side_type_visitor_location loc,
+ const struct side_type_struct *side_struct,
+ void *priv)
{
- const struct side_arg_dynamic_field *fields = dynamic_struct->fields;
- uint32_t i, len = dynamic_struct->len;
+ tracer_print_struct(loc, side_struct, NULL, priv);
+}
- print_attributes("attr", "::", dynamic_struct->attr, dynamic_struct->nr_attr);
- printf("%s", dynamic_struct->nr_attr ? ", " : "");
- printf("fields:: ");
- printf("[ ");
- for (i = 0; i < len; i++) {
- printf("%s", i ? ", " : "");
- printf("%s:: ", fields[i].field_name);
- tracer_print_dynamic(&fields[i].elem);
- }
- printf(" ]");
+static
+void tracer_print_gather_array(enum side_type_visitor_location loc,
+ const struct side_type_array *side_array,
+ void *priv)
+{
+ tracer_print_array(loc, side_array, NULL, priv);
}
-struct tracer_dynamic_struct_visitor_priv {
- int i;
-};
+static
+void tracer_print_gather_vla(enum side_type_visitor_location loc,
+ const struct side_type_vla *side_vla,
+ uint32_t length __attribute__((unused)),
+ void *priv)
+{
+ tracer_print_vla(loc, side_vla, NULL, priv);
+}
static
-enum side_visitor_status tracer_dynamic_struct_write_elem_cb(
- const struct side_tracer_dynamic_struct_visitor_ctx *tracer_ctx,
- const struct side_arg_dynamic_field *dynamic_field)
+void tracer_print_gather_enum(const struct side_type_gather_enum *type,
+ const union side_integer_value *value,
+ void *priv __attribute__((unused)))
{
- struct tracer_dynamic_struct_visitor_priv *tracer_priv =
- (struct tracer_dynamic_struct_visitor_priv *) tracer_ctx->priv;
+ const struct side_enum_mappings *mappings = side_ptr_get(type->mappings);
+ const struct side_type *enum_elem_type = side_ptr_get(type->elem_type);
+ const struct side_type_gather_integer *side_integer = &enum_elem_type->u.side_gather.u.side_integer;
+ union int_value v;
- printf("%s", tracer_priv->i++ ? ", " : "");
- printf("%s:: ", dynamic_field->field_name);
- tracer_print_dynamic(&dynamic_field->elem);
- return SIDE_VISITOR_STATUS_OK;
+ v = tracer_load_integer_value(&side_integer->type, value, 0, NULL);
+ print_attributes("attr", ":", side_ptr_get(mappings->attr), mappings->nr_attr);
+ printf("%s", mappings->nr_attr ? ", " : "");
+ printf("{ ");
+ tracer_print_type_integer(":", &side_integer->type, value, 0, TRACER_DISPLAY_BASE_10);
+ printf(" }");
+ print_enum_labels(mappings, v);
}
static
-void tracer_print_dynamic_struct_visitor(const struct side_arg *item)
+void tracer_print_dynamic_field(enum side_type_visitor_location loc, const struct side_arg_dynamic_field *field, void *priv)
{
- enum side_visitor_status status;
- struct tracer_dynamic_struct_visitor_priv tracer_priv = {
- .i = 0,
- };
- const struct side_tracer_dynamic_struct_visitor_ctx tracer_ctx = {
- .write_field = tracer_dynamic_struct_write_elem_cb,
- .priv = &tracer_priv,
- };
- void *app_ctx = item->u.side_dynamic.side_dynamic_struct_visitor.app_ctx;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_struct_visitor.attr, item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr);
- printf("%s", item->u.side_dynamic.side_dynamic_struct_visitor.nr_attr ? ", " : "");
- printf("fields:: ");
- printf("[ ");
- status = item->u.side_dynamic.side_dynamic_struct_visitor.visitor(&tracer_ctx, app_ctx);
- switch (status) {
- case SIDE_VISITOR_STATUS_OK:
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ if (get_nested_item_nr(ctx) != 0)
+ printf(",");
+ printf(" %s:: { ", side_ptr_get(field->field_name));
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ printf(" }");
+ inc_nested_item_nr(ctx);
break;
- case SIDE_VISITOR_STATUS_ERROR:
- fprintf(stderr, "ERROR: Visitor error\n");
- abort();
}
- printf(" ]");
}
static
-void tracer_print_dynamic_vla(const struct side_arg_dynamic_vla *vla)
+void tracer_print_dynamic_elem(enum side_type_visitor_location loc,
+ const struct side_arg *dynamic_item __attribute__((unused)), void *priv)
{
- const struct side_arg *sav = vla->sav;
- uint32_t i, side_sav_len = vla->len;
+ tracer_print_elem(loc, NULL, priv);
+}
- print_attributes("attr", "::", vla->attr, vla->nr_attr);
- printf("%s", vla->nr_attr ? ", " : "");
- printf("elements:: ");
- printf("[ ");
- for (i = 0; i < side_sav_len; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_dynamic(&sav[i]);
- }
- printf(" ]");
+static
+void tracer_print_dynamic_null(const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_header("::", side_ptr_get(item->u.side_dynamic.side_null.attr),
+ item->u.side_dynamic.side_null.nr_attr);
+ printf("<NULL TYPE>");
}
-struct tracer_dynamic_vla_visitor_priv {
- int i;
-};
+static
+void tracer_print_dynamic_bool(const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_bool("::", &item->u.side_dynamic.side_bool.type, &item->u.side_dynamic.side_bool.value, 0);
+}
static
-enum side_visitor_status tracer_dynamic_vla_write_elem_cb(
- const struct side_tracer_visitor_ctx *tracer_ctx,
- const struct side_arg *elem)
+void tracer_print_dynamic_integer(const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- struct tracer_dynamic_vla_visitor_priv *tracer_priv =
- (struct tracer_dynamic_vla_visitor_priv *) tracer_ctx->priv;
+ tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
+ TRACER_DISPLAY_BASE_10);
+}
- printf("%s", tracer_priv->i++ ? ", " : "");
- tracer_print_dynamic(elem);
- return SIDE_VISITOR_STATUS_OK;
+static
+void tracer_print_dynamic_byte(const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_header("::", side_ptr_get(item->u.side_dynamic.side_byte.type.attr), item->u.side_dynamic.side_byte.type.nr_attr);
+ printf("0x%" PRIx8, item->u.side_dynamic.side_byte.value);
}
static
-void tracer_print_dynamic_vla_visitor(const struct side_arg *item)
+void tracer_print_dynamic_pointer(const struct side_arg *item,
+ void *priv __attribute__((unused)))
{
- enum side_visitor_status status;
- struct tracer_dynamic_vla_visitor_priv tracer_priv = {
- .i = 0,
- };
- const struct side_tracer_visitor_ctx tracer_ctx = {
- .write_elem = tracer_dynamic_vla_write_elem_cb,
- .priv = &tracer_priv,
- };
- void *app_ctx = item->u.side_dynamic.side_dynamic_vla_visitor.app_ctx;
+ tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
+ TRACER_DISPLAY_BASE_16);
+}
- print_attributes("attr", "::", item->u.side_dynamic.side_dynamic_vla_visitor.attr, item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr);
- printf("%s", item->u.side_dynamic.side_dynamic_vla_visitor.nr_attr ? ", " : "");
- printf("elements:: ");
- printf("[ ");
- status = item->u.side_dynamic.side_dynamic_vla_visitor.visitor(&tracer_ctx, app_ctx);
- switch (status) {
- case SIDE_VISITOR_STATUS_OK:
- break;
- case SIDE_VISITOR_STATUS_ERROR:
- fprintf(stderr, "ERROR: Visitor error\n");
- abort();
- }
- printf(" ]");
+static
+void tracer_print_dynamic_float(const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_float("::", &item->u.side_dynamic.side_float.type,
+ &item->u.side_dynamic.side_float.value);
+}
+
+static
+void tracer_print_dynamic_string(const struct side_arg *item,
+ void *priv __attribute__((unused)))
+{
+ tracer_print_type_header("::", side_ptr_get(item->u.side_dynamic.side_string.type.attr), item->u.side_dynamic.side_string.type.nr_attr);
+ tracer_print_type_string((const char *)(uintptr_t) item->u.side_dynamic.side_string.value,
+ item->u.side_dynamic.side_string.type.unit_size,
+ side_enum_get(item->u.side_dynamic.side_string.type.byte_order), NULL);
}
static
-void tracer_print_dynamic(const struct side_arg *item)
+void tracer_print_dynamic_struct(enum side_type_visitor_location loc,
+ const struct side_arg_dynamic_struct *dynamic_struct,
+ void *priv)
{
- printf("{ ");
- switch (item->type) {
- case SIDE_TYPE_DYNAMIC_NULL:
- tracer_print_type_header("::", item->u.side_dynamic.side_null.attr, item->u.side_dynamic.side_null.nr_attr);
- printf("<NULL TYPE>");
- break;
- case SIDE_TYPE_DYNAMIC_BOOL:
- tracer_print_type_header("::", item->u.side_dynamic.side_bool.type.attr, item->u.side_dynamic.side_bool.type.nr_attr);
- printf("%s", item->u.side_dynamic.side_bool.value ? "true" : "false");
- break;
- case SIDE_TYPE_DYNAMIC_U8:
- case SIDE_TYPE_DYNAMIC_U16:
- case SIDE_TYPE_DYNAMIC_U32:
- case SIDE_TYPE_DYNAMIC_U64:
- case SIDE_TYPE_DYNAMIC_S8:
- case SIDE_TYPE_DYNAMIC_S16:
- case SIDE_TYPE_DYNAMIC_S32:
- case SIDE_TYPE_DYNAMIC_S64:
- tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
- TRACER_DISPLAY_BASE_10);
+ struct print_ctx *ctx = (struct print_ctx *) priv;
+
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", "::", side_ptr_get(dynamic_struct->attr), dynamic_struct->nr_attr);
+ printf("%s", dynamic_struct->nr_attr ? ", " : "");
+ printf("fields:: {");
+ push_nesting(ctx);
break;
- case SIDE_TYPE_DYNAMIC_BYTE:
- tracer_print_type_header("::", item->u.side_dynamic.side_byte.type.attr, item->u.side_dynamic.side_byte.type.nr_attr);
- printf("0x%" PRIx8, item->u.side_dynamic.side_byte.value);
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" }");
break;
+ }
+}
- case SIDE_TYPE_DYNAMIC_POINTER32:
- case SIDE_TYPE_DYNAMIC_POINTER64:
- tracer_print_type_integer("::", &item->u.side_dynamic.side_integer.type, &item->u.side_dynamic.side_integer.value, 0,
- TRACER_DISPLAY_BASE_16);
- break;
+static
+void tracer_print_dynamic_struct_visitor(enum side_type_visitor_location loc,
+ const struct side_arg *item,
+ void *priv)
+{
+ struct side_arg_dynamic_struct_visitor *dynamic_struct_visitor;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY16:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY32:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY64:
- case SIDE_TYPE_DYNAMIC_FLOAT_BINARY128:
- tracer_print_type_float("::", &item->u.side_dynamic.side_float.type,
- &item->u.side_dynamic.side_float.value);
- break;
+ dynamic_struct_visitor = side_ptr_get(item->u.side_dynamic.side_dynamic_struct_visitor);
+ if (!dynamic_struct_visitor)
+ abort();
- case SIDE_TYPE_DYNAMIC_STRING:
- tracer_print_type_header("::", item->u.side_dynamic.side_string.type.attr, item->u.side_dynamic.side_string.type.nr_attr);
- printf("\"%s\"", (const char *)(uintptr_t) item->u.side_dynamic.side_string.value);
- break;
- case SIDE_TYPE_DYNAMIC_STRUCT:
- tracer_print_dynamic_struct(item->u.side_dynamic.side_dynamic_struct);
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", "::", side_ptr_get(dynamic_struct_visitor->attr), dynamic_struct_visitor->nr_attr);
+ printf("%s", dynamic_struct_visitor->nr_attr ? ", " : "");
+ printf("fields:: {");
+ push_nesting(ctx);
break;
- case SIDE_TYPE_DYNAMIC_STRUCT_VISITOR:
- tracer_print_dynamic_struct_visitor(item);
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" }");
break;
- case SIDE_TYPE_DYNAMIC_VLA:
- tracer_print_dynamic_vla(item->u.side_dynamic.side_dynamic_vla);
+ }
+}
+
+static
+void tracer_print_dynamic_vla(enum side_type_visitor_location loc,
+ const struct side_arg_dynamic_vla *dynamic_vla,
+ void *priv)
+{
+ struct print_ctx *ctx = (struct print_ctx *) priv;
+
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", "::", side_ptr_get(dynamic_vla->attr), dynamic_vla->nr_attr);
+ printf("%s", dynamic_vla->nr_attr ? ", " : "");
+ printf("elements:: [");
+ push_nesting(ctx);
break;
- case SIDE_TYPE_DYNAMIC_VLA_VISITOR:
- tracer_print_dynamic_vla_visitor(item);
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
+ printf(" ]");
break;
- default:
- fprintf(stderr, "<UNKNOWN TYPE>");
- abort();
}
- printf(" }");
}
static
-void tracer_print_static_fields(const struct side_event_description *desc,
- const struct side_arg_vec *side_arg_vec,
- uint32_t *nr_items)
+void tracer_print_dynamic_vla_visitor(enum side_type_visitor_location loc,
+ const struct side_arg *item,
+ void *priv)
{
- const struct side_arg *sav = side_arg_vec->sav;
- uint32_t i, side_sav_len = side_arg_vec->len;
+ struct side_arg_dynamic_vla_visitor *dynamic_vla_visitor;
+ struct print_ctx *ctx = (struct print_ctx *) priv;
- printf("provider: %s, event: %s", desc->provider_name, desc->event_name);
- if (desc->nr_fields != side_sav_len) {
- fprintf(stderr, "ERROR: number of fields mismatch between description and arguments\n");
+ dynamic_vla_visitor = side_ptr_get(item->u.side_dynamic.side_dynamic_vla_visitor);
+ if (!dynamic_vla_visitor)
abort();
- }
- print_attributes(", attr", ":", desc->attr, desc->nr_attr);
- printf("%s", side_sav_len ? ", fields: [ " : "");
- for (i = 0; i < side_sav_len; i++) {
- printf("%s", i ? ", " : "");
- tracer_print_field(&desc->fields[i], &sav[i]);
- }
- if (nr_items)
- *nr_items = i;
- if (side_sav_len)
+
+ switch (loc) {
+ case SIDE_TYPE_VISITOR_BEFORE:
+ print_attributes("attr", "::", side_ptr_get(dynamic_vla_visitor->attr), dynamic_vla_visitor->nr_attr);
+ printf("%s", dynamic_vla_visitor->nr_attr ? ", " : "");
+ printf("elements:: [");
+ push_nesting(ctx);
+ break;
+ case SIDE_TYPE_VISITOR_AFTER:
+ pop_nesting(ctx);
printf(" ]");
+ break;
+ }
}
+static struct side_type_visitor type_visitor = {
+ .event_func = tracer_print_event,
+ .static_fields_func = tracer_print_static_fields,
+ .variadic_fields_func = tracer_print_variadic_fields,
+
+ /* Stack-copy basic types. */
+ .field_func = tracer_print_field,
+ .elem_func = tracer_print_elem,
+ .null_type_func = tracer_print_null,
+ .bool_type_func = tracer_print_bool,
+ .integer_type_func = tracer_print_integer,
+ .byte_type_func = tracer_print_byte,
+ .pointer_type_func = tracer_print_pointer,
+ .float_type_func = tracer_print_float,
+ .string_type_func = tracer_print_string,
+
+ /* Stack-copy compound types. */
+ .struct_type_func = tracer_print_struct,
+ .array_type_func = tracer_print_array,
+ .vla_type_func = tracer_print_vla,
+ .vla_visitor_type_func = tracer_print_vla_visitor,
+
+ /* Stack-copy enumeration types. */
+ .enum_type_func = tracer_print_enum,
+ .enum_bitmap_type_func = tracer_print_enum_bitmap,
+
+ /* Gather basic types. */
+ .gather_bool_type_func = tracer_print_gather_bool,
+ .gather_byte_type_func = tracer_print_gather_byte,
+ .gather_integer_type_func = tracer_print_gather_integer,
+ .gather_pointer_type_func = tracer_print_gather_pointer,
+ .gather_float_type_func = tracer_print_gather_float,
+ .gather_string_type_func = tracer_print_gather_string,
+
+ /* Gather compound types. */
+ .gather_struct_type_func = tracer_print_gather_struct,
+ .gather_array_type_func = tracer_print_gather_array,
+ .gather_vla_type_func = tracer_print_gather_vla,
+
+ /* Gather enumeration types. */
+ .gather_enum_type_func = tracer_print_gather_enum,
+
+ /* Dynamic basic types. */
+ .dynamic_field_func = tracer_print_dynamic_field,
+ .dynamic_elem_func = tracer_print_dynamic_elem,
+
+ .dynamic_null_func = tracer_print_dynamic_null,
+ .dynamic_bool_func = tracer_print_dynamic_bool,
+ .dynamic_integer_func = tracer_print_dynamic_integer,
+ .dynamic_byte_func = tracer_print_dynamic_byte,
+ .dynamic_pointer_func = tracer_print_dynamic_pointer,
+ .dynamic_float_func = tracer_print_dynamic_float,
+ .dynamic_string_func = tracer_print_dynamic_string,
+
+ /* Dynamic compound types. */
+ .dynamic_struct_func = tracer_print_dynamic_struct,
+ .dynamic_struct_visitor_func = tracer_print_dynamic_struct_visitor,
+ .dynamic_vla_func = tracer_print_dynamic_vla,
+ .dynamic_vla_visitor_func = tracer_print_dynamic_vla_visitor,
+};
+
+static
void tracer_call(const struct side_event_description *desc,
const struct side_arg_vec *side_arg_vec,
- void *priv __attribute__((unused)))
+ void *priv __attribute__((unused)),
+ void *caller_addr)
{
- uint32_t nr_fields = 0;
+ struct print_ctx ctx = {};
- tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
- printf("\n");
+ type_visitor_event(&type_visitor, desc, side_arg_vec, NULL, caller_addr, &ctx);
}
+static
void tracer_call_variadic(const struct side_event_description *desc,
const struct side_arg_vec *side_arg_vec,
const struct side_arg_dynamic_struct *var_struct,
- void *priv __attribute__((unused)))
+ void *priv __attribute__((unused)),
+ void *caller_addr)
{
- uint32_t nr_fields = 0, i, var_struct_len = var_struct->len;
-
- tracer_print_static_fields(desc, side_arg_vec, &nr_fields);
+ struct print_ctx ctx = {};
- if (side_unlikely(!(desc->flags & SIDE_EVENT_FLAG_VARIADIC))) {
- fprintf(stderr, "ERROR: unexpected non-variadic event description\n");
- abort();
- }
- print_attributes(", attr ", "::", var_struct->attr, var_struct->nr_attr);
- printf("%s", var_struct_len ? ", fields:: [ " : "");
- for (i = 0; i < var_struct_len; i++, nr_fields++) {
- printf("%s", i ? ", " : "");
- printf("%s:: ", var_struct->fields[i].field_name);
- tracer_print_dynamic(&var_struct->fields[i].elem);
- }
- if (i)
- printf(" ]");
- printf("\n");
+ type_visitor_event(&type_visitor, desc, side_arg_vec, var_struct, caller_addr, &ctx);
}
+static
void tracer_event_notification(enum side_tracer_notification notif,
- struct side_event_description **events, uint32_t nr_events, void *priv)
+ struct side_event_description **events, uint32_t nr_events,
+ void *priv __attribute__((unused)))
{
uint32_t i;
int ret;
/* Skip NULL pointers */
if (!event)
continue;
+ if (event->version != SIDE_EVENT_DESCRIPTION_ABI_VERSION) {
+ printf("Error: event description ABI version (%u) does not match the version supported by the tracer (%u)\n",
+ event->version, SIDE_EVENT_DESCRIPTION_ABI_VERSION);
+ return;
+ }
printf("provider: %s, event: %s\n",
- event->provider_name, event->event_name);
- if (notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS) {
+ side_ptr_get(event->provider_name), side_ptr_get(event->event_name));
+ if (event->struct_size != side_offsetofend(struct side_event_description, side_event_description_orig_abi_last)) {
+ printf("Warning: Event %s.%s description contains fields unknown to the tracer\n",
+ side_ptr_get(event->provider_name), side_ptr_get(event->event_name));
+ }
+ if (notif == SIDE_TRACER_NOTIFICATION_INSERT_EVENTS) {
+ if (event->nr_side_type_label > _NR_SIDE_TYPE_LABEL) {
+ printf("Warning: event %s:%s may contain unknown field types (%u unknown types)\n",
+ side_ptr_get(event->provider_name), side_ptr_get(event->event_name),
+ event->nr_side_type_label - _NR_SIDE_TYPE_LABEL);
+ }
+ if (event->nr_side_attr_type > _NR_SIDE_ATTR_TYPE) {
+ printf("Warning: event %s:%s may contain unknown attribute types (%u unknown types)\n",
+ side_ptr_get(event->provider_name), side_ptr_get(event->event_name),
+ event->nr_side_attr_type - _NR_SIDE_ATTR_TYPE);
+ }
if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
- ret = side_tracer_callback_variadic_register(event, tracer_call_variadic, NULL);
+ ret = side_tracer_callback_variadic_register(event, tracer_call_variadic, NULL, tracer_key);
if (ret)
abort();
} else {
- ret = side_tracer_callback_register(event, tracer_call, NULL);
+ ret = side_tracer_callback_register(event, tracer_call, NULL, tracer_key);
if (ret)
abort();
}
} else {
if (event->flags & SIDE_EVENT_FLAG_VARIADIC) {
- ret = side_tracer_callback_variadic_unregister(event, tracer_call_variadic, NULL);
+ ret = side_tracer_callback_variadic_unregister(event, tracer_call_variadic, NULL, tracer_key);
if (ret)
abort();
} else {
- ret = side_tracer_callback_unregister(event, tracer_call, NULL);
+ ret = side_tracer_callback_unregister(event, tracer_call, NULL, tracer_key);
if (ret)
abort();
}
static
void tracer_init(void)
{
+ if (side_tracer_request_key(&tracer_key))
+ abort();
tracer_handle = side_tracer_event_notification_register(tracer_event_notification, NULL);
if (!tracer_handle)
abort();