src/plugins/lttng-utils/debug-info/trace-ir-data-copy.c

   1 /*
   2  * Babeltrace - Trace IR data object copy
   3  *
   4  * Copyright (c) 2015-2019 EfficiOS Inc. and Linux Foundation
   5  * Copyright (c) 2019 Francis Deslauriers <francis.deslauriers@efficios.com>
   6  *
   7  * Permission is hereby granted, free of charge, to any person obtaining a copy
   8  * of this software and associated documentation files (the "Software"), to deal
   9  * in the Software without restriction, including without limitation the rights
  10  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  11  * copies of the Software, and to permit persons to whom the Software is
  12  * furnished to do so, subject to the following conditions:
  13  *
  14  * The above copyright notice and this permission notice shall be included in
  15  * all copies or substantial portions of the Software.
  16  *
  17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  18  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  20  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  21  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  22  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  23  * SOFTWARE.
  24  */
  25
  26 #define BT_LOG_OUTPUT_LEVEL log_level
  27 #define BT_LOG_TAG "PLUGIN/FLT.LTTNG-UTILS.DEBUG-INFO/TRACE-IR-DATA-COPY"
  28 #include "logging/log.h"
  29
  30 #include <inttypes.h>
  31 #include <stdint.h>
  32
  33 #include "common/assert.h"
  34
  35 #include "trace-ir-data-copy.h"
  36
  37 BT_HIDDEN
  38 void copy_trace_content(const bt_trace *in_trace, bt_trace *out_trace,
  39                 bt_logging_level log_level)
  40 {
  41         bt_trace_status status;
  42         const char *trace_name;
  43
  44         BT_LOGD("Copying content of trace: in-t-addr=%p, out-t-addr=%p",
  45                         in_trace, out_trace);
  46
  47         trace_name = bt_trace_get_name(in_trace);
  48         /* Copy the trace name. */
  49         if (trace_name) {
  50                 status = bt_trace_set_name(out_trace, trace_name);
  51                 if (status != BT_TRACE_STATUS_OK) {
  52                         BT_LOGE("Cannot set trace's name: trace-addr=%p, name=\"%s\"",
  53                                         out_trace, trace_name);
  54                         goto end;
  55                 }
  56         }
  57
  58         BT_LOGD("Copied content of trace: in-t-addr=%p, out-t-addr=%p",
  59                         in_trace, out_trace);
  60 end:
  61         return;
  62 }
  63
  64 BT_HIDDEN
  65 void copy_stream_content(const bt_stream *in_stream, bt_stream *out_stream,
  66                 bt_logging_level log_level)
  67 {
  68         const char *stream_name;
  69         bt_stream_status status;
  70
  71         BT_LOGD("Copying content of stream: in-s-addr=%p, out-s-addr=%p",
  72                         in_stream, out_stream);
  73
  74         stream_name = bt_stream_get_name(in_stream);
  75         if (stream_name) {
  76                 status = bt_stream_set_name(out_stream, stream_name);
  77                 if (status != BT_STREAM_STATUS_OK) {
  78                         BT_LOGE("Cannot set stream's name: stream-addr=%p, "
  79                                 "name=%s", out_stream, stream_name);
  80                         goto end;
  81                 }
  82         }
  83
  84         BT_LOGD("Copied content of stream: in-s-addr=%p, out-s-addr=%p",
  85                         in_stream, out_stream);
  86 end:
  87         return;
  88 }
  89
  90 BT_HIDDEN
  91 void copy_packet_content(const bt_packet *in_packet, bt_packet *out_packet,
  92                 bt_logging_level log_level)
  93 {
  94         const bt_field *in_context_field;
  95         bt_field *out_context_field;
  96
  97         BT_LOGD("Copying content of packet: in-p-addr=%p, out-p-addr=%p",
  98                         in_packet, out_packet);
  99
 100         /* Copy context field. */
 101         in_context_field = bt_packet_borrow_context_field_const(in_packet);
 102         if (in_context_field) {
 103                 out_context_field = bt_packet_borrow_context_field(out_packet);
 104                 BT_ASSERT(out_context_field);
 105                 copy_field_content(in_context_field, out_context_field,
 106                         log_level);
 107         }
 108
 109         BT_LOGD("Copied content of packet: in-p-addr=%p, out-p-addr=%p",
 110                         in_packet, out_packet);
 111         return;
 112 }
 113
 114 BT_HIDDEN
 115 void copy_event_content(const bt_event *in_event, bt_event *out_event,
 116                 bt_logging_level log_level)
 117 {
 118         const bt_field *in_common_ctx_field, *in_specific_ctx_field,
 119               *in_payload_field;
 120         bt_field *out_common_ctx_field, *out_specific_ctx_field,
 121                  *out_payload_field;
 122
 123         BT_LOGD("Copying content of event: in-e-addr=%p, out-e-addr=%p",
 124                         in_event, out_event);
 125         in_common_ctx_field =
 126                 bt_event_borrow_common_context_field_const(in_event);
 127         if (in_common_ctx_field) {
 128                 out_common_ctx_field =
 129                         bt_event_borrow_common_context_field(out_event);
 130                 BT_ASSERT(out_common_ctx_field);
 131                 copy_field_content(in_common_ctx_field,
 132                                 out_common_ctx_field, log_level);
 133         }
 134
 135         in_specific_ctx_field =
 136                 bt_event_borrow_specific_context_field_const(in_event);
 137         if (in_specific_ctx_field) {
 138                 out_specific_ctx_field =
 139                         bt_event_borrow_specific_context_field(out_event);
 140                 BT_ASSERT(out_specific_ctx_field);
 141                 copy_field_content(in_specific_ctx_field,
 142                                 out_specific_ctx_field, log_level);
 143         }
 144
 145         in_payload_field = bt_event_borrow_payload_field_const(in_event);
 146         if (in_payload_field) {
 147                 out_payload_field = bt_event_borrow_payload_field(out_event);
 148                 BT_ASSERT(out_payload_field);
 149                 copy_field_content(in_payload_field,
 150                                 out_payload_field, log_level);
 151         }
 152
 153         BT_LOGD("Copied content of event: in-e-addr=%p, out-e-addr=%p",
 154                         in_event, out_event);
 155 }
 156
 157 BT_HIDDEN
 158 void copy_field_content(const bt_field *in_field, bt_field *out_field,
 159                 bt_logging_level log_level)
 160 {
 161         bt_field_class_type in_fc_type, out_fc_type;
 162
 163         in_fc_type = bt_field_get_class_type(in_field);
 164         out_fc_type = bt_field_get_class_type(out_field);
 165         BT_ASSERT(in_fc_type == out_fc_type);
 166
 167         BT_LOGV("Copying content of field: in-f-addr=%p, out-f-addr=%p",
 168                         in_field, out_field);
 169         switch (in_fc_type) {
 170         case BT_FIELD_CLASS_TYPE_UNSIGNED_INTEGER:
 171         case BT_FIELD_CLASS_TYPE_UNSIGNED_ENUMERATION:
 172                 bt_field_unsigned_integer_set_value(out_field,
 173                                 bt_field_unsigned_integer_get_value(in_field));
 174                 break;
 175         case BT_FIELD_CLASS_TYPE_SIGNED_INTEGER:
 176         case BT_FIELD_CLASS_TYPE_SIGNED_ENUMERATION:
 177                 bt_field_signed_integer_set_value(out_field,
 178                                 bt_field_signed_integer_get_value(in_field));
 179                 break;
 180         case BT_FIELD_CLASS_TYPE_REAL:
 181                 bt_field_real_set_value(out_field,
 182                                 bt_field_real_get_value(in_field));
 183                 break;
 184         case BT_FIELD_CLASS_TYPE_STRING:
 185         {
 186                 const char *str = bt_field_string_get_value(in_field);
 187                 bt_field_status status = bt_field_string_set_value(out_field, str);
 188                 if (status != BT_FIELD_STATUS_OK) {
 189                         BT_LOGE("Cannot set string field's value: "
 190                                 "str-field-addr=%p, str=%s" PRId64,
 191                                 out_field, str);
 192                 }
 193                 break;
 194         }
 195         case BT_FIELD_CLASS_TYPE_STRUCTURE:
 196         {
 197                 uint64_t i, nb_member_struct;
 198                 const bt_field *in_member_field;
 199                 bt_field *out_member_field;
 200                 const bt_field_class *in_field_class;
 201                 const char *in_member_name;
 202
 203                 in_field_class = bt_field_borrow_class_const(in_field);
 204                 nb_member_struct = bt_field_class_structure_get_member_count(
 205                                 in_field_class);
 206
 207                 /*
 208                  * Iterate over the fields by names in the input field to avoid
 209                  * problem if the struct fields are not in the same order after
 210                  * the debug-info was added.
 211                  */
 212                 for (i = 0; i < nb_member_struct; i++) {
 213                         const bt_field_class_structure_member *member =
 214                                 bt_field_class_structure_borrow_member_by_index_const(
 215                                         in_field_class, i);
 216
 217                         in_member_name =
 218                                 bt_field_class_structure_member_get_name(
 219                                         member);
 220                         in_member_field =
 221                                 bt_field_structure_borrow_member_field_by_name_const(
 222                                                 in_field, in_member_name);
 223                         out_member_field =
 224                                 bt_field_structure_borrow_member_field_by_name(
 225                                                 out_field, in_member_name);
 226
 227                         copy_field_content(in_member_field,
 228                                         out_member_field, log_level);
 229                 }
 230                 break;
 231         }
 232         case BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY:
 233                 /* fall through */
 234         case BT_FIELD_CLASS_TYPE_STATIC_ARRAY:
 235         {
 236                 const bt_field *in_element_field;
 237                 bt_field *out_element_field;
 238                 uint64_t i, array_len;
 239                 bt_field_status status;
 240
 241                 array_len = bt_field_array_get_length(in_field);
 242
 243                 if (in_fc_type == BT_FIELD_CLASS_TYPE_DYNAMIC_ARRAY) {
 244                         status = bt_field_dynamic_array_set_length(out_field,
 245                                         array_len);
 246                         if (status != BT_FIELD_STATUS_OK) {
 247                                 BT_LOGE("Cannot set dynamic array field's "
 248                                         "length field: field-addr=%p, "
 249                                         "length=%" PRIu64, out_field, array_len);
 250                         }
 251                 }
 252
 253                 for (i = 0; i < array_len; i++) {
 254                         in_element_field =
 255                                 bt_field_array_borrow_element_field_by_index_const(
 256                                                 in_field, i);
 257                         out_element_field =
 258                                 bt_field_array_borrow_element_field_by_index(
 259                                                 out_field, i);
 260                         copy_field_content(in_element_field, out_element_field,
 261                                 log_level);
 262                 }
 263                 break;
 264         }
 265         case BT_FIELD_CLASS_TYPE_VARIANT:
 266         {
 267                 bt_field_status status;
 268                 uint64_t in_selected_option_idx;
 269                 const bt_field *in_option_field;
 270                 bt_field *out_option_field;
 271
 272                 in_selected_option_idx =
 273                         bt_field_variant_get_selected_option_field_index(
 274                                         in_field);
 275                 status = bt_field_variant_select_option_field(out_field,
 276                                 in_selected_option_idx);
 277                 if (status != BT_FIELD_STATUS_OK) {
 278                         BT_LOGE("Cannot select variant field's option field: "
 279                                 "var-field-addr=%p, opt-index=%" PRId64,
 280                                 out_field, in_selected_option_idx);
 281                 }
 282
 283                 in_option_field = bt_field_variant_borrow_selected_option_field_const(in_field);
 284                 out_option_field = bt_field_variant_borrow_selected_option_field(out_field);
 285
 286                 copy_field_content(in_option_field, out_option_field,
 287                         log_level);
 288
 289                 break;
 290         }
 291         default:
 292                 abort();
 293         }
 294         BT_LOGV("Copied content of field: in-f-addr=%p, out-f-addr=%p",
 295                         in_field, out_field);
 296 }