.
[glibc/history.git] / nptl / tst-cond4.c
blob58c2bdaf0734917987dac912aa58861bb02852d6
1 /* Copyright (C) 2002, 2003, 2004 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, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18 02111-1307 USA. */
20 #include <errno.h>
21 #include <pthread.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <unistd.h>
26 #include <sys/mman.h>
27 #include <sys/wait.h>
30 int *condition;
32 static int
33 do_test (void)
35 size_t ps = sysconf (_SC_PAGESIZE);
36 char tmpfname[] = "/tmp/tst-cond4.XXXXXX";
37 char data[ps];
38 void *mem;
39 int fd;
40 pthread_mutexattr_t ma;
41 pthread_mutex_t *mut1;
42 pthread_mutex_t *mut2;
43 pthread_condattr_t ca;
44 pthread_cond_t *cond;
45 pid_t pid;
46 int result = 0;
47 int p;
49 fd = mkstemp (tmpfname);
50 if (fd == -1)
52 printf ("cannot open temporary file: %m\n");
53 return 1;
56 /* Make sure it is always removed. */
57 unlink (tmpfname);
59 /* Create one page of data. */
60 memset (data, '\0', ps);
62 /* Write the data to the file. */
63 if (write (fd, data, ps) != (ssize_t) ps)
65 puts ("short write");
66 return 1;
69 mem = mmap (NULL, ps, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0);
70 if (mem == MAP_FAILED)
72 printf ("mmap failed: %m\n");
73 return 1;
76 mut1 = (pthread_mutex_t *) (((uintptr_t) mem
77 + __alignof (pthread_mutex_t))
78 & ~(__alignof (pthread_mutex_t) - 1));
79 mut2 = mut1 + 1;
81 cond = (pthread_cond_t *) (((uintptr_t) (mut2 + 1)
82 + __alignof (pthread_cond_t))
83 & ~(__alignof (pthread_cond_t) - 1));
85 condition = (int *) (((uintptr_t) (cond + 1) + __alignof (int))
86 & ~(__alignof (int) - 1));
88 if (pthread_mutexattr_init (&ma) != 0)
90 puts ("mutexattr_init failed");
91 return 1;
94 if (pthread_mutexattr_getpshared (&ma, &p) != 0)
96 puts ("1st mutexattr_getpshared failed");
97 return 1;
100 if (p != PTHREAD_PROCESS_PRIVATE)
102 puts ("default pshared value wrong");
103 return 1;
106 if (pthread_mutexattr_setpshared (&ma, PTHREAD_PROCESS_SHARED) != 0)
108 puts ("mutexattr_setpshared failed");
109 return 1;
112 if (pthread_mutexattr_getpshared (&ma, &p) != 0)
114 puts ("2nd mutexattr_getpshared failed");
115 return 1;
118 if (p != PTHREAD_PROCESS_SHARED)
120 puts ("pshared value after setpshared call wrong");
121 return 1;
124 if (pthread_mutex_init (mut1, &ma) != 0)
126 puts ("1st mutex_init failed");
127 return 1;
130 if (pthread_mutex_init (mut2, &ma) != 0)
132 puts ("2nd mutex_init failed");
133 return 1;
136 if (pthread_condattr_init (&ca) != 0)
138 puts ("condattr_init failed");
139 return 1;
142 if (pthread_condattr_getpshared (&ca, &p) != 0)
144 puts ("1st condattr_getpshared failed");
145 return 1;
148 if (p != PTHREAD_PROCESS_PRIVATE)
150 puts ("default value for pshared in condattr wrong");
151 return 1;
154 if (pthread_condattr_setpshared (&ca, PTHREAD_PROCESS_SHARED) != 0)
156 puts ("condattr_setpshared failed");
157 return 1;
160 if (pthread_condattr_getpshared (&ca, &p) != 0)
162 puts ("2nd condattr_getpshared failed");
163 return 1;
166 if (p != PTHREAD_PROCESS_SHARED)
168 puts ("pshared condattr still not set");
169 return 1;
172 if (pthread_cond_init (cond, &ca) != 0)
174 puts ("cond_init failed");
175 return 1;
178 if (pthread_mutex_lock (mut1) != 0)
180 puts ("parent: 1st mutex_lock failed");
181 return 1;
184 puts ("going to fork now");
185 pid = fork ();
186 if (pid == -1)
188 puts ("fork failed");
189 return 1;
191 else if (pid == 0)
193 if (pthread_mutex_lock (mut2) != 0)
195 puts ("child: mutex_lock failed");
196 return 1;
199 if (pthread_mutex_unlock (mut1) != 0)
201 puts ("child: 1st mutex_unlock failed");
202 return 1;
206 if (pthread_cond_wait (cond, mut2) != 0)
208 puts ("child: cond_wait failed");
209 return 1;
211 while (*condition == 0);
213 if (pthread_mutex_unlock (mut2) != 0)
215 puts ("child: 2nd mutex_unlock failed");
216 return 1;
219 puts ("child done");
221 else
223 int status;
225 if (pthread_mutex_lock (mut1) != 0)
227 puts ("parent: 2nd mutex_lock failed");
228 return 1;
231 if (pthread_mutex_lock (mut2) != 0)
233 puts ("parent: 3rd mutex_lock failed");
234 return 1;
237 if (pthread_cond_signal (cond) != 0)
239 puts ("parent: cond_signal failed");
240 return 1;
243 *condition = 1;
245 if (pthread_mutex_unlock (mut2) != 0)
247 puts ("parent: mutex_unlock failed");
248 return 1;
251 puts ("waiting for child");
253 waitpid (pid, &status, 0);
254 result |= status;
256 puts ("parent done");
259 return result;
262 #define TEST_FUNCTION do_test ()
263 #include "../test-skeleton.c"