ABI refactoring: sequence and array of text: copy input as string
[lttng-ust.git] / liblttng-ust / lttng-ust-abi.c
1 /*
2 * SPDX-License-Identifier: LGPL-2.1-only
3 *
4 * Copyright (C) 2010-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
5 *
6 * LTTng UST ABI
7 *
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.
23 */
24
25 #define _LGPL_SOURCE
26 #include <fcntl.h>
27 #include <stdint.h>
28 #include <unistd.h>
29
30 #include <urcu/compiler.h>
31 #include <urcu/list.h>
32
33 #include <lttng/tracepoint.h>
34 #include <lttng/ust-abi.h>
35 #include <lttng/ust-error.h>
36 #include <lttng/ust-events.h>
37 #include <lttng/ust-version.h>
38 #include <ust-fd.h>
39 #include <usterr-signal-safe.h>
40
41 #include "../libringbuffer/frontend_types.h"
42 #include "../libringbuffer/shm.h"
43 #include "../libcounter/counter.h"
44 #include "tracepoint-internal.h"
45 #include "lttng-tracer.h"
46 #include "string-utils.h"
47 #include "ust-events-internal.h"
48 #include "context-internal.h"
49 #include "ust-helper.h"
50
51 #define OBJ_NAME_LEN 16
52
53 static int lttng_ust_abi_close_in_progress;
54
55 static
56 int lttng_abi_tracepoint_list(void *owner);
57 static
58 int lttng_abi_tracepoint_field_list(void *owner);
59
60 /*
61 * Object descriptor table. Should be protected from concurrent access
62 * by the caller.
63 */
64
65 struct lttng_ust_abi_obj {
66 union {
67 struct {
68 void *private_data;
69 const struct lttng_ust_abi_objd_ops *ops;
70 int f_count;
71 int owner_ref; /* has ref from owner */
72 void *owner;
73 char name[OBJ_NAME_LEN];
74 } s;
75 int freelist_next; /* offset freelist. end is -1. */
76 } u;
77 };
78
79 struct lttng_ust_abi_objd_table {
80 struct lttng_ust_abi_obj *array;
81 unsigned int len, allocated_len;
82 int freelist_head; /* offset freelist head. end is -1 */
83 };
84
85 static struct lttng_ust_abi_objd_table objd_table = {
86 .freelist_head = -1,
87 };
88
89 static
90 int objd_alloc(void *private_data, const struct lttng_ust_abi_objd_ops *ops,
91 void *owner, const char *name)
92 {
93 struct lttng_ust_abi_obj *obj;
94
95 if (objd_table.freelist_head != -1) {
96 obj = &objd_table.array[objd_table.freelist_head];
97 objd_table.freelist_head = obj->u.freelist_next;
98 goto end;
99 }
100
101 if (objd_table.len >= objd_table.allocated_len) {
102 unsigned int new_allocated_len, old_allocated_len;
103 struct lttng_ust_abi_obj *new_table, *old_table;
104
105 old_allocated_len = objd_table.allocated_len;
106 old_table = objd_table.array;
107 if (!old_allocated_len)
108 new_allocated_len = 1;
109 else
110 new_allocated_len = old_allocated_len << 1;
111 new_table = zmalloc(sizeof(struct lttng_ust_abi_obj) * new_allocated_len);
112 if (!new_table)
113 return -ENOMEM;
114 memcpy(new_table, old_table,
115 sizeof(struct lttng_ust_abi_obj) * old_allocated_len);
116 free(old_table);
117 objd_table.array = new_table;
118 objd_table.allocated_len = new_allocated_len;
119 }
120 obj = &objd_table.array[objd_table.len];
121 objd_table.len++;
122 end:
123 obj->u.s.private_data = private_data;
124 obj->u.s.ops = ops;
125 obj->u.s.f_count = 2; /* count == 1 : object is allocated */
126 /* count == 2 : allocated + hold ref */
127 obj->u.s.owner_ref = 1; /* One owner reference */
128 obj->u.s.owner = owner;
129 strncpy(obj->u.s.name, name, OBJ_NAME_LEN);
130 obj->u.s.name[OBJ_NAME_LEN - 1] = '\0';
131 return obj - objd_table.array;
132 }
133
134 static
135 struct lttng_ust_abi_obj *_objd_get(int id)
136 {
137 if (id >= objd_table.len)
138 return NULL;
139 if (!objd_table.array[id].u.s.f_count)
140 return NULL;
141 return &objd_table.array[id];
142 }
143
144 static
145 void *objd_private(int id)
146 {
147 struct lttng_ust_abi_obj *obj = _objd_get(id);
148 assert(obj);
149 return obj->u.s.private_data;
150 }
151
152 static
153 void objd_set_private(int id, void *private_data)
154 {
155 struct lttng_ust_abi_obj *obj = _objd_get(id);
156 assert(obj);
157 obj->u.s.private_data = private_data;
158 }
159
160 const struct lttng_ust_abi_objd_ops *lttng_ust_abi_objd_ops(int id)
161 {
162 struct lttng_ust_abi_obj *obj = _objd_get(id);
163
164 if (!obj)
165 return NULL;
166 return obj->u.s.ops;
167 }
168
169 static
170 void objd_free(int id)
171 {
172 struct lttng_ust_abi_obj *obj = _objd_get(id);
173
174 assert(obj);
175 obj->u.freelist_next = objd_table.freelist_head;
176 objd_table.freelist_head = obj - objd_table.array;
177 assert(obj->u.s.f_count == 1);
178 obj->u.s.f_count = 0; /* deallocated */
179 }
180
181 static
182 void objd_ref(int id)
183 {
184 struct lttng_ust_abi_obj *obj = _objd_get(id);
185 assert(obj != NULL);
186 obj->u.s.f_count++;
187 }
188
189 int lttng_ust_abi_objd_unref(int id, int is_owner)
190 {
191 struct lttng_ust_abi_obj *obj = _objd_get(id);
192
193 if (!obj)
194 return -EINVAL;
195 if (obj->u.s.f_count == 1) {
196 ERR("Reference counting error\n");
197 return -EINVAL;
198 }
199 if (is_owner) {
200 if (!obj->u.s.owner_ref) {
201 ERR("Error decrementing owner reference");
202 return -EINVAL;
203 }
204 obj->u.s.owner_ref--;
205 }
206 if ((--obj->u.s.f_count) == 1) {
207 const struct lttng_ust_abi_objd_ops *ops = lttng_ust_abi_objd_ops(id);
208
209 if (ops->release)
210 ops->release(id);
211 objd_free(id);
212 }
213 return 0;
214 }
215
216 static
217 void objd_table_destroy(void)
218 {
219 int i;
220
221 for (i = 0; i < objd_table.allocated_len; i++) {
222 struct lttng_ust_abi_obj *obj;
223
224 obj = _objd_get(i);
225 if (!obj)
226 continue;
227 if (!obj->u.s.owner_ref)
228 continue; /* only unref owner ref. */
229 (void) lttng_ust_abi_objd_unref(i, 1);
230 }
231 free(objd_table.array);
232 objd_table.array = NULL;
233 objd_table.len = 0;
234 objd_table.allocated_len = 0;
235 objd_table.freelist_head = -1;
236 }
237
238 const char *lttng_ust_obj_get_name(int id)
239 {
240 struct lttng_ust_abi_obj *obj = _objd_get(id);
241
242 if (!obj)
243 return NULL;
244 return obj->u.s.name;
245 }
246
247 void lttng_ust_abi_objd_table_owner_cleanup(void *owner)
248 {
249 int i;
250
251 for (i = 0; i < objd_table.allocated_len; i++) {
252 struct lttng_ust_abi_obj *obj;
253
254 obj = _objd_get(i);
255 if (!obj)
256 continue;
257 if (!obj->u.s.owner)
258 continue; /* skip root handles */
259 if (!obj->u.s.owner_ref)
260 continue; /* only unref owner ref. */
261 if (obj->u.s.owner == owner)
262 (void) lttng_ust_abi_objd_unref(i, 1);
263 }
264 }
265
266 /*
267 * This is LTTng's own personal way to create an ABI for sessiond.
268 * We send commands over a socket.
269 */
270
271 static const struct lttng_ust_abi_objd_ops lttng_ops;
272 static const struct lttng_ust_abi_objd_ops lttng_event_notifier_group_ops;
273 static const struct lttng_ust_abi_objd_ops lttng_session_ops;
274 static const struct lttng_ust_abi_objd_ops lttng_channel_ops;
275 static const struct lttng_ust_abi_objd_ops lttng_event_enabler_ops;
276 static const struct lttng_ust_abi_objd_ops lttng_event_notifier_enabler_ops;
277 static const struct lttng_ust_abi_objd_ops lttng_tracepoint_list_ops;
278 static const struct lttng_ust_abi_objd_ops lttng_tracepoint_field_list_ops;
279
280 int lttng_abi_create_root_handle(void)
281 {
282 int root_handle;
283
284 /* root handles have NULL owners */
285 root_handle = objd_alloc(NULL, &lttng_ops, NULL, "root");
286 return root_handle;
287 }
288
289 static
290 int lttng_is_channel_ready(struct lttng_ust_channel_buffer *lttng_chan)
291 {
292 struct lttng_ust_lib_ring_buffer_channel *chan;
293 unsigned int nr_streams, exp_streams;
294
295 chan = lttng_chan->chan;
296 nr_streams = channel_handle_get_nr_streams(lttng_chan->handle);
297 exp_streams = chan->nr_streams;
298 return nr_streams == exp_streams;
299 }
300
301 static
302 int lttng_abi_create_session(void *owner)
303 {
304 struct lttng_ust_session *session;
305 int session_objd, ret;
306
307 session = lttng_session_create();
308 if (!session)
309 return -ENOMEM;
310 session_objd = objd_alloc(session, &lttng_session_ops, owner, "session");
311 if (session_objd < 0) {
312 ret = session_objd;
313 goto objd_error;
314 }
315 session->priv->objd = session_objd;
316 session->priv->owner = owner;
317 return session_objd;
318
319 objd_error:
320 lttng_session_destroy(session);
321 return ret;
322 }
323
324 static
325 long lttng_abi_tracer_version(int objd,
326 struct lttng_ust_abi_tracer_version *v)
327 {
328 v->major = LTTNG_UST_MAJOR_VERSION;
329 v->minor = LTTNG_UST_MINOR_VERSION;
330 v->patchlevel = LTTNG_UST_PATCHLEVEL_VERSION;
331 return 0;
332 }
333
334 static
335 int lttng_abi_event_notifier_send_fd(void *owner, int *event_notifier_notif_fd)
336 {
337 struct lttng_event_notifier_group *event_notifier_group;
338 int event_notifier_group_objd, ret, fd_flag;
339
340 event_notifier_group = lttng_event_notifier_group_create();
341 if (!event_notifier_group)
342 return -ENOMEM;
343
344 /*
345 * Set this file descriptor as NON-BLOCKING.
346 */
347 fd_flag = fcntl(*event_notifier_notif_fd, F_GETFL);
348
349 fd_flag |= O_NONBLOCK;
350
351 ret = fcntl(*event_notifier_notif_fd, F_SETFL, fd_flag);
352 if (ret) {
353 ret = -errno;
354 goto fd_error;
355 }
356
357 event_notifier_group_objd = objd_alloc(event_notifier_group,
358 &lttng_event_notifier_group_ops, owner, "event_notifier_group");
359 if (event_notifier_group_objd < 0) {
360 ret = event_notifier_group_objd;
361 goto objd_error;
362 }
363
364 event_notifier_group->objd = event_notifier_group_objd;
365 event_notifier_group->owner = owner;
366 event_notifier_group->notification_fd = *event_notifier_notif_fd;
367 /* Object descriptor takes ownership of notification fd. */
368 *event_notifier_notif_fd = -1;
369
370 return event_notifier_group_objd;
371
372 objd_error:
373 lttng_event_notifier_group_destroy(event_notifier_group);
374 fd_error:
375 return ret;
376 }
377
378 static
379 long lttng_abi_add_context(int objd,
380 struct lttng_ust_abi_context *context_param,
381 union lttng_ust_abi_args *uargs,
382 struct lttng_ust_ctx **ctx, struct lttng_ust_session *session)
383 {
384 return lttng_attach_context(context_param, uargs, ctx, session);
385 }
386
387 /**
388 * lttng_cmd - lttng control through socket commands
389 *
390 * @objd: the object descriptor
391 * @cmd: the command
392 * @arg: command arg
393 * @uargs: UST arguments (internal)
394 * @owner: objd owner
395 *
396 * This descriptor implements lttng commands:
397 * LTTNG_UST_ABI_SESSION
398 * Returns a LTTng trace session object descriptor
399 * LTTNG_UST_ABI_TRACER_VERSION
400 * Returns the LTTng kernel tracer version
401 * LTTNG_UST_ABI_TRACEPOINT_LIST
402 * Returns a file descriptor listing available tracepoints
403 * LTTNG_UST_ABI_TRACEPOINT_FIELD_LIST
404 * Returns a file descriptor listing available tracepoint fields
405 * LTTNG_UST_ABI_WAIT_QUIESCENT
406 * Returns after all previously running probes have completed
407 *
408 * The returned session will be deleted when its file descriptor is closed.
409 */
410 static
411 long lttng_cmd(int objd, unsigned int cmd, unsigned long arg,
412 union lttng_ust_abi_args *uargs, void *owner)
413 {
414 switch (cmd) {
415 case LTTNG_UST_ABI_SESSION:
416 return lttng_abi_create_session(owner);
417 case LTTNG_UST_ABI_TRACER_VERSION:
418 return lttng_abi_tracer_version(objd,
419 (struct lttng_ust_abi_tracer_version *) arg);
420 case LTTNG_UST_ABI_TRACEPOINT_LIST:
421 return lttng_abi_tracepoint_list(owner);
422 case LTTNG_UST_ABI_TRACEPOINT_FIELD_LIST:
423 return lttng_abi_tracepoint_field_list(owner);
424 case LTTNG_UST_ABI_WAIT_QUIESCENT:
425 lttng_ust_urcu_synchronize_rcu();
426 return 0;
427 case LTTNG_UST_ABI_EVENT_NOTIFIER_GROUP_CREATE:
428 return lttng_abi_event_notifier_send_fd(owner,
429 &uargs->event_notifier_handle.event_notifier_notif_fd);
430 default:
431 return -EINVAL;
432 }
433 }
434
435 static const struct lttng_ust_abi_objd_ops lttng_ops = {
436 .cmd = lttng_cmd,
437 };
438
439 static
440 int lttng_abi_map_channel(int session_objd,
441 struct lttng_ust_abi_channel *ust_chan,
442 union lttng_ust_abi_args *uargs,
443 void *owner)
444 {
445 struct lttng_ust_session *session = objd_private(session_objd);
446 const char *transport_name;
447 struct lttng_transport *transport;
448 const char *chan_name;
449 int chan_objd;
450 struct lttng_ust_shm_handle *channel_handle;
451 struct lttng_ust_abi_channel_config *lttng_chan_config;
452 struct lttng_ust_channel_buffer *lttng_chan_buf;
453 struct lttng_ust_lib_ring_buffer_channel *chan;
454 struct lttng_ust_lib_ring_buffer_config *config;
455 void *chan_data;
456 int wakeup_fd;
457 uint64_t len;
458 int ret;
459 enum lttng_ust_abi_chan_type type;
460
461 chan_data = uargs->channel.chan_data;
462 wakeup_fd = uargs->channel.wakeup_fd;
463 len = ust_chan->len;
464 type = ust_chan->type;
465
466 switch (type) {
467 case LTTNG_UST_ABI_CHAN_PER_CPU:
468 break;
469 default:
470 ret = -EINVAL;
471 goto invalid;
472 }
473
474 if (session->priv->been_active) {
475 ret = -EBUSY;
476 goto active; /* Refuse to add channel to active session */
477 }
478
479 lttng_chan_buf = lttng_ust_alloc_channel_buffer();
480 if (!lttng_chan_buf) {
481 ret = -ENOMEM;
482 goto lttng_chan_buf_error;
483 }
484
485 channel_handle = channel_handle_create(chan_data, len, wakeup_fd);
486 if (!channel_handle) {
487 ret = -EINVAL;
488 goto handle_error;
489 }
490
491 /* Ownership of chan_data and wakeup_fd taken by channel handle. */
492 uargs->channel.chan_data = NULL;
493 uargs->channel.wakeup_fd = -1;
494
495 chan = shmp(channel_handle, channel_handle->chan);
496 assert(chan);
497 chan->handle = channel_handle;
498 config = &chan->backend.config;
499 lttng_chan_config = channel_get_private_config(chan);
500 if (!lttng_chan_config) {
501 ret = -EINVAL;
502 goto alloc_error;
503 }
504
505 if (lttng_ust_session_uuid_validate(session, lttng_chan_config->uuid)) {
506 ret = -EINVAL;
507 goto uuid_error;
508 }
509
510 /* Lookup transport name */
511 switch (type) {
512 case LTTNG_UST_ABI_CHAN_PER_CPU:
513 if (config->output == RING_BUFFER_MMAP) {
514 if (config->mode == RING_BUFFER_OVERWRITE) {
515 if (config->wakeup == RING_BUFFER_WAKEUP_BY_WRITER) {
516 transport_name = "relay-overwrite-mmap";
517 } else {
518 transport_name = "relay-overwrite-rt-mmap";
519 }
520 } else {
521 if (config->wakeup == RING_BUFFER_WAKEUP_BY_WRITER) {
522 transport_name = "relay-discard-mmap";
523 } else {
524 transport_name = "relay-discard-rt-mmap";
525 }
526 }
527 } else {
528 ret = -EINVAL;
529 goto notransport;
530 }
531 chan_name = "channel";
532 break;
533 default:
534 ret = -EINVAL;
535 goto notransport;
536 }
537 transport = lttng_ust_transport_find(transport_name);
538 if (!transport) {
539 DBG("LTTng transport %s not found\n",
540 transport_name);
541 ret = -EINVAL;
542 goto notransport;
543 }
544
545 chan_objd = objd_alloc(NULL, &lttng_channel_ops, owner, chan_name);
546 if (chan_objd < 0) {
547 ret = chan_objd;
548 goto objd_error;
549 }
550
551 /* Initialize our lttng chan */
552 lttng_chan_buf->parent->enabled = 1;
553 lttng_chan_buf->parent->session = session;
554
555 lttng_chan_buf->priv->parent.tstate = 1;
556 lttng_chan_buf->priv->ctx = NULL;
557
558 lttng_chan_buf->ops = &transport->ops;
559 lttng_chan_buf->chan = chan;
560 lttng_chan_buf->handle = channel_handle;
561
562 memcpy(&chan->backend.config,
563 transport->client_config,
564 sizeof(chan->backend.config));
565 cds_list_add(&lttng_chan_buf->priv->node, &session->priv->chan_head);
566 lttng_chan_buf->priv->header_type = 0;
567 lttng_chan_buf->priv->type = type;
568 /* Copy fields from lttng ust chan config. */
569 lttng_chan_buf->priv->id = lttng_chan_config->id;
570 memcpy(lttng_chan_buf->priv->uuid, lttng_chan_config->uuid, LTTNG_UST_UUID_LEN);
571 channel_set_private(chan, lttng_chan_buf);
572
573 /*
574 * We tolerate no failure path after channel creation. It will stay
575 * invariant for the rest of the session.
576 */
577 objd_set_private(chan_objd, lttng_chan_buf);
578 lttng_chan_buf->priv->parent.objd = chan_objd;
579 /* The channel created holds a reference on the session */
580 objd_ref(session_objd);
581 return chan_objd;
582
583 /* error path after channel was created */
584 objd_error:
585 notransport:
586 uuid_error:
587 alloc_error:
588 channel_destroy(chan, channel_handle, 0);
589 lttng_ust_free_channel_common(lttng_chan_buf->parent);
590 return ret;
591
592 handle_error:
593 lttng_ust_free_channel_common(lttng_chan_buf->parent);
594 lttng_chan_buf_error:
595 active:
596 invalid:
597 return ret;
598 }
599
600 /**
601 * lttng_session_cmd - lttng session object command
602 *
603 * @obj: the object
604 * @cmd: the command
605 * @arg: command arg
606 * @uargs: UST arguments (internal)
607 * @owner: objd owner
608 *
609 * This descriptor implements lttng commands:
610 * LTTNG_UST_ABI_CHANNEL
611 * Returns a LTTng channel object descriptor
612 * LTTNG_UST_ABI_ENABLE
613 * Enables tracing for a session (weak enable)
614 * LTTNG_UST_ABI_DISABLE
615 * Disables tracing for a session (strong disable)
616 *
617 * The returned channel will be deleted when its file descriptor is closed.
618 */
619 static
620 long lttng_session_cmd(int objd, unsigned int cmd, unsigned long arg,
621 union lttng_ust_abi_args *uargs, void *owner)
622 {
623 struct lttng_ust_session *session = objd_private(objd);
624
625 switch (cmd) {
626 case LTTNG_UST_ABI_CHANNEL:
627 return lttng_abi_map_channel(objd,
628 (struct lttng_ust_abi_channel *) arg,
629 uargs, owner);
630 case LTTNG_UST_ABI_SESSION_START:
631 case LTTNG_UST_ABI_ENABLE:
632 return lttng_session_enable(session);
633 case LTTNG_UST_ABI_SESSION_STOP:
634 case LTTNG_UST_ABI_DISABLE:
635 return lttng_session_disable(session);
636 case LTTNG_UST_ABI_SESSION_STATEDUMP:
637 return lttng_session_statedump(session);
638 case LTTNG_UST_ABI_COUNTER:
639 case LTTNG_UST_ABI_COUNTER_GLOBAL:
640 case LTTNG_UST_ABI_COUNTER_CPU:
641 /* Not implemented yet. */
642 return -EINVAL;
643 default:
644 return -EINVAL;
645 }
646 }
647
648 /*
649 * Called when the last file reference is dropped.
650 *
651 * Big fat note: channels and events are invariant for the whole session after
652 * their creation. So this session destruction also destroys all channel and
653 * event structures specific to this session (they are not destroyed when their
654 * individual file is released).
655 */
656 static
657 int lttng_release_session(int objd)
658 {
659 struct lttng_ust_session *session = objd_private(objd);
660
661 if (session) {
662 lttng_session_destroy(session);
663 return 0;
664 } else {
665 return -EINVAL;
666 }
667 }
668
669 static const struct lttng_ust_abi_objd_ops lttng_session_ops = {
670 .release = lttng_release_session,
671 .cmd = lttng_session_cmd,
672 };
673
674 static int lttng_ust_event_notifier_enabler_create(int event_notifier_group_obj,
675 void *owner, struct lttng_ust_abi_event_notifier *event_notifier_param,
676 enum lttng_enabler_format_type type)
677 {
678 struct lttng_event_notifier_group *event_notifier_group =
679 objd_private(event_notifier_group_obj);
680 struct lttng_event_notifier_enabler *event_notifier_enabler;
681 int event_notifier_objd, ret;
682
683 event_notifier_param->event.name[LTTNG_UST_ABI_SYM_NAME_LEN - 1] = '\0';
684 event_notifier_objd = objd_alloc(NULL, &lttng_event_notifier_enabler_ops, owner,
685 "event_notifier enabler");
686 if (event_notifier_objd < 0) {
687 ret = event_notifier_objd;
688 goto objd_error;
689 }
690
691 event_notifier_enabler = lttng_event_notifier_enabler_create(
692 event_notifier_group, type, event_notifier_param);
693 if (!event_notifier_enabler) {
694 ret = -ENOMEM;
695 goto event_notifier_error;
696 }
697
698 objd_set_private(event_notifier_objd, event_notifier_enabler);
699 /* The event_notifier holds a reference on the event_notifier group. */
700 objd_ref(event_notifier_enabler->group->objd);
701
702 return event_notifier_objd;
703
704 event_notifier_error:
705 {
706 int err;
707
708 err = lttng_ust_abi_objd_unref(event_notifier_objd, 1);
709 assert(!err);
710 }
711 objd_error:
712 return ret;
713 }
714
715 static
716 long lttng_event_notifier_enabler_cmd(int objd, unsigned int cmd, unsigned long arg,
717 union lttng_ust_abi_args *uargs, void *owner)
718 {
719 struct lttng_event_notifier_enabler *event_notifier_enabler = objd_private(objd);
720 switch (cmd) {
721 case LTTNG_UST_ABI_FILTER:
722 return lttng_event_notifier_enabler_attach_filter_bytecode(
723 event_notifier_enabler,
724 (struct lttng_ust_bytecode_node **) arg);
725 case LTTNG_UST_ABI_EXCLUSION:
726 return lttng_event_notifier_enabler_attach_exclusion(event_notifier_enabler,
727 (struct lttng_ust_excluder_node **) arg);
728 case LTTNG_UST_ABI_CAPTURE:
729 return lttng_event_notifier_enabler_attach_capture_bytecode(
730 event_notifier_enabler,
731 (struct lttng_ust_bytecode_node **) arg);
732 case LTTNG_UST_ABI_ENABLE:
733 return lttng_event_notifier_enabler_enable(event_notifier_enabler);
734 case LTTNG_UST_ABI_DISABLE:
735 return lttng_event_notifier_enabler_disable(event_notifier_enabler);
736 default:
737 return -EINVAL;
738 }
739 }
740
741 /**
742 * lttng_event_notifier_group_error_counter_cmd - lttng event_notifier group error counter object command
743 *
744 * @obj: the object
745 * @cmd: the command
746 * @arg: command arg
747 * @uargs: UST arguments (internal)
748 * @owner: objd owner
749 *
750 * This descriptor implements lttng commands:
751 * LTTNG_UST_ABI_COUNTER_GLOBAL
752 * Return negative error code on error, 0 on success.
753 * LTTNG_UST_ABI_COUNTER_CPU
754 * Return negative error code on error, 0 on success.
755 */
756 static
757 long lttng_event_notifier_group_error_counter_cmd(int objd, unsigned int cmd, unsigned long arg,
758 union lttng_ust_abi_args *uargs, void *owner)
759 {
760 int ret;
761 struct lttng_counter *counter = objd_private(objd);
762
763 switch (cmd) {
764 case LTTNG_UST_ABI_COUNTER_GLOBAL:
765 ret = -EINVAL; /* Unimplemented. */
766 break;
767 case LTTNG_UST_ABI_COUNTER_CPU:
768 {
769 struct lttng_ust_abi_counter_cpu *counter_cpu =
770 (struct lttng_ust_abi_counter_cpu *)arg;
771
772 ret = lttng_counter_set_cpu_shm(counter->counter,
773 counter_cpu->cpu_nr, uargs->counter_shm.shm_fd);
774 if (!ret) {
775 /* Take ownership of the shm_fd. */
776 uargs->counter_shm.shm_fd = -1;
777 }
778 break;
779 }
780 default:
781 ret = -EINVAL;
782 break;
783 }
784
785 return ret;
786 }
787
788 __attribute__((visibility("hidden")))
789 int lttng_release_event_notifier_group_error_counter(int objd)
790 {
791 struct lttng_counter *counter = objd_private(objd);
792
793 if (counter) {
794 return lttng_ust_abi_objd_unref(counter->event_notifier_group->objd, 0);
795 } else {
796 return -EINVAL;
797 }
798 }
799
800 static const struct lttng_ust_abi_objd_ops lttng_event_notifier_group_error_counter_ops = {
801 .release = lttng_release_event_notifier_group_error_counter,
802 .cmd = lttng_event_notifier_group_error_counter_cmd,
803 };
804
805 static
806 int lttng_ust_event_notifier_group_create_error_counter(int event_notifier_group_objd, void *owner,
807 struct lttng_ust_abi_counter_conf *error_counter_conf)
808 {
809 const char *counter_transport_name;
810 struct lttng_event_notifier_group *event_notifier_group =
811 objd_private(event_notifier_group_objd);
812 struct lttng_counter *counter;
813 int counter_objd, ret;
814 struct lttng_counter_dimension dimensions[1];
815 size_t counter_len;
816
817 if (event_notifier_group->error_counter)
818 return -EBUSY;
819
820 if (error_counter_conf->arithmetic != LTTNG_UST_ABI_COUNTER_ARITHMETIC_MODULAR)
821 return -EINVAL;
822
823 if (error_counter_conf->number_dimensions != 1)
824 return -EINVAL;
825
826 switch (error_counter_conf->bitness) {
827 case LTTNG_UST_ABI_COUNTER_BITNESS_64:
828 counter_transport_name = "counter-per-cpu-64-modular";
829 break;
830 case LTTNG_UST_ABI_COUNTER_BITNESS_32:
831 counter_transport_name = "counter-per-cpu-32-modular";
832 break;
833 default:
834 return -EINVAL;
835 }
836
837 counter_objd = objd_alloc(NULL, &lttng_event_notifier_group_error_counter_ops, owner,
838 "event_notifier group error counter");
839 if (counter_objd < 0) {
840 ret = counter_objd;
841 goto objd_error;
842 }
843
844 counter_len = error_counter_conf->dimensions[0].size;
845 dimensions[0].size = counter_len;
846 dimensions[0].underflow_index = 0;
847 dimensions[0].overflow_index = 0;
848 dimensions[0].has_underflow = 0;
849 dimensions[0].has_overflow = 0;
850
851 counter = lttng_ust_counter_create(counter_transport_name, 1, dimensions);
852 if (!counter) {
853 ret = -EINVAL;
854 goto create_error;
855 }
856
857 event_notifier_group->error_counter_len = counter_len;
858 /*
859 * store-release to publish error counter matches load-acquire
860 * in record_error. Ensures the counter is created and the
861 * error_counter_len is set before they are used.
862 * Currently a full memory barrier is used, which could be
863 * turned into acquire-release barriers.
864 */
865 cmm_smp_mb();
866 CMM_STORE_SHARED(event_notifier_group->error_counter, counter);
867
868 counter->objd = counter_objd;
869 counter->event_notifier_group = event_notifier_group; /* owner */
870
871 objd_set_private(counter_objd, counter);
872 /* The error counter holds a reference on the event_notifier group. */
873 objd_ref(event_notifier_group->objd);
874
875 return counter_objd;
876
877 create_error:
878 {
879 int err;
880
881 err = lttng_ust_abi_objd_unref(counter_objd, 1);
882 assert(!err);
883 }
884 objd_error:
885 return ret;
886 }
887
888 static
889 long lttng_event_notifier_group_cmd(int objd, unsigned int cmd, unsigned long arg,
890 union lttng_ust_abi_args *uargs, void *owner)
891 {
892 switch (cmd) {
893 case LTTNG_UST_ABI_EVENT_NOTIFIER_CREATE:
894 {
895 struct lttng_ust_abi_event_notifier *event_notifier_param =
896 (struct lttng_ust_abi_event_notifier *) arg;
897 if (strutils_is_star_glob_pattern(event_notifier_param->event.name)) {
898 /*
899 * If the event name is a star globbing pattern,
900 * we create the special star globbing enabler.
901 */
902 return lttng_ust_event_notifier_enabler_create(objd,
903 owner, event_notifier_param,
904 LTTNG_ENABLER_FORMAT_STAR_GLOB);
905 } else {
906 return lttng_ust_event_notifier_enabler_create(objd,
907 owner, event_notifier_param,
908 LTTNG_ENABLER_FORMAT_EVENT);
909 }
910 }
911 case LTTNG_UST_ABI_COUNTER:
912 {
913 struct lttng_ust_abi_counter_conf *counter_conf =
914 (struct lttng_ust_abi_counter_conf *) uargs->counter.counter_data;
915 return lttng_ust_event_notifier_group_create_error_counter(
916 objd, owner, counter_conf);
917 }
918 default:
919 return -EINVAL;
920 }
921 }
922
923 static
924 int lttng_event_notifier_enabler_release(int objd)
925 {
926 struct lttng_event_notifier_enabler *event_notifier_enabler = objd_private(objd);
927
928 if (event_notifier_enabler)
929 return lttng_ust_abi_objd_unref(event_notifier_enabler->group->objd, 0);
930 return 0;
931 }
932
933 static const struct lttng_ust_abi_objd_ops lttng_event_notifier_enabler_ops = {
934 .release = lttng_event_notifier_enabler_release,
935 .cmd = lttng_event_notifier_enabler_cmd,
936 };
937
938 static
939 int lttng_release_event_notifier_group(int objd)
940 {
941 struct lttng_event_notifier_group *event_notifier_group = objd_private(objd);
942
943 if (event_notifier_group) {
944 lttng_event_notifier_group_destroy(event_notifier_group);
945 return 0;
946 } else {
947 return -EINVAL;
948 }
949 }
950
951 static const struct lttng_ust_abi_objd_ops lttng_event_notifier_group_ops = {
952 .release = lttng_release_event_notifier_group,
953 .cmd = lttng_event_notifier_group_cmd,
954 };
955
956 static
957 long lttng_tracepoint_list_cmd(int objd, unsigned int cmd, unsigned long arg,
958 union lttng_ust_abi_args *uargs, void *owner)
959 {
960 struct lttng_ust_tracepoint_list *list = objd_private(objd);
961 struct lttng_ust_abi_tracepoint_iter *tp =
962 (struct lttng_ust_abi_tracepoint_iter *) arg;
963 struct lttng_ust_abi_tracepoint_iter *iter;
964
965 switch (cmd) {
966 case LTTNG_UST_ABI_TRACEPOINT_LIST_GET:
967 {
968 iter = lttng_ust_tracepoint_list_get_iter_next(list);
969 if (!iter)
970 return -LTTNG_UST_ERR_NOENT;
971 memcpy(tp, iter, sizeof(*tp));
972 return 0;
973 }
974 default:
975 return -EINVAL;
976 }
977 }
978
979 static
980 int lttng_abi_tracepoint_list(void *owner)
981 {
982 int list_objd, ret;
983 struct lttng_ust_tracepoint_list *list;
984
985 list_objd = objd_alloc(NULL, &lttng_tracepoint_list_ops, owner, "tp_list");
986 if (list_objd < 0) {
987 ret = list_objd;
988 goto objd_error;
989 }
990 list = zmalloc(sizeof(*list));
991 if (!list) {
992 ret = -ENOMEM;
993 goto alloc_error;
994 }
995 objd_set_private(list_objd, list);
996
997 /* populate list by walking on all registered probes. */
998 ret = lttng_probes_get_event_list(list);
999 if (ret) {
1000 goto list_error;
1001 }
1002 return list_objd;
1003
1004 list_error:
1005 free(list);
1006 alloc_error:
1007 {
1008 int err;
1009
1010 err = lttng_ust_abi_objd_unref(list_objd, 1);
1011 assert(!err);
1012 }
1013 objd_error:
1014 return ret;
1015 }
1016
1017 static
1018 int lttng_release_tracepoint_list(int objd)
1019 {
1020 struct lttng_ust_tracepoint_list *list = objd_private(objd);
1021
1022 if (list) {
1023 lttng_probes_prune_event_list(list);
1024 free(list);
1025 return 0;
1026 } else {
1027 return -EINVAL;
1028 }
1029 }
1030
1031 static const struct lttng_ust_abi_objd_ops lttng_tracepoint_list_ops = {
1032 .release = lttng_release_tracepoint_list,
1033 .cmd = lttng_tracepoint_list_cmd,
1034 };
1035
1036 static
1037 long lttng_tracepoint_field_list_cmd(int objd, unsigned int cmd,
1038 unsigned long arg, union lttng_ust_abi_args *uargs, void *owner)
1039 {
1040 struct lttng_ust_field_list *list = objd_private(objd);
1041 struct lttng_ust_abi_field_iter *tp = &uargs->field_list.entry;
1042 struct lttng_ust_abi_field_iter *iter;
1043
1044 switch (cmd) {
1045 case LTTNG_UST_ABI_TRACEPOINT_FIELD_LIST_GET:
1046 {
1047 iter = lttng_ust_field_list_get_iter_next(list);
1048 if (!iter)
1049 return -LTTNG_UST_ERR_NOENT;
1050 memcpy(tp, iter, sizeof(*tp));
1051 return 0;
1052 }
1053 default:
1054 return -EINVAL;
1055 }
1056 }
1057
1058 static
1059 int lttng_abi_tracepoint_field_list(void *owner)
1060 {
1061 int list_objd, ret;
1062 struct lttng_ust_field_list *list;
1063
1064 list_objd = objd_alloc(NULL, &lttng_tracepoint_field_list_ops, owner,
1065 "tp_field_list");
1066 if (list_objd < 0) {
1067 ret = list_objd;
1068 goto objd_error;
1069 }
1070 list = zmalloc(sizeof(*list));
1071 if (!list) {
1072 ret = -ENOMEM;
1073 goto alloc_error;
1074 }
1075 objd_set_private(list_objd, list);
1076
1077 /* populate list by walking on all registered probes. */
1078 ret = lttng_probes_get_field_list(list);
1079 if (ret) {
1080 goto list_error;
1081 }
1082 return list_objd;
1083
1084 list_error:
1085 free(list);
1086 alloc_error:
1087 {
1088 int err;
1089
1090 err = lttng_ust_abi_objd_unref(list_objd, 1);
1091 assert(!err);
1092 }
1093 objd_error:
1094 return ret;
1095 }
1096
1097 static
1098 int lttng_release_tracepoint_field_list(int objd)
1099 {
1100 struct lttng_ust_field_list *list = objd_private(objd);
1101
1102 if (list) {
1103 lttng_probes_prune_field_list(list);
1104 free(list);
1105 return 0;
1106 } else {
1107 return -EINVAL;
1108 }
1109 }
1110
1111 static const struct lttng_ust_abi_objd_ops lttng_tracepoint_field_list_ops = {
1112 .release = lttng_release_tracepoint_field_list,
1113 .cmd = lttng_tracepoint_field_list_cmd,
1114 };
1115
1116 static
1117 int lttng_abi_map_stream(int channel_objd, struct lttng_ust_abi_stream *info,
1118 union lttng_ust_abi_args *uargs, void *owner)
1119 {
1120 struct lttng_ust_channel_buffer *lttng_chan_buf = objd_private(channel_objd);
1121 int ret;
1122
1123 ret = channel_handle_add_stream(lttng_chan_buf->handle,
1124 uargs->stream.shm_fd, uargs->stream.wakeup_fd,
1125 info->stream_nr, info->len);
1126 if (ret)
1127 goto error_add_stream;
1128 /* Take ownership of shm_fd and wakeup_fd. */
1129 uargs->stream.shm_fd = -1;
1130 uargs->stream.wakeup_fd = -1;
1131
1132 return 0;
1133
1134 error_add_stream:
1135 return ret;
1136 }
1137
1138 static
1139 int lttng_abi_create_event_enabler(int channel_objd,
1140 struct lttng_ust_abi_event *event_param,
1141 void *owner,
1142 enum lttng_enabler_format_type format_type)
1143 {
1144 struct lttng_ust_channel_buffer *channel = objd_private(channel_objd);
1145 struct lttng_event_enabler *enabler;
1146 int event_objd, ret;
1147
1148 event_param->name[LTTNG_UST_ABI_SYM_NAME_LEN - 1] = '\0';
1149 event_objd = objd_alloc(NULL, &lttng_event_enabler_ops, owner,
1150 "event enabler");
1151 if (event_objd < 0) {
1152 ret = event_objd;
1153 goto objd_error;
1154 }
1155 /*
1156 * We tolerate no failure path after event creation. It will stay
1157 * invariant for the rest of the session.
1158 */
1159 enabler = lttng_event_enabler_create(format_type, event_param, channel);
1160 if (!enabler) {
1161 ret = -ENOMEM;
1162 goto event_error;
1163 }
1164 objd_set_private(event_objd, enabler);
1165 /* The event holds a reference on the channel */
1166 objd_ref(channel_objd);
1167 return event_objd;
1168
1169 event_error:
1170 {
1171 int err;
1172
1173 err = lttng_ust_abi_objd_unref(event_objd, 1);
1174 assert(!err);
1175 }
1176 objd_error:
1177 return ret;
1178 }
1179
1180 /**
1181 * lttng_channel_cmd - lttng control through object descriptors
1182 *
1183 * @objd: the object descriptor
1184 * @cmd: the command
1185 * @arg: command arg
1186 * @uargs: UST arguments (internal)
1187 * @owner: objd owner
1188 *
1189 * This object descriptor implements lttng commands:
1190 * LTTNG_UST_ABI_STREAM
1191 * Returns an event stream object descriptor or failure.
1192 * (typically, one event stream records events from one CPU)
1193 * LTTNG_UST_ABI_EVENT
1194 * Returns an event object descriptor or failure.
1195 * LTTNG_UST_ABI_CONTEXT
1196 * Prepend a context field to each event in the channel
1197 * LTTNG_UST_ABI_ENABLE
1198 * Enable recording for events in this channel (weak enable)
1199 * LTTNG_UST_ABI_DISABLE
1200 * Disable recording for events in this channel (strong disable)
1201 *
1202 * Channel and event file descriptors also hold a reference on the session.
1203 */
1204 static
1205 long lttng_channel_cmd(int objd, unsigned int cmd, unsigned long arg,
1206 union lttng_ust_abi_args *uargs, void *owner)
1207 {
1208 struct lttng_ust_channel_buffer *lttng_chan_buf = objd_private(objd);
1209
1210 if (cmd != LTTNG_UST_ABI_STREAM) {
1211 /*
1212 * Check if channel received all streams.
1213 */
1214 if (!lttng_is_channel_ready(lttng_chan_buf))
1215 return -EPERM;
1216 }
1217
1218 switch (cmd) {
1219 case LTTNG_UST_ABI_STREAM:
1220 {
1221 struct lttng_ust_abi_stream *stream;
1222
1223 stream = (struct lttng_ust_abi_stream *) arg;
1224 /* stream used as output */
1225 return lttng_abi_map_stream(objd, stream, uargs, owner);
1226 }
1227 case LTTNG_UST_ABI_EVENT:
1228 {
1229 struct lttng_ust_abi_event *event_param =
1230 (struct lttng_ust_abi_event *) arg;
1231
1232 if (strutils_is_star_glob_pattern(event_param->name)) {
1233 /*
1234 * If the event name is a star globbing pattern,
1235 * we create the special star globbing enabler.
1236 */
1237 return lttng_abi_create_event_enabler(objd, event_param,
1238 owner, LTTNG_ENABLER_FORMAT_STAR_GLOB);
1239 } else {
1240 return lttng_abi_create_event_enabler(objd, event_param,
1241 owner, LTTNG_ENABLER_FORMAT_EVENT);
1242 }
1243 }
1244 case LTTNG_UST_ABI_CONTEXT:
1245 return lttng_abi_add_context(objd,
1246 (struct lttng_ust_abi_context *) arg, uargs,
1247 &lttng_chan_buf->priv->ctx,
1248 lttng_chan_buf->parent->session);
1249 case LTTNG_UST_ABI_ENABLE:
1250 return lttng_channel_enable(lttng_chan_buf->parent);
1251 case LTTNG_UST_ABI_DISABLE:
1252 return lttng_channel_disable(lttng_chan_buf->parent);
1253 case LTTNG_UST_ABI_FLUSH_BUFFER:
1254 return lttng_chan_buf->ops->priv->flush_buffer(lttng_chan_buf->chan,
1255 lttng_chan_buf->handle);
1256 default:
1257 return -EINVAL;
1258 }
1259 }
1260
1261 static
1262 int lttng_channel_release(int objd)
1263 {
1264 struct lttng_ust_channel_buffer *lttng_chan_buf = objd_private(objd);
1265
1266 if (lttng_chan_buf)
1267 return lttng_ust_abi_objd_unref(lttng_chan_buf->parent->session->priv->objd, 0);
1268 return 0;
1269 }
1270
1271 static const struct lttng_ust_abi_objd_ops lttng_channel_ops = {
1272 .release = lttng_channel_release,
1273 .cmd = lttng_channel_cmd,
1274 };
1275
1276 /**
1277 * lttng_enabler_cmd - lttng control through object descriptors
1278 *
1279 * @objd: the object descriptor
1280 * @cmd: the command
1281 * @arg: command arg
1282 * @uargs: UST arguments (internal)
1283 * @owner: objd owner
1284 *
1285 * This object descriptor implements lttng commands:
1286 * LTTNG_UST_ABI_CONTEXT
1287 * Prepend a context field to each record of events of this
1288 * enabler.
1289 * LTTNG_UST_ABI_ENABLE
1290 * Enable recording for this enabler
1291 * LTTNG_UST_ABI_DISABLE
1292 * Disable recording for this enabler
1293 * LTTNG_UST_ABI_FILTER
1294 * Attach a filter to an enabler.
1295 * LTTNG_UST_ABI_EXCLUSION
1296 * Attach exclusions to an enabler.
1297 */
1298 static
1299 long lttng_event_enabler_cmd(int objd, unsigned int cmd, unsigned long arg,
1300 union lttng_ust_abi_args *uargs, void *owner)
1301 {
1302 struct lttng_event_enabler *enabler = objd_private(objd);
1303
1304 switch (cmd) {
1305 case LTTNG_UST_ABI_CONTEXT:
1306 return lttng_event_enabler_attach_context(enabler,
1307 (struct lttng_ust_abi_context *) arg);
1308 case LTTNG_UST_ABI_ENABLE:
1309 return lttng_event_enabler_enable(enabler);
1310 case LTTNG_UST_ABI_DISABLE:
1311 return lttng_event_enabler_disable(enabler);
1312 case LTTNG_UST_ABI_FILTER:
1313 {
1314 int ret;
1315
1316 ret = lttng_event_enabler_attach_filter_bytecode(enabler,
1317 (struct lttng_ust_bytecode_node **) arg);
1318 if (ret)
1319 return ret;
1320 return 0;
1321 }
1322 case LTTNG_UST_ABI_EXCLUSION:
1323 {
1324 return lttng_event_enabler_attach_exclusion(enabler,
1325 (struct lttng_ust_excluder_node **) arg);
1326 }
1327 default:
1328 return -EINVAL;
1329 }
1330 }
1331
1332 static
1333 int lttng_event_enabler_release(int objd)
1334 {
1335 struct lttng_event_enabler *event_enabler = objd_private(objd);
1336
1337 if (event_enabler)
1338 return lttng_ust_abi_objd_unref(event_enabler->chan->priv->parent.objd, 0);
1339
1340 return 0;
1341 }
1342
1343 static const struct lttng_ust_abi_objd_ops lttng_event_enabler_ops = {
1344 .release = lttng_event_enabler_release,
1345 .cmd = lttng_event_enabler_cmd,
1346 };
1347
1348 void lttng_ust_abi_exit(void)
1349 {
1350 lttng_ust_abi_close_in_progress = 1;
1351 ust_lock_nocheck();
1352 objd_table_destroy();
1353 ust_unlock();
1354 lttng_ust_abi_close_in_progress = 0;
1355 }
This page took 0.056913 seconds and 4 git commands to generate.