4 * Copyright 2010-2011 (c) - Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
8 * Mimic system calls for:
9 * - session creation, returns an object descriptor or failure.
10 * - channel creation, returns an object descriptor or failure.
11 * - Operates on a session object descriptor
12 * - Takes all channel options as parameters.
13 * - stream get, returns an object descriptor or failure.
14 * - Operates on a channel object descriptor.
15 * - stream notifier get, returns an object descriptor or failure.
16 * - Operates on a channel object descriptor.
17 * - event creation, returns an object descriptor or failure.
18 * - Operates on a channel object descriptor
19 * - Takes an event name as parameter
20 * - Takes an instrumentation source as parameter
21 * - e.g. tracepoints, dynamic_probes...
22 * - Takes instrumentation source specific arguments.
24 * Dual LGPL v2.1/GPL v2 license.
27 #include <lttng/ust-abi.h>
28 #include <urcu/compiler.h>
29 #include <urcu/list.h>
30 #include <lttng/ust-events.h>
31 #include <lttng/usterr-signal-safe.h>
32 #include "lttng/core.h"
33 #include "ltt-tracer.h"
36 int lttng_abi_tracepoint_list(void);
39 * Object descriptor table. Should be protected from concurrent access
43 struct lttng_ust_obj
{
47 const struct lttng_ust_objd_ops
*ops
;
50 int freelist_next
; /* offset freelist. end is -1. */
54 struct lttng_ust_objd_table
{
55 struct lttng_ust_obj
*array
;
56 unsigned int len
, allocated_len
;
57 int freelist_head
; /* offset freelist head. end is -1 */
60 static struct lttng_ust_objd_table objd_table
= {
65 int objd_alloc(void *private_data
, const struct lttng_ust_objd_ops
*ops
)
67 struct lttng_ust_obj
*obj
;
69 if (objd_table
.freelist_head
!= -1) {
70 obj
= &objd_table
.array
[objd_table
.freelist_head
];
71 objd_table
.freelist_head
= obj
->u
.freelist_next
;
75 if (objd_table
.len
>= objd_table
.allocated_len
) {
76 unsigned int new_allocated_len
, old_allocated_len
;
77 struct lttng_ust_obj
*new_table
, *old_table
;
79 old_allocated_len
= objd_table
.allocated_len
;
80 old_table
= objd_table
.array
;
81 if (!old_allocated_len
)
82 new_allocated_len
= 1;
84 new_allocated_len
= old_allocated_len
<< 1;
85 new_table
= zmalloc(sizeof(struct lttng_ust_obj
) * new_allocated_len
);
88 memcpy(new_table
, old_table
,
89 sizeof(struct lttng_ust_obj
) * old_allocated_len
);
91 objd_table
.array
= new_table
;
92 objd_table
.allocated_len
= new_allocated_len
;
94 obj
= &objd_table
.array
[objd_table
.len
];
97 obj
->u
.s
.private_data
= private_data
;
99 obj
->u
.s
.f_count
= 2; /* count == 1 : object is allocated */
100 /* count == 2 : allocated + hold ref */
101 return obj
- objd_table
.array
;
105 struct lttng_ust_obj
*_objd_get(int id
)
107 if (id
>= objd_table
.len
)
109 if (!objd_table
.array
[id
].u
.s
.f_count
)
111 return &objd_table
.array
[id
];
115 void *objd_private(int id
)
117 struct lttng_ust_obj
*obj
= _objd_get(id
);
119 return obj
->u
.s
.private_data
;
123 void objd_set_private(int id
, void *private_data
)
125 struct lttng_ust_obj
*obj
= _objd_get(id
);
127 obj
->u
.s
.private_data
= private_data
;
130 const struct lttng_ust_objd_ops
*objd_ops(int id
)
132 struct lttng_ust_obj
*obj
= _objd_get(id
);
140 void objd_free(int id
)
142 struct lttng_ust_obj
*obj
= _objd_get(id
);
145 obj
->u
.freelist_next
= objd_table
.freelist_head
;
146 objd_table
.freelist_head
= obj
- objd_table
.array
;
147 assert(obj
->u
.s
.f_count
== 1);
148 obj
->u
.s
.f_count
= 0; /* deallocated */
152 void objd_ref(int id
)
154 struct lttng_ust_obj
*obj
= _objd_get(id
);
158 int lttng_ust_objd_unref(int id
)
160 struct lttng_ust_obj
*obj
= _objd_get(id
);
164 if (obj
->u
.s
.f_count
== 1) {
165 ERR("Reference counting error\n");
168 if ((--obj
->u
.s
.f_count
) == 1) {
169 const struct lttng_ust_objd_ops
*ops
= objd_ops(id
);
179 void objd_table_destroy(void)
183 for (i
= 0; i
< objd_table
.allocated_len
; i
++)
184 (void) lttng_ust_objd_unref(i
);
185 free(objd_table
.array
);
186 objd_table
.array
= NULL
;
188 objd_table
.allocated_len
= 0;
189 objd_table
.freelist_head
= -1;
193 * This is LTTng's own personal way to create an ABI for sessiond.
194 * We send commands over a socket.
197 static const struct lttng_ust_objd_ops lttng_ops
;
198 static const struct lttng_ust_objd_ops lttng_session_ops
;
199 static const struct lttng_ust_objd_ops lttng_channel_ops
;
200 static const struct lttng_ust_objd_ops lttng_metadata_ops
;
201 static const struct lttng_ust_objd_ops lttng_event_ops
;
202 static const struct lttng_ust_objd_ops lib_ring_buffer_objd_ops
;
203 static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops
;
210 int lttng_abi_create_root_handle(void)
214 root_handle
= objd_alloc(NULL
, <tng_ops
);
219 int lttng_abi_create_session(void)
221 struct ltt_session
*session
;
222 int session_objd
, ret
;
224 session
= ltt_session_create();
227 session_objd
= objd_alloc(session
, <tng_session_ops
);
228 if (session_objd
< 0) {
232 session
->objd
= session_objd
;
236 ltt_session_destroy(session
);
241 long lttng_abi_tracer_version(int objd
,
242 struct lttng_ust_tracer_version
*v
)
244 v
->version
= LTTNG_UST_VERSION
;
245 v
->patchlevel
= LTTNG_UST_PATCHLEVEL
;
246 v
->sublevel
= LTTNG_UST_SUBLEVEL
;
251 long lttng_abi_add_context(int objd
,
252 struct lttng_ust_context
*context_param
,
253 struct lttng_ctx
**ctx
, struct ltt_session
*session
)
255 if (session
->been_active
)
258 switch (context_param
->ctx
) {
259 case LTTNG_UST_CONTEXT_PTHREAD_ID
:
260 return lttng_add_pthread_id_to_ctx(ctx
);
261 case LTTNG_UST_CONTEXT_VTID
:
262 return lttng_add_vtid_to_ctx(ctx
);
263 case LTTNG_UST_CONTEXT_VPID
:
264 return lttng_add_vpid_to_ctx(ctx
);
265 case LTTNG_UST_CONTEXT_PROCNAME
:
266 return lttng_add_procname_to_ctx(ctx
);
273 * lttng_cmd - lttng control through socket commands
275 * @objd: the object descriptor
279 * This descriptor implements lttng commands:
281 * Returns a LTTng trace session object descriptor
282 * LTTNG_UST_TRACER_VERSION
283 * Returns the LTTng kernel tracer version
284 * LTTNG_UST_TRACEPOINT_LIST
285 * Returns a file descriptor listing available tracepoints
286 * LTTNG_UST_WAIT_QUIESCENT
287 * Returns after all previously running probes have completed
289 * The returned session will be deleted when its file descriptor is closed.
292 long lttng_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
295 case LTTNG_UST_SESSION
:
296 return lttng_abi_create_session();
297 case LTTNG_UST_TRACER_VERSION
:
298 return lttng_abi_tracer_version(objd
,
299 (struct lttng_ust_tracer_version
*) arg
);
300 case LTTNG_UST_TRACEPOINT_LIST
:
301 return lttng_abi_tracepoint_list();
302 case LTTNG_UST_WAIT_QUIESCENT
:
310 static const struct lttng_ust_objd_ops lttng_ops
= {
315 * We tolerate no failure in this function (if one happens, we print a dmesg
316 * error, but cannot return any error, because the channel information is
320 void lttng_metadata_create_events(int channel_objd
)
322 struct ltt_channel
*channel
= objd_private(channel_objd
);
323 static struct lttng_ust_event metadata_params
= {
324 .instrumentation
= LTTNG_UST_TRACEPOINT
,
325 .name
= "lttng_metadata",
327 struct ltt_event
*event
;
331 * We tolerate no failure path after event creation. It will stay
332 * invariant for the rest of the session.
334 event
= ltt_event_create(channel
, &metadata_params
, NULL
);
343 return; /* not allowed to return error */
346 int lttng_abi_create_channel(int session_objd
,
347 struct lttng_ust_channel
*chan_param
,
348 enum channel_type channel_type
)
350 struct ltt_session
*session
= objd_private(session_objd
);
351 const struct lttng_ust_objd_ops
*ops
;
352 const char *transport_name
;
353 struct ltt_channel
*chan
;
356 struct ltt_channel chan_priv_init
;
358 chan_objd
= objd_alloc(NULL
, <tng_channel_ops
);
363 switch (channel_type
) {
364 case PER_CPU_CHANNEL
:
365 if (chan_param
->output
== LTTNG_UST_MMAP
) {
366 transport_name
= chan_param
->overwrite
?
367 "relay-overwrite-mmap" : "relay-discard-mmap";
371 ops
= <tng_channel_ops
;
373 case METADATA_CHANNEL
:
374 if (chan_param
->output
== LTTNG_UST_MMAP
)
375 transport_name
= "relay-metadata-mmap";
378 ops
= <tng_metadata_ops
;
381 transport_name
= "<unknown>";
384 memset(&chan_priv_init
, 0, sizeof(chan_priv_init
));
385 /* Copy of session UUID for consumer (availability through shm) */
386 memcpy(chan_priv_init
.uuid
, session
->uuid
, sizeof(session
->uuid
));
389 * We tolerate no failure path after channel creation. It will stay
390 * invariant for the rest of the session.
392 chan
= ltt_channel_create(session
, transport_name
, NULL
,
393 chan_param
->subbuf_size
,
394 chan_param
->num_subbuf
,
395 chan_param
->switch_timer_interval
,
396 chan_param
->read_timer_interval
,
398 &chan_param
->wait_fd
,
399 &chan_param
->memory_map_size
,
405 objd_set_private(chan_objd
, chan
);
406 chan
->objd
= chan_objd
;
407 if (channel_type
== METADATA_CHANNEL
) {
408 session
->metadata
= chan
;
409 lttng_metadata_create_events(chan_objd
);
411 /* The channel created holds a reference on the session */
412 objd_ref(session_objd
);
420 err
= lttng_ust_objd_unref(chan_objd
);
428 * lttng_session_cmd - lttng session object command
434 * This descriptor implements lttng commands:
436 * Returns a LTTng channel object descriptor
438 * Enables tracing for a session (weak enable)
440 * Disables tracing for a session (strong disable)
442 * Returns a LTTng metadata object descriptor
444 * The returned channel will be deleted when its file descriptor is closed.
447 long lttng_session_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
449 struct ltt_session
*session
= objd_private(objd
);
452 case LTTNG_UST_CHANNEL
:
453 return lttng_abi_create_channel(objd
,
454 (struct lttng_ust_channel
*) arg
,
456 case LTTNG_UST_SESSION_START
:
457 case LTTNG_UST_ENABLE
:
458 return ltt_session_enable(session
);
459 case LTTNG_UST_SESSION_STOP
:
460 case LTTNG_UST_DISABLE
:
461 return ltt_session_disable(session
);
462 case LTTNG_UST_METADATA
:
463 return lttng_abi_create_channel(objd
,
464 (struct lttng_ust_channel
*) arg
,
472 * Called when the last file reference is dropped.
474 * Big fat note: channels and events are invariant for the whole session after
475 * their creation. So this session destruction also destroys all channel and
476 * event structures specific to this session (they are not destroyed when their
477 * individual file is released).
480 int lttng_release_session(int objd
)
482 struct ltt_session
*session
= objd_private(objd
);
485 ltt_session_destroy(session
);
492 static const struct lttng_ust_objd_ops lttng_session_ops
= {
493 .release
= lttng_release_session
,
494 .cmd
= lttng_session_cmd
,
498 * beware: we don't keep the mutex over the send, but we must walk the
499 * whole list each time we are called again. So sending one tracepoint
500 * at a time means this is O(n^2). TODO: do as in the kernel and send
501 * multiple tracepoints for each call to amortize this cost.
504 void ltt_tracepoint_list_get(struct ltt_tracepoint_list
*list
,
507 if (!list
->got_first
) {
508 tracepoint_iter_start(&list
->iter
);
512 tracepoint_iter_next(&list
->iter
);
514 if (!list
->iter
.tracepoint
) {
515 tp_list_entry
[0] = '\0'; /* end of list */
517 memcpy(tp_list_entry
, (*list
->iter
.tracepoint
)->name
,
518 LTTNG_UST_SYM_NAME_LEN
);
523 long lttng_tracepoint_list_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
525 struct ltt_tracepoint_list
*list
= objd_private(objd
);
526 char *str
= (char *) arg
;
529 case LTTNG_UST_TRACEPOINT_LIST_GET
:
530 ltt_tracepoint_list_get(list
, str
);
540 int lttng_abi_tracepoint_list(void)
543 struct ltt_tracepoint_list
*list
;
545 list_objd
= objd_alloc(NULL
, <tng_tracepoint_list_ops
);
550 list
= zmalloc(sizeof(*list
));
555 objd_set_private(list_objd
, list
);
563 err
= lttng_ust_objd_unref(list_objd
);
571 int lttng_release_tracepoint_list(int objd
)
573 struct ltt_tracepoint_list
*list
= objd_private(objd
);
576 tracepoint_iter_stop(&list
->iter
);
584 static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops
= {
585 .release
= lttng_release_tracepoint_list
,
586 .cmd
= lttng_tracepoint_list_cmd
,
589 struct stream_priv_data
{
590 struct lttng_ust_lib_ring_buffer
*buf
;
591 struct ltt_channel
*ltt_chan
;
595 int lttng_abi_open_stream(int channel_objd
, struct lttng_ust_stream
*info
)
597 struct ltt_channel
*channel
= objd_private(channel_objd
);
598 struct lttng_ust_lib_ring_buffer
*buf
;
599 struct stream_priv_data
*priv
;
600 int stream_objd
, ret
;
602 buf
= channel
->ops
->buffer_read_open(channel
->chan
, channel
->handle
,
603 &info
->shm_fd
, &info
->wait_fd
, &info
->memory_map_size
);
607 priv
= zmalloc(sizeof(*priv
));
613 priv
->ltt_chan
= channel
;
614 stream_objd
= objd_alloc(priv
, &lib_ring_buffer_objd_ops
);
615 if (stream_objd
< 0) {
619 /* Hold a reference on the channel object descriptor */
620 objd_ref(channel_objd
);
626 channel
->ops
->buffer_read_close(buf
, channel
->handle
);
631 int lttng_abi_create_event(int channel_objd
,
632 struct lttng_ust_event
*event_param
)
634 struct ltt_channel
*channel
= objd_private(channel_objd
);
635 struct ltt_event
*event
;
638 event_param
->name
[LTTNG_UST_SYM_NAME_LEN
- 1] = '\0';
639 event_objd
= objd_alloc(NULL
, <tng_event_ops
);
640 if (event_objd
< 0) {
645 * We tolerate no failure path after event creation. It will stay
646 * invariant for the rest of the session.
648 event
= ltt_event_create(channel
, event_param
, NULL
);
653 objd_set_private(event_objd
, event
);
654 /* The event holds a reference on the channel */
655 objd_ref(channel_objd
);
662 err
= lttng_ust_objd_unref(event_objd
);
670 * lttng_channel_cmd - lttng control through object descriptors
672 * @objd: the object descriptor
676 * This object descriptor implements lttng commands:
678 * Returns an event stream object descriptor or failure.
679 * (typically, one event stream records events from one CPU)
681 * Returns an event object descriptor or failure.
683 * Prepend a context field to each event in the channel
685 * Enable recording for events in this channel (weak enable)
687 * Disable recording for events in this channel (strong disable)
689 * Channel and event file descriptors also hold a reference on the session.
692 long lttng_channel_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
694 struct ltt_channel
*channel
= objd_private(objd
);
697 case LTTNG_UST_STREAM
:
699 struct lttng_ust_stream
*stream
;
701 stream
= (struct lttng_ust_stream
*) arg
;
702 /* stream used as output */
703 return lttng_abi_open_stream(objd
, stream
);
705 case LTTNG_UST_EVENT
:
706 return lttng_abi_create_event(objd
, (struct lttng_ust_event
*) arg
);
707 case LTTNG_UST_CONTEXT
:
708 return lttng_abi_add_context(objd
,
709 (struct lttng_ust_context
*) arg
,
710 &channel
->ctx
, channel
->session
);
711 case LTTNG_UST_ENABLE
:
712 return ltt_channel_enable(channel
);
713 case LTTNG_UST_DISABLE
:
714 return ltt_channel_disable(channel
);
715 case LTTNG_UST_FLUSH_BUFFER
:
716 return channel
->ops
->flush_buffer(channel
->chan
, channel
->handle
);
723 * lttng_metadata_cmd - lttng control through object descriptors
725 * @objd: the object descriptor
729 * This object descriptor implements lttng commands:
731 * Returns an event stream file descriptor or failure.
733 * Channel and event file descriptors also hold a reference on the session.
736 long lttng_metadata_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
738 struct ltt_channel
*channel
= objd_private(objd
);
741 case LTTNG_UST_STREAM
:
743 struct lttng_ust_stream
*stream
;
745 stream
= (struct lttng_ust_stream
*) arg
;
746 /* stream used as output */
747 return lttng_abi_open_stream(objd
, stream
);
749 case LTTNG_UST_FLUSH_BUFFER
:
750 return channel
->ops
->flush_buffer(channel
->chan
, channel
->handle
);
758 * lttng_channel_poll - lttng stream addition/removal monitoring
763 unsigned int lttng_channel_poll(struct file
*file
, poll_table
*wait
)
765 struct ltt_channel
*channel
= file
->private_data
;
766 unsigned int mask
= 0;
768 if (file
->f_mode
& FMODE_READ
) {
769 poll_wait_set_exclusive(wait
);
770 poll_wait(file
, channel
->ops
->get_hp_wait_queue(channel
->chan
),
773 if (channel
->ops
->is_disabled(channel
->chan
))
775 if (channel
->ops
->is_finalized(channel
->chan
))
777 if (channel
->ops
->buffer_has_read_closed_stream(channel
->chan
))
778 return POLLIN
| POLLRDNORM
;
787 int lttng_channel_release(int objd
)
789 struct ltt_channel
*channel
= objd_private(objd
);
792 return lttng_ust_objd_unref(channel
->session
->objd
);
796 static const struct lttng_ust_objd_ops lttng_channel_ops
= {
797 .release
= lttng_channel_release
,
798 //.poll = lttng_channel_poll,
799 .cmd
= lttng_channel_cmd
,
802 static const struct lttng_ust_objd_ops lttng_metadata_ops
= {
803 .release
= lttng_channel_release
,
804 .cmd
= lttng_metadata_cmd
,
808 * lttng_rb_cmd - lttng ring buffer control through object descriptors
810 * @objd: the object descriptor
814 * This object descriptor implements lttng commands:
815 * (None for now. Access is done directly though shm.)
818 long lttng_rb_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
827 int lttng_rb_release(int objd
)
829 struct stream_priv_data
*priv
= objd_private(objd
);
830 struct lttng_ust_lib_ring_buffer
*buf
;
831 struct ltt_channel
*channel
;
835 channel
= priv
->ltt_chan
;
837 channel
->ops
->buffer_read_close(buf
, channel
->handle
);
839 return lttng_ust_objd_unref(channel
->objd
);
844 static const struct lttng_ust_objd_ops lib_ring_buffer_objd_ops
= {
845 .release
= lttng_rb_release
,
850 * lttng_event_cmd - lttng control through object descriptors
852 * @objd: the object descriptor
856 * This object descriptor implements lttng commands:
858 * Prepend a context field to each record of this event
860 * Enable recording for this event (weak enable)
862 * Disable recording for this event (strong disable)
865 long lttng_event_cmd(int objd
, unsigned int cmd
, unsigned long arg
)
867 struct ltt_event
*event
= objd_private(objd
);
870 case LTTNG_UST_CONTEXT
:
871 return lttng_abi_add_context(objd
,
872 (struct lttng_ust_context
*) arg
,
873 &event
->ctx
, event
->chan
->session
);
874 case LTTNG_UST_ENABLE
:
875 return ltt_event_enable(event
);
876 case LTTNG_UST_DISABLE
:
877 return ltt_event_disable(event
);
884 int lttng_event_release(int objd
)
886 struct ltt_event
*event
= objd_private(objd
);
889 return lttng_ust_objd_unref(event
->chan
->objd
);
893 /* TODO: filter control ioctl */
894 static const struct lttng_ust_objd_ops lttng_event_ops
= {
895 .release
= lttng_event_release
,
896 .cmd
= lttng_event_cmd
,
899 void lttng_ust_abi_exit(void)
901 objd_table_destroy();