* manual/arith.texi: Document MTASC-safety properties.
[jlayton/glibc.git] / nptl / tst-tsd5.c
1 /* Copyright (C) 2004-2014 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2004.
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, see
17    <http://www.gnu.org/licenses/>.  */
18
19 #include <pthread.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22
23
24 static pthread_mutex_t m = PTHREAD_MUTEX_INITIALIZER;
25
26
27 static void
28 cl (void *p)
29 {
30   pthread_mutex_unlock (&m);
31 }
32
33
34 static void *
35 tf (void *arg)
36 {
37   if (pthread_mutex_lock (&m) != 0)
38     {
39       puts ("2nd mutex_lock failed");
40       exit (1);
41     }
42
43   exit (0);
44 }
45
46
47 static int
48 do_test (void)
49 {
50   pthread_key_t k;
51   if (pthread_key_create (&k, cl) != 0)
52     {
53       puts ("key_create failed");
54       return 1;
55     }
56   if (pthread_setspecific (k, (void *) 1) != 0)
57     {
58       puts ("setspecific failed");
59       return 1;
60     }
61
62   if (pthread_mutex_lock (&m) != 0)
63     {
64       puts ("1st mutex_lock failed");
65       return 1;
66     }
67
68   pthread_t th;
69   if (pthread_create (&th, NULL, tf, NULL) != 0)
70     {
71       puts ("create failed");
72       return 1;
73     }
74
75   pthread_exit (NULL);
76 }
77
78
79 #define TEST_FUNCTION do_test ()
80 #include "../test-skeleton.c"