6 * Copyright (C) 2010-2012 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
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.
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.
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
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.
44 #include <urcu/compiler.h>
45 #include <urcu/list.h>
48 #include <lttng/tracepoint.h>
49 #include <lttng/ust-abi.h>
50 #include <lttng/ust-error.h>
51 #include <lttng/ust-events.h>
52 #include <lttng/ust-version.h>
54 #include <usterr-signal-safe.h>
56 #include "../libringbuffer/frontend_types.h"
57 #include "../libringbuffer/shm.h"
58 #include "lttng-tracer.h"
59 #include "string-utils.h"
61 #define OBJ_NAME_LEN 16
63 static int lttng_ust_abi_close_in_progress
;
66 int lttng_abi_tracepoint_list(void *owner
);
68 int lttng_abi_tracepoint_field_list(void *owner
);
71 * Object descriptor table. Should be protected from concurrent access
75 struct lttng_ust_obj
{
79 const struct lttng_ust_objd_ops
*ops
;
81 int owner_ref
; /* has ref from owner */
83 char name
[OBJ_NAME_LEN
];
85 int freelist_next
; /* offset freelist. end is -1. */
89 struct lttng_ust_objd_table
{
90 struct lttng_ust_obj
*array
;
91 unsigned int len
, allocated_len
;
92 int freelist_head
; /* offset freelist head. end is -1 */
95 static struct lttng_ust_objd_table objd_table
= {
100 int objd_alloc(void *private_data
, const struct lttng_ust_objd_ops
*ops
,
101 void *owner
, const char *name
)
103 struct lttng_ust_obj
*obj
;
105 if (objd_table
.freelist_head
!= -1) {
106 obj
= &objd_table
.array
[objd_table
.freelist_head
];
107 objd_table
.freelist_head
= obj
->u
.freelist_next
;
111 if (objd_table
.len
>= objd_table
.allocated_len
) {
112 unsigned int new_allocated_len
, old_allocated_len
;
113 struct lttng_ust_obj
*new_table
, *old_table
;
115 old_allocated_len
= objd_table
.allocated_len
;
116 old_table
= objd_table
.array
;
117 if (!old_allocated_len
)
118 new_allocated_len
= 1;
120 new_allocated_len
= old_allocated_len
<< 1;
121 new_table
= zmalloc(sizeof(struct lttng_ust_obj
) * new_allocated_len
);
124 memcpy(new_table
, old_table
,
125 sizeof(struct lttng_ust_obj
) * old_allocated_len
);
127 objd_table
.array
= new_table
;
128 objd_table
.allocated_len
= new_allocated_len
;
130 obj
= &objd_table
.array
[objd_table
.len
];
133 obj
->u
.s
.private_data
= private_data
;
135 obj
->u
.s
.f_count
= 2; /* count == 1 : object is allocated */
136 /* count == 2 : allocated + hold ref */
137 obj
->u
.s
.owner_ref
= 1; /* One owner reference */
138 obj
->u
.s
.owner
= owner
;
139 strncpy(obj
->u
.s
.name
, name
, OBJ_NAME_LEN
);
140 obj
->u
.s
.name
[OBJ_NAME_LEN
- 1] = '\0';
141 return obj
- objd_table
.array
;
145 struct lttng_ust_obj
*_objd_get(int id
)
147 if (id
>= objd_table
.len
)
149 if (!objd_table
.array
[id
].u
.s
.f_count
)
151 return &objd_table
.array
[id
];
155 void *objd_private(int id
)
157 struct lttng_ust_obj
*obj
= _objd_get(id
);
159 return obj
->u
.s
.private_data
;
163 void objd_set_private(int id
, void *private_data
)
165 struct lttng_ust_obj
*obj
= _objd_get(id
);
167 obj
->u
.s
.private_data
= private_data
;
170 const struct lttng_ust_objd_ops
*objd_ops(int id
)
172 struct lttng_ust_obj
*obj
= _objd_get(id
);
180 void objd_free(int id
)
182 struct lttng_ust_obj
*obj
= _objd_get(id
);
185 obj
->u
.freelist_next
= objd_table
.freelist_head
;
186 objd_table
.freelist_head
= obj
- objd_table
.array
;
187 assert(obj
->u
.s
.f_count
== 1);
188 obj
->u
.s
.f_count
= 0; /* deallocated */
192 void objd_ref(int id
)
194 struct lttng_ust_obj
*obj
= _objd_get(id
);
199 int lttng_ust_objd_unref(int id
, int is_owner
)
201 struct lttng_ust_obj
*obj
= _objd_get(id
);
205 if (obj
->u
.s
.f_count
== 1) {
206 ERR("Reference counting error\n");
210 if (!obj
->u
.s
.owner_ref
) {
211 ERR("Error decrementing owner reference");
214 obj
->u
.s
.owner_ref
--;
216 if ((--obj
->u
.s
.f_count
) == 1) {
217 const struct lttng_ust_objd_ops
*ops
= objd_ops(id
);
227 void objd_table_destroy(void)
231 for (i
= 0; i
< objd_table
.allocated_len
; i
++) {
232 struct lttng_ust_obj
*obj
;
237 if (!obj
->u
.s
.owner_ref
)
238 continue; /* only unref owner ref. */
239 (void) lttng_ust_objd_unref(i
, 1);
241 free(objd_table
.array
);
242 objd_table
.array
= NULL
;
244 objd_table
.allocated_len
= 0;
245 objd_table
.freelist_head
= -1;
248 const char *lttng_ust_obj_get_name(int id
)
250 struct lttng_ust_obj
*obj
= _objd_get(id
);
254 return obj
->u
.s
.name
;
257 void lttng_ust_objd_table_owner_cleanup(void *owner
)
261 for (i
= 0; i
< objd_table
.allocated_len
; i
++) {
262 struct lttng_ust_obj
*obj
;
268 continue; /* skip root handles */
269 if (!obj
->u
.s
.owner_ref
)
270 continue; /* only unref owner ref. */
271 if (obj
->u
.s
.owner
== owner
)
272 (void) lttng_ust_objd_unref(i
, 1);
277 * This is LTTng's own personal way to create an ABI for sessiond.
278 * We send commands over a socket.
281 static const struct lttng_ust_objd_ops lttng_ops
;
282 static const struct lttng_ust_objd_ops lttng_session_ops
;
283 static const struct lttng_ust_objd_ops lttng_channel_ops
;
284 static const struct lttng_ust_objd_ops lttng_enabler_ops
;
285 static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops
;
286 static const struct lttng_ust_objd_ops lttng_tracepoint_field_list_ops
;
288 int lttng_abi_create_root_handle(void)
292 /* root handles have NULL owners */
293 root_handle
= objd_alloc(NULL
, <tng_ops
, NULL
, "root");
298 int lttng_is_channel_ready(struct lttng_channel
*lttng_chan
)
300 struct channel
*chan
;
301 unsigned int nr_streams
, exp_streams
;
303 chan
= lttng_chan
->chan
;
304 nr_streams
= channel_handle_get_nr_streams(lttng_chan
->handle
);
305 exp_streams
= chan
->nr_streams
;
306 return nr_streams
== exp_streams
;
310 int lttng_abi_create_session(void *owner
)
312 struct lttng_session
*session
;
313 int session_objd
, ret
;
315 session
= lttng_session_create();
318 session_objd
= objd_alloc(session
, <tng_session_ops
, owner
, "session");
319 if (session_objd
< 0) {
323 session
->objd
= session_objd
;
324 session
->owner
= owner
;
328 lttng_session_destroy(session
);
333 long lttng_abi_tracer_version(int objd
,
334 struct lttng_ust_tracer_version
*v
)
336 v
->major
= LTTNG_UST_MAJOR_VERSION
;
337 v
->minor
= LTTNG_UST_MINOR_VERSION
;
338 v
->patchlevel
= LTTNG_UST_PATCHLEVEL_VERSION
;
343 long lttng_abi_add_context(int objd
,
344 struct lttng_ust_context
*context_param
,
345 union ust_args
*uargs
,
346 struct lttng_ctx
**ctx
, struct lttng_session
*session
)
348 return lttng_attach_context(context_param
, uargs
, ctx
, session
);
352 * lttng_cmd - lttng control through socket commands
354 * @objd: the object descriptor
357 * @uargs: UST arguments (internal)
360 * This descriptor implements lttng commands:
362 * Returns a LTTng trace session object descriptor
363 * LTTNG_UST_TRACER_VERSION
364 * Returns the LTTng kernel tracer version
365 * LTTNG_UST_TRACEPOINT_LIST
366 * Returns a file descriptor listing available tracepoints
367 * LTTNG_UST_TRACEPOINT_FIELD_LIST
368 * Returns a file descriptor listing available tracepoint fields
369 * LTTNG_UST_WAIT_QUIESCENT
370 * Returns after all previously running probes have completed
372 * The returned session will be deleted when its file descriptor is closed.
375 long lttng_cmd(int objd
, unsigned int cmd
, unsigned long arg
,
376 union ust_args
*uargs
, void *owner
)
379 case LTTNG_UST_SESSION
:
380 return lttng_abi_create_session(owner
);
381 case LTTNG_UST_TRACER_VERSION
:
382 return lttng_abi_tracer_version(objd
,
383 (struct lttng_ust_tracer_version
*) arg
);
384 case LTTNG_UST_TRACEPOINT_LIST
:
385 return lttng_abi_tracepoint_list(owner
);
386 case LTTNG_UST_TRACEPOINT_FIELD_LIST
:
387 return lttng_abi_tracepoint_field_list(owner
);
388 case LTTNG_UST_WAIT_QUIESCENT
:
396 static const struct lttng_ust_objd_ops lttng_ops
= {
400 int lttng_abi_map_channel(int session_objd
,
401 struct lttng_ust_channel
*ust_chan
,
402 union ust_args
*uargs
,
405 struct lttng_session
*session
= objd_private(session_objd
);
406 const char *transport_name
;
407 const struct lttng_transport
*transport
;
408 const char *chan_name
;
410 struct lttng_ust_shm_handle
*channel_handle
;
411 struct lttng_channel
*lttng_chan
;
412 struct channel
*chan
;
413 struct lttng_ust_lib_ring_buffer_config
*config
;
418 enum lttng_ust_chan_type type
;
420 chan_data
= uargs
->channel
.chan_data
;
421 wakeup_fd
= uargs
->channel
.wakeup_fd
;
423 type
= ust_chan
->type
;
426 case LTTNG_UST_CHAN_PER_CPU
:
433 if (session
->been_active
) {
435 goto active
; /* Refuse to add channel to active session */
438 channel_handle
= channel_handle_create(chan_data
, len
, wakeup_fd
);
439 if (!channel_handle
) {
444 chan
= shmp(channel_handle
, channel_handle
->chan
);
446 chan
->handle
= channel_handle
;
447 config
= &chan
->backend
.config
;
448 lttng_chan
= channel_get_private(chan
);
454 /* Lookup transport name */
456 case LTTNG_UST_CHAN_PER_CPU
:
457 if (config
->output
== RING_BUFFER_MMAP
) {
458 if (config
->mode
== RING_BUFFER_OVERWRITE
) {
459 if (config
->wakeup
== RING_BUFFER_WAKEUP_BY_WRITER
) {
460 transport_name
= "relay-overwrite-mmap";
462 transport_name
= "relay-overwrite-rt-mmap";
465 if (config
->wakeup
== RING_BUFFER_WAKEUP_BY_WRITER
) {
466 transport_name
= "relay-discard-mmap";
468 transport_name
= "relay-discard-rt-mmap";
475 chan_name
= "channel";
481 transport
= lttng_transport_find(transport_name
);
483 DBG("LTTng transport %s not found\n",
489 chan_objd
= objd_alloc(NULL
, <tng_channel_ops
, owner
, chan_name
);
495 /* Initialize our lttng chan */
496 lttng_chan
->chan
= chan
;
497 lttng_chan
->tstate
= 1;
498 lttng_chan
->enabled
= 1;
499 lttng_chan
->ctx
= NULL
;
500 lttng_chan
->session
= session
;
501 lttng_chan
->ops
= &transport
->ops
;
502 memcpy(<tng_chan
->chan
->backend
.config
,
503 transport
->client_config
,
504 sizeof(lttng_chan
->chan
->backend
.config
));
505 cds_list_add(<tng_chan
->node
, &session
->chan_head
);
506 lttng_chan
->header_type
= 0;
507 lttng_chan
->handle
= channel_handle
;
508 lttng_chan
->type
= type
;
511 * We tolerate no failure path after channel creation. It will stay
512 * invariant for the rest of the session.
514 objd_set_private(chan_objd
, lttng_chan
);
515 lttng_chan
->objd
= chan_objd
;
516 /* The channel created holds a reference on the session */
517 objd_ref(session_objd
);
520 /* error path after channel was created */
524 channel_destroy(chan
, channel_handle
, 0);
528 * error path before channel creation (owning chan_data and
537 lttng_ust_lock_fd_tracker();
538 close_ret
= close(wakeup_fd
);
539 lttng_ust_unlock_fd_tracker();
549 * lttng_session_cmd - lttng session object command
554 * @uargs: UST arguments (internal)
557 * This descriptor implements lttng commands:
559 * Returns a LTTng channel object descriptor
561 * Enables tracing for a session (weak enable)
563 * Disables tracing for a session (strong disable)
565 * The returned channel will be deleted when its file descriptor is closed.
568 long lttng_session_cmd(int objd
, unsigned int cmd
, unsigned long arg
,
569 union ust_args
*uargs
, void *owner
)
571 struct lttng_session
*session
= objd_private(objd
);
574 case LTTNG_UST_CHANNEL
:
575 return lttng_abi_map_channel(objd
,
576 (struct lttng_ust_channel
*) arg
,
578 case LTTNG_UST_SESSION_START
:
579 case LTTNG_UST_ENABLE
:
580 return lttng_session_enable(session
);
581 case LTTNG_UST_SESSION_STOP
:
582 case LTTNG_UST_DISABLE
:
583 return lttng_session_disable(session
);
584 case LTTNG_UST_SESSION_STATEDUMP
:
585 return lttng_session_statedump(session
);
592 * Called when the last file reference is dropped.
594 * Big fat note: channels and events are invariant for the whole session after
595 * their creation. So this session destruction also destroys all channel and
596 * event structures specific to this session (they are not destroyed when their
597 * individual file is released).
600 int lttng_release_session(int objd
)
602 struct lttng_session
*session
= objd_private(objd
);
605 lttng_session_destroy(session
);
612 static const struct lttng_ust_objd_ops lttng_session_ops
= {
613 .release
= lttng_release_session
,
614 .cmd
= lttng_session_cmd
,
618 long lttng_tracepoint_list_cmd(int objd
, unsigned int cmd
, unsigned long arg
,
619 union ust_args
*uargs
, void *owner
)
621 struct lttng_ust_tracepoint_list
*list
= objd_private(objd
);
622 struct lttng_ust_tracepoint_iter
*tp
=
623 (struct lttng_ust_tracepoint_iter
*) arg
;
624 struct lttng_ust_tracepoint_iter
*iter
;
627 case LTTNG_UST_TRACEPOINT_LIST_GET
:
629 iter
= lttng_ust_tracepoint_list_get_iter_next(list
);
631 return -LTTNG_UST_ERR_NOENT
;
632 memcpy(tp
, iter
, sizeof(*tp
));
641 int lttng_abi_tracepoint_list(void *owner
)
644 struct lttng_ust_tracepoint_list
*list
;
646 list_objd
= objd_alloc(NULL
, <tng_tracepoint_list_ops
, owner
, "tp_list");
651 list
= zmalloc(sizeof(*list
));
656 objd_set_private(list_objd
, list
);
658 /* populate list by walking on all registered probes. */
659 ret
= lttng_probes_get_event_list(list
);
671 err
= lttng_ust_objd_unref(list_objd
, 1);
679 int lttng_release_tracepoint_list(int objd
)
681 struct lttng_ust_tracepoint_list
*list
= objd_private(objd
);
684 lttng_probes_prune_event_list(list
);
692 static const struct lttng_ust_objd_ops lttng_tracepoint_list_ops
= {
693 .release
= lttng_release_tracepoint_list
,
694 .cmd
= lttng_tracepoint_list_cmd
,
698 long lttng_tracepoint_field_list_cmd(int objd
, unsigned int cmd
,
699 unsigned long arg
, union ust_args
*uargs
, void *owner
)
701 struct lttng_ust_field_list
*list
= objd_private(objd
);
702 struct lttng_ust_field_iter
*tp
= &uargs
->field_list
.entry
;
703 struct lttng_ust_field_iter
*iter
;
706 case LTTNG_UST_TRACEPOINT_FIELD_LIST_GET
:
708 iter
= lttng_ust_field_list_get_iter_next(list
);
710 return -LTTNG_UST_ERR_NOENT
;
711 memcpy(tp
, iter
, sizeof(*tp
));
720 int lttng_abi_tracepoint_field_list(void *owner
)
723 struct lttng_ust_field_list
*list
;
725 list_objd
= objd_alloc(NULL
, <tng_tracepoint_field_list_ops
, owner
,
731 list
= zmalloc(sizeof(*list
));
736 objd_set_private(list_objd
, list
);
738 /* populate list by walking on all registered probes. */
739 ret
= lttng_probes_get_field_list(list
);
751 err
= lttng_ust_objd_unref(list_objd
, 1);
759 int lttng_release_tracepoint_field_list(int objd
)
761 struct lttng_ust_field_list
*list
= objd_private(objd
);
764 lttng_probes_prune_field_list(list
);
772 static const struct lttng_ust_objd_ops lttng_tracepoint_field_list_ops
= {
773 .release
= lttng_release_tracepoint_field_list
,
774 .cmd
= lttng_tracepoint_field_list_cmd
,
778 int lttng_abi_map_stream(int channel_objd
, struct lttng_ust_stream
*info
,
779 union ust_args
*uargs
, void *owner
)
781 struct lttng_channel
*channel
= objd_private(channel_objd
);
784 ret
= channel_handle_add_stream(channel
->handle
,
785 uargs
->stream
.shm_fd
, uargs
->stream
.wakeup_fd
,
786 info
->stream_nr
, info
->len
);
788 goto error_add_stream
;
797 int lttng_abi_create_enabler(int channel_objd
,
798 struct lttng_ust_event
*event_param
,
800 enum lttng_enabler_type type
)
802 struct lttng_channel
*channel
= objd_private(channel_objd
);
803 struct lttng_enabler
*enabler
;
806 event_param
->name
[LTTNG_UST_SYM_NAME_LEN
- 1] = '\0';
807 event_objd
= objd_alloc(NULL
, <tng_enabler_ops
, owner
, "enabler");
808 if (event_objd
< 0) {
813 * We tolerate no failure path after event creation. It will stay
814 * invariant for the rest of the session.
816 enabler
= lttng_enabler_create(type
, event_param
, channel
);
821 objd_set_private(event_objd
, enabler
);
822 /* The event holds a reference on the channel */
823 objd_ref(channel_objd
);
830 err
= lttng_ust_objd_unref(event_objd
, 1);
838 * lttng_channel_cmd - lttng control through object descriptors
840 * @objd: the object descriptor
843 * @uargs: UST arguments (internal)
846 * This object descriptor implements lttng commands:
848 * Returns an event stream object descriptor or failure.
849 * (typically, one event stream records events from one CPU)
851 * Returns an event object descriptor or failure.
853 * Prepend a context field to each event in the channel
855 * Enable recording for events in this channel (weak enable)
857 * Disable recording for events in this channel (strong disable)
859 * Channel and event file descriptors also hold a reference on the session.
862 long lttng_channel_cmd(int objd
, unsigned int cmd
, unsigned long arg
,
863 union ust_args
*uargs
, void *owner
)
865 struct lttng_channel
*channel
= objd_private(objd
);
867 if (cmd
!= LTTNG_UST_STREAM
) {
869 * Check if channel received all streams.
871 if (!lttng_is_channel_ready(channel
))
876 case LTTNG_UST_STREAM
:
878 struct lttng_ust_stream
*stream
;
880 stream
= (struct lttng_ust_stream
*) arg
;
881 /* stream used as output */
882 return lttng_abi_map_stream(objd
, stream
, uargs
, owner
);
884 case LTTNG_UST_EVENT
:
886 struct lttng_ust_event
*event_param
=
887 (struct lttng_ust_event
*) arg
;
889 if (strutils_is_star_glob_pattern(event_param
->name
)) {
891 * If the event name is a star globbing pattern,
892 * we create the special star globbing enabler.
894 return lttng_abi_create_enabler(objd
, event_param
,
895 owner
, LTTNG_ENABLER_STAR_GLOB
);
897 return lttng_abi_create_enabler(objd
, event_param
,
898 owner
, LTTNG_ENABLER_EVENT
);
901 case LTTNG_UST_CONTEXT
:
902 return lttng_abi_add_context(objd
,
903 (struct lttng_ust_context
*) arg
, uargs
,
904 &channel
->ctx
, channel
->session
);
905 case LTTNG_UST_ENABLE
:
906 return lttng_channel_enable(channel
);
907 case LTTNG_UST_DISABLE
:
908 return lttng_channel_disable(channel
);
909 case LTTNG_UST_FLUSH_BUFFER
:
910 return channel
->ops
->flush_buffer(channel
->chan
, channel
->handle
);
917 int lttng_channel_release(int objd
)
919 struct lttng_channel
*channel
= objd_private(objd
);
922 return lttng_ust_objd_unref(channel
->session
->objd
, 0);
926 static const struct lttng_ust_objd_ops lttng_channel_ops
= {
927 .release
= lttng_channel_release
,
928 .cmd
= lttng_channel_cmd
,
932 * lttng_enabler_cmd - lttng control through object descriptors
934 * @objd: the object descriptor
937 * @uargs: UST arguments (internal)
940 * This object descriptor implements lttng commands:
942 * Prepend a context field to each record of events of this
945 * Enable recording for this enabler
947 * Disable recording for this enabler
949 * Attach a filter to an enabler.
950 * LTTNG_UST_EXCLUSION
951 * Attach exclusions to an enabler.
954 long lttng_enabler_cmd(int objd
, unsigned int cmd
, unsigned long arg
,
955 union ust_args
*uargs
, void *owner
)
957 struct lttng_enabler
*enabler
= objd_private(objd
);
960 case LTTNG_UST_CONTEXT
:
961 return lttng_enabler_attach_context(enabler
,
962 (struct lttng_ust_context
*) arg
);
963 case LTTNG_UST_ENABLE
:
964 return lttng_enabler_enable(enabler
);
965 case LTTNG_UST_DISABLE
:
966 return lttng_enabler_disable(enabler
);
967 case LTTNG_UST_FILTER
:
971 ret
= lttng_enabler_attach_bytecode(enabler
,
972 (struct lttng_ust_filter_bytecode_node
*) arg
);
977 case LTTNG_UST_EXCLUSION
:
979 return lttng_enabler_attach_exclusion(enabler
,
980 (struct lttng_ust_excluder_node
*) arg
);
988 int lttng_enabler_release(int objd
)
990 struct lttng_enabler
*enabler
= objd_private(objd
);
993 return lttng_ust_objd_unref(enabler
->chan
->objd
, 0);
997 static const struct lttng_ust_objd_ops lttng_enabler_ops
= {
998 .release
= lttng_enabler_release
,
999 .cmd
= lttng_enabler_cmd
,
1002 void lttng_ust_abi_exit(void)
1004 lttng_ust_abi_close_in_progress
= 1;
1006 objd_table_destroy();
1008 lttng_ust_abi_close_in_progress
= 0;