blob: 5fd95022b526f7ec040446408c0eb6b721fa4b35 [file] [log] [blame]
lh9ed821d2023-04-07 01:36:19 -07001/* Copyright (C) 2003 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
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, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18 02111-1307 USA. */
19
20#include <errno.h>
21#include <pthread.h>
22#include <semaphore.h>
23#include <stdio.h>
24#include <stdlib.h>
25#include <string.h>
26#include <unistd.h>
27#include <sys/time.h>
28
29
30static pthread_barrier_t bar;
31static sem_t sem;
32
33
34static void
35cleanup (void *arg)
36{
37 static int ncall;
38
39 if (++ncall != 1)
40 {
41 puts ("second call to cleanup");
42 exit (1);
43 }
44
45 printf ("cleanup call #%d\n", ncall);
46}
47
48
49static void *
50tf (void *arg)
51{
52 int e;
53
54 pthread_cleanup_push (cleanup, NULL);
55
56 e = pthread_barrier_wait (&bar);
57 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
58 {
59 puts ("tf: 1st barrier_wait failed");
60 exit (1);
61 }
62
63 struct timeval tv;
64 (void) gettimeofday (&tv, NULL);
65
66 struct timespec ts;
67 TIMEVAL_TO_TIMESPEC (&tv, &ts);
68
69 /* Timeout in 5 seconds. */
70 ts.tv_sec += 5;
71
72 /* This call should block and be cancelable. */
73 errno = 0;
74 e = sem_timedwait (&sem, &ts);
75
76 pthread_cleanup_pop (0);
77
78 printf ("sem_timedwait returned, e = %d, errno = %d\n", e, errno);
79
80 return NULL;
81}
82
83
84static int
85do_test (void)
86{
87 pthread_t th;
88
89 if (pthread_barrier_init (&bar, NULL, 2) != 0)
90 {
91 puts ("barrier_init failed");
92 exit (1);
93 }
94
95 if (sem_init (&sem, 0, 0) != 0)
96 {
97 puts ("sem_init failed");
98 exit (1);
99 }
100
101 if (pthread_create (&th, NULL, tf, NULL) != 0)
102 {
103 puts ("create 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 /* Give the child a chance to go to sleep in sem_wait. */
115 sleep (1);
116
117 /* Check whether cancellation is honored when waiting in sem_timedwait. */
118 if (pthread_cancel (th) != 0)
119 {
120 puts ("1st cancel failed");
121 exit (1);
122 }
123
124 void *r;
125 if (pthread_join (th, &r) != 0)
126 {
127 puts ("join failed");
128 exit (1);
129 }
130
131 if (r != PTHREAD_CANCELED)
132 {
133 puts ("thread not canceled");
134 exit (1);
135 }
136
137 return 0;
138}
139
140
141#define TEST_FUNCTION do_test ()
142#include "../test-skeleton.c"