X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=lib%2Fctf-ir%2Fevent-class.c;h=b8824082c7c62eaadec7fc0ec2c08dd4837f5b9f;hb=7b33a0e0d8f23d90285ea7c7820a725bcbd96c6b;hp=6764d43855e8c18d1d5c97d13de6592b1ac44646;hpb=1487a16a42ca7be6b85ef210644d9ac398d7c0dd;p=babeltrace.git diff --git a/lib/ctf-ir/event-class.c b/lib/ctf-ir/event-class.c index 6764d438..b8824082 100644 --- a/lib/ctf-ir/event-class.c +++ b/lib/ctf-ir/event-class.c @@ -26,650 +26,352 @@ * SOFTWARE. */ +#define BT_LOG_TAG "EVENT-CLASS" +#include + +#include +#include #include +#include #include #include #include +#include #include #include #include -#include -#include +#include +#include #include #include -#include -#include +#include +#include +#include +#include +#include #include +#include -static -void bt_ctf_event_class_destroy(struct bt_object *obj); +#define BT_ASSERT_PRE_EVENT_CLASS_HOT(_ec) \ + BT_ASSERT_PRE_HOT((_ec), "Event class", ": %!+E", (_ec)) -struct bt_ctf_event_class *bt_ctf_event_class_create(const char *name) +static +void destroy_event_class(struct bt_object *obj) { - int ret; - struct bt_value *obj = NULL; - struct bt_ctf_event_class *event_class = NULL; - - if (bt_ctf_validate_identifier(name)) { - goto error; - } - - event_class = g_new0(struct bt_ctf_event_class, 1); - if (!event_class) { - goto error; - } + struct bt_event_class *event_class = (void *) obj; - event_class->id = -1; - bt_object_init(event_class, bt_ctf_event_class_destroy); - event_class->fields = bt_ctf_field_type_structure_create(); - if (!event_class->fields) { - goto error; - } + BT_LIB_LOGD("Destroying event class: %!+E", event_class); - event_class->attributes = bt_ctf_attributes_create(); - if (!event_class->attributes) { - goto error; + if (event_class->name.str) { + g_string_free(event_class->name.str, TRUE); } - obj = bt_value_integer_create_init(-1); - if (!obj) { - goto error; + if (event_class->emf_uri.str) { + g_string_free(event_class->emf_uri.str, TRUE); } - ret = bt_ctf_attributes_set_field_value(event_class->attributes, - "id", obj); - if (ret) { - goto error; - } - - BT_PUT(obj); - - obj = bt_value_string_create_init(name); - if (!obj) { - goto error; - } - - ret = bt_ctf_attributes_set_field_value(event_class->attributes, - "name", obj); - if (ret) { - goto error; - } - - BT_PUT(obj); - - return event_class; - -error: - BT_PUT(event_class); - BT_PUT(obj); - return event_class; + BT_LOGD_STR("Putting context field type."); + bt_put(event_class->specific_context_ft); + BT_LOGD_STR("Putting payload field type."); + bt_put(event_class->payload_ft); + bt_object_pool_finalize(&event_class->event_pool); + g_free(obj); } -const char *bt_ctf_event_class_get_name(struct bt_ctf_event_class *event_class) +static +void free_event(struct bt_event *event, + struct bt_event_class *event_class) { - struct bt_value *obj = NULL; - const char *name = NULL; - - if (!event_class) { - goto end; - } - - if (event_class->name) { - name = event_class->name; - goto end; - } - - obj = bt_ctf_attributes_get_field_value(event_class->attributes, - BT_CTF_EVENT_CLASS_ATTR_NAME_INDEX); - if (!obj) { - goto end; - } - - if (bt_value_string_get(obj, &name)) { - name = NULL; - } - -end: - BT_PUT(obj); - return name; + bt_event_destroy(event); } -int64_t bt_ctf_event_class_get_id(struct bt_ctf_event_class *event_class) +BT_ASSERT_PRE_FUNC +static +bool event_class_id_is_unique(struct bt_stream_class *stream_class, uint64_t id) { - struct bt_value *obj = NULL; - int64_t ret = 0; + uint64_t i; + bool is_unique = true; - if (!event_class) { - ret = -1; - goto end; - } + for (i = 0; i < stream_class->event_classes->len; i++) { + struct bt_event_class *ec = + stream_class->event_classes->pdata[i]; - if (event_class->id >= 0) { - ret = event_class->id; - goto end; - } - - obj = bt_ctf_attributes_get_field_value(event_class->attributes, - BT_CTF_EVENT_CLASS_ATTR_ID_INDEX); - if (!obj) { - goto end; - } - - if (bt_value_integer_get(obj, &ret)) { - ret = -1; - } - - if (ret < 0) { - /* means ID is not set */ - ret = -1; - goto end; + if (ec->id == id) { + is_unique = false; + goto end; + } } end: - BT_PUT(obj); - return ret; + return is_unique; } -int bt_ctf_event_class_set_id(struct bt_ctf_event_class *event_class, - uint32_t id) +static +struct bt_event_class *create_event_class_with_id( + struct bt_stream_class *stream_class, uint64_t id) { - int ret = 0; - struct bt_value *obj = NULL; - struct bt_ctf_stream_class *stream_class = NULL; - - + int ret; + struct bt_event_class *event_class; + + BT_ASSERT(stream_class); + BT_ASSERT_PRE(event_class_id_is_unique(stream_class, id), + "Duplicate event class ID: %![sc-]+S, id=%" PRIu64, + stream_class, id); + BT_LIB_LOGD("Creating event class object: %![sc-]+S, id=%" PRIu64, + stream_class, id); + event_class = g_new0(struct bt_event_class, 1); if (!event_class) { - ret = -1; - goto end; - } - - stream_class = bt_ctf_event_class_get_stream_class(event_class); - if (stream_class) { - /* - * We don't allow changing the id if the event class has already - * been added to a stream class. - */ - ret = -1; - goto end; - } - - obj = bt_ctf_attributes_get_field_value(event_class->attributes, - BT_CTF_EVENT_CLASS_ATTR_ID_INDEX); - if (!obj) { - goto end; + BT_LOGE_STR("Failed to allocate one event class."); + goto error; } - if (bt_value_integer_set(obj, id)) { + bt_object_init_shared_with_parent(&event_class->base, + destroy_event_class); + event_class->id = id; + bt_property_uint_init(&event_class->log_level, + BT_PROPERTY_AVAILABILITY_NOT_AVAILABLE, 0); + event_class->name.str = g_string_new(NULL); + if (!event_class->name.str) { + BT_LOGE_STR("Failed to allocate a GString."); ret = -1; goto end; } -end: - BT_PUT(obj); - BT_PUT(stream_class); - return ret; -} - -int bt_ctf_event_class_set_attribute( - struct bt_ctf_event_class *event_class, const char *name, - struct bt_value *value) -{ - int ret = 0; - - if (!event_class || !name || !value || event_class->frozen) { + event_class->emf_uri.str = g_string_new(NULL); + if (!event_class->emf_uri.str) { + BT_LOGE_STR("Failed to allocate a GString."); ret = -1; goto end; } - if (!strcmp(name, "id") || !strcmp(name, "loglevel") || - !strcmp(name, "stream_id")) { - if (!bt_value_is_integer(value)) { - ret = -1; - goto end; - } - } else if (!strcmp(name, "name") || !strcmp(name, "model.emf.uri") || - !strcmp(name, "loglevel_string")) { - if (!bt_value_is_string(value)) { - ret = -1; - goto end; - } - } else { - /* unknown attribute */ - ret = -1; - goto end; + ret = bt_object_pool_initialize(&event_class->event_pool, + (bt_object_pool_new_object_func) bt_event_new, + (bt_object_pool_destroy_object_func) free_event, + event_class); + if (ret) { + BT_LOGE("Failed to initialize event pool: ret=%d", + ret); + goto error; } - /* "id" special case: >= 0 */ - if (!strcmp(name, "id")) { - int64_t val; - - ret = bt_value_integer_get(value, &val); + bt_object_set_parent(&event_class->base, &stream_class->base); + g_ptr_array_add(stream_class->event_classes, event_class); + bt_stream_class_freeze(stream_class); + BT_LIB_LOGD("Created event class object: %!+E", event_class); + goto end; - if (ret) { - goto end; - } - - if (val < 0) { - ret = -1; - goto end; - } - } - - ret = bt_ctf_attributes_set_field_value(event_class->attributes, - name, value); +error: + BT_PUT(event_class); end: - return ret; + return event_class; } -int bt_ctf_event_class_get_attribute_count( - struct bt_ctf_event_class *event_class) +struct bt_event_class *bt_event_class_create( + struct bt_stream_class *stream_class) { - int ret = 0; - - if (!event_class) { - ret = -1; - goto end; - } - - ret = bt_ctf_attributes_get_count(event_class->attributes); - -end: - return ret; + BT_ASSERT_PRE_NON_NULL(stream_class, "Stream class"); + BT_ASSERT_PRE(stream_class->assigns_automatic_event_class_id, + "Stream class does not automatically assigns event class IDs: " + "%![sc-]+S", stream_class); + return create_event_class_with_id(stream_class, + (uint64_t) stream_class->event_classes->len); } -const char * -bt_ctf_event_class_get_attribute_name( - struct bt_ctf_event_class *event_class, int index) +struct bt_event_class *bt_event_class_create_with_id( + struct bt_stream_class *stream_class, uint64_t id) { - const char *ret; - - if (!event_class) { - ret = NULL; - goto end; - } - - ret = bt_ctf_attributes_get_field_name(event_class->attributes, index); - -end: - return ret; + BT_ASSERT_PRE(!stream_class->assigns_automatic_event_class_id, + "Stream class automatically assigns event class IDs: " + "%![sc-]+S", stream_class); + return create_event_class_with_id(stream_class, id); } -struct bt_value * -bt_ctf_event_class_get_attribute_value(struct bt_ctf_event_class *event_class, - int index) +const char *bt_event_class_get_name(struct bt_event_class *event_class) { - struct bt_value *ret; - - if (!event_class) { - ret = NULL; - goto end; - } - - ret = bt_ctf_attributes_get_field_value(event_class->attributes, index); - -end: - return ret; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return event_class->name.value; } -struct bt_value * -bt_ctf_event_class_get_attribute_value_by_name( - struct bt_ctf_event_class *event_class, const char *name) -{ - struct bt_value *ret; - - if (!event_class || !name) { - ret = NULL; - goto end; - } - - ret = bt_ctf_attributes_get_field_value_by_name(event_class->attributes, - name); - -end: - return ret; - -} - -struct bt_ctf_stream_class *bt_ctf_event_class_get_stream_class( - struct bt_ctf_event_class *event_class) +int bt_event_class_set_name(struct bt_event_class *event_class, + const char *name) { - return event_class ? - bt_get(bt_ctf_event_class_borrow_stream_class(event_class)) : - NULL; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_NON_NULL(name, "Name"); + BT_ASSERT_PRE_EVENT_CLASS_HOT(event_class); + g_string_assign(event_class->name.str, name); + event_class->name.value = event_class->name.str->str; + BT_LIB_LOGV("Set event class's name: %!+E", event_class); + return 0; } -struct bt_ctf_field_type *bt_ctf_event_class_get_payload_type( - struct bt_ctf_event_class *event_class) +uint64_t bt_event_class_get_id(struct bt_event_class *event_class) { - struct bt_ctf_field_type *payload = NULL; - - if (!event_class) { - goto end; - } - - bt_get(event_class->fields); - payload = event_class->fields; -end: - return payload; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return event_class->id; } -int bt_ctf_event_class_set_payload_type(struct bt_ctf_event_class *event_class, - struct bt_ctf_field_type *payload) +enum bt_property_availability bt_event_class_get_log_level( + struct bt_event_class *event_class, + enum bt_event_class_log_level *log_level) { - int ret = 0; - - if (!event_class) { - ret = -1; - goto end; - } - - if (payload && bt_ctf_field_type_get_type_id(payload) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - ret = -1; - goto end; - } - - bt_put(event_class->fields); - event_class->fields = bt_get(payload); -end: - return ret; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_NON_NULL(log_level, "Log level (output)"); + *log_level = (enum bt_event_class_log_level) + event_class->log_level.value; + return event_class->log_level.base.avail; } -int bt_ctf_event_class_add_field(struct bt_ctf_event_class *event_class, - struct bt_ctf_field_type *type, - const char *name) +int bt_event_class_set_log_level(struct bt_event_class *event_class, + enum bt_event_class_log_level log_level) { - int ret = 0; - - if (!event_class || !type || bt_ctf_validate_identifier(name) || - event_class->frozen) { - ret = -1; - goto end; - } - - if (bt_ctf_field_type_get_type_id(event_class->fields) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - ret = -1; - goto end; - } - - ret = bt_ctf_field_type_structure_add_field(event_class->fields, - type, name); -end: - return ret; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_EVENT_CLASS_HOT(event_class); + bt_property_uint_set(&event_class->log_level, + (uint64_t) log_level); + BT_LIB_LOGV("Set event class's log level: %!+E", event_class); + return 0; } -int bt_ctf_event_class_get_field_count( - struct bt_ctf_event_class *event_class) +const char *bt_event_class_get_emf_uri(struct bt_event_class *event_class) { - int ret; - - if (!event_class) { - ret = -1; - goto end; - } - - if (bt_ctf_field_type_get_type_id(event_class->fields) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - ret = -1; - goto end; - } - - ret = bt_ctf_field_type_structure_get_field_count(event_class->fields); -end: - return ret; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return event_class->emf_uri.value; } -int bt_ctf_event_class_get_field(struct bt_ctf_event_class *event_class, - const char **field_name, struct bt_ctf_field_type **field_type, - int index) +int bt_event_class_set_emf_uri(struct bt_event_class *event_class, + const char *emf_uri) { - int ret; - - if (!event_class || index < 0) { - ret = -1; - goto end; - } - - if (bt_ctf_field_type_get_type_id(event_class->fields) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - ret = -1; - goto end; - } - - ret = bt_ctf_field_type_structure_get_field(event_class->fields, - field_name, field_type, index); -end: - return ret; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_NON_NULL(emf_uri, "EMF URI"); + BT_ASSERT_PRE_EVENT_CLASS_HOT(event_class); + g_string_assign(event_class->emf_uri.str, emf_uri); + event_class->emf_uri.value = event_class->emf_uri.str->str; + BT_LIB_LOGV("Set event class's EMF URI: %!+E", event_class); + return 0; } -struct bt_ctf_field_type *bt_ctf_event_class_get_field_by_name( - struct bt_ctf_event_class *event_class, const char *name) +struct bt_stream_class *bt_event_class_borrow_stream_class( + struct bt_event_class *event_class) { - GQuark name_quark; - struct bt_ctf_field_type *field_type = NULL; - - if (!event_class || !name) { - goto end; - } - - if (bt_ctf_field_type_get_type_id(event_class->fields) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - goto end; - } - - name_quark = g_quark_try_string(name); - if (!name_quark) { - goto end; - } - - /* - * No need to increment field_type's reference count since getting it - * from the structure already does. - */ - field_type = bt_ctf_field_type_structure_get_field_type_by_name( - event_class->fields, name); -end: - return field_type; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return bt_event_class_borrow_stream_class_inline(event_class); } -struct bt_ctf_field_type *bt_ctf_event_class_get_context_type( - struct bt_ctf_event_class *event_class) +struct bt_field_type *bt_event_class_borrow_specific_context_field_type( + struct bt_event_class *event_class) { - struct bt_ctf_field_type *context_type = NULL; - - if (!event_class || !event_class->context) { - goto end; - } - - bt_get(event_class->context); - context_type = event_class->context; -end: - return context_type; + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return event_class->specific_context_ft; } -int bt_ctf_event_class_set_context_type( - struct bt_ctf_event_class *event_class, - struct bt_ctf_field_type *context) +int bt_event_class_set_specific_context_field_type( + struct bt_event_class *event_class, + struct bt_field_type *field_type) { - int ret = 0; - - if (!event_class || event_class->frozen) { - ret = -1; + int ret; + struct bt_stream_class *stream_class; + struct bt_trace *trace; + struct bt_resolve_field_path_context resolve_ctx = { + .packet_header = NULL, + .packet_context = NULL, + .event_header = NULL, + .event_common_context = NULL, + .event_specific_context = field_type, + .event_payload = NULL, + }; + + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_NON_NULL(field_type, "Field type"); + BT_ASSERT_PRE_EVENT_CLASS_HOT(event_class); + BT_ASSERT_PRE(bt_field_type_get_type_id(field_type) == + BT_FIELD_TYPE_ID_STRUCTURE, + "Specific context field type is not a structure field type: " + "%!+F", field_type); + stream_class = bt_event_class_borrow_stream_class_inline( + event_class); + trace = bt_stream_class_borrow_trace_inline(stream_class); + resolve_ctx.packet_header = trace->packet_header_ft; + resolve_ctx.packet_context = stream_class->packet_context_ft; + resolve_ctx.event_header = stream_class->event_header_ft; + resolve_ctx.event_common_context = + stream_class->event_common_context_ft; + + ret = bt_resolve_field_paths(field_type, &resolve_ctx); + if (ret) { goto end; } - if (context && bt_ctf_field_type_get_type_id(context) != - BT_CTF_FIELD_TYPE_ID_STRUCT) { - ret = -1; - goto end; - } + bt_field_type_make_part_of_trace(field_type); + bt_put(event_class->specific_context_ft); + event_class->specific_context_ft = bt_get(field_type); + bt_field_type_freeze(field_type); + BT_LIB_LOGV("Set event class's specific context field type: %!+E", + event_class); - bt_put(event_class->context); - event_class->context = bt_get(context); end: return ret; - } -void bt_ctf_event_class_get(struct bt_ctf_event_class *event_class) +struct bt_field_type *bt_event_class_borrow_payload_field_type( + struct bt_event_class *event_class) { - bt_get(event_class); + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + return event_class->payload_ft; } -void bt_ctf_event_class_put(struct bt_ctf_event_class *event_class) +int bt_event_class_set_payload_field_type(struct bt_event_class *event_class, + struct bt_field_type *field_type) { - bt_put(event_class); -} - -BT_HIDDEN -int bt_ctf_event_class_set_stream_id(struct bt_ctf_event_class *event_class, - uint32_t stream_id) -{ - int ret = 0; - struct bt_value *obj; - - obj = bt_value_integer_create_init(stream_id); - - if (!obj) { - ret = -1; + int ret; + struct bt_stream_class *stream_class; + struct bt_trace *trace; + struct bt_resolve_field_path_context resolve_ctx = { + .packet_header = NULL, + .packet_context = NULL, + .event_header = NULL, + .event_common_context = NULL, + .event_specific_context = NULL, + .event_payload = field_type, + }; + + BT_ASSERT_PRE_NON_NULL(event_class, "Event class"); + BT_ASSERT_PRE_NON_NULL(field_type, "Field type"); + BT_ASSERT_PRE_EVENT_CLASS_HOT(event_class); + BT_ASSERT_PRE(bt_field_type_get_type_id(field_type) == + BT_FIELD_TYPE_ID_STRUCTURE, + "Payload field type is not a structure field type: %!+F", + field_type); + stream_class = bt_event_class_borrow_stream_class_inline( + event_class); + trace = bt_stream_class_borrow_trace_inline(stream_class); + resolve_ctx.packet_header = trace->packet_header_ft; + resolve_ctx.packet_context = stream_class->packet_context_ft; + resolve_ctx.event_header = stream_class->event_header_ft; + resolve_ctx.event_common_context = + stream_class->event_common_context_ft; + resolve_ctx.event_specific_context = event_class->specific_context_ft; + + ret = bt_resolve_field_paths(field_type, &resolve_ctx); + if (ret) { goto end; } - ret = bt_ctf_attributes_set_field_value(event_class->attributes, - "stream_id", obj); - - if (event_class->frozen) { - bt_ctf_attributes_freeze(event_class->attributes); - } + bt_field_type_make_part_of_trace(field_type); + bt_put(event_class->payload_ft); + event_class->payload_ft = bt_get(field_type); + bt_field_type_freeze(field_type); + BT_LIB_LOGV("Set event class's payload field type: %!+E", event_class); end: - BT_PUT(obj); return ret; } -static -void bt_ctf_event_class_destroy(struct bt_object *obj) -{ - struct bt_ctf_event_class *event_class; - - event_class = container_of(obj, struct bt_ctf_event_class, base); - bt_ctf_attributes_destroy(event_class->attributes); - bt_put(event_class->context); - bt_put(event_class->fields); - g_free(event_class); -} - -BT_HIDDEN -void bt_ctf_event_class_freeze(struct bt_ctf_event_class *event_class) -{ - assert(event_class); - event_class->frozen = 1; - event_class->name = bt_ctf_event_class_get_name(event_class); - event_class->id = bt_ctf_event_class_get_id(event_class); - bt_ctf_field_type_freeze(event_class->context); - bt_ctf_field_type_freeze(event_class->fields); - bt_ctf_attributes_freeze(event_class->attributes); -} - BT_HIDDEN -int bt_ctf_event_class_serialize(struct bt_ctf_event_class *event_class, - struct metadata_context *context) +void _bt_event_class_freeze(struct bt_event_class *event_class) { - int i; - int count; - int ret = 0; - struct bt_value *attr_value = NULL; - - assert(event_class); - assert(context); - - context->current_indentation_level = 1; - g_string_assign(context->field_name, ""); - g_string_append(context->string, "event {\n"); - count = bt_ctf_event_class_get_attribute_count(event_class); - - if (count < 0) { - ret = -1; - goto end; - } - - for (i = 0; i < count; ++i) { - const char *attr_name = NULL; - - attr_name = bt_ctf_event_class_get_attribute_name( - event_class, i); - attr_value = bt_ctf_event_class_get_attribute_value( - event_class, i); - - if (!attr_name || !attr_value) { - ret = -1; - goto end; - } - - switch (bt_value_get_type(attr_value)) { - case BT_VALUE_TYPE_INTEGER: - { - int64_t value; - - ret = bt_value_integer_get(attr_value, &value); - - if (ret) { - goto end; - } - - g_string_append_printf(context->string, - "\t%s = %" PRId64 ";\n", attr_name, value); - break; - } - - case BT_VALUE_TYPE_STRING: - { - const char *value; - - ret = bt_value_string_get(attr_value, &value); - - if (ret) { - goto end; - } - - g_string_append_printf(context->string, - "\t%s = \"%s\";\n", attr_name, value); - break; - } - - default: - /* should never happen */ - assert(false); - break; - } - - BT_PUT(attr_value); - } - - if (event_class->context) { - g_string_append(context->string, "\tcontext := "); - ret = bt_ctf_field_type_serialize(event_class->context, - context); - if (ret) { - goto end; - } - g_string_append(context->string, ";\n"); - } - - if (event_class->fields) { - g_string_append(context->string, "\tfields := "); - ret = bt_ctf_field_type_serialize(event_class->fields, context); - if (ret) { - goto end; - } - g_string_append(context->string, ";\n"); - } - - g_string_append(context->string, "};\n\n"); -end: - context->current_indentation_level = 0; - BT_PUT(attr_value); - return ret; + /* The field types are already frozen */ + BT_ASSERT(event_class); + BT_LIB_LOGD("Freezing event class: %!+E", event_class); + event_class->frozen = true; }