Make API CTF-agnostic
[babeltrace.git] / lib / ctf-ir / fields.c
index db2c93b0b252ebe77b25cdc6aac08131ab72bca7..c0bd86b06a21e0c1254069e360e41390fc7239d6 100644 (file)
@@ -30,6 +30,7 @@
 #include <babeltrace/lib-logging-internal.h>
 
 #include <babeltrace/assert-pre-internal.h>
+#include <babeltrace/ctf-ir/fields.h>
 #include <babeltrace/ctf-ir/fields-internal.h>
 #include <babeltrace/ctf-ir/field-types-internal.h>
 #include <babeltrace/object-internal.h>
 #include <babeltrace/assert-internal.h>
 #include <inttypes.h>
 
-#define BT_ASSERT_PRE_FIELD_IS_INT_OR_ENUM(_field, _name)              \
-       BT_ASSERT_PRE((_field)->type->id == BT_FIELD_TYPE_ID_INTEGER || \
-               (_field)->type->id == BT_FIELD_TYPE_ID_ENUM,            \
-               _name " is not an integer or an enumeration field: "    \
-               "%!+f", (_field))
-
-static struct bt_field_common_methods bt_field_integer_methods = {
-       .set_is_frozen = bt_field_common_generic_set_is_frozen,
-       .validate = bt_field_common_generic_validate,
-       .copy = NULL,
-       .is_set = bt_field_common_generic_is_set,
-       .reset = bt_field_common_generic_reset,
-};
+static
+void reset_single_field(struct bt_field *field);
 
-static struct bt_field_common_methods bt_field_floating_point_methods = {
-       .set_is_frozen = bt_field_common_generic_set_is_frozen,
-       .validate = bt_field_common_generic_validate,
-       .copy = NULL,
-       .is_set = bt_field_common_generic_is_set,
-       .reset = bt_field_common_generic_reset,
-};
+static
+void reset_array_field(struct bt_field *field);
 
-static struct bt_field_common_methods bt_field_enumeration_methods = {
-       .set_is_frozen = bt_field_common_generic_set_is_frozen,
-       .validate = bt_field_common_generic_validate,
-       .copy = NULL,
-       .is_set = bt_field_common_generic_is_set,
-       .reset = bt_field_common_generic_reset,
-};
+static
+void reset_structure_field(struct bt_field *field);
 
-static struct bt_field_common_methods bt_field_string_methods = {
-       .set_is_frozen = bt_field_common_generic_set_is_frozen,
-       .validate = bt_field_common_generic_validate,
-       .copy = NULL,
-       .is_set = bt_field_common_generic_is_set,
-       .reset = bt_field_common_generic_reset,
-};
+static
+void reset_variant_field(struct bt_field *field);
 
-static struct bt_field_common_methods bt_field_structure_methods = {
-       .set_is_frozen = bt_field_common_structure_set_is_frozen_recursive,
-       .validate = bt_field_common_structure_validate_recursive,
-       .copy = NULL,
-       .is_set = bt_field_common_structure_is_set_recursive,
-       .reset = bt_field_common_structure_reset_recursive,
-};
+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 struct bt_field_common_methods bt_field_sequence_methods = {
-       .set_is_frozen = bt_field_common_sequence_set_is_frozen_recursive,
-       .validate = bt_field_common_sequence_validate_recursive,
-       .copy = NULL,
-       .is_set = bt_field_common_sequence_is_set_recursive,
-       .reset = bt_field_common_sequence_reset_recursive,
+static
+bool single_field_is_set(struct bt_field *field);
+
+static
+bool array_field_is_set(struct bt_field *field);
+
+static
+bool structure_field_is_set(struct bt_field *field);
+
+static
+bool variant_field_is_set(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_common_methods bt_field_array_methods = {
-       .set_is_frozen = bt_field_common_array_set_is_frozen_recursive,
-       .validate = bt_field_common_array_validate_recursive,
-       .copy = NULL,
-       .is_set = bt_field_common_array_is_set_recursive,
-       .reset = bt_field_common_array_reset_recursive,
+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_common_methods bt_field_variant_methods = {
-       .set_is_frozen = bt_field_common_variant_set_is_frozen_recursive,
-       .validate = bt_field_common_variant_validate_recursive,
-       .copy = NULL,
-       .is_set = bt_field_common_variant_is_set_recursive,
-       .reset = bt_field_common_variant_reset_recursive,
+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 *bt_field_integer_create(struct bt_field_type *);
+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 *bt_field_enumeration_create(struct bt_field_type *);
+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 *bt_field_floating_point_create(struct bt_field_type *);
+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 *bt_field_structure_create(struct bt_field_type *);
+struct bt_field *create_integer_field(struct bt_field_type *);
 
 static
-struct bt_field *bt_field_variant_create(struct bt_field_type *);
+struct bt_field *create_real_field(struct bt_field_type *);
 
 static
-struct bt_field *bt_field_array_create(struct bt_field_type *);
+struct bt_field *create_string_field(struct bt_field_type *);
 
 static
-struct bt_field *bt_field_sequence_create(struct bt_field_type *);
+struct bt_field *create_structure_field(struct bt_field_type *);
 
 static
-struct bt_field *bt_field_string_create(struct bt_field_type *);
+struct bt_field *create_static_array_field(struct bt_field_type *);
 
 static
-struct bt_field *(* const field_create_funcs[])(struct bt_field_type *) = {
-       [BT_FIELD_TYPE_ID_INTEGER] =    bt_field_integer_create,
-       [BT_FIELD_TYPE_ID_ENUM] =       bt_field_enumeration_create,
-       [BT_FIELD_TYPE_ID_FLOAT] =      bt_field_floating_point_create,
-       [BT_FIELD_TYPE_ID_STRUCT] =     bt_field_structure_create,
-       [BT_FIELD_TYPE_ID_VARIANT] =    bt_field_variant_create,
-       [BT_FIELD_TYPE_ID_ARRAY] =      bt_field_array_create,
-       [BT_FIELD_TYPE_ID_SEQUENCE] =   bt_field_sequence_create,
-       [BT_FIELD_TYPE_ID_STRING] =     bt_field_string_create,
-};
+struct bt_field *create_dynamic_array_field(struct bt_field_type *);
 
 static
-void bt_field_integer_destroy(struct bt_field *field);
+struct bt_field *create_variant_field(struct bt_field_type *);
 
 static
-void bt_field_enumeration_destroy(struct bt_field *field);
+struct bt_field *(* const field_create_funcs[])(struct bt_field_type *) = {
+       [BT_FIELD_TYPE_ID_UNSIGNED_INTEGER]     = create_integer_field,
+       [BT_FIELD_TYPE_ID_SIGNED_INTEGER]       = create_integer_field,
+       [BT_FIELD_TYPE_ID_UNSIGNED_ENUMERATION] = create_integer_field,
+       [BT_FIELD_TYPE_ID_SIGNED_ENUMERATION]   = create_integer_field,
+       [BT_FIELD_TYPE_ID_REAL]                 = create_real_field,
+       [BT_FIELD_TYPE_ID_STRING]               = create_string_field,
+       [BT_FIELD_TYPE_ID_STRUCTURE]            = create_structure_field,
+       [BT_FIELD_TYPE_ID_STATIC_ARRAY]         = create_static_array_field,
+       [BT_FIELD_TYPE_ID_DYNAMIC_ARRAY]        = create_dynamic_array_field,
+       [BT_FIELD_TYPE_ID_VARIANT]              = create_variant_field,
+};
 
 static
-void bt_field_floating_point_destroy(struct bt_field *field);
+void destroy_integer_field(struct bt_field *field);
 
 static
-void bt_field_structure_destroy_recursive(struct bt_field *field);
+void destroy_real_field(struct bt_field *field);
 
 static
-void bt_field_variant_destroy_recursive(struct bt_field *field);
+void destroy_string_field(struct bt_field *field);
 
 static
-void bt_field_array_destroy_recursive(struct bt_field *field);
+void destroy_structure_field(struct bt_field *field);
 
 static
-void bt_field_sequence_destroy_recursive(struct bt_field *field);
+void destroy_array_field(struct bt_field *field);
 
 static
-void bt_field_string_destroy(struct bt_field *field);
+void destroy_variant_field(struct bt_field *field);
 
 static
 void (* const field_destroy_funcs[])(struct bt_field *) = {
-       [BT_FIELD_TYPE_ID_INTEGER] =    bt_field_integer_destroy,
-       [BT_FIELD_TYPE_ID_ENUM] =       bt_field_enumeration_destroy,
-       [BT_FIELD_TYPE_ID_FLOAT] =      bt_field_floating_point_destroy,
-       [BT_FIELD_TYPE_ID_STRUCT] =     bt_field_structure_destroy_recursive,
-       [BT_FIELD_TYPE_ID_VARIANT] =    bt_field_variant_destroy_recursive,
-       [BT_FIELD_TYPE_ID_ARRAY] =      bt_field_array_destroy_recursive,
-       [BT_FIELD_TYPE_ID_SEQUENCE] =   bt_field_sequence_destroy_recursive,
-       [BT_FIELD_TYPE_ID_STRING] =     bt_field_string_destroy,
+       [BT_FIELD_TYPE_ID_UNSIGNED_INTEGER]     = destroy_integer_field,
+       [BT_FIELD_TYPE_ID_SIGNED_INTEGER]       = destroy_integer_field,
+       [BT_FIELD_TYPE_ID_UNSIGNED_ENUMERATION] = destroy_integer_field,
+       [BT_FIELD_TYPE_ID_SIGNED_ENUMERATION]   = destroy_integer_field,
+       [BT_FIELD_TYPE_ID_REAL]                 = destroy_real_field,
+       [BT_FIELD_TYPE_ID_STRING]               = destroy_string_field,
+       [BT_FIELD_TYPE_ID_STRUCTURE]            = destroy_structure_field,
+       [BT_FIELD_TYPE_ID_STATIC_ARRAY]         = destroy_array_field,
+       [BT_FIELD_TYPE_ID_DYNAMIC_ARRAY]        = destroy_array_field,
+       [BT_FIELD_TYPE_ID_VARIANT]              = destroy_variant_field,
 };
 
+struct bt_field_type *bt_field_borrow_type(struct bt_field *field)
+{
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       return field->type;
+}
+
+enum bt_field_type_id bt_field_get_type_id(struct bt_field *field)
+{
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       return field->type->id;
+}
+
 BT_HIDDEN
-struct bt_field *bt_field_create_recursive(struct bt_field_type *type)
+struct bt_field *bt_field_create(struct bt_field_type *ft)
 {
        struct bt_field *field = NULL;
-       enum bt_field_type_id type_id;
-
-       BT_ASSERT_PRE_NON_NULL(type, "Field type");
-       BT_ASSERT(field_type_common_has_known_id((void *) type));
-       BT_ASSERT_PRE(bt_field_type_common_validate((void *) type) == 0,
-               "Field type is invalid: %!+F", type);
-       type_id = bt_field_type_get_type_id(type);
-       field = field_create_funcs[type_id](type);
+
+       BT_ASSERT_PRE_NON_NULL(ft, "Field type");
+       BT_ASSERT(bt_field_type_has_known_id(ft));
+       field = field_create_funcs[ft->id](ft);
        if (!field) {
+               BT_LIB_LOGE("Cannot create field object from field type: "
+                       "%![ft-]+F", ft);
                goto end;
        }
 
-       bt_object_set_is_shared((void *) field, false);
-       bt_field_type_freeze(type);
-
 end:
        return field;
 }
 
-struct bt_field_type *bt_field_borrow_type(struct bt_field *field)
+static inline
+void init_field(struct bt_field *field, struct bt_field_type *ft,
+               struct bt_field_methods *methods)
 {
-       return (void *) bt_field_common_borrow_type((void *) field);
+       BT_ASSERT(field);
+       BT_ASSERT(ft);
+       bt_object_init_unique(&field->base);
+       field->methods = methods;
+       field->type = bt_get(ft);
 }
 
-enum bt_field_type_id bt_field_get_type_id(struct bt_field *field)
+static
+struct bt_field *create_integer_field(struct bt_field_type *ft)
 {
-       struct bt_field_common *field_common = (void *) field;
+       struct bt_field_integer *int_field;
 
-       BT_ASSERT_PRE_NON_NULL(field, "Field");
-       return field_common->type->id;
-}
+       BT_LIB_LOGD("Creating integer field object: %![ft-]+F", ft);
+       int_field = g_new0(struct bt_field_integer, 1);
+       if (!int_field) {
+               BT_LOGE_STR("Failed to allocate one integer field.");
+               goto end;
+       }
 
-bt_bool bt_field_is_integer(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_INTEGER;
-}
+       init_field((void *) int_field, ft, &integer_field_methods);
+       BT_LIB_LOGD("Created integer field object: %!+f", int_field);
 
-bt_bool bt_field_is_floating_point(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_FLOAT;
+end:
+       return (void *) int_field;
 }
 
-bt_bool bt_field_is_enumeration(struct bt_field *field)
+static
+struct bt_field *create_real_field(struct bt_field_type *ft)
 {
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_ENUM;
-}
+       struct bt_field_real *real_field;
 
-bt_bool bt_field_is_string(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_STRING;
-}
+       BT_LIB_LOGD("Creating real field object: %![ft-]+F", ft);
+       real_field = g_new0(struct bt_field_real, 1);
+       if (!real_field) {
+               BT_LOGE_STR("Failed to allocate one real field.");
+               goto end;
+       }
 
-bt_bool bt_field_is_structure(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_STRUCT;
-}
+       init_field((void *) real_field, ft, &real_field_methods);
+       BT_LIB_LOGD("Created real field object: %!+f", real_field);
 
-bt_bool bt_field_is_array(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_ARRAY;
+end:
+       return (void *) real_field;
 }
 
-bt_bool bt_field_is_sequence(struct bt_field *field)
+static
+struct bt_field *create_string_field(struct bt_field_type *ft)
 {
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_SEQUENCE;
-}
+       struct bt_field_string *string_field;
 
-bt_bool bt_field_is_variant(struct bt_field *field)
-{
-       return bt_field_get_type_id(field) == BT_FIELD_TYPE_ID_VARIANT;
-}
+       BT_LIB_LOGD("Creating string field object: %![ft-]+F", ft);
+       string_field = g_new0(struct bt_field_string, 1);
+       if (!string_field) {
+               BT_LOGE_STR("Failed to allocate one string field.");
+               goto end;
+       }
 
-int64_t bt_field_sequence_get_length(struct bt_field *field)
-{
-       return bt_field_common_sequence_get_length((void *) field);
-}
+       init_field((void *) string_field, ft, &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_PUT(string_field);
+               goto end;
+       }
 
-int bt_field_sequence_set_length(struct bt_field *field, uint64_t length)
-{
-       return bt_field_common_sequence_set_length((void *) field,
-               length, (bt_field_common_create_func) bt_field_create_recursive);
-}
+       g_array_index(string_field->buf, char, 0) = '\0';
+       BT_LIB_LOGD("Created string field object: %!+f", string_field);
 
-struct bt_field *bt_field_structure_borrow_field_by_index(
-               struct bt_field *field, uint64_t index)
-{
-       return (void *) bt_field_common_structure_borrow_field_by_index(
-               (void *) field, index);
+end:
+       return (void *) string_field;
 }
 
-struct bt_field *bt_field_structure_borrow_field_by_name(
-               struct bt_field *field, const char *name)
+static inline
+int create_fields_from_named_field_types(
+               struct bt_field_type_named_field_types_container *ft,
+               GPtrArray **fields)
 {
-       return (void *) bt_field_common_structure_borrow_field_by_name(
-               (void *) field, name);
-}
+       int ret = 0;
+       uint64_t i;
 
-struct bt_field *bt_field_array_borrow_field(
-               struct bt_field *field, uint64_t index)
-{
-       return (void *) bt_field_common_array_borrow_field((void *) field,
-               index);
-}
+       *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;
+       }
 
-struct bt_field *bt_field_sequence_borrow_field(
-               struct bt_field *field, uint64_t index)
-{
-       return (void *) bt_field_common_sequence_borrow_field((void *) field,
-               index);
-}
+       g_ptr_array_set_size(*fields, ft->named_fts->len);
 
-struct bt_field *bt_field_variant_borrow_current_field(
-               struct bt_field *variant_field)
-{
-       return (void *) bt_field_common_variant_borrow_current_field(
-               (void *) variant_field);
-}
+       for (i = 0; i < ft->named_fts->len; i++) {
+               struct bt_field *field;
+               struct bt_named_field_type *named_ft =
+                       BT_FIELD_TYPE_NAMED_FT_AT_INDEX(ft, i);
 
-int bt_field_variant_set_tag_signed(struct bt_field *variant_field,
-               int64_t tag)
-{
-       return bt_field_variant_common_set_tag((void *) variant_field,
-               (uint64_t) tag, true);
-}
+               field = bt_field_create(named_ft->ft);
+               if (!field) {
+                       BT_LIB_LOGE("Failed to create structure member or variant option field: "
+                               "name=\"%s\", %![ft-]+F",
+                               named_ft->name->str, named_ft->ft);
+                       ret = -1;
+                       goto end;
+               }
 
-int bt_field_variant_set_tag_unsigned(struct bt_field *variant_field,
-               uint64_t tag)
-{
-       return bt_field_variant_common_set_tag((void *) variant_field,
-               (uint64_t) tag, false);
-}
+               g_ptr_array_index(*fields, i) = field;
+       }
 
-int bt_field_variant_get_tag_signed(struct bt_field *variant_field,
-               int64_t *tag)
-{
-       return bt_field_common_variant_get_tag_signed((void *) variant_field, tag);
+end:
+       return ret;
 }
 
-int bt_field_variant_get_tag_unsigned(struct bt_field *variant_field,
-               uint64_t *tag)
+static
+struct bt_field *create_structure_field(struct bt_field_type *ft)
 {
-       return bt_field_common_variant_get_tag_unsigned((void *) variant_field, tag);
-}
+       struct bt_field_structure *struct_field;
 
-struct bt_field_type_enumeration_mapping_iterator *
-bt_field_enumeration_get_mappings(struct bt_field *field)
-{
-       struct bt_field_enumeration *enum_field = (void *) field;
-
-       BT_ASSERT_PRE_NON_NULL(field, "Enumeration field");
-       BT_ASSERT_PRE_FIELD_COMMON_HAS_TYPE_ID((struct bt_field_common *) field,
-               BT_FIELD_TYPE_ID_ENUM, "Field");
-       BT_ASSERT_PRE_FIELD_COMMON_IS_SET((struct bt_field_common *) field,
-               "Enumeration field");
-       return bt_field_common_enumeration_get_mappings((void *) field,
-               (bt_field_common_create_func) bt_field_create_recursive,
-               enum_field->common.payload.unsignd);
-}
+       BT_LIB_LOGD("Creating structure field object: %![ft-]+F", ft);
+       struct_field = g_new0(struct bt_field_structure, 1);
+       if (!struct_field) {
+               BT_LOGE_STR("Failed to allocate one structure field.");
+               goto end;
+       }
 
-BT_ASSERT_PRE_FUNC
-static inline
-struct bt_field_type_common_integer *get_int_enum_int_ft(
-               struct bt_field *field)
-{
-       struct bt_field_common_integer *int_field = (void *) field;
-       struct bt_field_type_common_integer *int_ft = NULL;
-
-       if (int_field->common.type->id == BT_FIELD_TYPE_ID_INTEGER) {
-               int_ft = BT_FROM_COMMON(int_field->common.type);
-       } else if (int_field->common.type->id == BT_FIELD_TYPE_ID_ENUM) {
-               struct bt_field_type_common_enumeration *enum_ft =
-                       BT_FROM_COMMON(int_field->common.type);
-               int_ft = enum_ft->container_ft;
+       init_field((void *) struct_field, ft, &structure_field_methods);
+
+       if (create_fields_from_named_field_types((void *) ft,
+                       &struct_field->fields)) {
+               BT_LIB_LOGE("Cannot create structure member fields: "
+                       "%![ft-]+F", ft);
+               BT_PUT(struct_field);
+               goto end;
        }
 
-       BT_ASSERT(int_ft);
-       return int_ft;
+       BT_LIB_LOGD("Created structure field object: %!+f", struct_field);
+
+end:
+       return (void *) struct_field;
 }
 
-int bt_field_integer_signed_get_value(struct bt_field *field, int64_t *value)
+static
+struct bt_field *create_variant_field(struct bt_field_type *ft)
 {
-       struct bt_field_common_integer *integer = (void *) field;
+       struct bt_field_variant *var_field;
 
-       BT_ASSERT_PRE_NON_NULL(field, "Integer/enumeration field");
-       BT_ASSERT_PRE_NON_NULL(value, "Value");
-       BT_ASSERT_PRE_FIELD_COMMON_IS_SET(BT_TO_COMMON(integer),
-               "Integer/enumeration field");
-       BT_ASSERT_PRE_FIELD_IS_INT_OR_ENUM(BT_TO_COMMON(integer), "Field");
-       BT_ASSERT_PRE(bt_field_type_common_integer_is_signed(
-               BT_TO_COMMON(get_int_enum_int_ft(field))),
-               "Field's type is unsigned: %!+f", field);
-       *value = integer->payload.signd;
-       return 0;
-}
+       BT_LIB_LOGD("Creating variant field object: %![ft-]+F", ft);
+       var_field = g_new0(struct bt_field_variant, 1);
+       if (!var_field) {
+               BT_LOGE_STR("Failed to allocate one variant field.");
+               goto end;
+       }
 
-int bt_field_integer_signed_set_value(struct bt_field *field, int64_t value)
-{
-       int ret = 0;
-       struct bt_field_common_integer *integer = (void *) field;
-
-       BT_ASSERT_PRE_NON_NULL(field, "Integer field");
-       BT_ASSERT_PRE_FIELD_COMMON_HOT(BT_TO_COMMON(integer), "Integer field");
-       BT_ASSERT_PRE_FIELD_IS_INT_OR_ENUM(BT_TO_COMMON(integer), "Field");
-       BT_ASSERT_PRE(bt_field_type_common_integer_is_signed(
-               BT_FROM_COMMON(get_int_enum_int_ft(field))),
-               "Field's type is unsigned: %!+f", field);
-       BT_ASSERT_PRE(value_is_in_range_signed(
-               get_int_enum_int_ft(field)->size, value),
-               "Value is out of bounds: value=%" PRId64 ", %![field-]+f",
-               value, field);
-       integer->payload.signd = value;
-       bt_field_set(field, true);
-       return ret;
-}
+       init_field((void *) var_field, ft, &variant_field_methods);
 
-int bt_field_integer_unsigned_get_value(struct bt_field *field, uint64_t *value)
-{
-       struct bt_field_common_integer *integer = (void *) field;
+       if (create_fields_from_named_field_types((void *) ft,
+                       &var_field->fields)) {
+               BT_LIB_LOGE("Cannot create variant member fields: "
+                       "%![ft-]+F", ft);
+               BT_PUT(var_field);
+               goto end;
+       }
 
-       BT_ASSERT_PRE_NON_NULL(field, "Integer field");
-       BT_ASSERT_PRE_NON_NULL(value, "Value");
-       BT_ASSERT_PRE_FIELD_COMMON_IS_SET(BT_TO_COMMON(integer), "Integer field");
-       BT_ASSERT_PRE_FIELD_IS_INT_OR_ENUM(BT_TO_COMMON(integer), "Field");
-       BT_ASSERT_PRE(!bt_field_type_common_integer_is_signed(
-               BT_FROM_COMMON(get_int_enum_int_ft(field))),
-               "Field's type is signed: %!+f", field);
-       *value = integer->payload.unsignd;
-       return 0;
-}
+       BT_LIB_LOGD("Created variant field object: %!+f", var_field);
 
-int bt_field_integer_unsigned_set_value(struct bt_field *field,
-               uint64_t value)
-{
-       struct bt_field_common_integer *integer = (void *) field;
-
-       BT_ASSERT_PRE_NON_NULL(field, "Integer field");
-       BT_ASSERT_PRE_FIELD_COMMON_HOT(BT_TO_COMMON(integer), "Integer field");
-       BT_ASSERT_PRE_FIELD_IS_INT_OR_ENUM(BT_TO_COMMON(integer), "Field");
-       BT_ASSERT_PRE(!bt_field_type_common_integer_is_signed(
-               BT_FROM_COMMON(get_int_enum_int_ft(field))),
-               "Field's type is signed: %!+f", field);
-       BT_ASSERT_PRE(value_is_in_range_unsigned(
-               get_int_enum_int_ft(field)->size, value),
-               "Value is out of bounds: value=%" PRIu64 ", %![field-]+f",
-               value, field);
-       integer->payload.unsignd = value;
-       bt_field_set(field, true);
-       return 0;
+end:
+       return (void *) var_field;
 }
 
-int bt_field_floating_point_get_value(struct bt_field *field,
-               double *value)
+static inline
+int init_array_field_fields(struct bt_field_array *array_field)
 {
-       return bt_field_common_floating_point_get_value((void *) field, value);
-}
+       int ret = 0;
+       uint64_t i;
+       struct bt_field_type_array *array_ft;
 
-int bt_field_floating_point_set_value(struct bt_field *field,
-               double value)
-{
-       return bt_field_common_floating_point_set_value((void *) field, value);
-}
+       BT_ASSERT(array_field);
+       array_ft = (void *) array_field->common.type;
+       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;
+       }
 
-const char *bt_field_string_get_value(struct bt_field *field)
-{
-       return bt_field_common_string_get_value((void *) field);
-}
+       g_ptr_array_set_free_func(array_field->fields,
+               (GDestroyNotify) bt_field_destroy);
+       g_ptr_array_set_size(array_field->fields, array_field->length);
 
-int bt_field_string_set_value(struct bt_field *field, const char *value)
-{
-       return bt_field_common_string_set_value((void *) field, value);
-}
+       for (i = 0; i < array_field->length; i++) {
+               array_field->fields->pdata[i] = bt_field_create(
+                       array_ft->element_ft);
+               if (!array_field->fields->pdata[i]) {
+                       BT_LIB_LOGE("Cannot create array field's element field: "
+                               "index=%" PRIu64 ", %![ft-]+F", i, array_ft);
+                       ret = -1;
+                       goto end;
+               }
+       }
 
-int bt_field_string_append(struct bt_field *field, const char *value)
-{
-       return bt_field_common_string_append((void *) field, value);
+end:
+       return ret;
 }
 
-int bt_field_string_append_len(struct bt_field *field,
-               const char *value, unsigned int length)
+static
+struct bt_field *create_static_array_field(struct bt_field_type *ft)
 {
-       return bt_field_common_string_append_len((void *) field, value, length);
-}
+       struct bt_field_type_static_array *array_ft = (void *) ft;
+       struct bt_field_array *array_field;
 
-int bt_field_string_clear(struct bt_field *string_field)
-{
-       return bt_field_common_string_clear((void *) string_field);
-}
+       BT_LIB_LOGD("Creating static array field object: %![ft-]+F", ft);
+       array_field = g_new0(struct bt_field_array, 1);
+       if (!array_field) {
+               BT_LOGE_STR("Failed to allocate one static array field.");
+               goto end;
+       }
 
-BT_HIDDEN
-struct bt_field_common *bt_field_common_copy(struct bt_field_common *field)
-{
-       struct bt_field_common *copy = NULL;
+       init_field((void *) array_field, ft, &array_field_methods);
+       array_field->length = array_ft->length;
 
-       BT_ASSERT_PRE_NON_NULL(field, "Field");
-       BT_ASSERT(field_type_common_has_known_id(field->type));
-       BT_ASSERT(field->methods->copy);
-       copy = field->methods->copy(field);
-       if (!copy) {
-               BT_LOGW("Cannot create field: ft-addr=%p", field->type);
+       if (init_array_field_fields(array_field)) {
+               BT_LIB_LOGE("Cannot create static array fields: "
+                       "%![ft-]+F", ft);
+               BT_PUT(array_field);
                goto end;
        }
 
-       bt_field_common_set(copy, field->payload_set);
+       BT_LIB_LOGD("Created static array field object: %!+f", array_field);
 
 end:
-       return copy;
+       return (void *) array_field;
 }
 
 static
-void bt_field_integer_destroy(struct bt_field *field)
+struct bt_field *create_dynamic_array_field(struct bt_field_type *ft)
 {
-       BT_LOGD("Destroying integer field object: addr=%p", field);
-       bt_field_common_integer_finalize((void *) field);
-       g_free(field);
-}
+       struct bt_field_array *array_field;
 
-static
-void bt_field_floating_point_destroy(struct bt_field *field)
-{
-       BT_LOGD("Destroying floating point field object: addr=%p", field);
-       bt_field_common_floating_point_finalize((void *) field);
-       g_free(field);
-}
+       BT_LIB_LOGD("Creating dynamic array field object: %![ft-]+F", ft);
+       array_field = g_new0(struct bt_field_array, 1);
+       if (!array_field) {
+               BT_LOGE_STR("Failed to allocate one dynamic array field.");
+               goto end;
+       }
 
-static
-void bt_field_enumeration_destroy(struct bt_field *field)
-{
-       BT_LOGD("Destroying enumeration field object: addr=%p", field);
-       bt_field_common_finalize((void *) field);
-       g_free(field);
-}
+       init_field((void *) array_field, ft, &array_field_methods);
 
-static
-void bt_field_structure_destroy_recursive(struct bt_field *field)
-{
-       BT_LOGD("Destroying structure field object: addr=%p", field);
-       bt_field_common_structure_finalize_recursive((void *) field);
-       g_free(field);
-}
+       if (init_array_field_fields(array_field)) {
+               BT_LIB_LOGE("Cannot create dynamic array fields: "
+                       "%![ft-]+F", ft);
+               BT_PUT(array_field);
+               goto end;
+       }
 
-static
-void bt_field_variant_destroy_recursive(struct bt_field *field)
-{
-       BT_LOGD("Destroying variant field object: addr=%p", field);
-       bt_field_common_variant_finalize_recursive((void *) field);
-       g_free(field);
-}
+       BT_LIB_LOGD("Created dynamic array field object: %!+f", array_field);
 
-static
-void bt_field_array_destroy_recursive(struct bt_field *field)
-{
-       BT_LOGD("Destroying array field object: addr=%p", field);
-       bt_field_common_array_finalize_recursive((void *) field);
-       g_free(field);
+end:
+       return (void *) array_field;
 }
 
-static
-void bt_field_sequence_destroy_recursive(struct bt_field *field)
+int64_t bt_field_signed_integer_get_value(struct bt_field *field)
 {
-       BT_LOGD("Destroying sequence field object: addr=%p", field);
-       bt_field_common_sequence_finalize_recursive((void *) field);
-       g_free(field);
-}
+       struct bt_field_integer *int_field = (void *) field;
 
-static
-void bt_field_string_destroy(struct bt_field *field)
-{
-       BT_LOGD("Destroying string field object: addr=%p", field);
-       bt_field_common_string_finalize((void *) field);
-       g_free(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;
 }
 
-BT_HIDDEN
-void bt_field_destroy_recursive(struct bt_field *field)
+void bt_field_signed_integer_set_value(struct bt_field *field, int64_t value)
 {
-       struct bt_field_common *field_common = (void *) field;
+       struct bt_field_integer *int_field = (void *) field;
 
-       if (!field) {
-               return;
-       }
-
-       BT_ASSERT(field_type_common_has_known_id((void *) field_common->type));
-       field_destroy_funcs[field_common->type->id](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_type_integer *) field->type)->range, value),
+               "Value is out of bounds: value=%" PRId64 ", %![field-]+f, "
+               "%![ft-]+F", value, field, field->type);
+       int_field->value.i = value;
+       bt_field_set_single(field, true);
 }
 
-static
-struct bt_field *bt_field_integer_create(struct bt_field_type *type)
+uint64_t bt_field_unsigned_integer_get_value(struct bt_field *field)
 {
-       struct bt_field_common_integer *integer =
-               g_new0(struct bt_field_common_integer, 1);
+       struct bt_field_integer *int_field = (void *) field;
 
-       BT_LOGD("Creating integer field object: ft-addr=%p", type);
+       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;
+}
 
-       if (integer) {
-               bt_field_common_initialize(BT_TO_COMMON(integer), (void *) type,
-                       NULL, &bt_field_integer_methods);
-               BT_LOGD("Created integer field object: addr=%p, ft-addr=%p",
-                       integer, type);
-       } else {
-               BT_LOGE_STR("Failed to allocate one integer field.");
-       }
+void bt_field_unsigned_integer_set_value(struct bt_field *field,
+               uint64_t value)
+{
+       struct bt_field_integer *int_field = (void *) field;
 
-       return (void *) integer;
+       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_type_integer *) field->type)->range, value),
+               "Value is out of bounds: value=%" PRIu64 ", %![field-]+f, "
+               "%![ft-]+F", value, field, field->type);
+       int_field->value.u = value;
+       bt_field_set_single(field, true);
 }
 
-static
-struct bt_field *bt_field_enumeration_create(struct bt_field_type *type)
+double bt_field_real_get_value(struct bt_field *field)
 {
-       struct bt_field_enumeration *enumeration = g_new0(
-               struct bt_field_enumeration, 1);
-
-       BT_LOGD("Creating enumeration field object: ft-addr=%p", type);
-
-       if (enumeration) {
-               bt_field_common_initialize(
-                       BT_TO_COMMON(BT_TO_COMMON(enumeration)),
-                       (void *) type, NULL, &bt_field_enumeration_methods);
-               BT_LOGD("Created enumeration field object: addr=%p, ft-addr=%p",
-                       enumeration, type);
-       } else {
-               BT_LOGE_STR("Failed to allocate one enumeration field.");
-       }
+       struct bt_field_real *real_field = (void *) field;
 
-       return (void *) enumeration;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_IS_SET(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field, BT_FIELD_TYPE_ID_REAL, "Field");
+       return real_field->value;
 }
 
-static
-struct bt_field *bt_field_floating_point_create(struct bt_field_type *type)
+void bt_field_real_set_value(struct bt_field *field, double value)
 {
-       struct bt_field_common_floating_point *floating_point;
-
-       BT_LOGD("Creating floating point number field object: ft-addr=%p", type);
-       floating_point = g_new0(struct bt_field_common_floating_point, 1);
-
-       if (floating_point) {
-               bt_field_common_initialize(BT_TO_COMMON(floating_point),
-                       (void *) type, NULL, &bt_field_floating_point_methods);
-               BT_LOGD("Created floating point number field object: addr=%p, ft-addr=%p",
-                       floating_point, type);
-       } else {
-               BT_LOGE_STR("Failed to allocate one floating point number field.");
-       }
+       struct bt_field_real *real_field = (void *) field;
 
-       return (void *) floating_point;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field, BT_FIELD_TYPE_ID_REAL, "Field");
+       BT_ASSERT_PRE_FIELD_HOT(field, "Field");
+       BT_ASSERT_PRE(
+               !((struct bt_field_type_real *) field->type)->is_single_precision ||
+               (double) (float) value == value,
+               "Invalid value for a single-precision real number: value=%f, "
+               "%![ft-]+F", value, field->type);
+       real_field->value = value;
+       bt_field_set_single(field, true);
 }
 
-BT_HIDDEN
-int bt_field_common_structure_initialize(struct bt_field_common *field,
-               struct bt_field_type_common *type,
-               bt_object_release_func release_func,
-               struct bt_field_common_methods *methods,
-               bt_field_common_create_func field_create_func,
-               GDestroyNotify field_release_func)
+int bt_field_unsigned_enumeration_get_mapping_labels(struct bt_field *field,
+               bt_field_type_enumeration_mapping_label_array *label_array,
+               uint64_t *count)
 {
-       int ret = 0;
-       struct bt_field_type_common_structure *structure_type =
-               BT_FROM_COMMON(type);
-       struct bt_field_common_structure *structure = BT_FROM_COMMON(field);
-       size_t i;
-
-       BT_LOGD("Initializing common structure field object: ft-addr=%p", type);
-       bt_field_common_initialize(field, type, release_func, methods);
-       structure->fields = g_ptr_array_new_with_free_func(field_release_func);
-       g_ptr_array_set_size(structure->fields, structure_type->fields->len);
-
-       /* Create all fields contained in the structure field. */
-       for (i = 0; i < structure_type->fields->len; i++) {
-               struct bt_field_common *field;
-               struct bt_field_type_common_structure_field *struct_field =
-                       BT_FIELD_TYPE_COMMON_STRUCTURE_FIELD_AT_INDEX(
-                               structure_type, i);
-               field = field_create_func(struct_field->type);
-               if (!field) {
-                       BT_LOGE("Failed to create structure field's member: name=\"%s\", index=%zu",
-                               g_quark_to_string(struct_field->name), i);
-                       ret = -1;
-                       goto end;
-               }
+       struct bt_field_integer *int_field = (void *) field;
 
-               g_ptr_array_index(structure->fields, i) = 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_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_UNSIGNED_ENUMERATION, "Field");
+       return bt_field_type_unsigned_enumeration_get_mapping_labels_by_value(
+               field->type, int_field->value.u, label_array, count);
+}
 
-       BT_LOGD("Initialized common structure field object: addr=%p, ft-addr=%p",
-               field, type);
+int bt_field_signed_enumeration_get_mapping_labels(struct bt_field *field,
+               bt_field_type_enumeration_mapping_label_array *label_array,
+               uint64_t *count)
+{
+       struct bt_field_integer *int_field = (void *) field;
 
-end:
-       return ret;
+       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_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_SIGNED_ENUMERATION, "Field");
+       return bt_field_type_signed_enumeration_get_mapping_labels_by_value(
+               field->type, int_field->value.i, label_array, count);
 }
 
-static
-struct bt_field *bt_field_structure_create(struct bt_field_type *type)
+const char *bt_field_string_get_value(struct bt_field *field)
 {
-       struct bt_field_common_structure *structure = g_new0(
-               struct bt_field_common_structure, 1);
-       int iret;
+       struct bt_field_string *string_field = (void *) field;
 
-       BT_LOGD("Creating structure field object: ft-addr=%p", type);
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_IS_SET(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field, BT_FIELD_TYPE_ID_STRING,
+               "Field");
+       return (const char *) string_field->buf->data;
+}
 
-       if (!structure) {
-               BT_LOGE_STR("Failed to allocate one structure field.");
-               goto end;
-       }
+uint64_t bt_field_string_get_length(struct bt_field *field)
+{
+       struct bt_field_string *string_field = (void *) field;
 
-       iret = bt_field_common_structure_initialize(BT_TO_COMMON(structure),
-               (void *) type, NULL, &bt_field_structure_methods,
-               (bt_field_common_create_func) bt_field_create_recursive,
-               (GDestroyNotify) bt_field_destroy_recursive);
-       if (iret) {
-               BT_PUT(structure);
-               goto end;
-       }
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_IS_SET(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field, BT_FIELD_TYPE_ID_STRING,
+               "Field");
+       return string_field->length;
+}
 
-       BT_LOGD("Created structure field object: addr=%p, ft-addr=%p",
-               structure, type);
+int 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_TYPE_ID(field, BT_FIELD_TYPE_ID_STRING,
+               "Field");
+       bt_field_string_clear(field);
+       return bt_field_string_append_with_length(field, value,
+               (uint64_t) strlen(value));
+}
 
-end:
-       return (void *) structure;
+int bt_field_string_append(struct bt_field *field, const char *value)
+{
+       return bt_field_string_append_with_length(field, value,
+               (uint64_t) strlen(value));
 }
 
-BT_HIDDEN
-int bt_field_common_variant_initialize(struct bt_field_common *field,
-               struct bt_field_type_common *type,
-               bt_object_release_func release_func,
-               struct bt_field_common_methods *methods,
-               bt_field_common_create_func field_create_func,
-               GDestroyNotify field_release_func)
+int bt_field_string_append_with_length(struct bt_field *field,
+               const char *value, uint64_t length)
 {
-       int ret = 0;
-       struct bt_field_type_common_variant *variant_type =
-               BT_FROM_COMMON(type);
-       struct bt_field_common_variant *variant = BT_FROM_COMMON(field);
-       size_t i;
-
-       BT_LOGD("Initializing common variant field object: ft-addr=%p", type);
-       bt_field_common_initialize(field, type, release_func, methods);
-       ret = bt_field_type_common_variant_update_choices(type);
-       if (ret) {
-               BT_LOGE("Cannot update common variant field type choices: "
-                       "ret=%d", ret);
-               goto end;
-       }
+       struct bt_field_string *string_field = (void *) field;
+       char *data;
+       uint64_t new_length;
 
-       variant->fields = g_ptr_array_new_with_free_func(field_release_func);
-       g_ptr_array_set_size(variant->fields, variant_type->choices->len);
+       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_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_STRING, "Field");
 
-       /* Create all fields contained in the variant field. */
-       for (i = 0; i < variant_type->choices->len; i++) {
-               struct bt_field_common *field;
-               struct bt_field_type_common_variant_choice *var_choice =
-                       BT_FIELD_TYPE_COMMON_VARIANT_CHOICE_AT_INDEX(
-                               variant_type, i);
+       /* 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);
 
-               field = field_create_func(var_choice->type);
-               if (!field) {
-                       BT_LOGE("Failed to create variant field's member: name=\"%s\", index=%zu",
-                               g_quark_to_string(var_choice->name), i);
-                       ret = -1;
-                       goto end;
-               }
+       new_length = length + string_field->length;
 
-               g_ptr_array_index(variant->fields, i) = field;
+       if (unlikely(new_length + 1 > string_field->buf->len)) {
+               g_array_set_size(string_field->buf, new_length + 1);
        }
 
-       BT_LOGD("Initialized common variant field object: addr=%p, ft-addr=%p",
-               field, type);
-
-end:
-       return ret;
+       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 0;
 }
 
-BT_HIDDEN
-int bt_field_common_string_initialize(struct bt_field_common *field,
-               struct bt_field_type_common *type,
-               bt_object_release_func release_func,
-               struct bt_field_common_methods *methods)
+int bt_field_string_clear(struct bt_field *field)
 {
-       int ret = 0;
-       struct bt_field_common_string *string = BT_FROM_COMMON(field);
-
-       BT_LOGD("Initializing common string field object: ft-addr=%p", type);
-       bt_field_common_initialize(field, type, release_func, methods);
-       string->buf = g_array_sized_new(FALSE, FALSE, sizeof(char), 1);
-       if (!string->buf) {
-               ret = -1;
-               goto end;
-       }
+       struct bt_field_string *string_field = (void *) field;
 
-       g_array_index(string->buf, char, 0) = '\0';
-       BT_LOGD("Initialized common string field object: addr=%p, ft-addr=%p",
-               field, type);
-
-end:
-       return ret;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HOT(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_STRING, "Field");
+       string_field->length = 0;
+       bt_field_set_single(field, true);
+       return 0;
 }
 
-static
-struct bt_field *bt_field_variant_create(struct bt_field_type *type)
+uint64_t bt_field_array_get_length(struct bt_field *field)
 {
-       struct bt_field_common_variant *variant = g_new0(
-               struct bt_field_common_variant, 1);
-       int iret;
-
-       BT_LOGD("Creating variant field object: ft-addr=%p", type);
-
-       if (!variant) {
-               BT_LOGE_STR("Failed to allocate one variant field.");
-               goto end;
-       }
-
-       iret = bt_field_common_variant_initialize(BT_TO_COMMON(variant),
-               (void *) type, NULL, &bt_field_variant_methods,
-               (bt_field_common_create_func) bt_field_create_recursive,
-               (GDestroyNotify) bt_field_destroy_recursive);
-       if (iret) {
-               BT_PUT(variant);
-               goto end;
-       }
-
-       BT_LOGD("Created variant field object: addr=%p, ft-addr=%p",
-               variant, type);
+       struct bt_field_array *array_field = (void *) field;
 
-end:
-       return (void *) variant;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_IS_ARRAY(field, "Field");
+       return array_field->length;
 }
 
-BT_HIDDEN
-int bt_field_common_array_initialize(struct bt_field_common *field,
-               struct bt_field_type_common *type,
-               bt_object_release_func release_func,
-               struct bt_field_common_methods *methods,
-               bt_field_common_create_func field_create_func,
-               GDestroyNotify field_destroy_func)
+int bt_field_dynamic_array_set_length(struct bt_field *field,
+               uint64_t length)
 {
-       struct bt_field_type_common_array *array_type = BT_FROM_COMMON(type);
-       struct bt_field_common_array *array = BT_FROM_COMMON(field);
-       unsigned int array_length;
        int ret = 0;
-       uint64_t i;
-
-       BT_LOGD("Initializing common array field object: ft-addr=%p", type);
-       BT_ASSERT(type);
-       bt_field_common_initialize(field, type, release_func, methods);
-       array_length = array_type->length;
-       array->elements = g_ptr_array_sized_new(array_length);
-       if (!array->elements) {
-               ret = -1;
-               goto end;
-       }
+       struct bt_field_array *array_field = (void *) field;
 
-       g_ptr_array_set_free_func(array->elements, field_destroy_func);
-       g_ptr_array_set_size(array->elements, array_length);
-
-       for (i = 0; i < array_length; i++) {
-               array->elements->pdata[i] = field_create_func(
-                       array_type->element_ft);
-               if (!array->elements->pdata[i]) {
-                       ret = -1;
-                       goto end;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_DYNAMIC_ARRAY, "Field");
+       BT_ASSERT_PRE_FIELD_HOT(field, "Field");
+
+       if (unlikely(length > array_field->fields->len)) {
+               /* Make more room */
+               struct bt_field_type_array *array_ft;
+               uint64_t cur_len = array_field->fields->len;
+               uint64_t i;
+
+               g_ptr_array_set_size(array_field->fields, length);
+               array_ft = (void *) field->type;
+
+               for (i = cur_len; i < array_field->fields->len; i++) {
+                       struct bt_field *elem_field = bt_field_create(
+                               array_ft->element_ft);
+
+                       if (!elem_field) {
+                               BT_LIB_LOGE("Cannot create element field for "
+                                       "dynamic array field: "
+                                       "index=%" PRIu64 ", "
+                                       "%![array-field-]+f", i, field);
+                               ret = -1;
+                               goto end;
+                       }
+
+                       BT_ASSERT(!array_field->fields->pdata[i]);
+                       array_field->fields->pdata[i] = elem_field;
                }
        }
 
-       BT_LOGD("Initialized common array field object: addr=%p, ft-addr=%p",
-               field, type);
+       array_field->length = length;
 
 end:
        return ret;
 }
 
-static
-struct bt_field *bt_field_array_create(struct bt_field_type *type)
+struct bt_field *bt_field_array_borrow_element_field_by_index(
+               struct bt_field *field, uint64_t index)
 {
-       struct bt_field_common_array *array =
-               g_new0(struct bt_field_common_array, 1);
-       int ret;
-
-       BT_LOGD("Creating array field object: ft-addr=%p", type);
-       BT_ASSERT(type);
+       struct bt_field_array *array_field = (void *) field;
 
-       if (!array) {
-               BT_LOGE_STR("Failed to allocate one array field.");
-               goto end;
-       }
-
-       ret = bt_field_common_array_initialize(BT_TO_COMMON(array),
-               (void *) type, NULL, &bt_field_array_methods,
-               (bt_field_common_create_func) bt_field_create_recursive,
-               (GDestroyNotify) bt_field_destroy_recursive);
-       if (ret) {
-               BT_PUT(array);
-               goto end;
-       }
+       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];
+}
 
-       BT_LOGD("Created array field object: addr=%p, ft-addr=%p",
-               array, type);
+struct bt_field *bt_field_structure_borrow_member_field_by_index(
+               struct bt_field *field, uint64_t index)
+{
+       struct bt_field_structure *struct_field = (void *) field;
 
-end:
-       return (void *) array;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_STRUCTURE, "Field");
+       BT_ASSERT_PRE_VALID_INDEX(index, struct_field->fields->len);
+       return struct_field->fields->pdata[index];
 }
 
-BT_HIDDEN
-int bt_field_common_sequence_initialize(struct bt_field_common *field,
-               struct bt_field_type_common *type,
-               bt_object_release_func release_func,
-               struct bt_field_common_methods *methods,
-               GDestroyNotify field_destroy_func)
+struct bt_field *bt_field_structure_borrow_member_field_by_name(
+               struct bt_field *field, const char *name)
 {
-       struct bt_field_common_sequence *sequence = BT_FROM_COMMON(field);
-       int ret = 0;
+       struct bt_field *ret_field = NULL;
+       struct bt_field_type_structure *struct_ft;
+       struct bt_field_structure *struct_field = (void *) field;
+       gpointer orig_key;
+       gpointer index;
 
-       BT_LOGD("Initializing common sequence field object: ft-addr=%p", type);
-       BT_ASSERT(type);
-       bt_field_common_initialize(field, type, release_func, methods);
-       sequence->elements = g_ptr_array_new();
-       if (!sequence->elements) {
-               ret = -1;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_NON_NULL(name, "Field name");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_STRUCTURE, "Field");
+       struct_ft = (void *) field->type;
+
+       if (!g_hash_table_lookup_extended(struct_ft->common.name_to_index, name,
+                       &orig_key, &index)) {
                goto end;
        }
 
-       g_ptr_array_set_free_func(sequence->elements, field_destroy_func);
-       BT_LOGD("Initialized common sequence field object: addr=%p, ft-addr=%p",
-               field, type);
+       ret_field = struct_field->fields->pdata[GPOINTER_TO_UINT(index)];
+       BT_ASSERT(ret_field);
 
 end:
-       return ret;
+       return ret_field;
 }
 
-static
-struct bt_field *bt_field_sequence_create(struct bt_field_type *type)
+struct bt_field *bt_field_variant_borrow_selected_option_field(
+               struct bt_field *field)
 {
-       struct bt_field_common_sequence *sequence =
-               g_new0(struct bt_field_common_sequence, 1);
-       int ret;
-
-       BT_LOGD("Creating sequence field object: ft-addr=%p", type);
-       BT_ASSERT(type);
+       struct bt_field_variant *var_field = (void *) field;
 
-       if (!sequence) {
-               BT_LOGE_STR("Failed to allocate one sequence field.");
-               goto end;
-       }
-
-       ret = bt_field_common_sequence_initialize(BT_TO_COMMON(sequence),
-               (void *) type, NULL, &bt_field_sequence_methods,
-               (GDestroyNotify) bt_field_destroy_recursive);
-       if (ret) {
-               BT_PUT(sequence);
-               goto end;
-       }
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_VARIANT, "Field");
+       BT_ASSERT_PRE(var_field->selected_field,
+               "Variant field has no selected field: %!+f", field);
+       return var_field->selected_field;
+}
 
-       BT_LOGD("Created sequence field object: addr=%p, ft-addr=%p",
-               sequence, type);
+int bt_field_variant_select_option_field(struct bt_field *field,
+               uint64_t index)
+{
+       struct bt_field_variant *var_field = (void *) field;
 
-end:
-       return (void *) sequence;
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_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 0;
 }
 
-static
-struct bt_field *bt_field_string_create(struct bt_field_type *type)
+uint64_t bt_field_variant_get_selected_option_field_index(
+               struct bt_field *field)
 {
-       struct bt_field_common_string *string = g_new0(
-               struct bt_field_common_string, 1);
+       struct bt_field_variant *var_field = (void *) field;
 
-       BT_LOGD("Creating string field object: ft-addr=%p", type);
+       BT_ASSERT_PRE_NON_NULL(field, "Field");
+       BT_ASSERT_PRE_FIELD_HAS_TYPE_ID(field,
+               BT_FIELD_TYPE_ID_VARIANT, "Field");
+       BT_ASSERT_PRE(var_field->selected_field,
+               "Variant field has no selected field: %!+f", field);
+       return var_field->selected_index;
+}
 
-       if (string) {
-               bt_field_common_string_initialize(BT_TO_COMMON(string),
-                       (void *) type, NULL, &bt_field_string_methods);
-               BT_LOGD("Created string field object: addr=%p, ft-addr=%p",
-                       string, type);
-       } else {
-               BT_LOGE_STR("Failed to allocate one string field.");
-       }
+static inline
+void bt_field_finalize(struct bt_field *field)
+{
+       BT_ASSERT(field);
+       BT_LOGD_STR("Putting field's type.");
+       bt_put(field->type);
+}
 
-       return (void *) string;
+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);
 }
 
-BT_HIDDEN
-int bt_field_common_generic_validate(struct bt_field_common *field)
+static
+void destroy_real_field(struct bt_field *field)
 {
-       return (field && field->payload_set) ? 0 : -1;
+       BT_ASSERT(field);
+       BT_LIB_LOGD("Destroying real field object: %!+f", field);
+       bt_field_finalize(field);
+       g_free(field);
 }
 
-BT_HIDDEN
-int bt_field_common_structure_validate_recursive(struct bt_field_common *field)
+static
+void destroy_structure_field(struct bt_field *field)
 {
-       int64_t i;
-       int ret = 0;
-       struct bt_field_common_structure *structure = BT_FROM_COMMON(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);
 
-       for (i = 0; i < structure->fields->len; i++) {
-               ret = bt_field_common_validate_recursive(
-                       (void *) structure->fields->pdata[i]);
-
-               if (ret) {
-                       int this_ret;
-                       const char *name;
-
-                       this_ret = bt_field_type_common_structure_borrow_field_by_index(
-                               field->type, &name, NULL, i);
-                       BT_ASSERT(this_ret == 0);
-                       BT_ASSERT_PRE_MSG("Invalid structure field's field: "
-                               "%![struct-field-]+_f, field-name=\"%s\", "
-                               "index=%" PRId64 ", %![field-]+_f",
-                               field, name, i, structure->fields->pdata[i]);
-                       goto end;
-               }
+       if (struct_field->fields) {
+               g_ptr_array_free(struct_field->fields, TRUE);
        }
 
-end:
-       return ret;
+       g_free(field);
 }
 
-BT_HIDDEN
-int bt_field_common_variant_validate_recursive(struct bt_field_common *field)
+static
+void destroy_variant_field(struct bt_field *field)
 {
-       int ret = 0;
-       struct bt_field_common_variant *variant = BT_FROM_COMMON(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 (!variant->current_field) {
-               ret = -1;
-               goto end;
+       if (var_field->fields) {
+               g_ptr_array_free(var_field->fields, TRUE);
        }
 
-       ret = bt_field_common_validate_recursive(variant->current_field);
-
-end:
-       return ret;
+       g_free(field);
 }
 
-BT_HIDDEN
-int bt_field_common_array_validate_recursive(struct bt_field_common *field)
+static
+void destroy_array_field(struct bt_field *field)
 {
-       int64_t i;
-       int ret = 0;
-       struct bt_field_common_array *array = BT_FROM_COMMON(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);
 
-       for (i = 0; i < array->elements->len; i++) {
-               ret = bt_field_common_validate_recursive((void *) array->elements->pdata[i]);
-               if (ret) {
-                       BT_ASSERT_PRE_MSG("Invalid array field's element field: "
-                               "%![array-field-]+_f, " PRId64 ", "
-                               "%![elem-field-]+_f",
-                               field, i, array->elements->pdata[i]);
-                       goto end;
-               }
+       if (array_field->fields) {
+               g_ptr_array_free(array_field->fields, TRUE);
        }
 
-end:
-       return ret;
+       g_free(field);
 }
 
-BT_HIDDEN
-int bt_field_common_sequence_validate_recursive(struct bt_field_common *field)
+static
+void destroy_string_field(struct bt_field *field)
 {
-       size_t i;
-       int ret = 0;
-       struct bt_field_common_sequence *sequence = BT_FROM_COMMON(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);
 
-       for (i = 0; i < sequence->elements->len; i++) {
-               ret = bt_field_common_validate_recursive(
-                       (void *) sequence->elements->pdata[i]);
-               if (ret) {
-                       BT_ASSERT_PRE_MSG("Invalid sequence field's element field: "
-                               "%![seq-field-]+_f, " PRId64 ", "
-                               "%![elem-field-]+_f",
-                               field, i, sequence->elements->pdata[i]);
-                       goto end;
-               }
+       if (string_field->buf) {
+               g_array_free(string_field->buf, TRUE);
        }
-end:
-       return ret;
+
+       g_free(field);
 }
 
 BT_HIDDEN
-void bt_field_common_generic_reset(struct bt_field_common *field)
+void bt_field_destroy(struct bt_field *field)
 {
        BT_ASSERT(field);
-       field->payload_set = false;
+       BT_ASSERT(bt_field_type_has_known_id(field->type));
+       field_destroy_funcs[field->type->id](field);
 }
 
-BT_HIDDEN
-void bt_field_common_structure_reset_recursive(struct bt_field_common *field)
+static
+void reset_single_field(struct bt_field *field)
 {
-       int64_t i;
-       struct bt_field_common_structure *structure = BT_FROM_COMMON(field);
-
        BT_ASSERT(field);
-
-       for (i = 0; i < structure->fields->len; i++) {
-               struct bt_field_common *member = structure->fields->pdata[i];
-
-               if (!member) {
-                       /*
-                        * Structure members are lazily initialized;
-                        * skip if this member has not been allocated
-                        * yet.
-                        */
-                       continue;
-               }
-
-               bt_field_common_reset_recursive(member);
-       }
+       field->is_set = false;
 }
 
-BT_HIDDEN
-void bt_field_common_variant_reset_recursive(struct bt_field_common *field)
+static
+void reset_structure_field(struct bt_field *field)
 {
-       struct bt_field_common_variant *variant = BT_FROM_COMMON(field);
+       uint64_t i;
+       struct bt_field_structure *struct_field = (void *) field;
 
        BT_ASSERT(field);
-       variant->current_field = NULL;
+
+       for (i = 0; i < struct_field->fields->len; i++) {
+               bt_field_reset(struct_field->fields->pdata[i]);
+       }
 }
 
-BT_HIDDEN
-void bt_field_common_array_reset_recursive(struct bt_field_common *field)
+static
+void reset_variant_field(struct bt_field *field)
 {
-       size_t i;
-       struct bt_field_common_array *array = BT_FROM_COMMON(field);
+       uint64_t i;
+       struct bt_field_variant *var_field = (void *) field;
 
        BT_ASSERT(field);
 
-       for (i = 0; i < array->elements->len; i++) {
-               struct bt_field_common *member = array->elements->pdata[i];
-
-               if (!member) {
-                       /*
-                        * Array elements are lazily initialized; skip
-                        * if this member has not been allocated yet.
-                        */
-                       continue;
-               }
-
-               bt_field_common_reset_recursive(member);
+       for (i = 0; i < var_field->fields->len; i++) {
+               bt_field_reset(var_field->fields->pdata[i]);
        }
 }
 
-BT_HIDDEN
-void bt_field_common_sequence_reset_recursive(struct bt_field_common *field)
+static
+void reset_array_field(struct bt_field *field)
 {
-       struct bt_field_common_sequence *sequence = BT_FROM_COMMON(field);
        uint64_t i;
+       struct bt_field_array *array_field = (void *) field;
 
        BT_ASSERT(field);
 
-       for (i = 0; i < sequence->elements->len; i++) {
-               if (sequence->elements->pdata[i]) {
-                       bt_field_common_reset_recursive(
-                               sequence->elements->pdata[i]);
-               }
+       for (i = 0; i < array_field->fields->len; i++) {
+               bt_field_reset(array_field->fields->pdata[i]);
        }
-
-       sequence->length = 0;
 }
 
-BT_HIDDEN
-void bt_field_common_generic_set_is_frozen(struct bt_field_common *field,
-               bool is_frozen)
+static
+void set_single_field_is_frozen(struct bt_field *field, bool is_frozen)
 {
        field->frozen = is_frozen;
 }
 
-BT_HIDDEN
-void bt_field_common_structure_set_is_frozen_recursive(
-               struct bt_field_common *field, bool is_frozen)
+static
+void set_structure_field_is_frozen(struct bt_field *field, bool is_frozen)
 {
        uint64_t i;
-       struct bt_field_common_structure *structure_field =
-               BT_FROM_COMMON(field);
+       struct bt_field_structure *struct_field = (void *) field;
 
-       BT_LOGD("Freezing structure field object: addr=%p", field);
+       BT_LIB_LOGD("Setting structure field's frozen state: "
+               "%![field-]+f, is-frozen=%d", field, is_frozen);
 
-       for (i = 0; i < structure_field->fields->len; i++) {
-               struct bt_field_common *struct_field =
-                       g_ptr_array_index(structure_field->fields, i);
+       for (i = 0; i < struct_field->fields->len; i++) {
+               struct bt_field *member_field = struct_field->fields->pdata[i];
 
-               BT_LOGD("Freezing structure field's field: field-addr=%p, index=%" PRId64,
-                       struct_field, i);
-               bt_field_common_set_is_frozen_recursive(struct_field,
-                       is_frozen);
+               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);
        }
 
-       bt_field_common_generic_set_is_frozen(field, is_frozen);
+       set_single_field_is_frozen(field, is_frozen);
 }
 
-BT_HIDDEN
-void bt_field_common_variant_set_is_frozen_recursive(
-               struct bt_field_common *field, bool is_frozen)
+static
+void set_variant_field_is_frozen(struct bt_field *field, bool is_frozen)
 {
        uint64_t i;
-       struct bt_field_common_variant *variant_field = BT_FROM_COMMON(field);
-
-       BT_LOGD("Freezing variant field object: addr=%p", field);
-
-       for (i = 0; i < variant_field->fields->len; i++) {
-               struct bt_field_common *var_field =
-                       g_ptr_array_index(variant_field->fields, i);
-
-               BT_LOGD("Freezing variant field's field: field-addr=%p, index=%" PRId64,
-                       var_field, i);
-               bt_field_common_set_is_frozen_recursive(var_field, is_frozen);
-       }
-
-       bt_field_common_generic_set_is_frozen(field, is_frozen);
-}
+       struct bt_field_variant *var_field = (void *) field;
 
-BT_HIDDEN
-void bt_field_common_array_set_is_frozen_recursive(
-               struct bt_field_common *field, bool is_frozen)
-{
-       int64_t i;
-       struct bt_field_common_array *array_field = BT_FROM_COMMON(field);
+       BT_LIB_LOGD("Setting variant field's frozen state: "
+               "%![field-]+f, is-frozen=%d", field, is_frozen);
 
-       BT_LOGD("Freezing array field object: addr=%p", field);
+       for (i = 0; i < var_field->fields->len; i++) {
+               struct bt_field *option_field = var_field->fields->pdata[i];
 
-       for (i = 0; i < array_field->elements->len; i++) {
-               struct bt_field_common *elem_field =
-                       g_ptr_array_index(array_field->elements, i);
-
-               BT_LOGD("Freezing array field object's element field: "
-                       "element-field-addr=%p, index=%" PRId64,
-                       elem_field, i);
-               bt_field_common_set_is_frozen_recursive(elem_field, is_frozen);
+               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);
        }
 
-       bt_field_common_generic_set_is_frozen(field, is_frozen);
+       set_single_field_is_frozen(field, is_frozen);
 }
 
-BT_HIDDEN
-void bt_field_common_sequence_set_is_frozen_recursive(
-               struct bt_field_common *field, bool is_frozen)
+static
+void set_array_field_is_frozen(struct bt_field *field, bool is_frozen)
 {
-       int64_t i;
-       struct bt_field_common_sequence *sequence_field =
-               BT_FROM_COMMON(field);
+       uint64_t i;
+       struct bt_field_array *array_field = (void *) field;
 
-       BT_LOGD("Freezing sequence field object: addr=%p", field);
+       BT_LIB_LOGD("Setting array field's frozen state: "
+               "%![field-]+f, is-frozen=%d", field, is_frozen);
 
-       for (i = 0; i < sequence_field->length; i++) {
-               struct bt_field_common *elem_field =
-                       g_ptr_array_index(sequence_field->elements, i);
+       for (i = 0; i < array_field->fields->len; i++) {
+               struct bt_field *elem_field = array_field->fields->pdata[i];
 
-               BT_LOGD("Freezing sequence field object's element field: "
-                       "element-field-addr=%p, index=%" PRId64,
+               BT_LIB_LOGD("Setting array field's element field's "
+                       "frozen state: %![field-]+f, index=%" PRIu64,
                        elem_field, i);
-               bt_field_common_set_is_frozen_recursive(elem_field, is_frozen);
+               bt_field_set_is_frozen(elem_field, is_frozen);
        }
 
-       bt_field_common_generic_set_is_frozen(field, is_frozen);
+       set_single_field_is_frozen(field, is_frozen);
 }
 
 BT_HIDDEN
-void _bt_field_common_set_is_frozen_recursive(struct bt_field_common *field,
+void _bt_field_set_is_frozen(struct bt_field *field,
                bool is_frozen)
 {
-       if (!field) {
-               goto end;
-       }
-
-       if (field->frozen) {
-               goto end;
-       }
-
-       BT_LOGD("Setting field object's frozen state: addr=%p, is-frozen=%d",
+       BT_ASSERT(field);
+       BT_LIB_LOGD("Setting field object's frozen state: %!+f, is-frozen=%d",
                field, is_frozen);
-       BT_ASSERT(field_type_common_has_known_id(field->type));
        BT_ASSERT(field->methods->set_is_frozen);
        field->methods->set_is_frozen(field, is_frozen);
-
-end:
-       return;
 }
 
-BT_HIDDEN
-bt_bool bt_field_common_generic_is_set(struct bt_field_common *field)
+static
+bool single_field_is_set(struct bt_field *field)
 {
-       return field && field->payload_set;
+       BT_ASSERT(field);
+       return field->is_set;
 }
 
-BT_HIDDEN
-bt_bool bt_field_common_structure_is_set_recursive(
-               struct bt_field_common *field)
+static
+bool structure_field_is_set(struct bt_field *field)
 {
-       bt_bool is_set = BT_FALSE;
-       size_t i;
-       struct bt_field_common_structure *structure = BT_FROM_COMMON(field);
+       bool is_set = true;
+       uint64_t i;
+       struct bt_field_structure *struct_field = (void *) field;
 
        BT_ASSERT(field);
 
-       for (i = 0; i < structure->fields->len; i++) {
-               is_set = bt_field_common_is_set_recursive(
-                       structure->fields->pdata[i]);
+       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;
                }
@@ -1294,58 +1068,32 @@ end:
        return is_set;
 }
 
-BT_HIDDEN
-bt_bool bt_field_common_variant_is_set_recursive(struct bt_field_common *field)
-{
-       struct bt_field_common_variant *variant = BT_FROM_COMMON(field);
-       bt_bool is_set = BT_FALSE;
-
-       BT_ASSERT(field);
-
-       if (variant->current_field) {
-               is_set = bt_field_common_is_set_recursive(
-                       variant->current_field);
-       }
-
-       return is_set;
-}
-
-BT_HIDDEN
-bt_bool bt_field_common_array_is_set_recursive(struct bt_field_common *field)
+static
+bool variant_field_is_set(struct bt_field *field)
 {
-       size_t i;
-       bt_bool is_set = BT_FALSE;
-       struct bt_field_common_array *array = BT_FROM_COMMON(field);
+       struct bt_field_variant *var_field = (void *) field;
+       bool is_set = false;
 
        BT_ASSERT(field);
 
-       for (i = 0; i < array->elements->len; i++) {
-               is_set = bt_field_common_is_set_recursive(array->elements->pdata[i]);
-               if (!is_set) {
-                       goto end;
-               }
+       if (var_field->selected_field) {
+               is_set = bt_field_is_set(var_field->selected_field);
        }
 
-end:
        return is_set;
 }
 
-BT_HIDDEN
-bt_bool bt_field_common_sequence_is_set_recursive(struct bt_field_common *field)
+static
+bool array_field_is_set(struct bt_field *field)
 {
-       size_t i;
-       bt_bool is_set = BT_FALSE;
-       struct bt_field_common_sequence *sequence = BT_FROM_COMMON(field);
+       bool is_set = true;
+       uint64_t i;
+       struct bt_field_array *array_field = (void *) field;
 
        BT_ASSERT(field);
 
-       if (!sequence->elements) {
-               goto end;
-       }
-
-       for (i = 0; i < sequence->elements->len; i++) {
-               is_set = bt_field_common_is_set_recursive(
-                       sequence->elements->pdata[i]);
+       for (i = 0; i < array_field->length; i++) {
+               is_set = bt_field_is_set(array_field->fields->pdata[i]);
                if (!is_set) {
                        goto end;
                }
This page took 0.048465 seconds and 4 git commands to generate.