(timer_create): Return correct error for CPU clocks.
[kopensolaris-gnu/glibc.git] / linuxthreads / sysdeps / pthread / timer_create.c
1 /* Copyright (C) 2000, 2003 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Kaz Kylheku <kaz@ashi.footprints.net>.
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 not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <errno.h>
21 #include <signal.h>
22 #include <pthread.h>
23 #include <time.h>
24 #include <unistd.h>
25
26 #include "posix-timer.h"
27
28
29 /* Create new per-process timer using CLOCK.  */
30 int
31 timer_create (clock_id, evp, timerid)
32      clockid_t clock_id;
33      struct sigevent *evp;
34      timer_t *timerid;
35 {
36   int retval = -1;
37   struct timer_node *newtimer = NULL;
38   struct thread_node *thread = NULL;
39
40   if (0
41 #ifdef _POSIX_CPUTIME
42       || clock_id == CLOCK_PROCESS_CPUTIME_ID
43 #endif
44 #ifdef _POSIX_THREAD_CPUTIME
45       || clock_id == CLOCK_THREAD_CPUTIME_ID
46 #endif
47       )
48     {
49       /* We don't allow timers for CPU clocks.  At least not in the
50          moment.  */
51       __set_errno (ENOTSUP);
52       return -1;
53     }
54
55   if (clock_id != CLOCK_REALTIME)
56     {
57       __set_errno (EINVAL);
58       return -1;
59     }
60
61   pthread_once (&__timer_init_once_control, __timer_init_once);
62
63   if (__timer_init_failed)
64     {
65       __set_errno (ENOMEM);
66       return -1;
67     }
68
69   pthread_mutex_lock (&__timer_mutex);
70
71   newtimer = __timer_alloc ();
72   if (__builtin_expect (newtimer == NULL, 0))
73     {
74       __set_errno (EAGAIN);
75       goto unlock_bail;
76     }
77
78   if (evp != NULL)
79     newtimer->event = *evp;
80   else
81     {
82       newtimer->event.sigev_notify = SIGEV_SIGNAL;
83       newtimer->event.sigev_signo = SIGALRM;
84       newtimer->event.sigev_value.sival_int = timer_ptr2id (newtimer);
85       newtimer->event.sigev_notify_function = 0;
86     }
87
88   newtimer->event.sigev_notify_attributes = &newtimer->attr;
89   newtimer->creator_pid = getpid ();
90
91   switch (__builtin_expect (newtimer->event.sigev_notify, SIGEV_SIGNAL))
92     {
93     case SIGEV_NONE:
94       /* This is a strange choice!  */
95       break;
96
97     case SIGEV_SIGNAL:
98       /* We have a global thread for delivering timed signals.
99          If it is not running, try to start it up.  */
100       switch (clock_id)
101         {
102         case CLOCK_REALTIME:
103         default:
104           thread = &__timer_signal_thread_rclk;
105           break;
106 #ifdef _POSIX_CPUTIME
107         case CLOCK_PROCESS_CPUTIME_ID:
108           thread = &__timer_signal_thread_pclk;
109           break;
110 #endif
111 #ifdef _POSIX_THREAD_CPUTIME
112         case CLOCK_THREAD_CPUTIME_ID:
113           thread = &__timer_signal_thread_tclk;
114           break;
115 #endif
116         }
117
118       if (! thread->exists)
119         {
120           if (__builtin_expect (__timer_thread_start (thread),
121                                 1) < 0)
122             {
123               __set_errno (EAGAIN);
124               goto unlock_bail;
125             }
126         }
127       break;
128
129     case SIGEV_THREAD:
130       /* Copy over thread attributes or set up default ones.  */
131       if (evp->sigev_notify_attributes)
132         newtimer->attr = *(pthread_attr_t *) evp->sigev_notify_attributes;
133       else
134         pthread_attr_init (&newtimer->attr);
135
136       /* Ensure thread attributes call for deatched thread.  */
137       pthread_attr_setdetachstate (&newtimer->attr, PTHREAD_CREATE_DETACHED);
138
139       /* Try to find existing thread having the right attributes.  */
140       thread = __timer_thread_find_matching (&newtimer->attr, clock_id);
141
142       /* If no existing thread has these attributes, try to allocate one.  */
143       if (thread == NULL)
144         thread = __timer_thread_alloc (&newtimer->attr, clock_id);
145
146       /* Out of luck; no threads are available.  */
147       if (__builtin_expect (thread == NULL, 0))
148         {
149           __set_errno (EAGAIN);
150           goto unlock_bail;
151         }
152
153       /* If the thread is not running already, try to start it.  */
154       if (! thread->exists
155           && __builtin_expect (! __timer_thread_start (thread), 0))
156         {
157           __set_errno (EAGAIN);
158           goto unlock_bail;
159         }
160       break;
161
162     default:
163       __set_errno (EINVAL);
164       goto unlock_bail;
165     }
166
167   newtimer->clock = clock_id;
168   newtimer->abstime = 0;
169   newtimer->armed = 0;
170   newtimer->thread = thread;
171
172   *timerid = timer_ptr2id (newtimer);
173   retval = 0;
174
175   if (__builtin_expect (retval, 0) == -1)
176     {
177     unlock_bail:
178       if (thread != NULL)
179         __timer_thread_dealloc (thread);
180       if (newtimer != NULL)
181         __timer_dealloc (newtimer);
182     }
183
184   pthread_mutex_unlock (&__timer_mutex);
185
186   return retval;
187 }