manual: complete example in error message documentation
[glibc.git] / nptl / tst-key3.c
blob4c45728de783b005c792d1b3a714464c7edf7eb8
1 /* Copyright (C) 2002-2015 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
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.
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.
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 <http://www.gnu.org/licenses/>. */
19 #include <pthread.h>
20 #include <stdio.h>
21 #include <unistd.h>
23 #define N 2
26 static int cnt0;
27 static void
28 f0 (void *p)
30 ++cnt0;
34 static int cnt1;
35 static void
36 f1 (void *p)
38 ++cnt1;
42 static void (*fcts[N]) (void *) =
44 f0,
49 static pthread_barrier_t b;
52 static void *
53 tf (void *arg)
55 pthread_key_t *key = (pthread_key_t *) arg;
57 if (pthread_setspecific (*key, (void *) -1l) != 0)
59 write (2, "setspecific failed\n", 19);
60 _exit (1);
63 pthread_barrier_wait (&b);
65 const struct timespec t = { .tv_sec = 1000, .tv_nsec = 0 };
66 while (1)
67 nanosleep (&t, NULL);
69 /* NOTREACHED */
70 return NULL;
74 int
75 do_test (void)
77 pthread_key_t keys[N];
79 int i;
80 for (i = 0; i < N; ++i)
81 if (pthread_key_create (&keys[i], fcts[i]) != 0)
83 write (2, "key_create failed\n", 18);
84 _exit (1);
87 if (pthread_barrier_init (&b, NULL, 2) != 0)
89 write (2, "barrier_init failed\n", 20);
90 _exit (1);
93 pthread_t th;
94 if (pthread_create (&th, NULL, tf, &keys[1]) != 0)
96 write (2, "create failed\n", 14);
97 _exit (1);
100 pthread_barrier_wait (&b);
102 if (pthread_cancel (th) != 0)
104 write (2, "cancel failed\n", 14);
105 _exit (1);
108 void *status;
109 if (pthread_join (th, &status) != 0)
111 write (2, "join failed\n", 12);
112 _exit (1);
115 if (status != PTHREAD_CANCELED)
117 write (2, "thread not canceled\n", 20);
118 _exit (1);
121 /* Note that the TSD destructors not necessarily have to have
122 finished by the time pthread_join returns. At least according to
123 POSIX. We implement the stronger requirement that they indeed
124 have run and therefore these tests succeed. */
125 if (cnt0 != 0)
127 write (2, "cnt0 != 0\n", 10);
128 _exit (1);
131 if (cnt1 != 1)
133 write (2, "cnt1 != 1\n", 10);
134 _exit (1);
137 for (i = 0; i < N; ++i)
138 if (pthread_key_delete (keys[i]) != 0)
140 write (2, "key_delete failed\n", 18);
141 _exit (1);
144 if (pthread_barrier_destroy (&b) != 0)
146 write (2, "barrier_destroy failed\n", 23);
147 _exit (1);
150 return 0;
154 #define TEST_FUNCTION do_test ()
155 #include "../test-skeleton.c"