-#include <babeltrace/ctf-ir/field-types-internal.h>
-#include <babeltrace/ctf-ir/field-path-internal.h>
-#include <babeltrace/ctf-ir/utils.h>
-#include <babeltrace/ref.h>
-#include <babeltrace/ctf-ir/clock-class.h>
-#include <babeltrace/ctf-ir/clock-class-internal.h>
-#include <babeltrace/ctf-writer/writer-internal.h>
-#include <babeltrace/object-internal.h>
-#include <babeltrace/ref.h>
-#include <babeltrace/compiler.h>
-#include <babeltrace/endian.h>
-#include <float.h>
-#include <inttypes.h>
-#include <stdlib.h>
-
-struct range_overlap_query {
- union {
- uint64_t _unsigned;
- int64_t _signed;
- } range_start;
-
- union {
- uint64_t _unsigned;
- int64_t _signed;
- } range_end;
- int overlaps;
- GQuark mapping_name;
-};
-
-static
-void bt_ctf_field_type_destroy(struct bt_object *);
-static
-void bt_ctf_field_type_integer_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_enumeration_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_floating_point_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_structure_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_variant_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_array_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_sequence_destroy(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_string_destroy(struct bt_ctf_field_type *);
-
-static
-void (* const type_destroy_funcs[])(struct bt_ctf_field_type *) = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_destroy,
- [BT_CTF_TYPE_ID_ENUM] =
- bt_ctf_field_type_enumeration_destroy,
- [BT_CTF_TYPE_ID_FLOAT] =
- bt_ctf_field_type_floating_point_destroy,
- [BT_CTF_TYPE_ID_STRUCT] = bt_ctf_field_type_structure_destroy,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_destroy,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_destroy,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_destroy,
- [BT_CTF_TYPE_ID_STRING] = bt_ctf_field_type_string_destroy,
-};
-
-static
-void generic_field_type_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_integer_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_enumeration_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_structure_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_variant_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_array_freeze(struct bt_ctf_field_type *);
-static
-void bt_ctf_field_type_sequence_freeze(struct bt_ctf_field_type *);
-
-static
-type_freeze_func const type_freeze_funcs[] = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_freeze,
- [BT_CTF_TYPE_ID_ENUM] = bt_ctf_field_type_enumeration_freeze,
- [BT_CTF_TYPE_ID_FLOAT] = generic_field_type_freeze,
- [BT_CTF_TYPE_ID_STRUCT] = bt_ctf_field_type_structure_freeze,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_freeze,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_freeze,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_freeze,
- [BT_CTF_TYPE_ID_STRING] = generic_field_type_freeze,
-};
-
-static
-int bt_ctf_field_type_integer_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_enumeration_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_floating_point_serialize(
- struct bt_ctf_field_type *, struct metadata_context *);
-static
-int bt_ctf_field_type_structure_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_variant_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_array_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_sequence_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-static
-int bt_ctf_field_type_string_serialize(struct bt_ctf_field_type *,
- struct metadata_context *);
-
-static
-type_serialize_func const type_serialize_funcs[] = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_serialize,
- [BT_CTF_TYPE_ID_ENUM] =
- bt_ctf_field_type_enumeration_serialize,
- [BT_CTF_TYPE_ID_FLOAT] =
- bt_ctf_field_type_floating_point_serialize,
- [BT_CTF_TYPE_ID_STRUCT] =
- bt_ctf_field_type_structure_serialize,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_serialize,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_serialize,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_serialize,
- [BT_CTF_TYPE_ID_STRING] = bt_ctf_field_type_string_serialize,
-};
-
-static
-void bt_ctf_field_type_integer_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_enumeration_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_floating_point_set_byte_order(
- struct bt_ctf_field_type *, enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_structure_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_variant_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_array_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-static
-void bt_ctf_field_type_sequence_set_byte_order(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order byte_order);
-
-static
-void (* const set_byte_order_funcs[])(struct bt_ctf_field_type *,
- enum bt_ctf_byte_order) = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_set_byte_order,
- [BT_CTF_TYPE_ID_ENUM] =
- bt_ctf_field_type_enumeration_set_byte_order,
- [BT_CTF_TYPE_ID_FLOAT] =
- bt_ctf_field_type_floating_point_set_byte_order,
- [BT_CTF_TYPE_ID_STRUCT] =
- bt_ctf_field_type_structure_set_byte_order,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_set_byte_order,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_set_byte_order,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_set_byte_order,
- [BT_CTF_TYPE_ID_STRING] = NULL,
-};
-
-static
-struct bt_ctf_field_type *bt_ctf_field_type_integer_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_enumeration_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_floating_point_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_structure_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_variant_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_array_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_sequence_copy(
- struct bt_ctf_field_type *);
-static
-struct bt_ctf_field_type *bt_ctf_field_type_string_copy(
- struct bt_ctf_field_type *);
-
-static
-struct bt_ctf_field_type *(* const type_copy_funcs[])(
- struct bt_ctf_field_type *) = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_copy,
- [BT_CTF_TYPE_ID_ENUM] = bt_ctf_field_type_enumeration_copy,
- [BT_CTF_TYPE_ID_FLOAT] = bt_ctf_field_type_floating_point_copy,
- [BT_CTF_TYPE_ID_STRUCT] = bt_ctf_field_type_structure_copy,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_copy,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_copy,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_copy,
- [BT_CTF_TYPE_ID_STRING] = bt_ctf_field_type_string_copy,
-};
-
-static
-int bt_ctf_field_type_integer_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_floating_point_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_enumeration_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_string_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_structure_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_variant_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_array_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_sequence_compare(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *);
-
-static
-int (* const type_compare_funcs[])(struct bt_ctf_field_type *,
- struct bt_ctf_field_type *) = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_compare,
- [BT_CTF_TYPE_ID_ENUM] = bt_ctf_field_type_enumeration_compare,
- [BT_CTF_TYPE_ID_FLOAT] = bt_ctf_field_type_floating_point_compare,
- [BT_CTF_TYPE_ID_STRUCT] = bt_ctf_field_type_structure_compare,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_compare,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_compare,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_compare,
- [BT_CTF_TYPE_ID_STRING] = bt_ctf_field_type_string_compare,
-};
-
-static
-int bt_ctf_field_type_integer_validate(struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_enumeration_validate(struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_structure_validate(struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_variant_validate(struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_array_validate(struct bt_ctf_field_type *);
-static
-int bt_ctf_field_type_sequence_validate(struct bt_ctf_field_type *);
-
-static
-int (* const type_validate_funcs[])(struct bt_ctf_field_type *) = {
- [BT_CTF_TYPE_ID_INTEGER] = bt_ctf_field_type_integer_validate,
- [BT_CTF_TYPE_ID_FLOAT] = NULL,
- [BT_CTF_TYPE_ID_STRING] = NULL,
- [BT_CTF_TYPE_ID_ENUM] = bt_ctf_field_type_enumeration_validate,
- [BT_CTF_TYPE_ID_STRUCT] = bt_ctf_field_type_structure_validate,
- [BT_CTF_TYPE_ID_VARIANT] = bt_ctf_field_type_variant_validate,
- [BT_CTF_TYPE_ID_ARRAY] = bt_ctf_field_type_array_validate,
- [BT_CTF_TYPE_ID_SEQUENCE] = bt_ctf_field_type_sequence_validate,
-};
-
-static
-void destroy_enumeration_mapping(struct enumeration_mapping *mapping)
-{
- g_free(mapping);
-}
-
-static
-void destroy_structure_field(struct structure_field *field)
-{
- bt_put(field->type);
- g_free(field);
-}
-
-static
-void check_ranges_overlap(gpointer element, gpointer query)
-{
- struct enumeration_mapping *mapping = element;
- struct range_overlap_query *overlap_query = query;
-
- if (mapping->range_start._signed <= overlap_query->range_end._signed
- && overlap_query->range_start._signed <=
- mapping->range_end._signed) {
- overlap_query->overlaps = 1;
- overlap_query->mapping_name = mapping->string;
- }
-
- overlap_query->overlaps |=
- mapping->string == overlap_query->mapping_name;
-}
-
-static
-void check_ranges_overlap_unsigned(gpointer element, gpointer query)
-{
- struct enumeration_mapping *mapping = element;
- struct range_overlap_query *overlap_query = query;
-
- if (mapping->range_start._unsigned <= overlap_query->range_end._unsigned
- && overlap_query->range_start._unsigned <=
- mapping->range_end._unsigned) {
- overlap_query->overlaps = 1;
- overlap_query->mapping_name = mapping->string;
- }
-
- overlap_query->overlaps |=
- mapping->string == overlap_query->mapping_name;
-}
-
-static
-gint compare_enumeration_mappings_signed(struct enumeration_mapping **a,
- struct enumeration_mapping **b)
-{
- return ((*a)->range_start._signed < (*b)->range_start._signed) ? -1 : 1;
-}
-
-static
-gint compare_enumeration_mappings_unsigned(struct enumeration_mapping **a,
- struct enumeration_mapping **b)
-{
- return ((*a)->range_start._unsigned < (*b)->range_start._unsigned) ? -1 : 1;
-}
-
-static
-void bt_ctf_field_type_init(struct bt_ctf_field_type *type, bool init_bo)
-{
- assert(type && (type->id > BT_CTF_TYPE_ID_UNKNOWN) &&
- (type->id < BT_CTF_NR_TYPE_IDS));
-
- bt_object_init(type, bt_ctf_field_type_destroy);
- type->freeze = type_freeze_funcs[type->id];
- type->serialize = type_serialize_funcs[type->id];
-
- if (init_bo) {
- int ret = bt_ctf_field_type_set_byte_order(type,
- BT_CTF_BYTE_ORDER_NATIVE);
- assert(ret == 0);
- }
-
- type->alignment = 1;
-}
-
-static
-int add_structure_field(GPtrArray *fields,
- GHashTable *field_name_to_index,
- struct bt_ctf_field_type *field_type,
- const char *field_name)
-{
- int ret = 0;
- GQuark name_quark = g_quark_from_string(field_name);
- struct structure_field *field;
-
- /* Make sure structure does not contain a field of the same name */
- if (g_hash_table_lookup_extended(field_name_to_index,
- GUINT_TO_POINTER(name_quark), NULL, NULL)) {
- ret = -1;
- goto end;
- }
-
- field = g_new0(struct structure_field, 1);
- if (!field) {
- ret = -1;
- goto end;
- }
-
- bt_get(field_type);
- field->name = name_quark;
- field->type = field_type;
- g_hash_table_insert(field_name_to_index,
- GUINT_TO_POINTER(name_quark),
- GUINT_TO_POINTER(fields->len));
- g_ptr_array_add(fields, field);
-end:
- return ret;
-}
-
-static
-void bt_ctf_field_type_destroy(struct bt_object *obj)
-{
- struct bt_ctf_field_type *type;
- enum bt_ctf_type_id type_id;
-
- type = container_of(obj, struct bt_ctf_field_type, base);
- type_id = type->id;
- if (type_id <= BT_CTF_TYPE_ID_UNKNOWN ||
- type_id >= BT_CTF_NR_TYPE_IDS) {
- return;
- }
-
- type_destroy_funcs[type_id](type);
-}
-
-static
-int bt_ctf_field_type_integer_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
-
- struct bt_ctf_field_type_integer *integer =
- container_of(type, struct bt_ctf_field_type_integer,
- parent);
-
- if (integer->mapped_clock && integer->is_signed) {
- ret = -1;
- goto end;
- }
-
-end:
- return ret;
-}
-
-static
-struct enumeration_mapping *get_enumeration_mapping(
- struct bt_ctf_field_type *type, int index)
-{
- struct enumeration_mapping *mapping = NULL;
- struct bt_ctf_field_type_enumeration *enumeration;
-
- enumeration = container_of(type, struct bt_ctf_field_type_enumeration,
- parent);
- if (index >= enumeration->entries->len) {
- goto end;
- }
-
- mapping = g_ptr_array_index(enumeration->entries, index);
-end:
- return mapping;
-}
-
-/*
- * Note: This algorithm is O(n^2) vs number of enumeration mappings.
- * Only used when freezing an enumeration.
- */
-static
-void set_enumeration_range_overlap(
- struct bt_ctf_field_type *type)
-{
- int i, j, len;
- struct bt_ctf_field_type *container_type;
- struct bt_ctf_field_type_enumeration *enumeration_type;
- int is_signed;
-
- enumeration_type = container_of(type,
- struct bt_ctf_field_type_enumeration, parent);
-
- len = enumeration_type->entries->len;
- container_type = enumeration_type->container;
- is_signed = bt_ctf_field_type_integer_get_signed(container_type);
-
- for (i = 0; i < len; i++) {
- for (j = i + 1; j < len; j++) {
- struct enumeration_mapping *mapping[2];
-
- mapping[0] = get_enumeration_mapping(type, i);
- mapping[1] = get_enumeration_mapping(type, j);
- if (is_signed) {
- if (mapping[0]->range_start._signed
- <= mapping[1]->range_end._signed
- && mapping[0]->range_end._signed
- >= mapping[1]->range_start._signed) {
- enumeration_type->has_overlapping_ranges = true;
- return;
- }
- } else {
- if (mapping[0]->range_start._unsigned
- <= mapping[1]->range_end._unsigned
- && mapping[0]->range_end._unsigned
- >= mapping[1]->range_start._unsigned) {
- enumeration_type->has_overlapping_ranges = true;
- return;
- }
- }
- }
- }
-}
-
-static
-int bt_ctf_field_type_enumeration_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
-
- struct bt_ctf_field_type_enumeration *enumeration =
- container_of(type, struct bt_ctf_field_type_enumeration,
- parent);
- struct bt_ctf_field_type *container_type =
- bt_ctf_field_type_enumeration_get_container_type(type);
-
- if (!container_type) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_validate(container_type);
- if (ret) {
- goto end;
- }
-
- /* Ensure enum has entries */
- ret = enumeration->entries->len ? 0 : -1;
-
-end:
- BT_PUT(container_type);
- return ret;
-}
-
-static
-int bt_ctf_field_type_sequence_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type *element_type = NULL;
- struct bt_ctf_field_type_sequence *sequence =
- container_of(type, struct bt_ctf_field_type_sequence,
- parent);
-
- /* Length field name should be set at this point */
- if (sequence->length_field_name->len == 0) {
- ret = -1;
- goto end;
- }
-
- element_type = bt_ctf_field_type_sequence_get_element_type(type);
- if (!element_type) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_validate(element_type);
-
-end:
- BT_PUT(element_type);
-
- return ret;
-}
-
-static
-int bt_ctf_field_type_array_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type *element_type = NULL;
-
- element_type = bt_ctf_field_type_array_get_element_type(type);
- if (!element_type) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_validate(element_type);
-
-end:
- BT_PUT(element_type);
-
- return ret;
-}
-
-static
-int bt_ctf_field_type_structure_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type *child_type = NULL;
- int field_count = bt_ctf_field_type_structure_get_field_count(type);
- int i;
-
- if (field_count < 0) {
- ret = -1;
- goto end;
- }
-
- for (i = 0; i < field_count; ++i) {
- ret = bt_ctf_field_type_structure_get_field(type,
- NULL, &child_type, i);
- if (ret) {
- goto end;
- }
-
- ret = bt_ctf_field_type_validate(child_type);
- if (ret) {
- goto end;
- }
-
- BT_PUT(child_type);
- }
-
-end:
- BT_PUT(child_type);
-
- return ret;
-}
-
-static
-bool bt_ctf_field_type_enumeration_has_overlapping_ranges(
- struct bt_ctf_field_type_enumeration *enumeration_type)
-{
- if (!enumeration_type->parent.frozen) {
- set_enumeration_range_overlap(&enumeration_type->parent);
- }
- return enumeration_type->has_overlapping_ranges;
-}
-
-static
-int bt_ctf_field_type_enumeration_get_mapping_name(
- struct bt_ctf_field_type *enum_field_type,
- int index,
- const char **mapping_name)
-{
- int ret = 0;
- struct enumeration_mapping *mapping;
-
- if (!enum_field_type || index < 0) {
- ret = -1;
- goto end;
- }
-
- mapping = get_enumeration_mapping(enum_field_type, index);
- if (!mapping) {
- ret = -1;
- goto end;
- }
-
- if (mapping_name) {
- *mapping_name = g_quark_to_string(mapping->string);
- }
-end:
- return ret;
-}
-
-static
-int bt_ctf_field_type_variant_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- int field_count;
- struct bt_ctf_field_type *child_type = NULL;
- struct bt_ctf_field_type_variant *variant =
- container_of(type, struct bt_ctf_field_type_variant,
- parent);
- int i;
- int tag_mappings_count;
-
- if (variant->tag_name->len == 0 || !variant->tag) {
- ret = -1;
- goto end;
- }
-
- if (bt_ctf_field_type_enumeration_has_overlapping_ranges(
- variant->tag)) {
- ret = -1;
- goto end;
- }
-
- tag_mappings_count =
- bt_ctf_field_type_enumeration_get_mapping_count(
- (struct bt_ctf_field_type *) variant->tag);
-
- if (tag_mappings_count != variant->fields->len) {
- ret = -1;
- goto end;
- }
-
- for (i = 0; i < tag_mappings_count; ++i) {
- const char *label;
- struct bt_ctf_field_type *ft;
-
- ret = bt_ctf_field_type_enumeration_get_mapping_name(
- (struct bt_ctf_field_type *) variant->tag,
- i, &label);
- if (ret) {
- goto end;
- }
- if (!label) {
- ret = -1;
- goto end;
- }
-
- ft = bt_ctf_field_type_variant_get_field_type_by_name(
- type, label);
- if (!ft) {
- ret = -1;
- goto end;
- }
-
- BT_PUT(ft);
- }
-
- field_count = bt_ctf_field_type_variant_get_field_count(type);
- if (field_count < 0) {
- ret = -1;
- goto end;
- }
-
- for (i = 0; i < field_count; ++i) {
- ret = bt_ctf_field_type_variant_get_field(type,
- NULL, &child_type, i);
- if (ret) {
- goto end;
- }
-
- ret = bt_ctf_field_type_validate(child_type);
- if (ret) {
- goto end;
- }
-
- BT_PUT(child_type);
- }
-
-end:
- BT_PUT(child_type);
-
- return ret;
-}
-
-/*
- * This function validates a given field type without considering
- * where this field type is located. It only validates the properties
- * of the given field type and the properties of its children if
- * applicable.
- */
-BT_HIDDEN
-int bt_ctf_field_type_validate(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- enum bt_ctf_type_id id = bt_ctf_field_type_get_type_id(type);
-
- if (!type) {
- ret = -1;
- goto end;
- }
-
- if (type->valid) {
- /* Already marked as valid */
- goto end;
- }
-
- if (type_validate_funcs[id]) {
- ret = type_validate_funcs[id](type);
- }
-
- if (!ret && type->frozen) {
- /* Field type is valid */
- type->valid = 1;
- }
-
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_integer_create(unsigned int size)
-{
- struct bt_ctf_field_type_integer *integer =
- g_new0(struct bt_ctf_field_type_integer, 1);
-
- if (!integer || size == 0 || size > 64) {
- return NULL;
- }
-
- integer->parent.id = BT_CTF_TYPE_ID_INTEGER;
- integer->size = size;
- integer->base = BT_CTF_INTEGER_BASE_DECIMAL;
- integer->encoding = BT_CTF_STRING_ENCODING_NONE;
- bt_ctf_field_type_init(&integer->parent, TRUE);
- return &integer->parent;
-}
-
-int bt_ctf_field_type_integer_get_size(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->id != BT_CTF_TYPE_ID_INTEGER) {
- ret = -1;
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- ret = (int) integer->size;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_integer_get_signed(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->id != BT_CTF_TYPE_ID_INTEGER) {
- ret = -1;
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- ret = integer->is_signed;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_integer_set_signed(struct bt_ctf_field_type *type,
- int is_signed)
-{
- int ret = 0;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->frozen ||
- type->id != BT_CTF_TYPE_ID_INTEGER) {
- ret = -1;
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- integer->is_signed = !!is_signed;
-end:
- return ret;
-}
-
-enum bt_ctf_integer_base bt_ctf_field_type_integer_get_base(
- struct bt_ctf_field_type *type)
-{
- enum bt_ctf_integer_base ret = BT_CTF_INTEGER_BASE_UNKNOWN;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->id != BT_CTF_TYPE_ID_INTEGER) {
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- ret = integer->base;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_integer_set_base(struct bt_ctf_field_type *type,
- enum bt_ctf_integer_base base)
-{
- int ret = 0;
-
- if (!type || type->frozen ||
- type->id != BT_CTF_TYPE_ID_INTEGER) {
- ret = -1;
- goto end;
- }
-
- switch (base) {
- case BT_CTF_INTEGER_BASE_BINARY:
- case BT_CTF_INTEGER_BASE_OCTAL:
- case BT_CTF_INTEGER_BASE_DECIMAL:
- case BT_CTF_INTEGER_BASE_HEXADECIMAL:
- {
- struct bt_ctf_field_type_integer *integer = container_of(type,
- struct bt_ctf_field_type_integer, parent);
- integer->base = base;
- break;
- }
- default:
- ret = -1;
- }
-end:
- return ret;
-}
-
-enum bt_ctf_string_encoding bt_ctf_field_type_integer_get_encoding(
- struct bt_ctf_field_type *type)
-{
- enum bt_ctf_string_encoding ret = BT_CTF_STRING_ENCODING_UNKNOWN;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->id != BT_CTF_TYPE_ID_INTEGER) {
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- ret = integer->encoding;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_integer_set_encoding(struct bt_ctf_field_type *type,
- enum bt_ctf_string_encoding encoding)
-{
- int ret = 0;
- struct bt_ctf_field_type_integer *integer;
-
- if (!type || type->frozen ||
- (type->id != BT_CTF_TYPE_ID_INTEGER) ||
- (encoding < BT_CTF_STRING_ENCODING_NONE) ||
- (encoding >= BT_CTF_STRING_ENCODING_UNKNOWN)) {
- ret = -1;
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- integer->encoding = encoding;
-end:
- return ret;
-}
-
-struct bt_ctf_clock_class *bt_ctf_field_type_integer_get_mapped_clock_class(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type_integer *integer;
- struct bt_ctf_clock_class *clock_class = NULL;
-
- if (!type) {
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- clock_class = integer->mapped_clock;
- bt_get(clock_class);
-end:
- return clock_class;
-}
-
-int bt_ctf_field_type_integer_set_mapped_clock_class(
- struct bt_ctf_field_type *type,
- struct bt_ctf_clock_class *clock_class)
-{
- struct bt_ctf_field_type_integer *integer;
- int ret = 0;
-
- if (!type || type->frozen || !bt_ctf_clock_class_is_valid(clock_class)) {
- ret = -1;
- goto end;
- }
-
- integer = container_of(type, struct bt_ctf_field_type_integer, parent);
- bt_put(integer->mapped_clock);
- integer->mapped_clock = bt_get(clock_class);
-end:
- return ret;
-}
-
-static
-void bt_ctf_field_type_enum_iter_destroy(struct bt_object *obj)
-{
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter =
- container_of(obj,
- struct bt_ctf_field_type_enumeration_mapping_iterator,
- base);
-
- bt_put(&iter->enumeration_type->parent);
- g_free(iter);
-}
-
-static
-struct bt_ctf_field_type_enumeration_mapping_iterator *
-bt_ctf_field_type_enumeration_find_mappings_type(
- struct bt_ctf_field_type *type,
- enum bt_ctf_field_type_enumeration_mapping_iterator_type iterator_type)
-{
- struct bt_ctf_field_type_enumeration *enumeration_type;
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter = NULL;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ENUM)) {
- goto end;
- }
-
- enumeration_type = container_of(type,
- struct bt_ctf_field_type_enumeration, parent);
- iter = g_new0(struct bt_ctf_field_type_enumeration_mapping_iterator, 1);
- if (!iter) {
- goto end;
- }
-
- bt_object_init(&iter->base, bt_ctf_field_type_enum_iter_destroy);
- bt_get(type);
- iter->enumeration_type = enumeration_type;
- iter->index = -1;
- iter->type = iterator_type;
-end:
- return iter;
-}
-
-struct bt_ctf_field_type_enumeration_mapping_iterator *
-bt_ctf_field_type_enumeration_find_mappings_by_name(
- struct bt_ctf_field_type *type, const char *name)
-{
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter;
-
- iter = bt_ctf_field_type_enumeration_find_mappings_type(
- type, ITERATOR_BY_NAME);
- if (!iter) {
- goto error;
- }
-
- iter->u.name_quark = g_quark_try_string(name);
- if (!iter->u.name_quark) {
- goto error;
- }
-
- /* Advance iterator to first entry, or leave index at -1. */
- if (bt_ctf_field_type_enumeration_mapping_iterator_next(iter)) {
- /* No entry found. */
- goto error;
- }
-
- return iter;
-error:
- bt_put(iter);
- return NULL;
-}
-
-int bt_ctf_field_type_enumeration_mapping_iterator_next(
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter)
-{
- struct bt_ctf_field_type_enumeration *enumeration;
- struct bt_ctf_field_type *type;
- int i, ret = 0, len;
-
- enumeration = iter->enumeration_type;
- type = &enumeration->parent;
- len = enumeration->entries->len;
- for (i = iter->index + 1; i < len; i++) {
- struct enumeration_mapping *mapping =
- get_enumeration_mapping(type, i);
-
- switch (iter->type) {
- case ITERATOR_BY_NAME:
- if (mapping->string == iter->u.name_quark) {
- iter->index = i;
- goto end;
- }
- break;
- case ITERATOR_BY_SIGNED_VALUE:
- {
- int64_t value = iter->u.signed_value;
-
- if (value >= mapping->range_start._signed &&
- value <= mapping->range_end._signed) {
- iter->index = i;
- goto end;
- }
- break;
- }
- case ITERATOR_BY_UNSIGNED_VALUE:
- {
- uint64_t value = iter->u.unsigned_value;
-
- if (value >= mapping->range_start._unsigned &&
- value <= mapping->range_end._unsigned) {
- iter->index = i;
- goto end;
- }
- break;
- }
- default:
- abort();
- }
- }
-
- ret = -1;
-end:
- return ret;
-}
-
-struct bt_ctf_field_type_enumeration_mapping_iterator *
-bt_ctf_field_type_enumeration_find_mappings_by_signed_value(
- struct bt_ctf_field_type *type, int64_t value)
-{
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter;
-
- iter = bt_ctf_field_type_enumeration_find_mappings_type(
- type, ITERATOR_BY_SIGNED_VALUE);
- if (!iter) {
- goto error;
- }
-
- if (bt_ctf_field_type_integer_get_signed(
- iter->enumeration_type->container) != 1) {
- goto error;
- }
- iter->u.signed_value = value;
-
- /* Advance iterator to first entry, or leave index at -1. */
- if (bt_ctf_field_type_enumeration_mapping_iterator_next(iter)) {
- /* No entry found. */
- goto error;
- }
-
- return iter;
-error:
- bt_put(iter);
- return NULL;
-}
-
-struct bt_ctf_field_type_enumeration_mapping_iterator *
-bt_ctf_field_type_enumeration_find_mappings_by_unsigned_value(
- struct bt_ctf_field_type *type, uint64_t value)
-{
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter;
-
- iter = bt_ctf_field_type_enumeration_find_mappings_type(
- type, ITERATOR_BY_UNSIGNED_VALUE);
- if (!iter) {
- goto error;
- }
-
- if (bt_ctf_field_type_integer_get_signed(
- iter->enumeration_type->container) != 0) {
- goto error;
- }
- iter->u.unsigned_value = value;
-
- /* Advance iterator to first entry, or leave index at -1. */
- if (bt_ctf_field_type_enumeration_mapping_iterator_next(iter)) {
- /* No entry found. */
- goto error;
- }
-
- return iter;
-error:
- bt_put(iter);
- return NULL;
-}
-
-int bt_ctf_field_type_enumeration_mapping_iterator_get_signed(
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter,
- const char **mapping_name, int64_t *range_begin,
- int64_t *range_end)
-{
- int ret = 0;
-
- if (!iter) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_enumeration_get_mapping_signed(
- &iter->enumeration_type->parent, iter->index,
- mapping_name, range_begin, range_end);
-end:
- return ret;
-}
-
-int bt_ctf_field_type_enumeration_mapping_iterator_get_unsigned(
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter,
- const char **mapping_name, uint64_t *range_begin,
- uint64_t *range_end)
-{
- int ret = 0;
-
- if (!iter) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_enumeration_get_mapping_unsigned(
- &iter->enumeration_type->parent, iter->index,
- mapping_name, range_begin, range_end);
-end:
- return ret;
-}
-
-int bt_ctf_field_type_enumeration_get_mapping_signed(
- struct bt_ctf_field_type *enum_field_type,
- int index,
- const char **mapping_name, int64_t *range_begin,
- int64_t *range_end)
-{
- int ret = 0;
- struct enumeration_mapping *mapping;
-
- if (!enum_field_type || index < 0) {
- ret = -1;
- goto end;
- }
-
- mapping = get_enumeration_mapping(enum_field_type, index);
- if (!mapping) {
- ret = -1;
- goto end;
- }
-
- if (mapping_name) {
- *mapping_name = g_quark_to_string(mapping->string);
- }
-
- if (range_begin) {
- *range_begin = mapping->range_start._signed;
- }
-
- if (range_end) {
- *range_end = mapping->range_end._signed;
- }
-end:
- return ret;
-}
-
-int bt_ctf_field_type_enumeration_get_mapping_unsigned(
- struct bt_ctf_field_type *enum_field_type,
- int index,
- const char **mapping_name, uint64_t *range_begin,
- uint64_t *range_end)
-{
- int ret = 0;
- struct enumeration_mapping *mapping;
-
- if (!enum_field_type || index < 0) {
- ret = -1;
- goto end;
- }
-
- mapping = get_enumeration_mapping(enum_field_type, index);
- if (!mapping) {
- ret = -1;
- goto end;
- }
-
- if (mapping_name) {
- *mapping_name = g_quark_to_string(mapping->string);
- }
-
- if (range_begin) {
- *range_begin = mapping->range_start._unsigned;
- }
-
- if (range_end) {
- *range_end = mapping->range_end._unsigned;
- }
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_enumeration_create(
- struct bt_ctf_field_type *integer_container_type)
-{
- struct bt_ctf_field_type_enumeration *enumeration = NULL;
-
- if (!integer_container_type) {
- goto error;
- }
-
- if (integer_container_type->id != BT_CTF_TYPE_ID_INTEGER) {
- goto error;
- }
-
- enumeration = g_new0(struct bt_ctf_field_type_enumeration, 1);
- if (!enumeration) {
- goto error;
- }
-
- enumeration->parent.id = BT_CTF_TYPE_ID_ENUM;
- bt_get(integer_container_type);
- enumeration->container = integer_container_type;
- enumeration->entries = g_ptr_array_new_with_free_func(
- (GDestroyNotify)destroy_enumeration_mapping);
- bt_ctf_field_type_init(&enumeration->parent, FALSE);
- return &enumeration->parent;
-error:
- g_free(enumeration);
- return NULL;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_enumeration_get_container_type(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type *container_type = NULL;
- struct bt_ctf_field_type_enumeration *enumeration_type;
-
- if (!type) {
- goto end;
- }
-
- if (type->id != BT_CTF_TYPE_ID_ENUM) {
- goto end;
- }
-
- enumeration_type = container_of(type,
- struct bt_ctf_field_type_enumeration, parent);
- container_type = enumeration_type->container;
- bt_get(container_type);
-end:
- return container_type;
-}
-
-int bt_ctf_field_type_enumeration_add_mapping(
- struct bt_ctf_field_type *type, const char *string,
- int64_t range_start, int64_t range_end)
-{
- int ret = 0;
- GQuark mapping_name;
- struct enumeration_mapping *mapping;
- struct bt_ctf_field_type_enumeration *enumeration;
- char *escaped_string;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ENUM) ||
- type->frozen ||
- (range_end < range_start)) {
- ret = -1;
- goto end;
- }
-
- if (!string || strlen(string) == 0) {
- ret = -1;
- goto end;
- }
-
- escaped_string = g_strescape(string, NULL);
- if (!escaped_string) {
- ret = -1;
- goto end;
- }
-
- mapping = g_new(struct enumeration_mapping, 1);
- if (!mapping) {
- ret = -1;
- goto error_free;
- }
- mapping_name = g_quark_from_string(escaped_string);
- *mapping = (struct enumeration_mapping) {
- .range_start._signed = range_start,
- .range_end._signed = range_end,
- .string = mapping_name,
- };
- enumeration = container_of(type, struct bt_ctf_field_type_enumeration,
- parent);
- g_ptr_array_add(enumeration->entries, mapping);
- g_ptr_array_sort(enumeration->entries,
- (GCompareFunc)compare_enumeration_mappings_signed);
-error_free:
- free(escaped_string);
-end:
- return ret;
-}
-
-int bt_ctf_field_type_enumeration_add_mapping_unsigned(
- struct bt_ctf_field_type *type, const char *string,
- uint64_t range_start, uint64_t range_end)
-{
- int ret = 0;
- GQuark mapping_name;
- struct enumeration_mapping *mapping;
- struct bt_ctf_field_type_enumeration *enumeration;
- char *escaped_string;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ENUM) ||
- type->frozen ||
- (range_end < range_start)) {
- ret = -1;
- goto end;
- }
-
- if (!string || strlen(string) == 0) {
- ret = -1;
- goto end;
- }
-
- escaped_string = g_strescape(string, NULL);
- if (!escaped_string) {
- ret = -1;
- goto end;
- }
-
- mapping = g_new(struct enumeration_mapping, 1);
- if (!mapping) {
- ret = -1;
- goto error_free;
- }
- mapping_name = g_quark_from_string(escaped_string);
- *mapping = (struct enumeration_mapping) {
- .range_start._unsigned = range_start,
- .range_end._unsigned = range_end,
- .string = mapping_name,
- };
- enumeration = container_of(type, struct bt_ctf_field_type_enumeration,
- parent);
- g_ptr_array_add(enumeration->entries, mapping);
- g_ptr_array_sort(enumeration->entries,
- (GCompareFunc)compare_enumeration_mappings_unsigned);
-error_free:
- free(escaped_string);
-end:
- return ret;
-}
-
-int bt_ctf_field_type_enumeration_get_mapping_count(
- struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_enumeration *enumeration;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ENUM)) {
- ret = -1;
- goto end;
- }
-
- enumeration = container_of(type, struct bt_ctf_field_type_enumeration,
- parent);
- ret = (int) enumeration->entries->len;
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_floating_point_create(void)
-{
- struct bt_ctf_field_type_floating_point *floating_point =
- g_new0(struct bt_ctf_field_type_floating_point, 1);
-
- if (!floating_point) {
- goto end;
- }
-
- floating_point->parent.id = BT_CTF_TYPE_ID_FLOAT;
- floating_point->exp_dig = sizeof(float) * CHAR_BIT - FLT_MANT_DIG;
- floating_point->mant_dig = FLT_MANT_DIG;
- bt_ctf_field_type_init(&floating_point->parent, TRUE);
-end:
- return floating_point ? &floating_point->parent : NULL;
-}
-
-int bt_ctf_field_type_floating_point_get_exponent_digits(
- struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_floating_point *floating_point;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_FLOAT)) {
- ret = -1;
- goto end;
- }
-
- floating_point = container_of(type,
- struct bt_ctf_field_type_floating_point, parent);
- ret = (int) floating_point->exp_dig;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_floating_point_set_exponent_digits(
- struct bt_ctf_field_type *type,
- unsigned int exponent_digits)
-{
- int ret = 0;
- struct bt_ctf_field_type_floating_point *floating_point;
-
- if (!type || type->frozen ||
- (type->id != BT_CTF_TYPE_ID_FLOAT)) {
- ret = -1;
- goto end;
- }
-
- floating_point = container_of(type,
- struct bt_ctf_field_type_floating_point, parent);
- if ((exponent_digits != sizeof(float) * CHAR_BIT - FLT_MANT_DIG) &&
- (exponent_digits != sizeof(double) * CHAR_BIT - DBL_MANT_DIG) &&
- (exponent_digits !=
- sizeof(long double) * CHAR_BIT - LDBL_MANT_DIG)) {
- ret = -1;
- goto end;
- }
-
- floating_point->exp_dig = exponent_digits;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_floating_point_get_mantissa_digits(
- struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_floating_point *floating_point;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_FLOAT)) {
- ret = -1;
- goto end;
- }
-
- floating_point = container_of(type,
- struct bt_ctf_field_type_floating_point, parent);
- ret = (int) floating_point->mant_dig;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_floating_point_set_mantissa_digits(
- struct bt_ctf_field_type *type,
- unsigned int mantissa_digits)
-{
- int ret = 0;
- struct bt_ctf_field_type_floating_point *floating_point;
-
- if (!type || type->frozen ||
- (type->id != BT_CTF_TYPE_ID_FLOAT)) {
- ret = -1;
- goto end;
- }
-
- floating_point = container_of(type,
- struct bt_ctf_field_type_floating_point, parent);
-
- if ((mantissa_digits != FLT_MANT_DIG) &&
- (mantissa_digits != DBL_MANT_DIG) &&
- (mantissa_digits != LDBL_MANT_DIG)) {
- ret = -1;
- goto end;
- }
-
- floating_point->mant_dig = mantissa_digits;
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_structure_create(void)
-{
- struct bt_ctf_field_type_structure *structure =
- g_new0(struct bt_ctf_field_type_structure, 1);
-
- if (!structure) {
- goto error;
- }
-
- structure->parent.id = BT_CTF_TYPE_ID_STRUCT;
- structure->fields = g_ptr_array_new_with_free_func(
- (GDestroyNotify)destroy_structure_field);
- structure->field_name_to_index = g_hash_table_new(NULL, NULL);
- bt_ctf_field_type_init(&structure->parent, TRUE);
- return &structure->parent;
-error:
- return NULL;
-}
-
-int bt_ctf_field_type_structure_add_field(struct bt_ctf_field_type *type,
- struct bt_ctf_field_type *field_type,
- const char *field_name)
-{
- int ret = 0;
- struct bt_ctf_field_type_structure *structure;
-
- /*
- * TODO: check that `field_type` does not contain `type`,
- * recursively.
- */
- if (!type || !field_type || type->frozen ||
- bt_ctf_validate_identifier(field_name) ||
- (type->id != BT_CTF_TYPE_ID_STRUCT) ||
- type == field_type) {
- ret = -1;
- goto end;
- }
-
- structure = container_of(type,
- struct bt_ctf_field_type_structure, parent);
- if (add_structure_field(structure->fields,
- structure->field_name_to_index, field_type, field_name)) {
- ret = -1;
- goto end;
- }
-end:
- return ret;
-}
-
-int bt_ctf_field_type_structure_get_field_count(
- struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_structure *structure;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_STRUCT)) {
- ret = -1;
- goto end;
- }
-
- structure = container_of(type, struct bt_ctf_field_type_structure,
- parent);
- ret = (int) structure->fields->len;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_structure_get_field(struct bt_ctf_field_type *type,
- const char **field_name, struct bt_ctf_field_type **field_type,
- int index)
-{
- struct bt_ctf_field_type_structure *structure;
- struct structure_field *field;
- int ret = 0;
-
- if (!type || index < 0 ||
- (type->id != BT_CTF_TYPE_ID_STRUCT)) {
- ret = -1;
- goto end;
- }
-
- structure = container_of(type, struct bt_ctf_field_type_structure,
- parent);
- if (index >= structure->fields->len) {
- ret = -1;
- goto end;
- }
-
- field = g_ptr_array_index(structure->fields, index);
- if (field_type) {
- *field_type = field->type;
- bt_get(field->type);
- }
- if (field_name) {
- *field_name = g_quark_to_string(field->name);
- }
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_structure_get_field_type_by_name(
- struct bt_ctf_field_type *type,
- const char *name)
-{
- size_t index;
- GQuark name_quark;
- struct structure_field *field;
- struct bt_ctf_field_type_structure *structure;
- struct bt_ctf_field_type *field_type = NULL;
-
- if (!type || !name) {
- goto end;
- }
-
- name_quark = g_quark_try_string(name);
- if (!name_quark) {
- goto end;
- }
-
- structure = container_of(type, struct bt_ctf_field_type_structure,
- parent);
- if (!g_hash_table_lookup_extended(structure->field_name_to_index,
- GUINT_TO_POINTER(name_quark), NULL, (gpointer *)&index)) {
- goto end;
- }
-
- field = structure->fields->pdata[index];
- field_type = field->type;
- bt_get(field_type);
-end:
- return field_type;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_variant_create(
- struct bt_ctf_field_type *enum_tag, const char *tag_name)
-{
- struct bt_ctf_field_type_variant *variant = NULL;
-
- if (tag_name && bt_ctf_validate_identifier(tag_name)) {
- goto error;
- }
-
- variant = g_new0(struct bt_ctf_field_type_variant, 1);
- if (!variant) {
- goto error;
- }
-
- variant->parent.id = BT_CTF_TYPE_ID_VARIANT;
- variant->tag_name = g_string_new(tag_name);
- variant->field_name_to_index = g_hash_table_new(NULL, NULL);
- variant->fields = g_ptr_array_new_with_free_func(
- (GDestroyNotify) destroy_structure_field);
- if (enum_tag) {
- bt_get(enum_tag);
- variant->tag = container_of(enum_tag,
- struct bt_ctf_field_type_enumeration, parent);
- }
-
- bt_ctf_field_type_init(&variant->parent, TRUE);
- /* A variant's alignment is undefined */
- variant->parent.alignment = 0;
- return &variant->parent;
-error:
- return NULL;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_variant_get_tag_type(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type_variant *variant;
- struct bt_ctf_field_type *tag_type = NULL;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_VARIANT)) {
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant, parent);
- if (!variant->tag) {
- goto end;
- }
-
- tag_type = &variant->tag->parent;
- bt_get(tag_type);
-end:
- return tag_type;
-}
-
-const char *bt_ctf_field_type_variant_get_tag_name(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type_variant *variant;
- const char *tag_name = NULL;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_VARIANT)) {
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant, parent);
- if (variant->tag_name->len == 0) {
- goto end;
- }
-
- tag_name = variant->tag_name->str;
-end:
- return tag_name;
-}
-
-int bt_ctf_field_type_variant_set_tag_name(
- struct bt_ctf_field_type *type, const char *name)
-{
- int ret = 0;
- struct bt_ctf_field_type_variant *variant;
-
- if (!type || type->frozen ||
- (type->id != BT_CTF_TYPE_ID_VARIANT) ||
- bt_ctf_validate_identifier(name)) {
- ret = -1;
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant, parent);
- g_string_assign(variant->tag_name, name);
-end:
- return ret;
-}
-
-int bt_ctf_field_type_variant_add_field(struct bt_ctf_field_type *type,
- struct bt_ctf_field_type *field_type,
- const char *field_name)
-{
- size_t i;
- int ret = 0;
- struct bt_ctf_field_type_variant *variant;
- GQuark field_name_quark = g_quark_from_string(field_name);
-
- /*
- * TODO: check that `field_type` does not contain `type`,
- * recursively.
- */
- if (!type || !field_type || type->frozen ||
- bt_ctf_validate_identifier(field_name) ||
- (type->id != BT_CTF_TYPE_ID_VARIANT) ||
- type == field_type) {
- ret = -1;
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant, parent);
-
- /* The user has explicitly provided a tag; validate against it. */
- if (variant->tag) {
- int name_found = 0;
-
- /* Make sure this name is present in the enum tag */
- for (i = 0; i < variant->tag->entries->len; i++) {
- struct enumeration_mapping *mapping =
- g_ptr_array_index(variant->tag->entries, i);
-
- if (mapping->string == field_name_quark) {
- name_found = 1;
- break;
- }
- }
-
- if (!name_found) {
- /* Validation failed */
- ret = -1;
- goto end;
- }
- }
-
- if (add_structure_field(variant->fields, variant->field_name_to_index,
- field_type, field_name)) {
- ret = -1;
- goto end;
- }
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_by_name(
- struct bt_ctf_field_type *type,
- const char *field_name)
-{
- size_t index;
- GQuark name_quark;
- struct structure_field *field;
- struct bt_ctf_field_type_variant *variant;
- struct bt_ctf_field_type *field_type = NULL;
-
- if (!type || !field_name) {
- goto end;
- }
-
- name_quark = g_quark_try_string(field_name);
- if (!name_quark) {
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant, parent);
- if (!g_hash_table_lookup_extended(variant->field_name_to_index,
- GUINT_TO_POINTER(name_quark), NULL, (gpointer *)&index)) {
- goto end;
- }
-
- field = g_ptr_array_index(variant->fields, index);
- field_type = field->type;
- bt_get(field_type);
-end:
- return field_type;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_from_tag(
- struct bt_ctf_field_type *type,
- struct bt_ctf_field *tag)
-{
- int ret;
- const char *enum_value;
- struct bt_ctf_field_type *field_type = NULL;
- struct bt_ctf_field_type_enumeration_mapping_iterator *iter = NULL;
-
- if (!type || !tag || type->id != BT_CTF_TYPE_ID_VARIANT) {
- goto end;
- }
-
- iter = bt_ctf_field_enumeration_get_mappings(tag);
- if (!iter) {
- goto end;
- }
-
- ret = bt_ctf_field_type_enumeration_mapping_iterator_get_signed(iter,
- &enum_value, NULL, NULL);
- if (ret) {
- goto end;
- }
-
- field_type = bt_ctf_field_type_variant_get_field_type_by_name(
- type, enum_value);
-end:
- bt_put(iter);
- return field_type;
-}
-
-int bt_ctf_field_type_variant_get_field_count(struct bt_ctf_field_type *type)
-{
- int ret = 0;
- struct bt_ctf_field_type_variant *variant;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_VARIANT)) {
- ret = -1;
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant,
- parent);
- ret = (int) variant->fields->len;
-end:
- return ret;
-
-}
-
-int bt_ctf_field_type_variant_get_field(struct bt_ctf_field_type *type,
- const char **field_name, struct bt_ctf_field_type **field_type,
- int index)
-{
- struct bt_ctf_field_type_variant *variant;
- struct structure_field *field;
- int ret = 0;
-
- if (!type || index < 0 ||
- (type->id != BT_CTF_TYPE_ID_VARIANT)) {
- ret = -1;
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant,
- parent);
- if (index >= variant->fields->len) {
- ret = -1;
- goto end;
- }
-
- field = g_ptr_array_index(variant->fields, index);
- if (field_type) {
- *field_type = field->type;
- bt_get(field->type);
- }
- if (field_name) {
- *field_name = g_quark_to_string(field->name);
- }
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_array_create(
- struct bt_ctf_field_type *element_type,
- unsigned int length)
-{
- struct bt_ctf_field_type_array *array = NULL;
-
- if (!element_type || length == 0) {
- goto error;
- }
-
- array = g_new0(struct bt_ctf_field_type_array, 1);
- if (!array) {
- goto error;
- }
-
- array->parent.id = BT_CTF_TYPE_ID_ARRAY;
- bt_get(element_type);
- array->element_type = element_type;
- array->length = length;
- bt_ctf_field_type_init(&array->parent, FALSE);
- return &array->parent;
-error:
- return NULL;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_array_get_element_type(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type *ret = NULL;
- struct bt_ctf_field_type_array *array;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ARRAY)) {
- goto end;
- }
-
- array = container_of(type, struct bt_ctf_field_type_array, parent);
- ret = array->element_type;
- bt_get(ret);
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_array_set_element_type(struct bt_ctf_field_type *type,
- struct bt_ctf_field_type *element_type)
-{
- int ret = 0;
- struct bt_ctf_field_type_array *array;
-
- if (!type || !element_type ||
- (type->id != BT_CTF_TYPE_ID_ARRAY)) {
- ret = -1;
- goto end;
- }
-
- array = container_of(type, struct bt_ctf_field_type_array, parent);
-
- if (array->element_type) {
- BT_PUT(array->element_type);
- }
-
- array->element_type = element_type;
- bt_get(array->element_type);
-
-end:
- return ret;
-}
-
-int64_t bt_ctf_field_type_array_get_length(struct bt_ctf_field_type *type)
-{
- int64_t ret;
- struct bt_ctf_field_type_array *array;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_ARRAY)) {
- ret = -1;
- goto end;
- }
-
- array = container_of(type, struct bt_ctf_field_type_array, parent);
- ret = (int64_t) array->length;
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_sequence_create(
- struct bt_ctf_field_type *element_type,
- const char *length_field_name)
-{
- struct bt_ctf_field_type_sequence *sequence = NULL;
-
- if (!element_type || bt_ctf_validate_identifier(length_field_name)) {
- goto error;
- }
-
- sequence = g_new0(struct bt_ctf_field_type_sequence, 1);
- if (!sequence) {
- goto error;
- }
-
- sequence->parent.id = BT_CTF_TYPE_ID_SEQUENCE;
- bt_get(element_type);
- sequence->element_type = element_type;
- sequence->length_field_name = g_string_new(length_field_name);
- bt_ctf_field_type_init(&sequence->parent, FALSE);
- return &sequence->parent;
-error:
- return NULL;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_sequence_get_element_type(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type *ret = NULL;
- struct bt_ctf_field_type_sequence *sequence;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_SEQUENCE)) {
- goto end;
- }
-
- sequence = container_of(type, struct bt_ctf_field_type_sequence,
- parent);
- ret = sequence->element_type;
- bt_get(ret);
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_sequence_set_element_type(struct bt_ctf_field_type *type,
- struct bt_ctf_field_type *element_type)
-{
- int ret = 0;
- struct bt_ctf_field_type_sequence *sequence;
-
- if (!type || !element_type ||
- (type->id != BT_CTF_TYPE_ID_SEQUENCE)) {
- ret = -1;
- goto end;
- }
-
- sequence = container_of(type, struct bt_ctf_field_type_sequence, parent);
-
- if (sequence->element_type) {
- BT_PUT(sequence->element_type);
- }
-
- sequence->element_type = element_type;
- bt_get(sequence->element_type);
-
-end:
- return ret;
-}
-
-const char *bt_ctf_field_type_sequence_get_length_field_name(
- struct bt_ctf_field_type *type)
-{
- const char *ret = NULL;
- struct bt_ctf_field_type_sequence *sequence;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_SEQUENCE)) {
- goto end;
- }
-
- sequence = container_of(type, struct bt_ctf_field_type_sequence,
- parent);
- ret = sequence->length_field_name->str;
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_string_create(void)
-{
- struct bt_ctf_field_type_string *string =
- g_new0(struct bt_ctf_field_type_string, 1);
-
- if (!string) {
- return NULL;
- }
-
- string->parent.id = BT_CTF_TYPE_ID_STRING;
- bt_ctf_field_type_init(&string->parent, TRUE);
- string->encoding = BT_CTF_STRING_ENCODING_UTF8;
- string->parent.alignment = CHAR_BIT;
- return &string->parent;
-}
-
-enum bt_ctf_string_encoding bt_ctf_field_type_string_get_encoding(
- struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type_string *string;
- enum bt_ctf_string_encoding ret = BT_CTF_STRING_ENCODING_UNKNOWN;
-
- if (!type || (type->id != BT_CTF_TYPE_ID_STRING)) {
- goto end;
- }
-
- string = container_of(type, struct bt_ctf_field_type_string,
- parent);
- ret = string->encoding;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_string_set_encoding(struct bt_ctf_field_type *type,
- enum bt_ctf_string_encoding encoding)
-{
- int ret = 0;
- struct bt_ctf_field_type_string *string;
-
- if (!type || type->id != BT_CTF_TYPE_ID_STRING ||
- (encoding != BT_CTF_STRING_ENCODING_UTF8 &&
- encoding != BT_CTF_STRING_ENCODING_ASCII)) {
- ret = -1;
- goto end;
- }
-
- string = container_of(type, struct bt_ctf_field_type_string, parent);
- string->encoding = encoding;
-end:
- return ret;
-}
-
-int bt_ctf_field_type_get_alignment(struct bt_ctf_field_type *type)
-{
- int ret;
- enum bt_ctf_type_id type_id;
-
- if (!type) {
- ret = -1;
- goto end;
- }
-
- if (type->frozen) {
- ret = (int) type->alignment;
- goto end;
- }
-
- type_id = bt_ctf_field_type_get_type_id(type);
- switch (type_id) {
- case BT_CTF_TYPE_ID_SEQUENCE:
- {
- struct bt_ctf_field_type *element =
- bt_ctf_field_type_sequence_get_element_type(type);
-
- if (!element) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_get_alignment(element);
- bt_put(element);
- break;
- }
- case BT_CTF_TYPE_ID_ARRAY:
- {
- struct bt_ctf_field_type *element =
- bt_ctf_field_type_array_get_element_type(type);
-
- if (!element) {
- ret = -1;
- goto end;
- }
-
- ret = bt_ctf_field_type_get_alignment(element);
- bt_put(element);
- break;
- }
- case BT_CTF_TYPE_ID_STRUCT:
- {
- int i, element_count;
-
- element_count = bt_ctf_field_type_structure_get_field_count(
- type);
- if (element_count < 0) {
- ret = element_count;
- goto end;
- }
-
- for (i = 0; i < element_count; i++) {
- struct bt_ctf_field_type *field;
- int field_alignment;
-
- ret = bt_ctf_field_type_structure_get_field(type, NULL,
- &field, i);
- if (ret) {
- goto end;
- }
-
- assert(field);
- field_alignment = bt_ctf_field_type_get_alignment(
- field);
- bt_put(field);
- if (field_alignment < 0) {
- ret = field_alignment;
- goto end;
- }
-
- type->alignment = MAX(field_alignment, type->alignment);
- }
- ret = (int) type->alignment;
- break;
- }
- case BT_CTF_TYPE_ID_UNKNOWN:
- ret = -1;
- break;
- default:
- ret = (int) type->alignment;
- break;
- }
-end:
- return ret;
-}
-
-static inline
-int is_power_of_two(unsigned int value)
-{
- return ((value & (value - 1)) == 0) && value > 0;
-}
-
-int bt_ctf_field_type_set_alignment(struct bt_ctf_field_type *type,
- unsigned int alignment)
-{
- int ret = 0;
- enum bt_ctf_type_id type_id;
-
- /* Alignment must be a power of two */
- if (!type || type->frozen || !is_power_of_two(alignment)) {
- ret = -1;
- goto end;
- }
-
- type_id = bt_ctf_field_type_get_type_id(type);
- if (type_id == BT_CTF_TYPE_ID_UNKNOWN) {
- ret = -1;
- goto end;
- }
-
- if (type->id == BT_CTF_TYPE_ID_STRING &&
- alignment != CHAR_BIT) {
- ret = -1;
- goto end;
- }
-
- if (type_id == BT_CTF_TYPE_ID_VARIANT ||
- type_id == BT_CTF_TYPE_ID_SEQUENCE ||
- type_id == BT_CTF_TYPE_ID_ARRAY) {
- /* Setting an alignment on these types makes no sense */
- ret = -1;
- goto end;
- }
-
- type->alignment = alignment;
- ret = 0;
-end:
- return ret;
-}
-
-enum bt_ctf_byte_order bt_ctf_field_type_get_byte_order(
- struct bt_ctf_field_type *type)
-{
- enum bt_ctf_byte_order ret = BT_CTF_BYTE_ORDER_UNKNOWN;
-
- if (!type) {
- goto end;
- }
-
- switch (type->id) {
- case BT_CTF_TYPE_ID_INTEGER:
- {
- struct bt_ctf_field_type_integer *integer = container_of(
- type, struct bt_ctf_field_type_integer, parent);
- ret = integer->user_byte_order;
- break;
- }
- case BT_CTF_TYPE_ID_ENUM:
- {
- struct bt_ctf_field_type_enumeration *enum_ft = container_of(
- type, struct bt_ctf_field_type_enumeration, parent);
- ret = bt_ctf_field_type_get_byte_order(enum_ft->container);
- break;
- }
- case BT_CTF_TYPE_ID_FLOAT:
- {
- struct bt_ctf_field_type_floating_point *floating_point =
- container_of(type,
- struct bt_ctf_field_type_floating_point,
- parent);
- ret = floating_point->user_byte_order;
- break;
- }
- default:
- goto end;
- }
-
- assert(ret == BT_CTF_BYTE_ORDER_NATIVE ||
- ret == BT_CTF_BYTE_ORDER_LITTLE_ENDIAN ||
- ret == BT_CTF_BYTE_ORDER_BIG_ENDIAN ||
- ret == BT_CTF_BYTE_ORDER_NETWORK);
-
-end:
- return ret;
-}
-
-int bt_ctf_field_type_set_byte_order(struct bt_ctf_field_type *type,
- enum bt_ctf_byte_order byte_order)
-{
- int ret = 0;
-
- if (!type || type->frozen) {
- ret = -1;
- goto end;
- }
-
- if (byte_order != BT_CTF_BYTE_ORDER_NATIVE &&
- byte_order != BT_CTF_BYTE_ORDER_LITTLE_ENDIAN &&
- byte_order != BT_CTF_BYTE_ORDER_BIG_ENDIAN &&
- byte_order != BT_CTF_BYTE_ORDER_NETWORK) {
- ret = -1;
- goto end;
- }
-
- if (set_byte_order_funcs[type->id]) {
- set_byte_order_funcs[type->id](type, byte_order);
- }
-end:
- return ret;
-}
-
-enum bt_ctf_type_id bt_ctf_field_type_get_type_id(
- struct bt_ctf_field_type *type)
-{
- if (!type) {
- return BT_CTF_TYPE_ID_UNKNOWN;
- }
-
- return type->id;
-}
-
-int bt_ctf_field_type_is_integer(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_INTEGER;
-}
-
-int bt_ctf_field_type_is_floating_point(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_FLOAT;
-}
-
-int bt_ctf_field_type_is_enumeration(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_ENUM;
-}
-
-int bt_ctf_field_type_is_string(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_STRING;
-}
-
-int bt_ctf_field_type_is_structure(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_STRUCT;
-}
-
-int bt_ctf_field_type_is_array(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_ARRAY;
-}
-
-int bt_ctf_field_type_is_sequence(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_SEQUENCE;
-}
-
-int bt_ctf_field_type_is_variant(struct bt_ctf_field_type *type)
-{
- return bt_ctf_field_type_get_type_id(type) == BT_CTF_TYPE_ID_VARIANT;
-}
-
-void bt_ctf_field_type_get(struct bt_ctf_field_type *type)
-{
- bt_get(type);
-}
-
-void bt_ctf_field_type_put(struct bt_ctf_field_type *type)
-{
- bt_put(type);
-}
-
-BT_HIDDEN
-void bt_ctf_field_type_freeze(struct bt_ctf_field_type *type)
-{
- if (!type) {
- return;
- }
-
- type->freeze(type);
-}
-
-BT_HIDDEN
-struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_signed(
- struct bt_ctf_field_type_variant *variant,
- int64_t tag_value)
-{
- struct bt_ctf_field_type *type = NULL;
- GQuark field_name_quark;
- gpointer index;
- struct structure_field *field_entry;
- struct range_overlap_query query = {
- .range_start._signed = tag_value,
- .range_end._signed = tag_value,
- .mapping_name = 0,
- .overlaps = 0,
- };
-
- g_ptr_array_foreach(variant->tag->entries, check_ranges_overlap,
- &query);
- if (!query.overlaps) {
- goto end;
- }
-
- field_name_quark = query.mapping_name;
- if (!g_hash_table_lookup_extended(variant->field_name_to_index,
- GUINT_TO_POINTER(field_name_quark), NULL, &index)) {
- goto end;
- }
-
- field_entry = g_ptr_array_index(variant->fields, (size_t) index);
- type = field_entry->type;
-end:
- return type;
-}
-
-BT_HIDDEN
-struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_unsigned(
- struct bt_ctf_field_type_variant *variant,
- uint64_t tag_value)
-{
- struct bt_ctf_field_type *type = NULL;
- GQuark field_name_quark;
- gpointer index;
- struct structure_field *field_entry;
- struct range_overlap_query query = {
- .range_start._unsigned = tag_value,
- .range_end._unsigned = tag_value,
- .mapping_name = 0,
- .overlaps = 0,
- };
-
- g_ptr_array_foreach(variant->tag->entries,
- check_ranges_overlap_unsigned,
- &query);
- if (!query.overlaps) {
- goto end;
- }
-
- field_name_quark = query.mapping_name;
- if (!g_hash_table_lookup_extended(variant->field_name_to_index,
- GUINT_TO_POINTER(field_name_quark), NULL, &index)) {
- goto end;
- }
-
- field_entry = g_ptr_array_index(variant->fields, (size_t)index);
- type = field_entry->type;
-end:
- return type;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_serialize(struct bt_ctf_field_type *type,
- struct metadata_context *context)
-{
- int ret;
-
- if (!type || !context) {
- ret = -1;
- goto end;
- }
-
- /* Make sure field type is valid before serializing it */
- ret = bt_ctf_field_type_validate(type);
-
- if (ret) {
- goto end;
- }
-
- ret = type->serialize(type, context);
-end:
- return ret;
-}
-
-struct bt_ctf_field_type *bt_ctf_field_type_copy(struct bt_ctf_field_type *type)
-{
- struct bt_ctf_field_type *copy = NULL;
-
- if (!type) {
- goto end;
- }
-
- copy = type_copy_funcs[type->id](type);
- copy->alignment = type->alignment;
-end:
- return copy;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_structure_get_field_name_index(
- struct bt_ctf_field_type *type, const char *name)
-{
- int ret;
- size_t index;
- GQuark name_quark;
- struct bt_ctf_field_type_structure *structure;
-
- if (!type || !name ||
- bt_ctf_field_type_get_type_id(type) != BT_CTF_TYPE_ID_STRUCT) {
- ret = -1;
- goto end;
- }
-
- name_quark = g_quark_try_string(name);
- if (!name_quark) {
- ret = -1;
- goto end;
- }
-
- structure = container_of(type, struct bt_ctf_field_type_structure,
- parent);
- if (!g_hash_table_lookup_extended(structure->field_name_to_index,
- GUINT_TO_POINTER(name_quark), NULL, (gpointer *)&index)) {
- ret = -1;
- goto end;
- }
- ret = (int) index;
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_structure_set_field_index(struct bt_ctf_field_type *type,
- struct bt_ctf_field_type *field, int index)
-{
- int ret = 0;
- struct bt_ctf_field_type_structure *structure;
-
- if (!type || !field ||
- bt_ctf_field_type_get_type_id(type) != BT_CTF_TYPE_ID_STRUCT) {
- ret = -1;
- goto end;
- }
-
- structure = container_of(type, struct bt_ctf_field_type_structure,
- parent);
- if (index < 0 || index >= structure->fields->len) {
- ret = -1;
- goto end;
- }
-
- bt_get(field);
- bt_put(((struct structure_field *)
- g_ptr_array_index(structure->fields, index))->type);
- ((struct structure_field *) structure->fields->pdata[index])->type =
- field;
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_variant_get_field_name_index(
- struct bt_ctf_field_type *type, const char *name)
-{
- int ret;
- size_t index;
- GQuark name_quark;
- struct bt_ctf_field_type_variant *variant;
-
- if (!type || !name ||
- bt_ctf_field_type_get_type_id(type) != BT_CTF_TYPE_ID_VARIANT) {
- ret = -1;
- goto end;
- }
-
- name_quark = g_quark_try_string(name);
- if (!name_quark) {
- ret = -1;
- goto end;
- }
-
- variant = container_of(type, struct bt_ctf_field_type_variant,
- parent);
- if (!g_hash_table_lookup_extended(variant->field_name_to_index,
- GUINT_TO_POINTER(name_quark), NULL, (gpointer *)&index)) {
- ret = -1;
- goto end;
- }
- ret = (int) index;
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_sequence_set_length_field_path(
- struct bt_ctf_field_type *type,
- struct bt_ctf_field_path *path)
-{
- int ret = 0;
- struct bt_ctf_field_type_sequence *sequence;
-
- if (!type || bt_ctf_field_type_get_type_id(type) !=
- BT_CTF_TYPE_ID_SEQUENCE) {
- ret = -1;
- goto end;
- }
-
- sequence = container_of(type, struct bt_ctf_field_type_sequence,
- parent);
- bt_get(path);
- BT_MOVE(sequence->length_field_path, path);
-end:
- return ret;
-}
-
-BT_HIDDEN
-int bt_ctf_field_type_variant_set_tag_field_path(struct bt_ctf_field_type *type,
- struct bt_ctf_field_path *path)
-{
- int ret = 0;
- struct bt_ctf_field_type_variant *variant;
-
- if (!type || bt_ctf_field_type_get_type_id(type) !=
- BT_CTF_TYPE_ID_VARIANT) {
- ret = -1;
- goto end;
- }