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 <errno.h>
19 #include <pthread.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <unistd.h>
24 #include <sys/wait.h>
25 
26 static void *
thread_function(void * arg)27 thread_function (void * arg)
28 {
29   int i = (intptr_t) arg;
30   int status;
31   pid_t pid;
32   pid_t pid2;
33 
34   pid = fork ();
35   switch (pid)
36     {
37     case 0:
38       printf ("%ld for %d\n", (long int) getpid (), i);
39       struct timespec ts = { .tv_sec = 0, .tv_nsec = 100000000 * i };
40       nanosleep (&ts, NULL);
41       _exit (i);
42       break;
43     case -1:
44       printf ("fork: %m\n");
45       return (void *) 1l;
46       break;
47     }
48 
49   pid2 = TEMP_FAILURE_RETRY (waitpid (pid, &status, 0));
50   if (pid2 != pid)
51     {
52       printf ("waitpid returned %ld, expected %ld\n",
53 	      (long int) pid2, (long int) pid);
54       return (void *) 1l;
55     }
56 
57   printf ("%ld with %d, expected %d\n",
58 	  (long int) pid, WEXITSTATUS (status), i);
59 
60   return WEXITSTATUS (status) == i ? NULL : (void *) 1l;
61 }
62 
63 #define N 5
64 static const int t[N] = { 7, 6, 5, 4, 3 };
65 
66 static int
do_test(void)67 do_test (void)
68 {
69   pthread_t th[N];
70   int i;
71   int result = 0;
72   pthread_attr_t at;
73 
74   if (pthread_attr_init (&at) != 0)
75     {
76       puts ("attr_init failed");
77       return 1;
78     }
79 
80   if (pthread_attr_setstacksize (&at, 1 * 1024 * 1024) != 0)
81     {
82       puts ("attr_setstacksize failed");
83       return 1;
84     }
85 
86   for (i = 0; i < N; ++i)
87     if (pthread_create (&th[i], NULL, thread_function,
88 			(void *) (intptr_t) t[i]) != 0)
89       {
90 	printf ("creation of thread %d failed\n", i);
91 	exit (1);
92       }
93 
94   if (pthread_attr_destroy (&at) != 0)
95     {
96       puts ("attr_destroy failed");
97       return 1;
98     }
99 
100   for (i = 0; i < N; ++i)
101     {
102       void *v;
103       if (pthread_join (th[i], &v) != 0)
104 	{
105 	  printf ("join of thread %d failed\n", i);
106 	  result = 1;
107 	}
108       else if (v != NULL)
109 	{
110 	  printf ("join %d successful, but child failed\n", i);
111 	  result = 1;
112 	}
113       else
114 	printf ("join %d successful\n", i);
115     }
116 
117   return result;
118 }
119 
120 #include <support/test-driver.c>
121