1 /* Test sem_timedwait cancellation for contended 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 int e;
50
51 pthread_cleanup_push (cleanup, NULL);
52
53 e = pthread_barrier_wait (&bar);
54 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
55 {
56 puts ("error: tf: 1st barrier_wait failed");
57 exit (1);
58 }
59
60 struct timeval tv;
61 (void) gettimeofday (&tv, NULL);
62
63 struct timespec ts;
64 TIMEVAL_TO_TIMESPEC (&tv, &ts);
65
66 /* Timeout in 5 seconds. */
67 ts.tv_sec += 5;
68
69 /* This call should block and be cancelable. */
70 errno = 0;
71 e = sem_timedwait (&sem, &ts);
72
73 pthread_cleanup_pop (0);
74
75 return NULL;
76 }
77
78
79 static int
do_test(void)80 do_test (void)
81 {
82 pthread_t th;
83
84 if (pthread_barrier_init (&bar, NULL, 2) != 0)
85 {
86 puts ("error: barrier_init failed");
87 exit (1);
88 }
89
90 if (sem_init (&sem, 0, 0) != 0)
91 {
92 puts ("error: sem_init failed");
93 exit (1);
94 }
95
96 if (pthread_create (&th, NULL, tf, NULL) != 0)
97 {
98 puts ("error: create failed");
99 exit (1);
100 }
101
102 int e = pthread_barrier_wait (&bar);
103 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
104 {
105 puts ("error: 1st barrier_wait failed");
106 exit (1);
107 }
108
109 /* Give the child a chance to go to sleep in sem_wait. */
110 sleep (1);
111
112 /* Check whether cancellation is honored when waiting in sem_timedwait. */
113 if (pthread_cancel (th) != 0)
114 {
115 puts ("error: 1st cancel failed");
116 exit (1);
117 }
118
119 void *r;
120 if (pthread_join (th, &r) != 0)
121 {
122 puts ("error: join failed");
123 exit (1);
124 }
125
126 if (r != PTHREAD_CANCELED)
127 {
128 puts ("error: thread not canceled");
129 exit (1);
130 }
131
132 return 0;
133 }
134
135
136 #define TEST_FUNCTION do_test ()
137 #include "../test-skeleton.c"
138