1/* Copyright (C) 2002-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 <signal.h>
20#include <stdio.h>
21#include <stdlib.h>
22#include <string.h>
23
24
25static pthread_mutex_t m1 = PTHREAD_MUTEX_INITIALIZER;
26static pthread_mutex_t m2 = PTHREAD_MUTEX_INITIALIZER;
27
28static int cntr;
29
30
31static void
32cleanup (void *arg)
33{
34 if (arg != (void *) 42l)
35 cntr = 42;
36 else
37 cntr = 1;
38}
39
40
41static void *
42tf (void *arg)
43{
44 /* Ignore all signals. This must not have any effect on delivering
45 the cancellation signal. */
46 sigset_t ss;
47
48 sigfillset (&ss);
49
50 if (pthread_sigmask (SIG_BLOCK, newmask: &ss, NULL) != 0)
51 {
52 puts (s: "pthread_sigmask failed");
53 exit (1);
54 }
55
56 pthread_cleanup_push (cleanup, (void *) 42l);
57
58 int err = pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
59 if (err != 0)
60 {
61 printf (format: "setcanceltype failed: %s\n", strerror (errnum: err));
62 exit (1);
63 }
64 /* The following code is not standard compliant: the mutex functions
65 must not be called with asynchronous cancellation enabled. */
66
67 err = pthread_mutex_unlock (mutex: &m2);
68 if (err != 0)
69 {
70 printf (format: "child: mutex_unlock failed: %s\n", strerror (errnum: err));
71 exit (1);
72 }
73
74 err = pthread_mutex_lock (mutex: &m1);
75 if (err != 0)
76 {
77 printf (format: "child: 1st mutex_lock failed: %s\n", strerror (errnum: err));
78 exit (1);
79 }
80
81 /* We should never come here. */
82
83 pthread_cleanup_pop (0);
84
85 return NULL;
86}
87
88
89static int
90do_test (void)
91{
92 int err;
93 pthread_t th;
94 int result = 0;
95 void *retval;
96
97 /* Get the mutexes. */
98 err = pthread_mutex_lock (mutex: &m1);
99 if (err != 0)
100 {
101 printf (format: "parent: 1st mutex_lock failed: %s\n", strerror (errnum: err));
102 return 1;
103 }
104 err = pthread_mutex_lock (mutex: &m2);
105 if (err != 0)
106 {
107 printf (format: "parent: 2nd mutex_lock failed: %s\n", strerror (errnum: err));
108 return 1;
109 }
110
111 err = pthread_create (newthread: &th, NULL, start_routine: tf, NULL);
112 if (err != 0)
113 {
114 printf (format: "create failed: %s\n", strerror (errnum: err));
115 return 1;
116 }
117
118 err = pthread_mutex_lock (mutex: &m2);
119 if (err != 0)
120 {
121 printf (format: "parent: 3rd mutex_lock failed: %s\n", strerror (errnum: err));
122 return 1;
123 }
124
125 err = pthread_cancel (th: th);
126 if (err != 0)
127 {
128 printf (format: "cancel failed: %s\n", strerror (errnum: err));
129 return 1;
130 }
131
132 err = pthread_join (th: th, thread_return: &retval);
133 if (err != 0)
134 {
135 printf (format: "join failed: %s\n", strerror (errnum: err));
136 return 1;
137 }
138
139 if (retval != PTHREAD_CANCELED)
140 {
141 printf (format: "wrong return value: %p\n", retval);
142 result = 1;
143 }
144
145 if (cntr == 42)
146 {
147 puts (s: "cleanup handler called with wrong argument");
148 result = 1;
149 }
150 else if (cntr != 1)
151 {
152 puts (s: "cleanup handling not called");
153 result = 1;
154 }
155
156 return result;
157}
158
159
160#define TEST_FUNCTION do_test ()
161#include "../test-skeleton.c"
162

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