2 * SPDX-License-Identifier: MIT
4 * Copyright 2018 Philippe Proulx <pproulx@efficios.com>
12 #include <babeltrace2/babeltrace.h>
14 #include "common/assert.h"
15 #include "common/macros.h"
17 #include "ctf-meta-visitors.hpp"
19 static int update_field_class_stored_value_index(struct ctf_field_class
*fc
,
20 struct ctf_trace_class
*tc
,
21 struct ctf_stream_class
*sc
,
22 struct ctf_event_class
*ec
)
26 struct ctf_field_path
*field_path
= NULL
;
27 struct ctf_field_class_int
*tgt_fc
= NULL
;
28 uint64_t *stored_value_index
= NULL
;
35 case CTF_FIELD_CLASS_TYPE_VARIANT
:
37 ctf_field_class_variant
*var_fc
= ctf_field_class_as_variant(fc
);
39 field_path
= &var_fc
->tag_path
;
40 stored_value_index
= &var_fc
->stored_tag_index
;
41 tgt_fc
= &var_fc
->tag_fc
->base
;
44 case CTF_FIELD_CLASS_TYPE_SEQUENCE
:
46 struct ctf_field_class_sequence
*seq_fc
= ctf_field_class_as_sequence(fc
);
48 field_path
= &seq_fc
->length_path
;
49 stored_value_index
= &seq_fc
->stored_length_index
;
50 tgt_fc
= seq_fc
->length_fc
;
59 BT_ASSERT(tgt_fc
->base
.base
.type
== CTF_FIELD_CLASS_TYPE_INT
||
60 tgt_fc
->base
.base
.type
== CTF_FIELD_CLASS_TYPE_ENUM
);
61 if (tgt_fc
->storing_index
>= 0) {
62 /* Already storing its value */
63 *stored_value_index
= (uint64_t) tgt_fc
->storing_index
;
65 /* Not storing its value: allocate new index */
66 tgt_fc
->storing_index
= tc
->stored_value_count
;
67 *stored_value_index
= (uint64_t) tgt_fc
->storing_index
;
68 tc
->stored_value_count
++;
73 case CTF_FIELD_CLASS_TYPE_STRUCT
:
75 struct ctf_field_class_struct
*struct_fc
= ctf_field_class_as_struct(fc
);
77 for (i
= 0; i
< struct_fc
->members
->len
; i
++) {
78 struct ctf_named_field_class
*named_fc
=
79 ctf_field_class_struct_borrow_member_by_index(struct_fc
, i
);
81 ret
= update_field_class_stored_value_index(named_fc
->fc
, tc
, sc
, ec
);
89 case CTF_FIELD_CLASS_TYPE_VARIANT
:
91 struct ctf_field_class_variant
*var_fc
= ctf_field_class_as_variant(fc
);
93 for (i
= 0; i
< var_fc
->options
->len
; i
++) {
94 struct ctf_named_field_class
*named_fc
=
95 ctf_field_class_variant_borrow_option_by_index(var_fc
, i
);
97 ret
= update_field_class_stored_value_index(named_fc
->fc
, tc
, sc
, ec
);
105 case CTF_FIELD_CLASS_TYPE_ARRAY
:
106 case CTF_FIELD_CLASS_TYPE_SEQUENCE
:
108 struct ctf_field_class_array_base
*array_fc
= ctf_field_class_as_array_base(fc
);
110 ret
= update_field_class_stored_value_index(array_fc
->elem_fc
, tc
, sc
, ec
);
125 int ctf_trace_class_update_value_storing_indexes(struct ctf_trace_class
*ctf_tc
)
129 if (!ctf_tc
->is_translated
) {
130 update_field_class_stored_value_index(ctf_tc
->packet_header_fc
, ctf_tc
, NULL
, NULL
);
133 for (i
= 0; i
< ctf_tc
->stream_classes
->len
; i
++) {
135 ctf_stream_class
*sc
= (ctf_stream_class
*) ctf_tc
->stream_classes
->pdata
[i
];
137 if (!sc
->is_translated
) {
138 update_field_class_stored_value_index(sc
->packet_context_fc
, ctf_tc
, sc
, NULL
);
139 update_field_class_stored_value_index(sc
->event_header_fc
, ctf_tc
, sc
, NULL
);
140 update_field_class_stored_value_index(sc
->event_common_context_fc
, ctf_tc
, sc
, NULL
);
143 for (j
= 0; j
< sc
->event_classes
->len
; j
++) {
144 struct ctf_event_class
*ec
= (ctf_event_class
*) sc
->event_classes
->pdata
[j
];
146 if (!ec
->is_translated
) {
147 update_field_class_stored_value_index(ec
->spec_context_fc
, ctf_tc
, sc
, ec
);
148 update_field_class_stored_value_index(ec
->payload_fc
, ctf_tc
, sc
, ec
);