tests/hello.cxx: add enumeration field
[lttng-ust.git] / liblttng-ust / lttng-ust-abi.c
CommitLineData
f4681817
MD
1/*
2 * lttng-ust-abi.c
3 *
f4681817
MD
4 * LTTng UST ABI
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
21 *
22 *
f4681817
MD
23 * Mimic system calls for:
24 * - session creation, returns an object descriptor or failure.
25 * - channel creation, returns an object descriptor or failure.
26 * - Operates on a session object descriptor
27 * - Takes all channel options as parameters.
28 * - stream get, returns an object descriptor or failure.
29 * - Operates on a channel object descriptor.
30 * - stream notifier get, returns an object descriptor or failure.
31 * - Operates on a channel object descriptor.
32 * - event creation, returns an object descriptor or failure.
33 * - Operates on a channel object descriptor
34 * - Takes an event name as parameter
35 * - Takes an instrumentation source as parameter
36 * - e.g. tracepoints, dynamic_probes...
37 * - Takes instrumentation source specific arguments.
f4681817
MD
38 */
39
4318ae1b 40#include <lttng/ust-abi.h>
7bc53e94 41#include <lttng/ust-error.h>
f4681817
MD
42#include <urcu/compiler.h>
43#include <urcu/list.h>
4318ae1b 44#include <lttng/ust-events.h>
23c8854a 45#include <lttng/ust-version.h>
902e1379 46#include <lttng/tracepoint.h>
d8de1354 47#include "tracepoint-internal.h"
44c72f10
MD
48#include <usterr-signal-safe.h>
49#include <helper.h>
7dd08bec 50#include "lttng-tracer.h"
74d81a6c
MD
51#include "../libringbuffer/shm.h"
52#include "../libringbuffer/frontend_types.h"
4ab44fbe 53
7047f3da
MD
54#define OBJ_NAME_LEN 16
55
45e9e699
MD
56static int lttng_ust_abi_close_in_progress;
57
51489cad 58static
f59ed768 59int lttng_abi_tracepoint_list(void *owner);
06d4f27e 60static
f59ed768 61int lttng_abi_tracepoint_field_list(void *owner);
51489cad 62
f4681817
MD
63/*
64 * Object descriptor table. Should be protected from concurrent access
65 * by the caller.
66 */
67
b61ce3b2 68struct lttng_ust_obj {
f4681817
MD
69 union {
70 struct {
71 void *private_data;
b61ce3b2 72 const struct lttng_ust_objd_ops *ops;
f4681817 73 int f_count;
1849ef7c 74 int owner_ref; /* has ref from owner */
f59ed768 75 void *owner;
7047f3da 76 char name[OBJ_NAME_LEN];
f4681817
MD
77 } s;
78 int freelist_next; /* offset freelist. end is -1. */
79 } u;
80};
81
b61ce3b2
MD
82struct lttng_ust_objd_table {
83 struct lttng_ust_obj *array;
f4681817
MD
84 unsigned int len, allocated_len;
85 int freelist_head; /* offset freelist head. end is -1 */
86};
87
b61ce3b2 88static struct lttng_ust_objd_table objd_table = {
f4681817
MD
89 .freelist_head = -1,
90};
91
92static
f59ed768 93int objd_alloc(void *private_data, const struct lttng_ust_objd_ops *ops,
7047f3da 94 void *owner, const char *name)
f4681817 95{
b61ce3b2 96 struct lttng_ust_obj *obj;
f4681817
MD
97
98 if (objd_table.freelist_head != -1) {
99 obj = &objd_table.array[objd_table.freelist_head];
100 objd_table.freelist_head = obj->u.freelist_next;
101 goto end;
102 }
103
104 if (objd_table.len >= objd_table.allocated_len) {
105 unsigned int new_allocated_len, old_allocated_len;
b61ce3b2 106 struct lttng_ust_obj *new_table, *old_table;
f4681817
MD
107
108 old_allocated_len = objd_table.allocated_len;
109 old_table = objd_table.array;
110 if (!old_allocated_len)
111 new_allocated_len = 1;
112 else
113 new_allocated_len = old_allocated_len << 1;
b61ce3b2 114 new_table = zmalloc(sizeof(struct lttng_ust_obj) * new_allocated_len);
f4681817
MD
115 if (!new_table)
116 return -ENOMEM;
117 memcpy(new_table, old_table,
b61ce3b2 118 sizeof(struct lttng_ust_obj) * old_allocated_len);
f4681817
MD
119 free(old_table);
120 objd_table.array = new_table;
121 objd_table.allocated_len = new_allocated_len;
122 }
123 obj = &objd_table.array[objd_table.len];
124 objd_table.len++;
125end:
126 obj->u.s.private_data = private_data;
127 obj->u.s.ops = ops;
a4be8962
MD
128 obj->u.s.f_count = 2; /* count == 1 : object is allocated */
129 /* count == 2 : allocated + hold ref */
1849ef7c 130 obj->u.s.owner_ref = 1; /* One owner reference */
f59ed768 131 obj->u.s.owner = owner;
7047f3da
MD
132 strncpy(obj->u.s.name, name, OBJ_NAME_LEN);
133 obj->u.s.name[OBJ_NAME_LEN - 1] = '\0';
f4681817
MD
134 return obj - objd_table.array;
135}
136
137static
b61ce3b2 138struct lttng_ust_obj *_objd_get(int id)
f4681817
MD
139{
140 if (id >= objd_table.len)
141 return NULL;
a4be8962
MD
142 if (!objd_table.array[id].u.s.f_count)
143 return NULL;
f4681817
MD
144 return &objd_table.array[id];
145}
146
147static
148void *objd_private(int id)
149{
b61ce3b2 150 struct lttng_ust_obj *obj = _objd_get(id);
f4681817
MD
151 assert(obj);
152 return obj->u.s.private_data;
153}
154
155static
156void objd_set_private(int id, void *private_data)
157{
b61ce3b2 158 struct lttng_ust_obj *obj = _objd_get(id);
f4681817
MD
159 assert(obj);
160 obj->u.s.private_data = private_data;
161}
162
b61ce3b2 163const struct lttng_ust_objd_ops *objd_ops(int id)
f4681817 164{
b61ce3b2 165 struct lttng_ust_obj *obj = _objd_get(id);
46050b1a 166
a4be8962
MD
167 if (!obj)
168 return NULL;
f4681817
MD
169 return obj->u.s.ops;
170}
171
172static
173void objd_free(int id)
174{
b61ce3b2 175 struct lttng_ust_obj *obj = _objd_get(id);
f4681817
MD
176
177 assert(obj);
178 obj->u.freelist_next = objd_table.freelist_head;
179 objd_table.freelist_head = obj - objd_table.array;
a4be8962
MD
180 assert(obj->u.s.f_count == 1);
181 obj->u.s.f_count = 0; /* deallocated */
f4681817
MD
182}
183
184static
185void objd_ref(int id)
186{
b61ce3b2 187 struct lttng_ust_obj *obj = _objd_get(id);
072886c4 188 assert(obj != NULL);
f4681817
MD
189 obj->u.s.f_count++;
190}
191
1849ef7c 192int lttng_ust_objd_unref(int id, int is_owner)
f4681817 193{
b61ce3b2 194 struct lttng_ust_obj *obj = _objd_get(id);
f4681817 195
1ea11eab
MD
196 if (!obj)
197 return -EINVAL;
a4be8962
MD
198 if (obj->u.s.f_count == 1) {
199 ERR("Reference counting error\n");
200 return -EINVAL;
201 }
1849ef7c
MD
202 if (is_owner) {
203 if (!obj->u.s.owner_ref) {
204 ERR("Error decrementing owner reference");
205 return -EINVAL;
206 }
207 obj->u.s.owner_ref--;
208 }
a4be8962 209 if ((--obj->u.s.f_count) == 1) {
b61ce3b2 210 const struct lttng_ust_objd_ops *ops = objd_ops(id);
a4be8962 211
f4681817
MD
212 if (ops->release)
213 ops->release(id);
214 objd_free(id);
215 }
1ea11eab 216 return 0;
f4681817
MD
217}
218
219static
220void objd_table_destroy(void)
221{
a4be8962
MD
222 int i;
223
1849ef7c
MD
224 for (i = 0; i < objd_table.allocated_len; i++) {
225 struct lttng_ust_obj *obj;
226
227 obj = _objd_get(i);
228 if (!obj)
229 continue;
230 if (!obj->u.s.owner_ref)
231 continue; /* only unref owner ref. */
232 (void) lttng_ust_objd_unref(i, 1);
233 }
f4681817 234 free(objd_table.array);
02fb3381
MD
235 objd_table.array = NULL;
236 objd_table.len = 0;
237 objd_table.allocated_len = 0;
17dfb34b 238 objd_table.freelist_head = -1;
f4681817
MD
239}
240
74d81a6c
MD
241const char *lttng_ust_obj_get_name(int id)
242{
243 struct lttng_ust_obj *obj = _objd_get(id);
244
245 if (!obj)
246 return NULL;
247 return obj->u.s.name;
248}
249
f59ed768
MD
250void lttng_ust_objd_table_owner_cleanup(void *owner)
251{
252 int i;
253
254 for (i = 0; i < objd_table.allocated_len; i++) {
255 struct lttng_ust_obj *obj;
256
257 obj = _objd_get(i);
258 if (!obj)
259 continue;
260 if (!obj->u.s.owner)
261 continue; /* skip root handles */
1849ef7c
MD
262 if (!obj->u.s.owner_ref)
263 continue; /* only unref owner ref. */
f59ed768 264 if (obj->u.s.owner == owner)
1849ef7c 265 (void) lttng_ust_objd_unref(i, 1);
f59ed768
MD
266 }
267}
268
f4681817
MD
269/*
270 * This is LTTng's own personal way to create an ABI for sessiond.
271 * We send commands over a socket.
272 */
273
b61ce3b2
MD
274static const struct lttng_ust_objd_ops lttng_ops;
275static const struct lttng_ust_objd_ops lttng_session_ops;
276static const struct lttng_ust_objd_ops lttng_channel_ops;
e58095ef 277static const struct lttng_ust_objd_ops lttng_enabler_ops;
51489cad 278static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops;
06d4f27e 279static const struct lttng_ust_objd_ops lttng_tracepoint_field_list_ops;
f4681817 280
46050b1a
MD
281int lttng_abi_create_root_handle(void)
282{
283 int root_handle;
284
f59ed768 285 /* root handles have NULL owners */
7047f3da 286 root_handle = objd_alloc(NULL, &lttng_ops, NULL, "root");
46050b1a
MD
287 return root_handle;
288}
289
74d81a6c
MD
290static
291int lttng_is_channel_ready(struct lttng_channel *lttng_chan)
292{
293 struct channel *chan;
294 unsigned int nr_streams, exp_streams;
295
296 chan = lttng_chan->chan;
297 nr_streams = channel_handle_get_nr_streams(lttng_chan->handle);
298 exp_streams = chan->nr_streams;
299 return nr_streams == exp_streams;
300}
301
818173b9 302static
f59ed768 303int lttng_abi_create_session(void *owner)
f4681817 304{
7dd08bec 305 struct lttng_session *session;
f4681817
MD
306 int session_objd, ret;
307
7dd08bec 308 session = lttng_session_create();
f4681817
MD
309 if (!session)
310 return -ENOMEM;
7047f3da 311 session_objd = objd_alloc(session, &lttng_session_ops, owner, "session");
f4681817
MD
312 if (session_objd < 0) {
313 ret = session_objd;
314 goto objd_error;
315 }
316 session->objd = session_objd;
32ce8569 317 session->owner = owner;
f4681817
MD
318 return session_objd;
319
320objd_error:
7dd08bec 321 lttng_session_destroy(session);
f4681817
MD
322 return ret;
323}
324
f4681817
MD
325static
326long lttng_abi_tracer_version(int objd,
327 struct lttng_ust_tracer_version *v)
328{
32ce8569
MD
329 v->major = LTTNG_UST_MAJOR_VERSION;
330 v->minor = LTTNG_UST_MINOR_VERSION;
331 v->patchlevel = LTTNG_UST_PATCHLEVEL_VERSION;
f4681817
MD
332 return 0;
333}
334
335static
336long lttng_abi_add_context(int objd,
337 struct lttng_ust_context *context_param,
8e696cfa 338 union ust_args *uargs,
7dd08bec 339 struct lttng_ctx **ctx, struct lttng_session *session)
f4681817 340{
8e696cfa 341 return lttng_attach_context(context_param, uargs, ctx, session);
f4681817
MD
342}
343
344/**
345 * lttng_cmd - lttng control through socket commands
346 *
347 * @objd: the object descriptor
348 * @cmd: the command
349 * @arg: command arg
ef9ff354 350 * @uargs: UST arguments (internal)
f59ed768 351 * @owner: objd owner
f4681817
MD
352 *
353 * This descriptor implements lttng commands:
354 * LTTNG_UST_SESSION
355 * Returns a LTTng trace session object descriptor
356 * LTTNG_UST_TRACER_VERSION
357 * Returns the LTTng kernel tracer version
358 * LTTNG_UST_TRACEPOINT_LIST
359 * Returns a file descriptor listing available tracepoints
06d4f27e
MD
360 * LTTNG_UST_TRACEPOINT_FIELD_LIST
361 * Returns a file descriptor listing available tracepoint fields
f4681817
MD
362 * LTTNG_UST_WAIT_QUIESCENT
363 * Returns after all previously running probes have completed
364 *
365 * The returned session will be deleted when its file descriptor is closed.
366 */
367static
ef9ff354 368long lttng_cmd(int objd, unsigned int cmd, unsigned long arg,
f59ed768 369 union ust_args *uargs, void *owner)
f4681817
MD
370{
371 switch (cmd) {
372 case LTTNG_UST_SESSION:
f59ed768 373 return lttng_abi_create_session(owner);
f4681817
MD
374 case LTTNG_UST_TRACER_VERSION:
375 return lttng_abi_tracer_version(objd,
376 (struct lttng_ust_tracer_version *) arg);
377 case LTTNG_UST_TRACEPOINT_LIST:
f59ed768 378 return lttng_abi_tracepoint_list(owner);
06d4f27e 379 case LTTNG_UST_TRACEPOINT_FIELD_LIST:
f59ed768 380 return lttng_abi_tracepoint_field_list(owner);
f4681817
MD
381 case LTTNG_UST_WAIT_QUIESCENT:
382 synchronize_trace();
383 return 0;
384 default:
385 return -EINVAL;
386 }
387}
388
b61ce3b2 389static const struct lttng_ust_objd_ops lttng_ops = {
f4681817
MD
390 .cmd = lttng_cmd,
391};
392
74d81a6c
MD
393int lttng_abi_map_channel(int session_objd,
394 struct lttng_ust_channel *ust_chan,
395 union ust_args *uargs,
396 void *owner)
f4681817 397{
7dd08bec 398 struct lttng_session *session = objd_private(session_objd);
f4681817 399 const char *transport_name;
74d81a6c
MD
400 const struct lttng_transport *transport;
401 const char *chan_name;
f4681817 402 int chan_objd;
74d81a6c
MD
403 struct lttng_ust_shm_handle *channel_handle;
404 struct lttng_channel *lttng_chan;
405 struct channel *chan;
406 struct lttng_ust_lib_ring_buffer_config *config;
407 void *chan_data;
ff0f5728 408 int wakeup_fd;
74d81a6c
MD
409 uint64_t len;
410 int ret;
411 enum lttng_ust_chan_type type;
412
413 chan_data = uargs->channel.chan_data;
ff0f5728 414 wakeup_fd = uargs->channel.wakeup_fd;
74d81a6c
MD
415 len = ust_chan->len;
416 type = ust_chan->type;
417
418 switch (type) {
419 case LTTNG_UST_CHAN_PER_CPU:
74d81a6c
MD
420 break;
421 default:
ff0f5728
MD
422 ret = -EINVAL;
423 goto invalid;
74d81a6c
MD
424 }
425
426 if (session->been_active) {
427 ret = -EBUSY;
428 goto active; /* Refuse to add channel to active session */
429 }
f4681817 430
ff0f5728 431 channel_handle = channel_handle_create(chan_data, len, wakeup_fd);
74d81a6c
MD
432 if (!channel_handle) {
433 ret = -EINVAL;
434 goto handle_error;
435 }
436
437 chan = shmp(channel_handle, channel_handle->chan);
438 assert(chan);
03d2d293 439 chan->handle = channel_handle;
74d81a6c
MD
440 config = &chan->backend.config;
441 lttng_chan = channel_get_private(chan);
442 if (!lttng_chan) {
443 ret = -EINVAL;
444 goto alloc_error;
445 }
446
447 /* Lookup transport name */
448 switch (type) {
449 case LTTNG_UST_CHAN_PER_CPU:
450 if (config->output == RING_BUFFER_MMAP) {
34a91bdb
MD
451 if (config->mode == RING_BUFFER_OVERWRITE) {
452 if (config->wakeup == RING_BUFFER_WAKEUP_BY_WRITER) {
453 transport_name = "relay-overwrite-mmap";
454 } else {
455 transport_name = "relay-overwrite-rt-mmap";
456 }
457 } else {
458 if (config->wakeup == RING_BUFFER_WAKEUP_BY_WRITER) {
459 transport_name = "relay-discard-mmap";
460 } else {
461 transport_name = "relay-discard-rt-mmap";
462 }
463 }
f4681817 464 } else {
74d81a6c
MD
465 ret = -EINVAL;
466 goto notransport;
f4681817 467 }
74d81a6c 468 chan_name = "channel";
f4681817 469 break;
f4681817 470 default:
74d81a6c
MD
471 ret = -EINVAL;
472 goto notransport;
fe38d4af 473 }
74d81a6c
MD
474 transport = lttng_transport_find(transport_name);
475 if (!transport) {
476 DBG("LTTng transport %s not found\n",
477 transport_name);
478 ret = -EINVAL;
479 goto notransport;
480 }
481
482 chan_objd = objd_alloc(NULL, &lttng_channel_ops, owner, chan_name);
fe38d4af
MD
483 if (chan_objd < 0) {
484 ret = chan_objd;
485 goto objd_error;
f4681817 486 }
74d81a6c
MD
487
488 /* Initialize our lttng chan */
489 lttng_chan->chan = chan;
ac6b4ac6 490 lttng_chan->tstate = 1;
74d81a6c
MD
491 lttng_chan->enabled = 1;
492 lttng_chan->ctx = NULL;
493 lttng_chan->session = session;
74d81a6c
MD
494 lttng_chan->ops = &transport->ops;
495 memcpy(&lttng_chan->chan->backend.config,
496 transport->client_config,
497 sizeof(lttng_chan->chan->backend.config));
498 cds_list_add(&lttng_chan->node, &session->chan_head);
499 lttng_chan->header_type = 0;
500 lttng_chan->handle = channel_handle;
74d81a6c
MD
501 lttng_chan->type = type;
502
f4681817
MD
503 /*
504 * We tolerate no failure path after channel creation. It will stay
505 * invariant for the rest of the session.
506 */
74d81a6c
MD
507 objd_set_private(chan_objd, lttng_chan);
508 lttng_chan->objd = chan_objd;
f4681817
MD
509 /* The channel created holds a reference on the session */
510 objd_ref(session_objd);
f4681817
MD
511 return chan_objd;
512
ff0f5728 513 /* error path after channel was created */
f4681817 514objd_error:
74d81a6c
MD
515notransport:
516 free(lttng_chan);
517alloc_error:
518 channel_destroy(chan, channel_handle, 0);
ff0f5728
MD
519 return ret;
520
521 /*
522 * error path before channel creation (owning chan_data and
523 * wakeup_fd).
524 */
74d81a6c
MD
525handle_error:
526active:
ff0f5728
MD
527invalid:
528 {
529 int close_ret;
530
531 close_ret = close(wakeup_fd);
532 if (close_ret) {
533 PERROR("close");
534 }
535 }
536 free(chan_data);
f4681817
MD
537 return ret;
538}
539
540/**
541 * lttng_session_cmd - lttng session object command
542 *
543 * @obj: the object
544 * @cmd: the command
545 * @arg: command arg
ef9ff354 546 * @uargs: UST arguments (internal)
f59ed768 547 * @owner: objd owner
f4681817
MD
548 *
549 * This descriptor implements lttng commands:
550 * LTTNG_UST_CHANNEL
551 * Returns a LTTng channel object descriptor
552 * LTTNG_UST_ENABLE
553 * Enables tracing for a session (weak enable)
554 * LTTNG_UST_DISABLE
555 * Disables tracing for a session (strong disable)
f4681817
MD
556 *
557 * The returned channel will be deleted when its file descriptor is closed.
558 */
559static
ef9ff354 560long lttng_session_cmd(int objd, unsigned int cmd, unsigned long arg,
f59ed768 561 union ust_args *uargs, void *owner)
f4681817 562{
7dd08bec 563 struct lttng_session *session = objd_private(objd);
f4681817
MD
564
565 switch (cmd) {
566 case LTTNG_UST_CHANNEL:
74d81a6c 567 return lttng_abi_map_channel(objd,
f4681817 568 (struct lttng_ust_channel *) arg,
74d81a6c 569 uargs, owner);
f4681817
MD
570 case LTTNG_UST_SESSION_START:
571 case LTTNG_UST_ENABLE:
7dd08bec 572 return lttng_session_enable(session);
f4681817
MD
573 case LTTNG_UST_SESSION_STOP:
574 case LTTNG_UST_DISABLE:
7dd08bec 575 return lttng_session_disable(session);
f4681817
MD
576 default:
577 return -EINVAL;
578 }
579}
580
581/*
582 * Called when the last file reference is dropped.
583 *
584 * Big fat note: channels and events are invariant for the whole session after
585 * their creation. So this session destruction also destroys all channel and
586 * event structures specific to this session (they are not destroyed when their
587 * individual file is released).
588 */
589static
1ea11eab 590int lttng_release_session(int objd)
f4681817 591{
7dd08bec 592 struct lttng_session *session = objd_private(objd);
f4681817 593
1ea11eab 594 if (session) {
7dd08bec 595 lttng_session_destroy(session);
1ea11eab
MD
596 return 0;
597 } else {
598 return -EINVAL;
599 }
f4681817
MD
600}
601
b61ce3b2 602static const struct lttng_ust_objd_ops lttng_session_ops = {
1ea11eab 603 .release = lttng_release_session,
f4681817
MD
604 .cmd = lttng_session_cmd,
605};
606
51489cad 607static
ef9ff354 608long lttng_tracepoint_list_cmd(int objd, unsigned int cmd, unsigned long arg,
f59ed768 609 union ust_args *uargs, void *owner)
51489cad 610{
c8fcf224 611 struct lttng_ust_tracepoint_list *list = objd_private(objd);
cbef6901
MD
612 struct lttng_ust_tracepoint_iter *tp =
613 (struct lttng_ust_tracepoint_iter *) arg;
c8fcf224 614 struct lttng_ust_tracepoint_iter *iter;
51489cad
MD
615
616 switch (cmd) {
617 case LTTNG_UST_TRACEPOINT_LIST_GET:
c8fcf224 618 {
c8fcf224
MD
619 iter = lttng_ust_tracepoint_list_get_iter_next(list);
620 if (!iter)
7bc53e94 621 return -LTTNG_UST_ERR_NOENT;
c8fcf224 622 memcpy(tp, iter, sizeof(*tp));
51489cad 623 return 0;
c8fcf224 624 }
51489cad
MD
625 default:
626 return -EINVAL;
627 }
628}
629
630static
f59ed768 631int lttng_abi_tracepoint_list(void *owner)
51489cad
MD
632{
633 int list_objd, ret;
c8fcf224 634 struct lttng_ust_tracepoint_list *list;
51489cad 635
7047f3da 636 list_objd = objd_alloc(NULL, &lttng_tracepoint_list_ops, owner, "tp_list");
51489cad
MD
637 if (list_objd < 0) {
638 ret = list_objd;
639 goto objd_error;
640 }
641 list = zmalloc(sizeof(*list));
642 if (!list) {
643 ret = -ENOMEM;
644 goto alloc_error;
645 }
646 objd_set_private(list_objd, list);
647
c8fcf224 648 /* populate list by walking on all registered probes. */
7dd08bec 649 ret = lttng_probes_get_event_list(list);
c8fcf224
MD
650 if (ret) {
651 goto list_error;
652 }
51489cad
MD
653 return list_objd;
654
c8fcf224
MD
655list_error:
656 free(list);
51489cad
MD
657alloc_error:
658 {
659 int err;
660
1849ef7c 661 err = lttng_ust_objd_unref(list_objd, 1);
51489cad
MD
662 assert(!err);
663 }
664objd_error:
665 return ret;
666}
667
668static
669int lttng_release_tracepoint_list(int objd)
670{
c8fcf224 671 struct lttng_ust_tracepoint_list *list = objd_private(objd);
51489cad
MD
672
673 if (list) {
7dd08bec 674 lttng_probes_prune_event_list(list);
51489cad
MD
675 free(list);
676 return 0;
677 } else {
678 return -EINVAL;
679 }
680}
681
682static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops = {
683 .release = lttng_release_tracepoint_list,
684 .cmd = lttng_tracepoint_list_cmd,
685};
686
06d4f27e
MD
687static
688long lttng_tracepoint_field_list_cmd(int objd, unsigned int cmd,
f59ed768 689 unsigned long arg, union ust_args *uargs, void *owner)
06d4f27e
MD
690{
691 struct lttng_ust_field_list *list = objd_private(objd);
40003310 692 struct lttng_ust_field_iter *tp = &uargs->field_list.entry;
06d4f27e
MD
693 struct lttng_ust_field_iter *iter;
694
695 switch (cmd) {
696 case LTTNG_UST_TRACEPOINT_FIELD_LIST_GET:
697 {
06d4f27e
MD
698 iter = lttng_ust_field_list_get_iter_next(list);
699 if (!iter)
7bc53e94 700 return -LTTNG_UST_ERR_NOENT;
06d4f27e
MD
701 memcpy(tp, iter, sizeof(*tp));
702 return 0;
703 }
704 default:
705 return -EINVAL;
706 }
707}
708
709static
f59ed768 710int lttng_abi_tracepoint_field_list(void *owner)
06d4f27e
MD
711{
712 int list_objd, ret;
713 struct lttng_ust_field_list *list;
714
7047f3da
MD
715 list_objd = objd_alloc(NULL, &lttng_tracepoint_field_list_ops, owner,
716 "tp_field_list");
06d4f27e
MD
717 if (list_objd < 0) {
718 ret = list_objd;
719 goto objd_error;
720 }
721 list = zmalloc(sizeof(*list));
722 if (!list) {
723 ret = -ENOMEM;
724 goto alloc_error;
725 }
726 objd_set_private(list_objd, list);
727
728 /* populate list by walking on all registered probes. */
7dd08bec 729 ret = lttng_probes_get_field_list(list);
06d4f27e
MD
730 if (ret) {
731 goto list_error;
732 }
733 return list_objd;
734
735list_error:
736 free(list);
737alloc_error:
738 {
739 int err;
740
1849ef7c 741 err = lttng_ust_objd_unref(list_objd, 1);
06d4f27e
MD
742 assert(!err);
743 }
744objd_error:
745 return ret;
746}
747
748static
749int lttng_release_tracepoint_field_list(int objd)
750{
751 struct lttng_ust_field_list *list = objd_private(objd);
752
753 if (list) {
7dd08bec 754 lttng_probes_prune_field_list(list);
06d4f27e
MD
755 free(list);
756 return 0;
757 } else {
758 return -EINVAL;
759 }
760}
761
762static const struct lttng_ust_objd_ops lttng_tracepoint_field_list_ops = {
763 .release = lttng_release_tracepoint_field_list,
764 .cmd = lttng_tracepoint_field_list_cmd,
765};
766
f4681817 767static
74d81a6c 768int lttng_abi_map_stream(int channel_objd, struct lttng_ust_stream *info,
f59ed768 769 union ust_args *uargs, void *owner)
f4681817 770{
7dd08bec 771 struct lttng_channel *channel = objd_private(channel_objd);
74d81a6c 772 int ret;
f4681817 773
74d81a6c
MD
774 ret = channel_handle_add_stream(channel->handle,
775 uargs->stream.shm_fd, uargs->stream.wakeup_fd,
776 info->stream_nr, info->len);
777 if (ret)
778 goto error_add_stream;
779
780 return 0;
781
782error_add_stream:
f4681817
MD
783 return ret;
784}
f4681817
MD
785
786static
e58095ef 787int lttng_abi_create_enabler(int channel_objd,
f59ed768 788 struct lttng_ust_event *event_param,
e58095ef
MD
789 void *owner,
790 enum lttng_enabler_type type)
f4681817 791{
7dd08bec 792 struct lttng_channel *channel = objd_private(channel_objd);
e58095ef 793 struct lttng_enabler *enabler;
f4681817
MD
794 int event_objd, ret;
795
796 event_param->name[LTTNG_UST_SYM_NAME_LEN - 1] = '\0';
7047f3da 797 event_objd = objd_alloc(NULL, &lttng_enabler_ops, owner, "enabler");
f4681817
MD
798 if (event_objd < 0) {
799 ret = event_objd;
800 goto objd_error;
801 }
802 /*
803 * We tolerate no failure path after event creation. It will stay
804 * invariant for the rest of the session.
805 */
e58095ef
MD
806 enabler = lttng_enabler_create(type, event_param, channel);
807 if (!enabler) {
808 ret = -ENOMEM;
f4681817
MD
809 goto event_error;
810 }
e58095ef 811 objd_set_private(event_objd, enabler);
f4681817
MD
812 /* The event holds a reference on the channel */
813 objd_ref(channel_objd);
814 return event_objd;
815
816event_error:
1ea11eab
MD
817 {
818 int err;
819
1849ef7c 820 err = lttng_ust_objd_unref(event_objd, 1);
1ea11eab
MD
821 assert(!err);
822 }
f4681817
MD
823objd_error:
824 return ret;
825}
826
827/**
828 * lttng_channel_cmd - lttng control through object descriptors
829 *
830 * @objd: the object descriptor
831 * @cmd: the command
832 * @arg: command arg
ef9ff354 833 * @uargs: UST arguments (internal)
f59ed768 834 * @owner: objd owner
f4681817
MD
835 *
836 * This object descriptor implements lttng commands:
837 * LTTNG_UST_STREAM
838 * Returns an event stream object descriptor or failure.
839 * (typically, one event stream records events from one CPU)
840 * LTTNG_UST_EVENT
841 * Returns an event object descriptor or failure.
842 * LTTNG_UST_CONTEXT
843 * Prepend a context field to each event in the channel
844 * LTTNG_UST_ENABLE
845 * Enable recording for events in this channel (weak enable)
846 * LTTNG_UST_DISABLE
847 * Disable recording for events in this channel (strong disable)
848 *
849 * Channel and event file descriptors also hold a reference on the session.
850 */
851static
ef9ff354 852long lttng_channel_cmd(int objd, unsigned int cmd, unsigned long arg,
f59ed768 853 union ust_args *uargs, void *owner)
f4681817 854{
7dd08bec 855 struct lttng_channel *channel = objd_private(objd);
f4681817 856
74d81a6c
MD
857 if (cmd != LTTNG_UST_STREAM) {
858 /*
859 * Check if channel received all streams.
860 */
861 if (!lttng_is_channel_ready(channel))
862 return -EPERM;
863 }
864
f4681817
MD
865 switch (cmd) {
866 case LTTNG_UST_STREAM:
381c0f1e
MD
867 {
868 struct lttng_ust_stream *stream;
869
870 stream = (struct lttng_ust_stream *) arg;
871 /* stream used as output */
74d81a6c 872 return lttng_abi_map_stream(objd, stream, uargs, owner);
381c0f1e 873 }
f4681817 874 case LTTNG_UST_EVENT:
1f18504e
MD
875 {
876 struct lttng_ust_event *event_param =
877 (struct lttng_ust_event *) arg;
6b0e60f1
MD
878 if (event_param->name[strlen(event_param->name) - 1] == '*') {
879 /* If ends with wildcard, create wildcard. */
e58095ef
MD
880 return lttng_abi_create_enabler(objd, event_param,
881 owner, LTTNG_ENABLER_WILDCARD);
1f18504e 882 } else {
e58095ef
MD
883 return lttng_abi_create_enabler(objd, event_param,
884 owner, LTTNG_ENABLER_EVENT);
1f18504e
MD
885 }
886 }
f4681817
MD
887 case LTTNG_UST_CONTEXT:
888 return lttng_abi_add_context(objd,
8e696cfa 889 (struct lttng_ust_context *) arg, uargs,
f4681817
MD
890 &channel->ctx, channel->session);
891 case LTTNG_UST_ENABLE:
7dd08bec 892 return lttng_channel_enable(channel);
f4681817 893 case LTTNG_UST_DISABLE:
7dd08bec 894 return lttng_channel_disable(channel);
43d330a4
MD
895 case LTTNG_UST_FLUSH_BUFFER:
896 return channel->ops->flush_buffer(channel->chan, channel->handle);
f4681817
MD
897 default:
898 return -EINVAL;
899 }
900}
901
f4681817
MD
902static
903int lttng_channel_release(int objd)
904{
7dd08bec 905 struct lttng_channel *channel = objd_private(objd);
f4681817
MD
906
907 if (channel)
1849ef7c 908 return lttng_ust_objd_unref(channel->session->objd, 0);
f4681817
MD
909 return 0;
910}
911
b61ce3b2 912static const struct lttng_ust_objd_ops lttng_channel_ops = {
f4681817 913 .release = lttng_channel_release,
f4681817
MD
914 .cmd = lttng_channel_cmd,
915};
916
f4681817 917/**
e58095ef 918 * lttng_enabler_cmd - lttng control through object descriptors
e6c12e3d
MD
919 *
920 * @objd: the object descriptor
921 * @cmd: the command
922 * @arg: command arg
ef9ff354 923 * @uargs: UST arguments (internal)
f59ed768 924 * @owner: objd owner
e6c12e3d
MD
925 *
926 * This object descriptor implements lttng commands:
927 * LTTNG_UST_CONTEXT
928 * Prepend a context field to each record of events of this
e58095ef 929 * enabler.
e6c12e3d 930 * LTTNG_UST_ENABLE
e58095ef 931 * Enable recording for this enabler
e6c12e3d 932 * LTTNG_UST_DISABLE
e58095ef 933 * Disable recording for this enabler
2d78951a 934 * LTTNG_UST_FILTER
e58095ef 935 * Attach a filter to an enabler.
0bfb5cbd
JI
936 * LTTNG_UST_EXCLUSION
937 * Attach exclusions to an enabler.
e6c12e3d
MD
938 */
939static
e58095ef 940long lttng_enabler_cmd(int objd, unsigned int cmd, unsigned long arg,
f59ed768 941 union ust_args *uargs, void *owner)
e6c12e3d 942{
e58095ef 943 struct lttng_enabler *enabler = objd_private(objd);
e6c12e3d
MD
944
945 switch (cmd) {
946 case LTTNG_UST_CONTEXT:
e58095ef
MD
947 return lttng_enabler_attach_context(enabler,
948 (struct lttng_ust_context *) arg);
e6c12e3d 949 case LTTNG_UST_ENABLE:
e58095ef 950 return lttng_enabler_enable(enabler);
e6c12e3d 951 case LTTNG_UST_DISABLE:
e58095ef 952 return lttng_enabler_disable(enabler);
2d78951a
MD
953 case LTTNG_UST_FILTER:
954 {
955 int ret;
956
e58095ef 957 ret = lttng_enabler_attach_bytecode(enabler,
f488575f 958 (struct lttng_ust_filter_bytecode_node *) arg);
2d78951a
MD
959 if (ret)
960 return ret;
2d78951a
MD
961 return 0;
962 }
0bfb5cbd
JI
963 case LTTNG_UST_EXCLUSION:
964 {
965 return lttng_enabler_attach_exclusion(enabler,
966 (struct lttng_ust_excluder_node *) arg);
967 }
e6c12e3d
MD
968 default:
969 return -EINVAL;
970 }
971}
972
973static
e58095ef 974int lttng_enabler_release(int objd)
e6c12e3d 975{
e58095ef 976 struct lttng_enabler *enabler = objd_private(objd);
e6c12e3d 977
e58095ef 978 if (enabler)
1849ef7c 979 return lttng_ust_objd_unref(enabler->chan->objd, 0);
e6c12e3d
MD
980 return 0;
981}
982
e58095ef
MD
983static const struct lttng_ust_objd_ops lttng_enabler_ops = {
984 .release = lttng_enabler_release,
985 .cmd = lttng_enabler_cmd,
e6c12e3d
MD
986};
987
b35d179d 988void lttng_ust_abi_exit(void)
f4681817 989{
45e9e699 990 lttng_ust_abi_close_in_progress = 1;
701a658f 991 ust_lock_nocheck();
f4681817 992 objd_table_destroy();
701a658f 993 ust_unlock();
45e9e699 994 lttng_ust_abi_close_in_progress = 0;
f4681817 995}
This page took 0.082754 seconds and 4 git commands to generate.