1/* Copyright (C) 2003-2024 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <https://www.gnu.org/licenses/>. */
17
18#include <pthread.h>
19#include <stdio.h>
20#include <stdlib.h>
21#include <unistd.h>
22
23
24static pthread_barrier_t bar;
25
26static int global;
27
28
29static void
30cleanup (void *arg)
31{
32 global = 1;
33}
34
35
36static void *
37tf (void *arg)
38{
39 /* Enable cancellation, but defer it. */
40 if (pthread_setcancelstate (PTHREAD_CANCEL_ENABLE, NULL) != 0)
41 {
42 puts (s: "setcancelstate failed");
43 exit (1);
44 }
45 if (pthread_setcanceltype (PTHREAD_CANCEL_DEFERRED, NULL) != 0)
46 {
47 puts (s: "setcanceltype failed");
48 exit (1);
49 }
50
51 /* Add cleanup handler. */
52 pthread_cleanup_push (cleanup, NULL);
53
54 /* Synchronize with the main thread. */
55 int r = pthread_barrier_wait (barrier: &bar);
56 if (r != 0 && r!= PTHREAD_BARRIER_SERIAL_THREAD)
57 {
58 puts (s: "tf: first barrier_wait failed");
59 exit (1);
60 }
61
62 /* And again. Once this is done the main thread should have canceled
63 this thread. */
64 r = pthread_barrier_wait (barrier: &bar);
65 if (r != 0 && r!= PTHREAD_BARRIER_SERIAL_THREAD)
66 {
67 puts (s: "tf: second barrier_wait failed");
68 exit (1);
69 }
70
71 /* Remove the cleanup handler without executing it. */
72 pthread_cleanup_pop (0);
73
74 /* Now react on the cancellation. */
75 pthread_testcancel ();
76
77 /* This call should never return. */
78 return NULL;
79}
80
81
82static int
83do_test (void)
84{
85 if (pthread_barrier_init (barrier: &bar, NULL, count: 2) != 0)
86 {
87 puts (s: "barrier_init failed");
88 exit (1);
89 }
90
91 pthread_t th;
92 if (pthread_create (newthread: &th, NULL, start_routine: tf, NULL) != 0)
93 {
94 puts (s: "pthread_create failed");
95 return 1;
96 }
97
98 int r = pthread_barrier_wait (barrier: &bar);
99 if (r != 0 && r!= PTHREAD_BARRIER_SERIAL_THREAD)
100 {
101 puts (s: "first barrier_wait failed");
102 exit (1);
103 }
104
105 if (pthread_cancel (th: th) != 0)
106 {
107 puts (s: "pthread_cancel failed");
108 return 1;
109 }
110
111 r = pthread_barrier_wait (barrier: &bar);
112 if (r != 0 && r!= PTHREAD_BARRIER_SERIAL_THREAD)
113 {
114 puts (s: "second barrier_wait failed");
115 exit (1);
116 }
117
118 void *result;
119 if (pthread_join (th: th, thread_return: &result) != 0)
120 {
121 puts (s: "pthread_join failed");
122 return 1;
123 }
124
125 if (result != PTHREAD_CANCELED)
126 {
127 puts (s: "thread was not canceled");
128 exit (1);
129 }
130
131 if (global != 0)
132 {
133 puts (s: "cancellation handler has been called");
134 exit (1);
135 }
136
137 return 0;
138}
139
140#define TEST_FUNCTION do_test ()
141#include "../test-skeleton.c"
142

source code of glibc/sysdeps/pthread/tst-cancel8.c