--- /dev/null
+/*
+ * Copyright 2013, 2014 Jérémie Galarneau <jeremie.galarneau@efficios.com>
+ *
+ * Author: Jérémie Galarneau <jeremie.galarneau@efficios.com>
+ *
+ * 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 <babeltrace/lib-logging-internal.h>
+
+#include <babeltrace/assert-pre-internal.h>
+#include <babeltrace/trace-ir/field.h>
+#include <babeltrace/trace-ir/field-const.h>
+#include <babeltrace/trace-ir/field-internal.h>
+#include <babeltrace/trace-ir/field-class-internal.h>
+#include <babeltrace/object-internal.h>
+#include <babeltrace/object.h>
+#include <babeltrace/compiler-internal.h>
+#include <babeltrace/compat/fcntl-internal.h>
+#include <babeltrace/align-internal.h>
+#include <babeltrace/assert-internal.h>
+#include <inttypes.h>
+
+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);
+}
+
+int 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 bt_field_class_unsigned_enumeration_get_mapping_labels_by_value(
+ field->class, int_field->value.u, label_array, count);
+}
+
+int 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 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;
+}
+
+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_CLASS_TYPE(field, BT_FIELD_CLASS_TYPE_STRING,
+ "Field");
+ bt_field_string_clear(field);
+ return bt_field_string_append_with_length(field, value,
+ (uint64_t) strlen(value));
+}
+
+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));
+}
+
+int 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 0;
+}
+
+int bt_field_string_clear(struct bt_field *field)
+{
+ struct bt_field_string *string_field = (void *) 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");
+ string_field->length = 0;
+ bt_field_set_single(field, true);
+ return 0;
+}
+
+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;
+}
+
+int bt_field_dynamic_array_set_length(struct bt_field *field, uint64_t length)
+{
+ int ret = 0;
+ 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 = -1;
+ 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);
+}
+
+int 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 0;
+}
+
+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;
+}
projects / babeltrace.git / blobdiff