Commit | Line | Data |
---|---|---|
8020ceb5 | 1 | /* |
7dd08bec | 2 | * lttng-events.c |
8020ceb5 | 3 | * |
8020ceb5 MD |
4 | * Holds LTTng per-session event registry. |
5 | * | |
e92f3e28 MD |
6 | * Copyright (C) 2010-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com> |
7 | * | |
8 | * This library is free software; you can redistribute it and/or | |
9 | * modify it under the terms of the GNU Lesser General Public | |
10 | * License as published by the Free Software Foundation; only | |
11 | * version 2.1 of the License. | |
12 | * | |
13 | * This library is distributed in the hope that it will be useful, | |
14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
16 | * Lesser General Public License for more details. | |
17 | * | |
18 | * You should have received a copy of the GNU Lesser General Public | |
19 | * License along with this library; if not, write to the Free Software | |
20 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA | |
8020ceb5 MD |
21 | */ |
22 | ||
b5234c06 MD |
23 | #define _GNU_SOURCE |
24 | #include <stdio.h> | |
25 | #include <urcu/list.h> | |
8165c8da | 26 | #include <urcu/hlist.h> |
b5234c06 | 27 | #include <pthread.h> |
b5234c06 | 28 | #include <errno.h> |
f4681817 MD |
29 | #include <sys/shm.h> |
30 | #include <sys/ipc.h> | |
44c72f10 MD |
31 | #include <stdint.h> |
32 | #include <stddef.h> | |
28b12049 MD |
33 | #include <inttypes.h> |
34 | #include <time.h> | |
2ae57758 | 35 | #include <lttng/ust-endian.h> |
28b12049 | 36 | #include "clock.h" |
44c72f10 MD |
37 | |
38 | #include <urcu-bp.h> | |
39 | #include <urcu/compiler.h> | |
40 | #include <urcu/uatomic.h> | |
41 | #include <urcu/arch.h> | |
42 | ||
43 | #include <lttng/tracepoint.h> | |
4318ae1b | 44 | #include <lttng/ust-events.h> |
44c72f10 MD |
45 | |
46 | #include <usterr-signal-safe.h> | |
47 | #include <helper.h> | |
1f18504e | 48 | #include "error.h" |
08114193 | 49 | #include "compat.h" |
eda498b8 | 50 | #include "lttng-ust-uuid.h" |
44c72f10 | 51 | |
457a6b58 | 52 | #include "tracepoint-internal.h" |
7dd08bec MD |
53 | #include "lttng-tracer.h" |
54 | #include "lttng-tracer-core.h" | |
b728d87e | 55 | #include "wait.h" |
8d8a24c8 | 56 | #include "../libringbuffer/shm.h" |
596c4223 | 57 | #include "jhash.h" |
8165c8da MD |
58 | |
59 | /* | |
60 | * The sessions mutex is the centralized mutex across UST tracing | |
17dfb34b MD |
61 | * control and probe registration. All operations within this file are |
62 | * called by the communication thread, under ust_lock protection. | |
8165c8da | 63 | */ |
2b2d6ff7 | 64 | static pthread_mutex_t sessions_mutex = PTHREAD_MUTEX_INITIALIZER; |
8165c8da | 65 | |
17dfb34b | 66 | void ust_lock(void) |
8165c8da MD |
67 | { |
68 | pthread_mutex_lock(&sessions_mutex); | |
69 | } | |
70 | ||
17dfb34b | 71 | void ust_unlock(void) |
8165c8da MD |
72 | { |
73 | pthread_mutex_unlock(&sessions_mutex); | |
74 | } | |
75 | ||
b5234c06 | 76 | static CDS_LIST_HEAD(sessions); |
8165c8da | 77 | |
7dd08bec | 78 | static void _lttng_event_destroy(struct lttng_event *event); |
7dd08bec MD |
79 | static void _lttng_channel_destroy(struct lttng_channel *chan); |
80 | static int _lttng_event_unregister(struct lttng_event *event); | |
8020ceb5 | 81 | static |
7dd08bec MD |
82 | int _lttng_event_metadata_statedump(struct lttng_session *session, |
83 | struct lttng_channel *chan, | |
84 | struct lttng_event *event); | |
8020ceb5 | 85 | static |
7dd08bec | 86 | int _lttng_session_metadata_statedump(struct lttng_session *session); |
8020ceb5 | 87 | |
e58095ef MD |
88 | static |
89 | void lttng_session_lazy_sync_enablers(struct lttng_session *session); | |
90 | static | |
91 | void lttng_session_sync_enablers(struct lttng_session *session); | |
92 | static | |
93 | void lttng_enabler_destroy(struct lttng_enabler *enabler); | |
94 | ||
95 | static | |
96 | int lttng_loglevel_match(int loglevel, | |
97 | unsigned int has_loglevel, | |
457a6b58 MD |
98 | enum lttng_ust_loglevel_type req_type, |
99 | int req_loglevel) | |
100 | { | |
457a6b58 MD |
101 | if (req_type == LTTNG_UST_LOGLEVEL_ALL) |
102 | return 1; | |
e58095ef MD |
103 | if (!has_loglevel) |
104 | loglevel = TRACE_DEFAULT; | |
457a6b58 MD |
105 | switch (req_type) { |
106 | case LTTNG_UST_LOGLEVEL_RANGE: | |
e58095ef | 107 | if (loglevel <= req_loglevel || req_loglevel == -1) |
457a6b58 MD |
108 | return 1; |
109 | else | |
110 | return 0; | |
111 | case LTTNG_UST_LOGLEVEL_SINGLE: | |
e58095ef | 112 | if (loglevel == req_loglevel || req_loglevel == -1) |
457a6b58 MD |
113 | return 1; |
114 | else | |
115 | return 0; | |
116 | case LTTNG_UST_LOGLEVEL_ALL: | |
117 | default: | |
118 | return 1; | |
119 | } | |
120 | } | |
121 | ||
8020ceb5 MD |
122 | void synchronize_trace(void) |
123 | { | |
8020ceb5 | 124 | synchronize_rcu(); |
8020ceb5 MD |
125 | } |
126 | ||
7dd08bec | 127 | struct lttng_session *lttng_session_create(void) |
8020ceb5 | 128 | { |
7dd08bec | 129 | struct lttng_session *session; |
22c3c099 | 130 | int ret, i; |
8020ceb5 | 131 | |
7dd08bec | 132 | session = zmalloc(sizeof(struct lttng_session)); |
8020ceb5 MD |
133 | if (!session) |
134 | return NULL; | |
e58095ef MD |
135 | CDS_INIT_LIST_HEAD(&session->chan_head); |
136 | CDS_INIT_LIST_HEAD(&session->events_head); | |
137 | CDS_INIT_LIST_HEAD(&session->enablers_head); | |
22c3c099 MD |
138 | for (i = 0; i < LTTNG_UST_EVENT_HT_SIZE; i++) |
139 | CDS_INIT_HLIST_HEAD(&session->events_ht.table[i]); | |
19d8b1b3 MD |
140 | ret = lttng_ust_uuid_generate(session->uuid); |
141 | if (ret != 0) { | |
142 | session->uuid[0] = '\0'; | |
143 | } | |
e58095ef | 144 | cds_list_add(&session->node, &sessions); |
8020ceb5 MD |
145 | return session; |
146 | } | |
147 | ||
7dd08bec | 148 | void lttng_session_destroy(struct lttng_session *session) |
8020ceb5 | 149 | { |
7dd08bec MD |
150 | struct lttng_channel *chan, *tmpchan; |
151 | struct lttng_event *event, *tmpevent; | |
e58095ef | 152 | struct lttng_enabler *enabler, *tmpenabler; |
8020ceb5 MD |
153 | int ret; |
154 | ||
b5234c06 | 155 | CMM_ACCESS_ONCE(session->active) = 0; |
e58095ef | 156 | cds_list_for_each_entry(event, &session->events_head, node) { |
7dd08bec | 157 | ret = _lttng_event_unregister(event); |
8020ceb5 MD |
158 | WARN_ON(ret); |
159 | } | |
160 | synchronize_trace(); /* Wait for in-flight events to complete */ | |
e58095ef MD |
161 | cds_list_for_each_entry_safe(enabler, tmpenabler, |
162 | &session->enablers_head, node) | |
163 | lttng_enabler_destroy(enabler); | |
164 | cds_list_for_each_entry_safe(event, tmpevent, | |
165 | &session->events_head, node) | |
7dd08bec | 166 | _lttng_event_destroy(event); |
e58095ef | 167 | cds_list_for_each_entry_safe(chan, tmpchan, &session->chan_head, node) |
7dd08bec | 168 | _lttng_channel_destroy(chan); |
e58095ef | 169 | cds_list_del(&session->node); |
b5234c06 | 170 | free(session); |
8020ceb5 MD |
171 | } |
172 | ||
7dd08bec | 173 | int lttng_session_enable(struct lttng_session *session) |
8020ceb5 MD |
174 | { |
175 | int ret = 0; | |
7dd08bec | 176 | struct lttng_channel *chan; |
8020ceb5 | 177 | |
8020ceb5 MD |
178 | if (session->active) { |
179 | ret = -EBUSY; | |
180 | goto end; | |
181 | } | |
182 | ||
e58095ef MD |
183 | /* We need to sync enablers with session before activation. */ |
184 | lttng_session_sync_enablers(session); | |
185 | ||
8020ceb5 MD |
186 | /* |
187 | * Snapshot the number of events per channel to know the type of header | |
188 | * we need to use. | |
189 | */ | |
e58095ef | 190 | cds_list_for_each_entry(chan, &session->chan_head, node) { |
8020ceb5 MD |
191 | if (chan->header_type) |
192 | continue; /* don't change it if session stop/restart */ | |
193 | if (chan->free_event_id < 31) | |
194 | chan->header_type = 1; /* compact */ | |
195 | else | |
196 | chan->header_type = 2; /* large */ | |
197 | } | |
198 | ||
b5234c06 MD |
199 | CMM_ACCESS_ONCE(session->active) = 1; |
200 | CMM_ACCESS_ONCE(session->been_active) = 1; | |
7dd08bec | 201 | ret = _lttng_session_metadata_statedump(session); |
4b4de73e | 202 | if (ret) |
b5234c06 | 203 | CMM_ACCESS_ONCE(session->active) = 0; |
8020ceb5 | 204 | end: |
8020ceb5 MD |
205 | return ret; |
206 | } | |
207 | ||
7dd08bec | 208 | int lttng_session_disable(struct lttng_session *session) |
8020ceb5 MD |
209 | { |
210 | int ret = 0; | |
211 | ||
8020ceb5 MD |
212 | if (!session->active) { |
213 | ret = -EBUSY; | |
214 | goto end; | |
215 | } | |
b5234c06 | 216 | CMM_ACCESS_ONCE(session->active) = 0; |
8020ceb5 | 217 | end: |
8020ceb5 MD |
218 | return ret; |
219 | } | |
220 | ||
7dd08bec | 221 | int lttng_channel_enable(struct lttng_channel *channel) |
976fe9ea MD |
222 | { |
223 | int old; | |
224 | ||
9beb36ba MD |
225 | if (channel == channel->session->metadata) |
226 | return -EPERM; | |
b5234c06 | 227 | old = uatomic_xchg(&channel->enabled, 1); |
976fe9ea MD |
228 | if (old) |
229 | return -EEXIST; | |
230 | return 0; | |
231 | } | |
232 | ||
7dd08bec | 233 | int lttng_channel_disable(struct lttng_channel *channel) |
976fe9ea MD |
234 | { |
235 | int old; | |
236 | ||
9beb36ba MD |
237 | if (channel == channel->session->metadata) |
238 | return -EPERM; | |
b5234c06 | 239 | old = uatomic_xchg(&channel->enabled, 0); |
976fe9ea MD |
240 | if (!old) |
241 | return -EEXIST; | |
242 | return 0; | |
243 | } | |
244 | ||
7dd08bec | 245 | int lttng_event_enable(struct lttng_event *event) |
976fe9ea MD |
246 | { |
247 | int old; | |
248 | ||
9beb36ba MD |
249 | if (event->chan == event->chan->session->metadata) |
250 | return -EPERM; | |
b5234c06 | 251 | old = uatomic_xchg(&event->enabled, 1); |
976fe9ea MD |
252 | if (old) |
253 | return -EEXIST; | |
254 | return 0; | |
255 | } | |
256 | ||
7dd08bec | 257 | int lttng_event_disable(struct lttng_event *event) |
976fe9ea MD |
258 | { |
259 | int old; | |
260 | ||
9beb36ba MD |
261 | if (event->chan == event->chan->session->metadata) |
262 | return -EPERM; | |
b5234c06 | 263 | old = uatomic_xchg(&event->enabled, 0); |
976fe9ea MD |
264 | if (!old) |
265 | return -EEXIST; | |
266 | return 0; | |
267 | } | |
268 | ||
7dd08bec | 269 | struct lttng_channel *lttng_channel_create(struct lttng_session *session, |
8020ceb5 MD |
270 | const char *transport_name, |
271 | void *buf_addr, | |
272 | size_t subbuf_size, size_t num_subbuf, | |
273 | unsigned int switch_timer_interval, | |
193183fb | 274 | unsigned int read_timer_interval, |
ef9ff354 MD |
275 | int **shm_fd, int **wait_fd, |
276 | uint64_t **memory_map_size, | |
7dd08bec | 277 | struct lttng_channel *chan_priv_init) |
8020ceb5 | 278 | { |
7dd08bec MD |
279 | struct lttng_channel *chan = NULL; |
280 | struct lttng_transport *transport; | |
8020ceb5 | 281 | |
8020ceb5 MD |
282 | if (session->been_active) |
283 | goto active; /* Refuse to add channel to active session */ | |
7dd08bec | 284 | transport = lttng_transport_find(transport_name); |
8020ceb5 | 285 | if (!transport) { |
b5234c06 | 286 | DBG("LTTng transport %s not found\n", |
8020ceb5 MD |
287 | transport_name); |
288 | goto notransport; | |
289 | } | |
d028eddb MD |
290 | chan_priv_init->id = session->free_chan_id++; |
291 | chan_priv_init->session = session; | |
8020ceb5 MD |
292 | /* |
293 | * Note: the channel creation op already writes into the packet | |
294 | * headers. Therefore the "chan" information used as input | |
295 | * should be already accessible. | |
296 | */ | |
e7372d13 | 297 | chan = transport->ops.channel_create(transport_name, buf_addr, |
8020ceb5 | 298 | subbuf_size, num_subbuf, switch_timer_interval, |
193183fb | 299 | read_timer_interval, shm_fd, wait_fd, |
d028eddb | 300 | memory_map_size, chan_priv_init); |
a3f61e7f | 301 | if (!chan) |
8020ceb5 | 302 | goto create_error; |
976fe9ea | 303 | chan->enabled = 1; |
8020ceb5 | 304 | chan->ops = &transport->ops; |
e58095ef | 305 | cds_list_add(&chan->node, &session->chan_head); |
8020ceb5 MD |
306 | return chan; |
307 | ||
308 | create_error: | |
8020ceb5 MD |
309 | notransport: |
310 | active: | |
8020ceb5 MD |
311 | return NULL; |
312 | } | |
313 | ||
314 | /* | |
315 | * Only used internally at session destruction. | |
316 | */ | |
317 | static | |
7dd08bec | 318 | void _lttng_channel_destroy(struct lttng_channel *chan) |
8020ceb5 | 319 | { |
e58095ef | 320 | cds_list_del(&chan->node); |
8020ceb5 | 321 | lttng_destroy_context(chan->ctx); |
a3f61e7f | 322 | chan->ops->channel_destroy(chan); |
8020ceb5 MD |
323 | } |
324 | ||
325 | /* | |
326 | * Supports event creation while tracing session is active. | |
327 | */ | |
e58095ef MD |
328 | static |
329 | int lttng_event_create(const struct lttng_event_desc *desc, | |
330 | struct lttng_channel *chan) | |
8020ceb5 | 331 | { |
e58095ef | 332 | const char *event_name = desc->name; |
7dd08bec | 333 | struct lttng_event *event; |
22c3c099 MD |
334 | struct cds_hlist_head *head; |
335 | struct cds_hlist_node *node; | |
576599a0 | 336 | int ret = 0; |
22c3c099 MD |
337 | size_t name_len = strlen(event_name); |
338 | uint32_t hash; | |
8020ceb5 | 339 | |
38eb0baa | 340 | if (chan->used_event_id == -1U) { |
576599a0 | 341 | ret = -ENOMEM; |
8020ceb5 | 342 | goto full; |
576599a0 | 343 | } |
22c3c099 MD |
344 | hash = jhash(event_name, name_len, 0); |
345 | head = &chan->session->events_ht.table[hash & (LTTNG_UST_EVENT_HT_SIZE - 1)]; | |
346 | cds_hlist_for_each_entry(event, node, head, hlist) { | |
e58095ef MD |
347 | assert(event->desc); |
348 | if (!strncmp(event->desc->name, | |
349 | desc->name, | |
ff412fb5 | 350 | LTTNG_UST_SYM_NAME_LEN - 1)) { |
576599a0 | 351 | ret = -EEXIST; |
8020ceb5 | 352 | goto exist; |
576599a0 MD |
353 | } |
354 | } | |
457a6b58 MD |
355 | |
356 | /* | |
357 | * Check if loglevel match. Refuse to connect event if not. | |
358 | */ | |
7dd08bec | 359 | event = zmalloc(sizeof(struct lttng_event)); |
576599a0 MD |
360 | if (!event) { |
361 | ret = -ENOMEM; | |
8020ceb5 | 362 | goto cache_error; |
576599a0 | 363 | } |
8020ceb5 | 364 | event->chan = chan; |
e58095ef | 365 | |
8165c8da MD |
366 | /* |
367 | * used_event_id counts the maximum number of event IDs that can | |
368 | * register if all probes register. | |
369 | */ | |
370 | chan->used_event_id++; | |
976fe9ea | 371 | event->enabled = 1; |
e58095ef MD |
372 | CDS_INIT_LIST_HEAD(&event->bytecode_runtime_head); |
373 | CDS_INIT_LIST_HEAD(&event->enablers_ref_head); | |
374 | event->desc = desc; | |
7dd08bec | 375 | /* Populate lttng_event structure before tracepoint registration. */ |
b5234c06 | 376 | cmm_smp_wmb(); |
e58095ef MD |
377 | ret = __tracepoint_probe_register(event_name, |
378 | desc->probe_callback, | |
379 | event, desc->signature); | |
380 | if (ret) | |
381 | goto register_error; | |
382 | event->id = chan->free_event_id++; | |
383 | ret = _lttng_event_metadata_statedump(chan->session, chan, event); | |
384 | if (ret) | |
385 | goto statedump_error; | |
386 | cds_list_add(&event->node, &chan->session->events_head); | |
22c3c099 | 387 | cds_hlist_add_head(&event->hlist, head); |
576599a0 | 388 | return 0; |
8020ceb5 MD |
389 | |
390 | statedump_error: | |
e58095ef MD |
391 | WARN_ON_ONCE(__tracepoint_probe_unregister(event_name, |
392 | desc->probe_callback, | |
393 | event)); | |
8020ceb5 | 394 | register_error: |
b5234c06 | 395 | free(event); |
8020ceb5 MD |
396 | cache_error: |
397 | exist: | |
398 | full: | |
576599a0 | 399 | return ret; |
8020ceb5 MD |
400 | } |
401 | ||
e58095ef MD |
402 | static |
403 | int lttng_desc_match_wildcard_enabler(const struct lttng_event_desc *desc, | |
404 | struct lttng_enabler *enabler) | |
405 | { | |
406 | int loglevel = 0; | |
407 | unsigned int has_loglevel; | |
408 | ||
409 | assert(enabler->type == LTTNG_ENABLER_WILDCARD); | |
410 | /* Compare excluding final '*' */ | |
411 | if (strncmp(desc->name, enabler->event_param.name, | |
412 | strlen(enabler->event_param.name) - 1)) | |
413 | return 0; | |
414 | if (desc->loglevel) { | |
415 | loglevel = *(*desc->loglevel); | |
416 | has_loglevel = 1; | |
417 | } | |
418 | if (!lttng_loglevel_match(loglevel, | |
419 | has_loglevel, | |
420 | enabler->event_param.loglevel_type, | |
421 | enabler->event_param.loglevel)) | |
422 | return 0; | |
423 | return 1; | |
424 | } | |
425 | ||
426 | static | |
427 | int lttng_desc_match_event_enabler(const struct lttng_event_desc *desc, | |
428 | struct lttng_enabler *enabler) | |
429 | { | |
430 | int loglevel = 0; | |
431 | unsigned int has_loglevel = 0; | |
432 | ||
433 | assert(enabler->type == LTTNG_ENABLER_EVENT); | |
434 | if (strcmp(desc->name, enabler->event_param.name)) | |
435 | return 0; | |
436 | if (desc->loglevel) { | |
437 | loglevel = *(*desc->loglevel); | |
438 | has_loglevel = 1; | |
439 | } | |
440 | if (!lttng_loglevel_match(loglevel, | |
441 | has_loglevel, | |
442 | enabler->event_param.loglevel_type, | |
443 | enabler->event_param.loglevel)) | |
444 | return 0; | |
445 | return 1; | |
446 | } | |
447 | ||
448 | static | |
449 | int lttng_desc_match_enabler(const struct lttng_event_desc *desc, | |
450 | struct lttng_enabler *enabler) | |
451 | { | |
452 | switch (enabler->type) { | |
453 | case LTTNG_ENABLER_WILDCARD: | |
454 | return lttng_desc_match_wildcard_enabler(desc, enabler); | |
455 | case LTTNG_ENABLER_EVENT: | |
456 | return lttng_desc_match_event_enabler(desc, enabler); | |
457 | default: | |
458 | return -EINVAL; | |
459 | } | |
460 | } | |
461 | ||
462 | static | |
463 | int lttng_event_match_enabler(struct lttng_event *event, | |
464 | struct lttng_enabler *enabler) | |
465 | { | |
466 | return lttng_desc_match_enabler(event->desc, enabler); | |
467 | } | |
468 | ||
469 | static | |
470 | struct lttng_enabler_ref * lttng_event_enabler_ref(struct lttng_event *event, | |
471 | struct lttng_enabler *enabler) | |
472 | { | |
473 | struct lttng_enabler_ref *enabler_ref; | |
474 | ||
475 | cds_list_for_each_entry(enabler_ref, | |
476 | &event->enablers_ref_head, node) { | |
477 | if (enabler_ref->ref == enabler) | |
478 | return enabler_ref; | |
479 | } | |
480 | return NULL; | |
481 | } | |
482 | ||
8020ceb5 | 483 | /* |
e58095ef MD |
484 | * Create struct lttng_event if it is missing and present in the list of |
485 | * tracepoint probes. | |
8020ceb5 | 486 | */ |
e58095ef MD |
487 | static |
488 | void lttng_create_event_if_missing(struct lttng_enabler *enabler) | |
8020ceb5 | 489 | { |
e58095ef MD |
490 | struct lttng_session *session = enabler->chan->session; |
491 | struct lttng_probe_desc *probe_desc; | |
492 | const struct lttng_event_desc *desc; | |
493 | struct lttng_event *event; | |
494 | int i; | |
495 | struct cds_list_head *probe_list; | |
496 | ||
497 | probe_list = lttng_get_probe_list_head(); | |
498 | /* | |
499 | * For each probe event, if we find that a probe event matches | |
500 | * our enabler, create an associated lttng_event if not | |
501 | * already present. | |
502 | */ | |
503 | cds_list_for_each_entry(probe_desc, probe_list, head) { | |
504 | for (i = 0; i < probe_desc->nr_events; i++) { | |
505 | int found = 0, ret; | |
22c3c099 MD |
506 | struct cds_hlist_head *head; |
507 | struct cds_hlist_node *node; | |
508 | const char *event_name; | |
509 | size_t name_len; | |
510 | uint32_t hash; | |
e58095ef MD |
511 | |
512 | desc = probe_desc->event_desc[i]; | |
513 | if (!lttng_desc_match_enabler(desc, enabler)) | |
514 | continue; | |
22c3c099 MD |
515 | event_name = desc->name; |
516 | name_len = strlen(event_name); | |
e58095ef MD |
517 | |
518 | /* | |
22c3c099 | 519 | * Check if already created. |
e58095ef | 520 | */ |
22c3c099 MD |
521 | hash = jhash(event_name, name_len, 0); |
522 | head = &session->events_ht.table[hash & (LTTNG_UST_EVENT_HT_SIZE - 1)]; | |
523 | cds_hlist_for_each_entry(event, node, head, hlist) { | |
e58095ef MD |
524 | if (event->desc == desc) |
525 | found = 1; | |
526 | } | |
527 | if (found) | |
528 | continue; | |
529 | ||
530 | /* | |
531 | * We need to create an event for this | |
532 | * event probe. | |
533 | */ | |
534 | ret = lttng_event_create(probe_desc->event_desc[i], | |
535 | enabler->chan); | |
536 | if (ret) { | |
537 | DBG("Unable to create event %s\n", | |
538 | probe_desc->event_desc[i]->name); | |
539 | } | |
8165c8da | 540 | } |
8020ceb5 | 541 | } |
8020ceb5 MD |
542 | } |
543 | ||
544 | /* | |
e58095ef MD |
545 | * Create events associated with an enabler (if not already present), |
546 | * and add backward reference from the event to the enabler. | |
8020ceb5 MD |
547 | */ |
548 | static | |
e58095ef | 549 | int lttng_enabler_ref_events(struct lttng_enabler *enabler) |
8020ceb5 | 550 | { |
e58095ef MD |
551 | struct lttng_session *session = enabler->chan->session; |
552 | struct lttng_event *event; | |
553 | ||
554 | /* First ensure that probe events are created for this enabler. */ | |
555 | lttng_create_event_if_missing(enabler); | |
556 | ||
557 | /* For each event matching enabler in session event list. */ | |
558 | cds_list_for_each_entry(event, &session->events_head, node) { | |
559 | struct lttng_enabler_ref *enabler_ref; | |
560 | ||
561 | if (!lttng_event_match_enabler(event, enabler)) | |
562 | continue; | |
563 | ||
564 | enabler_ref = lttng_event_enabler_ref(event, enabler); | |
565 | if (!enabler_ref) { | |
566 | /* | |
567 | * If no backward ref, create it. | |
568 | * Add backward ref from event to enabler. | |
569 | */ | |
570 | enabler_ref = zmalloc(sizeof(*enabler_ref)); | |
571 | if (!enabler_ref) | |
572 | return -ENOMEM; | |
573 | enabler_ref->ref = enabler; | |
574 | cds_list_add(&enabler_ref->node, | |
575 | &event->enablers_ref_head); | |
8165c8da | 576 | } |
e58095ef MD |
577 | |
578 | /* | |
579 | * Link filter bytecodes if not linked yet. | |
580 | */ | |
581 | lttng_enabler_event_link_bytecode(event, enabler); | |
582 | ||
583 | /* TODO: merge event context. */ | |
584 | } | |
585 | return 0; | |
586 | } | |
587 | ||
588 | /* | |
589 | * Called at library load: connect the probe on all enablers matching | |
590 | * this event. | |
591 | * called with session mutex held. | |
592 | * TODO: currently, for each desc added, we iterate on all event desc | |
593 | * (inefficient). We should create specific code that only target the | |
594 | * added desc. | |
595 | */ | |
596 | int lttng_fix_pending_event_desc(const struct lttng_event_desc *desc) | |
597 | { | |
598 | struct lttng_session *session; | |
599 | ||
600 | cds_list_for_each_entry(session, &sessions, node) { | |
601 | lttng_session_lazy_sync_enablers(session); | |
8020ceb5 | 602 | } |
e58095ef MD |
603 | return 0; |
604 | } | |
605 | ||
606 | /* | |
607 | * Only used internally at session destruction. | |
608 | */ | |
609 | int _lttng_event_unregister(struct lttng_event *event) | |
610 | { | |
611 | return __tracepoint_probe_unregister(event->desc->name, | |
612 | event->desc->probe_callback, | |
613 | event); | |
614 | } | |
615 | ||
616 | /* | |
617 | * Only used internally at session destruction. | |
618 | */ | |
619 | static | |
620 | void _lttng_event_destroy(struct lttng_event *event) | |
621 | { | |
622 | struct lttng_enabler_ref *enabler_ref, *tmp_enabler_ref; | |
623 | ||
e58095ef | 624 | cds_list_del(&event->node); |
8020ceb5 | 625 | lttng_destroy_context(event->ctx); |
f488575f | 626 | lttng_free_event_filter_runtime(event); |
e58095ef MD |
627 | /* Free event enabler refs */ |
628 | cds_list_for_each_entry_safe(enabler_ref, tmp_enabler_ref, | |
629 | &event->enablers_ref_head, node) | |
630 | free(enabler_ref); | |
b5234c06 | 631 | free(event); |
8020ceb5 MD |
632 | } |
633 | ||
634 | /* | |
635 | * We have exclusive access to our metadata buffer (protected by the | |
17dfb34b | 636 | * ust_lock), so we can do racy operations such as looking for |
8020ceb5 MD |
637 | * remaining space left in packet and write, since mutual exclusion |
638 | * protects us from concurrent writes. | |
639 | */ | |
7dd08bec | 640 | int lttng_metadata_printf(struct lttng_session *session, |
8020ceb5 MD |
641 | const char *fmt, ...) |
642 | { | |
4cfec15c | 643 | struct lttng_ust_lib_ring_buffer_ctx ctx; |
7dd08bec | 644 | struct lttng_channel *chan = session->metadata; |
b5234c06 | 645 | char *str = NULL; |
8020ceb5 MD |
646 | int ret = 0, waitret; |
647 | size_t len, reserve_len, pos; | |
648 | va_list ap; | |
649 | ||
b5234c06 | 650 | WARN_ON_ONCE(!CMM_ACCESS_ONCE(session->active)); |
8020ceb5 MD |
651 | |
652 | va_start(ap, fmt); | |
b5234c06 | 653 | ret = vasprintf(&str, fmt, ap); |
8020ceb5 | 654 | va_end(ap); |
b5234c06 | 655 | if (ret < 0) |
8020ceb5 MD |
656 | return -ENOMEM; |
657 | ||
658 | len = strlen(str); | |
659 | pos = 0; | |
660 | ||
661 | for (pos = 0; pos < len; pos += reserve_len) { | |
662 | reserve_len = min_t(size_t, | |
1d498196 | 663 | chan->ops->packet_avail_size(chan->chan, chan->handle), |
8020ceb5 MD |
664 | len - pos); |
665 | lib_ring_buffer_ctx_init(&ctx, chan->chan, NULL, reserve_len, | |
1d498196 | 666 | sizeof(char), -1, chan->handle); |
8020ceb5 MD |
667 | /* |
668 | * We don't care about metadata buffer's records lost | |
669 | * count, because we always retry here. Report error if | |
670 | * we need to bail out after timeout or being | |
671 | * interrupted. | |
672 | */ | |
b5234c06 | 673 | waitret = wait_cond_interruptible_timeout( |
8020ceb5 MD |
674 | ({ |
675 | ret = chan->ops->event_reserve(&ctx, 0); | |
676 | ret != -ENOBUFS || !ret; | |
677 | }), | |
b5234c06 | 678 | LTTNG_METADATA_TIMEOUT_MSEC); |
b472cfc0 | 679 | if (waitret == -ETIMEDOUT || waitret == -EINTR || ret) { |
b5234c06 MD |
680 | DBG("LTTng: Failure to write metadata to buffers (%s)\n", |
681 | waitret == -EINTR ? "interrupted" : | |
8020ceb5 | 682 | (ret == -ENOBUFS ? "timeout" : "I/O error")); |
b5234c06 | 683 | if (waitret == -EINTR) |
8020ceb5 MD |
684 | ret = waitret; |
685 | goto end; | |
686 | } | |
687 | chan->ops->event_write(&ctx, &str[pos], reserve_len); | |
688 | chan->ops->event_commit(&ctx); | |
689 | } | |
690 | end: | |
b5234c06 | 691 | free(str); |
8020ceb5 MD |
692 | return ret; |
693 | } | |
694 | ||
695 | static | |
7dd08bec | 696 | int _lttng_field_statedump(struct lttng_session *session, |
8020ceb5 MD |
697 | const struct lttng_event_field *field) |
698 | { | |
699 | int ret = 0; | |
700 | ||
180901e6 | 701 | if (field->nowrite) |
4774c8f3 MD |
702 | return 0; |
703 | ||
8020ceb5 MD |
704 | switch (field->type.atype) { |
705 | case atype_integer: | |
706 | ret = lttng_metadata_printf(session, | |
4e2ee1f5 | 707 | " integer { size = %u; align = %u; signed = %u; encoding = %s; base = %u;%s } _%s;\n", |
8020ceb5 MD |
708 | field->type.u.basic.integer.size, |
709 | field->type.u.basic.integer.alignment, | |
710 | field->type.u.basic.integer.signedness, | |
711 | (field->type.u.basic.integer.encoding == lttng_encode_none) | |
712 | ? "none" | |
713 | : (field->type.u.basic.integer.encoding == lttng_encode_UTF8) | |
714 | ? "UTF8" | |
715 | : "ASCII", | |
716 | field->type.u.basic.integer.base, | |
8a98a75d | 717 | #if (BYTE_ORDER == BIG_ENDIAN) |
403c40b4 MD |
718 | field->type.u.basic.integer.reverse_byte_order ? " byte_order = le;" : "", |
719 | #else | |
720 | field->type.u.basic.integer.reverse_byte_order ? " byte_order = be;" : "", | |
721 | #endif | |
722 | field->name); | |
723 | break; | |
724 | case atype_float: | |
725 | ret = lttng_metadata_printf(session, | |
8a98a75d | 726 | " floating_point { exp_dig = %u; mant_dig = %u; align = %u;%s } _%s;\n", |
403c40b4 MD |
727 | field->type.u.basic._float.exp_dig, |
728 | field->type.u.basic._float.mant_dig, | |
729 | field->type.u.basic._float.alignment, | |
8a98a75d | 730 | #if (BYTE_ORDER == BIG_ENDIAN) |
8020ceb5 MD |
731 | field->type.u.basic.integer.reverse_byte_order ? " byte_order = le;" : "", |
732 | #else | |
733 | field->type.u.basic.integer.reverse_byte_order ? " byte_order = be;" : "", | |
734 | #endif | |
735 | field->name); | |
736 | break; | |
737 | case atype_enum: | |
738 | ret = lttng_metadata_printf(session, | |
739 | " %s %s;\n", | |
740 | field->type.u.basic.enumeration.name, | |
741 | field->name); | |
742 | break; | |
743 | case atype_array: | |
744 | { | |
745 | const struct lttng_basic_type *elem_type; | |
746 | ||
747 | elem_type = &field->type.u.array.elem_type; | |
748 | ret = lttng_metadata_printf(session, | |
4e2ee1f5 | 749 | " integer { size = %u; align = %u; signed = %u; encoding = %s; base = %u;%s } _%s[%u];\n", |
8020ceb5 MD |
750 | elem_type->u.basic.integer.size, |
751 | elem_type->u.basic.integer.alignment, | |
752 | elem_type->u.basic.integer.signedness, | |
753 | (elem_type->u.basic.integer.encoding == lttng_encode_none) | |
754 | ? "none" | |
755 | : (elem_type->u.basic.integer.encoding == lttng_encode_UTF8) | |
756 | ? "UTF8" | |
757 | : "ASCII", | |
758 | elem_type->u.basic.integer.base, | |
8a98a75d | 759 | #if (BYTE_ORDER == BIG_ENDIAN) |
8020ceb5 MD |
760 | elem_type->u.basic.integer.reverse_byte_order ? " byte_order = le;" : "", |
761 | #else | |
762 | elem_type->u.basic.integer.reverse_byte_order ? " byte_order = be;" : "", | |
763 | #endif | |
764 | field->name, field->type.u.array.length); | |
765 | break; | |
766 | } | |
767 | case atype_sequence: | |
768 | { | |
769 | const struct lttng_basic_type *elem_type; | |
770 | const struct lttng_basic_type *length_type; | |
771 | ||
772 | elem_type = &field->type.u.sequence.elem_type; | |
773 | length_type = &field->type.u.sequence.length_type; | |
774 | ret = lttng_metadata_printf(session, | |
775 | " integer { size = %u; align = %u; signed = %u; encoding = %s; base = %u;%s } __%s_length;\n", | |
776 | length_type->u.basic.integer.size, | |
777 | (unsigned int) length_type->u.basic.integer.alignment, | |
778 | length_type->u.basic.integer.signedness, | |
779 | (length_type->u.basic.integer.encoding == lttng_encode_none) | |
780 | ? "none" | |
781 | : ((length_type->u.basic.integer.encoding == lttng_encode_UTF8) | |
782 | ? "UTF8" | |
783 | : "ASCII"), | |
784 | length_type->u.basic.integer.base, | |
8a98a75d | 785 | #if (BYTE_ORDER == BIG_ENDIAN) |
8020ceb5 MD |
786 | length_type->u.basic.integer.reverse_byte_order ? " byte_order = le;" : "", |
787 | #else | |
788 | length_type->u.basic.integer.reverse_byte_order ? " byte_order = be;" : "", | |
789 | #endif | |
790 | field->name); | |
791 | if (ret) | |
792 | return ret; | |
793 | ||
794 | ret = lttng_metadata_printf(session, | |
4e2ee1f5 | 795 | " integer { size = %u; align = %u; signed = %u; encoding = %s; base = %u;%s } _%s[ __%s_length ];\n", |
8020ceb5 MD |
796 | elem_type->u.basic.integer.size, |
797 | (unsigned int) elem_type->u.basic.integer.alignment, | |
798 | elem_type->u.basic.integer.signedness, | |
799 | (elem_type->u.basic.integer.encoding == lttng_encode_none) | |
800 | ? "none" | |
801 | : ((elem_type->u.basic.integer.encoding == lttng_encode_UTF8) | |
802 | ? "UTF8" | |
803 | : "ASCII"), | |
804 | elem_type->u.basic.integer.base, | |
8a98a75d | 805 | #if (BYTE_ORDER == BIG_ENDIAN) |
8020ceb5 MD |
806 | elem_type->u.basic.integer.reverse_byte_order ? " byte_order = le;" : "", |
807 | #else | |
808 | elem_type->u.basic.integer.reverse_byte_order ? " byte_order = be;" : "", | |
809 | #endif | |
810 | field->name, | |
811 | field->name); | |
812 | break; | |
813 | } | |
814 | ||
815 | case atype_string: | |
816 | /* Default encoding is UTF8 */ | |
817 | ret = lttng_metadata_printf(session, | |
4e2ee1f5 | 818 | " string%s _%s;\n", |
8020ceb5 MD |
819 | field->type.u.basic.string.encoding == lttng_encode_ASCII ? |
820 | " { encoding = ASCII; }" : "", | |
821 | field->name); | |
822 | break; | |
823 | default: | |
824 | WARN_ON_ONCE(1); | |
825 | return -EINVAL; | |
826 | } | |
827 | return ret; | |
828 | } | |
829 | ||
830 | static | |
7dd08bec | 831 | int _lttng_context_metadata_statedump(struct lttng_session *session, |
8020ceb5 MD |
832 | struct lttng_ctx *ctx) |
833 | { | |
834 | int ret = 0; | |
835 | int i; | |
836 | ||
837 | if (!ctx) | |
838 | return 0; | |
839 | for (i = 0; i < ctx->nr_fields; i++) { | |
840 | const struct lttng_ctx_field *field = &ctx->fields[i]; | |
841 | ||
7dd08bec | 842 | ret = _lttng_field_statedump(session, &field->event_field); |
8020ceb5 MD |
843 | if (ret) |
844 | return ret; | |
845 | } | |
846 | return ret; | |
847 | } | |
848 | ||
849 | static | |
7dd08bec MD |
850 | int _lttng_fields_metadata_statedump(struct lttng_session *session, |
851 | struct lttng_event *event) | |
8020ceb5 MD |
852 | { |
853 | const struct lttng_event_desc *desc = event->desc; | |
854 | int ret = 0; | |
855 | int i; | |
856 | ||
857 | for (i = 0; i < desc->nr_fields; i++) { | |
858 | const struct lttng_event_field *field = &desc->fields[i]; | |
859 | ||
7dd08bec | 860 | ret = _lttng_field_statedump(session, field); |
8020ceb5 MD |
861 | if (ret) |
862 | return ret; | |
863 | } | |
864 | return ret; | |
865 | } | |
866 | ||
867 | static | |
7dd08bec MD |
868 | int _lttng_event_metadata_statedump(struct lttng_session *session, |
869 | struct lttng_channel *chan, | |
870 | struct lttng_event *event) | |
8020ceb5 MD |
871 | { |
872 | int ret = 0; | |
8155c5e8 | 873 | int loglevel = TRACE_DEFAULT; |
8020ceb5 | 874 | |
b5234c06 | 875 | if (event->metadata_dumped || !CMM_ACCESS_ONCE(session->active)) |
8020ceb5 MD |
876 | return 0; |
877 | if (chan == session->metadata) | |
878 | return 0; | |
8165c8da MD |
879 | /* |
880 | * Don't print events for which probe load is pending. | |
881 | */ | |
882 | if (!event->desc) | |
883 | return 0; | |
8020ceb5 MD |
884 | |
885 | ret = lttng_metadata_printf(session, | |
886 | "event {\n" | |
7083f0fe | 887 | " name = \"%s\";\n" |
8020ceb5 MD |
888 | " id = %u;\n" |
889 | " stream_id = %u;\n", | |
890 | event->desc->name, | |
891 | event->id, | |
892 | event->chan->id); | |
893 | if (ret) | |
894 | goto end; | |
895 | ||
8155c5e8 MD |
896 | if (event->desc->loglevel) |
897 | loglevel = *(*event->desc->loglevel); | |
898 | ||
899 | ret = lttng_metadata_printf(session, | |
900 | " loglevel = %d;\n", | |
901 | loglevel); | |
902 | if (ret) | |
903 | goto end; | |
e6c12e3d | 904 | |
6ddc916d MD |
905 | if (event->desc->u.ext.model_emf_uri) { |
906 | ret = lttng_metadata_printf(session, | |
907 | " model.emf.uri = \"%s\";\n", | |
908 | *(event->desc->u.ext.model_emf_uri)); | |
909 | if (ret) | |
910 | goto end; | |
911 | } | |
912 | ||
8020ceb5 MD |
913 | if (event->ctx) { |
914 | ret = lttng_metadata_printf(session, | |
915 | " context := struct {\n"); | |
916 | if (ret) | |
917 | goto end; | |
918 | } | |
7dd08bec | 919 | ret = _lttng_context_metadata_statedump(session, event->ctx); |
8020ceb5 MD |
920 | if (ret) |
921 | goto end; | |
922 | if (event->ctx) { | |
923 | ret = lttng_metadata_printf(session, | |
924 | " };\n"); | |
925 | if (ret) | |
926 | goto end; | |
927 | } | |
928 | ||
929 | ret = lttng_metadata_printf(session, | |
930 | " fields := struct {\n" | |
931 | ); | |
932 | if (ret) | |
933 | goto end; | |
934 | ||
7dd08bec | 935 | ret = _lttng_fields_metadata_statedump(session, event); |
8020ceb5 MD |
936 | if (ret) |
937 | goto end; | |
938 | ||
939 | /* | |
940 | * LTTng space reservation can only reserve multiples of the | |
941 | * byte size. | |
942 | */ | |
943 | ret = lttng_metadata_printf(session, | |
944 | " };\n" | |
945 | "};\n\n"); | |
946 | if (ret) | |
947 | goto end; | |
948 | ||
949 | event->metadata_dumped = 1; | |
950 | end: | |
951 | return ret; | |
952 | ||
953 | } | |
954 | ||
955 | static | |
7dd08bec MD |
956 | int _lttng_channel_metadata_statedump(struct lttng_session *session, |
957 | struct lttng_channel *chan) | |
8020ceb5 MD |
958 | { |
959 | int ret = 0; | |
960 | ||
b5234c06 | 961 | if (chan->metadata_dumped || !CMM_ACCESS_ONCE(session->active)) |
8020ceb5 MD |
962 | return 0; |
963 | if (chan == session->metadata) | |
964 | return 0; | |
965 | ||
966 | WARN_ON_ONCE(!chan->header_type); | |
967 | ret = lttng_metadata_printf(session, | |
968 | "stream {\n" | |
969 | " id = %u;\n" | |
970 | " event.header := %s;\n" | |
971 | " packet.context := struct packet_context;\n", | |
972 | chan->id, | |
973 | chan->header_type == 1 ? "struct event_header_compact" : | |
974 | "struct event_header_large"); | |
975 | if (ret) | |
976 | goto end; | |
977 | ||
978 | if (chan->ctx) { | |
979 | ret = lttng_metadata_printf(session, | |
980 | " event.context := struct {\n"); | |
981 | if (ret) | |
982 | goto end; | |
983 | } | |
7dd08bec | 984 | ret = _lttng_context_metadata_statedump(session, chan->ctx); |
8020ceb5 MD |
985 | if (ret) |
986 | goto end; | |
987 | if (chan->ctx) { | |
988 | ret = lttng_metadata_printf(session, | |
989 | " };\n"); | |
990 | if (ret) | |
991 | goto end; | |
992 | } | |
993 | ||
994 | ret = lttng_metadata_printf(session, | |
995 | "};\n\n"); | |
996 | ||
997 | chan->metadata_dumped = 1; | |
998 | end: | |
999 | return ret; | |
1000 | } | |
1001 | ||
1002 | static | |
7dd08bec | 1003 | int _lttng_stream_packet_context_declare(struct lttng_session *session) |
8020ceb5 MD |
1004 | { |
1005 | return lttng_metadata_printf(session, | |
1006 | "struct packet_context {\n" | |
28b12049 MD |
1007 | " uint64_clock_monotonic_t timestamp_begin;\n" |
1008 | " uint64_clock_monotonic_t timestamp_end;\n" | |
0c00a107 MD |
1009 | " uint64_t content_size;\n" |
1010 | " uint64_t packet_size;\n" | |
18fc8d71 | 1011 | " unsigned long events_discarded;\n" |
8020ceb5 MD |
1012 | " uint32_t cpu_id;\n" |
1013 | "};\n\n" | |
1014 | ); | |
1015 | } | |
1016 | ||
1017 | /* | |
1018 | * Compact header: | |
1019 | * id: range: 0 - 30. | |
1020 | * id 31 is reserved to indicate an extended header. | |
1021 | * | |
1022 | * Large header: | |
1023 | * id: range: 0 - 65534. | |
1024 | * id 65535 is reserved to indicate an extended header. | |
1025 | */ | |
1026 | static | |
7dd08bec | 1027 | int _lttng_event_header_declare(struct lttng_session *session) |
8020ceb5 MD |
1028 | { |
1029 | return lttng_metadata_printf(session, | |
1030 | "struct event_header_compact {\n" | |
1031 | " enum : uint5_t { compact = 0 ... 30, extended = 31 } id;\n" | |
1032 | " variant <id> {\n" | |
1033 | " struct {\n" | |
28b12049 | 1034 | " uint27_clock_monotonic_t timestamp;\n" |
8020ceb5 MD |
1035 | " } compact;\n" |
1036 | " struct {\n" | |
1037 | " uint32_t id;\n" | |
28b12049 | 1038 | " uint64_clock_monotonic_t timestamp;\n" |
8020ceb5 MD |
1039 | " } extended;\n" |
1040 | " } v;\n" | |
1041 | "} align(%u);\n" | |
1042 | "\n" | |
1043 | "struct event_header_large {\n" | |
1044 | " enum : uint16_t { compact = 0 ... 65534, extended = 65535 } id;\n" | |
1045 | " variant <id> {\n" | |
1046 | " struct {\n" | |
28b12049 | 1047 | " uint32_clock_monotonic_t timestamp;\n" |
8020ceb5 MD |
1048 | " } compact;\n" |
1049 | " struct {\n" | |
1050 | " uint32_t id;\n" | |
28b12049 | 1051 | " uint64_clock_monotonic_t timestamp;\n" |
8020ceb5 MD |
1052 | " } extended;\n" |
1053 | " } v;\n" | |
1054 | "} align(%u);\n\n", | |
1dbfff0c MD |
1055 | lttng_alignof(uint32_t) * CHAR_BIT, |
1056 | lttng_alignof(uint16_t) * CHAR_BIT | |
8020ceb5 MD |
1057 | ); |
1058 | } | |
1059 | ||
28b12049 MD |
1060 | /* |
1061 | * Approximation of NTP time of day to clock monotonic correlation, | |
1062 | * taken at start of trace. | |
1063 | * Yes, this is only an approximation. Yes, we can (and will) do better | |
1064 | * in future versions. | |
1065 | */ | |
1066 | static | |
1067 | uint64_t measure_clock_offset(void) | |
1068 | { | |
1069 | uint64_t offset, monotonic[2], realtime; | |
1070 | struct timespec rts = { 0, 0 }; | |
1071 | int ret; | |
1072 | ||
1073 | monotonic[0] = trace_clock_read64(); | |
1074 | ret = clock_gettime(CLOCK_REALTIME, &rts); | |
1075 | if (ret < 0) | |
1076 | return 0; | |
1077 | monotonic[1] = trace_clock_read64(); | |
1078 | offset = (monotonic[0] + monotonic[1]) >> 1; | |
17ec046a | 1079 | realtime = (uint64_t) rts.tv_sec * 1000000000ULL; |
28b12049 MD |
1080 | realtime += rts.tv_nsec; |
1081 | offset = realtime - offset; | |
1082 | return offset; | |
1083 | } | |
1084 | ||
8020ceb5 MD |
1085 | /* |
1086 | * Output metadata into this session's metadata buffers. | |
1087 | */ | |
1088 | static | |
7dd08bec | 1089 | int _lttng_session_metadata_statedump(struct lttng_session *session) |
8020ceb5 | 1090 | { |
b5234c06 | 1091 | unsigned char *uuid_c = session->uuid; |
19d8b1b3 MD |
1092 | char uuid_s[LTTNG_UST_UUID_STR_LEN], |
1093 | clock_uuid_s[LTTNG_UST_UUID_STR_LEN]; | |
7dd08bec MD |
1094 | struct lttng_channel *chan; |
1095 | struct lttng_event *event; | |
8020ceb5 | 1096 | int ret = 0; |
08114193 | 1097 | char procname[LTTNG_UST_PROCNAME_LEN] = ""; |
9e4d42a0 | 1098 | char hostname[HOST_NAME_MAX]; |
8020ceb5 | 1099 | |
b5234c06 | 1100 | if (!CMM_ACCESS_ONCE(session->active)) |
8020ceb5 MD |
1101 | return 0; |
1102 | if (session->metadata_dumped) | |
1103 | goto skip_session; | |
1104 | if (!session->metadata) { | |
b5234c06 | 1105 | DBG("LTTng: attempt to start tracing, but metadata channel is not found. Operation abort.\n"); |
8020ceb5 MD |
1106 | return -EPERM; |
1107 | } | |
1108 | ||
1109 | snprintf(uuid_s, sizeof(uuid_s), | |
1110 | "%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x", | |
1111 | uuid_c[0], uuid_c[1], uuid_c[2], uuid_c[3], | |
1112 | uuid_c[4], uuid_c[5], uuid_c[6], uuid_c[7], | |
1113 | uuid_c[8], uuid_c[9], uuid_c[10], uuid_c[11], | |
1114 | uuid_c[12], uuid_c[13], uuid_c[14], uuid_c[15]); | |
1115 | ||
1116 | ret = lttng_metadata_printf(session, | |
1117 | "typealias integer { size = 8; align = %u; signed = false; } := uint8_t;\n" | |
1118 | "typealias integer { size = 16; align = %u; signed = false; } := uint16_t;\n" | |
1119 | "typealias integer { size = 32; align = %u; signed = false; } := uint32_t;\n" | |
1120 | "typealias integer { size = 64; align = %u; signed = false; } := uint64_t;\n" | |
18fc8d71 | 1121 | "typealias integer { size = %u; align = %u; signed = false; } := unsigned long;\n" |
8020ceb5 MD |
1122 | "typealias integer { size = 5; align = 1; signed = false; } := uint5_t;\n" |
1123 | "typealias integer { size = 27; align = 1; signed = false; } := uint27_t;\n" | |
1124 | "\n" | |
1125 | "trace {\n" | |
1126 | " major = %u;\n" | |
1127 | " minor = %u;\n" | |
1128 | " uuid = \"%s\";\n" | |
1129 | " byte_order = %s;\n" | |
1130 | " packet.header := struct {\n" | |
1131 | " uint32_t magic;\n" | |
1132 | " uint8_t uuid[16];\n" | |
1133 | " uint32_t stream_id;\n" | |
1134 | " };\n" | |
1135 | "};\n\n", | |
1dbfff0c MD |
1136 | lttng_alignof(uint8_t) * CHAR_BIT, |
1137 | lttng_alignof(uint16_t) * CHAR_BIT, | |
1138 | lttng_alignof(uint32_t) * CHAR_BIT, | |
1139 | lttng_alignof(uint64_t) * CHAR_BIT, | |
18fc8d71 MD |
1140 | sizeof(unsigned long) * CHAR_BIT, |
1141 | lttng_alignof(unsigned long) * CHAR_BIT, | |
2694975d MD |
1142 | CTF_SPEC_MAJOR, |
1143 | CTF_SPEC_MINOR, | |
8020ceb5 | 1144 | uuid_s, |
8a98a75d | 1145 | #if (BYTE_ORDER == BIG_ENDIAN) |
8020ceb5 MD |
1146 | "be" |
1147 | #else | |
1148 | "le" | |
1149 | #endif | |
1150 | ); | |
1151 | if (ret) | |
1152 | goto end; | |
1153 | ||
b020e504 | 1154 | /* ignore error, just use empty string if error. */ |
9e4d42a0 MD |
1155 | hostname[0] = '\0'; |
1156 | ret = gethostname(hostname, sizeof(hostname)); | |
1157 | if (ret && errno == ENAMETOOLONG) | |
1158 | hostname[HOST_NAME_MAX - 1] = '\0'; | |
08114193 MD |
1159 | lttng_ust_getprocname(procname); |
1160 | procname[LTTNG_UST_PROCNAME_LEN - 1] = '\0'; | |
b020e504 MD |
1161 | ret = lttng_metadata_printf(session, |
1162 | "env {\n" | |
9e4d42a0 | 1163 | " hostname = \"%s\";\n" |
b020e504 MD |
1164 | " vpid = %d;\n" |
1165 | " procname = \"%s\";\n" | |
2694975d MD |
1166 | " domain = \"ust\";\n" |
1167 | " tracer_name = \"lttng-ust\";\n" | |
1168 | " tracer_major = %u;\n" | |
1169 | " tracer_minor = %u;\n" | |
1170 | " tracer_patchlevel = %u;\n" | |
b020e504 | 1171 | "};\n\n", |
9e4d42a0 | 1172 | hostname, |
b020e504 MD |
1173 | (int) getpid(), |
1174 | procname, | |
2694975d MD |
1175 | LTTNG_UST_MAJOR_VERSION, |
1176 | LTTNG_UST_MINOR_VERSION, | |
1177 | LTTNG_UST_PATCHLEVEL_VERSION | |
b020e504 MD |
1178 | ); |
1179 | if (ret) | |
1180 | goto end; | |
1181 | ||
28b12049 MD |
1182 | ret = lttng_metadata_printf(session, |
1183 | "clock {\n" | |
939950af MD |
1184 | " name = %s;\n", |
1185 | "monotonic" | |
1186 | ); | |
1187 | if (ret) | |
1188 | goto end; | |
1189 | ||
1190 | if (!trace_clock_uuid(clock_uuid_s)) { | |
1191 | ret = lttng_metadata_printf(session, | |
1192 | " uuid = \"%s\";\n", | |
1193 | clock_uuid_s | |
1194 | ); | |
1195 | if (ret) | |
1196 | goto end; | |
1197 | } | |
1198 | ||
1199 | ret = lttng_metadata_printf(session, | |
28b12049 MD |
1200 | " description = \"Monotonic Clock\";\n" |
1201 | " freq = %" PRIu64 "; /* Frequency, in Hz */\n" | |
1202 | " /* clock value offset from Epoch is: offset * (1/freq) */\n" | |
1203 | " offset = %" PRIu64 ";\n" | |
1204 | "};\n\n", | |
28b12049 MD |
1205 | trace_clock_freq(), |
1206 | measure_clock_offset() | |
1207 | ); | |
1208 | if (ret) | |
1209 | goto end; | |
1210 | ||
1211 | ret = lttng_metadata_printf(session, | |
1212 | "typealias integer {\n" | |
1213 | " size = 27; align = 1; signed = false;\n" | |
1214 | " map = clock.monotonic.value;\n" | |
1215 | "} := uint27_clock_monotonic_t;\n" | |
1216 | "\n" | |
1217 | "typealias integer {\n" | |
1218 | " size = 32; align = %u; signed = false;\n" | |
1219 | " map = clock.monotonic.value;\n" | |
1220 | "} := uint32_clock_monotonic_t;\n" | |
1221 | "\n" | |
1222 | "typealias integer {\n" | |
1223 | " size = 64; align = %u; signed = false;\n" | |
1224 | " map = clock.monotonic.value;\n" | |
1225 | "} := uint64_clock_monotonic_t;\n\n", | |
1226 | lttng_alignof(uint32_t) * CHAR_BIT, | |
1227 | lttng_alignof(uint64_t) * CHAR_BIT | |
1228 | ); | |
1229 | if (ret) | |
1230 | goto end; | |
1231 | ||
7dd08bec | 1232 | ret = _lttng_stream_packet_context_declare(session); |
8020ceb5 MD |
1233 | if (ret) |
1234 | goto end; | |
1235 | ||
7dd08bec | 1236 | ret = _lttng_event_header_declare(session); |
8020ceb5 MD |
1237 | if (ret) |
1238 | goto end; | |
1239 | ||
1240 | skip_session: | |
e58095ef | 1241 | cds_list_for_each_entry(chan, &session->chan_head, node) { |
7dd08bec | 1242 | ret = _lttng_channel_metadata_statedump(session, chan); |
8020ceb5 MD |
1243 | if (ret) |
1244 | goto end; | |
1245 | } | |
1246 | ||
e58095ef | 1247 | cds_list_for_each_entry(event, &session->events_head, node) { |
7dd08bec | 1248 | ret = _lttng_event_metadata_statedump(session, event->chan, event); |
8020ceb5 MD |
1249 | if (ret) |
1250 | goto end; | |
1251 | } | |
1252 | session->metadata_dumped = 1; | |
1253 | end: | |
1254 | return ret; | |
1255 | } | |
1256 | ||
003fedf4 | 1257 | void lttng_ust_events_exit(void) |
8020ceb5 | 1258 | { |
7dd08bec | 1259 | struct lttng_session *session, *tmpsession; |
8020ceb5 | 1260 | |
e58095ef | 1261 | cds_list_for_each_entry_safe(session, tmpsession, &sessions, node) |
7dd08bec | 1262 | lttng_session_destroy(session); |
8020ceb5 | 1263 | } |
457a6b58 | 1264 | |
e58095ef MD |
1265 | /* |
1266 | * Enabler management. | |
1267 | */ | |
1268 | struct lttng_enabler *lttng_enabler_create(enum lttng_enabler_type type, | |
1269 | struct lttng_ust_event *event_param, | |
1270 | struct lttng_channel *chan) | |
457a6b58 | 1271 | { |
e58095ef MD |
1272 | struct lttng_enabler *enabler; |
1273 | ||
1274 | enabler = zmalloc(sizeof(*enabler)); | |
1275 | if (!enabler) | |
1276 | return NULL; | |
1277 | enabler->type = type; | |
1278 | CDS_INIT_LIST_HEAD(&enabler->filter_bytecode_head); | |
1279 | memcpy(&enabler->event_param, event_param, | |
1280 | sizeof(enabler->event_param)); | |
1281 | enabler->chan = chan; | |
1282 | /* ctx left NULL */ | |
1283 | enabler->enabled = 1; | |
1284 | cds_list_add(&enabler->node, &enabler->chan->session->enablers_head); | |
1285 | lttng_session_lazy_sync_enablers(enabler->chan->session); | |
1286 | return enabler; | |
457a6b58 MD |
1287 | } |
1288 | ||
e58095ef | 1289 | int lttng_enabler_enable(struct lttng_enabler *enabler) |
457a6b58 | 1290 | { |
e58095ef MD |
1291 | enabler->enabled = 1; |
1292 | lttng_session_lazy_sync_enablers(enabler->chan->session); | |
1293 | return 0; | |
457a6b58 | 1294 | } |
457a6b58 | 1295 | |
e58095ef | 1296 | int lttng_enabler_disable(struct lttng_enabler *enabler) |
457a6b58 | 1297 | { |
e58095ef MD |
1298 | if (enabler->chan == enabler->chan->session->metadata) |
1299 | return -EPERM; | |
1300 | enabler->enabled = 0; | |
1301 | lttng_session_lazy_sync_enablers(enabler->chan->session); | |
1302 | return 0; | |
1303 | } | |
457a6b58 | 1304 | |
e58095ef MD |
1305 | int lttng_enabler_attach_bytecode(struct lttng_enabler *enabler, |
1306 | struct lttng_ust_filter_bytecode_node *bytecode) | |
1307 | { | |
1308 | bytecode->enabler = enabler; | |
1309 | cds_list_add_tail(&bytecode->node, &enabler->filter_bytecode_head); | |
1310 | lttng_session_lazy_sync_enablers(enabler->chan->session); | |
1311 | return 0; | |
1312 | } | |
f488575f | 1313 | |
e58095ef MD |
1314 | int lttng_attach_context(struct lttng_ust_context *context_param, |
1315 | struct lttng_ctx **ctx, struct lttng_session *session) | |
1316 | { | |
457a6b58 | 1317 | /* |
e58095ef MD |
1318 | * We cannot attach a context after trace has been started for a |
1319 | * session because the metadata does not allow expressing this | |
1320 | * information outside of the original channel scope. | |
457a6b58 | 1321 | */ |
e58095ef MD |
1322 | if (session->been_active) |
1323 | return -EPERM; | |
457a6b58 | 1324 | |
e58095ef MD |
1325 | switch (context_param->ctx) { |
1326 | case LTTNG_UST_CONTEXT_PTHREAD_ID: | |
1327 | return lttng_add_pthread_id_to_ctx(ctx); | |
1328 | case LTTNG_UST_CONTEXT_VTID: | |
1329 | return lttng_add_vtid_to_ctx(ctx); | |
1330 | case LTTNG_UST_CONTEXT_VPID: | |
1331 | return lttng_add_vpid_to_ctx(ctx); | |
1332 | case LTTNG_UST_CONTEXT_PROCNAME: | |
1333 | return lttng_add_procname_to_ctx(ctx); | |
1334 | default: | |
1335 | return -EINVAL; | |
457a6b58 | 1336 | } |
457a6b58 MD |
1337 | } |
1338 | ||
e58095ef MD |
1339 | int lttng_enabler_attach_context(struct lttng_enabler *enabler, |
1340 | struct lttng_ust_context *context_param) | |
457a6b58 | 1341 | { |
e58095ef MD |
1342 | #if 0 // disabled for now. |
1343 | struct lttng_session *session = enabler->chan->session; | |
1344 | int ret; | |
457a6b58 | 1345 | |
e58095ef MD |
1346 | ret = lttng_attach_context(context_param, &enabler->ctx, |
1347 | session); | |
1348 | if (ret) | |
1349 | return ret; | |
1350 | lttng_session_lazy_sync_enablers(enabler->chan->session); | |
1351 | #endif | |
1352 | return -ENOSYS; | |
457a6b58 MD |
1353 | } |
1354 | ||
e58095ef MD |
1355 | static |
1356 | void lttng_enabler_destroy(struct lttng_enabler *enabler) | |
457a6b58 | 1357 | { |
e58095ef | 1358 | struct lttng_ust_filter_bytecode_node *filter_node, *tmp_filter_node; |
457a6b58 | 1359 | |
e58095ef MD |
1360 | /* Destroy filter bytecode */ |
1361 | cds_list_for_each_entry_safe(filter_node, tmp_filter_node, | |
1362 | &enabler->filter_bytecode_head, node) { | |
1363 | free(filter_node); | |
457a6b58 | 1364 | } |
e58095ef MD |
1365 | |
1366 | /* Destroy contexts */ | |
1367 | lttng_destroy_context(enabler->ctx); | |
1368 | ||
1369 | cds_list_del(&enabler->node); | |
1370 | free(enabler); | |
457a6b58 MD |
1371 | } |
1372 | ||
e58095ef MD |
1373 | /* |
1374 | * lttng_session_sync_enablers should be called just before starting a | |
1375 | * session. | |
1376 | */ | |
457a6b58 | 1377 | static |
e58095ef | 1378 | void lttng_session_sync_enablers(struct lttng_session *session) |
457a6b58 | 1379 | { |
e58095ef MD |
1380 | struct lttng_enabler *enabler; |
1381 | struct lttng_event *event; | |
457a6b58 | 1382 | |
e58095ef MD |
1383 | cds_list_for_each_entry(enabler, &session->enablers_head, node) |
1384 | lttng_enabler_ref_events(enabler); | |
1385 | /* | |
1386 | * For each event, if at least one of its enablers is enabled, | |
1387 | * we enable the event, else we disable it. | |
1388 | */ | |
1389 | cds_list_for_each_entry(event, &session->events_head, node) { | |
1390 | struct lttng_enabler_ref *enabler_ref; | |
1391 | struct lttng_bytecode_runtime *runtime; | |
dcdeaff0 | 1392 | int enabled = 0, has_enablers_without_bytecode = 0; |
e58095ef MD |
1393 | |
1394 | /* Enable events */ | |
1395 | cds_list_for_each_entry(enabler_ref, | |
1396 | &event->enablers_ref_head, node) { | |
1397 | if (enabler_ref->ref->enabled) { | |
1398 | enabled = 1; | |
1399 | break; | |
1400 | } | |
1401 | } | |
1402 | event->enabled = enabled; | |
457a6b58 | 1403 | |
1f49fc05 | 1404 | /* Check if has enablers without bytecode enabled */ |
dcdeaff0 MD |
1405 | cds_list_for_each_entry(enabler_ref, |
1406 | &event->enablers_ref_head, node) { | |
1f49fc05 MD |
1407 | if (enabler_ref->ref->enabled |
1408 | && cds_list_empty(&enabler_ref->ref->filter_bytecode_head)) { | |
dcdeaff0 MD |
1409 | has_enablers_without_bytecode = 1; |
1410 | break; | |
1411 | } | |
1412 | } | |
1413 | event->has_enablers_without_bytecode = | |
1414 | has_enablers_without_bytecode; | |
1415 | ||
e58095ef MD |
1416 | /* Enable filters */ |
1417 | cds_list_for_each_entry(runtime, | |
1418 | &event->bytecode_runtime_head, node) { | |
1419 | lttng_filter_sync_state(runtime); | |
457a6b58 MD |
1420 | } |
1421 | } | |
457a6b58 MD |
1422 | } |
1423 | ||
e58095ef MD |
1424 | /* |
1425 | * Apply enablers to session events, adding events to session if need | |
1426 | * be. It is required after each modification applied to an active | |
1427 | * session, and right before session "start". | |
1428 | * "lazy" sync means we only sync if required. | |
1429 | */ | |
1430 | static | |
1431 | void lttng_session_lazy_sync_enablers(struct lttng_session *session) | |
457a6b58 | 1432 | { |
e58095ef MD |
1433 | /* We can skip if session is not active */ |
1434 | if (!session->active) | |
1435 | return; | |
1436 | lttng_session_sync_enablers(session); | |
457a6b58 | 1437 | } |
eddd8d5d MD |
1438 | |
1439 | /* | |
1440 | * Take the TLS "fault" in libuuid if dlopen'd, which can take the | |
1441 | * dynamic linker mutex, outside of the UST lock, since the UST lock is | |
1442 | * taken in constructors, which are called with dynamic linker mutex | |
1443 | * held. | |
1444 | */ | |
1445 | void lttng_fixup_event_tls(void) | |
1446 | { | |
60c089cf | 1447 | unsigned char uuid[LTTNG_UST_UUID_STR_LEN]; |
eddd8d5d | 1448 | |
60c089cf | 1449 | (void) lttng_ust_uuid_generate(uuid); |
eddd8d5d | 1450 | } |