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 = stream;
 271         bt_object_get_no_null_check(stream);
 272         trace = bt_stream_class_borrow_trace_inline(stream->class);
 273         BT_ASSERT(trace);
 274
 275         if (trace->packet_header_fc) {
 276                 BT_LOGD_STR("Creating initial packet header field.");
 277                 packet->header_field = bt_field_wrapper_create(
 278                         &trace->packet_header_field_pool,
 279                         trace->packet_header_fc);
 280                 if (!packet->header_field) {
 281                         BT_LOGE_STR("Cannot create packet header field wrapper.");
 282                         goto error;
 283                 }
 284         }
 285
 286         if (stream->class->packet_context_fc) {
 287                 BT_LOGD_STR("Creating initial packet context field.");
 288                 packet->context_field = bt_field_wrapper_create(
 289                         &stream->class->packet_context_field_pool,
 290                         stream->class->packet_context_fc);
 291                 if (!packet->context_field) {
 292                         BT_LOGE_STR("Cannot create packet context field wrapper.");
 293                         goto error;
 294                 }
 295         }
 296
 297         if (stream->class->default_clock_class) {
 298                 if (stream->class->packets_have_default_beginning_cv) {
 299                         packet->default_beginning_cv = bt_clock_value_create(
 300                                 stream->class->default_clock_class);
 301                         if (!packet->default_beginning_cv) {
 302                                 /* bt_clock_value_create() logs errors */
 303                                 goto error;
 304                         }
 305                 }
 306
 307                 if (stream->class->packets_have_default_end_cv) {
 308                         packet->default_end_cv = bt_clock_value_create(
 309                                 stream->class->default_clock_class);
 310                         if (!packet->default_end_cv) {
 311                                 /* bt_clock_value_create() logs errors */
 312                                 goto error;
 313                         }
 314                 }
 315         }
 316
 317         reset_counter_snapshots(packet);
 318         BT_LIB_LOGD("Created packet object: %!+a", packet);
 319         goto end;
 320
 321 error:
 322         BT_OBJECT_PUT_REF_AND_RESET(packet);
 323
 324 end:
 325         return packet;
 326 }
 327
 328 struct bt_private_packet *bt_private_packet_create(
 329                 struct bt_private_stream *priv_stream)
 330 {
 331         struct bt_stream *stream = (void *) priv_stream;
 332         struct bt_packet *packet = NULL;
 333
 334         BT_ASSERT_PRE_NON_NULL(stream, "Stream");
 335         packet = bt_object_pool_create_object(&stream->packet_pool);
 336         if (unlikely(!packet)) {
 337                 BT_LIB_LOGE("Cannot allocate one packet from stream's packet pool: "
 338                         "%![stream-]+s", stream);
 339                 goto end;
 340         }
 341
 342         if (likely(!packet->stream)) {
 343                 packet->stream = stream;
 344                 bt_object_get_no_null_check_no_parent_check(
 345                         &packet->stream->base);
 346         }
 347
 348 end:
 349         return (void *) packet;
 350 }
 351
 352 int bt_private_packet_move_header_field(
 353                 struct bt_private_packet *priv_packet,
 354                 struct bt_private_packet_header_field *header_field)
 355 {
 356         struct bt_packet *packet = (void *) priv_packet;
 357         struct bt_trace *trace;
 358         struct bt_field_wrapper *field_wrapper = (void *) header_field;
 359
 360         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 361         BT_ASSERT_PRE_NON_NULL(field_wrapper, "Header field");
 362         BT_ASSERT_PRE_PACKET_HOT(packet);
 363         trace = bt_stream_class_borrow_trace_inline(packet->stream->class);
 364         BT_ASSERT_PRE(trace->packet_header_fc,
 365                 "Trace has no packet header field classe: %!+t",
 366                 trace);
 367         BT_ASSERT_PRE(field_wrapper->field->class ==
 368                 trace->packet_header_fc,
 369                 "Unexpected packet header field's class: "
 370                 "%![fc-]+F, %![expected-fc-]+F", field_wrapper->field->class,
 371                 trace->packet_header_fc);
 372
 373         /* Recycle current header field: always exists */
 374         BT_ASSERT(packet->header_field);
 375         recycle_header_field(packet->header_field, trace);
 376
 377         /* Move new field */
 378         packet->header_field = field_wrapper;
 379         return 0;
 380 }
 381
 382 int bt_private_packet_move_context_field(
 383                 struct bt_private_packet *priv_packet,
 384                 struct bt_private_packet_context_field *context_field)
 385 {
 386         struct bt_packet *packet = (void *) priv_packet;
 387         struct bt_stream_class *stream_class;
 388         struct bt_field_wrapper *field_wrapper = (void *) context_field;
 389
 390         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 391         BT_ASSERT_PRE_NON_NULL(field_wrapper, "Context field");
 392         BT_ASSERT_PRE_HOT(packet, "Packet", ": %!+a", packet);
 393         stream_class = packet->stream->class;
 394         BT_ASSERT_PRE(stream_class->packet_context_fc,
 395                 "Stream class has no packet context field classe: %!+S",
 396                 stream_class);
 397         BT_ASSERT_PRE(field_wrapper->field->class ==
 398                 stream_class->packet_context_fc,
 399                 "Unexpected packet header field's class: "
 400                 "%![fc-]+F, %![expected-fc-]+F", field_wrapper->field->class,
 401                 stream_class->packet_context_fc);
 402
 403         /* Recycle current context field: always exists */
 404         BT_ASSERT(packet->context_field);
 405         recycle_context_field(packet->context_field, stream_class);
 406
 407         /* Move new field */
 408         packet->context_field = field_wrapper;
 409         return 0;
 410 }
 411
 412 void bt_private_packet_set_default_beginning_clock_value(
 413                 struct bt_private_packet *priv_packet,
 414                 uint64_t value_cycles)
 415 {
 416         struct bt_packet *packet = (void *) priv_packet;
 417         struct bt_stream_class *sc;
 418
 419         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 420         BT_ASSERT_PRE_PACKET_HOT(packet);
 421         sc = packet->stream->class;
 422         BT_ASSERT(sc);
 423         BT_ASSERT_PRE(sc->default_clock_class,
 424                 "Packet's stream class has no default clock class: "
 425                 "%![packet-]+a, %![sc-]+S", packet, sc);
 426         BT_ASSERT_PRE(sc->packets_have_default_beginning_cv,
 427                 "Packet's stream class indicates that its packets have "
 428                 "no default beginning clock value: %![packet-]+a, %![sc-]+S",
 429                 packet, sc);
 430         BT_ASSERT(packet->default_beginning_cv);
 431         bt_clock_value_set_value_inline(packet->default_beginning_cv,
 432                 value_cycles);
 433         BT_LIB_LOGV("Set packet's default beginning clock value: "
 434                 "%![packet-]+a, value=%" PRIu64, packet, value_cycles);
 435 }
 436
 437 enum bt_clock_value_status bt_packet_borrow_default_beginning_clock_value(
 438                 struct bt_packet *packet, struct bt_clock_value **clock_value)
 439 {
 440         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 441         BT_ASSERT_PRE_NON_NULL(clock_value, "Clock value (output)");
 442         *clock_value = packet->default_beginning_cv;
 443         return BT_CLOCK_VALUE_STATUS_KNOWN;
 444 }
 445
 446 void bt_private_packet_set_default_end_clock_value(
 447                 struct bt_private_packet *priv_packet,
 448                 uint64_t value_cycles)
 449 {
 450         struct bt_packet *packet = (void *) priv_packet;
 451         struct bt_stream_class *sc;
 452
 453         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 454         BT_ASSERT_PRE_PACKET_HOT(packet);
 455         sc = packet->stream->class;
 456         BT_ASSERT(sc);
 457         BT_ASSERT_PRE(sc->default_clock_class,
 458                 "Packet's stream class has no default clock class: "
 459                 "%![packet-]+a, %![sc-]+S", packet, sc);
 460         BT_ASSERT_PRE(sc->packets_have_default_end_cv,
 461                 "Packet's stream class indicates that its packets have "
 462                 "no default end clock value: %![packet-]+a, %![sc-]+S",
 463                 packet, sc);
 464         BT_ASSERT(packet->default_end_cv);
 465         bt_clock_value_set_value_inline(packet->default_end_cv, value_cycles);
 466         BT_LIB_LOGV("Set packet's default end clock value: "
 467                 "%![packet-]+a, value=%" PRIu64, packet, value_cycles);
 468 }
 469
 470 enum bt_clock_value_status bt_packet_borrow_default_end_clock_value(
 471                 struct bt_packet *packet, struct bt_clock_value **clock_value)
 472 {
 473         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 474         BT_ASSERT_PRE_NON_NULL(clock_value, "Clock value (output)");
 475         *clock_value = packet->default_end_cv;
 476         return BT_CLOCK_VALUE_STATUS_KNOWN;
 477 }
 478
 479 enum bt_property_availability bt_packet_get_discarded_event_counter_snapshot(
 480                 struct bt_packet *packet, uint64_t *value)
 481 {
 482         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 483         BT_ASSERT_PRE_NON_NULL(value, "Value (output)");
 484         *value = packet->discarded_event_counter_snapshot.value;
 485         return packet->discarded_event_counter_snapshot.base.avail;
 486 }
 487
 488 void bt_private_packet_set_discarded_event_counter_snapshot(
 489                 struct bt_private_packet *priv_packet, uint64_t value)
 490 {
 491         struct bt_packet *packet = (void *) priv_packet;
 492
 493         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 494         BT_ASSERT_PRE_PACKET_HOT(packet);
 495         BT_ASSERT_PRE(packet->stream->class->packets_have_discarded_event_counter_snapshot,
 496                 "Packet's stream's discarded event counter is not enabled: "
 497                 "%![packet-]+a", packet);
 498         bt_property_uint_set(&packet->discarded_event_counter_snapshot, value);
 499 }
 500
 501 enum bt_property_availability bt_packet_get_packet_counter_snapshot(
 502                 struct bt_packet *packet, uint64_t *value)
 503 {
 504         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 505         BT_ASSERT_PRE_NON_NULL(value, "Value (output)");
 506         *value = packet->packet_counter_snapshot.value;
 507         return packet->packet_counter_snapshot.base.avail;
 508 }
 509
 510 void bt_private_packet_set_packet_counter_snapshot(
 511                 struct bt_private_packet *priv_packet, uint64_t value)
 512 {
 513         struct bt_packet *packet = (void *) priv_packet;
 514
 515         BT_ASSERT_PRE_NON_NULL(packet, "Packet");
 516         BT_ASSERT_PRE_PACKET_HOT(packet);
 517         BT_ASSERT_PRE(packet->stream->class->packets_have_packet_counter_snapshot,
 518                 "Packet's stream's packet counter is not enabled: "
 519                 "%![packet-]+a", packet);
 520         bt_property_uint_set(&packet->packet_counter_snapshot, value);
 521 }