lib/trace-ir/packet.c

   1 /*
   2  * Copyright 2016 Philippe Proulx <pproulx@efficios.com>
   3  *
   4  * Permission is hereby granted, free of charge, to any person obtaining a copy
   5  * of this software and associated documentation files (the "Software"), to deal
   6  * in the Software without restriction, including without limitation the rights
   7  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
   8  * copies of the Software, and to permit persons to whom the Software is
   9  * furnished to do so, subject to the following conditions:
  10  *
  11  * The above copyright notice and this permission notice shall be included in
  12  * all copies or substantial portions of the Software.
  13  *
  14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  17  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  18  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  19  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  20  * SOFTWARE.
  21  */
  22
  23 #define BT_LOG_TAG "PACKET"
  24 #include <babeltrace/lib-logging-internal.h>
  25
  26 #include <babeltrace/assert-pre-internal.h>
  27 #include <babeltrace/trace-ir/fields-internal.h>
  28 #include <babeltrace/trace-ir/private-packet.h>
  29 #include <babeltrace/trace-ir/packet.h>
  30 #include <babeltrace/trace-ir/packet-internal.h>
  31 #include <babeltrace/trace-ir/field-wrapper-internal.h>
  32 #include <babeltrace/trace-ir/trace.h>
  33 #include <babeltrace/trace-ir/stream-class-internal.h>
  34 #include <babeltrace/trace-ir/stream-class.h>
  35 #include <babeltrace/trace-ir/stream.h>
  36 #include <babeltrace/trace-ir/stream-internal.h>
  37 #include <babeltrace/trace-ir/clock-value-internal.h>
  38 #include <babeltrace/trace-ir/trace-internal.h>
  39 #include <babeltrace/object-internal.h>
  40 #include <babeltrace/object.h>
  41 #include <babeltrace/assert-internal.h>
  42 #include <inttypes.h>
  43
  44 #define BT_ASSERT_PRE_PACKET_HOT(_packet) \
  45         BT_ASSERT_PRE_HOT((_packet), "Packet", ": %!+a", (_packet))
  46
  47 struct bt_stream *bt_packet_borrow_stream(struct bt_packet *packet)
  48 {
  49         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
  50         return packet->stream;
  51 }
  52
  53 struct bt_private_stream *bt_private_packet_borrow_stream(
  54                 struct bt_private_packet *packet)
  55 {
  56         return (void *) bt_packet_borrow_stream((void *) packet);
  57 }
  58
  59 struct bt_field *bt_packet_borrow_header_field(struct bt_packet *packet)
  60 {
  61         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
  62         return packet->header_field ? packet->header_field->field : NULL;
  63 }
  64
  65 struct bt_private_field *bt_private_packet_borrow_header_field(
  66                 struct bt_private_packet *packet)
  67 {
  68         return (void *) bt_packet_borrow_header_field((void *) packet);
  69 }
  70
  71 struct bt_field *bt_packet_borrow_context_field(struct bt_packet *packet)
  72 {
  73         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
  74         return packet->context_field ? packet->context_field->field : NULL;
  75 }
  76
  77 struct bt_private_field *bt_private_packet_borrow_context_field(
  78                 struct bt_private_packet *packet)
  79 {
  80         return (void *) bt_packet_borrow_context_field((void *) packet);
  81 }
  82
  83 BT_HIDDEN
  84 void _bt_packet_set_is_frozen(struct bt_packet *packet, bool is_frozen)
  85 {
  86         if (!packet) {
  87                 return;
  88         }
  89
  90         BT_LIB_LOGD("Setting packet's frozen state: %![packet-]+a, "
  91                 "is-frozen=%d", packet, is_frozen);
  92
  93         if (packet->header_field) {
  94                 BT_LOGD_STR("Setting packet's header field's frozen state.");
  95                 bt_field_set_is_frozen(packet->header_field->field,
  96                         is_frozen);
  97         }
  98
  99         if (packet->context_field) {
 100                 BT_LOGD_STR("Setting packet's context field's frozen state.");
 101                 bt_field_set_is_frozen(packet->context_field->field,
 102                         is_frozen);
 103         }
 104
 105         packet->frozen = is_frozen;
 106 }
 107
 108 static inline
 109 void reset_counter_snapshots(struct bt_packet *packet)
 110 {
 111         packet->discarded_event_counter_snapshot.base.avail =
 112                 BT_PROPERTY_AVAILABILITY_NOT_AVAILABLE;
 113         packet->packet_counter_snapshot.base.avail =
 114                 BT_PROPERTY_AVAILABILITY_NOT_AVAILABLE;
 115 }
 116
 117 static inline
 118 void reset_packet(struct bt_packet *packet)
 119 {
 120         BT_ASSERT(packet);
 121         BT_LIB_LOGD("Resetting packet: %!+a", packet);
 122         bt_packet_set_is_frozen(packet, false);
 123
 124         if (packet->header_field) {
 125                 bt_field_set_is_frozen(packet->header_field->field, false);
 126                 bt_field_reset(packet->header_field->field);
 127         }
 128
 129         if (packet->context_field) {
 130                 bt_field_set_is_frozen(packet->context_field->field, false);
 131                 bt_field_reset(packet->context_field->field);
 132         }
 133
 134         if (packet->default_beginning_cv) {
 135                 bt_clock_value_reset(packet->default_beginning_cv);
 136         }
 137
 138         if (packet->default_end_cv) {
 139                 bt_clock_value_reset(packet->default_end_cv);
 140         }
 141
 142         reset_counter_snapshots(packet);
 143 }
 144
 145 static
 146 void recycle_header_field(struct bt_field_wrapper *header_field,
 147                 struct bt_trace *trace)
 148 {
 149         BT_ASSERT(header_field);
 150         BT_LIB_LOGD("Recycling packet header field: "
 151                 "addr=%p, %![trace-]+t, %![field-]+f", header_field,
 152                 trace, header_field->field);
 153         bt_object_pool_recycle_object(&trace->packet_header_field_pool,
 154                 header_field);
 155 }
 156
 157 static
 158 void recycle_context_field(struct bt_field_wrapper *context_field,
 159                 struct bt_stream_class *stream_class)
 160 {
 161         BT_ASSERT(context_field);
 162         BT_LIB_LOGD("Recycling packet context field: "
 163                 "addr=%p, %![sc-]+S, %![field-]+f", context_field,
 164                 stream_class, context_field->field);
 165         bt_object_pool_recycle_object(&stream_class->packet_context_field_pool,
 166                 context_field);
 167 }
 168
 169 BT_HIDDEN
 170 void bt_packet_recycle(struct bt_packet *packet)
 171 {
 172         struct bt_stream *stream;
 173
 174         BT_ASSERT(packet);
 175         BT_LIB_LOGD("Recycling packet: %!+a", packet);
 176
 177         /*
 178          * Those are the important ordered steps:
 179          *
 180          * 1. Reset the packet object (put any permanent reference it
 181          *    has, unfreeze it and its fields in developer mode, etc.),
 182          *    but do NOT put its stream's reference. This stream
 183          *    contains the pool to which we're about to recycle this
 184          *    packet object, so we must guarantee its existence thanks
 185          *    to this existing reference.
 186          *
 187          * 2. Move the stream reference to our `stream`
 188          *    variable so that we can set the packet's stream member
 189          *    to NULL before recycling it. We CANNOT do this after
 190          *    we put the stream reference because this bt_object_put_ref()
 191          *    could destroy the stream, also destroying its
 192          *    packet pool, thus also destroying our packet object (this
 193          *    would result in an invalid write access).
 194          *
 195          * 3. Recycle the packet object.
 196          *
 197          * 4. Put our stream reference.
 198          */
 199         reset_packet(packet);
 200         stream = packet->stream;
 201         BT_ASSERT(stream);
 202         packet->stream = NULL;
 203         bt_object_pool_recycle_object(&stream->packet_pool, packet);
 204         bt_object_put_no_null_check(&stream->base);
 205 }
 206
 207 BT_HIDDEN
 208 void bt_packet_destroy(struct bt_packet *packet)
 209 {
 210         BT_LIB_LOGD("Destroying packet: %!+a", packet);
 211
 212         if (packet->header_field) {
 213                 if (packet->stream) {
 214                         BT_LOGD_STR("Recycling packet's header field.");
 215                         recycle_header_field(packet->header_field,
 216                                 bt_stream_class_borrow_trace_inline(
 217                                         packet->stream->class));
 218                 } else {
 219                         bt_field_wrapper_destroy(packet->header_field);
 220                 }
 221
 222                 packet->header_field = NULL;
 223         }
 224
 225         if (packet->context_field) {
 226                 if (packet->stream) {
 227                         BT_LOGD_STR("Recycling packet's context field.");
 228                         recycle_context_field(packet->context_field,
 229                                 packet->stream->class);
 230                 } else {
 231                         bt_field_wrapper_destroy(packet->context_field);
 232                 }
 233
 234                 packet->context_field = NULL;
 235         }
 236
 237         if (packet->default_beginning_cv) {
 238                 BT_LOGD_STR("Recycling beginning clock value.");
 239                 bt_clock_value_recycle(packet->default_beginning_cv);
 240                 packet->default_beginning_cv = NULL;
 241         }
 242
 243         if (packet->default_end_cv) {
 244                 BT_LOGD_STR("Recycling end clock value.");
 245                 bt_clock_value_recycle(packet->default_end_cv);
 246                 packet->default_end_cv = NULL;
 247         }
 248
 249         BT_LOGD_STR("Putting packet's stream.");
 250         BT_OBJECT_PUT_REF_AND_RESET(packet->stream);
 251         g_free(packet);
 252 }
 253
 254 BT_HIDDEN
 255 struct bt_packet *bt_packet_new(struct bt_stream *stream)
 256 {
 257         struct bt_packet *packet = NULL;
 258         struct bt_trace *trace = NULL;
 259
 260         BT_ASSERT(stream);
 261         BT_LIB_LOGD("Creating packet object: %![stream-]+s", stream);
 262         packet = g_new0(struct bt_packet, 1);
 263         if (!packet) {
 264                 BT_LOGE_STR("Failed to allocate one packet object.");
 265                 goto error;
 266         }
 267
 268         bt_object_init_shared(&packet->base,
 269                 (bt_object_release_func) bt_packet_recycle);
 270         packet->stream = bt_object_get_ref(stream);
 271         trace = bt_stream_class_borrow_trace_inline(stream->class);
 272         BT_ASSERT(trace);
 273
 274         if (trace->packet_header_fc) {
 275                 BT_LOGD_STR("Creating initial packet header field.");
 276                 packet->header_field = bt_field_wrapper_create(
 277                         &trace->packet_header_field_pool,
 278                         trace->packet_header_fc);
 279                 if (!packet->header_field) {
 280                         BT_LOGE_STR("Cannot create packet header field wrapper.");
 281                         goto error;
 282                 }
 283         }
 284
 285         if (stream->class->packet_context_fc) {
 286                 BT_LOGD_STR("Creating initial packet context field.");
 287                 packet->context_field = bt_field_wrapper_create(
 288                         &stream->class->packet_context_field_pool,
 289                         stream->class->packet_context_fc);
 290                 if (!packet->context_field) {
 291                         BT_LOGE_STR("Cannot create packet context field wrapper.");
 292                         goto error;
 293                 }
 294         }
 295
 296         if (stream->class->default_clock_class) {
 297                 if (stream->class->packets_have_default_beginning_cv) {
 298                         packet->default_beginning_cv = bt_clock_value_create(
 299                                 stream->class->default_clock_class);
 300                         if (!packet->default_beginning_cv) {
 301                                 /* bt_clock_value_create() logs errors */
 302                                 goto error;
 303                         }
 304                 }
 305
 306                 if (stream->class->packets_have_default_end_cv) {
 307                         packet->default_end_cv = bt_clock_value_create(
 308                                 stream->class->default_clock_class);
 309                         if (!packet->default_end_cv) {
 310                                 /* bt_clock_value_create() logs errors */
 311                                 goto error;
 312                         }
 313                 }
 314         }
 315
 316         reset_counter_snapshots(packet);
 317         BT_LIB_LOGD("Created packet object: %!+a", packet);
 318         goto end;
 319
 320 error:
 321         BT_OBJECT_PUT_REF_AND_RESET(packet);
 322
 323 end:
 324         return packet;
 325 }
 326
 327 struct bt_private_packet *bt_private_packet_create(
 328                 struct bt_private_stream *priv_stream)
 329 {
 330         struct bt_stream *stream = (void *) priv_stream;
 331         struct bt_packet *packet = NULL;
 332
 333         BT_ASSERT_PRE_NON_NULL(stream, "Stream");
 334         packet = bt_object_pool_create_object(&stream->packet_pool);
 335         if (unlikely(!packet)) {
 336                 BT_LIB_LOGE("Cannot allocate one packet from stream's packet pool: "
 337                         "%![stream-]+s", stream);
 338                 goto end;
 339         }
 340
 341         if (likely(!packet->stream)) {
 342                 packet->stream = stream;
 343                 bt_object_get_no_null_check_no_parent_check(
 344                         &packet->stream->base);
 345         }
 346
 347 end:
 348         return (void *) packet;
 349 }
 350
 351 int bt_private_packet_move_header_field(
 352                 struct bt_private_packet *priv_packet,
 353                 struct bt_private_packet_header_field *header_field)
 354 {
 355         struct bt_packet *packet = (void *) priv_packet;
 356         struct bt_trace *trace;
 357         struct bt_field_wrapper *field_wrapper = (void *) header_field;
 358
 359         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 360         BT_ASSERT_PRE_NON_NULL(field_wrapper, "Header field");
 361         BT_ASSERT_PRE_PACKET_HOT(packet);
 362         trace = bt_stream_class_borrow_trace_inline(packet->stream->class);
 363         BT_ASSERT_PRE(trace->packet_header_fc,
 364                 "Trace has no packet header field classe: %!+t",
 365                 trace);
 366         BT_ASSERT_PRE(field_wrapper->field->class ==
 367                 trace->packet_header_fc,
 368                 "Unexpected packet header field's class: "
 369                 "%![fc-]+F, %![expected-fc-]+F", field_wrapper->field->class,
 370                 trace->packet_header_fc);
 371
 372         /* Recycle current header field: always exists */
 373         BT_ASSERT(packet->header_field);
 374         recycle_header_field(packet->header_field, trace);
 375
 376         /* Move new field */
 377         packet->header_field = field_wrapper;
 378         return 0;
 379 }
 380
 381 int bt_private_packet_move_context_field(
 382                 struct bt_private_packet *priv_packet,
 383                 struct bt_private_packet_context_field *context_field)
 384 {
 385         struct bt_packet *packet = (void *) priv_packet;
 386         struct bt_stream_class *stream_class;
 387         struct bt_field_wrapper *field_wrapper = (void *) context_field;
 388
 389         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 390         BT_ASSERT_PRE_NON_NULL(field_wrapper, "Context field");
 391         BT_ASSERT_PRE_HOT(packet, "Packet", ": %!+a", packet);
 392         stream_class = packet->stream->class;
 393         BT_ASSERT_PRE(stream_class->packet_context_fc,
 394                 "Stream class has no packet context field classe: %!+S",
 395                 stream_class);
 396         BT_ASSERT_PRE(field_wrapper->field->class ==
 397                 stream_class->packet_context_fc,
 398                 "Unexpected packet header field's class: "
 399                 "%![fc-]+F, %![expected-fc-]+F", field_wrapper->field->class,
 400                 stream_class->packet_context_fc);
 401
 402         /* Recycle current context field: always exists */
 403         BT_ASSERT(packet->context_field);
 404         recycle_context_field(packet->context_field, stream_class);
 405
 406         /* Move new field */
 407         packet->context_field = field_wrapper;
 408         return 0;
 409 }
 410
 411 void bt_private_packet_set_default_beginning_clock_value(
 412                 struct bt_private_packet *priv_packet,
 413                 uint64_t value_cycles)
 414 {
 415         struct bt_packet *packet = (void *) priv_packet;
 416         struct bt_stream_class *sc;
 417
 418         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 419         BT_ASSERT_PRE_PACKET_HOT(packet);
 420         sc = packet->stream->class;
 421         BT_ASSERT(sc);
 422         BT_ASSERT_PRE(sc->default_clock_class,
 423                 "Packet's stream class has no default clock class: "
 424                 "%![packet-]+a, %![sc-]+S", packet, sc);
 425         BT_ASSERT_PRE(sc->packets_have_default_beginning_cv,
 426                 "Packet's stream class indicates that its packets have "
 427                 "no default beginning clock value: %![packet-]+a, %![sc-]+S",
 428                 packet, sc);
 429         BT_ASSERT(packet->default_beginning_cv);
 430         bt_clock_value_set_value_inline(packet->default_beginning_cv,
 431                 value_cycles);
 432         BT_LIB_LOGV("Set packet's default beginning clock value: "
 433                 "%![packet-]+a, value=%" PRIu64, packet, value_cycles);
 434 }
 435
 436 enum bt_clock_value_status bt_packet_borrow_default_beginning_clock_value(
 437                 struct bt_packet *packet, struct bt_clock_value **clock_value)
 438 {
 439         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 440         BT_ASSERT_PRE_NON_NULL(clock_value, "Clock value (output)");
 441         *clock_value = packet->default_beginning_cv;
 442         return BT_CLOCK_VALUE_STATUS_KNOWN;
 443 }
 444
 445 void bt_private_packet_set_default_end_clock_value(
 446                 struct bt_private_packet *priv_packet,
 447                 uint64_t value_cycles)
 448 {
 449         struct bt_packet *packet = (void *) priv_packet;
 450         struct bt_stream_class *sc;
 451
 452         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 453         BT_ASSERT_PRE_PACKET_HOT(packet);
 454         sc = packet->stream->class;
 455         BT_ASSERT(sc);
 456         BT_ASSERT_PRE(sc->default_clock_class,
 457                 "Packet's stream class has no default clock class: "
 458                 "%![packet-]+a, %![sc-]+S", packet, sc);
 459         BT_ASSERT_PRE(sc->packets_have_default_end_cv,
 460                 "Packet's stream class indicates that its packets have "
 461                 "no default end clock value: %![packet-]+a, %![sc-]+S",
 462                 packet, sc);
 463         BT_ASSERT(packet->default_end_cv);
 464         bt_clock_value_set_value_inline(packet->default_end_cv, value_cycles);
 465         BT_LIB_LOGV("Set packet's default end clock value: "
 466                 "%![packet-]+a, value=%" PRIu64, packet, value_cycles);
 467 }
 468
 469 enum bt_clock_value_status bt_packet_borrow_default_end_clock_value(
 470                 struct bt_packet *packet, struct bt_clock_value **clock_value)
 471 {
 472         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 473         BT_ASSERT_PRE_NON_NULL(clock_value, "Clock value (output)");
 474         *clock_value = packet->default_end_cv;
 475         return BT_CLOCK_VALUE_STATUS_KNOWN;
 476 }
 477
 478 enum bt_property_availability bt_packet_get_discarded_event_counter_snapshot(
 479                 struct bt_packet *packet, uint64_t *value)
 480 {
 481         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 482         BT_ASSERT_PRE_NON_NULL(value, "Value (output)");
 483         *value = packet->discarded_event_counter_snapshot.value;
 484         return packet->discarded_event_counter_snapshot.base.avail;
 485 }
 486
 487 void bt_private_packet_set_discarded_event_counter_snapshot(
 488                 struct bt_private_packet *priv_packet, uint64_t value)
 489 {
 490         struct bt_packet *packet = (void *) priv_packet;
 491
 492         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 493         BT_ASSERT_PRE_PACKET_HOT(packet);
 494         BT_ASSERT_PRE(packet->stream->class->packets_have_discarded_event_counter_snapshot,
 495                 "Packet's stream's discarded event counter is not enabled: "
 496                 "%![packet-]+a", packet);
 497         bt_property_uint_set(&packet->discarded_event_counter_snapshot, value);
 498 }
 499
 500 enum bt_property_availability bt_packet_get_packet_counter_snapshot(
 501                 struct bt_packet *packet, uint64_t *value)
 502 {
 503         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 504         BT_ASSERT_PRE_NON_NULL(value, "Value (output)");
 505         *value = packet->packet_counter_snapshot.value;
 506         return packet->packet_counter_snapshot.base.avail;
 507 }
 508
 509 void bt_private_packet_set_packet_counter_snapshot(
 510                 struct bt_private_packet *priv_packet, uint64_t value)
 511 {
 512         struct bt_packet *packet = (void *) priv_packet;
 513
 514         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 515         BT_ASSERT_PRE_PACKET_HOT(packet);
 516         BT_ASSERT_PRE(packet->stream->class->packets_have_packet_counter_snapshot,
 517                 "Packet's stream's packet counter is not enabled: "
 518                 "%![packet-]+a", packet);
 519         bt_property_uint_set(&packet->packet_counter_snapshot, value);
 520 }