1 /* Test sem_timedwait cancellation for uncontended case.
2    Copyright (C) 2003-2022 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
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
7    License as published by the Free Software Foundation; either
8    version 2.1 of the 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; if not, see
17    <https://www.gnu.org/licenses/>.  */
18 
19 #include <errno.h>
20 #include <pthread.h>
21 #include <semaphore.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <unistd.h>
26 #include <sys/time.h>
27 
28 
29 static pthread_barrier_t bar;
30 static sem_t sem;
31 
32 
33 static void
cleanup(void * arg)34 cleanup (void *arg)
35 {
36   static int ncall;
37 
38   if (++ncall != 1)
39     {
40       puts ("second call to cleanup");
41       exit (1);
42     }
43 }
44 
45 
46 static void *
tf(void * arg)47 tf (void *arg)
48 {
49   pthread_cleanup_push (cleanup, NULL);
50 
51   int e = pthread_barrier_wait (&bar);
52   if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
53     {
54       puts ("error: tf: 1st barrier_wait failed");
55       exit (1);
56     }
57 
58   struct timeval tv;
59   (void) gettimeofday (&tv, NULL);
60 
61   struct timespec ts;
62   TIMEVAL_TO_TIMESPEC (&tv, &ts);
63 
64   /* Timeout in 5 seconds.  */
65   ts.tv_sec += 5;
66 
67   /* This call should block and be cancelable.  */
68   sem_timedwait (&sem, &ts);
69 
70   pthread_cleanup_pop (0);
71 
72   return NULL;
73 }
74 
75 
76 static int
do_test(void)77 do_test (void)
78 {
79   pthread_t th;
80 
81   if (pthread_barrier_init (&bar, NULL, 2) != 0)
82     {
83       puts ("error: barrier_init failed");
84       exit (1);
85     }
86 
87   if (sem_init (&sem, 0, 1) != 0)
88     {
89       puts ("error: sem_init failed");
90       exit (1);
91     }
92 
93   if (pthread_create (&th, NULL, tf, NULL) != 0)
94     {
95       puts ("error: create failed");
96       exit (1);
97     }
98 
99   /* Check whether cancellation is honored even before sem_timedwait does
100      anything.  */
101   if (pthread_cancel (th) != 0)
102     {
103       puts ("error: 1st cancel failed");
104       exit (1);
105     }
106 
107   int e = pthread_barrier_wait (&bar);
108   if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
109     {
110       puts ("1st barrier_wait failed");
111       exit (1);
112     }
113 
114   void *r;
115   if (pthread_join (th, &r) != 0)
116     {
117       puts ("join failed");
118       exit (1);
119     }
120 
121   if (r != PTHREAD_CANCELED)
122     {
123       puts ("thread not canceled");
124       exit (1);
125     }
126 
127   return 0;
128 }
129 
130 
131 #define TEST_FUNCTION do_test ()
132 #include "../test-skeleton.c"
133