4 * Copyright (C) 2011 David Goulet <david.goulet@polymtl.ca>
5 * Copyright (C) 2011 Mathieu Desnoyers <mathieu.desnoyers@efficios.com>
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; only
10 * version 2.1 of the License.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23 #include <sys/types.h>
24 #include <sys/socket.h>
25 #include <sys/prctl.h>
28 #include <sys/types.h>
34 #include <semaphore.h>
38 #include <urcu/uatomic.h>
39 #include <urcu/futex.h>
40 #include <urcu/compiler.h>
42 #include <lttng/ust-events.h>
43 #include <lttng/ust-abi.h>
44 #include <lttng/ust.h>
46 #include <usterr-signal-safe.h>
47 #include "tracepoint-internal.h"
48 #include "ltt-tracer-core.h"
51 * Has lttng ust comm constructor been called ?
53 static int initialized
;
56 * The ust_lock/ust_unlock lock is used as a communication thread mutex.
57 * Held when handling a command, also held by fork() to deal with
58 * removal of threads, and by exit path.
61 /* Should the ust comm thread quit ? */
62 static int lttng_ust_comm_should_quit
;
65 * Wait for either of these before continuing to the main
67 * - the register_done message from sessiond daemon
68 * (will let the sessiond daemon enable sessions before main
70 * - sessiond daemon is not reachable.
71 * - timeout (ensuring applications are resilient to session
74 static sem_t constructor_wait
;
76 * Doing this for both the global and local sessiond.
78 static int sem_count
= { 2 };
81 * Info about socket and associated listener thread.
85 pthread_t ust_listener
; /* listener thread */
87 int constructor_sem_posted
;
91 char sock_path
[PATH_MAX
];
94 char wait_shm_path
[PATH_MAX
];
98 /* Socket from app (connect) to session daemon (listen) for communication */
99 struct sock_info global_apps
= {
106 .sock_path
= DEFAULT_GLOBAL_APPS_UNIX_SOCK
,
109 .wait_shm_path
= DEFAULT_GLOBAL_APPS_WAIT_SHM_PATH
,
112 /* TODO: allow global_apps_sock_path override */
114 struct sock_info local_apps
= {
118 .allowed
= 0, /* Check setuid bit first */
123 static int wait_poll_fallback
;
125 extern void ltt_ring_buffer_client_overwrite_init(void);
126 extern void ltt_ring_buffer_client_discard_init(void);
127 extern void ltt_ring_buffer_metadata_client_init(void);
128 extern void ltt_ring_buffer_client_overwrite_exit(void);
129 extern void ltt_ring_buffer_client_discard_exit(void);
130 extern void ltt_ring_buffer_metadata_client_exit(void);
133 int setup_local_apps(void)
135 const char *home_dir
;
140 * Disallow per-user tracing for setuid binaries.
142 if (uid
!= geteuid()) {
143 local_apps
.allowed
= 0;
146 local_apps
.allowed
= 1;
148 home_dir
= (const char *) getenv("HOME");
151 snprintf(local_apps
.sock_path
, PATH_MAX
,
152 DEFAULT_HOME_APPS_UNIX_SOCK
, home_dir
);
153 snprintf(local_apps
.wait_shm_path
, PATH_MAX
,
154 DEFAULT_HOME_APPS_WAIT_SHM_PATH
, uid
);
159 int register_app_to_sessiond(int socket
)
170 uint32_t bits_per_long
;
171 char name
[16]; /* process name */
174 reg_msg
.major
= LTTNG_UST_COMM_VERSION_MAJOR
;
175 reg_msg
.minor
= LTTNG_UST_COMM_VERSION_MINOR
;
176 reg_msg
.pid
= getpid();
177 reg_msg
.ppid
= getppid();
178 reg_msg
.uid
= getuid();
179 reg_msg
.gid
= getgid();
180 reg_msg
.bits_per_long
= CAA_BITS_PER_LONG
;
181 prctl_ret
= prctl(PR_GET_NAME
, (unsigned long) reg_msg
.name
, 0, 0, 0);
183 ERR("Error executing prctl");
187 ret
= ustcomm_send_unix_sock(socket
, ®_msg
, sizeof(reg_msg
));
188 if (ret
>= 0 && ret
!= sizeof(reg_msg
))
194 int send_reply(int sock
, struct ustcomm_ust_reply
*lur
)
198 len
= ustcomm_send_unix_sock(sock
, lur
, sizeof(*lur
));
201 DBG("message successfully sent");
204 if (errno
== ECONNRESET
) {
205 printf("remote end closed connection\n");
210 printf("incorrect message size: %zd\n", len
);
216 int handle_register_done(struct sock_info
*sock_info
)
220 if (sock_info
->constructor_sem_posted
)
222 sock_info
->constructor_sem_posted
= 1;
223 if (uatomic_read(&sem_count
) <= 0) {
226 ret
= uatomic_add_return(&sem_count
, -1);
228 ret
= sem_post(&constructor_wait
);
235 int handle_message(struct sock_info
*sock_info
,
236 int sock
, struct ustcomm_ust_msg
*lum
)
239 const struct lttng_ust_objd_ops
*ops
;
240 struct ustcomm_ust_reply lur
;
246 memset(&lur
, 0, sizeof(lur
));
248 if (lttng_ust_comm_should_quit
) {
253 ops
= objd_ops(lum
->handle
);
260 case LTTNG_UST_REGISTER_DONE
:
261 if (lum
->handle
== LTTNG_UST_ROOT_HANDLE
)
262 ret
= handle_register_done(sock_info
);
266 case LTTNG_UST_RELEASE
:
267 if (lum
->handle
== LTTNG_UST_ROOT_HANDLE
)
270 ret
= lttng_ust_objd_unref(lum
->handle
);
274 ret
= ops
->cmd(lum
->handle
, lum
->cmd
,
275 (unsigned long) &lum
->u
,
283 lur
.handle
= lum
->handle
;
287 lur
.ret_code
= USTCOMM_OK
;
289 //lur.ret_code = USTCOMM_SESSION_FAIL;
293 case LTTNG_UST_STREAM
:
295 * Special-case reply to send stream info.
298 lur
.u
.stream
.memory_map_size
= *args
.stream
.memory_map_size
;
299 shm_fd
= *args
.stream
.shm_fd
;
300 wait_fd
= *args
.stream
.wait_fd
;
302 case LTTNG_UST_METADATA
:
303 case LTTNG_UST_CHANNEL
:
304 lur
.u
.channel
.memory_map_size
= *args
.channel
.memory_map_size
;
305 shm_fd
= *args
.channel
.shm_fd
;
306 wait_fd
= *args
.channel
.wait_fd
;
308 case LTTNG_UST_TRACER_VERSION
:
309 lur
.u
.version
= lum
->u
.version
;
311 case LTTNG_UST_TRACEPOINT_LIST_GET
:
312 memcpy(&lur
.u
.tracepoint
, &lum
->u
.tracepoint
, sizeof(lur
.u
.tracepoint
));
315 ret
= send_reply(sock
, &lur
);
317 perror("error sending reply");
321 if ((lum
->cmd
== LTTNG_UST_STREAM
322 || lum
->cmd
== LTTNG_UST_CHANNEL
323 || lum
->cmd
== LTTNG_UST_METADATA
)
324 && lur
.ret_code
== USTCOMM_OK
) {
325 /* we also need to send the file descriptors. */
326 ret
= ustcomm_send_fds_unix_sock(sock
,
330 perror("send shm_fd");
333 ret
= ustcomm_send_fds_unix_sock(sock
,
337 perror("send wait_fd");
342 * We still have the memory map reference, and the fds have been
343 * sent to the sessiond. We can therefore close those fds.
345 if (lur
.ret_code
== USTCOMM_OK
) {
347 case LTTNG_UST_STREAM
:
351 PERROR("Error closing stream shm_fd");
353 *args
.stream
.shm_fd
= -1;
356 ret
= close(wait_fd
);
358 PERROR("Error closing stream wait_fd");
360 *args
.stream
.wait_fd
= -1;
363 case LTTNG_UST_METADATA
:
364 case LTTNG_UST_CHANNEL
:
368 PERROR("Error closing channel shm_fd");
370 *args
.channel
.shm_fd
= -1;
373 ret
= close(wait_fd
);
375 PERROR("Error closing channel wait_fd");
377 *args
.channel
.wait_fd
= -1;
389 void cleanup_sock_info(struct sock_info
*sock_info
)
393 if (sock_info
->socket
!= -1) {
394 ret
= close(sock_info
->socket
);
396 ERR("Error closing apps socket");
398 sock_info
->socket
= -1;
400 if (sock_info
->root_handle
!= -1) {
401 ret
= lttng_ust_objd_unref(sock_info
->root_handle
);
403 ERR("Error unref root handle");
405 sock_info
->root_handle
= -1;
407 sock_info
->constructor_sem_posted
= 0;
408 if (sock_info
->wait_shm_mmap
) {
409 ret
= munmap(sock_info
->wait_shm_mmap
, sysconf(_SC_PAGE_SIZE
));
411 ERR("Error unmapping wait shm");
413 sock_info
->wait_shm_mmap
= NULL
;
418 * Using fork to set umask in the child process (not multi-thread safe).
419 * We deal with the shm_open vs ftruncate race (happening when the
420 * sessiond owns the shm and does not let everybody modify it, to ensure
421 * safety against shm_unlink) by simply letting the mmap fail and
422 * retrying after a few seconds.
423 * For global shm, everybody has rw access to it until the sessiond
427 int get_wait_shm(struct sock_info
*sock_info
, size_t mmap_size
)
429 int wait_shm_fd
, ret
;
433 * Try to open read-only.
435 wait_shm_fd
= shm_open(sock_info
->wait_shm_path
, O_RDONLY
, 0);
436 if (wait_shm_fd
>= 0) {
438 } else if (wait_shm_fd
< 0 && errno
!= ENOENT
) {
440 * Real-only open did not work, and it's not because the
441 * entry was not present. It's a failure that prohibits
444 ERR("Error opening shm %s", sock_info
->wait_shm_path
);
448 * If the open failed because the file did not exist, try
449 * creating it ourself.
456 * Parent: wait for child to return, in which case the
457 * shared memory map will have been created.
460 if (pid
< 0 || !WIFEXITED(status
) || WEXITSTATUS(status
) != 0) {
465 * Try to open read-only again after creation.
467 wait_shm_fd
= shm_open(sock_info
->wait_shm_path
, O_RDONLY
, 0);
468 if (wait_shm_fd
< 0) {
470 * Real-only open did not work. It's a failure
471 * that prohibits using shm.
473 ERR("Error opening shm %s", sock_info
->wait_shm_path
);
477 } else if (pid
== 0) {
481 create_mode
= S_IRUSR
| S_IWUSR
| S_IRGRP
;
482 if (sock_info
->global
)
483 create_mode
|= S_IROTH
| S_IWGRP
| S_IWOTH
;
485 * We're alone in a child process, so we can modify the
486 * process-wide umask.
490 * Try creating shm (or get rw access).
491 * We don't do an exclusive open, because we allow other
492 * processes to create+ftruncate it concurrently.
494 wait_shm_fd
= shm_open(sock_info
->wait_shm_path
,
495 O_RDWR
| O_CREAT
, create_mode
);
496 if (wait_shm_fd
>= 0) {
497 ret
= ftruncate(wait_shm_fd
, mmap_size
);
505 * For local shm, we need to have rw access to accept
506 * opening it: this means the local sessiond will be
507 * able to wake us up. For global shm, we open it even
508 * if rw access is not granted, because the root.root
509 * sessiond will be able to override all rights and wake
512 if (!sock_info
->global
&& errno
!= EACCES
) {
513 ERR("Error opening shm %s", sock_info
->wait_shm_path
);
517 * The shm exists, but we cannot open it RW. Report
525 if (wait_shm_fd
>= 0 && !sock_info
->global
) {
529 * Ensure that our user is the owner of the shm file for
530 * local shm. If we do not own the file, it means our
531 * sessiond will not have access to wake us up (there is
532 * probably a rogue process trying to fake our
533 * sessiond). Fallback to polling method in this case.
535 ret
= fstat(wait_shm_fd
, &statbuf
);
540 if (statbuf
.st_uid
!= getuid())
546 ret
= close(wait_shm_fd
);
548 PERROR("Error closing fd");
554 char *get_map_shm(struct sock_info
*sock_info
)
556 size_t mmap_size
= sysconf(_SC_PAGE_SIZE
);
557 int wait_shm_fd
, ret
;
560 wait_shm_fd
= get_wait_shm(sock_info
, mmap_size
);
561 if (wait_shm_fd
< 0) {
564 wait_shm_mmap
= mmap(NULL
, mmap_size
, PROT_READ
,
565 MAP_SHARED
, wait_shm_fd
, 0);
566 /* close shm fd immediately after taking the mmap reference */
567 ret
= close(wait_shm_fd
);
569 PERROR("Error closing fd");
571 if (wait_shm_mmap
== MAP_FAILED
) {
572 DBG("mmap error (can be caused by race with sessiond). Fallback to poll mode.");
575 return wait_shm_mmap
;
582 void wait_for_sessiond(struct sock_info
*sock_info
)
587 if (lttng_ust_comm_should_quit
) {
590 if (wait_poll_fallback
) {
593 if (!sock_info
->wait_shm_mmap
) {
594 sock_info
->wait_shm_mmap
= get_map_shm(sock_info
);
595 if (!sock_info
->wait_shm_mmap
)
600 DBG("Waiting for %s apps sessiond", sock_info
->name
);
601 /* Wait for futex wakeup */
602 if (uatomic_read((int32_t *) sock_info
->wait_shm_mmap
) == 0) {
603 ret
= futex_async((int32_t *) sock_info
->wait_shm_mmap
,
604 FUTEX_WAIT
, 0, NULL
, NULL
, 0);
606 if (errno
== EFAULT
) {
607 wait_poll_fallback
= 1;
609 "Linux kernels 2.6.33 to 3.0 (with the exception of stable versions) "
610 "do not support FUTEX_WAKE on read-only memory mappings correctly. "
611 "Please upgrade your kernel "
612 "(fix is commit 9ea71503a8ed9184d2d0b8ccc4d269d05f7940ae in Linux kernel "
613 "mainline). LTTng-UST will use polling mode fallback.");
631 * This thread does not allocate any resource, except within
632 * handle_message, within mutex protection. This mutex protects against
634 * The other moment it allocates resources is at socket connexion, which
635 * is also protected by the mutex.
638 void *ust_listener_thread(void *arg
)
640 struct sock_info
*sock_info
= arg
;
641 int sock
, ret
, prev_connect_failed
= 0, has_waited
= 0;
643 /* Restart trying to connect to the session daemon */
645 if (prev_connect_failed
) {
646 /* Wait for sessiond availability with pipe */
647 wait_for_sessiond(sock_info
);
651 * Sleep for 5 seconds before retrying after a
652 * sequence of failure / wait / failure. This
653 * deals with a killed or broken session daemon.
658 prev_connect_failed
= 0;
662 if (lttng_ust_comm_should_quit
) {
667 if (sock_info
->socket
!= -1) {
668 ret
= close(sock_info
->socket
);
670 ERR("Error closing %s apps socket", sock_info
->name
);
672 sock_info
->socket
= -1;
676 ret
= ustcomm_connect_unix_sock(sock_info
->sock_path
);
678 DBG("Info: sessiond not accepting connections to %s apps socket", sock_info
->name
);
679 prev_connect_failed
= 1;
681 * If we cannot find the sessiond daemon, don't delay
682 * constructor execution.
684 ret
= handle_register_done(sock_info
);
690 sock_info
->socket
= sock
= ret
;
693 * Create only one root handle per listener thread for the whole
696 if (sock_info
->root_handle
== -1) {
697 ret
= lttng_abi_create_root_handle();
699 ERR("Error creating root handle");
703 sock_info
->root_handle
= ret
;
706 ret
= register_app_to_sessiond(sock
);
708 ERR("Error registering to %s apps socket", sock_info
->name
);
709 prev_connect_failed
= 1;
711 * If we cannot register to the sessiond daemon, don't
712 * delay constructor execution.
714 ret
= handle_register_done(sock_info
);
723 struct ustcomm_ust_msg lum
;
725 len
= ustcomm_recv_unix_sock(sock
, &lum
, sizeof(lum
));
727 case 0: /* orderly shutdown */
728 DBG("%s ltt-sessiond has performed an orderly shutdown\n", sock_info
->name
);
731 * Either sessiond has shutdown or refused us by closing the socket.
732 * In either case, we don't want to delay construction execution,
733 * and we need to wait before retry.
735 prev_connect_failed
= 1;
737 * If we cannot register to the sessiond daemon, don't
738 * delay constructor execution.
740 ret
= handle_register_done(sock_info
);
745 DBG("message received\n");
746 ret
= handle_message(sock_info
, sock
, &lum
);
748 ERR("Error handling message for %s socket", sock_info
->name
);
752 DBG("Receive failed from lttng-sessiond with errno %d", errno
);
753 if (errno
== ECONNRESET
) {
754 ERR("%s remote end closed connection\n", sock_info
->name
);
759 ERR("incorrect message size (%s socket): %zd\n", sock_info
->name
, len
);
765 goto restart
; /* try to reconnect */
771 * Return values: -1: don't wait. 0: wait forever. 1: timeout wait.
774 int get_timeout(struct timespec
*constructor_timeout
)
776 long constructor_delay_ms
= LTTNG_UST_DEFAULT_CONSTRUCTOR_TIMEOUT_MS
;
780 str_delay
= getenv("LTTNG_UST_REGISTER_TIMEOUT");
782 constructor_delay_ms
= strtol(str_delay
, NULL
, 10);
785 switch (constructor_delay_ms
) {
786 case -1:/* fall-through */
788 return constructor_delay_ms
;
794 * If we are unable to find the current time, don't wait.
796 ret
= clock_gettime(CLOCK_REALTIME
, constructor_timeout
);
800 constructor_timeout
->tv_sec
+= constructor_delay_ms
/ 1000UL;
801 constructor_timeout
->tv_nsec
+=
802 (constructor_delay_ms
% 1000UL) * 1000000UL;
803 if (constructor_timeout
->tv_nsec
>= 1000000000UL) {
804 constructor_timeout
->tv_sec
++;
805 constructor_timeout
->tv_nsec
-= 1000000000UL;
811 * sessiond monitoring thread: monitor presence of global and per-user
812 * sessiond by polling the application common named pipe.
816 void __attribute__((constructor
)) lttng_ust_init(void)
818 struct timespec constructor_timeout
;
822 if (uatomic_xchg(&initialized
, 1) == 1)
826 * We want precise control over the order in which we construct
827 * our sub-libraries vs starting to receive commands from
828 * sessiond (otherwise leading to errors when trying to create
829 * sessiond before the init functions are completed).
833 ltt_ring_buffer_metadata_client_init();
834 ltt_ring_buffer_client_overwrite_init();
835 ltt_ring_buffer_client_discard_init();
837 timeout_mode
= get_timeout(&constructor_timeout
);
839 ret
= sem_init(&constructor_wait
, 0, 0);
842 ret
= setup_local_apps();
844 ERR("Error setting up to local apps");
846 ret
= pthread_create(&local_apps
.ust_listener
, NULL
,
847 ust_listener_thread
, &local_apps
);
849 if (local_apps
.allowed
) {
850 ret
= pthread_create(&global_apps
.ust_listener
, NULL
,
851 ust_listener_thread
, &global_apps
);
853 handle_register_done(&local_apps
);
856 switch (timeout_mode
) {
857 case 1: /* timeout wait */
859 ret
= sem_timedwait(&constructor_wait
,
860 &constructor_timeout
);
861 } while (ret
< 0 && errno
== EINTR
);
862 if (ret
< 0 && errno
== ETIMEDOUT
) {
863 ERR("Timed out waiting for ltt-sessiond");
868 case -1:/* wait forever */
870 ret
= sem_wait(&constructor_wait
);
871 } while (ret
< 0 && errno
== EINTR
);
874 case 0: /* no timeout */
880 void lttng_ust_cleanup(int exiting
)
882 cleanup_sock_info(&global_apps
);
883 if (local_apps
.allowed
) {
884 cleanup_sock_info(&local_apps
);
886 lttng_ust_abi_exit();
887 lttng_ust_events_exit();
888 ltt_ring_buffer_client_discard_exit();
889 ltt_ring_buffer_client_overwrite_exit();
890 ltt_ring_buffer_metadata_client_exit();
893 /* Reinitialize values for fork */
895 lttng_ust_comm_should_quit
= 0;
900 void __attribute__((destructor
)) lttng_ust_exit(void)
905 * Using pthread_cancel here because:
906 * A) we don't want to hang application teardown.
907 * B) the thread is not allocating any resource.
911 * Require the communication thread to quit. Synchronize with
912 * mutexes to ensure it is not in a mutex critical section when
913 * pthread_cancel is later called.
916 lttng_ust_comm_should_quit
= 1;
919 ret
= pthread_cancel(global_apps
.ust_listener
);
921 ERR("Error cancelling global ust listener thread");
923 if (local_apps
.allowed
) {
924 ret
= pthread_cancel(local_apps
.ust_listener
);
926 ERR("Error cancelling local ust listener thread");
929 lttng_ust_cleanup(1);
933 * We exclude the worker threads across fork and clone (except
934 * CLONE_VM), because these system calls only keep the forking thread
935 * running in the child. Therefore, we don't want to call fork or clone
936 * in the middle of an tracepoint or ust tracing state modification.
937 * Holding this mutex protects these structures across fork and clone.
939 void ust_before_fork(sigset_t
*save_sigset
)
942 * Disable signals. This is to avoid that the child intervenes
943 * before it is properly setup for tracing. It is safer to
944 * disable all signals, because then we know we are not breaking
945 * anything by restoring the original mask.
950 /* Disable signals */
951 sigfillset(&all_sigs
);
952 ret
= sigprocmask(SIG_BLOCK
, &all_sigs
, save_sigset
);
954 PERROR("sigprocmask");
957 rcu_bp_before_fork();
960 static void ust_after_fork_common(sigset_t
*restore_sigset
)
964 DBG("process %d", getpid());
966 /* Restore signals */
967 ret
= sigprocmask(SIG_SETMASK
, restore_sigset
, NULL
);
969 PERROR("sigprocmask");
973 void ust_after_fork_parent(sigset_t
*restore_sigset
)
975 DBG("process %d", getpid());
976 rcu_bp_after_fork_parent();
977 /* Release mutexes and reenable signals */
978 ust_after_fork_common(restore_sigset
);
982 * After fork, in the child, we need to cleanup all the leftover state,
983 * except the worker thread which already magically disappeared thanks
984 * to the weird Linux fork semantics. After tyding up, we call
985 * lttng_ust_init() again to start over as a new PID.
987 * This is meant for forks() that have tracing in the child between the
988 * fork and following exec call (if there is any).
990 void ust_after_fork_child(sigset_t
*restore_sigset
)
992 DBG("process %d", getpid());
993 /* Release urcu mutexes */
994 rcu_bp_after_fork_child();
995 lttng_ust_cleanup(0);
996 lttng_context_vtid_reset();
997 /* Release mutexes and reenable signals */
998 ust_after_fork_common(restore_sigset
);