X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=lib%2Fctf-writer%2Ffield-types.c;h=64cdcd17f7b0570cef98bbae0563420fa4af7484;hb=7cbe7b3643d4dd99097a0696c2748e4c0374dce2;hp=7fbb0bf88ef92cb71a83c3d234c971676b85b9fc;hpb=a6918753fb268b5f69f80d2bb2d72fcc3de0f63b;p=babeltrace.git diff --git a/lib/ctf-writer/field-types.c b/lib/ctf-writer/field-types.c index 7fbb0bf8..64cdcd17 100644 --- a/lib/ctf-writer/field-types.c +++ b/lib/ctf-writer/field-types.c @@ -23,27 +23,3988 @@ */ #define BT_LOG_TAG "CTF-WRITER-FIELD-TYPES" -#include - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include +#include + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include #include #include #include +static +void destroy_enumeration_mapping(struct bt_ctf_enumeration_mapping *mapping) +{ + g_free(mapping); +} + +BT_HIDDEN +void bt_ctf_field_type_common_initialize(struct bt_ctf_field_type_common *ft, + bool init_bo, bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + BT_ASSERT(ft && (ft->id > BT_CTF_FIELD_TYPE_ID_UNKNOWN) && + (ft->id < BT_CTF_FIELD_TYPE_ID_NR)); + + bt_ctf_object_init_shared(&ft->base, release_func); + ft->methods = methods; + + if (init_bo) { + int ret; + const enum bt_ctf_byte_order bo = BT_CTF_BYTE_ORDER_NATIVE; + + BT_LOGD("Setting initial field type's byte order: bo=%s", + bt_ctf_byte_order_string(bo)); + ret = bt_ctf_field_type_common_set_byte_order(ft, bo); + BT_ASSERT(ret == 0); + } + + ft->alignment = 1; +} + +BT_HIDDEN +void bt_ctf_field_type_common_integer_initialize( + struct bt_ctf_field_type_common *ft, + unsigned int size, bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(size > 0); + BT_LOGD("Initializing common integer field type object: size=%u", + size); + ft->id = BT_CTF_FIELD_TYPE_ID_INTEGER; + int_ft->size = size; + int_ft->base = BT_CTF_INTEGER_BASE_DECIMAL; + int_ft->encoding = BT_CTF_STRING_ENCODING_NONE; + bt_ctf_field_type_common_initialize(ft, true, release_func, methods); + BT_LOGD("Initialized common integer field type object: addr=%p, size=%u", + ft, size); +} + +BT_HIDDEN +void bt_ctf_field_type_common_floating_point_initialize( + struct bt_ctf_field_type_common *ft, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + BT_LOGD_STR("Initializing common floating point number field type object."); + ft->id = BT_CTF_FIELD_TYPE_ID_FLOAT; + flt_ft->exp_dig = sizeof(float) * CHAR_BIT - FLT_MANT_DIG; + flt_ft->mant_dig = FLT_MANT_DIG; + bt_ctf_field_type_common_initialize(ft, true, release_func, methods); + BT_LOGD("Initialized common floating point number field type object: addr=%p, " + "exp-size=%u, mant-size=%u", ft, flt_ft->exp_dig, + flt_ft->mant_dig); +} + +BT_HIDDEN +void bt_ctf_field_type_common_enumeration_initialize( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *container_ft, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(container_ft); + BT_LOGD("Initializing common enumeration field type object: int-ft-addr=%p", + container_ft); + ft->id = BT_CTF_FIELD_TYPE_ID_ENUM; + enum_ft->container_ft = bt_ctf_object_get_ref(container_ft); + enum_ft->entries = g_ptr_array_new_with_free_func( + (GDestroyNotify) destroy_enumeration_mapping); + bt_ctf_field_type_common_initialize(ft, false, release_func, methods); + BT_LOGD("Initialized common enumeration field type object: addr=%p, " + "int-ft-addr=%p, int-ft-size=%u", ft, container_ft, + bt_ctf_field_type_common_integer_get_size(container_ft)); +} + +BT_HIDDEN +void bt_ctf_field_type_common_string_initialize( + struct bt_ctf_field_type_common *ft, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_string *string_ft = BT_CTF_FROM_COMMON(ft); + + BT_LOGD_STR("Initializing common string field type object."); + ft->id = BT_CTF_FIELD_TYPE_ID_STRING; + bt_ctf_field_type_common_initialize(ft, true, release_func, methods); + string_ft->encoding = BT_CTF_STRING_ENCODING_UTF8; + ft->alignment = CHAR_BIT; + BT_LOGD("Initialized common string field type object: addr=%p", ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_structure_initialize( + struct bt_ctf_field_type_common *ft, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + + BT_LOGD_STR("Initializing common structure field type object."); + ft->id = BT_CTF_FIELD_TYPE_ID_STRUCT; + struct_ft->fields = g_array_new(FALSE, TRUE, + sizeof(struct bt_ctf_field_type_common_structure_field)); + struct_ft->field_name_to_index = g_hash_table_new(NULL, NULL); + bt_ctf_field_type_common_initialize(ft, true, release_func, methods); + BT_LOGD("Initialized common structure field type object: addr=%p", ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_array_initialize( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *element_ft, + unsigned int length, bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(element_ft); + BT_LOGD("Initializing common array field type object: element-ft-addr=%p, " + "length=%u", element_ft, length); + ft->id = BT_CTF_FIELD_TYPE_ID_ARRAY; + array_ft->element_ft = bt_ctf_object_get_ref(element_ft); + array_ft->length = length; + bt_ctf_field_type_common_initialize(ft, false, release_func, methods); + BT_LOGD("Initialized common array field type object: addr=%p, " + "element-ft-addr=%p, length=%u", ft, element_ft, length); +} + +BT_HIDDEN +void bt_ctf_field_type_common_sequence_initialize( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *element_ft, + const char *length_field_name, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(element_ft); + BT_ASSERT(length_field_name); + BT_ASSERT(bt_ctf_identifier_is_valid(length_field_name)); + BT_LOGD("Initializing common sequence field type object: element-ft-addr=%p, " + "length-field-name=\"%s\"", element_ft, length_field_name); + ft->id = BT_CTF_FIELD_TYPE_ID_SEQUENCE; + seq_ft->element_ft = bt_ctf_object_get_ref(element_ft); + seq_ft->length_field_name = g_string_new(length_field_name); + bt_ctf_field_type_common_initialize(ft, false, release_func, methods); + BT_LOGD("Initialized common sequence field type object: addr=%p, " + "element-ft-addr=%p, length-field-name=\"%s\"", + ft, element_ft, length_field_name); +} + +BT_HIDDEN +void bt_ctf_field_type_common_variant_initialize( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *tag_ft, + const char *tag_name, + bt_ctf_object_release_func release_func, + struct bt_ctf_field_type_common_methods *methods) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(!tag_name || bt_ctf_identifier_is_valid(tag_name)); + BT_LOGD("Initializing common variant field type object: " + "tag-ft-addr=%p, tag-field-name=\"%s\"", + tag_ft, tag_name); + ft->id = BT_CTF_FIELD_TYPE_ID_VARIANT; + var_ft->tag_name = g_string_new(tag_name); + var_ft->choice_name_to_index = g_hash_table_new(NULL, NULL); + var_ft->choices = g_array_new(FALSE, TRUE, + sizeof(struct bt_ctf_field_type_common_variant_choice)); + + if (tag_ft) { + var_ft->tag_ft = bt_ctf_object_get_ref(tag_ft); + } + + bt_ctf_field_type_common_initialize(ft, true, release_func, methods); + /* A variant's alignment is undefined */ + ft->alignment = 0; + BT_LOGD("Initialized common variant field type object: addr=%p, " + "tag-ft-addr=%p, tag-field-name=\"%s\"", + ft, tag_ft, tag_name); +} + +BT_HIDDEN +void bt_ctf_field_type_common_integer_destroy(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_integer *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying integer field type object: addr=%p", ft); + BT_LOGD_STR("Putting mapped clock class."); + bt_ctf_object_put_ref(ft->mapped_clock_class); + g_free(ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_floating_point_destroy(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_floating_point *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying floating point number field type object: addr=%p", ft); + g_free(ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_enumeration_destroy_recursive(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_enumeration *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying enumeration field type object: addr=%p", ft); + g_ptr_array_free(ft->entries, TRUE); + BT_LOGD_STR("Putting container field type."); + bt_ctf_object_put_ref(ft->container_ft); + g_free(ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_string_destroy(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_string *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying string field type object: addr=%p", ft); + g_free(ft); +} + +static +void bt_ctf_field_type_common_structure_field_finalize( + struct bt_ctf_field_type_common_structure_field *field) +{ + if (!field) { + return; + } + + BT_LOGD("Finalizing structure field type's field: " + "addr=%p, field-ft-addr=%p, field-name=\"%s\"", + field, field->type, g_quark_to_string(field->name)); + BT_LOGD_STR("Putting field type."); + bt_ctf_object_put_ref(field->type); +} + +BT_HIDDEN +void bt_ctf_field_type_common_structure_destroy_recursive(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_structure *ft = (void *) obj; + uint64_t i; + + if (!ft) { + return; + } + + BT_LOGD("Destroying structure field type object: addr=%p", ft); + + if (ft->fields) { + for (i = 0; i < ft->fields->len; i++) { + bt_ctf_field_type_common_structure_field_finalize( + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + ft, i)); + } + + g_array_free(ft->fields, TRUE); + } + + if (ft->field_name_to_index) { + g_hash_table_destroy(ft->field_name_to_index); + } + + g_free(ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_array_destroy_recursive(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_array *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying array field type object: addr=%p", ft); + BT_LOGD_STR("Putting element field type."); + bt_ctf_object_put_ref(ft->element_ft); + g_free(ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_sequence_destroy_recursive(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_sequence *ft = (void *) obj; + + if (!ft) { + return; + } + + BT_LOGD("Destroying sequence field type object: addr=%p", ft); + BT_LOGD_STR("Putting element field type."); + bt_ctf_object_put_ref(ft->element_ft); + g_string_free(ft->length_field_name, TRUE); + BT_LOGD_STR("Putting length field path."); + bt_ctf_object_put_ref(ft->length_field_path); + g_free(ft); +} + +static +void bt_ctf_field_type_common_variant_choice_finalize( + struct bt_ctf_field_type_common_variant_choice *choice) +{ + if (!choice) { + return; + } + + BT_LOGD("Finalizing variant field type's choice: " + "addr=%p, field-ft-addr=%p, field-name=\"%s\"", + choice, choice->type, g_quark_to_string(choice->name)); + BT_LOGD_STR("Putting field type."); + bt_ctf_object_put_ref(choice->type); + + if (choice->ranges) { + g_array_free(choice->ranges, TRUE); + } +} + +BT_HIDDEN +void bt_ctf_field_type_common_variant_destroy_recursive(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_common_variant *ft = (void *) obj; + uint64_t i; + + if (!ft) { + return; + } + + BT_LOGD("Destroying variant field type object: addr=%p", ft); + + if (ft->choices) { + for (i = 0; i < ft->choices->len; i++) { + bt_ctf_field_type_common_variant_choice_finalize( + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + ft, i)); + } + + g_array_free(ft->choices, TRUE); + } + + if (ft->choice_name_to_index) { + g_hash_table_destroy(ft->choice_name_to_index); + } + + if (ft->tag_name) { + g_string_free(ft->tag_name, TRUE); + } + + BT_LOGD_STR("Putting tag field type."); + bt_ctf_object_put_ref(ft->tag_ft); + BT_LOGD_STR("Putting tag field path."); + bt_ctf_object_put_ref(ft->tag_field_path); + g_free(ft); +} + +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 check_ranges_overlap(gpointer element, gpointer query) +{ + struct bt_ctf_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; + + if (overlap_query->overlaps) { + BT_LOGV("Overlapping enumeration field type mappings: " + "mapping-name=\"%s\", " + "mapping-a-range-start=%" PRId64 ", " + "mapping-a-range-end=%" PRId64 ", " + "mapping-b-range-start=%" PRId64 ", " + "mapping-b-range-end=%" PRId64, + g_quark_to_string(mapping->string), + mapping->range_start._signed, + mapping->range_end._signed, + overlap_query->range_start._signed, + overlap_query->range_end._signed); + } +} + +static +void check_ranges_overlap_unsigned(gpointer element, gpointer query) +{ + struct bt_ctf_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; + + if (overlap_query->overlaps) { + BT_LOGW("Overlapping enumeration field type mappings: " + "mapping-name=\"%s\", " + "mapping-a-range-start=%" PRIu64 ", " + "mapping-a-range-end=%" PRIu64 ", " + "mapping-b-range-start=%" PRIu64 ", " + "mapping-b-range-end=%" PRIu64, + g_quark_to_string(mapping->string), + mapping->range_start._unsigned, + mapping->range_end._unsigned, + overlap_query->range_start._unsigned, + overlap_query->range_end._unsigned); + } +} + +static +gint compare_enumeration_mappings_signed(struct bt_ctf_enumeration_mapping **a, + struct bt_ctf_enumeration_mapping **b) +{ + return ((*a)->range_start._signed < (*b)->range_start._signed) ? -1 : 1; +} + +static +gint compare_enumeration_mappings_unsigned(struct bt_ctf_enumeration_mapping **a, + struct bt_ctf_enumeration_mapping **b) +{ + return ((*a)->range_start._unsigned < (*b)->range_start._unsigned) ? -1 : 1; +} + +static +int add_structure_variant_member(GArray *members, + GHashTable *field_name_to_index, + struct bt_ctf_field_type_common *field_type, const char *field_name, + bool is_variant) +{ + int ret = 0; + GQuark name_quark = g_quark_from_string(field_name); + struct bt_ctf_field_type_common **member_ft; + GQuark *member_name; + + /* 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)) { + BT_LOGW("Structure or variant field type already contains a field type with this name: " + "field-name=\"%s\"", field_name); + ret = -1; + goto end; + } + + g_array_set_size(members, members->len + 1); + + if (is_variant) { + struct bt_ctf_field_type_common_variant_choice *choice = + &g_array_index(members, + struct bt_ctf_field_type_common_variant_choice, + members->len - 1); + + member_ft = &choice->type; + member_name = &choice->name; + BT_ASSERT(!choice->ranges); + choice->ranges = g_array_new(FALSE, TRUE, + sizeof(struct bt_ctf_field_type_common_variant_choice_range)); + BT_ASSERT(choice->ranges); + } else { + struct bt_ctf_field_type_common_structure_field *field = + &g_array_index(members, + struct bt_ctf_field_type_common_structure_field, + members->len - 1); + + member_ft = &field->type; + member_name = &field->name; + } + + *member_name = name_quark; + *member_ft = bt_ctf_object_get_ref(field_type); + g_hash_table_insert(field_name_to_index, + GUINT_TO_POINTER(name_quark), + GUINT_TO_POINTER(members->len - 1)); + BT_LOGV("Added structure/variant field type member: member-ft-addr=%p, " + "member-name=\"%s\"", field_type, field_name); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_validate(struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + if (int_ft->mapped_clock_class && int_ft->is_signed) { + BT_LOGW("Invalid integer field type: cannot be signed and have a mapped clock class: " + "ft-addr=%p, clock-class-addr=%p, clock-class-name=\"%s\"", + ft, int_ft->mapped_clock_class, + bt_ctf_clock_class_get_name(int_ft->mapped_clock_class)); + ret = -1; + goto end; + } + +end: + return ret; +} + +static +void bt_ctf_field_type_enum_iter_destroy(struct bt_ctf_object *obj) +{ + struct bt_ctf_field_type_enumeration_mapping_iterator *iter = + container_of(obj, + struct bt_ctf_field_type_enumeration_mapping_iterator, + base); + + BT_LOGD("Destroying enumeration field type mapping iterator: addr=%p", + obj); + BT_LOGD_STR("Putting parent enumeration field type."); + bt_ctf_object_put_ref(iter->enumeration_ft); + g_free(iter); +} + +static +struct bt_ctf_field_type_enumeration_mapping_iterator * +bt_ctf_field_type_common_enumeration_find_mappings_type( + struct bt_ctf_field_type_common *ft, + enum bt_ctf_field_type_enumeration_mapping_iterator_type iterator_type) +{ + struct bt_ctf_field_type_enumeration_mapping_iterator *iter = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ENUM, + "Field type"); + iter = g_new0(struct bt_ctf_field_type_enumeration_mapping_iterator, 1); + if (!iter) { + BT_LOGE_STR("Failed to allocate one enumeration field type mapping."); + goto end; + } + + bt_ctf_object_init_shared(&iter->base, bt_ctf_field_type_enum_iter_destroy); + iter->enumeration_ft = bt_ctf_object_get_ref(ft); + iter->index = -1; + iter->type = iterator_type; + +end: + return iter; +} + +BT_HIDDEN +struct bt_ctf_field_type_enumeration_mapping_iterator * +bt_ctf_field_type_common_enumeration_find_mappings_by_name( + struct bt_ctf_field_type_common *ft, const char *name) +{ + struct bt_ctf_field_type_enumeration_mapping_iterator *iter; + + iter = bt_ctf_field_type_common_enumeration_find_mappings_type( + ft, CTF_ITERATOR_BY_NAME); + if (!iter) { + BT_LOGW("Cannot create enumeration field type mapping iterator: " + "ft-addr=%p, mapping-name=\"%s\"", ft, name); + goto error; + } + + iter->u.name_quark = g_quark_try_string(name); + if (!iter->u.name_quark) { + /* + * No results are possible, set the iterator's position at the + * end. + */ + iter->index = iter->enumeration_ft->entries->len; + } + + return iter; + +error: + bt_ctf_object_put_ref(iter); + return NULL; +} + +static +struct bt_ctf_enumeration_mapping *bt_ctf_field_type_common_enumeration_get_mapping_by_index( + struct bt_ctf_field_type_common *ft, uint64_t index) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_enumeration_mapping *mapping = NULL; + + if (index >= enum_ft->entries->len) { + BT_LOGW("Invalid parameter: index is out of bounds: " + "addr=%p, index=%" PRIu64 ", count=%u", + ft, index, enum_ft->entries->len); + goto end; + } + + mapping = g_ptr_array_index(enum_ft->entries, index); + +end: + return mapping; +} + +BT_HIDDEN +int bt_ctf_field_type_enumeration_mapping_iterator_next( + struct bt_ctf_field_type_enumeration_mapping_iterator *iter) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = iter->enumeration_ft; + int i, ret = 0, len; + + BT_ASSERT_PRE_NON_NULL(iter, "Enumeration field type mapping iterator"); + len = enum_ft->entries->len; + for (i = iter->index + 1; i < len; i++) { + struct bt_ctf_enumeration_mapping *mapping = + bt_ctf_field_type_common_enumeration_get_mapping_by_index( + BT_CTF_TO_COMMON(enum_ft), i); + + switch (iter->type) { + case CTF_ITERATOR_BY_NAME: + if (mapping->string == iter->u.name_quark) { + iter->index = i; + goto end; + } + break; + case CTF_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 CTF_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: + BT_LOGF("Invalid enumeration field type mapping iterator type: " + "type=%d", iter->type); + abort(); + } + } + + ret = -1; + +end: + return ret; +} + +BT_HIDDEN +struct bt_ctf_field_type_enumeration_mapping_iterator * +bt_ctf_field_type_common_enumeration_signed_find_mappings_by_value( + struct bt_ctf_field_type_common *ft, int64_t value) +{ + struct bt_ctf_field_type_enumeration_mapping_iterator *iter; + + iter = bt_ctf_field_type_common_enumeration_find_mappings_type( + ft, CTF_ITERATOR_BY_SIGNED_VALUE); + if (!iter) { + BT_LOGW("Cannot create enumeration field type mapping iterator: " + "ft-addr=%p, value=%" PRId64, ft, value); + goto error; + } + + if (bt_ctf_field_type_common_integer_is_signed( + BT_CTF_TO_COMMON(iter->enumeration_ft->container_ft)) != 1) { + BT_LOGW("Invalid parameter: enumeration field type is unsigned: " + "enum-ft-addr=%p, int-ft-addr=%p", + ft, iter->enumeration_ft->container_ft); + goto error; + } + + iter->u.signed_value = value; + return iter; + +error: + bt_ctf_object_put_ref(iter); + return NULL; +} + +BT_HIDDEN +struct bt_ctf_field_type_enumeration_mapping_iterator * +bt_ctf_field_type_common_enumeration_unsigned_find_mappings_by_value( + struct bt_ctf_field_type_common *ft, uint64_t value) +{ + struct bt_ctf_field_type_enumeration_mapping_iterator *iter; + + iter = bt_ctf_field_type_common_enumeration_find_mappings_type( + ft, CTF_ITERATOR_BY_UNSIGNED_VALUE); + if (!iter) { + BT_LOGW("Cannot create enumeration field type mapping iterator: " + "ft-addr=%p, value=%" PRIu64, ft, value); + goto error; + } + + if (bt_ctf_field_type_common_integer_is_signed( + BT_CTF_TO_COMMON(iter->enumeration_ft->container_ft)) != 0) { + BT_LOGW("Invalid parameter: enumeration field type is signed: " + "enum-ft-addr=%p, int-ft-addr=%p", + ft, iter->enumeration_ft->container_ft); + goto error; + } + + iter->u.unsigned_value = value; + return iter; + +error: + bt_ctf_object_put_ref(iter); + return NULL; +} + +BT_HIDDEN +int bt_ctf_field_type_enumeration_mapping_iterator_signed_get( + struct bt_ctf_field_type_enumeration_mapping_iterator *iter, + const char **mapping_name, int64_t *range_begin, + int64_t *range_end) +{ + BT_ASSERT_PRE_NON_NULL(iter, "Enumeration field type mapping iterator"); + BT_ASSERT_PRE(iter->index != -1, + "Invalid enumeration field type mapping iterator access: " + "addr=%p, position=-1", iter); + return bt_ctf_field_type_common_enumeration_signed_get_mapping_by_index( + (void *) iter->enumeration_ft, iter->index, + mapping_name, range_begin, range_end); +} + +BT_HIDDEN +int bt_ctf_field_type_enumeration_mapping_iterator_unsigned_get( + struct bt_ctf_field_type_enumeration_mapping_iterator *iter, + const char **mapping_name, uint64_t *range_begin, + uint64_t *range_end) +{ + BT_ASSERT_PRE_NON_NULL(iter, "Enumeration field type mapping iterator"); + BT_ASSERT_PRE(iter->index != -1, + "Invalid enumeration field type mapping iterator access: " + "addr=%p, position=-1", iter); + return bt_ctf_field_type_common_enumeration_unsigned_get_mapping_by_index( + (void *) iter->enumeration_ft, iter->index, + mapping_name, range_begin, range_end); +} + +/* + * Note: This algorithm is O(n^2) vs number of enumeration mappings. + * Only used when freezing an enumeration. + */ +static +void bt_ctf_field_type_common_enumeration_set_range_overlap( + struct bt_ctf_field_type_common_enumeration *ft) +{ + int64_t i, j, len; + int is_signed; + + BT_LOGV("Setting enumeration field type's overlap flag: addr=%p", + ft); + len = ft->entries->len; + is_signed = bt_ctf_field_type_common_integer_is_signed( + BT_CTF_TO_COMMON(ft->container_ft)); + + for (i = 0; i < len; i++) { + for (j = i + 1; j < len; j++) { + struct bt_ctf_enumeration_mapping *mapping[2]; + + mapping[0] = bt_ctf_field_type_common_enumeration_get_mapping_by_index( + BT_CTF_TO_COMMON(ft), i); + mapping[1] = bt_ctf_field_type_common_enumeration_get_mapping_by_index( + BT_CTF_TO_COMMON(ft), 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) { + ft->has_overlapping_ranges = BT_TRUE; + goto end; + } + } else { + if (mapping[0]->range_start._unsigned + <= mapping[1]->range_end._unsigned + && mapping[0]->range_end._unsigned + >= mapping[1]->range_start._unsigned) { + ft->has_overlapping_ranges = BT_TRUE; + goto end; + } + } + } + } + +end: + if (ft->has_overlapping_ranges) { + BT_LOGV_STR("Enumeration field type has overlapping ranges."); + } else { + BT_LOGV_STR("Enumeration field type has no overlapping ranges."); + } +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_validate_recursive( + struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + ret = bt_ctf_field_type_common_integer_validate( + BT_CTF_TO_COMMON(enum_ft->container_ft)); + if (ret) { + BT_LOGW("Invalid enumeration field type: container type is invalid: " + "enum-ft-addr=%p, int-ft-addr=%p", + ft, enum_ft->container_ft); + goto end; + } + + /* Ensure enum has entries */ + if (enum_ft->entries->len == 0) { + BT_LOGW("Invalid enumeration field type: no entries: " + "addr=%p", ft); + ret = -1; + goto end; + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_sequence_validate_recursive( + struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + /* Length field name should be set at this point */ + if (seq_ft->length_field_name->len == 0) { + BT_LOGW("Invalid sequence field type: no length field name: " + "addr=%p", ft); + ret = -1; + goto end; + } + + ret = bt_ctf_field_type_common_validate(seq_ft->element_ft); + if (ret) { + BT_LOGW("Invalid sequence field type: invalid element field type: " + "seq-ft-addr=%p, element-ft-add=%p", + ft, seq_ft->element_ft); + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_array_validate_recursive( + struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + ret = bt_ctf_field_type_common_validate(array_ft->element_ft); + if (ret) { + BT_LOGW("Invalid array field type: invalid element field type: " + "array-ft-addr=%p, element-ft-add=%p", + ft, array_ft->element_ft); + } + + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_validate_recursive( + struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + struct bt_ctf_field_type_common *child_ft = NULL; + int64_t field_count = + bt_ctf_field_type_common_structure_get_field_count(ft); + int64_t i; + + BT_ASSERT(field_count >= 0); + + for (i = 0; i < field_count; ++i) { + const char *field_name; + + ret = bt_ctf_field_type_common_structure_borrow_field_by_index(ft, + &field_name, &child_ft, i); + BT_ASSERT(ret == 0); + ret = bt_ctf_field_type_common_validate(child_ft); + if (ret) { + BT_LOGW("Invalid structure field type: " + "a contained field type is invalid: " + "struct-ft-addr=%p, field-ft-addr=%p, " + "field-name=\"%s\", field-index=%" PRId64, + ft, child_ft, field_name, i); + goto end; + } + } + +end: + return ret; +} + +static +bt_bool bt_ctf_field_type_common_enumeration_has_overlapping_ranges( + struct bt_ctf_field_type_common_enumeration *enum_ft) +{ + if (!enum_ft->common.frozen) { + bt_ctf_field_type_common_enumeration_set_range_overlap(enum_ft); + } + + return enum_ft->has_overlapping_ranges; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_validate_recursive( + struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + int64_t field_count; + struct bt_ctf_field_type_common *child_ft = NULL; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + int64_t i; + + if (var_ft->tag_name->len == 0) { + BT_LOGW("Invalid variant field type: no tag field name: " + "addr=%p", ft); + ret = -1; + goto end; + } + + if (!var_ft->tag_ft) { + BT_LOGW("Invalid variant field type: no tag field type: " + "addr=%p, tag-field-name=\"%s\"", var_ft, + var_ft->tag_name->str); + ret = -1; + goto end; + } + + if (bt_ctf_field_type_common_enumeration_has_overlapping_ranges(var_ft->tag_ft)) { + BT_LOGW("Invalid variant field type: enumeration tag field type has overlapping ranges: " + "variant-ft-addr=%p, tag-field-name=\"%s\", " + "enum-ft-addr=%p", ft, var_ft->tag_name->str, + var_ft->tag_ft); + ret = -1; + goto end; + } + + /* + * It is valid to have a variant field type which does not have + * the fields corresponding to each label in the associated + * enumeration. + * + * It is also valid to have variant field type fields which + * cannot be selected because the variant field type tag has no + * mapping named as such. This scenario, while not ideal, cannot + * cause any error. + * + * If a non-existing field happens to be selected by an + * enumeration while reading a variant field, an error will be + * generated at that point (while reading the stream). + */ + field_count = bt_ctf_field_type_common_variant_get_field_count(ft); + if (field_count < 0) { + BT_LOGW("Invalid variant field type: no fields: " + "addr=%p, tag-field-name=\"%s\"", + ft, var_ft->tag_name->str); + ret = -1; + goto end; + } + + for (i = 0; i < field_count; ++i) { + const char *field_name; + + ret = bt_ctf_field_type_common_variant_borrow_field_by_index(ft, + &field_name, &child_ft, i); + BT_ASSERT(ret == 0); + ret = bt_ctf_field_type_common_validate(child_ft); + if (ret) { + BT_LOGW("Invalid variant field type: " + "a contained field type is invalid: " + "variant-ft-addr=%p, tag-field-name=\"%s\", " + "field-ft-addr=%p, field-name=\"%s\", " + "field-index=%" PRId64, + ft, var_ft->tag_name->str, child_ft, + field_name, i); + goto end; + } + } + +end: + 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_common_validate(struct bt_ctf_field_type_common *ft) +{ + int ret = 0; + + BT_ASSERT(ft); + + if (ft->valid) { + /* Already marked as valid */ + goto end; + } + + if (ft->methods->validate) { + ret = ft->methods->validate(ft); + } + + if (ret == 0 && ft->frozen) { + /* Field type is valid */ + BT_LOGV("Marking field type as valid: addr=%p", ft); + ft->valid = 1; + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_get_size(struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_INTEGER, + "Field type"); + return (int) int_ft->size; +} + +BT_HIDDEN +bt_bool bt_ctf_field_type_common_integer_is_signed(struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_INTEGER, + "Field type"); + return int_ft->is_signed; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_is_signed(struct bt_ctf_field_type_common *ft, + bt_bool is_signed) +{ + int ret = 0; + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { + BT_LOGW("Invalid parameter: field type is not an integer field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + int_ft->is_signed = !!is_signed; + BT_LOGV("Set integer field type's signedness: addr=%p, is-signed=%d", + ft, is_signed); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_size(struct bt_ctf_field_type_common *ft, + unsigned int size) +{ + int ret = 0; + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { + BT_LOGW("Invalid parameter: field type is not an integer field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (size == 0 || size > 64) { + BT_LOGW("Invalid parameter: size must be between 1 and 64: " + "addr=%p, size=%u", ft, size); + ret = -1; + goto end; + } + + int_ft->size = size; + BT_LOGV("Set integer field type's size: addr=%p, size=%u", + ft, size); + +end: + return ret; +} + +BT_HIDDEN +enum bt_ctf_integer_base bt_ctf_field_type_common_integer_get_base( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_INTEGER, + "Field type"); + return int_ft->base; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_base(struct bt_ctf_field_type_common *ft, + enum bt_ctf_integer_base base) +{ + int ret = 0; + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { + BT_LOGW("Invalid parameter: field type is not an integer field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + switch (base) { + case BT_CTF_INTEGER_BASE_UNSPECIFIED: + case BT_CTF_INTEGER_BASE_BINARY: + case BT_CTF_INTEGER_BASE_OCTAL: + case BT_CTF_INTEGER_BASE_DECIMAL: + case BT_CTF_INTEGER_BASE_HEXADECIMAL: + { + int_ft->base = base; + break; + } + default: + BT_LOGW("Invalid parameter: unknown integer field type base: " + "addr=%p, base=%d", ft, base); + ret = -1; + } + + BT_LOGV("Set integer field type's base: addr=%p, base=%s", + ft, bt_ctf_integer_base_string(base)); + +end: + return ret; +} + +BT_HIDDEN +enum bt_ctf_string_encoding bt_ctf_field_type_common_integer_get_encoding( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_INTEGER, + "Field type"); + return int_ft->encoding; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_encoding(struct bt_ctf_field_type_common *ft, + enum bt_ctf_string_encoding encoding) +{ + int ret = 0; + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { + BT_LOGW("Invalid parameter: field type is not an integer field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (encoding != BT_CTF_STRING_ENCODING_UTF8 && + encoding != BT_CTF_STRING_ENCODING_ASCII && + encoding != BT_CTF_STRING_ENCODING_NONE) { + BT_LOGW("Invalid parameter: unknown string encoding: " + "addr=%p, encoding=%d", ft, encoding); + ret = -1; + goto end; + } + + int_ft->encoding = encoding; + BT_LOGV("Set integer field type's encoding: addr=%p, encoding=%s", + ft, bt_ctf_string_encoding_string(encoding)); + +end: + return ret; +} + +BT_HIDDEN +struct bt_ctf_clock_class *bt_ctf_field_type_common_integer_borrow_mapped_clock_class( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_INTEGER, + "Field type"); + return int_ft->mapped_clock_class; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_mapped_clock_class_no_check_frozen( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_clock_class *clock_class) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + int ret = 0; + + if (!clock_class) { + BT_LOGW_STR("Invalid parameter: clock class is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { + BT_LOGW("Invalid parameter: field type is not an integer field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + goto end; + } + + if (!bt_ctf_clock_class_is_valid(clock_class)) { + BT_LOGW("Invalid parameter: clock class is invalid: ft-addr=%p" + "clock-class-addr=%p, clock-class-name=\"%s\"", + ft, clock_class, + bt_ctf_clock_class_get_name(clock_class)); + ret = -1; + goto end; + } + + bt_ctf_object_put_ref(int_ft->mapped_clock_class); + int_ft->mapped_clock_class = bt_ctf_object_get_ref(clock_class); + BT_LOGV("Set integer field type's mapped clock class: ft-addr=%p, " + "clock-class-addr=%p, clock-class-name=\"%s\"", + ft, clock_class, bt_ctf_clock_class_get_name(clock_class)); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_integer_set_mapped_clock_class( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_clock_class *clock_class) +{ + int ret = 0; + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + ret = bt_ctf_field_type_common_integer_set_mapped_clock_class_no_check_frozen( + ft, clock_class); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_signed_get_mapping_by_index( + struct bt_ctf_field_type_common *ft, uint64_t index, + const char **mapping_name, int64_t *range_begin, + int64_t *range_end) +{ + int ret = 0; + struct bt_ctf_enumeration_mapping *mapping; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, + BT_CTF_FIELD_TYPE_ID_ENUM, "Field type"); + mapping = bt_ctf_field_type_common_enumeration_get_mapping_by_index(ft, + index); + if (!mapping) { + /* bt_ctf_field_type_common_enumeration_get_mapping_by_index() logs errors */ + ret = -1; + goto end; + } + + if (mapping_name) { + *mapping_name = g_quark_to_string(mapping->string); + BT_ASSERT(*mapping_name); + } + + if (range_begin) { + *range_begin = mapping->range_start._signed; + } + + if (range_end) { + *range_end = mapping->range_end._signed; + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_unsigned_get_mapping_by_index( + struct bt_ctf_field_type_common *ft, uint64_t index, + const char **mapping_name, uint64_t *range_begin, + uint64_t *range_end) +{ + int ret = 0; + struct bt_ctf_enumeration_mapping *mapping; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ENUM, "Field type"); + mapping = bt_ctf_field_type_common_enumeration_get_mapping_by_index( + ft, index); + if (!mapping) { + /* bt_ctf_field_type_common_enumeration_get_mapping_by_index() reports any error */ + ret = -1; + goto end; + } + + if (mapping_name) { + *mapping_name = g_quark_to_string(mapping->string); + BT_ASSERT(*mapping_name); + } + + if (range_begin) { + *range_begin = mapping->range_start._unsigned; + } + + if (range_end) { + *range_end = mapping->range_end._unsigned; + } + +end: + return ret; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_enumeration_borrow_container_field_type( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ENUM, "Field type"); + return BT_CTF_TO_COMMON(enum_ft->container_ft); +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_signed_add_mapping( + struct bt_ctf_field_type_common *ft, const char *string, + int64_t range_start, int64_t range_end) +{ + int ret = 0; + GQuark mapping_name; + struct bt_ctf_enumeration_mapping *mapping; + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + char *escaped_string; + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (!string) { + BT_LOGW_STR("Invalid parameter: string is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_ENUM) { + BT_LOGW("Invalid parameter: field type is not an enumeration field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (range_end < range_start) { + BT_LOGW("Invalid parameter: range's end is lesser than range's start: " + "addr=%p, range-start=%" PRId64 ", range-end=%" PRId64, + ft, range_start, range_end); + ret = -1; + goto end; + } + + if (strlen(string) == 0) { + BT_LOGW("Invalid parameter: mapping name is an empty string: " + "enum-ft-addr=%p, mapping-name-addr=%p", ft, + string); + ret = -1; + goto end; + } + + escaped_string = g_strescape(string, NULL); + if (!escaped_string) { + BT_LOGE("Cannot escape mapping name: enum-ft-addr=%p, " + "mapping-name-addr=%p, mapping-name=\"%s\"", + ft, string, string); + ret = -1; + goto end; + } + + mapping = g_new(struct bt_ctf_enumeration_mapping, 1); + if (!mapping) { + BT_LOGE_STR("Failed to allocate one enumeration mapping."); + ret = -1; + goto error_free; + } + mapping_name = g_quark_from_string(escaped_string); + *mapping = (struct bt_ctf_enumeration_mapping) { + .range_start._signed = range_start, + .range_end._signed = range_end, + .string = mapping_name, + }; + g_ptr_array_add(enum_ft->entries, mapping); + g_ptr_array_sort(enum_ft->entries, + (GCompareFunc) compare_enumeration_mappings_signed); + BT_LOGV("Added mapping to signed enumeration field type: addr=%p, " + "name=\"%s\", range-start=%" PRId64 ", " + "range-end=%" PRId64, + ft, string, range_start, range_end); + +error_free: + free(escaped_string); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_unsigned_add_mapping( + struct bt_ctf_field_type_common *ft, const char *string, + uint64_t range_start, uint64_t range_end) +{ + int ret = 0; + GQuark mapping_name; + struct bt_ctf_enumeration_mapping *mapping; + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + char *escaped_string; + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (!string) { + BT_LOGW_STR("Invalid parameter: string is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_ENUM) { + BT_LOGW("Invalid parameter: field type is not an enumeration field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (range_end < range_start) { + BT_LOGW("Invalid parameter: range's end is lesser than range's start: " + "addr=%p, range-start=%" PRIu64 ", range-end=%" PRIu64, + ft, range_start, range_end); + ret = -1; + goto end; + } + + if (strlen(string) == 0) { + BT_LOGW("Invalid parameter: mapping name is an empty string: " + "enum-ft-addr=%p, mapping-name-addr=%p", ft, + string); + ret = -1; + goto end; + } + + escaped_string = g_strescape(string, NULL); + if (!escaped_string) { + BT_LOGE("Cannot escape mapping name: enum-ft-addr=%p, " + "mapping-name-addr=%p, mapping-name=\"%s\"", + ft, string, string); + ret = -1; + goto end; + } + + mapping = g_new(struct bt_ctf_enumeration_mapping, 1); + if (!mapping) { + BT_LOGE_STR("Failed to allocate one enumeration mapping."); + ret = -1; + goto error_free; + } + mapping_name = g_quark_from_string(escaped_string); + *mapping = (struct bt_ctf_enumeration_mapping) { + .range_start._unsigned = range_start, + .range_end._unsigned = range_end, + .string = mapping_name, + }; + g_ptr_array_add(enum_ft->entries, mapping); + g_ptr_array_sort(enum_ft->entries, + (GCompareFunc) compare_enumeration_mappings_unsigned); + BT_LOGV("Added mapping to unsigned enumeration field type: addr=%p, " + "name=\"%s\", range-start=%" PRIu64 ", " + "range-end=%" PRIu64, + ft, string, range_start, range_end); + +error_free: + free(escaped_string); + +end: + return ret; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_enumeration_get_mapping_count( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ENUM, "Field type"); + return (int64_t) enum_ft->entries->len; +} + +BT_HIDDEN +int bt_ctf_field_type_common_floating_point_get_exponent_digits( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_FLOAT, + "Field type"); + return (int) flt_ft->exp_dig; +} + +BT_HIDDEN +int bt_ctf_field_type_common_floating_point_set_exponent_digits( + struct bt_ctf_field_type_common *ft, + unsigned int exponent_digits) +{ + int ret = 0; + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_FLOAT) { + BT_LOGW("Invalid parameter: field type is not a floating point number field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + 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)) { + BT_LOGW("Invalid parameter: invalid exponent size: " + "addr=%p, exp-size=%u", ft, exponent_digits); + ret = -1; + goto end; + } + + flt_ft->exp_dig = exponent_digits; + BT_LOGV("Set floating point number field type's exponent size: addr=%p, " + "exp-size=%u", ft, exponent_digits); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_floating_point_get_mantissa_digits( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_FLOAT, + "Field type"); + return (int) flt_ft->mant_dig; +} + +BT_HIDDEN +int bt_ctf_field_type_common_floating_point_set_mantissa_digits( + struct bt_ctf_field_type_common *ft, unsigned int mantissa_digits) +{ + int ret = 0; + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_FLOAT) { + BT_LOGW("Invalid parameter: field type is not a floating point number field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if ((mantissa_digits != FLT_MANT_DIG) && + (mantissa_digits != DBL_MANT_DIG) && + (mantissa_digits != LDBL_MANT_DIG)) { + BT_LOGW("Invalid parameter: invalid mantissa size: " + "addr=%p, mant-size=%u", ft, mantissa_digits); + ret = -1; + goto end; + } + + flt_ft->mant_dig = mantissa_digits; + BT_LOGV("Set floating point number field type's mantissa size: addr=%p, " + "mant-size=%u", ft, mantissa_digits); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_replace_field( + struct bt_ctf_field_type_common *ft, + const char *field_name, + struct bt_ctf_field_type_common *field_type) +{ + int ret = 0; + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + GQuark name_quark; + uint64_t i; + + BT_ASSERT(ft); + BT_ASSERT(field_name); + BT_ASSERT(field_type); + BT_ASSERT(ft->id == BT_CTF_FIELD_TYPE_ID_STRUCT); + name_quark = g_quark_from_string(field_name); + + for (i = 0; i < struct_ft->fields->len; i++) { + struct bt_ctf_field_type_common_structure_field *field = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX(ft, i); + + if (field->name == name_quark) { + bt_ctf_object_put_ref(field->type); + field->type = bt_ctf_object_get_ref(field_type); + } + } + + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_add_field(struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *field_type, + const char *field_name) +{ + int ret = 0; + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + + /* + * TODO: check that `field_type` does not contain `type`, + * recursively. + */ + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (!field_name) { + BT_LOGW_STR("Invalid parameter: field name is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_STRUCT) { + BT_LOGW("Invalid parameter: field type is not a structure field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (ft == field_type) { + BT_LOGW("Invalid parameter: structure field type and field type to add are the same: " + "addr=%p", ft); + ret = -1; + goto end; + } + + if (add_structure_variant_member(struct_ft->fields, + struct_ft->field_name_to_index, field_type, field_name, + false)) { + BT_LOGW("Cannot add field to structure field type: " + "struct-ft-addr=%p, field-ft-addr=%p, field-name=\"%s\"", + ft, field_type, field_name); + ret = -1; + goto end; + } + + BT_LOGV("Added structure field type field: struct-ft-addr=%p, " + "field-ft-addr=%p, field-name=\"%s\"", ft, + field_type, field_name); + +end: + return ret; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_structure_get_field_count( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_STRUCT, + "Field type"); + return (int64_t) struct_ft->fields->len; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_borrow_field_by_index( + struct bt_ctf_field_type_common *ft, + const char **field_name, + struct bt_ctf_field_type_common **field_type, uint64_t index) +{ + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common_structure_field *field; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_STRUCT, + "Field type"); + BT_ASSERT_PRE(index < struct_ft->fields->len, + "Index is out of bounds: index=%" PRIu64 ", " + "count=%u, ft-addr=%p", + index, struct_ft->fields->len, ft); + field = BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX(struct_ft, index); + + if (field_type) { + *field_type = field->type; + } + + if (field_name) { + *field_name = g_quark_to_string(field->name); + BT_ASSERT(*field_name); + } + + return 0; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_structure_borrow_field_type_by_name( + struct bt_ctf_field_type_common *ft, const char *name) +{ + size_t index; + GQuark name_quark; + struct bt_ctf_field_type_common_structure_field *field; + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common *field_type = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_NON_NULL(name, "Name"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_STRUCT, + "Field type"); + name_quark = g_quark_try_string(name); + if (!name_quark) { + BT_LOGV("No such structure field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + goto end; + } + + if (!g_hash_table_lookup_extended(struct_ft->field_name_to_index, + GUINT_TO_POINTER(name_quark), NULL, (gpointer *) &index)) { + BT_LOGV("No such structure field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + goto end; + } + + field = BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX(ft, index); + field_type = field->type; + +end: + return field_type; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_variant_borrow_tag_field_type( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common *tag_ft = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + + if (!var_ft->tag_ft) { + BT_LOGV("Variant field type has no tag field type: " + "addr=%p", ft); + goto end; + } + + tag_ft = BT_CTF_TO_COMMON(var_ft->tag_ft); + +end: + return tag_ft; +} + +BT_HIDDEN +const char *bt_ctf_field_type_common_variant_get_tag_name( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + const char *tag_name = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + + if (var_ft->tag_name->len == 0) { + BT_LOGV("Variant field type has no tag field name: " + "addr=%p", ft); + goto end; + } + + tag_name = var_ft->tag_name->str; + +end: + return tag_name; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_set_tag_name( + struct bt_ctf_field_type_common *ft, const char *name) +{ + int ret = 0; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_VARIANT) { + BT_LOGW("Invalid parameter: field type is not a variant field type: " + "addr=%p, ft-id=%s", ft, bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (!bt_ctf_identifier_is_valid(name)) { + BT_LOGW("Invalid parameter: tag field name is not a valid CTF identifier: " + "variant-ft-addr=%p, tag-field-name=\"%s\"", + ft, name); + ret = -1; + goto end; + } + + g_string_assign(var_ft->tag_name, name); + BT_LOGV("Set variant field type's tag field name: addr=%p, " + "tag-field-name=\"%s\"", ft, name); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_add_field(struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *field_type, + const char *field_name) +{ + size_t i; + int ret = 0; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + GQuark field_name_quark = g_quark_from_string(field_name); + + /* + * TODO: check that `field_type` does not contain `type`, + * recursively. + */ + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_VARIANT) { + BT_LOGW("Invalid parameter: field type is not a variant field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (ft == field_type) { + BT_LOGW("Invalid parameter: variant field type and field type to add are the same: " + "addr=%p", ft); + ret = -1; + goto end; + } + + /* The user has explicitly provided a tag; validate against it. */ + if (var_ft->tag_ft) { + int name_found = 0; + + /* Make sure this name is present in the enum tag */ + for (i = 0; i < var_ft->tag_ft->entries->len; i++) { + struct bt_ctf_enumeration_mapping *mapping = + g_ptr_array_index(var_ft->tag_ft->entries, i); + + if (mapping->string == field_name_quark) { + name_found = 1; + break; + } + } + + if (!name_found) { + /* Validation failed */ + BT_LOGW("Invalid parameter: field name does not name a tag field type's mapping: " + "variant-ft-addr=%p, tag-ft-addr=%p, " + "tag-field-name=\"%s\"" + "field-ft-addr=%p, field-name=\"%s\"", + ft, var_ft->tag_ft, var_ft->tag_name->str, + field_type, field_name); + ret = -1; + goto end; + } + } + + if (add_structure_variant_member(var_ft->choices, + var_ft->choice_name_to_index, field_type, + field_name, true)) { + BT_LOGW("Cannot add field to variant field type: " + "variant-ft-addr=%p, field-ft-addr=%p, field-name=\"%s\"", + ft, field_type, field_name); + ret = -1; + goto end; + } + + BT_LOGV("Added variant field type field: variant-ft-addr=%p, " + "field-ft-addr=%p, field-name=\"%s\"", ft, + field_type, field_name); + +end: + return ret; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_variant_borrow_field_type_by_name( + struct bt_ctf_field_type_common *ft, + const char *field_name) +{ + size_t index; + GQuark name_quark; + struct bt_ctf_field_type_common_variant_choice *choice; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common *field_type = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_NON_NULL(field_name, "Name"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + name_quark = g_quark_try_string(field_name); + if (!name_quark) { + BT_LOGV("No such variant field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, field_name); + goto end; + } + + if (!g_hash_table_lookup_extended(var_ft->choice_name_to_index, + GUINT_TO_POINTER(name_quark), NULL, (gpointer *) &index)) { + BT_LOGV("No such variant field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, field_name); + goto end; + } + + choice = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(ft, index); + field_type = choice->type; + +end: + return field_type; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_variant_get_field_count( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Variant field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + return (int64_t) var_ft->choices->len; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_borrow_field_by_index( + struct bt_ctf_field_type_common *ft, + const char **field_name, + struct bt_ctf_field_type_common **field_type, uint64_t index) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common_variant_choice *choice; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + BT_ASSERT_PRE(index < var_ft->choices->len, + "Index is out of bounds: index=%" PRIu64 ", " + "count=%u, ft-addr=%p", + index, var_ft->choices->len, ft); + choice = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(ft, index); + + if (field_type) { + *field_type = choice->type; + } + + if (field_name) { + *field_name = g_quark_to_string(choice->name); + BT_ASSERT(*field_name); + } + + return 0; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_variant_find_choice_index( + struct bt_ctf_field_type_common *ft, uint64_t uval, + bool is_signed) +{ + int64_t ret; + uint64_t i; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT(ft); + BT_ASSERT(ft->id == BT_CTF_FIELD_TYPE_ID_VARIANT); + + if (bt_ctf_field_type_common_variant_update_choices(ft)) { + ret = INT64_C(-1); + goto end; + } + + for (i = 0; i < var_ft->choices->len; i++) { + uint64_t range_i; + struct bt_ctf_field_type_common_variant_choice *choice = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + var_ft, i); + + for (range_i = 0; range_i < choice->ranges->len; range_i++) { + struct bt_ctf_field_type_common_variant_choice_range *range = + &g_array_index( + choice->ranges, + struct bt_ctf_field_type_common_variant_choice_range, + range_i); + + if (is_signed) { + int64_t tag_ival = (int64_t) uval; + + if (tag_ival >= range->lower.i && + tag_ival <= range->upper.i) { + goto found; + } + } else { + if (uval >= range->lower.u && + uval <= range->upper.u) { + goto found; + } + } + } + } + + /* Range not found */ + ret = INT64_C(-1); + goto end; + +found: + ret = (int64_t) i; + +end: + return ret; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_array_borrow_element_field_type( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ARRAY, + "Field type"); + BT_ASSERT(array_ft && array_ft->element_ft); + return array_ft->element_ft; +} + +BT_HIDDEN +int bt_ctf_field_type_common_array_set_element_field_type( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *element_ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: array field type is NULL."); + ret = -1; + goto end; + } + + if (!element_ft) { + BT_LOGW_STR("Invalid parameter: element field type is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_ARRAY) { + BT_LOGW("Invalid parameter: field type is not an array field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (array_ft->element_ft) { + BT_CTF_OBJECT_PUT_REF_AND_RESET(array_ft->element_ft); + } + + array_ft->element_ft = bt_ctf_object_get_ref(element_ft); + BT_LOGV("Set array field type's element field type: array-ft-addr=%p, " + "element-ft-addr=%p", ft, element_ft); + +end: + return ret; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_array_get_length(struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_ARRAY, + "Field type"); + return (int64_t) array_ft->length; +} + +BT_HIDDEN +struct bt_ctf_field_type_common *bt_ctf_field_type_common_sequence_borrow_element_field_type( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_SEQUENCE, + "Field type"); + return seq_ft->element_ft; +} + +BT_HIDDEN +int bt_ctf_field_type_common_sequence_set_element_field_type( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *element_ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: sequence field type is NULL."); + ret = -1; + goto end; + } + + if (!element_ft) { + BT_LOGW_STR("Invalid parameter: element field type is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_SEQUENCE) { + BT_LOGW("Invalid parameter: field type is not a sequence field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (seq_ft->element_ft) { + BT_CTF_OBJECT_PUT_REF_AND_RESET(seq_ft->element_ft); + } + + seq_ft->element_ft = element_ft; + bt_ctf_object_get_ref(seq_ft->element_ft); + BT_LOGV("Set sequence field type's element field type: sequence-ft-addr=%p, " + "element-ft-addr=%p", ft, element_ft); + +end: + return ret; +} + +BT_HIDDEN +const char *bt_ctf_field_type_common_sequence_get_length_field_name( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_SEQUENCE, + "Field type"); + return seq_ft->length_field_name ? + seq_ft->length_field_name->str : NULL; +} + +BT_HIDDEN +enum bt_ctf_string_encoding bt_ctf_field_type_common_string_get_encoding( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_string *string_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_STRING, + "Field type"); + return string_ft->encoding; +} + +BT_HIDDEN +int bt_ctf_field_type_common_string_set_encoding(struct bt_ctf_field_type_common *ft, + enum bt_ctf_string_encoding encoding) +{ + int ret = 0; + struct bt_ctf_field_type_common_string *string_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_STRING) { + BT_LOGW("Invalid parameter: field type is not a string field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + if (encoding != BT_CTF_STRING_ENCODING_UTF8 && + encoding != BT_CTF_STRING_ENCODING_ASCII) { + BT_LOGW("Invalid parameter: unknown string encoding: " + "addr=%p, encoding=%d", ft, encoding); + ret = -1; + goto end; + } + + string_ft->encoding = encoding; + BT_LOGV("Set string field type's encoding: addr=%p, encoding=%s", + ft, bt_ctf_string_encoding_string(encoding)); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_get_alignment(struct bt_ctf_field_type_common *ft) +{ + int ret; + enum bt_ctf_field_type_id type_id; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + + if (ft->frozen) { + ret = (int) ft->alignment; + goto end; + } + + type_id = bt_ctf_field_type_common_get_type_id(ft); + switch (type_id) { + case BT_CTF_FIELD_TYPE_ID_SEQUENCE: + { + struct bt_ctf_field_type_common *element_ft = + bt_ctf_field_type_common_sequence_borrow_element_field_type(ft); + + BT_ASSERT(element_ft); + ret = bt_ctf_field_type_common_get_alignment(element_ft); + break; + } + case BT_CTF_FIELD_TYPE_ID_ARRAY: + { + struct bt_ctf_field_type_common *element_ft = + bt_ctf_field_type_common_array_borrow_element_field_type(ft); + + BT_ASSERT(element_ft); + ret = bt_ctf_field_type_common_get_alignment(element_ft); + break; + } + case BT_CTF_FIELD_TYPE_ID_STRUCT: + { + int64_t i, element_count; + + element_count = bt_ctf_field_type_common_structure_get_field_count( + ft); + BT_ASSERT(element_count >= 0); + + for (i = 0; i < element_count; i++) { + struct bt_ctf_field_type_common *field = NULL; + int field_alignment; + + ret = bt_ctf_field_type_common_structure_borrow_field_by_index( + ft, NULL, &field, i); + BT_ASSERT(ret == 0); + BT_ASSERT(field); + field_alignment = bt_ctf_field_type_common_get_alignment( + field); + if (field_alignment < 0) { + ret = field_alignment; + goto end; + } + + ft->alignment = MAX(field_alignment, ft->alignment); + } + ret = (int) ft->alignment; + break; + } + case BT_CTF_FIELD_TYPE_ID_UNKNOWN: + BT_LOGW("Invalid parameter: unknown field type ID: " + "addr=%p, ft-id=%d", ft, type_id); + ret = -1; + break; + default: + ret = (int) ft->alignment; + break; + } + +end: + return ret; +} + +static inline +int is_power_of_two(unsigned int value) +{ + return ((value & (value - 1)) == 0) && value > 0; +} + +BT_HIDDEN +int bt_ctf_field_type_common_set_alignment(struct bt_ctf_field_type_common *ft, + unsigned int alignment) +{ + int ret = 0; + enum bt_ctf_field_type_id type_id; + + /* Alignment must be a power of two */ + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + ret = -1; + goto end; + } + + if (!is_power_of_two(alignment)) { + BT_LOGW("Invalid parameter: alignment is not a power of two: " + "addr=%p, align=%u", ft, alignment); + ret = -1; + goto end; + } + + type_id = bt_ctf_field_type_common_get_type_id(ft); + if (type_id == BT_CTF_FIELD_TYPE_ID_UNKNOWN) { + BT_LOGW("Invalid parameter: unknown field type ID: " + "addr=%p, ft-id=%d", ft, type_id); + ret = -1; + goto end; + } + + if (ft->id == BT_CTF_FIELD_TYPE_ID_STRING && alignment != CHAR_BIT) { + BT_LOGW("Invalid parameter: alignment must be %u for a string field type: " + "addr=%p, align=%u", CHAR_BIT, ft, alignment); + ret = -1; + goto end; + } + + if (type_id == BT_CTF_FIELD_TYPE_ID_VARIANT || + type_id == BT_CTF_FIELD_TYPE_ID_SEQUENCE || + type_id == BT_CTF_FIELD_TYPE_ID_ARRAY) { + /* Setting an alignment on these types makes no sense */ + BT_LOGW("Invalid parameter: cannot set the alignment of this field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + ft->alignment = alignment; + ret = 0; + BT_LOGV("Set field type's alignment: addr=%p, align=%u", + ft, alignment); + +end: + return ret; +} + +BT_HIDDEN +enum bt_ctf_byte_order bt_ctf_field_type_common_get_byte_order( + struct bt_ctf_field_type_common *ft) +{ + enum bt_ctf_byte_order ret = BT_CTF_BYTE_ORDER_UNKNOWN; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_INTEGER: + { + struct bt_ctf_field_type_common_integer *integer = + BT_CTF_FROM_COMMON(ft); + + ret = integer->user_byte_order; + break; + } + case BT_CTF_FIELD_TYPE_ID_ENUM: + { + struct bt_ctf_field_type_common_enumeration *enum_ft = + BT_CTF_FROM_COMMON(ft); + + ret = bt_ctf_field_type_common_get_byte_order( + BT_CTF_TO_COMMON(enum_ft->container_ft)); + break; + } + case BT_CTF_FIELD_TYPE_ID_FLOAT: + { + struct bt_ctf_field_type_common_floating_point *floating_point = + BT_CTF_FROM_COMMON(ft); + ret = floating_point->user_byte_order; + break; + } + default: + BT_LOGW("Invalid parameter: cannot get the byte order of this field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + goto end; + } + + BT_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; +} + +BT_HIDDEN +int bt_ctf_field_type_common_set_byte_order(struct bt_ctf_field_type_common *ft, + enum bt_ctf_byte_order byte_order) +{ + int ret = 0; + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->frozen) { + BT_LOGW("Invalid parameter: field type is frozen: addr=%p", + ft); + 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) { + BT_LOGW("Invalid parameter: invalid byte order: " + "addr=%p, bo=%s", ft, + bt_ctf_byte_order_string(byte_order)); + ret = -1; + goto end; + } + + if (ft->methods->set_byte_order) { + ft->methods->set_byte_order(ft, byte_order); + } + + BT_LOGV("Set field type's byte order: addr=%p, bo=%s", + ft, bt_ctf_byte_order_string(byte_order)); + +end: + return ret; +} + +BT_HIDDEN +enum bt_ctf_field_type_id bt_ctf_field_type_common_get_type_id( + struct bt_ctf_field_type_common *ft) +{ + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + return ft->id; +} + +BT_HIDDEN +void bt_ctf_field_type_common_freeze(struct bt_ctf_field_type_common *ft) +{ + if (!ft || ft->frozen) { + return; + } + + BT_ASSERT(ft->methods->freeze); + ft->methods->freeze(ft); +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_variant_borrow_field_type_signed( + struct bt_ctf_field_type_common_variant *var_ft, + int64_t tag_value) +{ + struct bt_ctf_field_type_common *field_type = NULL; + GQuark field_name_quark; + gpointer index; + struct bt_ctf_field_type_common_variant_choice *choice; + struct range_overlap_query query = { + .range_start._signed = tag_value, + .range_end._signed = tag_value, + .mapping_name = 0, + .overlaps = 0, + }; + + g_ptr_array_foreach(var_ft->tag_ft->entries, check_ranges_overlap, + &query); + if (!query.overlaps) { + goto end; + } + + field_name_quark = query.mapping_name; + if (!g_hash_table_lookup_extended(var_ft->choice_name_to_index, + GUINT_TO_POINTER(field_name_quark), NULL, &index)) { + goto end; + } + + choice = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(var_ft, + (size_t) index); + field_type = choice->type; + +end: + return field_type; +} + +BT_HIDDEN +struct bt_ctf_field_type_common * +bt_ctf_field_type_common_variant_borrow_field_type_unsigned( + struct bt_ctf_field_type_common_variant *var_ft, + uint64_t tag_value) +{ + struct bt_ctf_field_type_common *field_type = NULL; + GQuark field_name_quark; + gpointer index; + struct bt_ctf_field_type_common_variant_choice *choice; + struct range_overlap_query query = { + .range_start._unsigned = tag_value, + .range_end._unsigned = tag_value, + .mapping_name = 0, + .overlaps = 0, + }; + + g_ptr_array_foreach(var_ft->tag_ft->entries, + check_ranges_overlap_unsigned, &query); + if (!query.overlaps) { + goto end; + } + + field_name_quark = query.mapping_name; + if (!g_hash_table_lookup_extended(var_ft->choice_name_to_index, + GUINT_TO_POINTER(field_name_quark), NULL, &index)) { + goto end; + } + + choice = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(var_ft, + (size_t) index); + field_type = choice->type; + +end: + return field_type; +} + +BT_HIDDEN +struct bt_ctf_field_type_common *bt_ctf_field_type_common_copy( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common *ft_copy = NULL; + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT(ft->methods->copy); + ft_copy = ft->methods->copy(ft); + if (!ft_copy) { + BT_LOGE_STR("Cannot copy field type."); + goto end; + } + + ft_copy->alignment = ft->alignment; + +end: + return ft_copy; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_get_field_name_index( + struct bt_ctf_field_type_common *ft, const char *name) +{ + int ret; + size_t index; + GQuark name_quark; + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_NON_NULL(name, "Name"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_STRUCT, + "Field type"); + + name_quark = g_quark_try_string(name); + if (!name_quark) { + BT_LOGV("No such structure field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + ret = -1; + goto end; + } + + if (!g_hash_table_lookup_extended(struct_ft->field_name_to_index, + GUINT_TO_POINTER(name_quark), + NULL, (gpointer *) &index)) { + BT_LOGV("No such structure field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + ret = -1; + goto end; + } + + ret = (int) index; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_get_field_name_index( + struct bt_ctf_field_type_common *ft, const char *name) +{ + int ret; + size_t index; + GQuark name_quark; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_NON_NULL(name, "Name"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + name_quark = g_quark_try_string(name); + if (!name_quark) { + BT_LOGV("No such variant field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + ret = -1; + goto end; + } + + if (!g_hash_table_lookup_extended(var_ft->choice_name_to_index, + GUINT_TO_POINTER(name_quark), + NULL, (gpointer *) &index)) { + BT_LOGV("No such variant field type field name: " + "ft-addr=%p, field-name=\"%s\"", + ft, name); + ret = -1; + goto end; + } + + ret = (int) index; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_sequence_set_length_field_path( + struct bt_ctf_field_type_common *ft, struct bt_ctf_field_path *path) +{ + int ret = 0; + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_SEQUENCE) { + BT_LOGW("Invalid parameter: field type is not a sequence field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + bt_ctf_object_get_ref(path); + BT_CTF_OBJECT_MOVE_REF(seq_ft->length_field_path, path); + BT_LOGV("Set sequence field type's length field path: ft-addr=%p, " + "field-path-addr=%p", ft, path); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_set_tag_field_path( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_path *path) +{ + int ret = 0; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: field type is NULL."); + ret = -1; + goto end; + } + + if (ft->id != BT_CTF_FIELD_TYPE_ID_VARIANT) { + BT_LOGW("Invalid parameter: field type is not a variant field type: " + "addr=%p, ft-id=%s", ft, + bt_ctf_field_type_id_string(ft->id)); + ret = -1; + goto end; + } + + bt_ctf_object_get_ref(path); + BT_CTF_OBJECT_MOVE_REF(var_ft->tag_field_path, path); + BT_LOGV("Set variant field type's tag field path: ft-addr=%p, " + "field-path-addr=%p", ft, path); + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_set_tag_field_type( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_field_type_common *tag_ft) +{ + int ret = 0; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + if (!ft) { + BT_LOGW_STR("Invalid parameter: variant field type is NULL."); + ret = -1; + goto end; + } + + if (!tag_ft) { + BT_LOGW_STR("Invalid parameter: tag field type is NULL."); + ret = -1; + goto end; + } + + if (tag_ft->id != BT_CTF_FIELD_TYPE_ID_ENUM) { + BT_LOGW("Invalid parameter: tag field type is not an enumeration field type: " + "addr=%p, ft-id=%s", tag_ft, + bt_ctf_field_type_id_string(tag_ft->id)); + ret = -1; + goto end; + } + + bt_ctf_object_put_ref(var_ft->tag_ft); + var_ft->tag_ft = bt_ctf_object_get_ref(tag_ft); + BT_LOGV("Set variant field type's tag field type: variant-ft-addr=%p, " + "tag-ft-addr=%p", ft, tag_ft); + +end: + return ret; +} + +BT_HIDDEN +void bt_ctf_field_type_common_generic_freeze(struct bt_ctf_field_type_common *ft) +{ + ft->frozen = 1; +} + +BT_HIDDEN +void bt_ctf_field_type_common_enumeration_freeze_recursive( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + BT_LOGD("Freezing enumeration field type object: addr=%p", ft); + bt_ctf_field_type_common_enumeration_set_range_overlap(enum_ft); + bt_ctf_field_type_common_generic_freeze(ft); + BT_LOGD("Freezing enumeration field type object's container field type: int-ft-addr=%p", + enum_ft->container_ft); + bt_ctf_field_type_common_freeze(BT_CTF_TO_COMMON(enum_ft->container_ft)); +} + +BT_HIDDEN +void bt_ctf_field_type_common_structure_freeze_recursive( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + uint64_t i; + + /* Cache the alignment */ + BT_LOGD("Freezing structure field type object: addr=%p", ft); + ft->alignment = bt_ctf_field_type_common_get_alignment(ft); + bt_ctf_field_type_common_generic_freeze(ft); + + for (i = 0; i < struct_ft->fields->len; i++) { + struct bt_ctf_field_type_common_structure_field *field = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX(ft, i); + + BT_LOGD("Freezing structure field type field: " + "ft-addr=%p, name=\"%s\"", + field->type, g_quark_to_string(field->name)); + bt_ctf_field_type_common_freeze(field->type); + } +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_update_choices(struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + uint64_t i; + int ret = 0; + bool is_signed; + + if (ft->frozen && var_ft->choices_up_to_date) { + goto end; + } + + BT_ASSERT(var_ft->tag_ft); + is_signed = !!var_ft->tag_ft->container_ft->is_signed; + + for (i = 0; i < var_ft->choices->len; i++) { + struct bt_ctf_field_type_common_variant_choice *choice = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(ft, i); + const char *choice_name = g_quark_to_string(choice->name); + struct bt_ctf_field_type_enumeration_mapping_iterator *iter = + bt_ctf_field_type_common_enumeration_find_mappings_by_name( + BT_CTF_TO_COMMON(var_ft->tag_ft), choice_name); + + if (!iter) { + ret = -1; + goto end; + } + + BT_ASSERT(choice->ranges); + g_array_set_size(choice->ranges, 0); + + while (bt_ctf_field_type_enumeration_mapping_iterator_next(iter) == 0) { + struct bt_ctf_field_type_common_variant_choice_range range; + + if (is_signed) { + ret = bt_ctf_field_type_enumeration_mapping_iterator_signed_get( + iter, NULL, + &range.lower.i, &range.upper.i); + } else { + ret = bt_ctf_field_type_enumeration_mapping_iterator_unsigned_get( + iter, NULL, + &range.lower.u, &range.upper.u); + } + + BT_ASSERT(ret == 0); + g_array_append_val(choice->ranges, range); + } + + bt_ctf_object_put_ref(iter); + } + + var_ft->choices_up_to_date = true; + +end: + return ret; +} + +BT_HIDDEN +void bt_ctf_field_type_common_variant_freeze_recursive( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + uint64_t i; + + BT_LOGD("Freezing variant field type object: addr=%p", ft); + bt_ctf_field_type_common_generic_freeze(ft); + + for (i = 0; i < var_ft->choices->len; i++) { + struct bt_ctf_field_type_common_variant_choice *choice = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(ft, i); + + BT_LOGD("Freezing variant field type member: " + "ft-addr=%p, name=\"%s\"", + choice->type, g_quark_to_string(choice->name)); + bt_ctf_field_type_common_freeze(choice->type); + } +} + +BT_HIDDEN +void bt_ctf_field_type_common_array_freeze_recursive( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + /* Cache the alignment */ + BT_LOGD("Freezing array field type object: addr=%p", ft); + ft->alignment = bt_ctf_field_type_common_get_alignment(ft); + bt_ctf_field_type_common_generic_freeze(ft); + BT_LOGD("Freezing array field type object's element field type: element-ft-addr=%p", + array_ft->element_ft); + bt_ctf_field_type_common_freeze(array_ft->element_ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_sequence_freeze_recursive( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + /* Cache the alignment */ + BT_LOGD("Freezing sequence field type object: addr=%p", ft); + ft->alignment = bt_ctf_field_type_common_get_alignment(ft); + bt_ctf_field_type_common_generic_freeze(ft); + BT_LOGD("Freezing sequence field type object's element field type: element-ft-addr=%p", + seq_ft->element_ft); + bt_ctf_field_type_common_freeze(seq_ft->element_ft); +} + +BT_HIDDEN +void bt_ctf_field_type_common_integer_set_byte_order( + struct bt_ctf_field_type_common *ft, enum bt_ctf_byte_order byte_order) +{ + struct bt_ctf_field_type_common_integer *int_ft = BT_CTF_FROM_COMMON(ft); + + int_ft->user_byte_order = byte_order; +} + +BT_HIDDEN +void bt_ctf_field_type_common_enumeration_set_byte_order_recursive( + struct bt_ctf_field_type_common *ft, enum bt_ctf_byte_order byte_order) +{ + struct bt_ctf_field_type_common_enumeration *enum_ft = BT_CTF_FROM_COMMON(ft); + + bt_ctf_field_type_common_set_byte_order(BT_CTF_TO_COMMON(enum_ft->container_ft), + byte_order); +} + +BT_HIDDEN +void bt_ctf_field_type_common_floating_point_set_byte_order( + struct bt_ctf_field_type_common *ft, enum bt_ctf_byte_order byte_order) +{ + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + + flt_ft->user_byte_order = byte_order; +} + +BT_HIDDEN +void bt_ctf_field_type_common_structure_set_byte_order_recursive( + struct bt_ctf_field_type_common *ft, + enum bt_ctf_byte_order byte_order) +{ + int i; + struct bt_ctf_field_type_common_structure *struct_ft = BT_CTF_FROM_COMMON(ft); + + for (i = 0; i < struct_ft->fields->len; i++) { + struct bt_ctf_field_type_common_structure_field *field = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + struct_ft, i); + struct bt_ctf_field_type_common *field_type = field->type; + + bt_ctf_field_type_common_set_byte_order(field_type, byte_order); + } +} + +BT_HIDDEN +void bt_ctf_field_type_common_variant_set_byte_order_recursive( + struct bt_ctf_field_type_common *ft, + enum bt_ctf_byte_order byte_order) +{ + int i; + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + for (i = 0; i < var_ft->choices->len; i++) { + struct bt_ctf_field_type_common_variant_choice *choice = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + var_ft, i); + struct bt_ctf_field_type_common *field_type = choice->type; + + bt_ctf_field_type_common_set_byte_order(field_type, byte_order); + } +} + +BT_HIDDEN +void bt_ctf_field_type_common_array_set_byte_order_recursive( + struct bt_ctf_field_type_common *ft, + enum bt_ctf_byte_order byte_order) +{ + struct bt_ctf_field_type_common_array *array_ft = BT_CTF_FROM_COMMON(ft); + + bt_ctf_field_type_common_set_byte_order(array_ft->element_ft, byte_order); +} + +BT_HIDDEN +void bt_ctf_field_type_common_sequence_set_byte_order_recursive( + struct bt_ctf_field_type_common *ft, + enum bt_ctf_byte_order byte_order) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + bt_ctf_field_type_common_set_byte_order(seq_ft->element_ft, byte_order); +} + + +BT_HIDDEN +int bt_ctf_field_type_common_integer_compare(struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + struct bt_ctf_field_type_common_integer *int_ft_a = BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_integer *int_ft_b = BT_CTF_FROM_COMMON(ft_b); + + /* Length */ + if (int_ft_a->size != int_ft_b->size) { + BT_LOGV("Integer field types differ: different sizes: " + "ft-a-size=%u, ft-b-size=%u", + int_ft_a->size, int_ft_b->size); + goto end; + } + + /* Byte order */ + if (int_ft_a->user_byte_order != int_ft_b->user_byte_order) { + BT_LOGV("Integer field types differ: different byte orders: " + "ft-a-bo=%s, ft-b-bo=%s", + bt_ctf_byte_order_string(int_ft_a->user_byte_order), + bt_ctf_byte_order_string(int_ft_b->user_byte_order)); + goto end; + } + + /* Signedness */ + if (int_ft_a->is_signed != int_ft_b->is_signed) { + BT_LOGV("Integer field types differ: different signedness: " + "ft-a-is-signed=%d, ft-b-is-signed=%d", + int_ft_a->is_signed, + int_ft_b->is_signed); + goto end; + } + + /* Base */ + if (int_ft_a->base != int_ft_b->base) { + BT_LOGV("Integer field types differ: different bases: " + "ft-a-base=%s, ft-b-base=%s", + bt_ctf_integer_base_string(int_ft_a->base), + bt_ctf_integer_base_string(int_ft_b->base)); + goto end; + } + + /* Encoding */ + if (int_ft_a->encoding != int_ft_b->encoding) { + BT_LOGV("Integer field types differ: different encodings: " + "ft-a-encoding=%s, ft-b-encoding=%s", + bt_ctf_string_encoding_string(int_ft_a->encoding), + bt_ctf_string_encoding_string(int_ft_b->encoding)); + goto end; + } + + /* Mapped clock class */ + if (int_ft_a->mapped_clock_class) { + if (!int_ft_b->mapped_clock_class) { + BT_LOGV_STR("Integer field types differ: field type A " + "has a mapped clock class, but field type B " + "does not."); + goto end; + } + + if (bt_ctf_clock_class_compare(int_ft_a->mapped_clock_class, + int_ft_b->mapped_clock_class) != 0) { + BT_LOGV_STR("Integer field types differ: different " + "mapped clock classes."); + } + } else { + if (int_ft_b->mapped_clock_class) { + BT_LOGV_STR("Integer field types differ: field type A " + "has no description, but field type B has one."); + goto end; + } + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_floating_point_compare( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + struct bt_ctf_field_type_common_floating_point *flt_ft_a = + BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_floating_point *flt_ft_b = + BT_CTF_FROM_COMMON(ft_b); + + /* Byte order */ + if (flt_ft_a->user_byte_order != flt_ft_b->user_byte_order) { + BT_LOGV("Floating point number field types differ: different byte orders: " + "ft-a-bo=%s, ft-b-bo=%s", + bt_ctf_byte_order_string(flt_ft_a->user_byte_order), + bt_ctf_byte_order_string(flt_ft_b->user_byte_order)); + goto end; + } + + /* Exponent length */ + if (flt_ft_a->exp_dig != flt_ft_b->exp_dig) { + BT_LOGV("Floating point number field types differ: different exponent sizes: " + "ft-a-exp-size=%u, ft-b-exp-size=%u", + flt_ft_a->exp_dig, flt_ft_b->exp_dig); + goto end; + } + + /* Mantissa length */ + if (flt_ft_a->mant_dig != flt_ft_b->mant_dig) { + BT_LOGV("Floating point number field types differ: different mantissa sizes: " + "ft-a-mant-size=%u, ft-b-mant-size=%u", + flt_ft_a->mant_dig, flt_ft_b->mant_dig); + goto end; + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +static +int compare_enumeration_mappings(struct bt_ctf_enumeration_mapping *mapping_a, + struct bt_ctf_enumeration_mapping *mapping_b) +{ + int ret = 1; + + /* Label */ + if (mapping_a->string != mapping_b->string) { + BT_LOGV("Enumeration field type mappings differ: different names: " + "mapping-a-name=\"%s\", mapping-b-name=\"%s\"", + g_quark_to_string(mapping_a->string), + g_quark_to_string(mapping_b->string)); + goto end; + } + + /* Range start */ + if (mapping_a->range_start._unsigned != + mapping_b->range_start._unsigned) { + BT_LOGV("Enumeration field type mappings differ: different starts of range: " + "mapping-a-range-start-unsigned=%" PRIu64 ", " + "mapping-b-range-start-unsigned=%" PRIu64, + mapping_a->range_start._unsigned, + mapping_b->range_start._unsigned); + goto end; + } + + /* Range end */ + if (mapping_a->range_end._unsigned != + mapping_b->range_end._unsigned) { + BT_LOGV("Enumeration field type mappings differ: different ends of range: " + "mapping-a-range-end-unsigned=%" PRIu64 ", " + "mapping-b-range-end-unsigned=%" PRIu64, + mapping_a->range_end._unsigned, + mapping_b->range_end._unsigned); + goto end; + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_enumeration_compare_recursive( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + int i; + struct bt_ctf_field_type_common_enumeration *enum_ft_a = + BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_enumeration *enum_ft_b = + BT_CTF_FROM_COMMON(ft_b); + + /* Container field type */ + ret = bt_ctf_field_type_common_compare( + BT_CTF_TO_COMMON(enum_ft_a->container_ft), + BT_CTF_TO_COMMON(enum_ft_b->container_ft)); + if (ret) { + BT_LOGV("Enumeration field types differ: different container field types: " + "ft-a-container-ft-addr=%p, ft-b-container-ft-addr=%p", + enum_ft_a->container_ft, enum_ft_b->container_ft); + goto end; + } + + ret = 1; + + /* Entries */ + if (enum_ft_a->entries->len != enum_ft_b->entries->len) { + goto end; + } + + for (i = 0; i < enum_ft_a->entries->len; ++i) { + struct bt_ctf_enumeration_mapping *mapping_a = + g_ptr_array_index(enum_ft_a->entries, i); + struct bt_ctf_enumeration_mapping *mapping_b = + g_ptr_array_index(enum_ft_b->entries, i); + + if (compare_enumeration_mappings(mapping_a, mapping_b)) { + BT_LOGV("Enumeration field types differ: different mappings: " + "ft-a-mapping-addr=%p, ft-b-mapping-addr=%p, " + "ft-a-mapping-name=\"%s\", ft-b-mapping-name=\"%s\"", + mapping_a, mapping_b, + g_quark_to_string(mapping_a->string), + g_quark_to_string(mapping_b->string)); + goto end; + } + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_string_compare(struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + struct bt_ctf_field_type_common_string *string_ft_a = BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_string *string_ft_b = BT_CTF_FROM_COMMON(ft_b); + + /* Encoding */ + if (string_ft_a->encoding != string_ft_b->encoding) { + BT_LOGV("String field types differ: different encodings: " + "ft-a-encoding=%s, ft-b-encoding=%s", + bt_ctf_string_encoding_string(string_ft_a->encoding), + bt_ctf_string_encoding_string(string_ft_b->encoding)); + goto end; + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +static +int compare_structure_variant_members( + struct bt_ctf_field_type_common *member_a_ft, + struct bt_ctf_field_type_common *member_b_ft, + GQuark member_a_name, GQuark member_b_name) +{ + int ret = 1; + + /* Label */ + if (member_a_name != member_b_name) { + BT_LOGV("Structure/variant field type fields differ: different names: " + "field-a-name=%s, field-b-name=%s", + g_quark_to_string(member_a_name), + g_quark_to_string(member_b_name)); + goto end; + } + + /* Type */ + ret = bt_ctf_field_type_common_compare(member_a_ft, member_b_ft); + if (ret == 1) { + BT_LOGV("Structure/variant field type fields differ: different field types: " + "field-name=\"%s\", field-a-ft-addr=%p, field-b-ft-addr=%p", + g_quark_to_string(member_a_name), + member_a_ft, member_b_ft); + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_structure_compare_recursive( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + int i; + struct bt_ctf_field_type_common_structure *struct_ft_a = + BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_structure *struct_ft_b = + BT_CTF_FROM_COMMON(ft_b); + + /* Alignment */ + if (bt_ctf_field_type_common_get_alignment(ft_a) != + bt_ctf_field_type_common_get_alignment(ft_b)) { + BT_LOGV("Structure field types differ: different alignments: " + "ft-a-align=%u, ft-b-align=%u", + bt_ctf_field_type_common_get_alignment(ft_a), + bt_ctf_field_type_common_get_alignment(ft_b)); + goto end; + } + + /* Fields */ + if (struct_ft_a->fields->len != struct_ft_b->fields->len) { + BT_LOGV("Structure field types differ: different field counts: " + "ft-a-field-count=%u, ft-b-field-count=%u", + struct_ft_a->fields->len, struct_ft_b->fields->len); + goto end; + } + + for (i = 0; i < struct_ft_a->fields->len; ++i) { + struct bt_ctf_field_type_common_structure_field *field_a = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + struct_ft_a, i); + struct bt_ctf_field_type_common_structure_field *field_b = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + struct_ft_b, i); + + ret = compare_structure_variant_members(field_a->type, + field_b->type, field_a->name, field_b->name); + if (ret) { + /* compare_structure_variant_members() logs what differs */ + BT_LOGV_STR("Structure field types differ: different fields."); + goto end; + } + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_variant_compare_recursive( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + int i; + struct bt_ctf_field_type_common_variant *var_ft_a = BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_variant *var_ft_b = BT_CTF_FROM_COMMON(ft_b); + + /* Tag name */ + if (strcmp(var_ft_a->tag_name->str, var_ft_b->tag_name->str)) { + BT_LOGV("Variant field types differ: different tag field names: " + "ft-a-tag-field-name=\"%s\", ft-b-tag-field-name=\"%s\"", + var_ft_a->tag_name->str, var_ft_b->tag_name->str); + goto end; + } + + /* Tag type */ + ret = bt_ctf_field_type_common_compare(BT_CTF_TO_COMMON(var_ft_a->tag_ft), + BT_CTF_TO_COMMON(var_ft_b->tag_ft)); + if (ret) { + BT_LOGV("Variant field types differ: different tag field types: " + "ft-a-tag-ft-addr=%p, ft-b-tag-ft-addr=%p", + var_ft_a->tag_ft, var_ft_b->tag_ft); + goto end; + } + + ret = 1; + + /* Fields */ + if (var_ft_a->choices->len != var_ft_b->choices->len) { + BT_LOGV("Variant field types differ: different field counts: " + "ft-a-field-count=%u, ft-b-field-count=%u", + var_ft_a->choices->len, var_ft_b->choices->len); + goto end; + } + + for (i = 0; i < var_ft_a->choices->len; ++i) { + struct bt_ctf_field_type_common_variant_choice *choice_a = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + var_ft_a, i); + struct bt_ctf_field_type_common_variant_choice *choice_b = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + var_ft_b, i); + + ret = compare_structure_variant_members(choice_a->type, + choice_b->type, choice_a->name, choice_b->name); + if (ret) { + /* compare_structure_variant_members() logs what differs */ + BT_LOGV_STR("Variant field types differ: different fields."); + goto end; + } + } + + /* Equal */ + ret = 0; + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_array_compare_recursive( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + struct bt_ctf_field_type_common_array *array_ft_a = BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_array *array_ft_b = BT_CTF_FROM_COMMON(ft_b); + + /* Length */ + if (array_ft_a->length != array_ft_b->length) { + BT_LOGV("Structure field types differ: different lengths: " + "ft-a-length=%u, ft-b-length=%u", + array_ft_a->length, array_ft_b->length); + goto end; + } + + /* Element type */ + ret = bt_ctf_field_type_common_compare(array_ft_a->element_ft, + array_ft_b->element_ft); + if (ret == 1) { + BT_LOGV("Array field types differ: different element field types: " + "ft-a-element-ft-addr=%p, ft-b-element-ft-addr=%p", + array_ft_a->element_ft, array_ft_b->element_ft); + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_sequence_compare_recursive( + struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = -1; + struct bt_ctf_field_type_common_sequence *seq_ft_a = BT_CTF_FROM_COMMON(ft_a); + struct bt_ctf_field_type_common_sequence *seq_ft_b = BT_CTF_FROM_COMMON(ft_b); + + /* Length name */ + if (strcmp(seq_ft_a->length_field_name->str, + seq_ft_b->length_field_name->str)) { + BT_LOGV("Sequence field types differ: different length field names: " + "ft-a-length-field-name=\"%s\", " + "ft-b-length-field-name=\"%s\"", + seq_ft_a->length_field_name->str, + seq_ft_b->length_field_name->str); + goto end; + } + + /* Element type */ + ret = bt_ctf_field_type_common_compare(seq_ft_a->element_ft, + seq_ft_b->element_ft); + if (ret == 1) { + BT_LOGV("Sequence field types differ: different element field types: " + "ft-a-element-ft-addr=%p, ft-b-element-ft-addr=%p", + seq_ft_a->element_ft, seq_ft_b->element_ft); + } + +end: + return ret; +} + +BT_HIDDEN +int bt_ctf_field_type_common_compare(struct bt_ctf_field_type_common *ft_a, + struct bt_ctf_field_type_common *ft_b) +{ + int ret = 1; + + BT_ASSERT_PRE_NON_NULL(ft_a, "Field type A"); + BT_ASSERT_PRE_NON_NULL(ft_b, "Field type B"); + + if (ft_a == ft_b) { + /* Same reference: equal (even if both are NULL) */ + ret = 0; + goto end; + } + + if (!ft_a) { + BT_LOGW_STR("Invalid parameter: field type A is NULL."); + ret = -1; + goto end; + } + + if (!ft_b) { + BT_LOGW_STR("Invalid parameter: field type B is NULL."); + ret = -1; + goto end; + } + + if (ft_a->id != ft_b->id) { + /* Different type IDs */ + BT_LOGV("Field types differ: different IDs: " + "ft-a-addr=%p, ft-b-addr=%p, " + "ft-a-id=%s, ft-b-id=%s", + ft_a, ft_b, + bt_ctf_field_type_id_string(ft_a->id), + bt_ctf_field_type_id_string(ft_b->id)); + goto end; + } + + if (ft_a->id == BT_CTF_FIELD_TYPE_ID_UNKNOWN) { + /* Both have unknown type IDs */ + BT_LOGW_STR("Invalid parameter: field type IDs are unknown."); + goto end; + } + + BT_ASSERT(ft_a->methods->compare); + ret = ft_a->methods->compare(ft_a, ft_b); + if (ret == 1) { + BT_LOGV("Field types differ: ft-a-addr=%p, ft-b-addr=%p", + ft_a, ft_b); + } + +end: + return ret; +} + +BT_HIDDEN +int64_t bt_ctf_field_type_common_get_field_count(struct bt_ctf_field_type_common *ft) +{ + int64_t field_count = -1; + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_STRUCT: + field_count = + bt_ctf_field_type_common_structure_get_field_count(ft); + break; + case BT_CTF_FIELD_TYPE_ID_VARIANT: + field_count = + bt_ctf_field_type_common_variant_get_field_count(ft); + break; + case BT_CTF_FIELD_TYPE_ID_ARRAY: + case BT_CTF_FIELD_TYPE_ID_SEQUENCE: + /* + * Array and sequence types always contain a single member + * (the element type). + */ + field_count = 1; + break; + default: + break; + } + + return field_count; +} + +BT_HIDDEN +struct bt_ctf_field_type_common *bt_ctf_field_type_common_borrow_field_at_index( + struct bt_ctf_field_type_common *ft, int index) +{ + struct bt_ctf_field_type_common *field_type = NULL; + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_STRUCT: + { + int ret = bt_ctf_field_type_common_structure_borrow_field_by_index( + ft, NULL, &field_type, index); + if (ret) { + field_type = NULL; + goto end; + } + break; + } + case BT_CTF_FIELD_TYPE_ID_VARIANT: + { + int ret = bt_ctf_field_type_common_variant_borrow_field_by_index( + ft, NULL, &field_type, index); + if (ret) { + field_type = NULL; + goto end; + } + break; + } + case BT_CTF_FIELD_TYPE_ID_ARRAY: + field_type = + bt_ctf_field_type_common_array_borrow_element_field_type(ft); + break; + case BT_CTF_FIELD_TYPE_ID_SEQUENCE: + field_type = + bt_ctf_field_type_common_sequence_borrow_element_field_type(ft); + break; + default: + break; + } + +end: + return field_type; +} + +BT_HIDDEN +int bt_ctf_field_type_common_get_field_index(struct bt_ctf_field_type_common *ft, + const char *name) +{ + int field_index = -1; + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_STRUCT: + field_index = bt_ctf_field_type_common_structure_get_field_name_index( + ft, name); + break; + case BT_CTF_FIELD_TYPE_ID_VARIANT: + field_index = bt_ctf_field_type_common_variant_get_field_name_index( + ft, name); + break; + default: + break; + } + + return field_index; +} + +BT_HIDDEN +struct bt_ctf_field_path *bt_ctf_field_type_common_variant_borrow_tag_field_path( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_variant *var_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, + "Field type"); + return var_ft->tag_field_path; +} + +BT_HIDDEN +struct bt_ctf_field_path *bt_ctf_field_type_common_sequence_borrow_length_field_path( + struct bt_ctf_field_type_common *ft) +{ + struct bt_ctf_field_type_common_sequence *seq_ft = BT_CTF_FROM_COMMON(ft); + + BT_ASSERT_PRE_NON_NULL(ft, "Field type"); + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_SEQUENCE, + "Field type"); + return seq_ft->length_field_path; +} + +BT_HIDDEN +int bt_ctf_field_type_common_validate_single_clock_class( + struct bt_ctf_field_type_common *ft, + struct bt_ctf_clock_class **expected_clock_class) +{ + int ret = 0; + + if (!ft) { + goto end; + } + + BT_ASSERT(expected_clock_class); + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_INTEGER: + { + struct bt_ctf_clock_class *mapped_clock_class = + bt_ctf_field_type_common_integer_borrow_mapped_clock_class(ft); + + if (!mapped_clock_class) { + goto end; + } + + if (!*expected_clock_class) { + /* Move reference to output parameter */ + *expected_clock_class = bt_ctf_object_get_ref(mapped_clock_class); + mapped_clock_class = NULL; + BT_LOGV("Setting expected clock class: " + "expected-clock-class-addr=%p", + *expected_clock_class); + } else { + if (mapped_clock_class != *expected_clock_class) { + BT_LOGW("Integer field type is not mapped to " + "the expected clock class: " + "mapped-clock-class-addr=%p, " + "mapped-clock-class-name=\"%s\", " + "expected-clock-class-addr=%p, " + "expected-clock-class-name=\"%s\"", + mapped_clock_class, + bt_ctf_clock_class_get_name(mapped_clock_class), + *expected_clock_class, + bt_ctf_clock_class_get_name(*expected_clock_class)); + bt_ctf_object_put_ref(mapped_clock_class); + ret = -1; + goto end; + } + } + + break; + } + case BT_CTF_FIELD_TYPE_ID_ENUM: + case BT_CTF_FIELD_TYPE_ID_ARRAY: + case BT_CTF_FIELD_TYPE_ID_SEQUENCE: + { + struct bt_ctf_field_type_common *sub_ft = NULL; + + switch (ft->id) { + case BT_CTF_FIELD_TYPE_ID_ENUM: + sub_ft = bt_ctf_field_type_common_enumeration_borrow_container_field_type( + ft); + break; + case BT_CTF_FIELD_TYPE_ID_ARRAY: + sub_ft = bt_ctf_field_type_common_array_borrow_element_field_type( + ft); + break; + case BT_CTF_FIELD_TYPE_ID_SEQUENCE: + sub_ft = bt_ctf_field_type_common_sequence_borrow_element_field_type( + ft); + break; + default: + BT_LOGF("Unexpected field type ID: id=%d", ft->id); + abort(); + } + + BT_ASSERT(sub_ft); + ret = bt_ctf_field_type_common_validate_single_clock_class(sub_ft, + expected_clock_class); + break; + } + case BT_CTF_FIELD_TYPE_ID_STRUCT: + { + uint64_t i; + int64_t count = bt_ctf_field_type_common_structure_get_field_count( + ft); + + for (i = 0; i < count; i++) { + const char *name; + struct bt_ctf_field_type_common *member_type; + + ret = bt_ctf_field_type_common_structure_borrow_field_by_index( + ft, &name, &member_type, i); + BT_ASSERT(ret == 0); + ret = bt_ctf_field_type_common_validate_single_clock_class( + member_type, expected_clock_class); + if (ret) { + BT_LOGW("Structure field type's field's type " + "is not recursively mapped to the " + "expected clock class: " + "field-ft-addr=%p, field-name=\"%s\"", + member_type, name); + goto end; + } + } + break; + } + case BT_CTF_FIELD_TYPE_ID_VARIANT: + { + uint64_t i; + int64_t count = bt_ctf_field_type_common_variant_get_field_count( + ft); + + for (i = 0; i < count; i++) { + const char *name; + struct bt_ctf_field_type_common *member_type; + + ret = bt_ctf_field_type_common_variant_borrow_field_by_index( + ft, &name, &member_type, i); + BT_ASSERT(ret == 0); + ret = bt_ctf_field_type_common_validate_single_clock_class( + member_type, expected_clock_class); + if (ret) { + BT_LOGW("Variant field type's field's type " + "is not recursively mapped to the " + "expected clock class: " + "field-ft-addr=%p, field-name=\"%s\"", + member_type, name); + goto end; + } + } + break; + } + default: + break; + } + +end: + return ret; +} + static struct bt_ctf_field_type *bt_ctf_field_type_integer_copy( struct bt_ctf_field_type *ft); @@ -76,79 +4037,79 @@ static struct bt_ctf_field_type *bt_ctf_field_type_string_copy( struct bt_ctf_field_type *type); -static struct bt_field_type_common_methods bt_ctf_field_type_integer_methods = { - .freeze = bt_field_type_common_generic_freeze, - .validate = bt_field_type_common_integer_validate, - .set_byte_order = bt_field_type_common_integer_set_byte_order, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_integer_methods = { + .freeze = bt_ctf_field_type_common_generic_freeze, + .validate = bt_ctf_field_type_common_integer_validate, + .set_byte_order = bt_ctf_field_type_common_integer_set_byte_order, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_integer_copy, - .compare = bt_field_type_common_integer_compare, + .compare = bt_ctf_field_type_common_integer_compare, }; -static struct bt_field_type_common_methods bt_ctf_field_type_floating_point_methods = { - .freeze = bt_field_type_common_generic_freeze, +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_floating_point_methods = { + .freeze = bt_ctf_field_type_common_generic_freeze, .validate = NULL, - .set_byte_order = bt_field_type_common_floating_point_set_byte_order, - .copy = (bt_field_type_common_method_copy) + .set_byte_order = bt_ctf_field_type_common_floating_point_set_byte_order, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_floating_point_copy, - .compare = bt_field_type_common_floating_point_compare, + .compare = bt_ctf_field_type_common_floating_point_compare, }; -static struct bt_field_type_common_methods bt_ctf_field_type_enumeration_methods = { - .freeze = bt_field_type_common_enumeration_freeze_recursive, - .validate = bt_field_type_common_enumeration_validate_recursive, - .set_byte_order = bt_field_type_common_enumeration_set_byte_order_recursive, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_enumeration_methods = { + .freeze = bt_ctf_field_type_common_enumeration_freeze_recursive, + .validate = bt_ctf_field_type_common_enumeration_validate_recursive, + .set_byte_order = bt_ctf_field_type_common_enumeration_set_byte_order_recursive, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_enumeration_copy_recursive, - .compare = bt_field_type_common_enumeration_compare_recursive, + .compare = bt_ctf_field_type_common_enumeration_compare_recursive, }; -static struct bt_field_type_common_methods bt_ctf_field_type_string_methods = { - .freeze = bt_field_type_common_generic_freeze, +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_string_methods = { + .freeze = bt_ctf_field_type_common_generic_freeze, .validate = NULL, .set_byte_order = NULL, - .copy = (bt_field_type_common_method_copy) + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_string_copy, - .compare = bt_field_type_common_string_compare, + .compare = bt_ctf_field_type_common_string_compare, }; -static struct bt_field_type_common_methods bt_ctf_field_type_array_methods = { - .freeze = bt_field_type_common_array_freeze_recursive, - .validate = bt_field_type_common_array_validate_recursive, - .set_byte_order = bt_field_type_common_array_set_byte_order_recursive, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_array_methods = { + .freeze = bt_ctf_field_type_common_array_freeze_recursive, + .validate = bt_ctf_field_type_common_array_validate_recursive, + .set_byte_order = bt_ctf_field_type_common_array_set_byte_order_recursive, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_array_copy_recursive, - .compare = bt_field_type_common_array_compare_recursive, + .compare = bt_ctf_field_type_common_array_compare_recursive, }; -static struct bt_field_type_common_methods bt_ctf_field_type_sequence_methods = { - .freeze = bt_field_type_common_sequence_freeze_recursive, - .validate = bt_field_type_common_sequence_validate_recursive, - .set_byte_order = bt_field_type_common_sequence_set_byte_order_recursive, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_sequence_methods = { + .freeze = bt_ctf_field_type_common_sequence_freeze_recursive, + .validate = bt_ctf_field_type_common_sequence_validate_recursive, + .set_byte_order = bt_ctf_field_type_common_sequence_set_byte_order_recursive, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_sequence_copy_recursive, - .compare = bt_field_type_common_sequence_compare_recursive, + .compare = bt_ctf_field_type_common_sequence_compare_recursive, }; -static struct bt_field_type_common_methods bt_ctf_field_type_structure_methods = { - .freeze = bt_field_type_common_structure_freeze_recursive, - .validate = bt_field_type_common_structure_validate_recursive, - .set_byte_order = bt_field_type_common_structure_set_byte_order_recursive, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_structure_methods = { + .freeze = bt_ctf_field_type_common_structure_freeze_recursive, + .validate = bt_ctf_field_type_common_structure_validate_recursive, + .set_byte_order = bt_ctf_field_type_common_structure_set_byte_order_recursive, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_structure_copy_recursive, - .compare = bt_field_type_common_structure_compare_recursive, + .compare = bt_ctf_field_type_common_structure_compare_recursive, }; -static struct bt_field_type_common_methods bt_ctf_field_type_variant_methods = { - .freeze = bt_field_type_common_variant_freeze_recursive, - .validate = bt_field_type_common_variant_validate_recursive, - .set_byte_order = bt_field_type_common_variant_set_byte_order_recursive, - .copy = (bt_field_type_common_method_copy) +static struct bt_ctf_field_type_common_methods bt_ctf_field_type_variant_methods = { + .freeze = bt_ctf_field_type_common_variant_freeze_recursive, + .validate = bt_ctf_field_type_common_variant_validate_recursive, + .set_byte_order = bt_ctf_field_type_common_variant_set_byte_order_recursive, + .copy = (bt_ctf_field_type_common_method_copy) bt_ctf_field_type_variant_copy_recursive, - .compare = bt_field_type_common_variant_compare_recursive, + .compare = bt_ctf_field_type_common_variant_compare_recursive, }; -typedef int (*bt_ctf_field_type_serialize_func)(struct bt_field_type_common *, +typedef int (*bt_ctf_field_type_serialize_func)(struct bt_ctf_field_type_common *, struct metadata_context *); BT_HIDDEN @@ -156,14 +4117,14 @@ int bt_ctf_field_type_serialize_recursive(struct bt_ctf_field_type *type, struct metadata_context *context) { int ret; - struct bt_field_type_common *type_common = (void *) type; + struct bt_ctf_field_type_common *type_common = (void *) type; bt_ctf_field_type_serialize_func serialize_func; BT_ASSERT(type); BT_ASSERT(context); /* Make sure field type is valid before serializing it */ - ret = bt_field_type_common_validate((void *) type); + ret = bt_ctf_field_type_common_validate((void *) type); if (ret) { BT_LOGW("Cannot serialize field type's metadata: field type is invalid: " "addr=%p", type); @@ -178,18 +4139,18 @@ end: } static -const char *get_encoding_string(enum bt_string_encoding encoding) +const char *get_encoding_string(enum bt_ctf_string_encoding encoding) { const char *encoding_string; switch (encoding) { - case BT_STRING_ENCODING_NONE: + case BT_CTF_STRING_ENCODING_NONE: encoding_string = "none"; break; - case BT_STRING_ENCODING_ASCII: + case BT_CTF_STRING_ENCODING_ASCII: encoding_string = "ASCII"; break; - case BT_STRING_ENCODING_UTF8: + case BT_CTF_STRING_ENCODING_UTF8: encoding_string = "UTF8"; break; default: @@ -201,22 +4162,22 @@ const char *get_encoding_string(enum bt_string_encoding encoding) } static -const char *get_integer_base_string(enum bt_integer_base base) +const char *get_integer_base_string(enum bt_ctf_integer_base base) { const char *base_string; switch (base) { - case BT_INTEGER_BASE_DECIMAL: - case BT_INTEGER_BASE_UNSPECIFIED: + case BT_CTF_INTEGER_BASE_DECIMAL: + case BT_CTF_INTEGER_BASE_UNSPECIFIED: base_string = "decimal"; break; - case BT_INTEGER_BASE_HEXADECIMAL: + case BT_CTF_INTEGER_BASE_HEXADECIMAL: base_string = "hexadecimal"; break; - case BT_INTEGER_BASE_OCTAL: + case BT_CTF_INTEGER_BASE_OCTAL: base_string = "octal"; break; - case BT_INTEGER_BASE_BINARY: + case BT_CTF_INTEGER_BASE_BINARY: base_string = "binary"; break; default: @@ -233,7 +4194,7 @@ void append_field_name(struct metadata_context *context, { g_string_append_c(context->string, ' '); - if (!bt_identifier_is_valid(name) || *name == '_') { + if (!bt_ctf_identifier_is_valid(name) || *name == '_') { g_string_append_c(context->string, '_'); } @@ -241,10 +4202,10 @@ void append_field_name(struct metadata_context *context, } static -int bt_ctf_field_type_integer_serialize(struct bt_field_type_common *type, +int bt_ctf_field_type_integer_serialize(struct bt_ctf_field_type_common *type, struct metadata_context *context) { - struct bt_field_type_common_integer *integer = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_integer *integer = BT_CTF_FROM_COMMON(type); int ret = 0; BT_LOGD("Serializing CTF writer integer field type's metadata: " @@ -255,9 +4216,9 @@ int bt_ctf_field_type_integer_serialize(struct bt_field_type_common *type, (integer->is_signed ? "true" : "false"), get_encoding_string(integer->encoding), get_integer_base_string(integer->base), - get_byte_order_string(integer->user_byte_order)); + bt_ctf_get_byte_order_string(integer->user_byte_order)); if (integer->mapped_clock_class) { - const char *clock_name = bt_clock_class_get_name( + const char *clock_name = bt_ctf_clock_class_get_name( integer->mapped_clock_class); BT_ASSERT(clock_name); @@ -271,22 +4232,22 @@ int bt_ctf_field_type_integer_serialize(struct bt_field_type_common *type, static int bt_ctf_field_type_enumeration_serialize_recursive( - struct bt_field_type_common *type, + struct bt_ctf_field_type_common *type, struct metadata_context *context) { size_t entry; int ret; - struct bt_field_type_common_enumeration *enumeration = - BT_FROM_COMMON(type); - struct bt_field_type_common *container_type; + struct bt_ctf_field_type_common_enumeration *enumeration = + BT_CTF_FROM_COMMON(type); + struct bt_ctf_field_type_common *container_type; int container_signed; BT_LOGD("Serializing CTF writer enumeration field type's metadata: " "ft-addr=%p, metadata-context-addr=%p", type, context); container_type = - bt_field_type_common_enumeration_borrow_container_field_type(type); + bt_ctf_field_type_common_enumeration_borrow_container_field_type(type); BT_ASSERT(container_type); - container_signed = bt_field_type_common_integer_is_signed( + container_signed = bt_ctf_field_type_common_integer_is_signed( container_type); BT_ASSERT(container_signed >= 0); g_string_append(context->string, "enum : "); @@ -301,13 +4262,13 @@ int bt_ctf_field_type_enumeration_serialize_recursive( g_string_append(context->string, " { "); for (entry = 0; entry < enumeration->entries->len; entry++) { - struct enumeration_mapping *mapping = + struct bt_ctf_enumeration_mapping *mapping = enumeration->entries->pdata[entry]; const char *label = g_quark_to_string(mapping->string); g_string_append(context->string, "\""); - if (!bt_identifier_is_valid(label) || label[0] == '_') { + if (!bt_ctf_identifier_is_valid(label) || label[0] == '_') { g_string_append(context->string, "_"); } @@ -355,11 +4316,11 @@ end: } static -int bt_ctf_field_type_floating_point_serialize(struct bt_field_type_common *type, +int bt_ctf_field_type_floating_point_serialize(struct bt_ctf_field_type_common *type, struct metadata_context *context) { - struct bt_field_type_common_floating_point *floating_point = - BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_floating_point *floating_point = + BT_CTF_FROM_COMMON(type); BT_LOGD("Serializing CTF writer floating point number field type's metadata: " "ft-addr=%p, metadata-context-addr=%p", type, context); @@ -367,20 +4328,20 @@ int bt_ctf_field_type_floating_point_serialize(struct bt_field_type_common *type "floating_point { exp_dig = %u; mant_dig = %u; byte_order = %s; align = %u; }", floating_point->exp_dig, floating_point->mant_dig, - get_byte_order_string(floating_point->user_byte_order), + bt_ctf_get_byte_order_string(floating_point->user_byte_order), type->alignment); return 0; } static int bt_ctf_field_type_structure_serialize_recursive( - struct bt_field_type_common *type, + struct bt_ctf_field_type_common *type, struct metadata_context *context) { size_t i; unsigned int indent; int ret = 0; - struct bt_field_type_common_structure *structure = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_structure *structure = BT_CTF_FROM_COMMON(type); GString *structure_field_name = context->field_name; BT_LOGD("Serializing CTF writer structure field type's metadata: " @@ -391,8 +4352,8 @@ int bt_ctf_field_type_structure_serialize_recursive( g_string_append(context->string, "struct {\n"); for (i = 0; i < structure->fields->len; i++) { - struct bt_field_type_common_structure_field *field = - BT_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + struct bt_ctf_field_type_common_structure_field *field = + BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( structure, i); BT_LOGD("Serializing CTF writer structure field type's field metadata: " @@ -442,13 +4403,13 @@ end: static int bt_ctf_field_type_variant_serialize_recursive( - struct bt_field_type_common *type, + struct bt_ctf_field_type_common *type, struct metadata_context *context) { size_t i; unsigned int indent; int ret = 0; - struct bt_field_type_common_variant *variant = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_variant *variant = BT_CTF_FROM_COMMON(type); GString *variant_field_name = context->field_name; BT_LOGD("Serializing CTF writer variant field type's metadata: " @@ -464,8 +4425,8 @@ int bt_ctf_field_type_variant_serialize_recursive( context->current_indentation_level++; for (i = 0; i < variant->choices->len; i++) { - struct bt_field_type_common_variant_choice *field = - BT_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + struct bt_ctf_field_type_common_variant_choice *field = + BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( variant, i); BT_LOGD("Serializing CTF writer variant field type's field metadata: " @@ -518,11 +4479,11 @@ end: static int bt_ctf_field_type_array_serialize_recursive( - struct bt_field_type_common *type, + struct bt_ctf_field_type_common *type, struct metadata_context *context) { int ret = 0; - struct bt_field_type_common_array *array = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_array *array = BT_CTF_FROM_COMMON(type); BT_LOGD("Serializing CTF writer array field type's metadata: " "ft-addr=%p, metadata-context-addr=%p", type, context); @@ -551,11 +4512,11 @@ end: static int bt_ctf_field_type_sequence_serialize_recursive( - struct bt_field_type_common *type, + struct bt_ctf_field_type_common *type, struct metadata_context *context) { int ret = 0; - struct bt_field_type_common_sequence *sequence = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_sequence *sequence = BT_CTF_FROM_COMMON(type); BT_LOGD("Serializing CTF writer sequence field type's metadata: " "ft-addr=%p, metadata-context-addr=%p", type, context); @@ -581,10 +4542,10 @@ end: } static -int bt_ctf_field_type_string_serialize(struct bt_field_type_common *type, +int bt_ctf_field_type_string_serialize(struct bt_ctf_field_type_common *type, struct metadata_context *context) { - struct bt_field_type_common_string *string = BT_FROM_COMMON(type); + struct bt_ctf_field_type_common_string *string = BT_CTF_FROM_COMMON(type); BT_LOGD("Serializing CTF writer string field type's metadata: " "ft-addr=%p, metadata-context-addr=%p", type, context); @@ -596,7 +4557,7 @@ int bt_ctf_field_type_string_serialize(struct bt_field_type_common *type, struct bt_ctf_field_type *bt_ctf_field_type_integer_create(unsigned int size) { - struct bt_field_type_common_integer *integer = NULL; + struct bt_ctf_field_type_common_integer *integer = NULL; BT_LOGD("Creating CTF writer integer field type object: size=%u", size); @@ -606,14 +4567,14 @@ struct bt_ctf_field_type *bt_ctf_field_type_integer_create(unsigned int size) goto error; } - integer = g_new0(struct bt_field_type_common_integer, 1); + integer = g_new0(struct bt_ctf_field_type_common_integer, 1); if (!integer) { BT_LOGE_STR("Failed to allocate one integer field type."); goto error; } - bt_field_type_common_integer_initialize(BT_TO_COMMON(integer), - size, bt_field_type_common_integer_destroy, + bt_ctf_field_type_common_integer_initialize(BT_CTF_TO_COMMON(integer), + size, bt_ctf_field_type_common_integer_destroy, &bt_ctf_field_type_integer_methods); integer->common.spec.writer.serialize_func = bt_ctf_field_type_integer_serialize; @@ -622,7 +4583,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_integer_create(unsigned int size) goto end; error: - BT_PUT(integer); + BT_CTF_OBJECT_PUT_REF_AND_RESET(integer); end: return (void *) integer; @@ -630,57 +4591,57 @@ end: int bt_ctf_field_type_integer_get_size(struct bt_ctf_field_type *ft) { - return bt_field_type_common_integer_get_size((void *) ft); + return bt_ctf_field_type_common_integer_get_size((void *) ft); } bt_bool bt_ctf_field_type_integer_is_signed(struct bt_ctf_field_type *ft) { - return bt_field_type_common_integer_is_signed((void *) ft); + return bt_ctf_field_type_common_integer_is_signed((void *) ft); } int bt_ctf_field_type_integer_set_is_signed(struct bt_ctf_field_type *ft, bt_bool is_signed) { - return bt_field_type_common_integer_set_is_signed((void *) ft, + return bt_ctf_field_type_common_integer_set_is_signed((void *) ft, is_signed); } int bt_ctf_field_type_integer_set_size(struct bt_ctf_field_type *ft, unsigned int size) { - return bt_field_type_common_integer_set_size((void *) ft, size); + return bt_ctf_field_type_common_integer_set_size((void *) ft, size); } enum bt_ctf_integer_base bt_ctf_field_type_integer_get_base( struct bt_ctf_field_type *ft) { - return (int) bt_field_type_common_integer_get_base((void *) ft); + return (int) bt_ctf_field_type_common_integer_get_base((void *) ft); } int bt_ctf_field_type_integer_set_base(struct bt_ctf_field_type *ft, enum bt_ctf_integer_base base) { - return bt_field_type_common_integer_set_base((void *) ft, + return bt_ctf_field_type_common_integer_set_base((void *) ft, (int) base); } enum bt_ctf_string_encoding bt_ctf_field_type_integer_get_encoding( struct bt_ctf_field_type *ft) { - return (int) bt_field_type_common_integer_get_encoding((void *) ft); + return (int) bt_ctf_field_type_common_integer_get_encoding((void *) ft); } int bt_ctf_field_type_integer_set_encoding(struct bt_ctf_field_type *ft, enum bt_ctf_string_encoding encoding) { - return bt_field_type_common_integer_set_encoding((void *) ft, + return bt_ctf_field_type_common_integer_set_encoding((void *) ft, (int) encoding); } struct bt_ctf_clock_class *bt_ctf_field_type_integer_get_mapped_clock_class( struct bt_ctf_field_type *ft) { - return bt_get(bt_field_type_common_integer_borrow_mapped_clock_class( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_integer_borrow_mapped_clock_class( (void *) ft)); } @@ -688,8 +4649,8 @@ int bt_ctf_field_type_integer_set_mapped_clock_class( struct bt_ctf_field_type *ft, struct bt_ctf_clock_class *clock_class) { - return bt_field_type_common_integer_set_mapped_clock_class((void *) ft, - BT_TO_COMMON(clock_class)); + return bt_ctf_field_type_common_integer_set_mapped_clock_class((void *) ft, + clock_class); } int bt_ctf_field_type_enumeration_signed_get_mapping_by_index( @@ -697,7 +4658,7 @@ int bt_ctf_field_type_enumeration_signed_get_mapping_by_index( const char **mapping_name, int64_t *range_begin, int64_t *range_end) { - return bt_field_type_common_enumeration_signed_get_mapping_by_index( + return bt_ctf_field_type_common_enumeration_signed_get_mapping_by_index( (void *) ft, index, mapping_name, range_begin, range_end); } @@ -706,15 +4667,15 @@ int bt_ctf_field_type_enumeration_unsigned_get_mapping_by_index( const char **mapping_name, uint64_t *range_begin, uint64_t *range_end) { - return bt_field_type_common_enumeration_unsigned_get_mapping_by_index( + return bt_ctf_field_type_common_enumeration_unsigned_get_mapping_by_index( (void *) ft, index, mapping_name, range_begin, range_end); } struct bt_ctf_field_type *bt_ctf_field_type_enumeration_create( struct bt_ctf_field_type *container_ft) { - struct bt_field_type_common_enumeration *enumeration = NULL; - struct bt_field_type_common *int_ft = (void *) container_ft; + struct bt_ctf_field_type_common_enumeration *enumeration = NULL; + struct bt_ctf_field_type_common *int_ft = (void *) container_ft; BT_LOGD("Creating CTF writer enumeration field type object: int-ft-addr=%p", container_ft); @@ -724,21 +4685,21 @@ struct bt_ctf_field_type *bt_ctf_field_type_enumeration_create( goto error; } - if (int_ft->id != BT_FIELD_TYPE_ID_INTEGER) { + if (int_ft->id != BT_CTF_FIELD_TYPE_ID_INTEGER) { BT_LOGW("Invalid parameter: container field type is not an integer field type: " "container-ft-addr=%p, container-ft-id=%s", - container_ft, bt_common_field_type_id_string(int_ft->id)); + container_ft, bt_ctf_field_type_id_string(int_ft->id)); goto error; } - enumeration = g_new0(struct bt_field_type_common_enumeration, 1); + enumeration = g_new0(struct bt_ctf_field_type_common_enumeration, 1); if (!enumeration) { BT_LOGE_STR("Failed to allocate one enumeration field type."); goto error; } - bt_field_type_common_enumeration_initialize(BT_TO_COMMON(enumeration), - int_ft, bt_field_type_common_enumeration_destroy_recursive, + bt_ctf_field_type_common_enumeration_initialize(BT_CTF_TO_COMMON(enumeration), + int_ft, bt_ctf_field_type_common_enumeration_destroy_recursive, &bt_ctf_field_type_enumeration_methods); enumeration->common.spec.writer.serialize_func = bt_ctf_field_type_enumeration_serialize_recursive; @@ -749,7 +4710,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_enumeration_create( goto end; error: - BT_PUT(enumeration); + BT_CTF_OBJECT_PUT_REF_AND_RESET(enumeration); end: return (void *) enumeration; @@ -758,8 +4719,8 @@ end: struct bt_ctf_field_type *bt_ctf_field_type_enumeration_get_container_field_type( struct bt_ctf_field_type *ft) { - return bt_get( - bt_field_type_common_enumeration_borrow_container_field_type( + return bt_ctf_object_get_ref( + bt_ctf_field_type_common_enumeration_borrow_container_field_type( (void *) ft)); } @@ -767,7 +4728,7 @@ int bt_ctf_field_type_enumeration_signed_add_mapping( struct bt_ctf_field_type *ft, const char *string, int64_t range_start, int64_t range_end) { - return bt_field_type_common_enumeration_signed_add_mapping( + return bt_ctf_field_type_common_enumeration_signed_add_mapping( (void *) ft, string, range_start, range_end); } @@ -775,20 +4736,20 @@ int bt_ctf_field_type_enumeration_unsigned_add_mapping( struct bt_ctf_field_type *ft, const char *string, uint64_t range_start, uint64_t range_end) { - return bt_field_type_common_enumeration_unsigned_add_mapping( + return bt_ctf_field_type_common_enumeration_unsigned_add_mapping( (void *) ft, string, range_start, range_end); } int64_t bt_ctf_field_type_enumeration_get_mapping_count( struct bt_ctf_field_type *ft) { - return bt_field_type_common_enumeration_get_mapping_count((void *) ft); + return bt_ctf_field_type_common_enumeration_get_mapping_count((void *) ft); } struct bt_ctf_field_type *bt_ctf_field_type_floating_point_create(void) { - struct bt_field_type_common_floating_point *floating_point = - g_new0(struct bt_field_type_common_floating_point, 1); + struct bt_ctf_field_type_common_floating_point *floating_point = + g_new0(struct bt_ctf_field_type_common_floating_point, 1); BT_LOGD_STR("Creating CTF writer floating point number field type object."); @@ -797,9 +4758,9 @@ struct bt_ctf_field_type *bt_ctf_field_type_floating_point_create(void) goto end; } - bt_field_type_common_floating_point_initialize( - BT_TO_COMMON(floating_point), - bt_field_type_common_floating_point_destroy, + bt_ctf_field_type_common_floating_point_initialize( + BT_CTF_TO_COMMON(floating_point), + bt_ctf_field_type_common_floating_point_destroy, &bt_ctf_field_type_floating_point_methods); floating_point->common.spec.writer.serialize_func = bt_ctf_field_type_floating_point_serialize; @@ -814,35 +4775,35 @@ end: int bt_ctf_field_type_floating_point_get_exponent_digits( struct bt_ctf_field_type *ft) { - return bt_field_type_common_floating_point_get_exponent_digits( + return bt_ctf_field_type_common_floating_point_get_exponent_digits( (void *) ft); } int bt_ctf_field_type_floating_point_set_exponent_digits( struct bt_ctf_field_type *ft, unsigned int exponent_digits) { - return bt_field_type_common_floating_point_set_exponent_digits( + return bt_ctf_field_type_common_floating_point_set_exponent_digits( (void *) ft, exponent_digits); } int bt_ctf_field_type_floating_point_get_mantissa_digits( struct bt_ctf_field_type *ft) { - return bt_field_type_common_floating_point_get_mantissa_digits( + return bt_ctf_field_type_common_floating_point_get_mantissa_digits( (void *) ft); } int bt_ctf_field_type_floating_point_set_mantissa_digits( struct bt_ctf_field_type *ft, unsigned int mantissa_digits) { - return bt_field_type_common_floating_point_set_mantissa_digits( + return bt_ctf_field_type_common_floating_point_set_mantissa_digits( (void *) ft, mantissa_digits); } struct bt_ctf_field_type *bt_ctf_field_type_structure_create(void) { - struct bt_field_type_common_structure *structure = - g_new0(struct bt_field_type_common_structure, 1); + struct bt_ctf_field_type_common_structure *structure = + g_new0(struct bt_ctf_field_type_common_structure, 1); BT_LOGD_STR("Creating CTF writer structure field type object."); @@ -851,8 +4812,8 @@ struct bt_ctf_field_type *bt_ctf_field_type_structure_create(void) goto error; } - bt_field_type_common_structure_initialize(BT_TO_COMMON(structure), - bt_field_type_common_structure_destroy_recursive, + bt_ctf_field_type_common_structure_initialize(BT_CTF_TO_COMMON(structure), + bt_ctf_field_type_common_structure_destroy_recursive, &bt_ctf_field_type_structure_methods); structure->common.spec.writer.serialize_func = bt_ctf_field_type_structure_serialize_recursive; @@ -861,7 +4822,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_structure_create(void) goto end; error: - BT_PUT(structure); + BT_CTF_OBJECT_PUT_REF_AND_RESET(structure); end: return (void *) structure; @@ -871,13 +4832,13 @@ int bt_ctf_field_type_structure_add_field(struct bt_ctf_field_type *ft, struct bt_ctf_field_type *field_type, const char *field_name) { - return bt_field_type_common_structure_add_field((void *) ft, + return bt_ctf_field_type_common_structure_add_field((void *) ft, (void *) field_type, field_name); } int64_t bt_ctf_field_type_structure_get_field_count(struct bt_ctf_field_type *ft) { - return bt_field_type_common_structure_get_field_count((void *) ft); + return bt_ctf_field_type_common_structure_get_field_count((void *) ft); } int bt_ctf_field_type_structure_get_field_by_index( @@ -885,11 +4846,11 @@ int bt_ctf_field_type_structure_get_field_by_index( const char **field_name, struct bt_ctf_field_type **field_type, uint64_t index) { - int ret = bt_field_type_common_structure_borrow_field_by_index( + int ret = bt_ctf_field_type_common_structure_borrow_field_by_index( (void *) ft, field_name, (void *) field_type, index); if (ret == 0 && field_type) { - bt_get(*field_type); + bt_ctf_object_get_ref(*field_type); } return ret; @@ -898,35 +4859,35 @@ int bt_ctf_field_type_structure_get_field_by_index( struct bt_ctf_field_type *bt_ctf_field_type_structure_get_field_type_by_name( struct bt_ctf_field_type *ft, const char *name) { - return bt_get(bt_field_type_common_structure_borrow_field_type_by_name( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_structure_borrow_field_type_by_name( (void *) ft, name)); } struct bt_ctf_field_type *bt_ctf_field_type_variant_create( struct bt_ctf_field_type *tag_ft, const char *tag_name) { - struct bt_field_type_common_variant *var_ft = NULL; + struct bt_ctf_field_type_common_variant *var_ft = NULL; BT_LOGD("Creating CTF writer variant field type object: " "tag-ft-addr=%p, tag-field-name=\"%s\"", tag_ft, tag_name); - if (tag_name && !bt_identifier_is_valid(tag_name)) { + if (tag_name && !bt_ctf_identifier_is_valid(tag_name)) { BT_LOGW("Invalid parameter: tag field name is not a valid CTF identifier: " "tag-ft-addr=%p, tag-field-name=\"%s\"", tag_ft, tag_name); goto error; } - var_ft = g_new0(struct bt_field_type_common_variant, 1); + var_ft = g_new0(struct bt_ctf_field_type_common_variant, 1); if (!var_ft) { BT_LOGE_STR("Failed to allocate one variant field type."); goto error; } - bt_field_type_common_variant_initialize(BT_TO_COMMON(var_ft), + bt_ctf_field_type_common_variant_initialize(BT_CTF_TO_COMMON(var_ft), (void *) tag_ft, tag_name, - bt_field_type_common_variant_destroy_recursive, + bt_ctf_field_type_common_variant_destroy_recursive, &bt_ctf_field_type_variant_methods); var_ft->common.spec.writer.serialize_func = bt_ctf_field_type_variant_serialize_recursive; @@ -936,7 +4897,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_create( goto end; error: - BT_PUT(var_ft); + BT_CTF_OBJECT_PUT_REF_AND_RESET(var_ft); end: return (void *) var_ft; @@ -945,26 +4906,26 @@ end: struct bt_ctf_field_type *bt_ctf_field_type_variant_get_tag_field_type( struct bt_ctf_field_type *ft) { - return bt_get(bt_field_type_common_variant_borrow_tag_field_type( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_variant_borrow_tag_field_type( (void *) ft)); } const char *bt_ctf_field_type_variant_get_tag_name(struct bt_ctf_field_type *ft) { - return bt_field_type_common_variant_get_tag_name((void *) ft); + return bt_ctf_field_type_common_variant_get_tag_name((void *) ft); } int bt_ctf_field_type_variant_set_tag_name( struct bt_ctf_field_type *ft, const char *name) { - return bt_field_type_common_variant_set_tag_name((void *) ft, name); + return bt_ctf_field_type_common_variant_set_tag_name((void *) ft, name); } int bt_ctf_field_type_variant_add_field(struct bt_ctf_field_type *ft, struct bt_ctf_field_type *field_type, const char *field_name) { - return bt_field_type_common_variant_add_field((void *) ft, + return bt_ctf_field_type_common_variant_add_field((void *) ft, (void *) field_type, field_name); } @@ -972,7 +4933,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_by_name( struct bt_ctf_field_type *ft, const char *field_name) { - return bt_get(bt_field_type_common_variant_borrow_field_type_by_name( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_variant_borrow_field_type_by_name( (void *) ft, field_name)); } @@ -983,17 +4944,17 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_from_tag( int ret; int64_t choice_index; struct bt_ctf_field *container; - struct bt_field_type_common_variant *var_ft = (void *) ft; + struct bt_ctf_field_type_common_variant *var_ft = (void *) ft; struct bt_ctf_field_type *ret_ft = NULL; BT_ASSERT_PRE_NON_NULL(ft, "Field type"); - BT_ASSERT_PRE_FT_COMMON_HAS_ID(ft, BT_FIELD_TYPE_ID_VARIANT, + BT_ASSERT_PRE_CTF_FT_COMMON_HAS_ID(ft, BT_CTF_FIELD_TYPE_ID_VARIANT, "Field type"); BT_ASSERT_PRE_NON_NULL(tag_field, "Tag field"); - BT_ASSERT_PRE_FIELD_COMMON_HAS_TYPE_ID( - (struct bt_field_common *) tag_field, + BT_ASSERT_PRE_CTF_FIELD_COMMON_HAS_TYPE_ID( + (struct bt_ctf_field_common *) tag_field, BT_CTF_FIELD_TYPE_ID_ENUM, "Tag field"); - BT_ASSERT_PRE_FIELD_COMMON_IS_SET((struct bt_field_common *) tag_field, + BT_ASSERT_PRE_CTF_FIELD_COMMON_IS_SET((struct bt_ctf_field_common *) tag_field, "Tag field"); container = bt_ctf_field_enumeration_borrow_container(tag_field); @@ -1005,7 +4966,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_from_tag( ret = bt_ctf_field_integer_signed_get_value(container, &val); BT_ASSERT(ret == 0); - choice_index = bt_field_type_common_variant_find_choice_index( + choice_index = bt_ctf_field_type_common_variant_find_choice_index( (void *) ft, (uint64_t) val, true); } else { uint64_t val; @@ -1013,13 +4974,13 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type_from_tag( ret = bt_ctf_field_integer_unsigned_get_value(container, &val); BT_ASSERT(ret == 0); - choice_index = bt_field_type_common_variant_find_choice_index( + choice_index = bt_ctf_field_type_common_variant_find_choice_index( (void *) ft, val, false); } if (choice_index < 0) { BT_LIB_LOGW("Cannot find variant field type's field: " - "%![var-ft-]+wF, %![tag-field-]+wf", ft, tag_field); + "var-ft-addr=%p, tag-field-addr=%p", ft, tag_field); goto end; } @@ -1033,18 +4994,18 @@ end: int64_t bt_ctf_field_type_variant_get_field_count(struct bt_ctf_field_type *ft) { - return bt_field_type_common_variant_get_field_count((void *) ft); + return bt_ctf_field_type_common_variant_get_field_count((void *) ft); } int bt_ctf_field_type_variant_get_field_by_index(struct bt_ctf_field_type *ft, const char **field_name, struct bt_ctf_field_type **field_type, uint64_t index) { - int ret = bt_field_type_common_variant_borrow_field_by_index( + int ret = bt_ctf_field_type_common_variant_borrow_field_by_index( (void *) ft, field_name, (void *) field_type, index); if (ret == 0 && field_type) { - bt_get(*field_type); + bt_ctf_object_get_ref(*field_type); } return ret; @@ -1053,7 +5014,7 @@ int bt_ctf_field_type_variant_get_field_by_index(struct bt_ctf_field_type *ft, struct bt_ctf_field_type *bt_ctf_field_type_array_create( struct bt_ctf_field_type *element_ft, unsigned int length) { - struct bt_field_type_common_array *array = NULL; + struct bt_ctf_field_type_common_array *array = NULL; BT_LOGD("Creating CTF writer array field type object: element-ft-addr=%p, " "length=%u", element_ft, length); @@ -1068,15 +5029,15 @@ struct bt_ctf_field_type *bt_ctf_field_type_array_create( goto error; } - array = g_new0(struct bt_field_type_common_array, 1); + array = g_new0(struct bt_ctf_field_type_common_array, 1); if (!array) { BT_LOGE_STR("Failed to allocate one array field type."); goto error; } - bt_field_type_common_array_initialize(BT_TO_COMMON(array), + bt_ctf_field_type_common_array_initialize(BT_CTF_TO_COMMON(array), (void *) element_ft, length, - bt_field_type_common_array_destroy_recursive, + bt_ctf_field_type_common_array_destroy_recursive, &bt_ctf_field_type_array_methods); array->common.spec.writer.serialize_func = bt_ctf_field_type_array_serialize_recursive; @@ -1086,7 +5047,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_array_create( goto end; error: - BT_PUT(array); + BT_CTF_OBJECT_PUT_REF_AND_RESET(array); end: return (void *) array; @@ -1095,20 +5056,20 @@ end: struct bt_ctf_field_type *bt_ctf_field_type_array_get_element_field_type( struct bt_ctf_field_type *ft) { - return bt_get(bt_field_type_common_array_borrow_element_field_type( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_array_borrow_element_field_type( (void *) ft)); } int64_t bt_ctf_field_type_array_get_length(struct bt_ctf_field_type *ft) { - return bt_field_type_common_array_get_length((void *) ft); + return bt_ctf_field_type_common_array_get_length((void *) ft); } struct bt_ctf_field_type *bt_ctf_field_type_sequence_create( struct bt_ctf_field_type *element_ft, const char *length_field_name) { - struct bt_field_type_common_sequence *sequence = NULL; + struct bt_ctf_field_type_common_sequence *sequence = NULL; BT_LOGD("Creating CTF writer sequence field type object: element-ft-addr=%p, " "length-field-name=\"%s\"", element_ft, length_field_name); @@ -1118,21 +5079,21 @@ struct bt_ctf_field_type *bt_ctf_field_type_sequence_create( goto error; } - if (!bt_identifier_is_valid(length_field_name)) { + if (!bt_ctf_identifier_is_valid(length_field_name)) { BT_LOGW("Invalid parameter: length field name is not a valid CTF identifier: " "length-field-name=\"%s\"", length_field_name); goto error; } - sequence = g_new0(struct bt_field_type_common_sequence, 1); + sequence = g_new0(struct bt_ctf_field_type_common_sequence, 1); if (!sequence) { BT_LOGE_STR("Failed to allocate one sequence field type."); goto error; } - bt_field_type_common_sequence_initialize(BT_TO_COMMON(sequence), + bt_ctf_field_type_common_sequence_initialize(BT_CTF_TO_COMMON(sequence), (void *) element_ft, length_field_name, - bt_field_type_common_sequence_destroy_recursive, + bt_ctf_field_type_common_sequence_destroy_recursive, &bt_ctf_field_type_sequence_methods); sequence->common.spec.writer.serialize_func = bt_ctf_field_type_sequence_serialize_recursive; @@ -1142,7 +5103,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_sequence_create( goto end; error: - BT_PUT(sequence); + BT_CTF_OBJECT_PUT_REF_AND_RESET(sequence); end: return (void *) sequence; @@ -1151,20 +5112,20 @@ end: struct bt_ctf_field_type *bt_ctf_field_type_sequence_get_element_field_type( struct bt_ctf_field_type *ft) { - return bt_get(bt_field_type_common_sequence_borrow_element_field_type( + return bt_ctf_object_get_ref(bt_ctf_field_type_common_sequence_borrow_element_field_type( (void *) ft)); } const char *bt_ctf_field_type_sequence_get_length_field_name( struct bt_ctf_field_type *ft) { - return bt_field_type_common_sequence_get_length_field_name((void *) ft); + return bt_ctf_field_type_common_sequence_get_length_field_name((void *) ft); } struct bt_ctf_field_type *bt_ctf_field_type_string_create(void) { - struct bt_field_type_common_string *string = - g_new0(struct bt_field_type_common_string, 1); + struct bt_ctf_field_type_common_string *string = + g_new0(struct bt_ctf_field_type_common_string, 1); BT_LOGD_STR("Creating CTF writer string field type object."); @@ -1173,8 +5134,8 @@ struct bt_ctf_field_type *bt_ctf_field_type_string_create(void) return NULL; } - bt_field_type_common_string_initialize(BT_TO_COMMON(string), - bt_field_type_common_string_destroy, + bt_ctf_field_type_common_string_initialize(BT_CTF_TO_COMMON(string), + bt_ctf_field_type_common_string_destroy, &bt_ctf_field_type_string_methods); string->common.spec.writer.serialize_func = bt_ctf_field_type_string_serialize; @@ -1185,58 +5146,58 @@ struct bt_ctf_field_type *bt_ctf_field_type_string_create(void) enum bt_ctf_string_encoding bt_ctf_field_type_string_get_encoding( struct bt_ctf_field_type *ft) { - return (int) bt_field_type_common_string_get_encoding((void *) ft); + return (int) bt_ctf_field_type_common_string_get_encoding((void *) ft); } int bt_ctf_field_type_string_set_encoding(struct bt_ctf_field_type *ft, enum bt_ctf_string_encoding encoding) { - return bt_field_type_common_string_set_encoding((void *) ft, + return bt_ctf_field_type_common_string_set_encoding((void *) ft, (int) encoding); } int bt_ctf_field_type_get_alignment(struct bt_ctf_field_type *ft) { - return bt_field_type_common_get_alignment((void *) ft); + return bt_ctf_field_type_common_get_alignment((void *) ft); } int bt_ctf_field_type_set_alignment(struct bt_ctf_field_type *ft, unsigned int alignment) { - return bt_field_type_common_set_alignment((void *) ft, alignment); + return bt_ctf_field_type_common_set_alignment((void *) ft, alignment); } enum bt_ctf_byte_order bt_ctf_field_type_get_byte_order( struct bt_ctf_field_type *ft) { - return (int) bt_field_type_common_get_byte_order((void *) ft); + return (int) bt_ctf_field_type_common_get_byte_order((void *) ft); } int bt_ctf_field_type_set_byte_order(struct bt_ctf_field_type *ft, enum bt_ctf_byte_order byte_order) { - return bt_field_type_common_set_byte_order((void *) ft, + return bt_ctf_field_type_common_set_byte_order((void *) ft, (int) byte_order); } enum bt_ctf_field_type_id bt_ctf_field_type_get_type_id( struct bt_ctf_field_type *ft) { - return (int) bt_field_type_common_get_type_id((void *) ft); + return (int) bt_ctf_field_type_common_get_type_id((void *) ft); } BT_HIDDEN struct bt_ctf_field_type *bt_ctf_field_type_copy(struct bt_ctf_field_type *ft) { - return (void *) bt_field_type_common_copy((void *) ft); + return (void *) bt_ctf_field_type_common_copy((void *) ft); } static struct bt_ctf_field_type *bt_ctf_field_type_integer_copy( struct bt_ctf_field_type *ft) { - struct bt_field_type_common_integer *int_ft = (void *) ft; - struct bt_field_type_common_integer *copy_ft; + struct bt_ctf_field_type_common_integer *int_ft = (void *) ft; + struct bt_ctf_field_type_common_integer *copy_ft; BT_LOGD("Copying CTF writer integer field type's: addr=%p", ft); copy_ft = (void *) bt_ctf_field_type_integer_create(int_ft->size); @@ -1245,7 +5206,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_integer_copy( goto end; } - copy_ft->mapped_clock_class = bt_get(int_ft->mapped_clock_class); + copy_ft->mapped_clock_class = bt_ctf_object_get_ref(int_ft->mapped_clock_class); copy_ft->user_byte_order = int_ft->user_byte_order; copy_ft->is_signed = int_ft->is_signed; copy_ft->size = int_ft->size; @@ -1263,16 +5224,16 @@ struct bt_ctf_field_type *bt_ctf_field_type_enumeration_copy_recursive( struct bt_ctf_field_type *ft) { size_t i; - struct bt_field_type_common_enumeration *enum_ft = (void *) ft; - struct bt_field_type_common_enumeration *copy_ft = NULL; - struct bt_field_type_common_enumeration *container_copy_ft; + struct bt_ctf_field_type_common_enumeration *enum_ft = (void *) ft; + struct bt_ctf_field_type_common_enumeration *copy_ft = NULL; + struct bt_ctf_field_type_common_enumeration *container_copy_ft; BT_LOGD("Copying CTF writer enumeration field type's: addr=%p", ft); /* Copy the source enumeration's container */ BT_LOGD_STR("Copying CTF writer enumeration field type's container field type."); - container_copy_ft = BT_FROM_COMMON(bt_field_type_common_copy( - BT_TO_COMMON(enum_ft->container_ft))); + container_copy_ft = BT_CTF_FROM_COMMON(bt_ctf_field_type_common_copy( + BT_CTF_TO_COMMON(enum_ft->container_ft))); if (!container_copy_ft) { BT_LOGE_STR("Cannot copy CTF writer enumeration field type's container field type."); goto end; @@ -1287,10 +5248,10 @@ struct bt_ctf_field_type *bt_ctf_field_type_enumeration_copy_recursive( /* Copy all enumaration entries */ for (i = 0; i < enum_ft->entries->len; i++) { - struct enumeration_mapping *mapping = g_ptr_array_index( + struct bt_ctf_enumeration_mapping *mapping = g_ptr_array_index( enum_ft->entries, i); - struct enumeration_mapping *copy_mapping = g_new0( - struct enumeration_mapping, 1); + struct bt_ctf_enumeration_mapping *copy_mapping = g_new0( + struct bt_ctf_enumeration_mapping, 1); if (!copy_mapping) { BT_LOGE_STR("Failed to allocate one enumeration mapping."); @@ -1305,12 +5266,12 @@ struct bt_ctf_field_type *bt_ctf_field_type_enumeration_copy_recursive( ft, copy_ft); end: - bt_put(container_copy_ft); + bt_ctf_object_put_ref(container_copy_ft); return (void *) copy_ft; error: - bt_put(container_copy_ft); - BT_PUT(copy_ft); + bt_ctf_object_put_ref(container_copy_ft); + BT_CTF_OBJECT_PUT_REF_AND_RESET(copy_ft); return (void *) copy_ft; } @@ -1318,8 +5279,8 @@ static struct bt_ctf_field_type *bt_ctf_field_type_floating_point_copy( struct bt_ctf_field_type *ft) { - struct bt_field_type_common_floating_point *flt_ft = BT_FROM_COMMON(ft); - struct bt_field_type_common_floating_point *copy_ft; + struct bt_ctf_field_type_common_floating_point *flt_ft = BT_CTF_FROM_COMMON(ft); + struct bt_ctf_field_type_common_floating_point *copy_ft; BT_LOGD("Copying CTF writer floating point number field type's: addr=%p", ft); copy_ft = (void *) bt_ctf_field_type_floating_point_create(); @@ -1345,8 +5306,8 @@ struct bt_ctf_field_type *bt_ctf_field_type_structure_copy_recursive( int64_t i; GHashTableIter iter; gpointer key, value; - struct bt_field_type_common_structure *struct_ft = (void *) ft; - struct bt_field_type_common_structure *copy_ft; + struct bt_ctf_field_type_common_structure *struct_ft = (void *) ft; + struct bt_ctf_field_type_common_structure *copy_ft; BT_LOGD("Copying CTF writer structure field type's: addr=%p", ft); copy_ft = (void *) bt_ctf_field_type_structure_create(); @@ -1365,12 +5326,12 @@ struct bt_ctf_field_type *bt_ctf_field_type_structure_copy_recursive( g_array_set_size(copy_ft->fields, struct_ft->fields->len); for (i = 0; i < struct_ft->fields->len; i++) { - struct bt_field_type_common_structure_field *entry, *copy_entry; - struct bt_field_type_common *field_ft_copy; + struct bt_ctf_field_type_common_structure_field *entry, *copy_entry; + struct bt_ctf_field_type_common *field_ft_copy; - entry = BT_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + entry = BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( struct_ft, i); - copy_entry = BT_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( + copy_entry = BT_CTF_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX( copy_ft, i); BT_LOGD("Copying CTF writer structure field type's field: " "index=%" PRId64 ", " @@ -1398,7 +5359,7 @@ end: return (void *) copy_ft; error: - BT_PUT(copy_ft); + BT_CTF_OBJECT_PUT_REF_AND_RESET(copy_ft); return NULL; } @@ -1409,15 +5370,15 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_copy_recursive( int64_t i; GHashTableIter iter; gpointer key, value; - struct bt_field_type_common *tag_ft_copy = NULL; - struct bt_field_type_common_variant *var_ft = (void *) ft; - struct bt_field_type_common_variant *copy_ft = NULL; + struct bt_ctf_field_type_common *tag_ft_copy = NULL; + struct bt_ctf_field_type_common_variant *var_ft = (void *) ft; + struct bt_ctf_field_type_common_variant *copy_ft = NULL; BT_LOGD("Copying CTF writer variant field type's: addr=%p", ft); if (var_ft->tag_ft) { BT_LOGD_STR("Copying CTF writer variant field type's tag field type."); - tag_ft_copy = bt_field_type_common_copy( - BT_TO_COMMON(var_ft->tag_ft)); + tag_ft_copy = bt_ctf_field_type_common_copy( + BT_CTF_TO_COMMON(var_ft->tag_ft)); if (!tag_ft_copy) { BT_LOGE_STR("Cannot copy CTF writer variant field type's tag field type."); goto end; @@ -1442,12 +5403,12 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_copy_recursive( g_array_set_size(copy_ft->choices, var_ft->choices->len); for (i = 0; i < var_ft->choices->len; i++) { - struct bt_field_type_common_variant_choice *entry, *copy_entry; - struct bt_field_type_common *field_ft_copy; + struct bt_ctf_field_type_common_variant_choice *entry, *copy_entry; + struct bt_ctf_field_type_common *field_ft_copy; uint64_t range_i; - entry = BT_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(var_ft, i); - copy_entry = BT_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( + entry = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(var_ft, i); + copy_entry = BT_CTF_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX( copy_ft, i); BT_LOGD("Copying CTF writer variant field type's field: " "index=%" PRId64 ", " @@ -1470,7 +5431,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_copy_recursive( /* Copy ranges */ copy_entry->ranges = g_array_new(FALSE, TRUE, - sizeof(struct bt_field_type_common_variant_choice_range)); + sizeof(struct bt_ctf_field_type_common_variant_choice_range)); BT_ASSERT(copy_entry->ranges); g_array_set_size(copy_entry->ranges, entry->ranges->len); @@ -1481,7 +5442,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_copy_recursive( if (var_ft->tag_field_path) { BT_LOGD_STR("Copying CTF writer variant field type's tag field path."); - copy_ft->tag_field_path = bt_field_path_copy( + copy_ft->tag_field_path = bt_ctf_field_path_copy( var_ft->tag_field_path); if (!copy_ft->tag_field_path) { BT_LOGE_STR("Cannot copy CTF writer variant field type's tag field path."); @@ -1494,12 +5455,12 @@ struct bt_ctf_field_type *bt_ctf_field_type_variant_copy_recursive( ft, copy_ft); end: - bt_put(tag_ft_copy); + bt_ctf_object_put_ref(tag_ft_copy); return (void *) copy_ft; error: - bt_put(tag_ft_copy); - BT_PUT(copy_ft); + bt_ctf_object_put_ref(tag_ft_copy); + BT_CTF_OBJECT_PUT_REF_AND_RESET(copy_ft); return NULL; } @@ -1507,13 +5468,13 @@ static struct bt_ctf_field_type *bt_ctf_field_type_array_copy_recursive( struct bt_ctf_field_type *ft) { - struct bt_field_type_common *container_ft_copy = NULL; - struct bt_field_type_common_array *array_ft = (void *) ft; - struct bt_field_type_common_array *copy_ft = NULL; + struct bt_ctf_field_type_common *container_ft_copy = NULL; + struct bt_ctf_field_type_common_array *array_ft = (void *) ft; + struct bt_ctf_field_type_common_array *copy_ft = NULL; BT_LOGD("Copying CTF writer array field type's: addr=%p", ft); BT_LOGD_STR("Copying CTF writer array field type's element field type."); - container_ft_copy = bt_field_type_common_copy(array_ft->element_ft); + container_ft_copy = bt_ctf_field_type_common_copy(array_ft->element_ft); if (!container_ft_copy) { BT_LOGE_STR("Cannot copy CTF writer array field type's element field type."); goto end; @@ -1530,7 +5491,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_array_copy_recursive( ft, copy_ft); end: - bt_put(container_ft_copy); + bt_ctf_object_put_ref(container_ft_copy); return (void *) copy_ft; } @@ -1538,13 +5499,13 @@ static struct bt_ctf_field_type *bt_ctf_field_type_sequence_copy_recursive( struct bt_ctf_field_type *ft) { - struct bt_field_type_common *container_ft_copy = NULL; - struct bt_field_type_common_sequence *seq_ft = (void *) ft; - struct bt_field_type_common_sequence *copy_ft = NULL; + struct bt_ctf_field_type_common *container_ft_copy = NULL; + struct bt_ctf_field_type_common_sequence *seq_ft = (void *) ft; + struct bt_ctf_field_type_common_sequence *copy_ft = NULL; BT_LOGD("Copying CTF writer sequence field type's: addr=%p", ft); BT_LOGD_STR("Copying CTF writer sequence field type's element field type."); - container_ft_copy = bt_field_type_common_copy(seq_ft->element_ft); + container_ft_copy = bt_ctf_field_type_common_copy(seq_ft->element_ft); if (!container_ft_copy) { BT_LOGE_STR("Cannot copy CTF writer sequence field type's element field type."); goto end; @@ -1561,7 +5522,7 @@ struct bt_ctf_field_type *bt_ctf_field_type_sequence_copy_recursive( if (seq_ft->length_field_path) { BT_LOGD_STR("Copying CTF writer sequence field type's length field path."); - copy_ft->length_field_path = bt_field_path_copy( + copy_ft->length_field_path = bt_ctf_field_path_copy( seq_ft->length_field_path); if (!copy_ft->length_field_path) { BT_LOGE_STR("Cannot copy CTF writer sequence field type's length field path."); @@ -1573,19 +5534,19 @@ struct bt_ctf_field_type *bt_ctf_field_type_sequence_copy_recursive( ft, copy_ft); end: - bt_put(container_ft_copy); + bt_ctf_object_put_ref(container_ft_copy); return (void *) copy_ft; error: - bt_put(container_ft_copy); - BT_PUT(copy_ft); + bt_ctf_object_put_ref(container_ft_copy); + BT_CTF_OBJECT_PUT_REF_AND_RESET(copy_ft); return NULL; } static struct bt_ctf_field_type *bt_ctf_field_type_string_copy(struct bt_ctf_field_type *ft) { - struct bt_field_type_common_string *string_ft = (void *) ft; - struct bt_field_type_common_string *copy_ft = NULL; + struct bt_ctf_field_type_common_string *string_ft = (void *) ft; + struct bt_ctf_field_type_common_string *copy_ft = NULL; BT_LOGD("Copying CTF writer string field type's: addr=%p", ft); copy_ft = (void *) bt_ctf_field_type_string_create();