X-Git-Url: http://git.efficios.com/?p=babeltrace.git;a=blobdiff_plain;f=lib%2Ftrace-ir%2Ffield.c;fp=lib%2Ftrace-ir%2Ffield.c;h=0000000000000000000000000000000000000000;hp=4cf154252eb146031c952431f3d5915bd1b0cf64;hb=578e048b5debf169e286e5b5cc747b5d6c16886d;hpb=68b66a256a54d32992dfefeaad11eea88b7df234 diff --git a/lib/trace-ir/field.c b/lib/trace-ir/field.c deleted file mode 100644 index 4cf15425..00000000 --- a/lib/trace-ir/field.c +++ /dev/null @@ -1,1179 +0,0 @@ -/* - * Copyright 2017-2018 Philippe Proulx - * Copyright 2013, 2014 Jérémie Galarneau - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE - * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE - * SOFTWARE. - */ - -#define BT_LOG_TAG "FIELDS" -#include - -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include -#include - -static -void reset_single_field(struct bt_field *field); - -static -void reset_array_field(struct bt_field *field); - -static -void reset_structure_field(struct bt_field *field); - -static -void reset_variant_field(struct bt_field *field); - -static -void set_single_field_is_frozen(struct bt_field *field, bool is_frozen); - -static -void set_array_field_is_frozen(struct bt_field *field, bool is_frozen); - -static -void set_structure_field_is_frozen(struct bt_field *field, bool is_frozen); - -static -void set_variant_field_is_frozen(struct bt_field *field, bool is_frozen); - -static -bool single_field_is_set(const struct bt_field *field); - -static -bool array_field_is_set(const struct bt_field *field); - -static -bool structure_field_is_set(const struct bt_field *field); - -static -bool variant_field_is_set(const struct bt_field *field); - -static -struct bt_field_methods integer_field_methods = { - .set_is_frozen = set_single_field_is_frozen, - .is_set = single_field_is_set, - .reset = reset_single_field, -}; - -static -struct bt_field_methods real_field_methods = { - .set_is_frozen = set_single_field_is_frozen, - .is_set = single_field_is_set, - .reset = reset_single_field, -}; - -static -struct bt_field_methods string_field_methods = { - .set_is_frozen = set_single_field_is_frozen, - .is_set = single_field_is_set, - .reset = reset_single_field, -}; - -static -struct bt_field_methods structure_field_methods = { - .set_is_frozen = set_structure_field_is_frozen, - .is_set = structure_field_is_set, - .reset = reset_structure_field, -}; - -static -struct bt_field_methods array_field_methods = { - .set_is_frozen = set_array_field_is_frozen, - .is_set = array_field_is_set, - .reset = reset_array_field, -}; - -static -struct bt_field_methods variant_field_methods = { - .set_is_frozen = set_variant_field_is_frozen, - .is_set = variant_field_is_set, - .reset = reset_variant_field, -}; - -static -struct bt_field *create_integer_field(struct bt_field_class *); - -static -struct bt_field *create_real_field(struct bt_field_class *); - -static -struct bt_field *create_string_field(struct bt_field_class *); - -static -struct bt_field *create_structure_field(struct bt_field_class *); - -static -struct bt_field *create_static_array_field(struct bt_field_class *); - -static -struct bt_field *create_dynamic_array_field(struct bt_field_class *); - -static -struct bt_field *create_variant_field(struct bt_field_class *); - -static -struct bt_field *(* const field_create_funcs[])(struct bt_field_class *) = { - [BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER] = create_integer_field, - [BT_FIELD_CLASS_TYPE_SIGNED_INTEGER] = create_integer_field, - [BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION] = create_integer_field, - [BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION] = create_integer_field, - [BT_FIELD_CLASS_TYPE_REAL] = create_real_field, - [BT_FIELD_CLASS_TYPE_STRING] = create_string_field, - [BT_FIELD_CLASS_TYPE_STRUCTURE] = create_structure_field, - [BT_FIELD_CLASS_TYPE_STATIC_ARRAY] = create_static_array_field, - [BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY] = create_dynamic_array_field, - [BT_FIELD_CLASS_TYPE_VARIANT] = create_variant_field, -}; - -static -void destroy_integer_field(struct bt_field *field); - -static -void destroy_real_field(struct bt_field *field); - -static -void destroy_string_field(struct bt_field *field); - -static -void destroy_structure_field(struct bt_field *field); - -static -void destroy_array_field(struct bt_field *field); - -static -void destroy_variant_field(struct bt_field *field); - -static -void (* const field_destroy_funcs[])(struct bt_field *) = { - [BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER] = destroy_integer_field, - [BT_FIELD_CLASS_TYPE_SIGNED_INTEGER] = destroy_integer_field, - [BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION] = destroy_integer_field, - [BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION] = destroy_integer_field, - [BT_FIELD_CLASS_TYPE_REAL] = destroy_real_field, - [BT_FIELD_CLASS_TYPE_STRING] = destroy_string_field, - [BT_FIELD_CLASS_TYPE_STRUCTURE] = destroy_structure_field, - [BT_FIELD_CLASS_TYPE_STATIC_ARRAY] = destroy_array_field, - [BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY] = destroy_array_field, - [BT_FIELD_CLASS_TYPE_VARIANT] = destroy_variant_field, -}; - -struct bt_field_class *bt_field_borrow_class(const struct bt_field *field) -{ - BT_ASSERT_PRE_NON_NULL(field, "Field"); - return field->class; -} - -const struct bt_field_class *bt_field_borrow_class_const( - const struct bt_field *field) -{ - BT_ASSERT_PRE_NON_NULL(field, "Field"); - return field->class; -} - -enum bt_field_class_type bt_field_get_class_type(const struct bt_field *field) -{ - BT_ASSERT_PRE_NON_NULL(field, "Field"); - return field->class->type; -} - -BT_HIDDEN -struct bt_field *bt_field_create(struct bt_field_class *fc) -{ - struct bt_field *field = NULL; - - BT_ASSERT_PRE_NON_NULL(fc, "Field class"); - BT_ASSERT(bt_field_class_has_known_type(fc)); - field = field_create_funcs[fc->type](fc); - if (!field) { - BT_LIB_LOGE("Cannot create field object from field class: " - "%![fc-]+F", fc); - goto end; - } - -end: - return field; -} - -static inline -void init_field(struct bt_field *field, struct bt_field_class *fc, - struct bt_field_methods *methods) -{ - BT_ASSERT(field); - BT_ASSERT(fc); - bt_object_init_unique(&field->base); - field->methods = methods; - field->class = fc; - bt_object_get_no_null_check(fc); -} - -static -struct bt_field *create_integer_field(struct bt_field_class *fc) -{ - struct bt_field_integer *int_field; - - BT_LIB_LOGD("Creating integer field object: %![fc-]+F", fc); - int_field = g_new0(struct bt_field_integer, 1); - if (!int_field) { - BT_LOGE_STR("Failed to allocate one integer field."); - goto end; - } - - init_field((void *) int_field, fc, &integer_field_methods); - BT_LIB_LOGD("Created integer field object: %!+f", int_field); - -end: - return (void *) int_field; -} - -static -struct bt_field *create_real_field(struct bt_field_class *fc) -{ - struct bt_field_real *real_field; - - BT_LIB_LOGD("Creating real field object: %![fc-]+F", fc); - real_field = g_new0(struct bt_field_real, 1); - if (!real_field) { - BT_LOGE_STR("Failed to allocate one real field."); - goto end; - } - - init_field((void *) real_field, fc, &real_field_methods); - BT_LIB_LOGD("Created real field object: %!+f", real_field); - -end: - return (void *) real_field; -} - -static -struct bt_field *create_string_field(struct bt_field_class *fc) -{ - struct bt_field_string *string_field; - - BT_LIB_LOGD("Creating string field object: %![fc-]+F", fc); - string_field = g_new0(struct bt_field_string, 1); - if (!string_field) { - BT_LOGE_STR("Failed to allocate one string field."); - goto end; - } - - init_field((void *) string_field, fc, &string_field_methods); - string_field->buf = g_array_sized_new(FALSE, FALSE, - sizeof(char), 1); - if (!string_field->buf) { - BT_LOGE_STR("Failed to allocate a GArray."); - BT_OBJECT_PUT_REF_AND_RESET(string_field); - goto end; - } - - g_array_index(string_field->buf, char, 0) = '\0'; - BT_LIB_LOGD("Created string field object: %!+f", string_field); - -end: - return (void *) string_field; -} - -static inline -int create_fields_from_named_field_classes( - struct bt_field_class_named_field_class_container *fc, - GPtrArray **fields) -{ - int ret = 0; - uint64_t i; - - *fields = g_ptr_array_new_with_free_func( - (GDestroyNotify) bt_field_destroy); - if (!*fields) { - BT_LOGE_STR("Failed to allocate a GPtrArray."); - ret = -1; - goto end; - } - - g_ptr_array_set_size(*fields, fc->named_fcs->len); - - for (i = 0; i < fc->named_fcs->len; i++) { - struct bt_field *field; - struct bt_named_field_class *named_fc = - BT_FIELD_CLASS_NAMED_FC_AT_INDEX(fc, i); - - field = bt_field_create(named_fc->fc); - if (!field) { - BT_LIB_LOGE("Failed to create structure member or variant option field: " - "name=\"%s\", %![fc-]+F", - named_fc->name->str, named_fc->fc); - ret = -1; - goto end; - } - - g_ptr_array_index(*fields, i) = field; - } - -end: - return ret; -} - -static -struct bt_field *create_structure_field(struct bt_field_class *fc) -{ - struct bt_field_structure *struct_field; - - BT_LIB_LOGD("Creating structure field object: %![fc-]+F", fc); - struct_field = g_new0(struct bt_field_structure, 1); - if (!struct_field) { - BT_LOGE_STR("Failed to allocate one structure field."); - goto end; - } - - init_field((void *) struct_field, fc, &structure_field_methods); - - if (create_fields_from_named_field_classes((void *) fc, - &struct_field->fields)) { - BT_LIB_LOGE("Cannot create structure member fields: " - "%![fc-]+F", fc); - BT_OBJECT_PUT_REF_AND_RESET(struct_field); - goto end; - } - - BT_LIB_LOGD("Created structure field object: %!+f", struct_field); - -end: - return (void *) struct_field; -} - -static -struct bt_field *create_variant_field(struct bt_field_class *fc) -{ - struct bt_field_variant *var_field; - - BT_LIB_LOGD("Creating variant field object: %![fc-]+F", fc); - var_field = g_new0(struct bt_field_variant, 1); - if (!var_field) { - BT_LOGE_STR("Failed to allocate one variant field."); - goto end; - } - - init_field((void *) var_field, fc, &variant_field_methods); - - if (create_fields_from_named_field_classes((void *) fc, - &var_field->fields)) { - BT_LIB_LOGE("Cannot create variant member fields: " - "%![fc-]+F", fc); - BT_OBJECT_PUT_REF_AND_RESET(var_field); - goto end; - } - - BT_LIB_LOGD("Created variant field object: %!+f", var_field); - -end: - return (void *) var_field; -} - -static inline -int init_array_field_fields(struct bt_field_array *array_field) -{ - int ret = 0; - uint64_t i; - struct bt_field_class_array *array_fc; - - BT_ASSERT(array_field); - array_fc = (void *) array_field->common.class; - array_field->fields = g_ptr_array_sized_new(array_field->length); - if (!array_field->fields) { - BT_LOGE_STR("Failed to allocate a GPtrArray."); - ret = -1; - goto end; - } - - g_ptr_array_set_free_func(array_field->fields, - (GDestroyNotify) bt_field_destroy); - g_ptr_array_set_size(array_field->fields, array_field->length); - - for (i = 0; i < array_field->length; i++) { - array_field->fields->pdata[i] = bt_field_create( - array_fc->element_fc); - if (!array_field->fields->pdata[i]) { - BT_LIB_LOGE("Cannot create array field's element field: " - "index=%" PRIu64 ", %![fc-]+F", i, array_fc); - ret = -1; - goto end; - } - } - -end: - return ret; -} - -static -struct bt_field *create_static_array_field(struct bt_field_class *fc) -{ - struct bt_field_class_static_array *array_fc = (void *) fc; - struct bt_field_array *array_field; - - BT_LIB_LOGD("Creating static array field object: %![fc-]+F", fc); - array_field = g_new0(struct bt_field_array, 1); - if (!array_field) { - BT_LOGE_STR("Failed to allocate one static array field."); - goto end; - } - - init_field((void *) array_field, fc, &array_field_methods); - array_field->length = array_fc->length; - - if (init_array_field_fields(array_field)) { - BT_LIB_LOGE("Cannot create static array fields: " - "%![fc-]+F", fc); - BT_OBJECT_PUT_REF_AND_RESET(array_field); - goto end; - } - - BT_LIB_LOGD("Created static array field object: %!+f", array_field); - -end: - return (void *) array_field; -} - -static -struct bt_field *create_dynamic_array_field(struct bt_field_class *fc) -{ - struct bt_field_array *array_field; - - BT_LIB_LOGD("Creating dynamic array field object: %![fc-]+F", fc); - array_field = g_new0(struct bt_field_array, 1); - if (!array_field) { - BT_LOGE_STR("Failed to allocate one dynamic array field."); - goto end; - } - - init_field((void *) array_field, fc, &array_field_methods); - - if (init_array_field_fields(array_field)) { - BT_LIB_LOGE("Cannot create dynamic array fields: " - "%![fc-]+F", fc); - BT_OBJECT_PUT_REF_AND_RESET(array_field); - goto end; - } - - BT_LIB_LOGD("Created dynamic array field object: %!+f", array_field); - -end: - return (void *) array_field; -} - -int64_t bt_field_signed_integer_get_value(const struct bt_field *field) -{ - const struct bt_field_integer *int_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SIGNED_INT(field, "Field"); - return int_field->value.i; -} - -void bt_field_signed_integer_set_value(struct bt_field *field, int64_t value) -{ - struct bt_field_integer *int_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SIGNED_INT(field, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE(bt_util_value_is_in_range_signed( - ((struct bt_field_class_integer *) field->class)->range, value), - "Value is out of bounds: value=%" PRId64 ", %![field-]+f, " - "%![fc-]+F", value, field, field->class); - int_field->value.i = value; - bt_field_set_single(field, true); -} - -uint64_t bt_field_unsigned_integer_get_value(const struct bt_field *field) -{ - const struct bt_field_integer *int_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_UNSIGNED_INT(field, "Field"); - return int_field->value.u; -} - -void bt_field_unsigned_integer_set_value(struct bt_field *field, uint64_t value) -{ - struct bt_field_integer *int_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_UNSIGNED_INT(field, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE(bt_util_value_is_in_range_unsigned( - ((struct bt_field_class_integer *) field->class)->range, value), - "Value is out of bounds: value=%" PRIu64 ", %![field-]+f, " - "%![fc-]+F", value, field, field->class); - int_field->value.u = value; - bt_field_set_single(field, true); -} - -double bt_field_real_get_value(const struct bt_field *field) -{ - const struct bt_field_real *real_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_REAL, "Field"); - return real_field->value; -} - -void bt_field_real_set_value(struct bt_field *field, double value) -{ - struct bt_field_real *real_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_REAL, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE( - !((struct bt_field_class_real *) field->class)->is_single_precision || - (double) (float) value == value, - "Invalid value for a single-precision real number: value=%f, " - "%![fc-]+F", value, field->class); - real_field->value = value; - bt_field_set_single(field, true); -} - -enum bt_field_status bt_field_unsigned_enumeration_get_mapping_labels( - const struct bt_field *field, - bt_field_class_enumeration_mapping_label_array *label_array, - uint64_t *count) -{ - const struct bt_field_integer *int_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_NON_NULL(label_array, "Label array (output)"); - BT_ASSERT_PRE_NON_NULL(label_array, "Count (output)"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION, "Field"); - return (int) - bt_field_class_unsigned_enumeration_get_mapping_labels_by_value( - field->class, int_field->value.u, label_array, count); -} - -enum bt_field_status bt_field_signed_enumeration_get_mapping_labels( - const struct bt_field *field, - bt_field_class_enumeration_mapping_label_array *label_array, - uint64_t *count) -{ - const struct bt_field_integer *int_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_NON_NULL(label_array, "Label array (output)"); - BT_ASSERT_PRE_NON_NULL(label_array, "Count (output)"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION, "Field"); - return (int) - bt_field_class_signed_enumeration_get_mapping_labels_by_value( - field->class, int_field->value.i, label_array, count); -} - -const char *bt_field_string_get_value(const struct bt_field *field) -{ - const struct bt_field_string *string_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_STRING, - "Field"); - return (const char *) string_field->buf->data; -} - -uint64_t bt_field_string_get_length(const struct bt_field *field) -{ - const struct bt_field_string *string_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_SET(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_STRING, - "Field"); - return string_field->length; -} - -static inline -void clear_string_field(struct bt_field *field) -{ - struct bt_field_string *string_field = (void *) field; - - BT_ASSERT(field); - string_field->length = 0; - bt_field_set_single(field, true); -} - -enum bt_field_status bt_field_string_set_value(struct bt_field *field, - const char *value) -{ - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_NON_NULL(value, "Value"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_STRING, - "Field"); - clear_string_field(field); - return bt_field_string_append_with_length(field, value, - (uint64_t) strlen(value)); -} - -enum bt_field_status bt_field_string_append(struct bt_field *field, const char *value) -{ - return bt_field_string_append_with_length(field, - value, (uint64_t) strlen(value)); -} - -enum bt_field_status bt_field_string_append_with_length(struct bt_field *field, - const char *value, uint64_t length) -{ - struct bt_field_string *string_field = (void *) field; - char *data; - uint64_t new_length; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_NON_NULL(value, "Value"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_STRING, "Field"); - - /* Make sure no null bytes are appended */ - BT_ASSERT_PRE(memchr(value, '\0', length) == NULL, - "String value to append contains a null character: " - "partial-value=\"%.32s\", length=%" PRIu64, value, length); - - new_length = length + string_field->length; - - if (unlikely(new_length + 1 > string_field->buf->len)) { - g_array_set_size(string_field->buf, new_length + 1); - } - - data = string_field->buf->data; - memcpy(data + string_field->length, value, length); - ((char *) string_field->buf->data)[new_length] = '\0'; - string_field->length = new_length; - bt_field_set_single(field, true); - return BT_FIELD_STATUS_OK; -} - -enum bt_field_status bt_field_string_clear(struct bt_field *field) -{ - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_STRING, "Field"); - clear_string_field(field); - return BT_FIELD_STATUS_OK; -} - -uint64_t bt_field_array_get_length(const struct bt_field *field) -{ - const struct bt_field_array *array_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_ARRAY(field, "Field"); - return array_field->length; -} - -enum bt_field_status bt_field_dynamic_array_set_length(struct bt_field *field, - uint64_t length) -{ - int ret = BT_FIELD_STATUS_OK; - struct bt_field_array *array_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - - if (unlikely(length > array_field->fields->len)) { - /* Make more room */ - struct bt_field_class_array *array_fc; - uint64_t cur_len = array_field->fields->len; - uint64_t i; - - g_ptr_array_set_size(array_field->fields, length); - array_fc = (void *) field->class; - - for (i = cur_len; i < array_field->fields->len; i++) { - struct bt_field *elem_field = bt_field_create( - array_fc->element_fc); - - if (!elem_field) { - BT_LIB_LOGE("Cannot create element field for " - "dynamic array field: " - "index=%" PRIu64 ", " - "%![array-field-]+f", i, field); - ret = BT_FIELD_STATUS_NOMEM; - goto end; - } - - BT_ASSERT(!array_field->fields->pdata[i]); - array_field->fields->pdata[i] = elem_field; - } - } - - array_field->length = length; - -end: - return ret; -} - -static inline -struct bt_field *borrow_array_field_element_field_by_index( - struct bt_field *field, uint64_t index) -{ - struct bt_field_array *array_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_IS_ARRAY(field, "Field"); - BT_ASSERT_PRE_VALID_INDEX(index, array_field->length); - return array_field->fields->pdata[index]; -} - -struct bt_field *bt_field_array_borrow_element_field_by_index( - struct bt_field *field, uint64_t index) -{ - return borrow_array_field_element_field_by_index(field, index); -} - -const struct bt_field * -bt_field_array_borrow_element_field_by_index_const( - const struct bt_field *field, uint64_t index) -{ - return borrow_array_field_element_field_by_index((void *) field, index); -} - -static inline -struct bt_field *borrow_structure_field_member_field_by_index( - struct bt_field *field, uint64_t index) -{ - struct bt_field_structure *struct_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_STRUCTURE, "Field"); - BT_ASSERT_PRE_VALID_INDEX(index, struct_field->fields->len); - return struct_field->fields->pdata[index]; -} - -struct bt_field *bt_field_structure_borrow_member_field_by_index( - struct bt_field *field, uint64_t index) -{ - return borrow_structure_field_member_field_by_index(field, - index); -} - -const struct bt_field * -bt_field_structure_borrow_member_field_by_index_const( - const struct bt_field *field, uint64_t index) -{ - return borrow_structure_field_member_field_by_index( - (void *) field, index); -} - -static inline -struct bt_field *borrow_structure_field_member_field_by_name( - struct bt_field *field, const char *name) -{ - struct bt_field *ret_field = NULL; - struct bt_field_class_structure *struct_fc; - struct bt_field_structure *struct_field = (void *) field; - gpointer orig_key; - gpointer index; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_NON_NULL(name, "Field name"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_STRUCTURE, "Field"); - struct_fc = (void *) field->class; - - if (!g_hash_table_lookup_extended(struct_fc->common.name_to_index, name, - &orig_key, &index)) { - goto end; - } - - ret_field = struct_field->fields->pdata[GPOINTER_TO_UINT(index)]; - BT_ASSERT(ret_field); - -end: - return ret_field; -} - -struct bt_field *bt_field_structure_borrow_member_field_by_name( - struct bt_field *field, const char *name) -{ - return borrow_structure_field_member_field_by_name(field, name); -} - -const struct bt_field *bt_field_structure_borrow_member_field_by_name_const( - const struct bt_field *field, const char *name) -{ - return borrow_structure_field_member_field_by_name( - (void *) field, name); -} - -static inline -struct bt_field *borrow_variant_field_selected_option_field( - struct bt_field *field) -{ - struct bt_field_variant *var_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_VARIANT, "Field"); - BT_ASSERT_PRE(var_field->selected_field, - "Variant field has no selected field: %!+f", field); - return var_field->selected_field; -} - -struct bt_field *bt_field_variant_borrow_selected_option_field( - struct bt_field *field) -{ - return borrow_variant_field_selected_option_field(field); -} - -const struct bt_field *bt_field_variant_borrow_selected_option_field_const( - const struct bt_field *field) -{ - return borrow_variant_field_selected_option_field((void *) field); -} - -enum bt_field_status bt_field_variant_select_option_field( - struct bt_field *field, uint64_t index) -{ - struct bt_field_variant *var_field = (void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_VARIANT, "Field"); - BT_ASSERT_PRE_FIELD_HOT(field, "Field"); - BT_ASSERT_PRE_VALID_INDEX(index, var_field->fields->len); - var_field->selected_field = var_field->fields->pdata[index]; - var_field->selected_index = index; - return BT_FIELD_STATUS_OK; -} - -uint64_t bt_field_variant_get_selected_option_field_index( - const struct bt_field *field) -{ - const struct bt_field_variant *var_field = (const void *) field; - - BT_ASSERT_PRE_NON_NULL(field, "Field"); - BT_ASSERT_PRE_FIELD_HAS_CLASS_TYPE(field, - BT_FIELD_CLASS_TYPE_VARIANT, "Field"); - BT_ASSERT_PRE(var_field->selected_field, - "Variant field has no selected field: %!+f", field); - return var_field->selected_index; -} - -static inline -void bt_field_finalize(struct bt_field *field) -{ - BT_ASSERT(field); - BT_LOGD_STR("Putting field's class."); - BT_OBJECT_PUT_REF_AND_RESET(field->class); -} - -static -void destroy_integer_field(struct bt_field *field) -{ - BT_ASSERT(field); - BT_LIB_LOGD("Destroying integer field object: %!+f", field); - bt_field_finalize(field); - g_free(field); -} - -static -void destroy_real_field(struct bt_field *field) -{ - BT_ASSERT(field); - BT_LIB_LOGD("Destroying real field object: %!+f", field); - bt_field_finalize(field); - g_free(field); -} - -static -void destroy_structure_field(struct bt_field *field) -{ - struct bt_field_structure *struct_field = (void *) field; - - BT_ASSERT(field); - BT_LIB_LOGD("Destroying structure field object: %!+f", field); - bt_field_finalize(field); - - if (struct_field->fields) { - g_ptr_array_free(struct_field->fields, TRUE); - struct_field->fields = NULL; - } - - g_free(field); -} - -static -void destroy_variant_field(struct bt_field *field) -{ - struct bt_field_variant *var_field = (void *) field; - - BT_ASSERT(field); - BT_LIB_LOGD("Destroying variant field object: %!+f", field); - bt_field_finalize(field); - - if (var_field->fields) { - g_ptr_array_free(var_field->fields, TRUE); - var_field->fields = NULL; - } - - g_free(field); -} - -static -void destroy_array_field(struct bt_field *field) -{ - struct bt_field_array *array_field = (void *) field; - - BT_ASSERT(field); - BT_LIB_LOGD("Destroying array field object: %!+f", field); - bt_field_finalize(field); - - if (array_field->fields) { - g_ptr_array_free(array_field->fields, TRUE); - array_field->fields = NULL; - } - - g_free(field); -} - -static -void destroy_string_field(struct bt_field *field) -{ - struct bt_field_string *string_field = (void *) field; - - BT_ASSERT(field); - BT_LIB_LOGD("Destroying string field object: %!+f", field); - bt_field_finalize(field); - - if (string_field->buf) { - g_array_free(string_field->buf, TRUE); - string_field->buf = NULL; - } - - g_free(field); -} - -BT_HIDDEN -void bt_field_destroy(struct bt_field *field) -{ - BT_ASSERT(field); - BT_ASSERT(bt_field_class_has_known_type(field->class)); - field_destroy_funcs[field->class->type](field); -} - -static -void reset_single_field(struct bt_field *field) -{ - BT_ASSERT(field); - field->is_set = false; -} - -static -void reset_structure_field(struct bt_field *field) -{ - uint64_t i; - struct bt_field_structure *struct_field = (void *) field; - - BT_ASSERT(field); - - for (i = 0; i < struct_field->fields->len; i++) { - bt_field_reset(struct_field->fields->pdata[i]); - } -} - -static -void reset_variant_field(struct bt_field *field) -{ - uint64_t i; - struct bt_field_variant *var_field = (void *) field; - - BT_ASSERT(field); - - for (i = 0; i < var_field->fields->len; i++) { - bt_field_reset(var_field->fields->pdata[i]); - } -} - -static -void reset_array_field(struct bt_field *field) -{ - uint64_t i; - struct bt_field_array *array_field = (void *) field; - - BT_ASSERT(field); - - for (i = 0; i < array_field->fields->len; i++) { - bt_field_reset(array_field->fields->pdata[i]); - } -} - -static -void set_single_field_is_frozen(struct bt_field *field, bool is_frozen) -{ - field->frozen = is_frozen; -} - -static -void set_structure_field_is_frozen(struct bt_field *field, bool is_frozen) -{ - uint64_t i; - struct bt_field_structure *struct_field = (void *) field; - - BT_LIB_LOGD("Setting structure field's frozen state: " - "%![field-]+f, is-frozen=%d", field, is_frozen); - - for (i = 0; i < struct_field->fields->len; i++) { - struct bt_field *member_field = struct_field->fields->pdata[i]; - - BT_LIB_LOGD("Setting structure field's member field's " - "frozen state: %![field-]+f, index=%" PRIu64, - member_field, i); - bt_field_set_is_frozen(member_field, is_frozen); - } - - set_single_field_is_frozen(field, is_frozen); -} - -static -void set_variant_field_is_frozen(struct bt_field *field, bool is_frozen) -{ - uint64_t i; - struct bt_field_variant *var_field = (void *) field; - - BT_LIB_LOGD("Setting variant field's frozen state: " - "%![field-]+f, is-frozen=%d", field, is_frozen); - - for (i = 0; i < var_field->fields->len; i++) { - struct bt_field *option_field = var_field->fields->pdata[i]; - - BT_LIB_LOGD("Setting variant field's option field's " - "frozen state: %![field-]+f, index=%" PRIu64, - option_field, i); - bt_field_set_is_frozen(option_field, is_frozen); - } - - set_single_field_is_frozen(field, is_frozen); -} - -static -void set_array_field_is_frozen(struct bt_field *field, bool is_frozen) -{ - uint64_t i; - struct bt_field_array *array_field = (void *) field; - - BT_LIB_LOGD("Setting array field's frozen state: " - "%![field-]+f, is-frozen=%d", field, is_frozen); - - for (i = 0; i < array_field->fields->len; i++) { - struct bt_field *elem_field = array_field->fields->pdata[i]; - - BT_LIB_LOGD("Setting array field's element field's " - "frozen state: %![field-]+f, index=%" PRIu64, - elem_field, i); - bt_field_set_is_frozen(elem_field, is_frozen); - } - - set_single_field_is_frozen(field, is_frozen); -} - -BT_HIDDEN -void _bt_field_set_is_frozen(const struct bt_field *field, - bool is_frozen) -{ - BT_ASSERT(field); - BT_LIB_LOGD("Setting field object's frozen state: %!+f, is-frozen=%d", - field, is_frozen); - BT_ASSERT(field->methods->set_is_frozen); - field->methods->set_is_frozen((void *) field, is_frozen); -} - -static -bool single_field_is_set(const struct bt_field *field) -{ - BT_ASSERT(field); - return field->is_set; -} - -static -bool structure_field_is_set(const struct bt_field *field) -{ - bool is_set = true; - uint64_t i; - const struct bt_field_structure *struct_field = (const void *) field; - - BT_ASSERT(field); - - for (i = 0; i < struct_field->fields->len; i++) { - is_set = bt_field_is_set(struct_field->fields->pdata[i]); - if (!is_set) { - goto end; - } - } - -end: - return is_set; -} - -static -bool variant_field_is_set(const struct bt_field *field) -{ - const struct bt_field_variant *var_field = (const void *) field; - bool is_set = false; - - BT_ASSERT(field); - - if (var_field->selected_field) { - is_set = bt_field_is_set(var_field->selected_field); - } - - return is_set; -} - -static -bool array_field_is_set(const struct bt_field *field) -{ - bool is_set = true; - uint64_t i; - const struct bt_field_array *array_field = (const void *) field; - - BT_ASSERT(field); - - for (i = 0; i < array_field->length; i++) { - is_set = bt_field_is_set(array_field->fields->pdata[i]); - if (!is_set) { - goto end; - } - } - -end: - return is_set; -}