4 * Babeltrace CTF IR - Stream packet
6 * Copyright 2016 Philippe Proulx <pproulx@efficios.com>
8 * Permission is hereby granted, free of charge, to any person obtaining a copy
9 * of this software and associated documentation files (the "Software"), to deal
10 * in the Software without restriction, including without limitation the rights
11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12 * copies of the Software, and to permit persons to whom the Software is
13 * furnished to do so, subject to the following conditions:
15 * The above copyright notice and this permission notice shall be included in
16 * all copies or substantial portions of the Software.
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
21 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
27 #define BT_LOG_TAG "PACKET"
29 #include <babeltrace/ctf-ir/fields-internal.h>
30 #include <babeltrace/ctf-ir/packet.h>
31 #include <babeltrace/ctf-ir/packet-internal.h>
32 #include <babeltrace/ctf-ir/trace.h>
33 #include <babeltrace/ctf-ir/stream-class-internal.h>
34 #include <babeltrace/ctf-ir/stream-class.h>
35 #include <babeltrace/ctf-ir/stream.h>
36 #include <babeltrace/ctf-ir/stream-internal.h>
37 #include <babeltrace/ctf-ir/trace-internal.h>
38 #include <babeltrace/lib-logging-internal.h>
39 #include <babeltrace/object-internal.h>
40 #include <babeltrace/ref.h>
42 struct bt_ctf_stream
*bt_ctf_packet_get_stream(struct bt_ctf_packet
*packet
)
44 return packet
? bt_get(packet
->stream
) : NULL
;
47 struct bt_ctf_field
*bt_ctf_packet_get_header(
48 struct bt_ctf_packet
*packet
)
50 return packet
? bt_get(packet
->header
) : NULL
;
53 int bt_ctf_packet_set_header(struct bt_ctf_packet
*packet
,
54 struct bt_ctf_field
*header
)
57 struct bt_ctf_trace
*trace
= NULL
;
58 struct bt_ctf_stream_class
*stream_class
= NULL
;
59 struct bt_ctf_field_type
*header_field_type
= NULL
;
60 struct bt_ctf_field_type
*expected_header_field_type
= NULL
;
63 BT_LOGW_STR("Invalid parameter: packet is NULL.");
69 BT_LOGW("Invalid parameter: packet is frozen: addr=%p",
79 stream_class
= bt_ctf_stream_get_class(packet
->stream
);
81 trace
= bt_ctf_stream_class_get_trace(stream_class
);
83 header_field_type
= bt_ctf_field_get_type(header
);
84 assert(header_field_type
);
85 expected_header_field_type
= bt_ctf_trace_get_packet_header_type(trace
);
87 if (bt_ctf_field_type_compare(header_field_type
,
88 expected_header_field_type
)) {
89 BT_LOGW("Invalid parameter: packet header's field type is different from the trace's packet header field type: "
90 "packet-addr=%p, packet-header-addr=%p",
97 bt_put(packet
->header
);
98 packet
->header
= bt_get(header
);
99 BT_LOGV("Set packet's header field: packet-addr=%p, packet-header-addr=%p",
104 BT_PUT(stream_class
);
105 BT_PUT(header_field_type
);
106 BT_PUT(expected_header_field_type
);
111 struct bt_ctf_field
*bt_ctf_packet_get_context(
112 struct bt_ctf_packet
*packet
)
114 return packet
? bt_get(packet
->context
) : NULL
;
117 int bt_ctf_packet_set_context(struct bt_ctf_packet
*packet
,
118 struct bt_ctf_field
*context
)
121 struct bt_ctf_stream_class
*stream_class
= NULL
;
122 struct bt_ctf_field_type
*context_field_type
= NULL
;
123 struct bt_ctf_field_type
*expected_context_field_type
= NULL
;
126 BT_LOGW_STR("Invalid parameter: packet is NULL.");
131 if (packet
->frozen
) {
132 BT_LOGW("Invalid parameter: packet is frozen: addr=%p",
139 goto skip_validation
;
142 stream_class
= bt_ctf_stream_get_class(packet
->stream
);
143 assert(stream_class
);
144 context_field_type
= bt_ctf_field_get_type(context
);
145 assert(context_field_type
);
146 expected_context_field_type
=
147 bt_ctf_stream_class_get_packet_context_type(stream_class
);
149 if (bt_ctf_field_type_compare(context_field_type
,
150 expected_context_field_type
)) {
151 BT_LOGW("Invalid parameter: packet context's field type is different from the stream class's packet context field type: "
152 "packet-addr=%p, packet-context-addr=%p",
159 bt_put(packet
->context
);
160 packet
->context
= bt_get(context
);
161 BT_LOGV("Set packet's context field: packet-addr=%p, packet-context-addr=%p",
165 BT_PUT(stream_class
);
166 BT_PUT(context_field_type
);
167 BT_PUT(expected_context_field_type
);
172 void bt_ctf_packet_freeze(struct bt_ctf_packet
*packet
)
174 if (!packet
|| packet
->frozen
) {
178 BT_LOGD("Freezing packet: addr=%p", packet
);
179 BT_LOGD_STR("Freezing packet's header field.");
180 bt_ctf_field_freeze(packet
->header
);
181 BT_LOGD_STR("Freezing packet's context field.");
182 bt_ctf_field_freeze(packet
->context
);
187 void bt_ctf_packet_destroy(struct bt_object
*obj
)
189 struct bt_ctf_packet
*packet
;
191 packet
= container_of(obj
, struct bt_ctf_packet
, base
);
192 BT_LOGD("Destroying packet: addr=%p", packet
);
193 BT_LOGD_STR("Putting packet's header field.");
194 bt_put(packet
->header
);
195 BT_LOGD_STR("Putting packet's context field.");
196 bt_put(packet
->context
);
197 BT_LOGD_STR("Putting packet's stream.");
198 bt_put(packet
->stream
);
202 struct bt_ctf_packet
*bt_ctf_packet_create(
203 struct bt_ctf_stream
*stream
)
205 struct bt_ctf_packet
*packet
= NULL
;
206 struct bt_ctf_stream_class
*stream_class
= NULL
;
207 struct bt_ctf_trace
*trace
= NULL
;
209 BT_LOGD("Creating packet object: stream-addr=%p", stream
);
212 BT_LOGW_STR("Invalid parameter: stream is NULL.");
216 if (stream
->pos
.fd
>= 0) {
217 BT_LOGW_STR("Invalid parameter: stream is a CTF writer stream.");
221 stream_class
= bt_ctf_stream_get_class(stream
);
222 assert(stream_class
);
223 trace
= bt_ctf_stream_class_get_trace(stream_class
);
225 packet
= g_new0(struct bt_ctf_packet
, 1);
227 BT_LOGE_STR("Failed to allocate one packet object.");
231 bt_object_init(packet
, bt_ctf_packet_destroy
);
232 packet
->stream
= bt_get(stream
);
233 packet
->header
= bt_ctf_field_create(trace
->packet_header_type
);
234 if (!packet
->header
&& trace
->packet_header_type
) {
235 BT_LOGE_STR("Cannot create initial packet header field object.");
240 packet
->context
= bt_ctf_field_create(
241 stream
->stream_class
->packet_context_type
);
242 if (!packet
->context
&& stream
->stream_class
->packet_context_type
) {
243 BT_LOGE_STR("Cannot create initial packet header field object.");
248 BT_LOGD("Created packet object: addr=%p", packet
);
252 BT_PUT(stream_class
);