src/lib/trace-ir/trace-class.c

   1 /*
   2  * Copyright 2017-2018 Philippe Proulx <pproulx@efficios.com>
   3  * Copyright 2014 Jérémie Galarneau <jeremie.galarneau@efficios.com>
   4  *
   5  * Permission is hereby granted, free of charge, to any person obtaining a copy
   6  * of this software and associated documentation files (the "Software"), to deal
   7  * in the Software without restriction, including without limitation the rights
   8  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
   9  * copies of the Software, and to permit persons to whom the Software is
  10  * furnished to do so, subject to the following conditions:
  11  *
  12  * The above copyright notice and this permission notice shall be included in
  13  * all copies or substantial portions of the Software.
  14  *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  16  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  17  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  18  * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  19  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  20  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
  21  * SOFTWARE.
  22  */
  23
  24 #define BT_LOG_TAG "LIB/TRACE"
  25 #include "lib/logging.h"
  26
  27 #include "lib/assert-pre.h"
  28 #include <babeltrace2/trace-ir/trace-class.h>
  29 #include <babeltrace2/trace-ir/trace-class-const.h>
  30 #include <babeltrace2/trace-ir/event-class.h>
  31 #include "ctf-writer/functor.h"
  32 #include "ctf-writer/clock.h"
  33 #include "compat/compiler.h"
  34 #include <babeltrace2/value.h>
  35 #include <babeltrace2/value-const.h>
  36 #include "lib/value.h"
  37 #include <babeltrace2/types.h>
  38 #include "compat/endian.h"
  39 #include "common/assert.h"
  40 #include "compat/glib.h"
  41 #include <inttypes.h>
  42 #include <stdint.h>
  43 #include <string.h>
  44 #include <stdlib.h>
  45
  46 #include "attributes.h"
  47 #include "clock-class.h"
  48 #include "event-class.h"
  49 #include "event.h"
  50 #include "field-class.h"
  51 #include "field-wrapper.h"
  52 #include "resolve-field-path.h"
  53 #include "stream-class.h"
  54 #include "stream.h"
  55 #include "trace.h"
  56 #include "utils.h"
  57 #include "lib/func-status.h"
  58
  59 struct bt_trace_class_destruction_listener_elem {
  60         bt_trace_class_destruction_listener_func func;
  61         void *data;
  62 };
  63
  64 #define BT_ASSERT_PRE_TRACE_CLASS_HOT(_tc)                              \
  65         BT_ASSERT_PRE_HOT((_tc), "Trace class", ": %!+T", (_tc))
  66
  67 static
  68 void destroy_trace_class(struct bt_object *obj)
  69 {
  70         struct bt_trace_class *tc = (void *) obj;
  71
  72         BT_LIB_LOGD("Destroying trace class object: %!+T", tc);
  73         /*
  74          * Call destruction listener functions so that everything else
  75          * still exists in the trace class.
  76          */
  77         if (tc->destruction_listeners) {
  78                 uint64_t i;
  79                 BT_LIB_LOGD("Calling trace class destruction listener(s): %!+T", tc);
  80
  81                 /*
  82                 * The trace class' reference count is 0 if we're here. Increment
  83                 * it to avoid a double-destroy (possibly infinitely recursive).
  84                 * This could happen for example if a destruction listener did
  85                 * bt_object_get_ref() (or anything that causes
  86                 * bt_object_get_ref() to be called) on the trace class (ref.
  87                 * count goes from 0 to 1), and then bt_object_put_ref(): the
  88                 * reference count would go from 1 to 0 again and this function
  89                 * would be called again.
  90                 */
  91                 tc->base.ref_count++;
  92
  93                 /* Call all the trace class destruction listeners */
  94                 for (i = 0; i < tc->destruction_listeners->len; i++) {
  95                         struct bt_trace_class_destruction_listener_elem elem =
  96                                 g_array_index(tc->destruction_listeners,
  97                                                 struct bt_trace_class_destruction_listener_elem, i);
  98
  99                         if (elem.func) {
 100                                 elem.func(tc, elem.data);
 101                         }
 102
 103                         /*
 104                          * The destruction listener should not have kept a
 105                          * reference to the trace class.
 106                          */
 107                         BT_ASSERT_PRE(tc->base.ref_count == 1, "Destruction listener kept a reference to the trace class being destroyed: %![tc-]+T", tc);
 108                 }
 109                 g_array_free(tc->destruction_listeners, TRUE);
 110                 tc->destruction_listeners = NULL;
 111         }
 112
 113         if (tc->environment) {
 114                 BT_LOGD_STR("Destroying environment attributes.");
 115                 bt_attributes_destroy(tc->environment);
 116                 tc->environment = NULL;
 117         }
 118
 119         if (tc->name.str) {
 120                 g_string_free(tc->name.str, TRUE);
 121                 tc->name.str = NULL;
 122                 tc->name.value = NULL;
 123         }
 124
 125         if (tc->stream_classes) {
 126                 BT_LOGD_STR("Destroying stream classes.");
 127                 g_ptr_array_free(tc->stream_classes, TRUE);
 128                 tc->stream_classes = NULL;
 129         }
 130
 131         g_free(tc);
 132 }
 133
 134 struct bt_trace_class *bt_trace_class_create(bt_self_component *self_comp)
 135 {
 136         struct bt_trace_class *tc = NULL;
 137
 138         BT_ASSERT_PRE_NON_NULL(self_comp, "Self component");
 139         BT_LOGD_STR("Creating default trace class object.");
 140         tc = g_new0(struct bt_trace_class, 1);
 141         if (!tc) {
 142                 BT_LOGE_STR("Failed to allocate one trace class.");
 143                 goto error;
 144         }
 145
 146         bt_object_init_shared_with_parent(&tc->base, destroy_trace_class);
 147
 148         tc->stream_classes = g_ptr_array_new_with_free_func(
 149                 (GDestroyNotify) bt_object_try_spec_release);
 150         if (!tc->stream_classes) {
 151                 BT_LOGE_STR("Failed to allocate one GPtrArray.");
 152                 goto error;
 153         }
 154
 155         tc->name.str = g_string_new(NULL);
 156         if (!tc->name.str) {
 157                 BT_LOGE_STR("Failed to allocate one GString.");
 158                 goto error;
 159         }
 160
 161         tc->environment = bt_attributes_create();
 162         if (!tc->environment) {
 163                 BT_LOGE_STR("Cannot create empty attributes object.");
 164                 goto error;
 165         }
 166
 167         tc->destruction_listeners = g_array_new(FALSE, TRUE,
 168                 sizeof(struct bt_trace_class_destruction_listener_elem));
 169         if (!tc->destruction_listeners) {
 170                 BT_LOGE_STR("Failed to allocate one GArray.");
 171                 goto error;
 172         }
 173
 174         tc->assigns_automatic_stream_class_id = true;
 175         BT_LIB_LOGD("Created trace class object: %!+T", tc);
 176         goto end;
 177
 178 error:
 179         BT_OBJECT_PUT_REF_AND_RESET(tc);
 180
 181 end:
 182         return tc;
 183 }
 184
 185 const char *bt_trace_class_get_name(const struct bt_trace_class *tc)
 186 {
 187         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 188         return tc->name.value;
 189 }
 190
 191 enum bt_trace_class_set_name_status bt_trace_class_set_name(
 192                 struct bt_trace_class *tc, const char *name)
 193 {
 194         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 195         BT_ASSERT_PRE_NON_NULL(name, "Name");
 196         BT_ASSERT_PRE_TRACE_CLASS_HOT(tc);
 197         g_string_assign(tc->name.str, name);
 198         tc->name.value = tc->name.str->str;
 199         BT_LIB_LOGD("Set trace class's name: %!+T", tc);
 200         return BT_FUNC_STATUS_OK;
 201 }
 202
 203 bt_uuid bt_trace_class_get_uuid(const struct bt_trace_class *tc)
 204 {
 205         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 206         return tc->uuid.value;
 207 }
 208
 209 void bt_trace_class_set_uuid(struct bt_trace_class *tc, bt_uuid uuid)
 210 {
 211         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 212         BT_ASSERT_PRE_NON_NULL(uuid, "UUID");
 213         BT_ASSERT_PRE_TRACE_CLASS_HOT(tc);
 214         memcpy(tc->uuid.uuid, uuid, BABELTRACE_UUID_LEN);
 215         tc->uuid.value = tc->uuid.uuid;
 216         BT_LIB_LOGD("Set trace class's UUID: %!+T", tc);
 217 }
 218
 219 enum bt_trace_class_add_listener_status bt_trace_class_add_destruction_listener(
 220                 const struct bt_trace_class *_tc,
 221                 bt_trace_class_destruction_listener_func listener,
 222                 void *data, uint64_t *listener_id)
 223 {
 224         struct bt_trace_class *tc = (void *) _tc;
 225         uint64_t i;
 226         struct bt_trace_class_destruction_listener_elem new_elem = {
 227                 .func = listener,
 228                 .data = data,
 229         };
 230
 231         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 232         BT_ASSERT_PRE_NON_NULL(listener, "Listener");
 233
 234         /* Find the next available spot */
 235         for (i = 0; i < tc->destruction_listeners->len; i++) {
 236                 struct bt_trace_class_destruction_listener_elem elem =
 237                         g_array_index(tc->destruction_listeners,
 238                                 struct bt_trace_class_destruction_listener_elem, i);
 239
 240                 if (!elem.func) {
 241                         break;
 242                 }
 243         }
 244
 245         if (i == tc->destruction_listeners->len) {
 246                 g_array_append_val(tc->destruction_listeners, new_elem);
 247         } else {
 248                 g_array_insert_val(tc->destruction_listeners, i, new_elem);
 249         }
 250
 251         if (listener_id) {
 252                 *listener_id = i;
 253         }
 254
 255         BT_LIB_LOGD("Added trace class destruction listener: %![tc-]+T, "
 256                         "listener-id=%" PRIu64, tc, i);
 257         return BT_FUNC_STATUS_OK;
 258 }
 259
 260 BT_ASSERT_PRE_FUNC
 261 static
 262 bool has_listener_id(const struct bt_trace_class *tc, uint64_t listener_id)
 263 {
 264         BT_ASSERT(listener_id < tc->destruction_listeners->len);
 265         return (&g_array_index(tc->destruction_listeners,
 266                         struct bt_trace_class_destruction_listener_elem,
 267                         listener_id))->func != NULL;
 268 }
 269
 270 enum bt_trace_class_remove_listener_status bt_trace_class_remove_destruction_listener(
 271                 const struct bt_trace_class *_tc, uint64_t listener_id)
 272 {
 273         struct bt_trace_class *tc = (void *) _tc;
 274         struct bt_trace_class_destruction_listener_elem *elem;
 275
 276         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 277         BT_ASSERT_PRE(has_listener_id(tc, listener_id),
 278                 "Trace class has no such trace class destruction listener ID: "
 279                 "%![tc-]+T, %" PRIu64, tc, listener_id);
 280         elem = &g_array_index(tc->destruction_listeners,
 281                         struct bt_trace_class_destruction_listener_elem,
 282                         listener_id);
 283         BT_ASSERT(elem->func);
 284
 285         elem->func = NULL;
 286         elem->data = NULL;
 287         BT_LIB_LOGD("Removed trace class destruction listener: "
 288                 "%![tc-]+T, listener-id=%" PRIu64,
 289                 tc, listener_id);
 290         return BT_FUNC_STATUS_OK;
 291 }
 292
 293 BT_ASSERT_FUNC
 294 static
 295 bool trace_has_environment_entry(const struct bt_trace_class *tc, const char *name)
 296 {
 297         BT_ASSERT(tc);
 298
 299         return bt_attributes_borrow_field_value_by_name(
 300                 tc->environment, name) != NULL;
 301 }
 302
 303 static
 304 enum bt_trace_class_set_environment_entry_status set_environment_entry(
 305                 struct bt_trace_class *tc,
 306                 const char *name, struct bt_value *value)
 307 {
 308         int ret;
 309
 310         BT_ASSERT(tc);
 311         BT_ASSERT(name);
 312         BT_ASSERT(value);
 313         BT_ASSERT_PRE(!tc->frozen ||
 314                 !trace_has_environment_entry(tc, name),
 315                 "Trace class is frozen: cannot replace environment entry: "
 316                 "%![tc-]+T, entry-name=\"%s\"", tc, name);
 317         ret = bt_attributes_set_field_value(tc->environment, name,
 318                 value);
 319         if (ret) {
 320                 ret = BT_FUNC_STATUS_MEMORY_ERROR;
 321                 BT_LIB_LOGE("Cannot set trace class's environment entry: "
 322                         "%![tc-]+T, entry-name=\"%s\"", tc, name);
 323         } else {
 324                 bt_value_freeze(value);
 325                 BT_LIB_LOGD("Set trace class's environment entry: "
 326                         "%![tc-]+T, entry-name=\"%s\"", tc, name);
 327         }
 328
 329         return ret;
 330 }
 331
 332 enum bt_trace_class_set_environment_entry_status
 333 bt_trace_class_set_environment_entry_string(
 334                 struct bt_trace_class *tc, const char *name, const char *value)
 335 {
 336         int ret;
 337         struct bt_value *value_obj;
 338         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 339         BT_ASSERT_PRE_NON_NULL(name, "Name");
 340         BT_ASSERT_PRE_NON_NULL(value, "Value");
 341         value_obj = bt_value_string_create_init(value);
 342         if (!value_obj) {
 343                 BT_LOGE_STR("Cannot create a string value object.");
 344                 ret = -1;
 345                 goto end;
 346         }
 347
 348         /* set_environment_entry() logs errors */
 349         ret = set_environment_entry(tc, name, value_obj);
 350
 351 end:
 352         bt_object_put_ref(value_obj);
 353         return ret;
 354 }
 355
 356 enum bt_trace_class_set_environment_entry_status
 357 bt_trace_class_set_environment_entry_integer(
 358                 struct bt_trace_class *tc, const char *name, int64_t value)
 359 {
 360         int ret;
 361         struct bt_value *value_obj;
 362         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 363         BT_ASSERT_PRE_NON_NULL(name, "Name");
 364         value_obj = bt_value_signed_integer_create_init(value);
 365         if (!value_obj) {
 366                 BT_LOGE_STR("Cannot create an integer value object.");
 367                 ret = BT_FUNC_STATUS_MEMORY_ERROR;
 368                 goto end;
 369         }
 370
 371         /* set_environment_entry() logs errors */
 372         ret = set_environment_entry(tc, name, value_obj);
 373
 374 end:
 375         bt_object_put_ref(value_obj);
 376         return ret;
 377 }
 378
 379 uint64_t bt_trace_class_get_environment_entry_count(const struct bt_trace_class *tc)
 380 {
 381         int64_t ret;
 382
 383         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 384         ret = bt_attributes_get_count(tc->environment);
 385         BT_ASSERT(ret >= 0);
 386         return (uint64_t) ret;
 387 }
 388
 389 void bt_trace_class_borrow_environment_entry_by_index_const(
 390                 const struct bt_trace_class *tc, uint64_t index,
 391                 const char **name, const struct bt_value **value)
 392 {
 393         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 394         BT_ASSERT_PRE_NON_NULL(name, "Name");
 395         BT_ASSERT_PRE_NON_NULL(value, "Value");
 396         BT_ASSERT_PRE_VALID_INDEX(index,
 397                 bt_attributes_get_count(tc->environment));
 398         *value = bt_attributes_borrow_field_value(tc->environment, index);
 399         BT_ASSERT(*value);
 400         *name = bt_attributes_get_field_name(tc->environment, index);
 401         BT_ASSERT(*name);
 402 }
 403
 404 const struct bt_value *bt_trace_class_borrow_environment_entry_value_by_name_const(
 405                 const struct bt_trace_class *tc, const char *name)
 406 {
 407         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 408         BT_ASSERT_PRE_NON_NULL(name, "Name");
 409         return bt_attributes_borrow_field_value_by_name(tc->environment,
 410                 name);
 411 }
 412
 413 uint64_t bt_trace_class_get_stream_class_count(const struct bt_trace_class *tc)
 414 {
 415         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 416         return (uint64_t) tc->stream_classes->len;
 417 }
 418
 419 struct bt_stream_class *bt_trace_class_borrow_stream_class_by_index(
 420                 struct bt_trace_class *tc, uint64_t index)
 421 {
 422         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 423         BT_ASSERT_PRE_VALID_INDEX(index, tc->stream_classes->len);
 424         return g_ptr_array_index(tc->stream_classes, index);
 425 }
 426
 427 const struct bt_stream_class *
 428 bt_trace_class_borrow_stream_class_by_index_const(
 429                 const struct bt_trace_class *tc, uint64_t index)
 430 {
 431         return bt_trace_class_borrow_stream_class_by_index(
 432                 (void *) tc, index);
 433 }
 434
 435 struct bt_stream_class *bt_trace_class_borrow_stream_class_by_id(
 436                 struct bt_trace_class *tc, uint64_t id)
 437 {
 438         struct bt_stream_class *stream_class = NULL;
 439         uint64_t i;
 440
 441         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 442
 443         for (i = 0; i < tc->stream_classes->len; i++) {
 444                 struct bt_stream_class *stream_class_candidate =
 445                         g_ptr_array_index(tc->stream_classes, i);
 446
 447                 if (stream_class_candidate->id == id) {
 448                         stream_class = stream_class_candidate;
 449                         goto end;
 450                 }
 451         }
 452
 453 end:
 454         return stream_class;
 455 }
 456
 457 const struct bt_stream_class *
 458 bt_trace_class_borrow_stream_class_by_id_const(
 459                 const struct bt_trace_class *tc, uint64_t id)
 460 {
 461         return bt_trace_class_borrow_stream_class_by_id((void *) tc, id);
 462 }
 463
 464 BT_HIDDEN
 465 void _bt_trace_class_freeze(const struct bt_trace_class *tc)
 466 {
 467         BT_ASSERT(tc);
 468         BT_LIB_LOGD("Freezing trace class: %!+T", tc);
 469         ((struct bt_trace_class *) tc)->frozen = true;
 470 }
 471
 472 bt_bool bt_trace_class_assigns_automatic_stream_class_id(const struct bt_trace_class *tc)
 473 {
 474         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 475         return (bt_bool) tc->assigns_automatic_stream_class_id;
 476 }
 477
 478 void bt_trace_class_set_assigns_automatic_stream_class_id(struct bt_trace_class *tc,
 479                 bt_bool value)
 480 {
 481         BT_ASSERT_PRE_NON_NULL(tc, "Trace class");
 482         BT_ASSERT_PRE_TRACE_CLASS_HOT(tc);
 483         tc->assigns_automatic_stream_class_id = (bool) value;
 484         BT_LIB_LOGD("Set trace class's automatic stream class ID "
 485                 "assignment property: %!+T", tc);
 486 }
 487
 488 void bt_trace_class_get_ref(const struct bt_trace_class *trace_class)
 489 {
 490         bt_object_get_ref(trace_class);
 491 }
 492
 493 void bt_trace_class_put_ref(const struct bt_trace_class *trace_class)
 494 {
 495         bt_object_put_ref(trace_class);
 496 }