[lttng-dev] [PATCH babeltrace 2/3] Add CTF Writer implementation
Mathieu Desnoyers
mathieu.desnoyers at efficios.com
Thu Oct 31 09:50:19 EDT 2013
Merged, thanks!!
Mathieu
----- Original Message -----
> From: "Jérémie Galarneau" <jeremie.galarneau at efficios.com>
> To: lttng-dev at lists.lttng.org
> Sent: Wednesday, October 16, 2013 2:35:01 PM
> Subject: [lttng-dev] [PATCH babeltrace 2/3] Add CTF Writer implementation
>
> Signed-off-by: Jérémie Galarneau <jeremie.galarneau at efficios.com>
> Reviewed-by: Christian Babeux <christian.babeux at efficios.com>
> Reviewed-by: Mathieu Desnoyers <mathieu.desnoyers at efficios.com>
> ---
> configure.ac | 4 +
> formats/ctf/Makefile.am | 13 +-
> formats/ctf/writer/Makefile.am | 22 +
> formats/ctf/writer/clock.c | 264 ++++
> formats/ctf/writer/event-fields.c | 1249 +++++++++++++++++
> formats/ctf/writer/event-types.c | 1402
> ++++++++++++++++++++
> formats/ctf/writer/event.c | 368 +++++
> formats/ctf/writer/functor.c | 38 +
> formats/ctf/writer/stream.c | 697 ++++++++++
> formats/ctf/writer/writer.c | 744 +++++++++++
> include/Makefile.am | 12 +-
> include/babeltrace/ctf-writer/clock-internal.h | 65 +
> .../babeltrace/ctf-writer/event-fields-internal.h | 100 ++
> include/babeltrace/ctf-writer/event-internal.h | 90 ++
> .../babeltrace/ctf-writer/event-types-internal.h | 150 +++
> include/babeltrace/ctf-writer/functor-internal.h | 41 +
> include/babeltrace/ctf-writer/ref-internal.h | 61 +
> include/babeltrace/ctf-writer/stream-internal.h | 101 ++
> include/babeltrace/ctf-writer/writer-internal.h | 87 ++
> 19 files changed, 5501 insertions(+), 7 deletions(-)
> create mode 100644 formats/ctf/writer/Makefile.am
> create mode 100644 formats/ctf/writer/clock.c
> create mode 100644 formats/ctf/writer/event-fields.c
> create mode 100644 formats/ctf/writer/event-types.c
> create mode 100644 formats/ctf/writer/event.c
> create mode 100644 formats/ctf/writer/functor.c
> create mode 100644 formats/ctf/writer/stream.c
> create mode 100644 formats/ctf/writer/writer.c
> create mode 100644 include/babeltrace/ctf-writer/clock-internal.h
> create mode 100644 include/babeltrace/ctf-writer/event-fields-internal.h
> create mode 100644 include/babeltrace/ctf-writer/event-internal.h
> create mode 100644 include/babeltrace/ctf-writer/event-types-internal.h
> create mode 100644 include/babeltrace/ctf-writer/functor-internal.h
> create mode 100644 include/babeltrace/ctf-writer/ref-internal.h
> create mode 100644 include/babeltrace/ctf-writer/stream-internal.h
> create mode 100644 include/babeltrace/ctf-writer/writer-internal.h
>
> diff --git a/configure.ac b/configure.ac
> index 58a472d..6ea5ef3 100644
> --- a/configure.ac
> +++ b/configure.ac
> @@ -115,6 +115,9 @@ AC_SUBST(babeltraceincludedir)
> babeltracectfincludedir="${includedir}/babeltrace/ctf"
> AC_SUBST(babeltracectfincludedir)
>
> +babeltracectfwriterincludedir="${includedir}/babeltrace/ctf-writer"
> +AC_SUBST(babeltracectfwriterincludedir)
> +
> AC_CONFIG_FILES([
> Makefile
> types/Makefile
> @@ -127,6 +130,7 @@ AC_CONFIG_FILES([
> formats/ctf-metadata/Makefile
> formats/bt-dummy/Makefile
> formats/ctf/metadata/Makefile
> + formats/ctf/writer/Makefile
> converter/Makefile
> doc/Makefile
> lib/Makefile
> diff --git a/formats/ctf/Makefile.am b/formats/ctf/Makefile.am
> index 6dcc1bb..d79d9ef 100644
> --- a/formats/ctf/Makefile.am
> +++ b/formats/ctf/Makefile.am
> @@ -1,6 +1,6 @@
> AM_CFLAGS = $(PACKAGE_CFLAGS) -I$(top_srcdir)/include
>
> -SUBDIRS = types metadata .
> +SUBDIRS = types metadata writer .
>
> lib_LTLIBRARIES = libbabeltrace-ctf.la
>
> @@ -13,10 +13,11 @@ libbabeltrace_ctf_la_SOURCES = \
>
> # Request that the linker keeps all static libraries objects.
> libbabeltrace_ctf_la_LDFLAGS = \
> - -Wl,--no-as-needed \
> + -Wl,--no-as-needed
> +
> +libbabeltrace_ctf_la_LIBADD = \
> + $(top_builddir)/lib/libbabeltrace.la \
> types/libctf-types.la \
> metadata/libctf-parser.la \
> - metadata/libctf-ast.la
> -
> -libbabeltrace_ctf_la_LIBADD = \
> - $(top_builddir)/lib/libbabeltrace.la
> + metadata/libctf-ast.la \
> + writer/libctf-writer.la
> diff --git a/formats/ctf/writer/Makefile.am b/formats/ctf/writer/Makefile.am
> new file mode 100644
> index 0000000..84ac03d
> --- /dev/null
> +++ b/formats/ctf/writer/Makefile.am
> @@ -0,0 +1,22 @@
> +AM_CFLAGS = $(PACKAGE_CFLAGS) -I$(top_srcdir)/include
> +
> +noinst_LTLIBRARIES = libctf-writer.la
> +
> +libctf_writer_la_SOURCES = \
> + writer.c \
> + clock.c \
> + stream.c \
> + event-types.c \
> + event-fields.c \
> + event.c \
> + functor.c
> +
> +libctf_writer_la_LIBADD = \
> + $(top_builddir)/lib/libbabeltrace.la
> +
> +if BABELTRACE_BUILD_WITH_LIBUUID
> +libctf_writer_la_LIBADD += -luuid
> +endif
> +if BABELTRACE_BUILD_WITH_LIBC_UUID
> +libctf_writer_la_LIBADD += -lc
> +endif
> diff --git a/formats/ctf/writer/clock.c b/formats/ctf/writer/clock.c
> new file mode 100644
> index 0000000..1146e00
> --- /dev/null
> +++ b/formats/ctf/writer/clock.c
> @@ -0,0 +1,264 @@
> +/*
> + * clock.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/clock.h>
> +#include <babeltrace/ctf-writer/clock-internal.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/compiler.h>
> +#include <inttypes.h>
> +
> +static
> +void bt_ctf_clock_destroy(struct bt_ctf_ref *ref);
> +
> +struct bt_ctf_clock *bt_ctf_clock_create(const char *name)
> +{
> + struct bt_ctf_clock *clock = NULL;
> +
> + if (validate_identifier(name)) {
> + goto error;
> + }
> +
> + clock = g_new0(struct bt_ctf_clock, 1);
> + if (!clock) {
> + goto error;
> + }
> +
> + clock->name = g_string_new(name);
> + if (!clock->name) {
> + goto error_destroy;
> + }
> +
> + clock->description = g_string_new(NULL);
> + if (!clock->description) {
> + goto error_destroy;
> + }
> +
> + clock->precision = 1;
> + clock->frequency = 1000000000;
> + uuid_generate(clock->uuid);
> + bt_ctf_ref_init(&clock->ref_count);
> + return clock;
> +error_destroy:
> + bt_ctf_clock_destroy(&clock->ref_count);
> +error:
> + clock = NULL;
> + return clock;
> +}
> +
> +int bt_ctf_clock_set_description(struct bt_ctf_clock *clock, const char
> *desc)
> +{
> + int ret = 0;
> +
> + if (!clock || !desc || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->description = g_string_assign(clock->description, desc);
> + ret = clock->description ? 0 : -1;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_frequency(struct bt_ctf_clock *clock, uint64_t freq)
> +{
> + int ret = 0;
> +
> + if (!clock || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->frequency = freq;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_precision(struct bt_ctf_clock *clock, uint64_t
> precision)
> +{
> + int ret = 0;
> +
> + if (!clock || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->precision = precision;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_offset_s(struct bt_ctf_clock *clock, uint64_t offset_s)
> +{
> + int ret = 0;
> +
> + if (!clock || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->offset_s = offset_s;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_offset(struct bt_ctf_clock *clock, uint64_t offset)
> +{
> + int ret = 0;
> +
> + if (!clock || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->offset = offset;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_is_absolute(struct bt_ctf_clock *clock, int
> is_absolute)
> +{
> + int ret = 0;
> +
> + if (!clock || clock->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->absolute = !!is_absolute;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_clock_set_time(struct bt_ctf_clock *clock, uint64_t time)
> +{
> + int ret = 0;
> +
> + /* Timestamps are strictly monotonic */
> + if (!clock || time < clock->time) {
> + ret = -1;
> + goto end;
> + }
> +
> + clock->time = time;
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_clock_get(struct bt_ctf_clock *clock)
> +{
> + if (!clock) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&clock->ref_count);
> +}
> +
> +void bt_ctf_clock_put(struct bt_ctf_clock *clock)
> +{
> + if (!clock) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&clock->ref_count, bt_ctf_clock_destroy);
> +}
> +
> +BT_HIDDEN
> +void bt_ctf_clock_freeze(struct bt_ctf_clock *clock)
> +{
> + if (!clock) {
> + return;
> + }
> +
> + clock->frozen = 1;
> +}
> +
> +BT_HIDDEN
> +void bt_ctf_clock_serialize(struct bt_ctf_clock *clock,
> + struct metadata_context *context)
> +{
> + unsigned char *uuid;
> +
> + if (!clock || !context) {
> + return;
> + }
> +
> + uuid = clock->uuid;
> + g_string_append(context->string, "clock {\n");
> + g_string_append_printf(context->string, "\tname = %s;\n",
> + clock->name->str);
> + g_string_append_printf(context->string,
> + "\tuuid =
> \"%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x\";\n",
> + uuid[0], uuid[1], uuid[2], uuid[3],
> + uuid[4], uuid[5], uuid[6], uuid[7],
> + uuid[8], uuid[9], uuid[10], uuid[11],
> + uuid[12], uuid[13], uuid[14], uuid[15]);
> + if (clock->description->len) {
> + g_string_append_printf(context->string, "\tdescription = \"%s\";\n",
> + clock->description->str);
> + }
> +
> + g_string_append_printf(context->string, "\tfreq = %" PRIu64 ";\n",
> + clock->frequency);
> + g_string_append_printf(context->string, "\tprecision = %" PRIu64 ";\n",
> + clock->precision);
> + g_string_append_printf(context->string, "\toffset_s = %" PRIu64 ";\n",
> + clock->offset_s);
> + g_string_append_printf(context->string, "\toffset = %" PRIu64 ";\n",
> + clock->offset);
> + g_string_append_printf(context->string, "\tabsolute = %s;\n",
> + clock->absolute ? "TRUE" : "FALSE");
> + g_string_append(context->string, "};\n\n");
> +}
> +
> +BT_HIDDEN
> +uint64_t bt_ctf_clock_get_time(struct bt_ctf_clock *clock)
> +{
> + return clock ? clock->time : 0;
> +}
> +
> +static
> +void bt_ctf_clock_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_clock *clock;
> +
> + if (!ref) {
> + return;
> + }
> +
> + clock = container_of(ref, struct bt_ctf_clock, ref_count);
> + if (clock->name) {
> + g_string_free(clock->name, TRUE);
> + }
> +
> + if (clock->description) {
> + g_string_free(clock->description, TRUE);
> + }
> +
> + g_free(clock);
> +}
> diff --git a/formats/ctf/writer/event-fields.c
> b/formats/ctf/writer/event-fields.c
> new file mode 100644
> index 0000000..aa389fd
> --- /dev/null
> +++ b/formats/ctf/writer/event-fields.c
> @@ -0,0 +1,1249 @@
> +/*
> + * event-fields.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/ctf-writer/event-fields-internal.h>
> +#include <babeltrace/ctf-writer/event-types-internal.h>
> +#include <babeltrace/compiler.h>
> +
> +#define PACKET_LEN_INCREMENT (getpagesize() * 8 * CHAR_BIT)
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_integer_create(struct bt_ctf_field_type
> *);
> +static
> +struct bt_ctf_field *bt_ctf_field_enumeration_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_floating_point_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_structure_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_variant_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_array_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_sequence_create(
> + struct bt_ctf_field_type *);
> +static
> +struct bt_ctf_field *bt_ctf_field_string_create(struct bt_ctf_field_type *);
> +
> +static
> +void bt_ctf_field_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_integer_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_enumeration_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_floating_point_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_structure_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_variant_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_array_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_sequence_destroy(struct bt_ctf_field *);
> +static
> +void bt_ctf_field_string_destroy(struct bt_ctf_field *);
> +
> +static
> +int bt_ctf_field_generic_validate(struct bt_ctf_field *field);
> +static
> +int bt_ctf_field_structure_validate(struct bt_ctf_field *field);
> +static
> +int bt_ctf_field_variant_validate(struct bt_ctf_field *field);
> +static
> +int bt_ctf_field_enumeration_validate(struct bt_ctf_field *field);
> +static
> +int bt_ctf_field_array_validate(struct bt_ctf_field *field);
> +static
> +int bt_ctf_field_sequence_validate(struct bt_ctf_field *field);
> +
> +static
> +int bt_ctf_field_integer_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_enumeration_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_floating_point_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_structure_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_variant_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_array_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_sequence_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +static
> +int bt_ctf_field_string_serialize(struct bt_ctf_field *,
> + struct ctf_stream_pos *);
> +
> +static
> +int increase_packet_size(struct ctf_stream_pos *pos);
> +
> +static
> +struct bt_ctf_field *(*field_create_funcs[])(
> + struct bt_ctf_field_type *) = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_integer_create,
> + [CTF_TYPE_ENUM] = bt_ctf_field_enumeration_create,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_floating_point_create,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_structure_create,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_variant_create,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_array_create,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_sequence_create,
> + [CTF_TYPE_STRING] = bt_ctf_field_string_create,
> +};
> +
> +static
> +void (*field_destroy_funcs[])(struct bt_ctf_field *) = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_integer_destroy,
> + [CTF_TYPE_ENUM] = bt_ctf_field_enumeration_destroy,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_floating_point_destroy,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_structure_destroy,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_variant_destroy,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_array_destroy,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_sequence_destroy,
> + [CTF_TYPE_STRING] = bt_ctf_field_string_destroy,
> +};
> +
> +static
> +int (*field_validate_funcs[])(struct bt_ctf_field *) = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_generic_validate,
> + [CTF_TYPE_ENUM] = bt_ctf_field_enumeration_validate,
> + [CTF_TYPE_FLOAT] = bt_ctf_field_generic_validate,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_structure_validate,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_variant_validate,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_array_validate,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_sequence_validate,
> + [CTF_TYPE_STRING] = bt_ctf_field_generic_validate,
> +};
> +
> +static
> +int (*field_serialize_funcs[])(struct bt_ctf_field *,
> + struct ctf_stream_pos *) = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_integer_serialize,
> + [CTF_TYPE_ENUM] = bt_ctf_field_enumeration_serialize,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_floating_point_serialize,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_structure_serialize,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_variant_serialize,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_array_serialize,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_sequence_serialize,
> + [CTF_TYPE_STRING] = bt_ctf_field_string_serialize,
> +};
> +
> +struct bt_ctf_field *bt_ctf_field_create(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field *field = NULL;
> + enum ctf_type_id type_id;
> +
> + if (!type) {
> + goto error;
> + }
> +
> + type_id = bt_ctf_field_type_get_type_id(type);
> + if (type_id <= CTF_TYPE_UNKNOWN ||
> + type_id >= NR_CTF_TYPES) {
> + goto error;
> + }
> +
> + field = field_create_funcs[type_id](type);
> + if (!field) {
> + goto error;
> + }
> +
> + /* The type's declaration can't change after this point */
> + bt_ctf_field_type_freeze(type);
> + bt_ctf_field_type_get(type);
> + bt_ctf_ref_init(&field->ref_count);
> + field->type = type;
> +error:
> + return field;
> +}
> +
> +void bt_ctf_field_get(struct bt_ctf_field *field)
> +{
> + if (field) {
> + bt_ctf_ref_get(&field->ref_count);
> + }
> +}
> +
> +void bt_ctf_field_put(struct bt_ctf_field *field)
> +{
> + if (field) {
> + bt_ctf_ref_put(&field->ref_count, bt_ctf_field_destroy);
> + }
> +}
> +
> +int bt_ctf_field_sequence_set_length(struct bt_ctf_field *field,
> + struct bt_ctf_field *length_field)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_integer *length_type;
> + struct bt_ctf_field_integer *length;
> + struct bt_ctf_field_sequence *sequence;
> + uint64_t sequence_length;
> +
> + if (!field || !length_field) {
> + ret = -1;
> + goto end;
> + }
> + if (bt_ctf_field_type_get_type_id(length_field->type) !=
> + CTF_TYPE_INTEGER) {
> + ret = -1;
> + goto end;
> + }
> +
> + length_type = container_of(length_field->type,
> + struct bt_ctf_field_type_integer, parent);
> + if (length_type->declaration.signedness) {
> + ret = -1;
> + goto end;
> + }
> +
> + length = container_of(length_field, struct bt_ctf_field_integer,
> + parent);
> + sequence_length = length->definition.value._unsigned;
> + sequence = container_of(field, struct bt_ctf_field_sequence, parent);
> + if (sequence->elements) {
> + g_ptr_array_free(sequence->elements, TRUE);
> + bt_ctf_field_put(sequence->length);
> + }
> +
> + sequence->elements = g_ptr_array_new_full((size_t)sequence_length,
> + (GDestroyNotify)bt_ctf_field_put);
> + if (!sequence->elements) {
> + ret = -1;
> + goto end;
> + }
> +
> + g_ptr_array_set_size(sequence->elements, (size_t)sequence_length);
> + bt_ctf_field_get(length_field);
> + sequence->length = length_field;
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field *bt_ctf_field_structure_get_field(
> + struct bt_ctf_field *field, const char *name)
> +{
> + struct bt_ctf_field *new_field = NULL;
> + GQuark field_quark;
> + struct bt_ctf_field_structure *structure;
> + struct bt_ctf_field_type_structure *structure_type;
> + struct bt_ctf_field_type *field_type;
> + size_t index;
> +
> + if (!field || !name ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_STRUCT) {
> + goto error;
> + }
> +
> + field_quark = g_quark_from_string(name);
> + structure = container_of(field, struct bt_ctf_field_structure, parent);
> + structure_type = container_of(field->type,
> + struct bt_ctf_field_type_structure, parent);
> + field_type = bt_ctf_field_type_structure_get_type(structure_type, name);
> + if (!g_hash_table_lookup_extended(structure->field_name_to_index,
> + GUINT_TO_POINTER(field_quark), NULL, (gpointer *)&index)) {
> + goto error;
> + }
> +
> + if (structure->fields->pdata[index]) {
> + new_field = structure->fields->pdata[index];
> + goto end;
> + }
> +
> + new_field = bt_ctf_field_create(field_type);
> + if (!new_field) {
> + goto error;
> + }
> +
> + structure->fields->pdata[index] = new_field;
> +end:
> + bt_ctf_field_get(new_field);
> +error:
> + return new_field;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_field_structure_set_field(struct bt_ctf_field *field,
> + const char *name, struct bt_ctf_field *value)
> +{
> + int ret = 0;
> + GQuark field_quark;
> + struct bt_ctf_field_structure *structure;
> + struct bt_ctf_field_type_structure *structure_type;
> + struct bt_ctf_field_type *expected_field_type;
> + size_t index;
> +
> + if (!field || !name || !value ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_STRUCT) {
> + ret = -1;
> + goto end;
> + }
> +
> + field_quark = g_quark_from_string(name);
> + structure = container_of(field, struct bt_ctf_field_structure, parent);
> + structure_type = container_of(field->type,
> + struct bt_ctf_field_type_structure, parent);
> + expected_field_type = bt_ctf_field_type_structure_get_type(
> + structure_type, name);
> + if (expected_field_type != value->type) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (!g_hash_table_lookup_extended(structure->field_name_to_index,
> + GUINT_TO_POINTER(field_quark), NULL, (gpointer *) &index)) {
> + goto end;
> + }
> +
> + if (structure->fields->pdata[index]) {
> + bt_ctf_field_put(structure->fields->pdata[index]);
> + }
> +
> + structure->fields->pdata[index] = value;
> + bt_ctf_field_get(value);
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field *bt_ctf_field_array_get_field(struct bt_ctf_field
> *field,
> + uint64_t index)
> +{
> + struct bt_ctf_field *new_field = NULL;
> + struct bt_ctf_field_array *array;
> + struct bt_ctf_field_type_array *array_type;
> + struct bt_ctf_field_type *field_type;
> +
> + if (!field || bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_ARRAY) {
> + goto end;
> + }
> +
> + array = container_of(field, struct bt_ctf_field_array, parent);
> + if (index >= array->elements->len) {
> + goto end;
> + }
> +
> + array_type = container_of(field->type, struct bt_ctf_field_type_array,
> + parent);
> + field_type = bt_ctf_field_type_array_get_element_type(array_type);
> + if (array->elements->pdata[(size_t)index]) {
> + new_field = array->elements->pdata[(size_t)index];
> + goto end;
> + }
> +
> + new_field = bt_ctf_field_create(field_type);
> + bt_ctf_field_get(new_field);
> + array->elements->pdata[(size_t)index] = new_field;
> +end:
> + return new_field;
> +}
> +
> +struct bt_ctf_field *bt_ctf_field_sequence_get_field(struct bt_ctf_field
> *field,
> + uint64_t index)
> +{
> + struct bt_ctf_field *new_field = NULL;
> + struct bt_ctf_field_sequence *sequence;
> + struct bt_ctf_field_type_sequence *sequence_type;
> + struct bt_ctf_field_type *field_type;
> +
> + if (!field || bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_SEQUENCE) {
> + goto end;
> + }
> +
> + sequence = container_of(field, struct bt_ctf_field_sequence, parent);
> + if (!sequence->elements || sequence->elements->len <= index) {
> + goto end;
> + }
> +
> + sequence_type = container_of(field->type,
> + struct bt_ctf_field_type_sequence, parent);
> + field_type = bt_ctf_field_type_sequence_get_element_type(sequence_type);
> + if (sequence->elements->pdata[(size_t)index]) {
> + new_field = sequence->elements->pdata[(size_t)index];
> + goto end;
> + }
> +
> + new_field = bt_ctf_field_create(field_type);
> + bt_ctf_field_get(new_field);
> + sequence->elements->pdata[(size_t)index] = new_field;
> +end:
> + return new_field;
> +}
> +
> +struct bt_ctf_field *bt_ctf_field_variant_get_field(struct bt_ctf_field
> *field,
> + struct bt_ctf_field *tag_field)
> +{
> + struct bt_ctf_field *new_field = NULL;
> + struct bt_ctf_field_variant *variant;
> + struct bt_ctf_field_type_variant *variant_type;
> + struct bt_ctf_field_type *field_type;
> + struct bt_ctf_field *tag_enum = NULL;
> + struct bt_ctf_field_integer *tag_enum_integer;
> + int64_t tag_enum_value;
> +
> + if (!field || !tag_field ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_VARIANT ||
> + bt_ctf_field_type_get_type_id(tag_field->type) !=
> + CTF_TYPE_ENUM) {
> + goto end;
> + }
> +
> + variant = container_of(field, struct bt_ctf_field_variant, parent);
> + variant_type = container_of(field->type,
> + struct bt_ctf_field_type_variant, parent);
> + tag_enum = bt_ctf_field_enumeration_get_container(tag_field);
> + if (!tag_enum) {
> + goto end;
> + }
> +
> + tag_enum_integer = container_of(tag_enum, struct bt_ctf_field_integer,
> + parent);
> +
> + if (!bt_ctf_field_validate(variant->tag)) {
> + goto end;
> + }
> +
> + tag_enum_value = tag_enum_integer->definition.value._signed;
> + field_type = bt_ctf_field_type_variant_get_field_type(variant_type,
> + tag_enum_value);
> + if (!field_type) {
> + goto end;
> + }
> +
> + new_field = bt_ctf_field_create(field_type);
> + if (!new_field) {
> + goto end;
> + }
> +
> + bt_ctf_field_put(variant->tag);
> + bt_ctf_field_put(variant->payload);
> + bt_ctf_field_get(new_field);
> + bt_ctf_field_get(tag_field);
> + variant->tag = tag_field;
> + variant->payload = new_field;
> +end:
> + bt_ctf_field_put(tag_enum);
> + return new_field;
> +}
> +
> +struct bt_ctf_field *bt_ctf_field_enumeration_get_container(
> + struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field *container = NULL;
> + struct bt_ctf_field_enumeration *enumeration;
> +
> + if (!field) {
> + goto end;
> + }
> +
> + enumeration = container_of(field, struct bt_ctf_field_enumeration,
> + parent);
> + if (!enumeration->payload) {
> + struct bt_ctf_field_type_enumeration *enumeration_type =
> + container_of(field->type,
> + struct bt_ctf_field_type_enumeration, parent);
> + enumeration->payload =
> + bt_ctf_field_create(enumeration_type->container);
> + }
> +
> + container = enumeration->payload;
> + bt_ctf_field_get(container);
> +end:
> + return container;
> +}
> +
> +int bt_ctf_field_signed_integer_set_value(struct bt_ctf_field *field,
> + int64_t value)
> +{
> + int ret = 0;
> + struct bt_ctf_field_integer *integer;
> + struct bt_ctf_field_type_integer *integer_type;
> + unsigned int size;
> + int64_t min_value, max_value;
> +
> + if (!field ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_INTEGER) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer = container_of(field, struct bt_ctf_field_integer, parent);
> + integer_type = container_of(field->type,
> + struct bt_ctf_field_type_integer, parent);
> + if (!integer_type->declaration.signedness) {
> + ret = -1;
> + goto end;
> + }
> +
> + size = integer_type->declaration.len;
> + min_value = -((int64_t)1 << (size - 1));
> + max_value = ((int64_t)1 << (size - 1)) - 1;
> + if (value < min_value || value > max_value) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer->definition.value._signed = value;
> + integer->parent.payload_set = 1;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_unsigned_integer_set_value(struct bt_ctf_field *field,
> + uint64_t value)
> +{
> + int ret = 0;
> + struct bt_ctf_field_integer *integer;
> + struct bt_ctf_field_type_integer *integer_type;
> + unsigned int size;
> + uint64_t max_value;
> +
> + if (!field ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_INTEGER) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer = container_of(field, struct bt_ctf_field_integer, parent);
> + integer_type = container_of(field->type,
> + struct bt_ctf_field_type_integer, parent);
> + if (integer_type->declaration.signedness) {
> + ret = -1;
> + goto end;
> + }
> +
> + size = integer_type->declaration.len;
> + max_value = (size == 64) ? UINT64_MAX : ((uint64_t)1 << size) - 1;
> + if (value > max_value) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer->definition.value._unsigned = value;
> + integer->parent.payload_set = 1;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_floating_point_set_value(struct bt_ctf_field *field,
> + double value)
> +{
> + int ret = 0;
> + struct bt_ctf_field_floating_point *floating_point;
> +
> + if (!field ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_FLOAT) {
> + ret = -1;
> + goto end;
> + }
> + floating_point = container_of(field, struct bt_ctf_field_floating_point,
> + parent);
> + floating_point->definition.value = value;
> + floating_point->parent.payload_set = 1;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_string_set_value(struct bt_ctf_field *field,
> + const char *value)
> +{
> + int ret = 0;
> + struct bt_ctf_field_string *string;
> +
> + if (!field || !value ||
> + bt_ctf_field_type_get_type_id(field->type) !=
> + CTF_TYPE_STRING) {
> + ret = -1;
> + goto end;
> + }
> +
> + string = container_of(field, struct bt_ctf_field_string, parent);
> + if (string->payload) {
> + g_string_free(string->payload, TRUE);
> + }
> +
> + string->payload = g_string_new(value);
> + string->parent.payload_set = 1;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_field_validate(struct bt_ctf_field *field)
> +{
> + int ret = 0;
> + enum ctf_type_id type_id;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + type_id = bt_ctf_field_type_get_type_id(field->type);
> + if (type_id <= CTF_TYPE_UNKNOWN || type_id >= NR_CTF_TYPES) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = field_validate_funcs[type_id](field);
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_field_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + int ret = 0;
> + enum ctf_type_id type_id;
> +
> + if (!field || !pos) {
> + ret = -1;
> + goto end;
> + }
> +
> + type_id = bt_ctf_field_type_get_type_id(field->type);
> + if (type_id <= CTF_TYPE_UNKNOWN || type_id >= NR_CTF_TYPES) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = field_serialize_funcs[type_id](field, pos);
> +end:
> + return ret;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_integer_create(struct bt_ctf_field_type
> *type)
> +{
> + struct bt_ctf_field_type_integer *integer_type = container_of(type,
> + struct bt_ctf_field_type_integer, parent);
> + struct bt_ctf_field_integer *integer = g_new0(
> + struct bt_ctf_field_integer, 1);
> +
> + if (integer) {
> + integer->definition.declaration = &integer_type->declaration;
> + }
> +
> + return integer ? &integer->parent : NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_enumeration_create(
> + struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_enumeration *enumeration = g_new0(
> + struct bt_ctf_field_enumeration, 1);
> +
> + return enumeration ? &enumeration->parent : NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_floating_point_create(
> + struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_floating_point *floating_point;
> + struct bt_ctf_field_type_floating_point *floating_point_type;
> +
> + floating_point = g_new0(struct bt_ctf_field_floating_point, 1);
> + if (!floating_point) {
> + goto end;
> + }
> +
> + floating_point_type = container_of(type,
> + struct bt_ctf_field_type_floating_point, parent);
> + floating_point->definition.declaration = container_of(
> + type->declaration, struct declaration_float, p);
> +
> +
> + floating_point->definition.sign = &floating_point->sign;
> + floating_point->sign.declaration = &floating_point_type->sign;
> + floating_point->definition.sign->p.declaration =
> + &floating_point_type->sign.p;
> +
> + floating_point->definition.mantissa = &floating_point->mantissa;
> + floating_point->mantissa.declaration = &floating_point_type->mantissa;
> + floating_point->definition.mantissa->p.declaration =
> + &floating_point_type->mantissa.p;
> +
> + floating_point->definition.exp = &floating_point->exp;
> + floating_point->exp.declaration = &floating_point_type->exp;
> + floating_point->definition.exp->p.declaration =
> + &floating_point_type->exp.p;
> +
> +end:
> + return floating_point ? &floating_point->parent : NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_structure_create(
> + struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_structure *structure_type = container_of(type,
> + struct bt_ctf_field_type_structure, parent);
> + struct bt_ctf_field_structure *structure = g_new0(
> + struct bt_ctf_field_structure, 1);
> + struct bt_ctf_field *field = NULL;
> +
> + if (!structure || !structure_type->fields->len) {
> + goto end;
> + }
> +
> + structure->field_name_to_index = structure_type->field_name_to_index;
> + structure->fields = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_field_put);
> + g_ptr_array_set_size(structure->fields,
> + g_hash_table_size(structure->field_name_to_index));
> + field = &structure->parent;
> +end:
> + return field;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_variant_create(struct bt_ctf_field_type
> *type)
> +{
> + struct bt_ctf_field_variant *variant = g_new0(
> + struct bt_ctf_field_variant, 1);
> + return variant ? &variant->parent : NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_array_create(struct bt_ctf_field_type
> *type)
> +{
> + struct bt_ctf_field_array *array = g_new0(struct bt_ctf_field_array, 1);
> + struct bt_ctf_field_type_array *array_type;
> + unsigned int array_length;
> +
> + if (!array || !type) {
> + goto error;
> + }
> +
> + array_type = container_of(type, struct bt_ctf_field_type_array, parent);
> + array_length = array_type->length;
> + array->elements = g_ptr_array_new_full(array_length,
> + (GDestroyNotify)bt_ctf_field_put);
> + if (!array->elements) {
> + goto error;
> + }
> +
> + g_ptr_array_set_size(array->elements, array_length);
> + return &array->parent;
> +error:
> + g_free(array);
> + return NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_sequence_create(
> + struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_sequence *sequence = g_new0(
> + struct bt_ctf_field_sequence, 1);
> + return sequence ? &sequence->parent : NULL;
> +}
> +
> +static
> +struct bt_ctf_field *bt_ctf_field_string_create(struct bt_ctf_field_type
> *type)
> +{
> + struct bt_ctf_field_string *string = g_new0(
> + struct bt_ctf_field_string, 1);
> + return string ? &string->parent : NULL;
> +}
> +
> +static
> +void bt_ctf_field_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field *field;
> + struct bt_ctf_field_type *type;
> + enum ctf_type_id type_id;
> +
> + if (!ref) {
> + return;
> + }
> +
> + field = container_of(ref, struct bt_ctf_field, ref_count);
> + type = field->type;
> + type_id = bt_ctf_field_type_get_type_id(type);
> + if (type_id <= CTF_TYPE_UNKNOWN ||
> + type_id >= NR_CTF_TYPES) {
> + return;
> + }
> +
> + field_destroy_funcs[type_id](field);
> + if (type) {
> + bt_ctf_field_type_put(type);
> + }
> +}
> +
> +static
> +void bt_ctf_field_integer_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_integer *integer;
> +
> + if (!field) {
> + return;
> + }
> +
> + integer = container_of(field, struct bt_ctf_field_integer, parent);
> + g_free(integer);
> +}
> +
> +static
> +void bt_ctf_field_enumeration_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_enumeration *enumeration;
> +
> + if (!field) {
> + return;
> + }
> +
> + enumeration = container_of(field, struct bt_ctf_field_enumeration,
> + parent);
> + bt_ctf_field_put(enumeration->payload);
> + g_free(enumeration);
> +}
> +
> +static
> +void bt_ctf_field_floating_point_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_floating_point *floating_point;
> +
> + if (!field) {
> + return;
> + }
> +
> + floating_point = container_of(field, struct bt_ctf_field_floating_point,
> + parent);
> + g_free(floating_point);
> +}
> +
> +static
> +void bt_ctf_field_structure_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_structure *structure;
> +
> + if (!field) {
> + return;
> + }
> +
> + structure = container_of(field, struct bt_ctf_field_structure, parent);
> + g_ptr_array_free(structure->fields, TRUE);
> + g_free(structure);
> +}
> +
> +static
> +void bt_ctf_field_variant_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_variant *variant;
> +
> + if (!field) {
> + return;
> + }
> +
> + variant = container_of(field, struct bt_ctf_field_variant, parent);
> + bt_ctf_field_put(variant->tag);
> + bt_ctf_field_put(variant->payload);
> + g_free(variant);
> +}
> +
> +static
> +void bt_ctf_field_array_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_array *array;
> +
> + if (!field) {
> + return;
> + }
> +
> + array = container_of(field, struct bt_ctf_field_array, parent);
> + g_ptr_array_free(array->elements, TRUE);
> + g_free(array);
> +}
> +
> +static
> +void bt_ctf_field_sequence_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_sequence *sequence;
> +
> + if (!field) {
> + return;
> + }
> +
> + sequence = container_of(field, struct bt_ctf_field_sequence, parent);
> + g_ptr_array_free(sequence->elements, TRUE);
> + bt_ctf_field_put(sequence->length);
> + g_free(sequence);
> +}
> +
> +static
> +void bt_ctf_field_string_destroy(struct bt_ctf_field *field)
> +{
> + struct bt_ctf_field_string *string;
> + if (!field) {
> + return;
> + }
> +
> + string = container_of(field, struct bt_ctf_field_string, parent);
> + g_string_free(string->payload, TRUE);
> + g_free(string);
> +}
> +
> +static
> +int bt_ctf_field_generic_validate(struct bt_ctf_field *field)
> +{
> + return !(field && field->payload_set);
> +}
> +
> +static
> +int bt_ctf_field_enumeration_validate(struct bt_ctf_field *field)
> +{
> + int ret;
> + struct bt_ctf_field_enumeration *enumeration;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + enumeration = container_of(field, struct bt_ctf_field_enumeration,
> + parent);
> + if (!enumeration->payload) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_field_validate(enumeration->payload);
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_structure_validate(struct bt_ctf_field *field)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_structure *structure;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + structure = container_of(field, struct bt_ctf_field_structure, parent);
> + for (i = 0; i < structure->fields->len; i++) {
> + ret = bt_ctf_field_validate(structure->fields->pdata[i]);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_variant_validate(struct bt_ctf_field *field)
> +{
> + int ret = 0;
> + struct bt_ctf_field_variant *variant;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + variant = container_of(field, struct bt_ctf_field_variant, parent);
> + ret = bt_ctf_field_validate(variant->payload);
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_array_validate(struct bt_ctf_field *field)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_array *array;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + array = container_of(field, struct bt_ctf_field_array, parent);
> + for (i = 0; i < array->elements->len; i++) {
> + ret = bt_ctf_field_validate(array->elements->pdata[i]);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_sequence_validate(struct bt_ctf_field *field)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_sequence *sequence;
> +
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + sequence = container_of(field, struct bt_ctf_field_sequence, parent);
> + for (i = 0; i < sequence->elements->len; i++) {
> + ret = bt_ctf_field_validate(sequence->elements->pdata[i]);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_integer_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + int ret = 0;
> + struct bt_ctf_field_integer *integer = container_of(field,
> + struct bt_ctf_field_integer, parent);
> +
> +retry:
> + ret = ctf_integer_write(&pos->parent, &integer->definition.p);
> + if (ret == -EFAULT) {
> + /*
> + * The field is too large to fit in the current packet's
> + * remaining space. Bump the packet size and retry.
> + */
> + ret = increase_packet_size(pos);
> + if (ret) {
> + goto end;
> + }
> + goto retry;
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_enumeration_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + struct bt_ctf_field_enumeration *enumeration = container_of(
> + field, struct bt_ctf_field_enumeration, parent);
> +
> + return bt_ctf_field_serialize(enumeration->payload, pos);
> +}
> +
> +static
> +int bt_ctf_field_floating_point_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + int ret = 0;
> + struct bt_ctf_field_floating_point *floating_point = container_of(field,
> + struct bt_ctf_field_floating_point, parent);
> +
> +retry:
> + ret = ctf_float_write(&pos->parent, &floating_point->definition.p);
> + if (ret == -EFAULT) {
> + /*
> + * The field is too large to fit in the current packet's
> + * remaining space. Bump the packet size and retry.
> + */
> + ret = increase_packet_size(pos);
> + if (ret) {
> + goto end;
> + }
> + goto retry;
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_structure_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_structure *structure = container_of(
> + field, struct bt_ctf_field_structure, parent);
> +
> + while (!ctf_pos_access_ok(pos,
> + offset_align(pos->offset,
> + field->type->declaration->alignment))) {
> + increase_packet_size(pos);
> + }
> +
> + ctf_align_pos(pos, field->type->declaration->alignment);
> +
> + for (i = 0; i < structure->fields->len; i++) {
> + struct bt_ctf_field *field = g_ptr_array_index(
> + structure->fields, i);
> +
> + ret = bt_ctf_field_serialize(field, pos);
> + if (ret) {
> + break;
> + }
> + }
> +
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_variant_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + struct bt_ctf_field_variant *variant = container_of(
> + field, struct bt_ctf_field_variant, parent);
> +
> + return bt_ctf_field_serialize(variant->payload, pos);
> +}
> +
> +static
> +int bt_ctf_field_array_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_array *array = container_of(
> + field, struct bt_ctf_field_array, parent);
> +
> + for (i = 0; i < array->elements->len; i++) {
> + ret = bt_ctf_field_serialize(
> + g_ptr_array_index(array->elements, i), pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_sequence_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_sequence *sequence = container_of(
> + field, struct bt_ctf_field_sequence, parent);
> +
> + for (i = 0; i < sequence->elements->len; i++) {
> + ret = bt_ctf_field_serialize(
> + g_ptr_array_index(sequence->elements, i), pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_string_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field_string *string = container_of(field,
> + struct bt_ctf_field_string, parent);
> + struct bt_ctf_field_type *character_type =
> + get_field_type(FIELD_TYPE_ALIAS_UINT8_T);
> + struct bt_ctf_field *character = bt_ctf_field_create(character_type);
> +
> + for (i = 0; i < string->payload->len + 1; i++) {
> + ret = bt_ctf_field_unsigned_integer_set_value(character,
> + (uint64_t) string->payload->str[i]);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_integer_serialize(character, pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + bt_ctf_field_put(character);
> + bt_ctf_field_type_put(character_type);
> + return ret;
> +}
> +
> +static
> +int increase_packet_size(struct ctf_stream_pos *pos)
> +{
> + int ret;
> +
> + assert(pos);
> + ret = munmap_align(pos->base_mma);
> + if (ret) {
> + goto end;
> + }
> +
> + pos->packet_size += PACKET_LEN_INCREMENT;
> + ret = posix_fallocate(pos->fd, pos->mmap_offset,
> + pos->packet_size / CHAR_BIT);
> + if (ret) {
> + goto end;
> + }
> +
> + pos->base_mma = mmap_align(pos->packet_size / CHAR_BIT, pos->prot,
> + pos->flags, pos->fd, pos->mmap_offset);
> + if (pos->base_mma == MAP_FAILED) {
> + ret = -1;
> + }
> +end:
> + return ret;
> +}
> diff --git a/formats/ctf/writer/event-types.c
> b/formats/ctf/writer/event-types.c
> new file mode 100644
> index 0000000..9b74b6e
> --- /dev/null
> +++ b/formats/ctf/writer/event-types.c
> @@ -0,0 +1,1402 @@
> +/*
> + * event-types.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/ctf-writer/event-types-internal.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/compiler.h>
> +#include <babeltrace/endian.h>
> +#include <float.h>
> +#include <inttypes.h>
> +
> +struct range_overlap_query {
> + int64_t range_start, range_end;
> + int overlaps;
> + GQuark mapping_name;
> +};
> +
> +static
> +void bt_ctf_field_type_integer_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_enumeration_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_floating_point_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_structure_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_variant_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_array_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_sequence_destroy(struct bt_ctf_ref *);
> +static
> +void bt_ctf_field_type_string_destroy(struct bt_ctf_ref *);
> +
> +static
> +void (* const type_destroy_funcs[])(struct bt_ctf_ref *) = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_type_integer_destroy,
> + [CTF_TYPE_ENUM] =
> + bt_ctf_field_type_enumeration_destroy,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_type_floating_point_destroy,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_type_structure_destroy,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_type_variant_destroy,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_type_array_destroy,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_type_sequence_destroy,
> + [CTF_TYPE_STRING] = bt_ctf_field_type_string_destroy,
> +};
> +
> +static
> +void generic_field_type_freeze(struct bt_ctf_field_type *);
> +static
> +void bt_ctf_field_type_enumeration_freeze(struct bt_ctf_field_type *);
> +static
> +void bt_ctf_field_type_structure_freeze(struct bt_ctf_field_type *);
> +static
> +void bt_ctf_field_type_variant_freeze(struct bt_ctf_field_type *);
> +static
> +void bt_ctf_field_type_array_freeze(struct bt_ctf_field_type *);
> +static
> +void bt_ctf_field_type_sequence_freeze(struct bt_ctf_field_type *);
> +
> +static
> +type_freeze_func const type_freeze_funcs[] = {
> + [CTF_TYPE_INTEGER] = generic_field_type_freeze,
> + [CTF_TYPE_ENUM] = bt_ctf_field_type_enumeration_freeze,
> + [CTF_TYPE_FLOAT] = generic_field_type_freeze,
> + [CTF_TYPE_STRUCT] = bt_ctf_field_type_structure_freeze,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_type_variant_freeze,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_type_array_freeze,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_type_sequence_freeze,
> + [CTF_TYPE_STRING] = generic_field_type_freeze,
> +};
> +
> +static
> +int bt_ctf_field_type_integer_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_enumeration_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_floating_point_serialize(
> + struct bt_ctf_field_type *, struct metadata_context *);
> +static
> +int bt_ctf_field_type_structure_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_variant_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_array_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_sequence_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +static
> +int bt_ctf_field_type_string_serialize(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +
> +static
> +type_serialize_func const type_serialize_funcs[] = {
> + [CTF_TYPE_INTEGER] = bt_ctf_field_type_integer_serialize,
> + [CTF_TYPE_ENUM] =
> + bt_ctf_field_type_enumeration_serialize,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_type_floating_point_serialize,
> + [CTF_TYPE_STRUCT] =
> + bt_ctf_field_type_structure_serialize,
> + [CTF_TYPE_VARIANT] = bt_ctf_field_type_variant_serialize,
> + [CTF_TYPE_ARRAY] = bt_ctf_field_type_array_serialize,
> + [CTF_TYPE_SEQUENCE] = bt_ctf_field_type_sequence_serialize,
> + [CTF_TYPE_STRING] = bt_ctf_field_type_string_serialize,
> +};
> +
> +static
> +void bt_ctf_field_type_integer_set_byte_order(struct bt_ctf_field_type *,
> + int byte_order);
> +static
> +void bt_ctf_field_type_floating_point_set_byte_order(
> + struct bt_ctf_field_type *, int byte_order);
> +
> +static
> +void (* const set_byte_order_funcs[])(struct bt_ctf_field_type *,
> + int) = {
> + [CTF_TYPE_INTEGER] =
> + bt_ctf_field_type_integer_set_byte_order,
> + [CTF_TYPE_FLOAT] =
> + bt_ctf_field_type_floating_point_set_byte_order,
> + [CTF_TYPE_ENUM ... CTF_TYPE_SEQUENCE] = NULL,
> +};
> +
> +
> +static
> +void destroy_enumeration_mapping(struct enumeration_mapping *mapping)
> +{
> + g_free(mapping);
> +}
> +
> +static
> +void destroy_structure_field(struct structure_field *field)
> +{
> + if (field->type) {
> + bt_ctf_field_type_put(field->type);
> + }
> +
> + g_free(field);
> +}
> +
> +static
> +void check_ranges_overlap(gpointer element, gpointer query)
> +{
> + struct enumeration_mapping *mapping = element;
> + struct range_overlap_query *overlap_query = query;
> +
> + if (mapping->range_start <= overlap_query->range_end
> + && overlap_query->range_start <= mapping->range_end) {
> + overlap_query->overlaps = 1;
> + overlap_query->mapping_name = mapping->string;
> + }
> +
> + overlap_query->overlaps |=
> + mapping->string == overlap_query->mapping_name;
> +}
> +
> +static
> +void bt_ctf_field_type_init(struct bt_ctf_field_type *type)
> +{
> + enum ctf_type_id type_id = type->declaration->id;
> +
> + assert(type && (type_id > CTF_TYPE_UNKNOWN) &&
> + (type_id < NR_CTF_TYPES));
> +
> + bt_ctf_ref_init(&type->ref_count);
> + type->freeze = type_freeze_funcs[type_id];
> + type->serialize = type_serialize_funcs[type_id];
> + bt_ctf_field_type_set_byte_order(type, BT_CTF_BYTE_ORDER_NATIVE);
> + type->declaration->alignment = 1;
> +}
> +
> +static
> +int add_structure_field(GPtrArray *fields,
> + GHashTable *field_name_to_index,
> + struct bt_ctf_field_type *field_type,
> + const char *field_name)
> +{
> + int ret = 0;
> + GQuark name_quark = g_quark_from_string(field_name);
> + struct structure_field *field;
> +
> + /* Make sure structure does not contain a field of the same name */
> + if (g_hash_table_contains(field_name_to_index,
> + GUINT_TO_POINTER(name_quark))) {
> + ret = -1;
> + goto end;
> + }
> +
> + field = g_new0(struct structure_field, 1);
> + if (!field) {
> + ret = -1;
> + goto end;
> + }
> +
> + bt_ctf_field_type_get(field_type);
> + field->name = name_quark;
> + field->type = field_type;
> + g_hash_table_insert(field_name_to_index,
> + (gpointer) (unsigned long) name_quark,
> + (gpointer) (unsigned long) fields->len);
> + g_ptr_array_add(fields, field);
> + bt_ctf_field_type_freeze(field_type);
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_integer_create(unsigned int
> size)
> +{
> + struct bt_ctf_field_type_integer *integer =
> + g_new0(struct bt_ctf_field_type_integer, 1);
> +
> + if (!integer || size > 64) {
> + return NULL;
> + }
> +
> + integer->parent.declaration = &integer->declaration.p;
> + integer->parent.declaration->id = CTF_TYPE_INTEGER;
> + integer->declaration.len = size;
> + integer->declaration.base = BT_CTF_INTEGER_BASE_DECIMAL;
> + integer->declaration.encoding = CTF_STRING_NONE;
> + bt_ctf_field_type_init(&integer->parent);
> + return &integer->parent;
> +}
> +
> +int bt_ctf_field_type_integer_set_signed(struct bt_ctf_field_type *type,
> + int is_signed)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_integer *integer;
> +
> + if (!type || type->frozen ||
> + type->declaration->id != CTF_TYPE_INTEGER) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer = container_of(type, struct bt_ctf_field_type_integer, parent);
> + if (is_signed && integer->declaration.len <= 1) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer->declaration.signedness = !!is_signed;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_type_integer_set_base(struct bt_ctf_field_type *type,
> + enum bt_ctf_integer_base base)
> +{
> + int ret = 0;
> +
> + if (!type || type->frozen ||
> + type->declaration->id != CTF_TYPE_INTEGER) {
> + ret = -1;
> + goto end;
> + }
> +
> + switch (base) {
> + case BT_CTF_INTEGER_BASE_BINARY:
> + case BT_CTF_INTEGER_BASE_OCTAL:
> + case BT_CTF_INTEGER_BASE_DECIMAL:
> + case BT_CTF_INTEGER_BASE_HEXADECIMAL:
> + {
> + struct bt_ctf_field_type_integer *integer = container_of(type,
> + struct bt_ctf_field_type_integer, parent);
> + integer->declaration.base = base;
> + break;
> + }
> + default:
> + ret = -1;
> + }
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_type_integer_set_encoding(struct bt_ctf_field_type *type,
> + enum ctf_string_encoding encoding)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_integer *integer;
> +
> + if (!type || type->frozen ||
> + (type->declaration->id != CTF_TYPE_INTEGER) ||
> + (encoding < CTF_STRING_NONE) ||
> + (encoding >= CTF_STRING_UNKNOWN)) {
> + ret = -1;
> + goto end;
> + }
> +
> + integer = container_of(type, struct bt_ctf_field_type_integer, parent);
> + integer->declaration.encoding = encoding;
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_enumeration_create(
> + struct bt_ctf_field_type *integer_container_type)
> +{
> + struct bt_ctf_field_type_enumeration *enumeration = NULL;
> +
> + if (!integer_container_type) {
> + goto error;
> + }
> +
> + enumeration = g_new0(struct bt_ctf_field_type_enumeration, 1);
> + if (!enumeration) {
> + goto error;
> + }
> +
> + enumeration->parent.declaration = &enumeration->declaration.p;
> + enumeration->parent.declaration->id = CTF_TYPE_ENUM;
> + bt_ctf_field_type_get(integer_container_type);
> + enumeration->container = integer_container_type;
> + enumeration->entries = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)destroy_enumeration_mapping);
> + bt_ctf_field_type_init(&enumeration->parent);
> + return &enumeration->parent;
> +error:
> + g_free(enumeration);
> + return NULL;
> +}
> +
> +int bt_ctf_field_type_enumeration_add_mapping(
> + struct bt_ctf_field_type *type, const char *string,
> + int64_t range_start, int64_t range_end)
> +{
> + int ret = 0;
> + GQuark mapping_name;
> + struct enumeration_mapping *mapping;
> + struct bt_ctf_field_type_enumeration *enumeration;
> + struct range_overlap_query query;
> +
> + if (!type || (type->declaration->id != CTF_TYPE_ENUM) ||
> + type->frozen ||
> + (range_end < range_start)) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (validate_identifier(string)) {
> + ret = -1;
> + goto end;
> + }
> +
> + mapping_name = g_quark_from_string(string);
> + query = (struct range_overlap_query) { .range_start = range_start,
> + .range_end = range_end,
> + .mapping_name = mapping_name,
> + .overlaps = 0 };
> + enumeration = container_of(type, struct bt_ctf_field_type_enumeration,
> + parent);
> +
> + /* Check that the range does not overlap with one already present */
> + g_ptr_array_foreach(enumeration->entries, check_ranges_overlap, &query);
> + if (query.overlaps) {
> + ret = -1;
> + goto end;
> + }
> +
> + mapping = g_new(struct enumeration_mapping, 1);
> + if (!mapping) {
> + ret = -1;
> + goto end;
> + }
> +
> + *mapping = (struct enumeration_mapping) {.range_start = range_start,
> + .range_end = range_end, .string = mapping_name};
> + g_ptr_array_add(enumeration->entries, mapping);
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_floating_point_create(void)
> +{
> + struct bt_ctf_field_type_floating_point *floating_point =
> + g_new0(struct bt_ctf_field_type_floating_point, 1);
> +
> + if (!floating_point) {
> + goto end;
> + }
> +
> + floating_point->declaration.sign = &floating_point->sign;
> + floating_point->declaration.mantissa = &floating_point->mantissa;
> + floating_point->declaration.exp = &floating_point->exp;
> + floating_point->sign.len = 1;
> + floating_point->parent.declaration = &floating_point->declaration.p;
> + floating_point->parent.declaration->id = CTF_TYPE_FLOAT;
> + floating_point->declaration.exp->len =
> + sizeof(float) * CHAR_BIT - FLT_MANT_DIG;
> + floating_point->declaration.mantissa->len = FLT_MANT_DIG - 1;
> + floating_point->sign.p.alignment = 1;
> + floating_point->mantissa.p.alignment = 1;
> + floating_point->exp.p.alignment = 1;
> +
> + bt_ctf_field_type_init(&floating_point->parent);
> +end:
> + return floating_point ? &floating_point->parent : NULL;
> +}
> +
> +int bt_ctf_field_type_floating_point_set_exponent_digits(
> + struct bt_ctf_field_type *type,
> + unsigned int exponent_digits)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_floating_point *floating_point;
> +
> + if (!type || type->frozen ||
> + (type->declaration->id != CTF_TYPE_FLOAT)) {
> + ret = -1;
> + goto end;
> + }
> +
> + floating_point = container_of(type,
> + struct bt_ctf_field_type_floating_point, parent);
> + if ((exponent_digits != sizeof(float) * CHAR_BIT - FLT_MANT_DIG) &&
> + (exponent_digits != sizeof(double) * CHAR_BIT - DBL_MANT_DIG) &&
> + (exponent_digits !=
> + sizeof(long double) * CHAR_BIT - LDBL_MANT_DIG)) {
> + ret = -1;
> + goto end;
> + }
> +
> + floating_point->declaration.exp->len = exponent_digits;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_type_floating_point_set_mantissa_digits(
> + struct bt_ctf_field_type *type,
> + unsigned int mantissa_digits)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_floating_point *floating_point;
> +
> + if (!type || type->frozen ||
> + (type->declaration->id != CTF_TYPE_FLOAT)) {
> + ret = -1;
> + goto end;
> + }
> +
> + floating_point = container_of(type,
> + struct bt_ctf_field_type_floating_point, parent);
> +
> + if ((mantissa_digits != FLT_MANT_DIG) &&
> + (mantissa_digits != DBL_MANT_DIG) &&
> + (mantissa_digits != LDBL_MANT_DIG)) {
> + ret = -1;
> + goto end;
> + }
> +
> + floating_point->declaration.mantissa->len = mantissa_digits - 1;
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_structure_create(void)
> +{
> + struct bt_ctf_field_type_structure *structure =
> + g_new0(struct bt_ctf_field_type_structure, 1);
> +
> + if (!structure) {
> + goto error;
> + }
> +
> + structure->parent.declaration = &structure->declaration.p;
> + structure->parent.declaration->id = CTF_TYPE_STRUCT;
> + bt_ctf_field_type_init(&structure->parent);
> + structure->fields = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)destroy_structure_field);
> + structure->field_name_to_index = g_hash_table_new(NULL, NULL);
> + return &structure->parent;
> +error:
> + return NULL;
> +}
> +
> +int bt_ctf_field_type_structure_add_field(struct bt_ctf_field_type *type,
> + struct bt_ctf_field_type *field_type,
> + const char *field_name)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_structure *structure;
> +
> + if (!type || !field_type || type->frozen ||
> + validate_identifier(field_name) ||
> + (type->declaration->id != CTF_TYPE_STRUCT)) {
> + goto end;
> + }
> +
> + structure = container_of(type,
> + struct bt_ctf_field_type_structure, parent);
> + if (add_structure_field(structure->fields,
> + structure->field_name_to_index, field_type, field_name)) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (type->declaration->alignment < field_type->declaration->alignment) {
> + type->declaration->alignment =
> + field_type->declaration->alignment;
> + }
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_variant_create(
> + struct bt_ctf_field_type *enum_tag, const char *tag_name)
> +{
> + struct bt_ctf_field_type_variant *variant = NULL;
> +
> + if (!enum_tag || validate_identifier(tag_name) ||
> + (enum_tag->declaration->id != CTF_TYPE_ENUM)) {
> + goto error;
> + }
> +
> + variant = g_new0(struct bt_ctf_field_type_variant, 1);
> + if (!variant) {
> + goto error;
> + }
> +
> + variant->parent.declaration = &variant->declaration.p;
> + variant->parent.declaration->id = CTF_TYPE_VARIANT;
> + variant->tag_name = g_string_new(tag_name);
> + bt_ctf_field_type_init(&variant->parent);
> + variant->field_name_to_index = g_hash_table_new(NULL, NULL);
> + variant->fields = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)destroy_structure_field);
> + bt_ctf_field_type_get(enum_tag);
> + variant->tag = container_of(enum_tag,
> + struct bt_ctf_field_type_enumeration, parent);
> + return &variant->parent;
> +error:
> + return NULL;
> +}
> +
> +int bt_ctf_field_type_variant_add_field(struct bt_ctf_field_type *type,
> + struct bt_ctf_field_type *field_type,
> + const char *field_name)
> +{
> + size_t i;
> + int ret = 0;
> + int name_found = 0;
> + struct bt_ctf_field_type_variant *variant;
> + GQuark field_name_quark = g_quark_from_string(field_name);
> +
> + if (!type || !field_type || type->frozen ||
> + validate_identifier(field_name) ||
> + (type->declaration->id != CTF_TYPE_VARIANT)) {
> + ret = -1;
> + goto end;
> + }
> +
> + variant = container_of(type, struct bt_ctf_field_type_variant, parent);
> + /* Make sure this name is present in the enum tag */
> + for (i = 0; i < variant->tag->entries->len; i++) {
> + struct enumeration_mapping *mapping =
> + g_ptr_array_index(variant->tag->entries, i);
> +
> + if (mapping->string == field_name_quark) {
> + name_found = 1;
> + break;
> + }
> + }
> +
> + if (!name_found || add_structure_field(variant->fields,
> + variant->field_name_to_index, field_type, field_name)) {
> + ret = -1;
> + goto end;
> + }
> +end:
> + return ret;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_array_create(
> + struct bt_ctf_field_type *element_type,
> + unsigned int length)
> +{
> + struct bt_ctf_field_type_array *array = NULL;
> +
> + if (!element_type || length == 0) {
> + goto error;
> + }
> +
> + array = g_new0(struct bt_ctf_field_type_array, 1);
> + if (!array) {
> + goto error;
> + }
> +
> + array->parent.declaration = &array->declaration.p;
> + array->parent.declaration->id = CTF_TYPE_ARRAY;
> + bt_ctf_field_type_init(&array->parent);
> + bt_ctf_field_type_get(element_type);
> + array->element_type = element_type;
> + array->length = length;
> + array->parent.declaration->alignment =
> + element_type->declaration->alignment;
> + return &array->parent;
> +error:
> + return NULL;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_sequence_create(
> + struct bt_ctf_field_type *element_type,
> + const char *length_field_name)
> +{
> + struct bt_ctf_field_type_sequence *sequence = NULL;
> +
> + if (!element_type || validate_identifier(length_field_name)) {
> + goto error;
> + }
> +
> + sequence = g_new0(struct bt_ctf_field_type_sequence, 1);
> + if (!sequence) {
> + goto error;
> + }
> +
> + sequence->parent.declaration = &sequence->declaration.p;
> + sequence->parent.declaration->id = CTF_TYPE_SEQUENCE;
> + bt_ctf_field_type_init(&sequence->parent);
> + bt_ctf_field_type_get(element_type);
> + sequence->element_type = element_type;
> + sequence->length_field_name = g_string_new(length_field_name);
> + sequence->parent.declaration->alignment =
> + element_type->declaration->alignment;
> + return &sequence->parent;
> +error:
> + return NULL;
> +}
> +
> +struct bt_ctf_field_type *bt_ctf_field_type_string_create(void)
> +{
> + struct bt_ctf_field_type_string *string =
> + g_new0(struct bt_ctf_field_type_string, 1);
> +
> + if (!string) {
> + return NULL;
> + }
> +
> + string->parent.declaration = &string->declaration.p;
> + string->parent.declaration->id = CTF_TYPE_STRING;
> + bt_ctf_field_type_init(&string->parent);
> + string->declaration.encoding = CTF_STRING_UTF8;
> + string->parent.declaration->alignment = CHAR_BIT;
> + return &string->parent;
> +}
> +
> +int bt_ctf_field_type_string_set_encoding(
> + struct bt_ctf_field_type *type,
> + enum ctf_string_encoding encoding)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_string *string;
> +
> + if (!type || type->declaration->id != CTF_TYPE_STRING ||
> + (encoding != CTF_STRING_UTF8 &&
> + encoding != CTF_STRING_ASCII)) {
> + ret = -1;
> + goto end;
> + }
> +
> + string = container_of(type, struct bt_ctf_field_type_string, parent);
> + string->declaration.encoding = encoding;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_type_set_alignment(struct bt_ctf_field_type *type,
> + unsigned int alignment)
> +{
> + int ret = 0;
> +
> + /* Alignment must be bit-aligned (1) or byte aligned */
> + if (!type || type->frozen || (alignment != 1 && (alignment & 0x7))) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (type->declaration->id == CTF_TYPE_STRING &&
> + alignment != CHAR_BIT) {
> + ret = -1;
> + goto end;
> + }
> +
> + type->declaration->alignment = alignment;
> + ret = 0;
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_field_type_set_byte_order(struct bt_ctf_field_type *type,
> + enum bt_ctf_byte_order byte_order)
> +{
> + int ret = 0;
> + int internal_byte_order;
> + enum ctf_type_id type_id;
> +
> + if (!type || type->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + type_id = type->declaration->id;
> + switch (byte_order) {
> + case BT_CTF_BYTE_ORDER_NATIVE:
> + internal_byte_order = (G_BYTE_ORDER == G_LITTLE_ENDIAN ?
> + LITTLE_ENDIAN : BIG_ENDIAN);
> + break;
> + case BT_CTF_BYTE_ORDER_LITTLE_ENDIAN:
> + internal_byte_order = LITTLE_ENDIAN;
> + break;
> + case BT_CTF_BYTE_ORDER_BIG_ENDIAN:
> + case BT_CTF_BYTE_ORDER_NETWORK:
> + internal_byte_order = BIG_ENDIAN;
> + break;
> + default:
> + ret = -1;
> + goto end;
> + }
> +
> + if (set_byte_order_funcs[type_id]) {
> + set_byte_order_funcs[type_id](type, internal_byte_order);
> + }
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_field_type_get(struct bt_ctf_field_type *type)
> +{
> + if (!type) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&type->ref_count);
> +}
> +
> +void bt_ctf_field_type_put(struct bt_ctf_field_type *type)
> +{
> + enum ctf_type_id type_id;
> +
> + if (!type) {
> + return;
> + }
> +
> + type_id = type->declaration->id;
> + assert(type_id > CTF_TYPE_UNKNOWN && type_id < NR_CTF_TYPES);
> + bt_ctf_ref_put(&type->ref_count, type_destroy_funcs[type_id]);
> +}
> +
> +BT_HIDDEN
> +void bt_ctf_field_type_freeze(struct bt_ctf_field_type *type)
> +{
> + if (!type) {
> + return;
> + }
> +
> + type->freeze(type);
> +}
> +
> +BT_HIDDEN
> +enum ctf_type_id bt_ctf_field_type_get_type_id(
> + struct bt_ctf_field_type *type)
> +{
> + if (!type) {
> + return CTF_TYPE_UNKNOWN;
> + }
> +
> + return type->declaration->id;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_structure_get_type(
> + struct bt_ctf_field_type_structure *structure,
> + const char *name)
> +{
> + struct bt_ctf_field_type *type = NULL;
> + struct structure_field *field;
> + GQuark name_quark = g_quark_try_string(name);
> + size_t index;
> +
> + if (!name_quark) {
> + goto end;
> + }
> +
> + if (!g_hash_table_lookup_extended(structure->field_name_to_index,
> + GUINT_TO_POINTER(name_quark), NULL, (gpointer *)&index)) {
> + goto end;
> + }
> +
> + field = structure->fields->pdata[index];
> + type = field->type;
> +end:
> + return type;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_array_get_element_type(
> + struct bt_ctf_field_type_array *array)
> +{
> + assert(array);
> + return array->element_type;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_sequence_get_element_type(
> + struct bt_ctf_field_type_sequence *sequence)
> +{
> + assert(sequence);
> + return sequence->element_type;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type(
> + struct bt_ctf_field_type_variant *variant,
> + int64_t tag_value)
> +{
> + struct bt_ctf_field_type *type = NULL;
> + GQuark field_name_quark;
> + gpointer index;
> + struct structure_field *field_entry;
> + struct range_overlap_query query = {.range_start = tag_value,
> + .range_end = tag_value, .mapping_name = 0, .overlaps = 0};
> +
> + g_ptr_array_foreach(variant->tag->entries, check_ranges_overlap,
> + &query);
> + if (!query.overlaps) {
> + goto end;
> + }
> +
> + field_name_quark = query.mapping_name;
> + if (!g_hash_table_lookup_extended(variant->field_name_to_index,
> + GUINT_TO_POINTER(field_name_quark), NULL, &index)) {
> + goto end;
> + }
> +
> + field_entry = g_ptr_array_index(variant->fields, (size_t)index);
> + type = field_entry->type;
> +end:
> + return type;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_field_type_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + int ret;
> +
> + if (!type || !context) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = type->serialize(type, context);
> +end:
> + return ret;
> +}
> +
> +static
> +void bt_ctf_field_type_integer_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_integer *integer;
> +
> + if (!ref) {
> + return;
> + }
> +
> + integer = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_integer, parent);
> + g_free(integer);
> +}
> +
> +static
> +void bt_ctf_field_type_enumeration_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_enumeration *enumeration;
> +
> + if (!ref) {
> + return;
> + }
> +
> + enumeration = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_enumeration, parent);
> + g_ptr_array_free(enumeration->entries, TRUE);
> + bt_ctf_field_type_put(enumeration->container);
> + g_free(enumeration);
> +}
> +
> +static
> +void bt_ctf_field_type_floating_point_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_floating_point *floating_point;
> +
> + if (!ref) {
> + return;
> + }
> +
> + floating_point = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_floating_point, parent);
> + g_free(floating_point);
> +}
> +
> +static
> +void bt_ctf_field_type_structure_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_structure *structure;
> +
> + if (!ref) {
> + return;
> + }
> +
> + structure = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_structure, parent);
> + g_ptr_array_free(structure->fields, TRUE);
> + g_hash_table_destroy(structure->field_name_to_index);
> + g_free(structure);
> +}
> +
> +static
> +void bt_ctf_field_type_variant_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_variant *variant;
> +
> + if (!ref) {
> + return;
> + }
> +
> + variant = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_variant, parent);
> + g_ptr_array_free(variant->fields, TRUE);
> + g_hash_table_destroy(variant->field_name_to_index);
> + g_string_free(variant->tag_name, TRUE);
> + bt_ctf_field_type_put(&variant->tag->parent);
> + g_free(variant);
> +}
> +
> +static
> +void bt_ctf_field_type_array_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_array *array;
> +
> + if (!ref) {
> + return;
> + }
> +
> + array = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_array, parent);
> + bt_ctf_field_type_put(array->element_type);
> + g_free(array);
> +}
> +
> +static
> +void bt_ctf_field_type_sequence_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_sequence *sequence;
> +
> + if (!ref) {
> + return;
> + }
> +
> + sequence = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_sequence, parent);
> + bt_ctf_field_type_put(sequence->element_type);
> + g_string_free(sequence->length_field_name, TRUE);
> + g_free(sequence);
> +}
> +
> +static
> +void bt_ctf_field_type_string_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_field_type_string *string;
> +
> + if (!ref) {
> + return;
> + }
> +
> + string = container_of(
> + container_of(ref, struct bt_ctf_field_type, ref_count),
> + struct bt_ctf_field_type_string, parent);
> + g_free(string);
> +}
> +
> +static
> +void generic_field_type_freeze(struct bt_ctf_field_type *type)
> +{
> + type->frozen = 1;
> +}
> +
> +static
> +void bt_ctf_field_type_enumeration_freeze(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_enumeration *enumeration_type = container_of(
> + type, struct bt_ctf_field_type_enumeration, parent);
> +
> + generic_field_type_freeze(type);
> + bt_ctf_field_type_freeze(enumeration_type->container);
> +}
> +
> +static
> +void freeze_structure_field(struct structure_field *field)
> +{
> + bt_ctf_field_type_freeze(field->type);
> +}
> +
> +static
> +void bt_ctf_field_type_structure_freeze(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_structure *structure_type = container_of(
> + type, struct bt_ctf_field_type_structure, parent);
> +
> + generic_field_type_freeze(type);
> + g_ptr_array_foreach(structure_type->fields, (GFunc)freeze_structure_field,
> + NULL);
> +}
> +
> +static
> +void bt_ctf_field_type_variant_freeze(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_variant *variant_type = container_of(
> + type, struct bt_ctf_field_type_variant, parent);
> +
> + generic_field_type_freeze(type);
> + g_ptr_array_foreach(variant_type->fields, (GFunc)freeze_structure_field,
> + NULL);
> +}
> +
> +static
> +void bt_ctf_field_type_array_freeze(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_array *array_type = container_of(
> + type, struct bt_ctf_field_type_array, parent);
> +
> + generic_field_type_freeze(type);
> + bt_ctf_field_type_freeze(array_type->element_type);
> +}
> +
> +static
> +void bt_ctf_field_type_sequence_freeze(struct bt_ctf_field_type *type)
> +{
> + struct bt_ctf_field_type_sequence *sequence_type = container_of(
> + type, struct bt_ctf_field_type_sequence, parent);
> +
> + generic_field_type_freeze(type);
> + bt_ctf_field_type_freeze(sequence_type->element_type);
> +}
> +
> +static
> +const char *get_encoding_string(enum ctf_string_encoding encoding)
> +{
> + const char *encoding_string;
> +
> + switch (encoding) {
> + case CTF_STRING_NONE:
> + encoding_string = "none";
> + break;
> + case CTF_STRING_ASCII:
> + encoding_string = "ASCII";
> + break;
> + case CTF_STRING_UTF8:
> + encoding_string = "UTF8";
> + break;
> + default:
> + encoding_string = "unknown";
> + break;
> + }
> +
> + return encoding_string;
> +}
> +
> +static
> +const char *get_integer_base_string(enum bt_ctf_integer_base base)
> +{
> + const char *base_string;
> +
> + switch (base) {
> + case BT_CTF_INTEGER_BASE_DECIMAL:
> + base_string = "decimal";
> + break;
> + case BT_CTF_INTEGER_BASE_HEXADECIMAL:
> + base_string = "hexadecimal";
> + break;
> + case BT_CTF_INTEGER_BASE_OCTAL:
> + base_string = "octal";
> + break;
> + case BT_CTF_INTEGER_BASE_BINARY:
> + base_string = "binary";
> + break;
> + default:
> + base_string = "unknown";
> + break;
> + }
> +
> + return base_string;
> +}
> +
> +static
> +int bt_ctf_field_type_integer_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + struct bt_ctf_field_type_integer *integer = container_of(type,
> + struct bt_ctf_field_type_integer, parent);
> +
> + g_string_append_printf(context->string,
> + "integer { size = %zu; align = %zu; signed = %s; encoding = %s; base = %s;
> byte_order = %s; }",
> + integer->declaration.len, type->declaration->alignment,
> + (integer->declaration.signedness ? "true" : "false"),
> + get_encoding_string(integer->declaration.encoding),
> + get_integer_base_string(integer->declaration.base),
> + get_byte_order_string(integer->declaration.byte_order));
> + return 0;
> +}
> +
> +static
> +int bt_ctf_field_type_enumeration_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + size_t entry;
> + int ret = 0;
> + struct bt_ctf_field_type_enumeration *enumeration = container_of(type,
> + struct bt_ctf_field_type_enumeration, parent);
> +
> + g_string_append(context->string, "enum : ");
> + ret = bt_ctf_field_type_serialize(enumeration->container, context);
> + if (ret) {
> + goto end;
> + }
> +
> + g_string_append(context->string, " { ");
> + for (entry = 0; entry < enumeration->entries->len; entry++) {
> + struct enumeration_mapping *mapping =
> + enumeration->entries->pdata[entry];
> +
> + if (mapping->range_start == mapping->range_end) {
> + g_string_append_printf(context->string, "%s = %" PRId64,
> + g_quark_to_string(mapping->string),
> + mapping->range_start);
> + } else {
> + g_string_append_printf(context->string,
> + "%s = %" PRId64 " ... %" PRId64,
> + g_quark_to_string(mapping->string),
> + mapping->range_start, mapping->range_end);
> + }
> +
> + g_string_append(context->string,
> + ((entry != (enumeration->entries->len - 1)) ?
> + ", " : " }"));
> + }
> +
> + if (context->field_name->len) {
> + g_string_append_printf(context->string, " %s",
> + context->field_name->str);
> + g_string_assign(context->field_name, "");
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_type_floating_point_serialize(struct bt_ctf_field_type
> *type,
> + struct metadata_context *context)
> +{
> + struct bt_ctf_field_type_floating_point *floating_point = container_of(
> + type, struct bt_ctf_field_type_floating_point, parent);
> +
> + g_string_append_printf(context->string,
> + "floating_point { exp_dig = %zu; mant_dig = %zu; byte_order = %s; align =
> %zu; }",
> + floating_point->declaration.exp->len,
> + floating_point->declaration.mantissa->len + 1,
> + get_byte_order_string(floating_point->declaration.byte_order),
> + type->declaration->alignment);
> + return 0;
> +}
> +
> +static
> +int bt_ctf_field_type_structure_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + size_t i;
> + unsigned int indent;
> + int ret = 0;
> + struct bt_ctf_field_type_structure *structure = container_of(type,
> + struct bt_ctf_field_type_structure, parent);
> + GString *structure_field_name = context->field_name;
> +
> + context->field_name = g_string_new("");
> +
> + context->current_indentation_level++;
> + g_string_append(context->string, "struct {\n");
> +
> + for (i = 0; i < structure->fields->len; i++) {
> + struct structure_field *field;
> +
> + for (indent = 0; indent < context->current_indentation_level;
> + indent++) {
> + g_string_append_c(context->string, '\t');
> + }
> +
> + field = structure->fields->pdata[i];
> + g_string_assign(context->field_name,
> + g_quark_to_string(field->name));
> + ret = bt_ctf_field_type_serialize(field->type, context);
> + if (ret) {
> + goto end;
> + }
> +
> + if (context->field_name->len) {
> + g_string_append_printf(context->string, " %s",
> + context->field_name->str);
> + }
> + g_string_append(context->string, ";\n");
> + }
> +
> + context->current_indentation_level--;
> + for (indent = 0; indent < context->current_indentation_level;
> + indent++) {
> + g_string_append_c(context->string, '\t');
> + }
> +
> + g_string_append_printf(context->string, "} align(%zu)",
> + type->declaration->alignment);
> +end:
> + g_string_free(context->field_name, TRUE);
> + context->field_name = structure_field_name;
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_type_variant_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + size_t i;
> + unsigned int indent;
> + int ret = 0;
> + struct bt_ctf_field_type_variant *variant = container_of(
> + type, struct bt_ctf_field_type_variant, parent);
> + GString *variant_field_name = context->field_name;
> +
> + context->field_name = g_string_new("");
> + g_string_append_printf(context->string,
> + "variant <%s> {\n", variant->tag_name->str);
> + context->current_indentation_level++;
> + for (i = 0; i < variant->fields->len; i++) {
> + struct structure_field *field = variant->fields->pdata[i];
> +
> + g_string_assign(context->field_name,
> + g_quark_to_string(field->name));
> + for (indent = 0; indent < context->current_indentation_level;
> + indent++) {
> + g_string_append_c(context->string, '\t');
> + }
> +
> + g_string_assign(context->field_name,
> + g_quark_to_string(field->name));
> + ret = bt_ctf_field_type_serialize(field->type, context);
> + if (ret) {
> + goto end;
> + }
> +
> + if (context->field_name->len) {
> + g_string_append_printf(context->string, " %s;",
> + context->field_name->str);
> + }
> +
> + g_string_append_c(context->string, '\n');
> + }
> +
> + context->current_indentation_level--;
> + for (indent = 0; indent < context->current_indentation_level;
> + indent++) {
> + g_string_append_c(context->string, '\t');
> + }
> +
> + g_string_append(context->string, "}");
> +end:
> + g_string_free(context->field_name, TRUE);
> + context->field_name = variant_field_name;
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_type_array_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_array *array = container_of(type,
> + struct bt_ctf_field_type_array, parent);
> +
> + ret = bt_ctf_field_type_serialize(array->element_type, context);
> + if (ret) {
> + goto end;
> + }
> +
> + if (context->field_name->len) {
> + g_string_append_printf(context->string, " %s[%u]",
> + context->field_name->str, array->length);
> + g_string_assign(context->field_name, "");
> + } else {
> + g_string_append_printf(context->string, "[%u]", array->length);
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_type_sequence_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type_sequence *sequence = container_of(
> + type, struct bt_ctf_field_type_sequence, parent);
> +
> + ret = bt_ctf_field_type_serialize(sequence->element_type, context);
> + if (ret) {
> + goto end;
> + }
> +
> + if (context->field_name->len) {
> + g_string_append_printf(context->string, " %s[%s]",
> + context->field_name->str,
> + sequence->length_field_name->str);
> + g_string_assign(context->field_name, "");
> + } else {
> + g_string_append_printf(context->string, "[%s]",
> + sequence->length_field_name->str);
> + }
> +end:
> + return ret;
> +}
> +
> +static
> +int bt_ctf_field_type_string_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context)
> +{
> + struct bt_ctf_field_type_string *string = container_of(
> + type, struct bt_ctf_field_type_string, parent);
> +
> + g_string_append_printf(context->string,
> + "string { encoding = %s; }",
> + get_encoding_string(string->declaration.encoding));
> + return 0;
> +}
> +
> +static
> +void bt_ctf_field_type_integer_set_byte_order(struct bt_ctf_field_type
> *type,
> + int byte_order)
> +{
> + struct bt_ctf_field_type_integer *integer_type = container_of(type,
> + struct bt_ctf_field_type_integer, parent);
> +
> + integer_type->declaration.byte_order = byte_order;
> +}
> +
> +static
> +void bt_ctf_field_type_floating_point_set_byte_order(
> + struct bt_ctf_field_type *type, int byte_order)
> +{
> + struct bt_ctf_field_type_floating_point *floating_point_type =
> + container_of(type, struct bt_ctf_field_type_floating_point,
> + parent);
> +
> + floating_point_type->declaration.byte_order = byte_order;
> + floating_point_type->sign.byte_order = byte_order;
> + floating_point_type->mantissa.byte_order = byte_order;
> + floating_point_type->exp.byte_order = byte_order;
> +}
> diff --git a/formats/ctf/writer/event.c b/formats/ctf/writer/event.c
> new file mode 100644
> index 0000000..c7f1b22
> --- /dev/null
> +++ b/formats/ctf/writer/event.c
> @@ -0,0 +1,368 @@
> +/*
> + * event.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/event.h>
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/ctf-writer/event-fields-internal.h>
> +#include <babeltrace/ctf-writer/event-types-internal.h>
> +#include <babeltrace/ctf-writer/event-internal.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/compiler.h>
> +
> +static
> +void bt_ctf_event_class_destroy(struct bt_ctf_ref *ref);
> +static
> +void bt_ctf_event_destroy(struct bt_ctf_ref *ref);
> +
> +struct bt_ctf_event_class *bt_ctf_event_class_create(const char *name)
> +{
> + struct bt_ctf_event_class *event_class = NULL;
> +
> + if (validate_identifier(name)) {
> + goto end;
> + }
> +
> + event_class = g_new0(struct bt_ctf_event_class, 1);
> + if (!event_class) {
> + goto end;
> + }
> +
> + bt_ctf_ref_init(&event_class->ref_count);
> + event_class->name = g_quark_from_string(name);
> +end:
> + return event_class;
> +}
> +
> +int bt_ctf_event_class_add_field(struct bt_ctf_event_class *event_class,
> + struct bt_ctf_field_type *type,
> + const char *name)
> +{
> + int ret = 0;
> +
> + if (!event_class || !type || validate_identifier(name) ||
> + event_class->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (!event_class->fields) {
> + event_class->fields = bt_ctf_field_type_structure_create();
> + if (!event_class->fields) {
> + ret = -1;
> + goto end;
> + }
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(event_class->fields,
> + type, name);
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_event_class_get(struct bt_ctf_event_class *event_class)
> +{
> + if (!event_class) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&event_class->ref_count);
> +}
> +
> +void bt_ctf_event_class_put(struct bt_ctf_event_class *event_class)
> +{
> + if (!event_class) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&event_class->ref_count, bt_ctf_event_class_destroy);
> +}
> +
> +struct bt_ctf_event *bt_ctf_event_create(struct bt_ctf_event_class
> *event_class)
> +{
> + struct bt_ctf_event *event = NULL;
> +
> + if (!event_class) {
> + goto end;
> + }
> +
> + event = g_new0(struct bt_ctf_event, 1);
> + if (!event) {
> + goto end;
> + }
> +
> + bt_ctf_ref_init(&event->ref_count);
> + bt_ctf_event_class_get(event_class);
> + bt_ctf_event_class_freeze(event_class);
> + event->event_class = event_class;
> + event->context_payload = bt_ctf_field_create(event_class->context);
> + event->fields_payload = bt_ctf_field_create(event_class->fields);
> +end:
> + return event;
> +}
> +
> +int bt_ctf_event_set_payload(struct bt_ctf_event *event,
> + const char *name,
> + struct bt_ctf_field *value)
> +{
> + int ret = 0;
> +
> + if (!event || !value || validate_identifier(name)) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_field_structure_set_field(event->fields_payload,
> + name, value);
> +end:
> + return ret;
> +}
> +
> +
> +struct bt_ctf_field *bt_ctf_event_get_payload(struct bt_ctf_event *event,
> + const char *name)
> +{
> + struct bt_ctf_field *field = NULL;
> +
> + if (!event || !name) {
> + goto end;
> + }
> +
> + field = bt_ctf_field_structure_get_field(event->fields_payload, name);
> +end:
> + return field;
> +}
> +
> +void bt_ctf_event_get(struct bt_ctf_event *event)
> +{
> + if (!event) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&event->ref_count);
> +}
> +
> +void bt_ctf_event_put(struct bt_ctf_event *event)
> +{
> + if (!event) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&event->ref_count, bt_ctf_event_destroy);
> +}
> +
> +static
> +void bt_ctf_event_class_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_event_class *event_class;
> +
> + if (!ref) {
> + return;
> + }
> +
> + event_class = container_of(ref, struct bt_ctf_event_class, ref_count);
> + bt_ctf_field_type_put(event_class->context);
> + bt_ctf_field_type_put(event_class->fields);
> + g_free(event_class);
> +}
> +
> +static
> +void bt_ctf_event_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_event *event;
> +
> + if (!ref) {
> + return;
> + }
> +
> + event = container_of(ref, struct bt_ctf_event,
> + ref_count);
> + bt_ctf_event_class_put(event->event_class);
> + bt_ctf_field_put(event->context_payload);
> + bt_ctf_field_put(event->fields_payload);
> + g_free(event);
> +}
> +
> +BT_HIDDEN
> +void bt_ctf_event_class_freeze(struct bt_ctf_event_class *event_class)
> +{
> + assert(event_class);
> + event_class->frozen = 1;
> + bt_ctf_field_type_freeze(event_class->context);
> + bt_ctf_field_type_freeze(event_class->fields);
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_set_id(struct bt_ctf_event_class *event_class,
> + uint32_t id)
> +{
> + int ret = 0;
> +
> + if (event_class->id_set && id != event_class->id) {
> + ret = -1;
> + goto end;
> + }
> +
> + event_class->id = id;
> + event_class->id_set = 1;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +uint32_t bt_ctf_event_class_get_id(struct bt_ctf_event_class *event_class)
> +{
> + assert(event_class);
> + return event_class->id;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_set_stream_id(struct bt_ctf_event_class *event_class,
> + uint32_t id)
> +{
> + int ret = 0;
> +
> + assert(event_class);
> + if (event_class->stream_id_set && id != event_class->stream_id) {
> + ret = -1;
> + goto end;
> + }
> +
> + event_class->stream_id = id;
> + event_class->stream_id_set = 1;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_serialize(struct bt_ctf_event_class *event_class,
> + struct metadata_context *context)
> +{
> + int ret = 0;
> +
> + assert(event_class);
> + assert(context);
> + context->current_indentation_level = 1;
> + g_string_assign(context->field_name, "");
> + g_string_append_printf(context->string, "event {\n\tname = \"%s\";\n\tid =
> %u;\n\tstream_id = %" PRIu32 ";\n",
> + g_quark_to_string(event_class->name),
> + event_class->id,
> + event_class->stream_id);
> +
> + 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;
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_validate(struct bt_ctf_event *event)
> +{
> + /* Make sure each field's payload has been set */
> + int ret;
> +
> + assert(event);
> + ret = bt_ctf_field_validate(event->fields_payload);
> + if (ret) {
> + goto end;
> + }
> +
> + if (event->event_class->context) {
> + ret = bt_ctf_field_validate(event->context_payload);
> + }
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_serialize(struct bt_ctf_event *event,
> + struct ctf_stream_pos *pos)
> +{
> + int ret = 0;
> +
> + assert(event);
> + assert(pos);
> + if (event->context_payload) {
> + ret = bt_ctf_field_serialize(event->context_payload, pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +
> + if (event->fields_payload) {
> + ret = bt_ctf_field_serialize(event->fields_payload, pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_event_set_timestamp(struct bt_ctf_event *event,
> + uint64_t timestamp)
> +{
> + int ret = 0;
> +
> + assert(event);
> + if (event->timestamp) {
> + ret = -1;
> + goto end;
> + }
> +
> + event->timestamp = timestamp;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +uint64_t bt_ctf_event_get_timestamp(struct bt_ctf_event *event)
> +{
> + assert(event);
> + return event->timestamp;
> +}
> diff --git a/formats/ctf/writer/functor.c b/formats/ctf/writer/functor.c
> new file mode 100644
> index 0000000..9c932cf
> --- /dev/null
> +++ b/formats/ctf/writer/functor.c
> @@ -0,0 +1,38 @@
> +/*
> + * functor.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <glib.h>
> +#include <babeltrace/ctf-writer/functor-internal.h>
> +
> +BT_HIDDEN
> +void value_exists(gpointer element, gpointer search_query)
> +{
> + if (element == ((struct search_query *)search_query)->value) {
> + ((struct search_query *)search_query)->found = 1;
> + }
> +}
> diff --git a/formats/ctf/writer/stream.c b/formats/ctf/writer/stream.c
> new file mode 100644
> index 0000000..f03f170
> --- /dev/null
> +++ b/formats/ctf/writer/stream.c
> @@ -0,0 +1,697 @@
> +/*
> + * stream.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/clock.h>
> +#include <babeltrace/ctf-writer/clock-internal.h>
> +#include <babeltrace/ctf-writer/event.h>
> +#include <babeltrace/ctf-writer/event-internal.h>
> +#include <babeltrace/ctf-writer/event-types-internal.h>
> +#include <babeltrace/ctf-writer/event-fields-internal.h>
> +#include <babeltrace/ctf-writer/stream.h>
> +#include <babeltrace/ctf-writer/stream-internal.h>
> +#include <babeltrace/ctf-writer/functor-internal.h>
> +#include <babeltrace/compiler.h>
> +#include <babeltrace/align.h>
> +
> +static
> +void bt_ctf_stream_destroy(struct bt_ctf_ref *ref);
> +static
> +void bt_ctf_stream_class_destroy(struct bt_ctf_ref *ref);
> +static
> +int init_event_header(struct bt_ctf_stream_class *stream_class,
> + enum bt_ctf_byte_order byte_order);
> +static
> +int init_packet_context(struct bt_ctf_stream_class *stream_class,
> + enum bt_ctf_byte_order byte_order);
> +static
> +int set_structure_field_integer(struct bt_ctf_field *, char *, uint64_t);
> +
> +struct bt_ctf_stream_class *bt_ctf_stream_class_create(const char *name)
> +{
> + struct bt_ctf_stream_class *stream_class = NULL;
> +
> + if (!name || !strlen(name)) {
> + goto error;
> + }
> +
> + stream_class = g_new0(struct bt_ctf_stream_class, 1);
> + if (!stream_class) {
> + goto error;
> + }
> +
> + stream_class->name = g_string_new(name);
> + stream_class->event_classes = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_event_class_put);
> + if (!stream_class->event_classes) {
> + goto error_destroy;
> + }
> +
> + bt_ctf_ref_init(&stream_class->ref_count);
> + return stream_class;
> +
> +error_destroy:
> + bt_ctf_stream_class_destroy(&stream_class->ref_count);
> + stream_class = NULL;
> +error:
> + return stream_class;
> +}
> +
> +int bt_ctf_stream_class_set_clock(struct bt_ctf_stream_class *stream_class,
> + struct bt_ctf_clock *clock)
> +{
> + int ret = 0;
> +
> + if (!stream_class || !clock || stream_class->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (stream_class->clock) {
> + bt_ctf_clock_put(stream_class->clock);
> + }
> +
> + stream_class->clock = clock;
> + bt_ctf_clock_get(clock);
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_stream_class_add_event_class(
> + struct bt_ctf_stream_class *stream_class,
> + struct bt_ctf_event_class *event_class)
> +{
> + int ret = 0;
> +
> + if (!stream_class || !event_class) {
> + ret = -1;
> + goto end;
> + }
> +
> + /* Check for duplicate event classes */
> + struct search_query query = { .value = event_class, .found = 0 };
> + g_ptr_array_foreach(stream_class->event_classes, value_exists, &query);
> + if (query.found) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (bt_ctf_event_class_set_id(event_class,
> + stream_class->next_event_id++)) {
> + /* The event is already associated to a stream class */
> + ret = -1;
> + goto end;
> + }
> +
> + bt_ctf_event_class_get(event_class);
> + g_ptr_array_add(stream_class->event_classes, event_class);
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_stream_class_get(struct bt_ctf_stream_class *stream_class)
> +{
> + if (!stream_class) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&stream_class->ref_count);
> +}
> +
> +void bt_ctf_stream_class_put(struct bt_ctf_stream_class *stream_class)
> +{
> + if (!stream_class) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&stream_class->ref_count, bt_ctf_stream_class_destroy);
> +}
> +
> +BT_HIDDEN
> +void bt_ctf_stream_class_freeze(struct bt_ctf_stream_class *stream_class)
> +{
> + if (!stream_class) {
> + return;
> + }
> +
> + stream_class->frozen = 1;
> + bt_ctf_clock_freeze(stream_class->clock);
> + g_ptr_array_foreach(stream_class->event_classes,
> + (GFunc)bt_ctf_event_class_freeze, NULL);
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_set_id(struct bt_ctf_stream_class *stream_class,
> + uint32_t id)
> +{
> + int ret = 0;
> +
> + if (!stream_class ||
> + (stream_class->id_set && (id != stream_class->id))) {
> + ret = -1;
> + goto end;
> + }
> +
> + stream_class->id = id;
> + stream_class->id_set = 1;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_set_byte_order(struct bt_ctf_stream_class
> *stream_class,
> + enum bt_ctf_byte_order byte_order)
> +{
> + int ret = 0;
> +
> + ret = init_packet_context(stream_class, byte_order);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = init_event_header(stream_class, byte_order);
> + if (ret) {
> + goto end;
> + }
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_serialize(struct bt_ctf_stream_class *stream_class,
> + struct metadata_context *context)
> +{
> + int ret = 0;
> + size_t i;
> +
> + g_string_assign(context->field_name, "");
> + context->current_indentation_level = 1;
> + if (!stream_class->id_set) {
> + ret = -1;
> + goto end;
> + }
> +
> + g_string_append_printf(context->string,
> + "stream {\n\tid = %" PRIu32 ";\n\tevent.header := ",
> + stream_class->id);
> + ret = bt_ctf_field_type_serialize(stream_class->event_header_type,
> + context);
> + if (ret) {
> + goto end;
> + }
> +
> + g_string_append(context->string, ";\n\n\tpacket.context := ");
> + ret = bt_ctf_field_type_serialize(stream_class->packet_context_type,
> + context);
> + if (ret) {
> + goto end;
> + }
> +
> + if (stream_class->event_context_type) {
> + g_string_append(context->string, ";\n\n\tevent.context := ");
> + ret = bt_ctf_field_type_serialize(
> + stream_class->event_context_type, context);
> + if (ret) {
> + goto end;
> + }
> + }
> +
> + g_string_append(context->string, ";\n};\n\n");
> +
> + /* Assign this stream's ID to every event and serialize them */
> + g_ptr_array_foreach(stream_class->event_classes,
> + (GFunc) bt_ctf_event_class_set_stream_id,
> + GUINT_TO_POINTER(stream_class->id));
> + for (i = 0; i < stream_class->event_classes->len; i++) {
> + struct bt_ctf_event_class *event_class =
> + stream_class->event_classes->pdata[i];
> +
> + ret = bt_ctf_event_class_set_stream_id(event_class,
> + stream_class->id);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_event_class_serialize(event_class, context);
> + if (ret) {
> + goto end;
> + }
> + }
> +end:
> + context->current_indentation_level = 0;
> + return ret;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_stream *bt_ctf_stream_create(
> + struct bt_ctf_stream_class *stream_class)
> +{
> + struct bt_ctf_stream *stream = NULL;
> +
> + if (!stream_class) {
> + goto end;
> + }
> +
> + stream = g_new0(struct bt_ctf_stream, 1);
> + if (!stream) {
> + goto end;
> + }
> +
> + bt_ctf_ref_init(&stream->ref_count);
> + stream->pos.fd = -1;
> + stream->id = stream_class->next_stream_id++;
> + stream->stream_class = stream_class;
> + bt_ctf_stream_class_get(stream_class);
> + bt_ctf_stream_class_freeze(stream_class);
> + stream->events = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_event_put);
> +end:
> + return stream;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_stream_set_flush_callback(struct bt_ctf_stream *stream,
> + flush_func callback, void *data)
> +{
> + int ret = stream ? 0 : -1;
> +
> + if (!stream) {
> + goto end;
> + }
> +
> + stream->flush.func = callback;
> + stream->flush.data = data;
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +int bt_ctf_stream_set_fd(struct bt_ctf_stream *stream, int fd)
> +{
> + int ret = 0;
> +
> + if (stream->pos.fd != -1) {
> + ret = -1;
> + goto end;
> + }
> +
> + ctf_init_pos(&stream->pos, NULL, fd, O_RDWR);
> + stream->pos.fd = fd;
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_stream_append_discarded_events(struct bt_ctf_stream *stream,
> + uint64_t event_count)
> +{
> + if (!stream) {
> + return;
> + }
> +
> + stream->events_discarded += event_count;
> +}
> +
> +int bt_ctf_stream_append_event(struct bt_ctf_stream *stream,
> + struct bt_ctf_event *event)
> +{
> + int ret = 0;
> + uint64_t timestamp;
> +
> + if (!stream || !event) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_event_validate(event);
> + if (ret) {
> + goto end;
> + }
> +
> + timestamp = bt_ctf_clock_get_time(stream->stream_class->clock);
> + ret = bt_ctf_event_set_timestamp(event, timestamp);
> + if (ret) {
> + goto end;
> + }
> +
> + bt_ctf_event_get(event);
> + g_ptr_array_add(stream->events, event);
> +end:
> + return ret;
> +}
> +
> +int bt_ctf_stream_flush(struct bt_ctf_stream *stream)
> +{
> + int ret = 0;
> + size_t i;
> + uint64_t timestamp_begin, timestamp_end;
> + struct bt_ctf_stream_class *stream_class = stream->stream_class;
> + struct bt_ctf_field *integer = NULL;
> + struct ctf_stream_pos packet_context_pos;
> +
> + if (!stream) {
> + ret = -1;
> + goto end;
> + }
> +
> + if (!stream->events->len) {
> + goto end;
> + }
> +
> + if (stream->flush.func) {
> + stream->flush.func(stream, stream->flush.data);
> + }
> +
> + timestamp_begin = ((struct bt_ctf_event *) g_ptr_array_index(
> + stream->events, 0))->timestamp;
> + timestamp_end = ((struct bt_ctf_event *) g_ptr_array_index(
> + stream->events, stream->events->len - 1))->timestamp;
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "timestamp_begin", timestamp_begin);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "timestamp_end", timestamp_end);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "events_discarded", stream->events_discarded);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "content_size", UINT64_MAX);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "packet_size", UINT64_MAX);
> + if (ret) {
> + goto end;
> + }
> +
> + /* Write packet context */
> + memcpy(&packet_context_pos, &stream->pos,
> + sizeof(struct ctf_stream_pos));
> + ret = bt_ctf_field_serialize(stream_class->packet_context,
> + &stream->pos);
> + if (ret) {
> + goto end;
> + }
> +
> + for (i = 0; i < stream->events->len; i++) {
> + struct bt_ctf_event *event = g_ptr_array_index(
> + stream->events, i);
> + uint32_t event_id = bt_ctf_event_class_get_id(
> + event->event_class);
> + uint64_t timestamp = bt_ctf_event_get_timestamp(event);
> +
> + ret = set_structure_field_integer(stream_class->event_header,
> + "id", event_id);
> + if (ret) {
> + goto end;
> + }
> + ret = set_structure_field_integer(stream_class->event_header,
> + "timestamp", timestamp);
> + if (ret) {
> + goto end;
> + }
> +
> + /* Write event header */
> + ret = bt_ctf_field_serialize(stream_class->event_header,
> + &stream->pos);
> + if (ret) {
> + goto end;
> + }
> +
> + /* Write event content */
> + ret = bt_ctf_event_serialize(event, &stream->pos);
> + if (ret) {
> + goto end;
> + }
> + }
> +
> + /*
> + * Update the packet total size and content size and overwrite the
> + * packet context.
> + */
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "content_size", stream->pos.offset);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = set_structure_field_integer(stream_class->packet_context,
> + "packet_size", stream->pos.packet_size);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_serialize(stream_class->packet_context,
> + &packet_context_pos);
> + if (ret) {
> + goto end;
> + }
> +
> + g_ptr_array_set_size(stream->events, 0);
> + stream->flushed_packet_count++;
> +end:
> + bt_ctf_field_put(integer);
> + return ret;
> +}
> +
> +void bt_ctf_stream_get(struct bt_ctf_stream *stream)
> +{
> + if (!stream) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&stream->ref_count);
> +}
> +
> +void bt_ctf_stream_put(struct bt_ctf_stream *stream)
> +{
> + if (!stream) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&stream->ref_count, bt_ctf_stream_destroy);
> +}
> +
> +static
> +void bt_ctf_stream_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_stream *stream;
> +
> + if (!ref) {
> + return;
> + }
> +
> + stream = container_of(ref, struct bt_ctf_stream, ref_count);
> + ctf_fini_pos(&stream->pos);
> + close(stream->pos.fd);
> + bt_ctf_stream_class_put(stream->stream_class);
> + g_ptr_array_free(stream->events, TRUE);
> + g_free(stream);
> +}
> +
> +static
> +void bt_ctf_stream_class_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_stream_class *stream_class;
> +
> + if (!ref) {
> + return;
> + }
> +
> + stream_class = container_of(ref, struct bt_ctf_stream_class, ref_count);
> + bt_ctf_clock_put(stream_class->clock);
> +
> + if (stream_class->event_classes) {
> + g_ptr_array_free(stream_class->event_classes, TRUE);
> + }
> +
> + if (stream_class->name) {
> + g_string_free(stream_class->name, TRUE);
> + }
> +
> + bt_ctf_field_type_put(stream_class->event_header_type);
> + bt_ctf_field_put(stream_class->event_header);
> + bt_ctf_field_type_put(stream_class->packet_context_type);
> + bt_ctf_field_put(stream_class->packet_context);
> + bt_ctf_field_type_put(stream_class->event_context_type);
> + bt_ctf_field_put(stream_class->event_context);
> + g_free(stream_class);
> +}
> +
> +static
> +int init_event_header(struct bt_ctf_stream_class *stream_class,
> + enum bt_ctf_byte_order byte_order)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type *event_header_type =
> + bt_ctf_field_type_structure_create();
> + struct bt_ctf_field_type *_uint32_t =
> + get_field_type(FIELD_TYPE_ALIAS_UINT32_T);
> + struct bt_ctf_field_type *_uint64_t =
> + get_field_type(FIELD_TYPE_ALIAS_UINT64_T);
> +
> + if (!event_header_type) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_set_byte_order(_uint32_t, byte_order);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_set_byte_order(_uint64_t, byte_order);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(event_header_type,
> + _uint32_t, "id");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(event_header_type,
> + _uint64_t, "timestamp");
> + if (ret) {
> + goto end;
> + }
> +
> + stream_class->event_header_type = event_header_type;
> + stream_class->event_header = bt_ctf_field_create(
> + stream_class->event_header_type);
> + if (!stream_class->event_header) {
> + ret = -1;
> + }
> +end:
> + if (ret) {
> + bt_ctf_field_type_put(event_header_type);
> + }
> +
> + bt_ctf_field_type_put(_uint32_t);
> + bt_ctf_field_type_put(_uint64_t);
> + return ret;
> +}
> +
> +static
> +int init_packet_context(struct bt_ctf_stream_class *stream_class,
> + enum bt_ctf_byte_order byte_order)
> +{
> + int ret = 0;
> + struct bt_ctf_field_type *packet_context_type =
> + bt_ctf_field_type_structure_create();
> + struct bt_ctf_field_type *_uint64_t =
> + get_field_type(FIELD_TYPE_ALIAS_UINT64_T);
> +
> + if (!packet_context_type) {
> + ret = -1;
> + goto end;
> + }
> +
> + /*
> + * We create a stream packet context as proposed in the CTF
> + * specification.
> + */
> + ret = bt_ctf_field_type_set_byte_order(_uint64_t, byte_order);
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(packet_context_type,
> + _uint64_t, "timestamp_begin");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(packet_context_type,
> + _uint64_t, "timestamp_end");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(packet_context_type,
> + _uint64_t, "content_size");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(packet_context_type,
> + _uint64_t, "packet_size");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(packet_context_type,
> + _uint64_t, "events_discarded");
> + if (ret) {
> + goto end;
> + }
> +
> + stream_class->packet_context_type = packet_context_type;
> + stream_class->packet_context = bt_ctf_field_create(packet_context_type);
> + if (!stream_class->packet_context) {
> + ret = -1;
> + }
> +end:
> + if (ret) {
> + bt_ctf_field_type_put(packet_context_type);
> + goto end;
> + }
> +
> + bt_ctf_field_type_put(_uint64_t);
> + return ret;
> +}
> +
> +static
> +int set_structure_field_integer(struct bt_ctf_field *structure, char *name,
> + uint64_t value)
> +{
> + int ret = 0;
> +
> + struct bt_ctf_field *integer =
> + bt_ctf_field_structure_get_field(structure, name);
> + if (!integer) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_field_unsigned_integer_set_value(integer, value);
> +end:
> + bt_ctf_field_put(integer);
> + return ret;
> +}
> diff --git a/formats/ctf/writer/writer.c b/formats/ctf/writer/writer.c
> new file mode 100644
> index 0000000..7490715
> --- /dev/null
> +++ b/formats/ctf/writer/writer.c
> @@ -0,0 +1,744 @@
> +/*
> + * writer.c
> + *
> + * Babeltrace CTF Writer
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/writer.h>
> +#include <babeltrace/ctf-writer/clock.h>
> +#include <babeltrace/ctf-writer/clock-internal.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/ctf-writer/event-types-internal.h>
> +#include <babeltrace/ctf-writer/event-fields-internal.h>
> +#include <babeltrace/ctf-writer/functor-internal.h>
> +#include <babeltrace/ctf-writer/stream-internal.h>
> +#include <babeltrace/ctf-writer/stream.h>
> +#include <babeltrace/compiler.h>
> +#include <stdio.h>
> +#include <stdlib.h>
> +#include <sys/stat.h>
> +#include <errno.h>
> +#include <unistd.h>
> +#include <fcntl.h>
> +#include <inttypes.h>
> +
> +#define DEFAULT_IDENTIFIER_SIZE 128
> +#define DEFAULT_METADATA_STRING_SIZE 4096
> +
> +static
> +void environment_variable_destroy(struct environment_variable *var);
> +static
> +void bt_ctf_writer_destroy(struct bt_ctf_ref *ref);
> +static
> +int init_trace_packet_header(struct bt_ctf_writer *writer);
> +static
> +int create_stream_file(struct bt_ctf_writer *writer,
> + struct bt_ctf_stream *stream);
> +static
> +void stream_flush_cb(struct bt_ctf_stream *stream,
> + struct bt_ctf_writer *writer);
> +
> +static
> +const char * const reserved_keywords_str[] = {"align", "callsite",
> + "const", "char", "clock", "double", "enum", "env", "event",
> + "floating_point", "float", "integer", "int", "long", "short", "signed",
> + "stream", "string", "struct", "trace", "typealias", "typedef",
> + "unsigned", "variant", "void" "_Bool", "_Complex", "_Imaginary"};
> +
> +static
> +const unsigned int field_type_aliases_alignments[] = {
> + [FIELD_TYPE_ALIAS_UINT5_T] = 1,
> + [FIELD_TYPE_ALIAS_UINT8_T ... FIELD_TYPE_ALIAS_UINT16_T] = 8,
> + [FIELD_TYPE_ALIAS_UINT27_T] = 1,
> + [FIELD_TYPE_ALIAS_UINT32_T ... FIELD_TYPE_ALIAS_UINT64_T] = 8,
> +};
> +
> +static
> +const unsigned int field_type_aliases_sizes[] = {
> + [FIELD_TYPE_ALIAS_UINT5_T] = 5,
> + [FIELD_TYPE_ALIAS_UINT8_T] = 8,
> + [FIELD_TYPE_ALIAS_UINT16_T] = 16,
> + [FIELD_TYPE_ALIAS_UINT27_T] = 27,
> + [FIELD_TYPE_ALIAS_UINT32_T] = 32,
> + [FIELD_TYPE_ALIAS_UINT64_T] = 64,
> +};
> +
> +static GHashTable *reserved_keywords_set;
> +static int init_done;
> +static int global_data_refcount;
> +
> +struct bt_ctf_writer *bt_ctf_writer_create(const char *path)
> +{
> + struct bt_ctf_writer *writer = NULL;
> +
> + if (!path) {
> + goto error;
> + }
> +
> + writer = g_new0(struct bt_ctf_writer, 1);
> + if (!writer) {
> + goto error;
> + }
> +
> + bt_ctf_writer_set_byte_order(writer, BT_CTF_BYTE_ORDER_NATIVE);
> + bt_ctf_ref_init(&writer->ref_count);
> + writer->path = g_string_new(path);
> + if (!writer->path) {
> + goto error_destroy;
> + }
> +
> + /* Create trace directory if necessary and open a metadata file */
> + if (g_mkdir_with_parents(path, S_IRWXU | S_IRWXG)) {
> + perror("g_mkdir_with_parents");
> + goto error_destroy;
> + }
> +
> + writer->trace_dir_fd = open(path, O_RDONLY | O_DIRECTORY,
> + S_IRWXU | S_IRWXG);
> + if (writer->trace_dir_fd < 0) {
> + perror("open");
> + goto error_destroy;
> + }
> +
> + writer->metadata_fd = openat(writer->trace_dir_fd, "metadata",
> + O_WRONLY | O_CREAT | O_TRUNC,
> + S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP);
> + writer->environment = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)environment_variable_destroy);
> + writer->clocks = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_clock_put);
> + writer->streams = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_stream_put);
> + writer->stream_classes = g_ptr_array_new_with_free_func(
> + (GDestroyNotify)bt_ctf_stream_class_put);
> + if (!writer->environment || !writer->clocks ||
> + !writer->stream_classes || !writer->streams) {
> + goto error_destroy;
> + }
> +
> + /* Generate a trace UUID */
> + uuid_generate(writer->uuid);
> + if (init_trace_packet_header(writer)) {
> + goto error_destroy;
> + }
> +
> + return writer;
> +error_destroy:
> + unlinkat(writer->trace_dir_fd, "metadata", 0);
> + bt_ctf_writer_destroy(&writer->ref_count);
> + writer = NULL;
> +error:
> + return writer;
> +}
> +
> +void bt_ctf_writer_destroy(struct bt_ctf_ref *ref)
> +{
> + struct bt_ctf_writer *writer;
> +
> + if (!ref) {
> + return;
> + }
> +
> + writer = container_of(ref, struct bt_ctf_writer, ref_count);
> + bt_ctf_writer_flush_metadata(writer);
> + if (writer->path) {
> + g_string_free(writer->path, TRUE);
> + }
> +
> + if (writer->trace_dir_fd > 0) {
> + close(writer->trace_dir_fd);
> + }
> +
> + if (writer->metadata_fd > 0) {
> + close(writer->metadata_fd);
> + }
> +
> + if (writer->environment) {
> + g_ptr_array_free(writer->environment, TRUE);
> + }
> +
> + if (writer->clocks) {
> + g_ptr_array_free(writer->clocks, TRUE);
> + }
> +
> + if (writer->streams) {
> + g_ptr_array_free(writer->streams, TRUE);
> + }
> +
> + if (writer->stream_classes) {
> + g_ptr_array_free(writer->stream_classes, TRUE);
> + }
> +
> + bt_ctf_field_type_put(writer->trace_packet_header_type);
> + bt_ctf_field_put(writer->trace_packet_header);
> + g_free(writer);
> +}
> +
> +struct bt_ctf_stream *bt_ctf_writer_create_stream(struct bt_ctf_writer
> *writer,
> + struct bt_ctf_stream_class *stream_class)
> +{
> + int ret;
> + int stream_class_found = 0;
> + size_t i;
> + int stream_fd;
> + struct bt_ctf_stream *stream = NULL;
> +
> + if (!writer || !stream_class) {
> + goto error;
> + }
> +
> + stream = bt_ctf_stream_create(stream_class);
> + if (!stream) {
> + goto error;
> + }
> +
> + stream_fd = create_stream_file(writer, stream);
> + if (stream_fd < 0 || bt_ctf_stream_set_fd(stream, stream_fd)) {
> + goto error;
> + }
> +
> + bt_ctf_stream_set_flush_callback(stream, (flush_func)stream_flush_cb,
> + writer);
> + ret = bt_ctf_stream_class_set_byte_order(stream->stream_class,
> + writer->byte_order == LITTLE_ENDIAN ?
> + BT_CTF_BYTE_ORDER_LITTLE_ENDIAN : BT_CTF_BYTE_ORDER_BIG_ENDIAN);
> + if (ret) {
> + goto error;
> + }
> +
> + for (i = 0; i < writer->stream_classes->len; i++) {
> + if (writer->stream_classes->pdata[i] == stream->stream_class) {
> + stream_class_found = 1;
> + }
> + }
> +
> + if (!stream_class_found) {
> + if (bt_ctf_stream_class_set_id(stream->stream_class,
> + writer->next_stream_id++)) {
> + goto error;
> + }
> +
> + bt_ctf_stream_class_get(stream->stream_class);
> + g_ptr_array_add(writer->stream_classes, stream->stream_class);
> + }
> +
> + bt_ctf_stream_get(stream);
> + g_ptr_array_add(writer->streams, stream);
> + writer->frozen = 1;
> + return stream;
> +error:
> + bt_ctf_stream_put(stream);
> + return NULL;
> +}
> +
> +int bt_ctf_writer_add_environment_field(struct bt_ctf_writer *writer,
> + const char *name,
> + const char *value)
> +{
> + struct environment_variable *var = NULL;
> + char *escaped_value = NULL;
> + int ret = 0;
> +
> + if (!writer || !name || !value || validate_identifier(name)) {
> + ret = -1;
> + goto error;
> + }
> +
> + if (strchr(name, ' ')) {
> + ret = -1;
> + goto error;
> + }
> +
> + var = g_new0(struct environment_variable, 1);
> + if (!var) {
> + ret = -1;
> + goto error;
> + }
> +
> + escaped_value = g_strescape(value, NULL);
> + if (!escaped_value) {
> + ret = -1;
> + goto error;
> + }
> +
> + var->name = g_string_new(name);
> + var->value = g_string_new(escaped_value);
> + g_free(escaped_value);
> + if (!var->name || !var->value) {
> + ret = -1;
> + goto error;
> + }
> +
> + g_ptr_array_add(writer->environment, var);
> + return ret;
> +
> +error:
> + if (var && var->name) {
> + g_string_free(var->name, TRUE);
> + }
> +
> + if (var && var->value) {
> + g_string_free(var->value, TRUE);
> + }
> +
> + g_free(var);
> + return ret;
> +}
> +
> +int bt_ctf_writer_add_clock(struct bt_ctf_writer *writer,
> + struct bt_ctf_clock *clock)
> +{
> + int ret = 0;
> + struct search_query query = { .value = clock, .found = 0 };
> +
> + if (!writer || !clock) {
> + ret = -1;
> + goto end;
> + }
> +
> + /* Check for duplicate clocks */
> + g_ptr_array_foreach(writer->clocks, value_exists, &query);
> + if (query.found) {
> + ret = -1;
> + goto end;
> + }
> +
> + bt_ctf_clock_get(clock);
> + g_ptr_array_add(writer->clocks, clock);
> +end:
> + return ret;
> +}
> +
> +BT_HIDDEN
> +const char *get_byte_order_string(int byte_order)
> +{
> + const char *string;
> +
> + switch (byte_order) {
> + case LITTLE_ENDIAN:
> + string = "le";
> + break;
> + case BIG_ENDIAN:
> + string = "be";
> + break;
> + default:
> + string = "unknown";
> + break;
> + }
> +
> + return string;
> +}
> +
> +static
> +void append_trace_metadata(struct bt_ctf_writer *writer,
> + struct metadata_context *context)
> +{
> + g_string_append(context->string, "trace {\n");
> +
> + g_string_append(context->string, "\tmajor = 1;\n");
> + g_string_append(context->string, "\tminor = 8;\n");
> +
> + unsigned char *uuid = writer->uuid;
> + g_string_append_printf(context->string,
> + "\tuuid =
> \"%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x\";\n",
> + uuid[0], uuid[1], uuid[2], uuid[3],
> + uuid[4], uuid[5], uuid[6], uuid[7],
> + uuid[8], uuid[9], uuid[10], uuid[11],
> + uuid[12], uuid[13], uuid[14], uuid[15]);
> + g_string_append_printf(context->string, "\tbyte_order = %s;\n",
> + get_byte_order_string(writer->byte_order));
> +
> + g_string_append(context->string, "\tpacket.header := ");
> + context->current_indentation_level++;
> + g_string_assign(context->field_name, "");
> + bt_ctf_field_type_serialize(writer->trace_packet_header_type, context);
> + context->current_indentation_level--;
> +
> + g_string_append(context->string, ";\n};\n\n");
> +}
> +
> +static
> +void append_env_field_metadata(struct environment_variable *var,
> + struct metadata_context *context)
> +{
> + g_string_append_printf(context->string, "\t%s = \"%s\";\n",
> + var->name->str, var->value->str);
> +}
> +
> +static
> +void append_env_metadata(struct bt_ctf_writer *writer,
> + struct metadata_context *context)
> +{
> + if (writer->environment->len == 0) {
> + return;
> + }
> +
> + g_string_append(context->string, "env {\n");
> + g_ptr_array_foreach(writer->environment,
> + (GFunc)append_env_field_metadata, context);
> + g_string_append(context->string, "};\n\n");
> +}
> +
> +char *bt_ctf_writer_get_metadata_string(struct bt_ctf_writer *writer)
> +{
> + char *metadata = NULL;
> + struct metadata_context *context = NULL;
> + int err = 0;
> + size_t i;
> +
> + if (!writer) {
> + goto end;
> + }
> +
> + context = g_new0(struct metadata_context, 1);
> + if (!context) {
> + goto end;
> + }
> +
> + context->field_name = g_string_sized_new(DEFAULT_IDENTIFIER_SIZE);
> + context->string = g_string_sized_new(DEFAULT_METADATA_STRING_SIZE);
> + g_string_append(context->string, "/* CTF 1.8 */\n\n");
> + append_trace_metadata(writer, context);
> + append_env_metadata(writer, context);
> + g_ptr_array_foreach(writer->clocks,
> + (GFunc)bt_ctf_clock_serialize, context);
> +
> + for (i = 0; i < writer->stream_classes->len; i++) {
> + err = bt_ctf_stream_class_serialize(
> + writer->stream_classes->pdata[i], context);
> + if (err) {
> + goto error;
> + }
> + }
> +
> + metadata = context->string->str;
> +error:
> + g_string_free(context->string, err ? TRUE : FALSE);
> + g_string_free(context->field_name, TRUE);
> + g_free(context);
> +end:
> + return metadata;
> +}
> +
> +void bt_ctf_writer_flush_metadata(struct bt_ctf_writer *writer)
> +{
> + int ret;
> + char *metadata_string = NULL;
> +
> + if (!writer) {
> + goto end;
> + }
> +
> + metadata_string = bt_ctf_writer_get_metadata_string(writer);
> + if (!metadata_string) {
> + goto end;
> + }
> +
> + if (lseek(writer->metadata_fd, 0, SEEK_SET) == (off_t)-1) {
> + perror("lseek");
> + goto end;
> + }
> +
> + if (ftruncate(writer->metadata_fd, 0)) {
> + perror("ftruncate");
> + goto end;
> + }
> +
> + ret = write(writer->metadata_fd, metadata_string,
> + strlen(metadata_string));
> + if (ret < 0) {
> + perror("write");
> + goto end;
> + }
> +end:
> + g_free(metadata_string);
> +}
> +
> +int bt_ctf_writer_set_byte_order(struct bt_ctf_writer *writer,
> + enum bt_ctf_byte_order byte_order)
> +{
> + int ret = 0;
> + int internal_byte_order;
> +
> + if (!writer || writer->frozen) {
> + ret = -1;
> + goto end;
> + }
> +
> + switch (byte_order) {
> + case BT_CTF_BYTE_ORDER_NATIVE:
> + internal_byte_order = (G_BYTE_ORDER == G_LITTLE_ENDIAN) ?
> + LITTLE_ENDIAN : BIG_ENDIAN;
> + break;
> + case BT_CTF_BYTE_ORDER_LITTLE_ENDIAN:
> + internal_byte_order = LITTLE_ENDIAN;
> + break;
> + case BT_CTF_BYTE_ORDER_BIG_ENDIAN:
> + case BT_CTF_BYTE_ORDER_NETWORK:
> + internal_byte_order = BIG_ENDIAN;
> + break;
> + default:
> + ret = -1;
> + goto end;
> + }
> +
> + writer->byte_order = internal_byte_order;
> + if (writer->trace_packet_header_type ||
> + writer->trace_packet_header) {
> + init_trace_packet_header(writer);
> + }
> +end:
> + return ret;
> +}
> +
> +void bt_ctf_writer_get(struct bt_ctf_writer *writer)
> +{
> + if (!writer) {
> + return;
> + }
> +
> + bt_ctf_ref_get(&writer->ref_count);
> +}
> +
> +void bt_ctf_writer_put(struct bt_ctf_writer *writer)
> +{
> + if (!writer) {
> + return;
> + }
> +
> + bt_ctf_ref_put(&writer->ref_count, bt_ctf_writer_destroy);
> +}
> +
> +BT_HIDDEN
> +int validate_identifier(const char *input_string)
> +{
> + int ret = 0;
> + char *string = NULL;
> + char *save_ptr, *token;
> +
> + if (!input_string || input_string[0] == '\0') {
> + ret = -1;
> + goto end;
> + }
> +
> + string = strdup(input_string);
> + if (!string) {
> + ret = -1;
> + goto end;
> + }
> +
> + token = strtok_r(string, " ", &save_ptr);
> + while (token) {
> + if (g_hash_table_contains(reserved_keywords_set,
> + GINT_TO_POINTER(g_quark_from_string(token)))) {
> + ret = -1;
> + goto end;
> + }
> +
> + token = strtok_r(NULL, " ", &save_ptr);
> + }
> +end:
> + free(string);
> + return ret;
> +}
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *get_field_type(enum field_type_alias alias)
> +{
> + unsigned int alignment, size;
> + struct bt_ctf_field_type *field_type;
> +
> + if (alias >= NR_FIELD_TYPE_ALIAS) {
> + return NULL;
> + }
> +
> + alignment = field_type_aliases_alignments[alias];
> + size = field_type_aliases_sizes[alias];
> + field_type = bt_ctf_field_type_integer_create(size);
> + bt_ctf_field_type_set_alignment(field_type, alignment);
> + return field_type;
> +}
> +
> +static
> +int init_trace_packet_header(struct bt_ctf_writer *writer)
> +{
> + size_t i;
> + int ret = 0;
> + struct bt_ctf_field *trace_packet_header = NULL,
> + *magic = NULL, *uuid_array = NULL;
> + struct bt_ctf_field_type *_uint32_t =
> + get_field_type(FIELD_TYPE_ALIAS_UINT32_T);
> + struct bt_ctf_field_type *_uint8_t =
> + get_field_type(FIELD_TYPE_ALIAS_UINT8_T);
> + struct bt_ctf_field_type *trace_packet_header_type =
> + bt_ctf_field_type_structure_create();
> + struct bt_ctf_field_type *uuid_array_type =
> + bt_ctf_field_type_array_create(_uint8_t, 16);
> +
> + if (!trace_packet_header_type || !uuid_array_type) {
> + ret = -1;
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_set_byte_order(_uint32_t,
> + (writer->byte_order == LITTLE_ENDIAN ?
> + BT_CTF_BYTE_ORDER_LITTLE_ENDIAN :
> + BT_CTF_BYTE_ORDER_BIG_ENDIAN));
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(trace_packet_header_type,
> + _uint32_t, "magic");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(trace_packet_header_type,
> + uuid_array_type, "uuid");
> + if (ret) {
> + goto end;
> + }
> +
> + ret = bt_ctf_field_type_structure_add_field(trace_packet_header_type,
> + _uint32_t, "stream_id");
> + if (ret) {
> + goto end;
> + }
> +
> + trace_packet_header = bt_ctf_field_create(trace_packet_header_type);
> + if (!trace_packet_header) {
> + ret = -1;
> + goto end;
> + }
> +
> + magic = bt_ctf_field_structure_get_field(trace_packet_header, "magic");
> + ret = bt_ctf_field_unsigned_integer_set_value(magic, 0xC1FC1FC1);
> + if (ret) {
> + goto end;
> + }
> +
> + uuid_array = bt_ctf_field_structure_get_field(trace_packet_header,
> + "uuid");
> + for (i = 0; i < 16; i++) {
> + struct bt_ctf_field *uuid_element =
> + bt_ctf_field_array_get_field(uuid_array, i);
> + ret = bt_ctf_field_unsigned_integer_set_value(uuid_element,
> + writer->uuid[i]);
> + bt_ctf_field_put(uuid_element);
> + if (ret) {
> + goto end;
> + }
> + }
> +
> + bt_ctf_field_type_put(writer->trace_packet_header_type);
> + bt_ctf_field_put(writer->trace_packet_header);
> + writer->trace_packet_header_type = trace_packet_header_type;
> + writer->trace_packet_header = trace_packet_header;
> +end:
> + bt_ctf_field_type_put(uuid_array_type);
> + bt_ctf_field_type_put(_uint32_t);
> + bt_ctf_field_type_put(_uint8_t);
> + bt_ctf_field_put(magic);
> + bt_ctf_field_put(uuid_array);
> + if (ret) {
> + bt_ctf_field_type_put(trace_packet_header_type);
> + bt_ctf_field_put(trace_packet_header);
> + }
> +
> + return ret;
> +}
> +
> +static
> +void environment_variable_destroy(struct environment_variable *var)
> +{
> + g_string_free(var->name, TRUE);
> + g_string_free(var->value, TRUE);
> + g_free(var);
> +}
> +
> +static
> +int create_stream_file(struct bt_ctf_writer *writer,
> + struct bt_ctf_stream *stream)
> +{
> + int fd;
> + GString *filename = g_string_new(stream->stream_class->name->str);
> +
> + g_string_append_printf(filename, "_%" PRIu32, stream->id);
> + fd = openat(writer->trace_dir_fd, filename->str,
> + O_RDWR | O_CREAT | O_TRUNC,
> + S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP);
> + g_string_free(filename, TRUE);
> + return fd;
> +}
> +
> +static
> +void stream_flush_cb(struct bt_ctf_stream *stream, struct bt_ctf_writer
> *writer)
> +{
> + struct bt_ctf_field *stream_id;
> +
> + /* Start a new packet in the stream */
> + if (stream->flushed_packet_count) {
> + /* ctf_init_pos has already initialized the first packet */
> + ctf_packet_seek(&stream->pos.parent, 0, SEEK_CUR);
> + }
> +
> + stream_id = bt_ctf_field_structure_get_field(
> + writer->trace_packet_header, "stream_id");
> + bt_ctf_field_unsigned_integer_set_value(stream_id, stream->id);
> + bt_ctf_field_put(stream_id);
> +
> + /* Write the trace_packet_header */
> + bt_ctf_field_serialize(writer->trace_packet_header, &stream->pos);
> +}
> +
> +static __attribute__((constructor))
> +void writer_init(void)
> +{
> + size_t i;
> + const size_t reserved_keywords_count =
> + sizeof(reserved_keywords_str) / sizeof(char *);
> +
> + global_data_refcount++;
> + if (init_done) {
> + return;
> + }
> +
> + reserved_keywords_set = g_hash_table_new(g_direct_hash, g_direct_equal);
> + for (i = 0; i < reserved_keywords_count; i++) {
> + g_hash_table_add(reserved_keywords_set,
> + GINT_TO_POINTER(g_quark_from_string(reserved_keywords_str[i])));
> + }
> +
> + init_done = 1;
> +}
> +
> +static __attribute__((destructor))
> +void writer_finalize(void)
> +{
> + if (--global_data_refcount == 0) {
> + g_hash_table_destroy(reserved_keywords_set);
> + }
> +}
> diff --git a/include/Makefile.am b/include/Makefile.am
> index e368173..ec927b9 100644
> --- a/include/Makefile.am
> +++ b/include/Makefile.am
> @@ -10,7 +10,9 @@ babeltraceinclude_HEADERS = \
> babeltracectfinclude_HEADERS = \
> babeltrace/ctf/events.h \
> babeltrace/ctf/callbacks.h \
> - babeltrace/ctf/iterator.h \
> + babeltrace/ctf/iterator.h
> +
> +babeltracectfwriterinclude_HEADERS = \
> babeltrace/ctf-writer/clock.h \
> babeltrace/ctf-writer/writer.h \
> babeltrace/ctf-writer/event-fields.h \
> @@ -36,6 +38,14 @@ noinst_HEADERS = \
> babeltrace/ctf-text/types.h \
> babeltrace/ctf/types.h \
> babeltrace/ctf/callbacks-internal.h \
> + babeltrace/ctf-writer/ref-internal.h \
> + babeltrace/ctf-writer/writer-internal.h \
> + babeltrace/ctf-writer/event-types-internal.h \
> + babeltrace/ctf-writer/event-fields-internal.h \
> + babeltrace/ctf-writer/event-internal.h \
> + babeltrace/ctf-writer/clock-internal.h \
> + babeltrace/ctf-writer/stream-internal.h \
> + babeltrace/ctf-writer/functor-internal.h \
> babeltrace/trace-handle-internal.h \
> babeltrace/compat/uuid.h \
> babeltrace/compat/memstream.h \
> diff --git a/include/babeltrace/ctf-writer/clock-internal.h
> b/include/babeltrace/ctf-writer/clock-internal.h
> new file mode 100644
> index 0000000..c60e5c0
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/clock-internal.h
> @@ -0,0 +1,65 @@
> +#ifndef BABELTRACE_CTF_WRITER_CLOCK_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_CLOCK_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Clock internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/clock.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <glib.h>
> +#include <uuid/uuid.h>
> +
> +struct bt_ctf_clock {
> + struct bt_ctf_ref ref_count;
> + GString *name;
> + GString *description;
> + uint64_t frequency;
> + uint64_t precision;
> + uint64_t offset_s; /* Offset in seconds */
> + uint64_t offset; /* Offset in ticks */
> + uint64_t time; /* Current clock value */
> + uuid_t uuid;
> + int absolute;
> + /*
> + * A clock's properties can't be modified once it is added to a stream
> + * class.
> + */
> + int frozen;
> +};
> +
> +BT_HIDDEN
> +void bt_ctf_clock_freeze(struct bt_ctf_clock *clock);
> +
> +BT_HIDDEN
> +void bt_ctf_clock_serialize(struct bt_ctf_clock *clock,
> + struct metadata_context *context);
> +
> +BT_HIDDEN
> +uint64_t bt_ctf_clock_get_time(struct bt_ctf_clock *clock);
> +
> +#endif /* BABELTRACE_CTF_WRITER_CLOCK_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/event-fields-internal.h
> b/include/babeltrace/ctf-writer/event-fields-internal.h
> new file mode 100644
> index 0000000..9f2670d
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/event-fields-internal.h
> @@ -0,0 +1,100 @@
> +#ifndef BABELTRACE_CTF_WRITER_EVENT_FIELDS_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_EVENT_FIELDS_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Event Fields internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <babeltrace/ctf/types.h>
> +#include <glib.h>
> +
> +struct bt_ctf_field {
> + struct bt_ctf_ref ref_count;
> + struct bt_ctf_field_type *type;
> + int payload_set;
> +};
> +
> +struct bt_ctf_field_integer {
> + struct bt_ctf_field parent;
> + struct definition_integer definition;
> +};
> +
> +struct bt_ctf_field_enumeration {
> + struct bt_ctf_field parent;
> + struct bt_ctf_field *payload;
> +};
> +
> +struct bt_ctf_field_floating_point {
> + struct bt_ctf_field parent;
> + struct definition_float definition;
> + struct definition_integer sign, mantissa, exp;
> +};
> +
> +struct bt_ctf_field_structure {
> + struct bt_ctf_field parent;
> + GHashTable *field_name_to_index;
> + GPtrArray *fields; /* Array of pointers to struct bt_ctf_field */
> +};
> +
> +struct bt_ctf_field_variant {
> + struct bt_ctf_field parent;
> + struct bt_ctf_field *tag;
> + struct bt_ctf_field *payload;
> +};
> +
> +struct bt_ctf_field_array {
> + struct bt_ctf_field parent;
> + GPtrArray *elements; /* Array of pointers to struct bt_ctf_field */
> +};
> +
> +struct bt_ctf_field_sequence {
> + struct bt_ctf_field parent;
> + struct bt_ctf_field *length;
> + GPtrArray *elements; /* Array of pointers to struct bt_ctf_field */
> +};
> +
> +struct bt_ctf_field_string {
> + struct bt_ctf_field parent;
> + GString *payload;
> +};
> +
> +/*
> + * Set a field's value with an already allocated field instance.
> + */
> +BT_HIDDEN
> +int bt_ctf_field_structure_set_field(struct bt_ctf_field *structure,
> + const char *name, struct bt_ctf_field *value);
> +
> +BT_HIDDEN
> +int bt_ctf_field_validate(struct bt_ctf_field *field);
> +
> +BT_HIDDEN
> +int bt_ctf_field_serialize(struct bt_ctf_field *field,
> + struct ctf_stream_pos *pos);
> +
> +#endif /* BABELTRACE_CTF_WRITER_EVENT_FIELDS_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/event-internal.h
> b/include/babeltrace/ctf-writer/event-internal.h
> new file mode 100644
> index 0000000..b84c3dd
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/event-internal.h
> @@ -0,0 +1,90 @@
> +#ifndef BABELTRACE_CTF_WRITER_EVENT_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_EVENT_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Event internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <babeltrace/ctf/types.h>
> +#include <glib.h>
> +
> +struct bt_ctf_event_class {
> + struct bt_ctf_ref ref_count;
> + GQuark name;
> + int id_set;
> + uint32_t id;
> + int stream_id_set;
> + uint32_t stream_id;
> + /* Structure type containing the event's context */
> + struct bt_ctf_field_type *context;
> + /* Structure type containing the event's fields */
> + struct bt_ctf_field_type *fields;
> + int frozen;
> +};
> +
> +struct bt_ctf_event {
> + struct bt_ctf_ref ref_count;
> + uint64_t timestamp;
> + struct bt_ctf_event_class *event_class;
> + struct bt_ctf_field *context_payload;
> + struct bt_ctf_field *fields_payload;
> +};
> +
> +BT_HIDDEN
> +void bt_ctf_event_class_freeze(struct bt_ctf_event_class *event_class);
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_set_id(struct bt_ctf_event_class *event_class,
> + uint32_t id);
> +
> +BT_HIDDEN
> +uint32_t bt_ctf_event_class_get_id(struct bt_ctf_event_class *event_class);
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_set_stream_id(struct bt_ctf_event_class *event_class,
> + uint32_t id);
> +
> +BT_HIDDEN
> +int bt_ctf_event_class_serialize(struct bt_ctf_event_class *event_class,
> + struct metadata_context *context);
> +
> +BT_HIDDEN
> +int bt_ctf_event_validate(struct bt_ctf_event *event);
> +
> +BT_HIDDEN
> +int bt_ctf_event_serialize(struct bt_ctf_event *event,
> + struct ctf_stream_pos *pos);
> +
> +BT_HIDDEN
> +int bt_ctf_event_set_timestamp(struct bt_ctf_event *event, uint64_t
> timestamp);
> +
> +BT_HIDDEN
> +uint64_t bt_ctf_event_get_timestamp(struct bt_ctf_event *event);
> +
> +#endif /* BABELTRACE_CTF_WRITER_EVENT_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/event-types-internal.h
> b/include/babeltrace/ctf-writer/event-types-internal.h
> new file mode 100644
> index 0000000..d9acdd3
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/event-types-internal.h
> @@ -0,0 +1,150 @@
> +#ifndef BABELTRACE_CTF_WRITER_EVENT_TYPES_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_EVENT_TYPES_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Event types internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/ctf-writer/writer.h>
> +#include <babeltrace/ctf-writer/writer-internal.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <babeltrace/types.h>
> +#include <babeltrace/ctf/events.h>
> +#include <glib.h>
> +
> +typedef void(*type_freeze_func)(struct bt_ctf_field_type *);
> +typedef int(*type_serialize_func)(struct bt_ctf_field_type *,
> + struct metadata_context *);
> +
> +struct bt_ctf_field_type {
> + struct bt_ctf_ref ref_count;
> + struct bt_declaration *declaration;
> + type_freeze_func freeze;
> + type_serialize_func serialize;
> + /*
> + * A type can't be modified once it is added to an event or after a
> + * a field has been instanciated from it.
> + */
> + int frozen;
> +};
> +
> +struct bt_ctf_field_type_integer {
> + struct bt_ctf_field_type parent;
> + struct declaration_integer declaration;
> +};
> +
> +struct enumeration_mapping {
> + int64_t range_start;
> + int64_t range_end;
> + GQuark string;
> +};
> +
> +struct bt_ctf_field_type_enumeration {
> + struct bt_ctf_field_type parent;
> + struct bt_ctf_field_type *container;
> + GPtrArray *entries; /* Array of pointers to struct enum_mapping */
> + struct declaration_enum declaration;
> +};
> +
> +struct bt_ctf_field_type_floating_point {
> + struct bt_ctf_field_type parent;
> + struct declaration_float declaration;
> + struct declaration_integer sign;
> + struct declaration_integer mantissa;
> + struct declaration_integer exp;
> +};
> +
> +struct structure_field {
> + GQuark name;
> + struct bt_ctf_field_type *type;
> +};
> +
> +struct bt_ctf_field_type_structure {
> + struct bt_ctf_field_type parent;
> + GHashTable *field_name_to_index;
> + GPtrArray *fields; /* Array of pointers to struct structure_field */
> + struct declaration_enum declaration;
> +};
> +
> +struct bt_ctf_field_type_variant {
> + struct bt_ctf_field_type parent;
> + GString *tag_name;
> + struct bt_ctf_field_type_enumeration *tag;
> + GHashTable *field_name_to_index;
> + GPtrArray *fields; /* Array of pointers to struct structure_field */
> + struct declaration_variant declaration;
> +};
> +
> +struct bt_ctf_field_type_array {
> + struct bt_ctf_field_type parent;
> + struct bt_ctf_field_type *element_type;
> + unsigned int length; /* Number of elements */
> + struct declaration_array declaration;
> +};
> +
> +struct bt_ctf_field_type_sequence {
> + struct bt_ctf_field_type parent;
> + struct bt_ctf_field_type *element_type;
> + GString *length_field_name;
> + struct declaration_sequence declaration;
> +};
> +
> +struct bt_ctf_field_type_string {
> + struct bt_ctf_field_type parent;
> + struct declaration_string declaration;
> +};
> +
> +BT_HIDDEN
> +void bt_ctf_field_type_freeze(struct bt_ctf_field_type *type);
> +
> +BT_HIDDEN
> +enum ctf_type_id bt_ctf_field_type_get_type_id(
> + struct bt_ctf_field_type *type);
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_structure_get_type(
> + struct bt_ctf_field_type_structure *structure,
> + const char *name);
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_array_get_element_type(
> + struct bt_ctf_field_type_array *array);
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_sequence_get_element_type(
> + struct bt_ctf_field_type_sequence *sequence);
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *bt_ctf_field_type_variant_get_field_type(
> + struct bt_ctf_field_type_variant *variant, int64_t tag_value);
> +
> +BT_HIDDEN
> +int bt_ctf_field_type_serialize(struct bt_ctf_field_type *type,
> + struct metadata_context *context);
> +
> +#endif /* BABELTRACE_CTF_WRITER_EVENT_TYPES_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/functor-internal.h
> b/include/babeltrace/ctf-writer/functor-internal.h
> new file mode 100644
> index 0000000..66d3fcf
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/functor-internal.h
> @@ -0,0 +1,41 @@
> +#ifndef BABELTRACE_CTF_WRITER_FUNCTOR_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_FUNCTOR_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Functors for use with glib data structures
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <glib.h>
> +#include <babeltrace/babeltrace-internal.h>
> +
> +struct search_query {
> + gpointer value;
> + int found;
> +};
> +
> +BT_HIDDEN
> +void value_exists(gpointer element, gpointer search_query);
> +
> +#endif /* BABELTRACE_CTF_WRITER_FUNCTOR_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/ref-internal.h
> b/include/babeltrace/ctf-writer/ref-internal.h
> new file mode 100644
> index 0000000..486e243
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/ref-internal.h
> @@ -0,0 +1,61 @@
> +#ifndef BABELTRACE_CTF_WRITER_REF_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_REF_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Reference count
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <assert.h>
> +
> +struct bt_ctf_ref {
> + long refcount;
> +};
> +
> +static inline
> +void bt_ctf_ref_init(struct bt_ctf_ref *ref)
> +{
> + assert(ref);
> + ref->refcount = 1;
> +}
> +
> +static inline
> +void bt_ctf_ref_get(struct bt_ctf_ref *ref)
> +{
> + assert(ref);
> + ref->refcount++;
> +}
> +
> +static inline
> +void bt_ctf_ref_put(struct bt_ctf_ref *ref,
> + void (*release)(struct bt_ctf_ref *))
> +{
> + assert(ref);
> + assert(release);
> + if ((--ref->refcount) == 0) {
> + release(ref);
> + }
> +}
> +
> +#endif /* BABELTRACE_CTF_WRITER_REF_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/stream-internal.h
> b/include/babeltrace/ctf-writer/stream-internal.h
> new file mode 100644
> index 0000000..57dd992
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/stream-internal.h
> @@ -0,0 +1,101 @@
> +#ifndef BABELTRACE_CTF_WRITER_STREAM_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_STREAM_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Stream internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/clock.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <babeltrace/ctf/types.h>
> +#include <glib.h>
> +
> +typedef void(*flush_func)(struct bt_ctf_stream *, void *);
> +
> +struct bt_ctf_stream_class {
> + struct bt_ctf_ref ref_count;
> + GString *name;
> + struct bt_ctf_clock *clock;
> + GPtrArray *event_classes; /* Array of pointers to bt_ctf_event_class */
> + int id_set;
> + uint32_t id;
> + uint32_t next_event_id;
> + uint32_t next_stream_id;
> + struct bt_ctf_field_type *event_header_type;
> + struct bt_ctf_field *event_header;
> + struct bt_ctf_field_type *packet_context_type;
> + struct bt_ctf_field *packet_context;
> + struct bt_ctf_field_type *event_context_type;
> + struct bt_ctf_field *event_context;
> + int frozen;
> +};
> +
> +struct flush_callback {
> + flush_func func;
> + void *data;
> +};
> +
> +struct bt_ctf_stream {
> + struct bt_ctf_ref ref_count;
> + uint32_t id;
> + struct bt_ctf_stream_class *stream_class;
> + struct flush_callback flush;
> + /* Array of pointers to bt_ctf_event for the current packet */
> + GPtrArray *events;
> + struct ctf_stream_pos pos;
> + unsigned int flushed_packet_count;
> + uint64_t events_discarded;
> +};
> +
> +BT_HIDDEN
> +void bt_ctf_stream_class_freeze(struct bt_ctf_stream_class *stream_class);
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_set_id(struct bt_ctf_stream_class *stream_class,
> + uint32_t id);
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_serialize(struct bt_ctf_stream_class *stream_class,
> + struct metadata_context *context);
> +
> +BT_HIDDEN
> +int bt_ctf_stream_class_set_byte_order(struct bt_ctf_stream_class
> *stream_class,
> + enum bt_ctf_byte_order byte_order);
> +
> +BT_HIDDEN
> +struct bt_ctf_stream *bt_ctf_stream_create(
> + struct bt_ctf_stream_class *stream_class);
> +
> +BT_HIDDEN
> +int bt_ctf_stream_set_flush_callback(struct bt_ctf_stream *stream,
> + flush_func callback, void *data);
> +
> +BT_HIDDEN
> +int bt_ctf_stream_set_fd(struct bt_ctf_stream *stream, int fd);
> +
> +#endif /* BABELTRACE_CTF_WRITER_STREAM_INTERNAL_H */
> diff --git a/include/babeltrace/ctf-writer/writer-internal.h
> b/include/babeltrace/ctf-writer/writer-internal.h
> new file mode 100644
> index 0000000..5c682dd
> --- /dev/null
> +++ b/include/babeltrace/ctf-writer/writer-internal.h
> @@ -0,0 +1,87 @@
> +#ifndef BABELTRACE_CTF_WRITER_WRITER_INTERNAL_H
> +#define BABELTRACE_CTF_WRITER_WRITER_INTERNAL_H
> +
> +/*
> + * BabelTrace - CTF Writer: Writer internal
> + *
> + * Copyright 2013 EfficiOS Inc.
> + *
> + * Author: Jérémie Galarneau <jeremie.galarneau at 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.
> + */
> +
> +#include <babeltrace/ctf-writer/ref-internal.h>
> +#include <babeltrace/ctf-writer/writer.h>
> +#include <babeltrace/ctf-writer/event-types.h>
> +#include <babeltrace/ctf-writer/event-fields.h>
> +#include <babeltrace/babeltrace-internal.h>
> +#include <glib.h>
> +#include <dirent.h>
> +#include <sys/types.h>
> +#include <uuid/uuid.h>
> +
> +enum field_type_alias {
> + FIELD_TYPE_ALIAS_UINT5_T = 0,
> + FIELD_TYPE_ALIAS_UINT8_T,
> + FIELD_TYPE_ALIAS_UINT16_T,
> + FIELD_TYPE_ALIAS_UINT27_T,
> + FIELD_TYPE_ALIAS_UINT32_T,
> + FIELD_TYPE_ALIAS_UINT64_T,
> + NR_FIELD_TYPE_ALIAS,
> +};
> +
> +struct bt_ctf_writer {
> + struct bt_ctf_ref ref_count;
> + int frozen; /* Protects attributes that can't be changed mid-trace */
> + GString *path;
> + uuid_t uuid;
> + int byte_order;
> + int trace_dir_fd;
> + int metadata_fd;
> + GPtrArray *environment; /* Array of pointers to environment_variable */
> + GPtrArray *clocks; /* Array of pointers to bt_ctf_clock */
> + GPtrArray *stream_classes; /* Array of pointers to bt_ctf_stream_class */
> + GPtrArray *streams; /* Array of pointers to bt_ctf_stream */
> + struct bt_ctf_field_type *trace_packet_header_type;
> + struct bt_ctf_field *trace_packet_header;
> + uint32_t next_stream_id;
> +};
> +
> +struct environment_variable {
> + GString *name, *value;
> +};
> +
> +struct metadata_context {
> + GString *string;
> + GString *field_name;
> + unsigned int current_indentation_level;
> +};
> +
> +/* Checks that the string does not contain a reserved keyword */
> +BT_HIDDEN
> +int validate_identifier(const char *string);
> +
> +BT_HIDDEN
> +const char *get_byte_order_string(int byte_order);
> +
> +BT_HIDDEN
> +struct bt_ctf_field_type *get_field_type(enum field_type_alias alias);
> +
> +#endif /* BABELTRACE_CTF_WRITER_WRITER_INTERNAL_H */
> --
> 1.8.4
>
>
> _______________________________________________
> lttng-dev mailing list
> lttng-dev at lists.lttng.org
> http://lists.lttng.org/cgi-bin/mailman/listinfo/lttng-dev
>
--
Mathieu Desnoyers
EfficiOS Inc.
http://www.efficios.com
More information about the lttng-dev
mailing list