TRACER_DISPLAY_BASE_16,
};
-union int64_value {
- uint64_t u;
- int64_t s;
+union int_value {
+ uint64_t u[NR_SIDE_INTEGER128_SPLIT];
+ int64_t s[NR_SIDE_INTEGER128_SPLIT];
};
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
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);
+void tracer_print_vla_visitor(const struct side_type *type_desc, struct side_arg_vla_visitor *vla_visitor);
static
void tracer_print_dynamic(const struct side_arg *dynamic_item);
static
}
static
-int64_t get_attr_integer_value(const struct side_attr *attr)
+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 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_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();
bool cmp;
tracer_convert_string_to_utf8(side_ptr_get(attr->key.p), attr->key.unit_size,
- attr->key.byte_order, NULL, &utf8_str);
+ 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_integer_value(attr);
+ int64_t val = get_attr_integer64_value(attr);
switch (val) {
case 2:
char *utf8_str = NULL;
tracer_convert_string_to_utf8(side_ptr_get(attr->key.p), attr->key.unit_size,
- attr->key.byte_order, NULL, &utf8_str);
+ 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 (attr->value.type) {
+ 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_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
printf("%g", (double) attr->value.u.float_value.side_float_binary16);
case SIDE_ATTR_TYPE_STRING:
tracer_print_string(side_ptr_get(attr->value.u.string_value.p),
attr->value.u.string_value.unit_size,
- attr->value.u.string_value.byte_order, NULL);
+ side_enum_get(attr->value.u.string_value.byte_order), NULL);
break;
default:
fprintf(stderr, "ERROR: <UNKNOWN ATTRIBUTE TYPE>");
}
static
-union int64_value tracer_load_integer_value(const struct side_type_integer *type_integer,
+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)
{
- union int64_value v64;
+ union int_value v = {};
uint16_t len_bits;
bool reverse_bo;
len_bits = type_integer->len_bits;
if (len_bits + offset_bits > type_integer->integer_size * CHAR_BIT)
abort();
- reverse_bo = type_integer->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
+ 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)
- v64.s = value->side_s8;
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = value->side_s8;
else
- v64.u = value->side_u8;
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = value->side_u8;
break;
case 2:
if (type_integer->signedness) {
side_s16 = value->side_s16;
if (reverse_bo)
side_s16 = side_bswap_16(side_s16);
- v64.s = side_s16;
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s16;
} else {
uint16_t side_u16;
side_u16 = value->side_u16;
if (reverse_bo)
side_u16 = side_bswap_16(side_u16);
- v64.u = side_u16;
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u16;
}
break;
case 4:
side_s32 = value->side_s32;
if (reverse_bo)
side_s32 = side_bswap_32(side_s32);
- v64.s = side_s32;
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s32;
} else {
uint32_t side_u32;
side_u32 = value->side_u32;
if (reverse_bo)
side_u32 = side_bswap_32(side_u32);
- v64.u = side_u32;
+ v.u[SIDE_INTEGER128_SPLIT_LOW] = side_u32;
}
break;
case 8:
side_s64 = value->side_s64;
if (reverse_bo)
side_s64 = side_bswap_64(side_s64);
- v64.s = side_s64;
+ v.s[SIDE_INTEGER128_SPLIT_LOW] = side_s64;
} else {
uint64_t side_u64;
side_u64 = value->side_u64;
if (reverse_bo)
side_u64 = side_bswap_64(side_u64);
- v64.u = 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:
abort();
}
- v64.u >>= offset_bits;
- if (len_bits < 64) {
- v64.u &= (1ULL << len_bits) - 1;
- if (type_integer->signedness) {
- /* Sign-extend. */
- if (v64.u & (1ULL << (len_bits - 1)))
- v64.u |= ~((1ULL << len_bits) - 1);
+ 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 v64;
+ return v;
}
static
-void print_enum_labels(const struct side_enum_mappings *mappings, union int64_value v64)
+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 = &side_ptr_get(mappings->mappings)[i];
mapping->range_begin, mapping->range_end);
abort();
}
- if (v64.s >= mapping->range_begin && v64.s <= 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++ ? ", " : "");
- tracer_print_string(side_ptr_get(mapping->label.p), mapping->label.unit_size, mapping->label.byte_order, NULL);
+ tracer_print_string(side_ptr_get(mapping->label.p), mapping->label.unit_size,
+ side_enum_get(mapping->label.byte_order), NULL);
}
}
if (!print_count)
{
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 int64_value v64;
+ union int_value v;
- if (elem_type->type != item->type) {
+ if (side_enum_get(elem_type->type) != side_enum_get(item->type)) {
fprintf(stderr, "ERROR: Unexpected enum element type\n");
abort();
}
- v64 = tracer_load_integer_value(&elem_type->u.side_integer,
+ 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 ? ", " : "");
tracer_print_type(elem_type, item);
- print_enum_labels(mappings, v64);
+ print_enum_labels(mappings, v);
}
static
{
uint32_t stride_bit;
- switch (elem_type->type) {
+ switch (side_enum_get(elem_type->type)) {
case SIDE_TYPE_BYTE:
stride_bit = 8;
break;
case SIDE_TYPE_U16:
case SIDE_TYPE_U32:
case SIDE_TYPE_U64:
+ 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 bitmap element type\n");
uint32_t i, print_count = 0, stride_bit, nr_items;
const struct side_arg *array_item;
- switch (enum_elem_type->type) {
+ 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:
+ case SIDE_TYPE_S64: /* Fall-through */
+ case SIDE_TYPE_S128:
elem_type = enum_elem_type;
array_item = item;
nr_items = 1;
for (bit = mapping->range_begin; bit <= mapping->range_end; bit++) {
if (bit > (nr_items * stride_bit) - 1)
break;
- if (elem_type->type == SIDE_TYPE_BYTE) {
+ 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 int64_value v64;
+ union int_value v = {};
- v64 = tracer_load_integer_value(&elem_type->u.side_integer,
+ v = tracer_load_integer_value(&elem_type->u.side_integer,
&array_item[bit / stride_bit].u.side_static.integer_value,
0, NULL);
- if (v64.u & (1ULL << (bit % stride_bit))) {
+ 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_string(side_ptr_get(mapping->label.p), mapping->label.unit_size, mapping->label.byte_order, NULL);
+ tracer_print_string(side_ptr_get(mapping->label.p), mapping->label.unit_size,
+ side_enum_get(mapping->label.byte_order), NULL);
}
}
if (!print_count)
}
static
-void print_integer_binary(uint64_t v, int bits)
+void print_integer_binary(uint64_t v[NR_SIDE_INTEGER128_SPLIT], int bits)
{
- int i;
+ int bit;
printf("0b");
- v <<= 64 - bits;
- for (i = 0; i < bits; i++) {
- printf("%c", v & (1ULL << 63) ? '1' : '0');
- v <<= 1;
+ 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;
}
}
len_bits = type_bool->len_bits;
if (len_bits + offset_bits > type_bool->bool_size * CHAR_BIT)
abort();
- reverse_bo = type_bool->byte_order != SIDE_TYPE_BYTE_ORDER_HOST;
+ 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;
printf("%s", v ? "true" : "false");
}
+/* 2^128 - 1 */
+#define U128_BASE_10_ARRAY_LEN sizeof("340282366920938463463374607431768211455")
+/* -2^127 */
+#define S128_BASE_10_ARRAY_LEN sizeof("-170141183460469231731687303715884105728")
+
+/*
+ * 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;
+ }
+ }
+ 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;
+ }
+ }
+ 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 s128_tostring_base_10(union int_value v, char str[S128_BASE_10_ARRAY_LEN])
+{
+ uint64_t low, high, tmp;
+
+ 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 u128_tostring_base_8(union int_value v, char str[U128_BASE_8_ARRAY_LEN])
+{
+ 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
void tracer_print_type_integer(const char *separator,
const struct side_type_integer *type_integer,
enum tracer_display_base default_base)
{
enum tracer_display_base base;
- union int64_value v64;
+ union int_value v;
uint16_t len_bits;
- v64 = tracer_load_integer_value(type_integer, value, offset_bits, &len_bits);
+ 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(v64.u, len_bits);
+ print_integer_binary(v.u, len_bits);
break;
case TRACER_DISPLAY_BASE_8:
/* Clear sign bits beyond len_bits */
- if (len_bits < 64)
- v64.u &= (1ULL << len_bits) - 1;
- printf("0%" PRIo64, v64.u);
+ 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) {
+ printf("0o%" PRIo64, v.u[SIDE_INTEGER128_SPLIT_LOW]);
+ } else {
+ char str[U128_BASE_8_ARRAY_LEN];
+
+ u128_tostring_base_8(v, str);
+ printf("0o%s", str);
+ }
break;
case TRACER_DISPLAY_BASE_10:
- if (type_integer->signedness)
- printf("%" PRId64, v64.s);
- else
- printf("%" PRIu64, v64.u);
+ 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 {
+ 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:
/* Clear sign bits beyond len_bits */
- if (len_bits < 64)
- v64.u &= (1ULL << len_bits) - 1;
- printf("0x%" PRIx64, v64.u);
+ 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;
tracer_print_type_header(separator, side_ptr_get(type_float->attr), type_float->nr_attr);
- reverse_bo = type_float->byte_order != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
+ reverse_bo = side_enum_get(type_float->byte_order) != SIDE_TYPE_FLOAT_WORD_ORDER_HOST;
switch (type_float->float_size) {
case 2:
{
{
enum side_type_label type;
- switch (type_desc->type) {
+ switch (side_enum_get(type_desc->type)) {
case SIDE_TYPE_ENUM:
- switch (item->type) {
+ switch (side_enum_get(item->type)) {
case SIDE_TYPE_U8:
case SIDE_TYPE_U16:
case SIDE_TYPE_U32:
case SIDE_TYPE_U64:
+ case SIDE_TYPE_U128:
case SIDE_TYPE_S8:
case SIDE_TYPE_S16:
case SIDE_TYPE_S32:
case SIDE_TYPE_S64:
+ case SIDE_TYPE_S128:
break;
default:
fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
break;
case SIDE_TYPE_ENUM_BITMAP:
- switch (item->type) {
+ switch (side_enum_get(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_U128:
case SIDE_TYPE_ARRAY:
case SIDE_TYPE_VLA:
break;
break;
case SIDE_TYPE_GATHER_ENUM:
- switch (item->type) {
+ switch (side_enum_get(item->type)) {
case SIDE_TYPE_GATHER_INTEGER:
break;
default:
break;
case SIDE_TYPE_DYNAMIC:
- switch (item->type) {
+ switch (side_enum_get(item->type)) {
case SIDE_TYPE_DYNAMIC_NULL:
case SIDE_TYPE_DYNAMIC_BOOL:
case SIDE_TYPE_DYNAMIC_INTEGER:
break;
default:
- if (type_desc->type != item->type) {
+ if (side_enum_get(type_desc->type) != side_enum_get(item->type)) {
fprintf(stderr, "ERROR: type mismatch between description and arguments\n");
abort();
}
break;
}
- if (type_desc->type == SIDE_TYPE_ENUM || type_desc->type == SIDE_TYPE_ENUM_BITMAP ||
- type_desc->type == SIDE_TYPE_GATHER_ENUM)
- type = (enum side_type_label) type_desc->type;
+ if (side_enum_get(type_desc->type) == SIDE_TYPE_ENUM || side_enum_get(type_desc->type) == SIDE_TYPE_ENUM_BITMAP || side_enum_get(type_desc->type) == SIDE_TYPE_GATHER_ENUM)
+ type = side_enum_get(type_desc->type);
else
- type = (enum side_type_label) item->type;
+ type = side_enum_get(item->type);
printf("{ ");
switch (type) {
case SIDE_TYPE_U16:
case SIDE_TYPE_U32:
case SIDE_TYPE_U64:
+ case SIDE_TYPE_U128:
case SIDE_TYPE_S8:
case SIDE_TYPE_S16:
case SIDE_TYPE_S32:
case SIDE_TYPE_S64:
+ case SIDE_TYPE_S128:
tracer_print_type_integer(":", &type_desc->u.side_integer, &item->u.side_static.integer_value, 0,
TRACER_DISPLAY_BASE_10);
break;
case SIDE_TYPE_STRING_UTF32:
tracer_print_type_header(":", side_ptr_get(type_desc->u.side_string.attr), type_desc->u.side_string.nr_attr);
tracer_print_string(side_ptr_get(item->u.side_static.string_value),
- type_desc->u.side_string.unit_size, type_desc->u.side_string.byte_order, NULL);
+ type_desc->u.side_string.unit_size, side_enum_get(type_desc->u.side_string.byte_order), NULL);
break;
/* Stack-copy compound types */
tracer_print_vla(type_desc, side_ptr_get(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);
+ tracer_print_vla_visitor(type_desc, side_ptr_get(item->u.side_static.side_vla_visitor));
break;
/* Stack-copy enumeration types */
{
const struct side_type_variant *side_type_variant = side_ptr_get(type_desc->u.side_variant);
const struct side_type *selector_type = &side_type_variant->selector;
- union int64_value v64;
+ union int_value v;
uint32_t i;
- if (selector_type->type != side_arg_variant->selector.type) {
+ if (side_enum_get(selector_type->type) != side_enum_get(side_arg_variant->selector.type)) {
fprintf(stderr, "ERROR: Unexpected variant selector type\n");
abort();
}
- switch (selector_type->type) {
+ switch (side_enum_get(selector_type->type)) {
case SIDE_TYPE_U8:
case SIDE_TYPE_U16:
case SIDE_TYPE_U32:
case SIDE_TYPE_U64:
+ case SIDE_TYPE_U128:
case SIDE_TYPE_S8:
case SIDE_TYPE_S16:
case SIDE_TYPE_S32:
case SIDE_TYPE_S64:
+ case SIDE_TYPE_S128:
break;
default:
fprintf(stderr, "ERROR: Expecting integer variant selector type\n");
abort();
}
- v64 = tracer_load_integer_value(&selector_type->u.side_integer,
+ v = tracer_load_integer_value(&selector_type->u.side_integer,
&side_arg_variant->selector.u.side_static.integer_value, 0, NULL);
+ side_check_value_u64(v);
for (i = 0; i < side_type_variant->nr_options; i++) {
const struct side_variant_option *option = &side_ptr_get(side_type_variant->options)[i];
- if (v64.s >= option->range_begin && v64.s <= option->range_end) {
+ if (v.s[SIDE_INTEGER128_SPLIT_LOW] >= option->range_begin && v.s[SIDE_INTEGER128_SPLIT_LOW] <= option->range_end) {
tracer_print_type(&option->side_type, &side_arg_variant->option);
return;
}
}
- fprintf(stderr, "ERROR: Variant selector value unknown %" PRId64 "\n", v64.s);
+ fprintf(stderr, "ERROR: Variant selector value unknown %" PRId64 "\n", v.s[SIDE_INTEGER128_SPLIT_LOW]);
abort();
}
}
static
-union int64_value tracer_load_gather_integer_value(const struct side_type_gather_integer *side_integer,
+union int_value tracer_load_gather_integer_value(const struct side_type_gather_integer *side_integer,
const void *_ptr)
{
enum side_type_gather_access_mode access_mode =
case 2:
case 4:
case 8:
+ case 16:
break;
default:
abort();
type_gather->u.side_string.type.nr_attr);
if (ptr) {
tracer_print_string(ptr, type_gather->u.side_string.type.unit_size,
- type_gather->u.side_string.type.byte_order, &string_len);
+ side_enum_get(type_gather->u.side_string.type.byte_order), &string_len);
} else {
printf("<NULL>");
string_len = type_gather->u.side_string.type.unit_size;
uint32_t len;
printf("{ ");
- switch (type_desc->type) {
+ switch (side_enum_get(type_desc->type)) {
/* Gather basic types */
case SIDE_TYPE_GATHER_BOOL:
len = tracer_print_gather_bool_type(&type_desc->u.side_gather, ptr);
uint32_t integer_size_bytes = side_integer->type.integer_size;
const char *ptr = (const char *) _ptr;
union side_integer_value value;
- union int64_value v64;
+ union int_value v;
switch (integer_size_bytes) {
case 1:
case 2:
case 4:
case 8:
+ case 16:
break;
default:
abort();
}
ptr = tracer_gather_access(access_mode, ptr + side_integer->offset);
memcpy(&value, ptr, integer_size_bytes);
- v64 = tracer_load_gather_integer_value(side_integer, &value);
+ v = tracer_load_gather_integer_value(side_integer, &value);
print_attributes("attr", ":", side_ptr_get(mappings->attr), mappings->nr_attr);
printf("%s", mappings->nr_attr ? ", " : "");
tracer_print_gather_type(enum_elem_type, ptr);
- print_enum_labels(mappings, v64);
+ print_enum_labels(mappings, v);
return tracer_gather_size(access_mode, integer_size_bytes);
}
for (i = 0; i < type_gather->u.side_array.type.length; i++) {
const struct side_type *elem_type = side_ptr_get(type_gather->u.side_array.type.elem_type);
- switch (elem_type->type) {
+ switch (side_enum_get(elem_type->type)) {
case SIDE_TYPE_GATHER_VLA:
fprintf(stderr, "<gather VLA only supported within gather structures>\n");
abort();
const struct side_type *length_type = side_ptr_get(type_gather->u.side_vla.length_type);
const char *ptr = (const char *) _ptr, *orig_ptr;
const char *length_ptr = (const char *) _length_ptr;
- union int64_value v64;
+ union int_value v = {};
uint32_t i, length;
/* Access length */
- switch (length_type->type) {
+ switch (side_enum_get(length_type->type)) {
case SIDE_TYPE_GATHER_INTEGER:
break;
default:
fprintf(stderr, "<gather VLA expects integer gather length type>\n");
abort();
}
- v64 = tracer_load_gather_integer_value(&length_type->u.side_gather.u.side_integer,
+ v = tracer_load_gather_integer_value(&length_type->u.side_gather.u.side_integer,
length_ptr);
- length = (uint32_t) v64.u;
+ if (v.u[SIDE_INTEGER128_SPLIT_HIGH] || v.u[SIDE_INTEGER128_SPLIT_LOW] > UINT32_MAX) {
+ fprintf(stderr, "Unexpected vla length value\n");
+ abort();
+ }
+ length = (uint32_t) v.u[SIDE_INTEGER128_SPLIT_LOW];
ptr = tracer_gather_access(access_mode, ptr + type_gather->u.side_vla.offset);
orig_ptr = ptr;
print_attributes("attr", ":", side_ptr_get(type_gather->u.side_vla.type.attr), type_gather->u.side_vla.type.nr_attr);
for (i = 0; i < length; i++) {
const struct side_type *elem_type = side_ptr_get(type_gather->u.side_vla.type.elem_type);
- switch (elem_type->type) {
+ switch (side_enum_get(elem_type->type)) {
case SIDE_TYPE_GATHER_VLA:
fprintf(stderr, "<gather VLA only supported within gather structures>\n");
abort();
}
static
-void tracer_print_vla_visitor(const struct side_type *type_desc, void *app_ctx)
+void tracer_print_vla_visitor(const struct side_type *type_desc, struct side_arg_vla_visitor *vla_visitor)
{
+ void *app_ctx;
enum side_visitor_status status;
struct tracer_visitor_priv tracer_priv = {
.elem_type = side_ptr_get(type_desc->u.side_vla_visitor.elem_type),
.write_elem = tracer_write_elem_cb,
.priv = &tracer_priv,
};
+ side_visitor_func func;
+ if (!vla_visitor)
+ abort();
+ app_ctx = side_ptr_get(vla_visitor->app_ctx);
print_attributes("attr", ":", side_ptr_get(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);
+ func = side_ptr_get(type_desc->u.side_vla_visitor.visitor);
+ status = func(&tracer_ctx, app_ctx);
switch (status) {
case SIDE_VISITOR_STATUS_OK:
break;
static
void tracer_print_dynamic_struct_visitor(const struct side_arg *item)
{
- enum side_visitor_status status;
+ struct side_arg_dynamic_struct_visitor *dynamic_struct_visitor;
struct tracer_dynamic_struct_visitor_priv tracer_priv = {
.i = 0,
};
.write_field = tracer_dynamic_struct_write_elem_cb,
.priv = &tracer_priv,
};
- void *app_ctx = item->u.side_dynamic.side_dynamic_struct_visitor.app_ctx;
+ enum side_visitor_status status;
+ void *app_ctx;
- print_attributes("attr", "::", side_ptr_get(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 ? ", " : "");
+ dynamic_struct_visitor = side_ptr_get(item->u.side_dynamic.side_dynamic_struct_visitor);
+ if (!dynamic_struct_visitor)
+ abort();
+ app_ctx = side_ptr_get(dynamic_struct_visitor->app_ctx);
+ print_attributes("attr", "::", side_ptr_get(dynamic_struct_visitor->attr), dynamic_struct_visitor->nr_attr);
+ printf("%s", dynamic_struct_visitor->nr_attr ? ", " : "");
printf("fields:: ");
printf("[ ");
- status = item->u.side_dynamic.side_dynamic_struct_visitor.visitor(&tracer_ctx, app_ctx);
+ status = side_ptr_get(dynamic_struct_visitor->visitor)(&tracer_ctx, app_ctx);
switch (status) {
case SIDE_VISITOR_STATUS_OK:
break;
static
void tracer_print_dynamic_vla_visitor(const struct side_arg *item)
{
- enum side_visitor_status status;
+ struct side_arg_dynamic_vla_visitor *dynamic_vla_visitor;
struct tracer_dynamic_vla_visitor_priv tracer_priv = {
.i = 0,
};
.write_elem = tracer_dynamic_vla_write_elem_cb,
.priv = &tracer_priv,
};
- void *app_ctx = item->u.side_dynamic.side_dynamic_vla_visitor.app_ctx;
+ enum side_visitor_status status;
+ void *app_ctx;
- print_attributes("attr", "::", side_ptr_get(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 ? ", " : "");
+ dynamic_vla_visitor = side_ptr_get(item->u.side_dynamic.side_dynamic_vla_visitor);
+ if (!dynamic_vla_visitor)
+ abort();
+ app_ctx = side_ptr_get(dynamic_vla_visitor->app_ctx);
+ print_attributes("attr", "::", side_ptr_get(dynamic_vla_visitor->attr), dynamic_vla_visitor->nr_attr);
+ printf("%s", dynamic_vla_visitor->nr_attr ? ", " : "");
printf("elements:: ");
printf("[ ");
- status = item->u.side_dynamic.side_dynamic_vla_visitor.visitor(&tracer_ctx, app_ctx);
+ status = side_ptr_get(dynamic_vla_visitor->visitor)(&tracer_ctx, app_ctx);
switch (status) {
case SIDE_VISITOR_STATUS_OK:
break;
void tracer_print_dynamic(const struct side_arg *item)
{
printf("{ ");
- switch (item->type) {
+ switch (side_enum_get(item->type)) {
/* Dynamic basic types */
case SIDE_TYPE_DYNAMIC_NULL:
tracer_print_type_header("::", side_ptr_get(item->u.side_dynamic.side_null.attr),
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_string((const char *)(uintptr_t) item->u.side_dynamic.side_string.value,
item->u.side_dynamic.side_string.type.unit_size,
- item->u.side_dynamic.side_string.type.byte_order, NULL);
+ side_enum_get(item->u.side_dynamic.side_string.type.byte_order), NULL);
break;
/* Dynamic compound types */
const struct side_arg *sav = side_ptr_get(side_arg_vec->sav);
uint32_t i, side_sav_len = side_arg_vec->len;
- printf("provider: %s, event: %s", desc->provider_name, desc->event_name);
+ printf("provider: %s, event: %s", side_ptr_get(desc->provider_name), side_ptr_get(desc->event_name));
if (desc->nr_fields != side_sav_len) {
fprintf(stderr, "ERROR: number of fields mismatch between description and arguments\n");
abort();
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]);
+ tracer_print_field(&side_ptr_get(desc->fields)[i], &sav[i]);
}
if (nr_items)
*nr_items = i;
/* 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);
+ 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();