Updated to fedora-glibc-20090409T1422
[glibc/history.git] / nptl / tst-tsd6.c
blobdebb1dd3679e5f3cc3b1fa4f7d0ae6a879b16f1a
1 #include <errno.h>
2 #include <pthread.h>
3 #include <stdio.h>
4 #include <stdlib.h>
5 #include <unistd.h>
6 #include <sys/wait.h>
8 #define NKEYS 100
9 static pthread_key_t keys[NKEYS];
10 static pthread_barrier_t b;
13 static void *
14 tf (void *arg)
16 void *res = NULL;
17 for (int i = 0; i < NKEYS; ++i)
19 void *p = pthread_getspecific (keys[i]);
20 pthread_setspecific (keys[i], (void *) 7);
21 if (p != NULL)
22 res = p;
24 if (arg != NULL)
26 pthread_barrier_wait (arg);
27 pthread_barrier_wait (arg);
29 return res;
33 static int
34 do_test (void)
36 pthread_barrier_init (&b, NULL, 2);
38 for (int i = 0; i < NKEYS; ++i)
39 if (pthread_key_create (&keys[i], NULL) != 0)
41 puts ("cannot create keys");
42 return 1;
45 pthread_t th;
46 if (pthread_create (&th, NULL, tf, &b) != 0)
48 puts ("cannot create thread in parent");
49 return 1;
52 pthread_barrier_wait (&b);
54 pid_t pid = fork ();
55 if (pid == 0)
57 if (pthread_create (&th, NULL, tf, NULL) != 0)
59 puts ("cannot create thread in child");
60 exit (1);
63 void *res;
64 pthread_join (th, &res);
66 exit (res != NULL);
68 else if (pid == -1)
70 puts ("cannot create child process");
71 return 1;
74 int s;
75 if (TEMP_FAILURE_RETRY (waitpid (pid, &s, 0)) != pid)
77 puts ("failing to wait for child process");
78 return 1;
81 pthread_barrier_wait (&b);
82 pthread_join (th, NULL);
84 return !WIFEXITED (s) ? 2 : WEXITSTATUS (s);
88 #define TEST_FUNCTION do_test ()
89 #include "../test-skeleton.c"