1/* Copyright (C) 2003-2021 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public License as
7 published by the Free Software Foundation; either version 2.1 of the
8 License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; see the file COPYING.LIB. If
17 not, see <https://www.gnu.org/licenses/>. */
18
19#include <errno.h>
20#include <setjmp.h>
21#include <signal.h>
22#include <stdbool.h>
23#include <sysdep-cancel.h>
24#include <pthreadP.h>
25#include "kernel-posix-timers.h"
26
27
28/* List of active SIGEV_THREAD timers. */
29struct timer *__timer_active_sigev_thread;
30
31/* Lock for _timer_active_sigev_thread. */
32pthread_mutex_t __timer_active_sigev_thread_lock = PTHREAD_MUTEX_INITIALIZER;
33
34struct thread_start_data
35{
36 void (*thrfunc) (sigval_t);
37 sigval_t sival;
38};
39
40
41/* Helper thread to call the user-provided function. */
42static void *
43timer_sigev_thread (void *arg)
44{
45 __libc_signal_unblock_sigtimer (NULL);
46
47 struct thread_start_data *td = (struct thread_start_data *) arg;
48 void (*thrfunc) (sigval_t) = td->thrfunc;
49 sigval_t sival = td->sival;
50
51 /* The TD object was allocated in timer_helper_thread. */
52 free (td);
53
54 /* Call the user-provided function. */
55 thrfunc (sival);
56
57 return NULL;
58}
59
60
61/* Helper function to support starting threads for SIGEV_THREAD. */
62static _Noreturn void *
63timer_helper_thread (void *arg)
64{
65 /* Endless loop of waiting for signals. The loop is only ended when
66 the thread is canceled. */
67 while (1)
68 {
69 siginfo_t si;
70
71 while (__sigwaitinfo (&sigtimer_set, &si) < 0);
72 if (si.si_code == SI_TIMER)
73 {
74 struct timer *tk = (struct timer *) si.si_ptr;
75
76 /* Check the timer is still used and will not go away
77 while we are reading the values here. */
78 __pthread_mutex_lock (&__timer_active_sigev_thread_lock);
79
80 struct timer *runp = __timer_active_sigev_thread;
81 while (runp != NULL)
82 if (runp == tk)
83 break;
84 else
85 runp = runp->next;
86
87 if (runp != NULL)
88 {
89 struct thread_start_data *td = malloc (sizeof (*td));
90
91 /* There is not much we can do if the allocation fails. */
92 if (td != NULL)
93 {
94 /* This is the signal we are waiting for. */
95 td->thrfunc = tk->thrfunc;
96 td->sival = tk->sival;
97
98 pthread_t th;
99 __pthread_create (&th, &tk->attr, timer_sigev_thread, td);
100 }
101 }
102
103 __pthread_mutex_unlock (&__timer_active_sigev_thread_lock);
104 }
105 }
106}
107
108
109/* Control variable for helper thread creation. */
110pthread_once_t __timer_helper_once = PTHREAD_ONCE_INIT;
111
112
113/* TID of the helper thread. */
114pid_t __timer_helper_tid;
115
116
117/* Reset variables so that after a fork a new helper thread gets started. */
118void
119__timer_fork_subprocess (void)
120{
121 __timer_helper_once = PTHREAD_ONCE_INIT;
122 __timer_helper_tid = 0;
123}
124
125
126void
127__timer_start_helper_thread (void)
128{
129 /* The helper thread needs only very little resources
130 and should go away automatically when canceled. */
131 pthread_attr_t attr;
132 __pthread_attr_init (&attr);
133 __pthread_attr_setstacksize (&attr, __pthread_get_minstack (&attr));
134
135 /* Block all signals in the helper thread but SIGSETXID. */
136 sigset_t ss;
137 __sigfillset (&ss);
138 __sigdelset (&ss, SIGSETXID);
139 int res = __pthread_attr_setsigmask_internal (&attr, &ss);
140 if (res != 0)
141 {
142 __pthread_attr_destroy (&attr);
143 return;
144 }
145
146 /* Create the helper thread for this timer. */
147 pthread_t th;
148 res = __pthread_create (&th, &attr, timer_helper_thread, NULL);
149 if (res == 0)
150 /* We managed to start the helper thread. */
151 __timer_helper_tid = ((struct pthread *) th)->tid;
152
153 /* No need for the attribute anymore. */
154 __pthread_attr_destroy (&attr);
155}
156