initial commit
[glibc.git] / sysdeps / pthread / tst-cleanup1.c
1 /* Copyright (C) 2002-2022 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
24 static int do_test (void);
25
26 #define TEST_FUNCTION do_test ()
27 #include "../test-skeleton.c"
28
29 static int global;
30
31
32 static void
33 ch (void *arg)
34 {
35 int val = (long int) arg;
36
37 printf ("ch (%d)\n", val);
38
39 global *= val;
40 global += val;
41 }
42
43
44 static void *
45 tf (void *a)
46 {
47 pthread_cancel (pthread_self ());
48
49 pthread_cleanup_push (ch, (void *) 1l);
50
51 pthread_cleanup_push (ch, (void *) 2l);
52
53 pthread_cleanup_push (ch, (void *) 3l);
54
55 pthread_setcanceltype (PTHREAD_CANCEL_ASYNCHRONOUS, NULL);
56
57 pthread_cleanup_pop (1);
58
59 pthread_cleanup_pop (1);
60
61 pthread_cleanup_pop (1);
62
63 return NULL;
64 }
65
66
67 int
68 do_test (void)
69 {
70 pthread_t th;
71
72 if (pthread_create (&th, NULL, tf, NULL) != 0)
73 {
74 write_message ("create failed\n");
75 _exit (1);
76 }
77
78 void *r;
79 int e;
80 if ((e = pthread_join (th, &r)) != 0)
81 {
82 printf ("join failed: %d\n", e);
83 _exit (1);
84 }
85
86 if (r != PTHREAD_CANCELED)
87 {
88 puts ("thread not canceled");
89 exit (1);
90 }
91
92 if (global != 9)
93 {
94 printf ("global = %d, expected 9\n", global);
95 exit (1);
96 }
97
98 return 0;
99 }