+/*
+ * copy.c
+ *
+ * Babeltrace Copy Trace Structure
+ *
+ * Copyright 2017 Julien Desfossez <jdesfossez@efficios.com>
+ *
+ * Author: Julien Desfossez <jdesfossez@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-ir/event.h>
+#include <babeltrace/ctf-ir/packet.h>
+#include <babeltrace/ctf-ir/event-class.h>
+#include <babeltrace/ctf-ir/stream.h>
+#include <babeltrace/ctf-ir/stream-class.h>
+#include <babeltrace/ctf-ir/clock-class.h>
+#include <babeltrace/ctf-ir/fields.h>
+#include <babeltrace/ctf-writer/stream-class.h>
+#include <babeltrace/ctf-writer/stream.h>
+
+#include <ctfcopytrace.h>
+#include "iterator.h"
+
+static
+struct bt_ctf_packet *lookup_packet(struct trimmer_iterator *trim_it,
+ struct bt_ctf_packet *packet)
+{
+ return (struct bt_ctf_packet *) g_hash_table_lookup(
+ trim_it->packet_map,
+ (gpointer) packet);
+}
+
+static
+struct bt_ctf_packet *insert_new_packet(struct trimmer_iterator *trim_it,
+ struct bt_ctf_packet *packet,
+ struct bt_ctf_stream *stream)
+{
+ struct bt_ctf_packet *writer_packet;
+
+ writer_packet = bt_ctf_packet_create(stream);
+ if (!writer_packet) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end;
+ }
+ g_hash_table_insert(trim_it->packet_map, (gpointer) packet, writer_packet);
+
+end:
+ return writer_packet;
+}
+
+BT_HIDDEN
+enum bt_component_status update_packet_context_field(FILE *err,
+ struct bt_ctf_packet *writer_packet,
+ const char *name, int64_t value)
+{
+ enum bt_component_status ret;
+ struct bt_ctf_field *packet_context, *writer_packet_context;
+ struct bt_ctf_field_type *struct_type, *writer_packet_context_type;
+ struct bt_ctf_stream_class *stream_class;
+ struct bt_ctf_stream *stream;
+ int nr_fields, i, int_ret;
+
+ packet_context = bt_ctf_packet_get_context(writer_packet);
+ if (!packet_context) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end;
+ }
+
+ stream = bt_ctf_packet_get_stream(writer_packet);
+ if (!stream) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_packet_context;
+ }
+
+ stream_class = bt_ctf_stream_get_class(stream);
+ if (!stream_class) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_stream;
+ }
+
+ writer_packet_context_type = bt_ctf_stream_class_get_packet_context_type(
+ stream_class);
+ if (!writer_packet_context_type) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_stream_class;
+ }
+
+ struct_type = bt_ctf_field_get_type(packet_context);
+ if (!struct_type) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_writer_packet_context_type;
+ }
+
+ writer_packet_context = bt_ctf_packet_get_context(writer_packet);
+ if (!writer_packet_context) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_struct_type;
+ }
+
+ nr_fields = bt_ctf_field_type_structure_get_field_count(struct_type);
+ for (i = 0; i < nr_fields; i++) {
+ struct bt_ctf_field *field, *writer_field;
+ struct bt_ctf_field_type *field_type;
+ const char *field_name;
+
+ field = bt_ctf_field_structure_get_field_by_index(
+ packet_context, i);
+ if (!field) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_writer_packet_context;
+ }
+ if (bt_ctf_field_type_structure_get_field(struct_type,
+ &field_name, &field_type, i) < 0) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ bt_put(field);
+ fprintf(err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_writer_packet_context;
+ }
+ if (strcmp(field_name, name)) {
+ bt_put(field_type);
+ bt_put(field);
+ continue;
+ }
+ if (bt_ctf_field_type_get_type_id(field_type) != BT_CTF_TYPE_ID_INTEGER) {
+ fprintf(err, "[error] Unexpected packet context field type\n");
+ bt_put(field);
+ ret = BT_COMPONENT_STATUS_ERROR;
+ goto end_put_writer_packet_context;
+ }
+ writer_field = bt_ctf_field_structure_get_field(writer_packet_context,
+ field_name);
+ if (!writer_field) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end;
+ }
+
+ int_ret = bt_ctf_field_unsigned_integer_set_value(writer_field, value);
+ bt_put(writer_field);
+ if (int_ret < 0) {
+ ret = BT_COMPONENT_STATUS_ERROR;
+ fprintf(err, "[error] %s in %s:%d\n", __func__, __FILE__,
+ __LINE__);
+ goto end_put_writer_packet_context;
+ }
+
+ bt_put(field_type);
+ bt_put(field);
+ }
+
+ ret = BT_COMPONENT_STATUS_OK;
+
+end_put_writer_packet_context:
+ bt_put(writer_packet_context);
+end_put_struct_type:
+ bt_put(struct_type);
+end_put_writer_packet_context_type:
+ bt_put(writer_packet_context_type);
+end_put_stream_class:
+ bt_put(stream_class);
+end_put_packet_context:
+ bt_put(packet_context);
+end_put_stream:
+ bt_put(stream);
+end:
+ return ret;
+}
+
+BT_HIDDEN
+struct bt_ctf_packet *trimmer_new_packet(
+ struct trimmer_iterator *trim_it,
+ struct bt_ctf_packet *packet)
+{
+ struct bt_ctf_stream *stream;
+ struct bt_ctf_field *writer_packet_context;
+ struct bt_ctf_packet *writer_packet = NULL;
+ int int_ret;
+
+ stream = bt_ctf_packet_get_stream(packet);
+ if (!stream) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n",
+ __func__, __FILE__, __LINE__);
+ goto end;
+ }
+
+ /*
+ * If a packet was already opened, close it and remove it from
+ * the HT.
+ */
+ writer_packet = lookup_packet(trim_it, packet);
+ if (writer_packet) {
+ g_hash_table_remove(trim_it->packet_map, packet);
+ bt_put(writer_packet);
+ }
+
+ writer_packet = insert_new_packet(trim_it, packet, stream);
+ if (!writer_packet) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n",
+ __func__, __FILE__, __LINE__);
+ goto end_put_stream;
+ }
+ bt_get(writer_packet);
+
+ writer_packet_context = ctf_copy_packet_context(trim_it->err, packet,
+ stream);
+ if (!writer_packet_context) {
+ BT_PUT(writer_packet);
+ fprintf(trim_it->err, "[error] %s in %s:%d\n",
+ __func__, __FILE__, __LINE__);
+ goto end_put_stream;
+ }
+
+ int_ret = bt_ctf_packet_set_context(writer_packet, writer_packet_context);
+ if (int_ret) {
+ BT_PUT(writer_packet);
+ fprintf(trim_it->err, "[error] %s in %s:%d\n",
+ __func__, __FILE__, __LINE__);
+ goto end_put_writer_packet_context;
+ }
+
+end_put_writer_packet_context:
+ bt_put(writer_packet_context);
+end_put_stream:
+ bt_put(stream);
+end:
+ return writer_packet;
+}
+
+BT_HIDDEN
+struct bt_ctf_packet *trimmer_close_packet(
+ struct trimmer_iterator *trim_it,
+ struct bt_ctf_packet *packet)
+{
+ struct bt_ctf_packet *writer_packet;
+
+ writer_packet = lookup_packet(trim_it, packet);
+ if (!writer_packet) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end;
+ }
+
+ g_hash_table_remove(trim_it->packet_map, packet);
+
+end:
+ return writer_packet;
+}
+
+BT_HIDDEN
+struct bt_ctf_event *trimmer_output_event(
+ struct trimmer_iterator *trim_it,
+ struct bt_ctf_event *event)
+{
+ struct bt_ctf_event_class *event_class;
+ struct bt_ctf_stream *stream;
+ struct bt_ctf_stream_class *stream_class;
+ struct bt_ctf_event *writer_event = NULL;
+ struct bt_ctf_packet *packet, *writer_packet;
+ const char *event_name;
+ int int_ret;
+
+ event_class = bt_ctf_event_get_class(event);
+ if (!event_class) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end;
+ }
+
+ event_name = bt_ctf_event_class_get_name(event_class);
+ if (!event_name) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_event_class;
+ }
+
+ stream = bt_ctf_event_get_stream(event);
+ if (!stream) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_event_class;
+ }
+
+ stream_class = bt_ctf_event_class_get_stream_class(event_class);
+ if (!stream_class) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_stream;
+ }
+
+ writer_event = ctf_copy_event(trim_it->err, event, event_class, false);
+ if (!writer_event) {
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ fprintf(trim_it->err, "[error] Failed to copy event %s\n",
+ bt_ctf_event_class_get_name(event_class));
+ goto end_put_stream_class;
+ }
+
+ packet = bt_ctf_event_get_packet(event);
+ if (!packet) {
+ BT_PUT(writer_event);
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_stream_class;
+ }
+
+ writer_packet = lookup_packet(trim_it, packet);
+ if (!writer_packet) {
+ BT_PUT(writer_event);
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ goto end_put_packet;
+ }
+ bt_get(writer_packet);
+
+ int_ret = bt_ctf_event_set_packet(writer_event, writer_packet);
+ if (int_ret < 0) {
+ BT_PUT(writer_event);
+ fprintf(trim_it->err, "[error] %s in %s:%d\n", __func__,
+ __FILE__, __LINE__);
+ fprintf(trim_it->err, "[error] Failed to append event %s\n",
+ bt_ctf_event_class_get_name(event_class));
+ goto end_put_writer_packet;
+ }
+
+ /* We keep the reference on the writer event */
+
+end_put_writer_packet:
+ bt_put(writer_packet);
+end_put_packet:
+ bt_put(packet);
+end_put_stream_class:
+ bt_put(stream_class);
+end_put_stream:
+ bt_put(stream);
+end_put_event_class:
+ bt_put(event_class);
+end:
+ return writer_event;
+}