projects / babeltrace.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
lib/values.c: logging: log original and copy addresses
[babeltrace.git] / lib / values.c
1 /*
2 * Values.c: value objects
3 *
4 * Babeltrace Library
5 *
6 * Copyright (c) 2015 EfficiOS Inc. and Linux Foundation
7 * Copyright (c) 2015 Philippe Proulx <pproulx@efficios.com>
8 *
9 * Permission is hereby granted, free of charge, to any person obtaining a copy
10 * of this software and associated documentation files (the "Software"), to deal
11 * in the Software without restriction, including without limitation the rights
12 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
13 * copies of the Software, and to permit persons to whom the Software is
14 * furnished to do so, subject to the following conditions:
15 *
16 * The above copyright notice and this permission notice shall be included in
17 * all copies or substantial portions of the Software.
18 *
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
22 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
23 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
24 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
25 * SOFTWARE.
26 */
27
28 #define BT_LOG_TAG "VALUES"
29 #include <babeltrace/lib-logging-internal.h>
30
31 #include <stdlib.h>
32 #include <string.h>
33 #include <assert.h>
34 #include <string.h>
35 #include <inttypes.h>
36 #include <babeltrace/compiler-internal.h>
37 #include <babeltrace/ref.h>
38 #include <babeltrace/values.h>
39 #include <babeltrace/compat/glib-internal.h>
40 #include <babeltrace/types.h>
41 #include <babeltrace/object-internal.h>
42 #include <babeltrace/values-internal.h>
43
44 #define BT_VALUE_FROM_CONCRETE(_concrete) ((struct bt_value *) (_concrete))
45 #define BT_VALUE_TO_BOOL(_base) ((struct bt_value_bool *) (_base))
46 #define BT_VALUE_TO_INTEGER(_base) ((struct bt_value_integer *) (_base))
47 #define BT_VALUE_TO_FLOAT(_base) ((struct bt_value_float *) (_base))
48 #define BT_VALUE_TO_STRING(_base) ((struct bt_value_string *) (_base))
49 #define BT_VALUE_TO_ARRAY(_base) ((struct bt_value_array *) (_base))
50 #define BT_VALUE_TO_MAP(_base) ((struct bt_value_map *) (_base))
51
52 struct bt_value {
53 struct bt_object base;
54 enum bt_value_type type;
55 bt_bool is_frozen;
56 };
57
58 static
59 struct bt_value bt_value_null_instance = {
60 .base = {
61 .ref_count = {
62 .count = 1,
63 .release = NULL,
64 },
65 .release = NULL,
66 .parent = NULL,
67 },
68 .type = BT_VALUE_TYPE_NULL,
69 .is_frozen = BT_TRUE,
70 };
71
72 struct bt_value *bt_value_null = &bt_value_null_instance;
73
74 struct bt_value_bool {
75 struct bt_value base;
76 bt_bool value;
77 };
78
79 struct bt_value_integer {
80 struct bt_value base;
81 int64_t value;
82 };
83
84 struct bt_value_float {
85 struct bt_value base;
86 double value;
87 };
88
89 struct bt_value_string {
90 struct bt_value base;
91 GString *gstr;
92 };
93
94 struct bt_value_array {
95 struct bt_value base;
96 GPtrArray *garray;
97 };
98
99 struct bt_value_map {
100 struct bt_value base;
101 GHashTable *ght;
102 };
103
104 static
105 void bt_value_destroy(struct bt_object *obj);
106
107 static
108 void bt_value_string_destroy(struct bt_value *object)
109 {
110 g_string_free(BT_VALUE_TO_STRING(object)->gstr, TRUE);
111 }
112
113 static
114 void bt_value_array_destroy(struct bt_value *object)
115 {
116 /*
117 * Pointer array's registered value destructor will take care
118 * of putting each contained object.
119 */
120 g_ptr_array_free(BT_VALUE_TO_ARRAY(object)->garray, TRUE);
121 }
122
123 static
124 void bt_value_map_destroy(struct bt_value *object)
125 {
126 /*
127 * Hash table's registered value destructor will take care of
128 * putting each contained object. Keys are GQuarks and cannot
129 * be destroyed anyway.
130 */
131 g_hash_table_destroy(BT_VALUE_TO_MAP(object)->ght);
132 }
133
134 static
135 void (* const destroy_funcs[])(struct bt_value *) = {
136 [BT_VALUE_TYPE_NULL] = NULL,
137 [BT_VALUE_TYPE_BOOL] = NULL,
138 [BT_VALUE_TYPE_INTEGER] = NULL,
139 [BT_VALUE_TYPE_FLOAT] = NULL,
140 [BT_VALUE_TYPE_STRING] = bt_value_string_destroy,
141 [BT_VALUE_TYPE_ARRAY] = bt_value_array_destroy,
142 [BT_VALUE_TYPE_MAP] = bt_value_map_destroy,
143 };
144
145 static
146 struct bt_value *bt_value_null_copy(const struct bt_value *null_obj)
147 {
148 return bt_value_null;
149 }
150
151 static
152 struct bt_value *bt_value_bool_copy(const struct bt_value *bool_obj)
153 {
154 return bt_value_bool_create_init(BT_VALUE_TO_BOOL(bool_obj)->value);
155 }
156
157 static
158 struct bt_value *bt_value_integer_copy(const struct bt_value *integer_obj)
159 {
160 return bt_value_integer_create_init(
161 BT_VALUE_TO_INTEGER(integer_obj)->value);
162 }
163
164 static
165 struct bt_value *bt_value_float_copy(const struct bt_value *float_obj)
166 {
167 return bt_value_float_create_init(
168 BT_VALUE_TO_FLOAT(float_obj)->value);
169 }
170
171 static
172 struct bt_value *bt_value_string_copy(const struct bt_value *string_obj)
173 {
174 return bt_value_string_create_init(
175 BT_VALUE_TO_STRING(string_obj)->gstr->str);
176 }
177
178 static
179 struct bt_value *bt_value_array_copy(const struct bt_value *array_obj)
180 {
181 int i;
182 int ret;
183 struct bt_value *copy_obj;
184 struct bt_value_array *typed_array_obj;
185
186 BT_LOGD("Copying array value: addr=%p", array_obj);
187 typed_array_obj = BT_VALUE_TO_ARRAY(array_obj);
188 copy_obj = bt_value_array_create();
189
190 if (!copy_obj) {
191 BT_LOGE_STR("Cannot create empty array value.");
192 goto end;
193 }
194
195 for (i = 0; i < typed_array_obj->garray->len; ++i) {
196 struct bt_value *element_obj_copy;
197 struct bt_value *element_obj = bt_value_array_get(array_obj, i);
198
199 if (!element_obj) {
200 BT_LOGE("Cannot get array value's element: "
201 "addr=%p, index=%d",
202 array_obj, i);
203 BT_PUT(copy_obj);
204 goto end;
205 }
206
207 element_obj_copy = bt_value_copy(element_obj);
208 BT_PUT(element_obj);
209
210 if (!element_obj_copy) {
211 BT_LOGE("Cannot copy array value's element: "
212 "array-addr=%p, index=%d",
213 array_obj, i);
214 BT_PUT(copy_obj);
215 goto end;
216 }
217
218 ret = bt_value_array_append(copy_obj, element_obj_copy);
219 BT_PUT(element_obj_copy);
220
221 if (ret) {
222 BT_LOGE("Cannot append to array value: addr=%p",
223 array_obj);
224 BT_PUT(copy_obj);
225 goto end;
226 }
227 }
228
229 BT_LOGD("Copied array value: original-addr=%p, copy-addr=%p",
230 array_obj, copy_obj);
231
232 end:
233 return copy_obj;
234 }
235
236 static
237 struct bt_value *bt_value_map_copy(const struct bt_value *map_obj)
238 {
239 int ret;
240 GHashTableIter iter;
241 gpointer key, element_obj;
242 struct bt_value *copy_obj;
243 struct bt_value *element_obj_copy;
244 struct bt_value_map *typed_map_obj;
245
246 BT_LOGD("Copying map value: addr=%p", map_obj);
247 typed_map_obj = BT_VALUE_TO_MAP(map_obj);
248 copy_obj = bt_value_map_create();
249
250 if (!copy_obj) {
251 goto end;
252 }
253
254 g_hash_table_iter_init(&iter, typed_map_obj->ght);
255
256 while (g_hash_table_iter_next(&iter, &key, &element_obj)) {
257 const char *key_str = g_quark_to_string(GPOINTER_TO_UINT(key));
258
259 element_obj_copy = bt_value_copy(element_obj);
260
261 if (!element_obj_copy) {
262 BT_LOGE("Cannot copy map value's element: "
263 "map-addr=%p, key=\"%s\"",
264 map_obj, key_str);
265 BT_PUT(copy_obj);
266 goto end;
267 }
268
269 ret = bt_value_map_insert(copy_obj, key_str, element_obj_copy);
270 BT_PUT(element_obj_copy);
271
272 if (ret) {
273 BT_LOGE("Cannot insert into map value: addr=%p, key=\"%s\"",
274 map_obj, key_str);
275 BT_PUT(copy_obj);
276 goto end;
277 }
278 }
279
280 BT_LOGD("Copied map value: addr=%p", map_obj);
281
282 end:
283 return copy_obj;
284 }
285
286 static
287 struct bt_value *(* const copy_funcs[])(const struct bt_value *) = {
288 [BT_VALUE_TYPE_NULL] = bt_value_null_copy,
289 [BT_VALUE_TYPE_BOOL] = bt_value_bool_copy,
290 [BT_VALUE_TYPE_INTEGER] = bt_value_integer_copy,
291 [BT_VALUE_TYPE_FLOAT] = bt_value_float_copy,
292 [BT_VALUE_TYPE_STRING] = bt_value_string_copy,
293 [BT_VALUE_TYPE_ARRAY] = bt_value_array_copy,
294 [BT_VALUE_TYPE_MAP] = bt_value_map_copy,
295 };
296
297 static
298 bt_bool bt_value_null_compare(const struct bt_value *object_a,
299 const struct bt_value *object_b)
300 {
301 /*
302 * Always BT_TRUE since bt_value_compare() already checks if both
303 * object_a and object_b have the same type, and in the case of
304 * null value objects, they're always the same if it is so.
305 */
306 return BT_TRUE;
307 }
308
309 static
310 bt_bool bt_value_bool_compare(const struct bt_value *object_a,
311 const struct bt_value *object_b)
312 {
313 return BT_VALUE_TO_BOOL(object_a)->value ==
314 BT_VALUE_TO_BOOL(object_b)->value;
315 }
316
317 static
318 bt_bool bt_value_integer_compare(const struct bt_value *object_a,
319 const struct bt_value *object_b)
320 {
321 return BT_VALUE_TO_INTEGER(object_a)->value ==
322 BT_VALUE_TO_INTEGER(object_b)->value;
323 }
324
325 static
326 bt_bool bt_value_float_compare(const struct bt_value *object_a,
327 const struct bt_value *object_b)
328 {
329 return BT_VALUE_TO_FLOAT(object_a)->value ==
330 BT_VALUE_TO_FLOAT(object_b)->value;
331 }
332
333 static
334 bt_bool bt_value_string_compare(const struct bt_value *object_a,
335 const struct bt_value *object_b)
336 {
337 return !strcmp(BT_VALUE_TO_STRING(object_a)->gstr->str,
338 BT_VALUE_TO_STRING(object_b)->gstr->str);
339 }
340
341 static
342 bt_bool bt_value_array_compare(const struct bt_value *object_a,
343 const struct bt_value *object_b)
344 {
345 int i;
346 bt_bool ret = BT_TRUE;
347 const struct bt_value_array *array_obj_a =
348 BT_VALUE_TO_ARRAY(object_a);
349
350 if (bt_value_array_size(object_a) != bt_value_array_size(object_b)) {
351 BT_LOGV("Array values are different: size mismatch "
352 "value-a-addr=%p, value-b-addr=%p, "
353 "value-a-size=%" PRId64 ", value-b-size=%" PRId64,
354 object_a, object_b,
355 bt_value_array_size(object_a),
356 bt_value_array_size(object_b));
357 ret = BT_FALSE;
358 goto end;
359 }
360
361 for (i = 0; i < array_obj_a->garray->len; ++i) {
362 struct bt_value *element_obj_a;
363 struct bt_value *element_obj_b;
364
365 element_obj_a = bt_value_array_get(object_a, i);
366 element_obj_b = bt_value_array_get(object_b, i);
367
368 if (!bt_value_compare(element_obj_a, element_obj_b)) {
369 BT_LOGV("Array values's elements are different: "
370 "value-a-addr=%p, value-b-addr=%p, index=%d",
371 element_obj_a, element_obj_b, index);
372 BT_PUT(element_obj_a);
373 BT_PUT(element_obj_b);
374 ret = BT_FALSE;
375 goto end;
376 }
377
378 BT_PUT(element_obj_a);
379 BT_PUT(element_obj_b);
380 }
381
382 end:
383 return ret;
384 }
385
386 static
387 bt_bool bt_value_map_compare(const struct bt_value *object_a,
388 const struct bt_value *object_b)
389 {
390 bt_bool ret = BT_TRUE;
391 GHashTableIter iter;
392 gpointer key, element_obj_a;
393 const struct bt_value_map *map_obj_a = BT_VALUE_TO_MAP(object_a);
394
395 if (bt_value_map_size(object_a) != bt_value_map_size(object_b)) {
396 BT_LOGV("Map values are different: size mismatch "
397 "value-a-addr=%p, value-b-addr=%p, "
398 "value-a-size=%" PRId64 ", value-b-size=%" PRId64,
399 object_a, object_b,
400 bt_value_map_size(object_a),
401 bt_value_map_size(object_b));
402 ret = BT_FALSE;
403 goto end;
404 }
405
406 g_hash_table_iter_init(&iter, map_obj_a->ght);
407
408 while (g_hash_table_iter_next(&iter, &key, &element_obj_a)) {
409 struct bt_value *element_obj_b;
410 const char *key_str = g_quark_to_string(GPOINTER_TO_UINT(key));
411
412 element_obj_b = bt_value_map_get(object_b, key_str);
413
414 if (!bt_value_compare(element_obj_a, element_obj_b)) {
415 BT_LOGV("Map values's elements are different: "
416 "value-a-addr=%p, value-b-addr=%p, key=\"%s\"",
417 element_obj_a, element_obj_b, key_str);
418 BT_PUT(element_obj_b);
419 ret = BT_FALSE;
420 goto end;
421 }
422
423 BT_PUT(element_obj_b);
424 }
425
426 end:
427 return ret;
428 }
429
430 static
431 bt_bool (* const compare_funcs[])(const struct bt_value *,
432 const struct bt_value *) = {
433 [BT_VALUE_TYPE_NULL] = bt_value_null_compare,
434 [BT_VALUE_TYPE_BOOL] = bt_value_bool_compare,
435 [BT_VALUE_TYPE_INTEGER] = bt_value_integer_compare,
436 [BT_VALUE_TYPE_FLOAT] = bt_value_float_compare,
437 [BT_VALUE_TYPE_STRING] = bt_value_string_compare,
438 [BT_VALUE_TYPE_ARRAY] = bt_value_array_compare,
439 [BT_VALUE_TYPE_MAP] = bt_value_map_compare,
440 };
441
442 void bt_value_null_freeze(struct bt_value *object)
443 {
444 }
445
446 void bt_value_generic_freeze(struct bt_value *object)
447 {
448 object->is_frozen = BT_TRUE;
449 }
450
451 void bt_value_array_freeze(struct bt_value *object)
452 {
453 int i;
454 struct bt_value_array *typed_array_obj =
455 BT_VALUE_TO_ARRAY(object);
456
457 for (i = 0; i < typed_array_obj->garray->len; ++i) {
458 struct bt_value *element_obj =
459 g_ptr_array_index(typed_array_obj->garray, i);
460
461 bt_value_freeze(element_obj);
462 }
463
464 bt_value_generic_freeze(object);
465 }
466
467 void bt_value_map_freeze(struct bt_value *object)
468 {
469 GHashTableIter iter;
470 gpointer key, element_obj;
471 const struct bt_value_map *map_obj = BT_VALUE_TO_MAP(object);
472
473 g_hash_table_iter_init(&iter, map_obj->ght);
474
475 while (g_hash_table_iter_next(&iter, &key, &element_obj)) {
476 bt_value_freeze(element_obj);
477 }
478
479 bt_value_generic_freeze(object);
480 }
481
482 static
483 void (* const freeze_funcs[])(struct bt_value *) = {
484 [BT_VALUE_TYPE_NULL] = bt_value_null_freeze,
485 [BT_VALUE_TYPE_BOOL] = bt_value_generic_freeze,
486 [BT_VALUE_TYPE_INTEGER] = bt_value_generic_freeze,
487 [BT_VALUE_TYPE_FLOAT] = bt_value_generic_freeze,
488 [BT_VALUE_TYPE_STRING] = bt_value_generic_freeze,
489 [BT_VALUE_TYPE_ARRAY] = bt_value_array_freeze,
490 [BT_VALUE_TYPE_MAP] = bt_value_map_freeze,
491 };
492
493 static
494 void bt_value_destroy(struct bt_object *obj)
495 {
496 struct bt_value *value;
497
498 value = container_of(obj, struct bt_value, base);
499 assert(value->type != BT_VALUE_TYPE_UNKNOWN);
500 BT_LOGD("Destroying value: addr=%p", value);
501
502 if (bt_value_is_null(value)) {
503 BT_LOGD_STR("Not destroying the null value singleton.");
504 return;
505 }
506
507 if (destroy_funcs[value->type]) {
508 destroy_funcs[value->type](value);
509 }
510
511 g_free(value);
512 }
513
514 enum bt_value_status bt_value_freeze(struct bt_value *object)
515 {
516 enum bt_value_status ret = BT_VALUE_STATUS_OK;
517
518 if (!object) {
519 BT_LOGW_STR("Invalid parameter: value object is NULL.");
520 ret = BT_VALUE_STATUS_INVAL;
521 goto end;
522 }
523
524 if (object->is_frozen) {
525 goto end;
526 }
527
528 BT_LOGD("Freezing value: addr=%p", object);
529 freeze_funcs[object->type](object);
530
531 end:
532 return ret;
533 }
534
535 bt_bool bt_value_is_frozen(const struct bt_value *object)
536 {
537 return object && object->is_frozen;
538 }
539
540 enum bt_value_type bt_value_get_type(const struct bt_value *object)
541 {
542 if (!object) {
543 BT_LOGW_STR("Invalid parameter: value object is NULL.");
544 return BT_VALUE_TYPE_UNKNOWN;
545 }
546
547 return object->type;
548 }
549
550 static
551 struct bt_value bt_value_create_base(enum bt_value_type type)
552 {
553 struct bt_value base;
554
555 base.type = type;
556 base.is_frozen = BT_FALSE;
557 bt_object_init(&base, bt_value_destroy);
558 return base;
559 }
560
561 struct bt_value *bt_value_bool_create_init(bt_bool val)
562 {
563 struct bt_value_bool *bool_obj;
564
565 BT_LOGD("Creating boolean value object: val=%d", val);
566 bool_obj = g_new0(struct bt_value_bool, 1);
567
568 if (!bool_obj) {
569 BT_LOGE_STR("Failed to allocate one boolean value object.");
570 goto end;
571 }
572
573 bool_obj->base = bt_value_create_base(BT_VALUE_TYPE_BOOL);
574 bool_obj->value = val;
575 BT_LOGD("Created boolean value object: addr=%p", bool_obj);
576
577 end:
578 return BT_VALUE_FROM_CONCRETE(bool_obj);
579 }
580
581 struct bt_value *bt_value_bool_create(void)
582 {
583 return bt_value_bool_create_init(BT_FALSE);
584 }
585
586 struct bt_value *bt_value_integer_create_init(int64_t val)
587 {
588 struct bt_value_integer *integer_obj;
589
590 BT_LOGD("Creating integer value object: val=%" PRId64, val);
591 integer_obj = g_new0(struct bt_value_integer, 1);
592
593 if (!integer_obj) {
594 BT_LOGE_STR("Failed to allocate one integer value object.");
595 goto end;
596 }
597
598 integer_obj->base = bt_value_create_base(BT_VALUE_TYPE_INTEGER);
599 integer_obj->value = val;
600 BT_LOGD("Created integer value object: addr=%p",
601 integer_obj);
602
603 end:
604 return BT_VALUE_FROM_CONCRETE(integer_obj);
605 }
606
607 struct bt_value *bt_value_integer_create(void)
608 {
609 return bt_value_integer_create_init(0);
610 }
611
612 struct bt_value *bt_value_float_create_init(double val)
613 {
614 struct bt_value_float *float_obj;
615
616 BT_LOGD("Creating floating point number value object: val=%f", val);
617 float_obj = g_new0(struct bt_value_float, 1);
618
619 if (!float_obj) {
620 BT_LOGE_STR("Failed to allocate one floating point number value object.");
621 goto end;
622 }
623
624 float_obj->base = bt_value_create_base(BT_VALUE_TYPE_FLOAT);
625 float_obj->value = val;
626 BT_LOGD("Created floating point number value object: addr=%p",
627 float_obj);
628
629 end:
630 return BT_VALUE_FROM_CONCRETE(float_obj);
631 }
632
633 struct bt_value *bt_value_float_create(void)
634 {
635 return bt_value_float_create_init(0.);
636 }
637
638 struct bt_value *bt_value_string_create_init(const char *val)
639 {
640 struct bt_value_string *string_obj = NULL;
641
642 if (!val) {
643 BT_LOGW_STR("Invalid parameter: value is NULL.");
644 goto end;
645 }
646
647 BT_LOGD("Creating string value object: val-len=%u", strlen(val));
648 string_obj = g_new0(struct bt_value_string, 1);
649
650 if (!string_obj) {
651 BT_LOGE_STR("Failed to allocate one string object.");
652 goto end;
653 }
654
655 string_obj->base = bt_value_create_base(BT_VALUE_TYPE_STRING);
656 string_obj->gstr = g_string_new(val);
657
658 if (!string_obj->gstr) {
659 BT_LOGE_STR("Failed to allocate a GString.");
660 g_free(string_obj);
661 string_obj = NULL;
662 goto end;
663 }
664
665 BT_LOGD("Created string value object: addr=%p",
666 string_obj);
667
668 end:
669 return BT_VALUE_FROM_CONCRETE(string_obj);
670 }
671
672 struct bt_value *bt_value_string_create(void)
673 {
674 return bt_value_string_create_init("");
675 }
676
677 struct bt_value *bt_value_array_create(void)
678 {
679 struct bt_value_array *array_obj;
680
681 BT_LOGD_STR("Creating empty array value object.");
682 array_obj = g_new0(struct bt_value_array, 1);
683
684 if (!array_obj) {
685 BT_LOGE_STR("Failed to allocate one array object.");
686 goto end;
687 }
688
689 array_obj->base = bt_value_create_base(BT_VALUE_TYPE_ARRAY);
690 array_obj->garray = bt_g_ptr_array_new_full(0,
691 (GDestroyNotify) bt_put);
692
693 if (!array_obj->garray) {
694 BT_LOGE_STR("Failed to allocate a GPtrArray.");
695 g_free(array_obj);
696 array_obj = NULL;
697 goto end;
698 }
699
700 BT_LOGD("Created array value object: addr=%p",
701 array_obj);
702
703 end:
704 return BT_VALUE_FROM_CONCRETE(array_obj);
705 }
706
707 struct bt_value *bt_value_map_create(void)
708 {
709 struct bt_value_map *map_obj;
710
711 BT_LOGD_STR("Creating empty map value object.");
712 map_obj = g_new0(struct bt_value_map, 1);
713
714 if (!map_obj) {
715 BT_LOGE_STR("Failed to allocate one map object.");
716 goto end;
717 }
718
719 map_obj->base = bt_value_create_base(BT_VALUE_TYPE_MAP);
720 map_obj->ght = g_hash_table_new_full(g_direct_hash, g_direct_equal,
721 NULL, (GDestroyNotify) bt_put);
722
723 if (!map_obj->ght) {
724 BT_LOGE_STR("Failed to allocate a GHashTable.");
725 g_free(map_obj);
726 map_obj = NULL;
727 goto end;
728 }
729
730 BT_LOGD("Created map value object: addr=%p",
731 map_obj);
732
733 end:
734 return BT_VALUE_FROM_CONCRETE(map_obj);
735 }
736
737 enum bt_value_status bt_value_bool_get(const struct bt_value *bool_obj,
738 bt_bool *val)
739 {
740 enum bt_value_status ret = BT_VALUE_STATUS_OK;
741 struct bt_value_bool *typed_bool_obj = BT_VALUE_TO_BOOL(bool_obj);
742
743 if (!bool_obj || !val) {
744 BT_LOGW("Invalid parameter: value object or value is NULL: "
745 "value-addr=%p, raw-value-addr=%p",
746 bool_obj, val);
747 ret = BT_VALUE_STATUS_INVAL;
748 goto end;
749 }
750
751 if (!bt_value_is_bool(bool_obj)) {
752 BT_LOGW("Invalid parameter: value is not a boolean value: addr=%p, "
753 "type=%s", bool_obj, bool_obj->type,
754 bt_value_type_string(bool_obj->type));
755 ret = BT_VALUE_STATUS_INVAL;
756 goto end;
757 }
758
759 *val = typed_bool_obj->value;
760
761 end:
762 return ret;
763 }
764
765 enum bt_value_status bt_value_bool_set(struct bt_value *bool_obj, bt_bool val)
766 {
767 enum bt_value_status ret = BT_VALUE_STATUS_OK;
768 struct bt_value_bool *typed_bool_obj = BT_VALUE_TO_BOOL(bool_obj);
769
770 if (!bool_obj) {
771 BT_LOGW_STR("Invalid parameter: value object is NULL.");
772 ret = BT_VALUE_STATUS_INVAL;
773 goto end;
774 }
775
776 if (!bt_value_is_bool(bool_obj)) {
777 BT_LOGW("Invalid parameter: value is not a boolean value: addr=%p, "
778 "type=%s", bool_obj,
779 bt_value_type_string(bool_obj->type));
780 ret = BT_VALUE_STATUS_INVAL;
781 goto end;
782 }
783
784 if (bool_obj->is_frozen) {
785 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
786 bool_obj);
787 ret = BT_VALUE_STATUS_FROZEN;
788 goto end;
789 }
790
791 typed_bool_obj->value = val;
792 BT_LOGV("Set boolean value's raw value: value-addr=%p, value=%d",
793 bool_obj, val);
794
795 end:
796 return ret;
797 }
798
799 enum bt_value_status bt_value_integer_get(const struct bt_value *integer_obj,
800 int64_t *val)
801 {
802 enum bt_value_status ret = BT_VALUE_STATUS_OK;
803 struct bt_value_integer *typed_integer_obj =
804 BT_VALUE_TO_INTEGER(integer_obj);
805
806 if (!integer_obj || !val) {
807 BT_LOGW("Invalid parameter: value object or value is NULL: "
808 "value-addr=%p, raw-value-addr=%p",
809 integer_obj, val);
810 ret = BT_VALUE_STATUS_INVAL;
811 goto end;
812 }
813
814 if (!bt_value_is_integer(integer_obj)) {
815 BT_LOGW("Invalid parameter: value is not an integer value: addr=%p, "
816 "type=%s", integer_obj,
817 bt_value_type_string(integer_obj->type));
818 ret = BT_VALUE_STATUS_INVAL;
819 goto end;
820 }
821
822 *val = typed_integer_obj->value;
823
824 end:
825 return ret;
826 }
827
828 enum bt_value_status bt_value_integer_set(struct bt_value *integer_obj,
829 int64_t val)
830 {
831 enum bt_value_status ret = BT_VALUE_STATUS_OK;
832 struct bt_value_integer *typed_integer_obj =
833 BT_VALUE_TO_INTEGER(integer_obj);
834
835 if (!integer_obj) {
836 BT_LOGW_STR("Invalid parameter: value object is NULL.");
837 ret = BT_VALUE_STATUS_INVAL;
838 goto end;
839 }
840
841 if (!bt_value_is_integer(integer_obj)) {
842 BT_LOGW("Invalid parameter: value is not an integer value: addr=%p, "
843 "type=%s", integer_obj,
844 bt_value_type_string(integer_obj->type));
845 ret = BT_VALUE_STATUS_INVAL;
846 goto end;
847 }
848
849 if (integer_obj->is_frozen) {
850 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
851 integer_obj);
852 ret = BT_VALUE_STATUS_FROZEN;
853 goto end;
854 }
855
856 typed_integer_obj->value = val;
857 BT_LOGV("Set integer value's raw value: value-addr=%p, value=%" PRId64,
858 integer_obj, val);
859
860 end:
861 return ret;
862 }
863
864 enum bt_value_status bt_value_float_get(const struct bt_value *float_obj,
865 double *val)
866 {
867 enum bt_value_status ret = BT_VALUE_STATUS_OK;
868 struct bt_value_float *typed_float_obj =
869 BT_VALUE_TO_FLOAT(float_obj);
870
871 if (!float_obj || !val) {
872 BT_LOGW("Invalid parameter: value object or value is NULL: "
873 "value-addr=%p, raw-value-addr=%p",
874 float_obj, val);
875 ret = BT_VALUE_STATUS_INVAL;
876 goto end;
877 }
878
879 if (!bt_value_is_float(float_obj)) {
880 BT_LOGW("Invalid parameter: value is not a floating point number value: addr=%p, "
881 "type=%s", float_obj,
882 bt_value_type_string(float_obj->type));
883 ret = BT_VALUE_STATUS_INVAL;
884 goto end;
885 }
886
887 *val = typed_float_obj->value;
888
889 end:
890 return ret;
891 }
892
893 enum bt_value_status bt_value_float_set(struct bt_value *float_obj,
894 double val)
895 {
896 enum bt_value_status ret = BT_VALUE_STATUS_OK;
897 struct bt_value_float *typed_float_obj =
898 BT_VALUE_TO_FLOAT(float_obj);
899
900 if (!float_obj) {
901 BT_LOGW_STR("Invalid parameter: value object is NULL.");
902 ret = BT_VALUE_STATUS_INVAL;
903 goto end;
904 }
905
906 if (!bt_value_is_float(float_obj)) {
907 BT_LOGW("Invalid parameter: value is not a floating point number value: addr=%p, "
908 "type=%s", float_obj,
909 bt_value_type_string(float_obj->type));
910 ret = BT_VALUE_STATUS_INVAL;
911 goto end;
912 }
913
914 if (float_obj->is_frozen) {
915 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
916 float_obj);
917 ret = BT_VALUE_STATUS_FROZEN;
918 goto end;
919 }
920
921 typed_float_obj->value = val;
922 BT_LOGV("Set floating point number value's raw value: value-addr=%p, value=%f",
923 float_obj, val);
924
925 end:
926 return ret;
927 }
928
929 enum bt_value_status bt_value_string_get(const struct bt_value *string_obj,
930 const char **val)
931 {
932 enum bt_value_status ret = BT_VALUE_STATUS_OK;
933 struct bt_value_string *typed_string_obj =
934 BT_VALUE_TO_STRING(string_obj);
935
936 if (!string_obj || !val) {
937 BT_LOGW("Invalid parameter: value object or value is NULL: "
938 "value-addr=%p, raw-value-addr=%p",
939 string_obj, val);
940 ret = BT_VALUE_STATUS_INVAL;
941 goto end;
942 }
943
944 if (!bt_value_is_string(string_obj)) {
945 BT_LOGW("Invalid parameter: value is not a string value: addr=%p, "
946 "type=%s", string_obj,
947 bt_value_type_string(string_obj->type));
948 ret = BT_VALUE_STATUS_INVAL;
949 goto end;
950 }
951
952 *val = typed_string_obj->gstr->str;
953
954 end:
955 return ret;
956 }
957
958 enum bt_value_status bt_value_string_set(struct bt_value *string_obj,
959 const char *val)
960 {
961 enum bt_value_status ret = BT_VALUE_STATUS_OK;
962 struct bt_value_string *typed_string_obj =
963 BT_VALUE_TO_STRING(string_obj);
964
965 if (!string_obj || !val) {
966 BT_LOGW("Invalid parameter: value object or value is NULL: "
967 "value-addr=%p, raw-value-addr=%p",
968 string_obj, val);
969 ret = BT_VALUE_STATUS_INVAL;
970 goto end;
971 }
972
973 if (!bt_value_is_string(string_obj)) {
974 BT_LOGW("Invalid parameter: value is not a string value: addr=%p, "
975 "type=%s", string_obj,
976 bt_value_type_string(string_obj->type));
977 ret = BT_VALUE_STATUS_INVAL;
978 goto end;
979 }
980
981 if (string_obj->is_frozen) {
982 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
983 string_obj);
984 ret = BT_VALUE_STATUS_FROZEN;
985 goto end;
986 }
987
988 g_string_assign(typed_string_obj->gstr, val);
989 BT_LOGV("Set string value's raw value: value-addr=%p, raw-value-addr=%p",
990 string_obj, val);
991
992 end:
993 return ret;
994 }
995
996 int64_t bt_value_array_size(const struct bt_value *array_obj)
997 {
998 int64_t ret;
999 struct bt_value_array *typed_array_obj =
1000 BT_VALUE_TO_ARRAY(array_obj);
1001
1002 if (!array_obj) {
1003 BT_LOGW_STR("Invalid parameter: value object is NULL.");
1004 ret = (int64_t) BT_VALUE_STATUS_INVAL;
1005 goto end;
1006 }
1007
1008 if (!bt_value_is_array(array_obj)) {
1009 BT_LOGW("Invalid parameter: value is not an array value: addr=%p, "
1010 "type=%s", array_obj,
1011 bt_value_type_string(array_obj->type));
1012 ret = BT_VALUE_STATUS_INVAL;
1013 goto end;
1014 }
1015
1016 ret = (int64_t) typed_array_obj->garray->len;
1017
1018 end:
1019 return ret;
1020 }
1021
1022 bt_bool bt_value_array_is_empty(const struct bt_value *array_obj)
1023 {
1024 return bt_value_array_size(array_obj) == 0;
1025 }
1026
1027 struct bt_value *bt_value_array_get(const struct bt_value *array_obj,
1028 uint64_t index)
1029 {
1030 struct bt_value *ret;
1031 struct bt_value_array *typed_array_obj =
1032 BT_VALUE_TO_ARRAY(array_obj);
1033
1034 if (!array_obj) {
1035 BT_LOGW("Invalid parameter: value object is NULL: index=%" PRIu64,
1036 index);
1037 ret = NULL;
1038 goto end;
1039 }
1040
1041 if (!bt_value_is_array(array_obj)) {
1042 BT_LOGW("Invalid parameter: value is not an array value: addr=%p, "
1043 "type=%s", array_obj,
1044 bt_value_type_string(array_obj->type));
1045 ret = NULL;
1046 goto end;
1047 }
1048
1049 if (index >= typed_array_obj->garray->len) {
1050 BT_LOGW("Invalid parameter: index is out of bounds: "
1051 "addr=%p, index=%" PRIu64 ", size=%u",
1052 array_obj, index, typed_array_obj->garray->len);
1053 ret = NULL;
1054 goto end;
1055 }
1056
1057 ret = g_ptr_array_index(typed_array_obj->garray, index);
1058 bt_get(ret);
1059
1060 end:
1061 return ret;
1062 }
1063
1064 enum bt_value_status bt_value_array_append(struct bt_value *array_obj,
1065 struct bt_value *element_obj)
1066 {
1067 enum bt_value_status ret = BT_VALUE_STATUS_OK;
1068 struct bt_value_array *typed_array_obj =
1069 BT_VALUE_TO_ARRAY(array_obj);
1070
1071 if (!array_obj || !element_obj) {
1072 BT_LOGW("Invalid parameter: array value or element value is NULL: "
1073 "array-value-addr=%p, element-value-addr=%p",
1074 array_obj, element_obj);
1075 ret = BT_VALUE_STATUS_INVAL;
1076 goto end;
1077 }
1078
1079 if (!bt_value_is_array(array_obj)) {
1080 BT_LOGW("Invalid parameter: value is not an array value: addr=%p, "
1081 "type=%s", array_obj,
1082 bt_value_type_string(array_obj->type));
1083 ret = BT_VALUE_STATUS_INVAL;
1084 goto end;
1085 }
1086
1087 if (array_obj->is_frozen) {
1088 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
1089 array_obj);
1090 ret = BT_VALUE_STATUS_FROZEN;
1091 goto end;
1092 }
1093
1094 g_ptr_array_add(typed_array_obj->garray, element_obj);
1095 bt_get(element_obj);
1096 BT_LOGV("Appended element to array value: array-value-addr=%p, "
1097 "element-value-addr=%p, new-size=%u",
1098 array_obj, element_obj, typed_array_obj->garray->len);
1099
1100 end:
1101 return ret;
1102 }
1103
1104 enum bt_value_status bt_value_array_append_bool(struct bt_value *array_obj,
1105 bt_bool val)
1106 {
1107 enum bt_value_status ret;
1108 struct bt_value *bool_obj = NULL;
1109
1110 bool_obj = bt_value_bool_create_init(val);
1111 ret = bt_value_array_append(array_obj, bool_obj);
1112 bt_put(bool_obj);
1113 return ret;
1114 }
1115
1116 enum bt_value_status bt_value_array_append_integer(
1117 struct bt_value *array_obj, int64_t val)
1118 {
1119 enum bt_value_status ret;
1120 struct bt_value *integer_obj = NULL;
1121
1122 integer_obj = bt_value_integer_create_init(val);
1123 ret = bt_value_array_append(array_obj, integer_obj);
1124 bt_put(integer_obj);
1125 return ret;
1126 }
1127
1128 enum bt_value_status bt_value_array_append_float(struct bt_value *array_obj,
1129 double val)
1130 {
1131 enum bt_value_status ret;
1132 struct bt_value *float_obj = NULL;
1133
1134 float_obj = bt_value_float_create_init(val);
1135 ret = bt_value_array_append(array_obj, float_obj);
1136 bt_put(float_obj);
1137 return ret;
1138 }
1139
1140 enum bt_value_status bt_value_array_append_string(struct bt_value *array_obj,
1141 const char *val)
1142 {
1143 enum bt_value_status ret;
1144 struct bt_value *string_obj = NULL;
1145
1146 string_obj = bt_value_string_create_init(val);
1147 ret = bt_value_array_append(array_obj, string_obj);
1148 bt_put(string_obj);
1149 return ret;
1150 }
1151
1152 enum bt_value_status bt_value_array_append_empty_array(
1153 struct bt_value *array_obj)
1154 {
1155 enum bt_value_status ret;
1156 struct bt_value *empty_array_obj = NULL;
1157
1158 empty_array_obj = bt_value_array_create();
1159 ret = bt_value_array_append(array_obj, empty_array_obj);
1160 bt_put(empty_array_obj);
1161 return ret;
1162 }
1163
1164 enum bt_value_status bt_value_array_append_empty_map(struct bt_value *array_obj)
1165 {
1166 enum bt_value_status ret;
1167 struct bt_value *map_obj = NULL;
1168
1169 map_obj = bt_value_map_create();
1170 ret = bt_value_array_append(array_obj, map_obj);
1171 bt_put(map_obj);
1172 return ret;
1173 }
1174
1175 enum bt_value_status bt_value_array_set(struct bt_value *array_obj,
1176 uint64_t index, struct bt_value *element_obj)
1177 {
1178 enum bt_value_status ret = BT_VALUE_STATUS_OK;
1179 struct bt_value_array *typed_array_obj =
1180 BT_VALUE_TO_ARRAY(array_obj);
1181
1182 if (!array_obj || !element_obj) {
1183 BT_LOGW("Invalid parameter: array value or element value is NULL: "
1184 "index=%" PRIu64 ", array-value-addr=%p, element-value-addr=%p",
1185 index, array_obj, element_obj);
1186 ret = BT_VALUE_STATUS_INVAL;
1187 goto end;
1188 }
1189
1190 if (!bt_value_is_array(array_obj)) {
1191 BT_LOGW("Invalid parameter: value is not an array value: addr=%p, "
1192 "type=%s", array_obj,
1193 bt_value_type_string(array_obj->type));
1194 ret = BT_VALUE_STATUS_INVAL;
1195 goto end;
1196 }
1197
1198 if (index >= typed_array_obj->garray->len) {
1199 BT_LOGW("Invalid parameter: index is out of bounds: "
1200 "addr=%p, index=%" PRIu64 ", size=%u",
1201 array_obj, index, typed_array_obj->garray->len);
1202 ret = BT_VALUE_STATUS_INVAL;
1203 goto end;
1204 }
1205
1206 if (array_obj->is_frozen) {
1207 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
1208 array_obj);
1209 ret = BT_VALUE_STATUS_FROZEN;
1210 goto end;
1211 }
1212
1213 bt_put(g_ptr_array_index(typed_array_obj->garray, index));
1214 g_ptr_array_index(typed_array_obj->garray, index) = element_obj;
1215 bt_get(element_obj);
1216 BT_LOGV("Set array value's element: array-value-addr=%p, "
1217 "index=%" PRIu64 ", element-value-addr=%p",
1218 array_obj, index, element_obj);
1219
1220 end:
1221 return ret;
1222 }
1223
1224 int64_t bt_value_map_size(const struct bt_value *map_obj)
1225 {
1226 int64_t ret;
1227 struct bt_value_map *typed_map_obj = BT_VALUE_TO_MAP(map_obj);
1228
1229 if (!map_obj) {
1230 BT_LOGW_STR("Invalid parameter: value object is NULL.");
1231 ret = (int64_t) BT_VALUE_STATUS_INVAL;
1232 goto end;
1233 }
1234
1235 if (!bt_value_is_map(map_obj)) {
1236 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1237 "type=%s", map_obj,
1238 bt_value_type_string(map_obj->type));
1239 ret = (int64_t) BT_VALUE_STATUS_INVAL;
1240 goto end;
1241 }
1242
1243 ret = (int64_t) g_hash_table_size(typed_map_obj->ght);
1244
1245 end:
1246 return ret;
1247 }
1248
1249 bt_bool bt_value_map_is_empty(const struct bt_value *map_obj)
1250 {
1251 return bt_value_map_size(map_obj) == 0;
1252 }
1253
1254 struct bt_value *bt_value_map_get(const struct bt_value *map_obj,
1255 const char *key)
1256 {
1257 GQuark quark;
1258 struct bt_value *ret;
1259 struct bt_value_map *typed_map_obj = BT_VALUE_TO_MAP(map_obj);
1260
1261 if (!map_obj || !key) {
1262 BT_LOGW("Invalid parameter: value object or key is NULL: "
1263 "value-addr=%p, key-addr=%p", map_obj, key);
1264 ret = NULL;
1265 goto end;
1266 }
1267
1268 if (!bt_value_is_map(map_obj)) {
1269 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1270 "type=%s", map_obj,
1271 bt_value_type_string(map_obj->type));
1272 ret = NULL;
1273 goto end;
1274 }
1275
1276 quark = g_quark_from_string(key);
1277 ret = g_hash_table_lookup(typed_map_obj->ght, GUINT_TO_POINTER(quark));
1278 if (ret) {
1279 bt_get(ret);
1280 }
1281
1282 end:
1283 return ret;
1284 }
1285
1286 bt_bool bt_value_map_has_key(const struct bt_value *map_obj, const char *key)
1287 {
1288 bt_bool ret;
1289 GQuark quark;
1290 struct bt_value_map *typed_map_obj = BT_VALUE_TO_MAP(map_obj);
1291
1292 if (!map_obj || !key) {
1293 BT_LOGW("Invalid parameter: value object or key is NULL: "
1294 "value-addr=%p, key-addr=%p", map_obj, key);
1295 ret = BT_FALSE;
1296 goto end;
1297 }
1298
1299 if (!bt_value_is_map(map_obj)) {
1300 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1301 "type=%s", map_obj,
1302 bt_value_type_string(map_obj->type));
1303 ret = BT_FALSE;
1304 goto end;
1305 }
1306
1307 quark = g_quark_from_string(key);
1308 ret = bt_g_hash_table_contains(typed_map_obj->ght,
1309 GUINT_TO_POINTER(quark));
1310
1311 end:
1312 return ret;
1313 }
1314
1315 enum bt_value_status bt_value_map_insert(struct bt_value *map_obj,
1316 const char *key, struct bt_value *element_obj)
1317 {
1318 GQuark quark;
1319 enum bt_value_status ret = BT_VALUE_STATUS_OK;
1320 struct bt_value_map *typed_map_obj = BT_VALUE_TO_MAP(map_obj);
1321
1322 if (!map_obj || !key || !element_obj) {
1323 BT_LOGW("Invalid parameter: map value, key, or element value is NULL: "
1324 "map-value-addr=%p, key-addr=%p, element-value-addr=%p",
1325 map_obj, key, element_obj);
1326 ret = BT_VALUE_STATUS_INVAL;
1327 goto end;
1328 }
1329
1330 if (!bt_value_is_map(map_obj)) {
1331 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1332 "type=%s", map_obj,
1333 bt_value_type_string(map_obj->type));
1334 ret = BT_VALUE_STATUS_INVAL;
1335 goto end;
1336 }
1337
1338 if (map_obj->is_frozen) {
1339 BT_LOGW("Invalid parameter: value is frozen: addr=%p",
1340 map_obj);
1341 ret = BT_VALUE_STATUS_FROZEN;
1342 goto end;
1343 }
1344
1345 quark = g_quark_from_string(key);
1346 g_hash_table_insert(typed_map_obj->ght,
1347 GUINT_TO_POINTER(quark), element_obj);
1348 bt_get(element_obj);
1349 BT_LOGV("Inserted value into map value: map-value-addr=%p, "
1350 "key=\"%s\", element-value-addr=%p",
1351 map_obj, key, element_obj);
1352
1353 end:
1354 return ret;
1355 }
1356
1357 enum bt_value_status bt_value_map_insert_bool(struct bt_value *map_obj,
1358 const char *key, bt_bool val)
1359 {
1360 enum bt_value_status ret;
1361 struct bt_value *bool_obj = NULL;
1362
1363 bool_obj = bt_value_bool_create_init(val);
1364 ret = bt_value_map_insert(map_obj, key, bool_obj);
1365 bt_put(bool_obj);
1366 return ret;
1367 }
1368
1369 enum bt_value_status bt_value_map_insert_integer(struct bt_value *map_obj,
1370 const char *key, int64_t val)
1371 {
1372 enum bt_value_status ret;
1373 struct bt_value *integer_obj = NULL;
1374
1375 integer_obj = bt_value_integer_create_init(val);
1376 ret = bt_value_map_insert(map_obj, key, integer_obj);
1377 bt_put(integer_obj);
1378 return ret;
1379 }
1380
1381 enum bt_value_status bt_value_map_insert_float(struct bt_value *map_obj,
1382 const char *key, double val)
1383 {
1384 enum bt_value_status ret;
1385 struct bt_value *float_obj = NULL;
1386
1387 float_obj = bt_value_float_create_init(val);
1388 ret = bt_value_map_insert(map_obj, key, float_obj);
1389 bt_put(float_obj);
1390 return ret;
1391 }
1392
1393 enum bt_value_status bt_value_map_insert_string(struct bt_value *map_obj,
1394 const char *key, const char *val)
1395 {
1396 enum bt_value_status ret;
1397 struct bt_value *string_obj = NULL;
1398
1399 string_obj = bt_value_string_create_init(val);
1400 ret = bt_value_map_insert(map_obj, key, string_obj);
1401 bt_put(string_obj);
1402 return ret;
1403 }
1404
1405 enum bt_value_status bt_value_map_insert_empty_array(struct bt_value *map_obj,
1406 const char *key)
1407 {
1408 enum bt_value_status ret;
1409 struct bt_value *array_obj = NULL;
1410
1411 array_obj = bt_value_array_create();
1412 ret = bt_value_map_insert(map_obj, key, array_obj);
1413 bt_put(array_obj);
1414 return ret;
1415 }
1416
1417 enum bt_value_status bt_value_map_insert_empty_map(struct bt_value *map_obj,
1418 const char *key)
1419 {
1420 enum bt_value_status ret;
1421 struct bt_value *empty_map_obj = NULL;
1422
1423 empty_map_obj = bt_value_map_create();
1424 ret = bt_value_map_insert(map_obj, key, empty_map_obj);
1425 bt_put(empty_map_obj);
1426 return ret;
1427 }
1428
1429 enum bt_value_status bt_value_map_foreach(const struct bt_value *map_obj,
1430 bt_value_map_foreach_cb cb, void *data)
1431 {
1432 enum bt_value_status ret = BT_VALUE_STATUS_OK;
1433 gpointer key, element_obj;
1434 GHashTableIter iter;
1435 struct bt_value_map *typed_map_obj = BT_VALUE_TO_MAP(map_obj);
1436
1437 if (!map_obj || !cb) {
1438 BT_LOGW("Invalid parameter: map value or callback is NULL: "
1439 "value-addr=%p, cb-addr=%p", map_obj, cb);
1440 ret = BT_VALUE_STATUS_INVAL;
1441 goto end;
1442 }
1443
1444 if (!bt_value_is_map(map_obj)) {
1445 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1446 "type=%s", map_obj,
1447 bt_value_type_string(map_obj->type));
1448 ret = BT_VALUE_STATUS_INVAL;
1449 goto end;
1450 }
1451
1452 g_hash_table_iter_init(&iter, typed_map_obj->ght);
1453
1454 while (g_hash_table_iter_next(&iter, &key, &element_obj)) {
1455 const char *key_str = g_quark_to_string(GPOINTER_TO_UINT(key));
1456
1457 if (!cb(key_str, element_obj, data)) {
1458 BT_LOGV("User cancelled the loop: key=\"%s\", "
1459 "value-addr=%p, data=%p",
1460 key_str, element_obj, data);
1461 ret = BT_VALUE_STATUS_CANCELLED;
1462 break;
1463 }
1464 }
1465
1466 end:
1467 return ret;
1468 }
1469
1470 struct extend_map_element_data {
1471 struct bt_value *extended_obj;
1472 bt_bool got_error;
1473 };
1474
1475 static
1476 bt_bool extend_map_element(const char *key,
1477 struct bt_value *extension_obj_elem, void *data)
1478 {
1479 bt_bool ret = BT_TRUE;
1480
1481 struct extend_map_element_data *extend_data = data;
1482
1483 /* Copy object which is to replace the current one */
1484 struct bt_value *extension_obj_elem_copy =
1485 bt_value_copy(extension_obj_elem);
1486
1487 /* Replace in extended object */
1488 if (bt_value_map_insert(extend_data->extended_obj, key,
1489 extension_obj_elem_copy)) {
1490 BT_LOGE("Cannot replace value in extended value: key=\"%s\", "
1491 "extended-value-addr=%p, element-value-addr=%p",
1492 key, extend_data->extended_obj,
1493 extension_obj_elem_copy);
1494 goto error;
1495 }
1496
1497 goto end;
1498
1499 error:
1500 ret = BT_FALSE;
1501 extend_data->got_error = BT_TRUE;
1502
1503 end:
1504 BT_PUT(extension_obj_elem_copy);
1505 return ret;
1506 }
1507
1508 struct bt_value *bt_value_map_extend(struct bt_value *base_map_obj,
1509 struct bt_value *extension_obj)
1510 {
1511 struct bt_value *extended_obj = NULL;
1512 struct extend_map_element_data extend_data = { 0 };
1513
1514 if (!base_map_obj || !extension_obj) {
1515 BT_LOGW("Invalid parameter: base value or extension value is NULL: "
1516 "base-value-addr=%p, extension-value-addr=%p",
1517 base_map_obj, extension_obj);
1518 goto error;
1519 }
1520
1521 if (!bt_value_is_map(base_map_obj)) {
1522 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1523 "type=%s", base_map_obj,
1524 bt_value_type_string(base_map_obj->type));
1525 goto error;
1526 }
1527
1528 if (!bt_value_is_map(extension_obj)) {
1529 BT_LOGW("Invalid parameter: value is not a map value: addr=%p, "
1530 "type=%s", extension_obj,
1531 bt_value_type_string(extension_obj->type));
1532 goto error;
1533 }
1534
1535 BT_LOGD("Extending map value: base-value-addr=%p, extension-value-addr=%p",
1536 base_map_obj, extension_obj);
1537
1538 /* Create copy of base map object to start with */
1539 extended_obj = bt_value_copy(base_map_obj);
1540 if (!extended_obj) {
1541 BT_LOGE("Cannot copy base value: base-value-addr=%p",
1542 base_map_obj);
1543 goto error;
1544 }
1545
1546 /*
1547 * For each key in the extension map object, replace this key
1548 * in the copied map object.
1549 */
1550 extend_data.extended_obj = extended_obj;
1551
1552 if (bt_value_map_foreach(extension_obj, extend_map_element,
1553 &extend_data)) {
1554 BT_LOGE("Cannot iterate on the extension object's elements: ",
1555 "extension-value-addr=%p", extension_obj);
1556 goto error;
1557 }
1558
1559 if (extend_data.got_error) {
1560 BT_LOGE("Failed to successfully iterate on the extension object's elements: ",
1561 "extension-value-addr=%p", extension_obj);
1562 goto error;
1563 }
1564
1565 BT_LOGD("Extended map value: extended-value-addr=%p",
1566 extended_obj);
1567 goto end;
1568
1569 error:
1570 BT_PUT(extended_obj);
1571
1572 end:
1573 return extended_obj;
1574 }
1575
1576 struct bt_value *bt_value_copy(const struct bt_value *object)
1577 {
1578 struct bt_value *copy_obj = NULL;
1579
1580 if (!object) {
1581 BT_LOGW_STR("Invalid parameter: value object is NULL.");
1582 goto end;
1583 }
1584
1585 BT_LOGD("Copying value object: addr=%p", object);
1586 copy_obj = copy_funcs[object->type](object);
1587 if (copy_obj) {
1588 BT_LOGD("Copied value object: copy-value-addr=%p",
1589 copy_obj);
1590 } else {
1591 BT_LOGE_STR("Failed to copy value object.");
1592 }
1593
1594 end:
1595 return copy_obj;
1596 }
1597
1598 bt_bool bt_value_compare(const struct bt_value *object_a,
1599 const struct bt_value *object_b)
1600 {
1601 bt_bool ret = BT_FALSE;
1602
1603 if (!object_a || !object_b) {
1604 BT_LOGW("Invalid parameter: value A or value B is NULL: "
1605 "value-a-addr=%p, value-b-addr=%p",
1606 object_a, object_b);
1607 goto end;
1608 }
1609
1610 if (object_a->type != object_b->type) {
1611 BT_LOGV("Values are different: type mismatch: "
1612 "value-a-addr=%p, value-b-addr=%p, "
1613 "value-a-type=%s, value-b-type=%s",
1614 object_a, object_b,
1615 bt_value_type_string(object_a->type),
1616 bt_value_type_string(object_b->type));
1617 goto end;
1618 }
1619
1620 ret = compare_funcs[object_a->type](object_a, object_b);
1621
1622 end:
1623 return ret;
1624 }
BabelTrace - Trace Format Babel Tower
This page took 0.082515 seconds and 5 git commands to generate.