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
30 static pthread_mutex_t lock = PTHREAD_MUTEX_INITIALIZER;
31 static pthread_mutex_t lock2 = PTHREAD_MUTEX_INITIALIZER;
45 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLKW, &fl)) != 0)
47 puts ("fourth fcntl failed");
51 pthread_mutex_unlock (&lock);
53 pthread_mutex_lock (&lock2);
62 char tmp[] = "/tmp/tst-flock2-XXXXXX";
67 puts ("mkstemp failed");
74 for (i = 0; i < 20; ++i)
75 write (fd, "foobar xyzzy", 12);
78 b = mmap (NULL, sizeof (pthread_barrier_t), PROT_READ | PROT_WRITE,
86 pthread_barrierattr_t ba;
87 if (pthread_barrierattr_init (&ba) != 0)
89 puts ("barrierattr_init failed");
93 if (pthread_barrierattr_setpshared (&ba, PTHREAD_PROCESS_SHARED) != 0)
95 puts ("barrierattr_setpshared failed");
99 if (pthread_barrier_init (b, &ba, 2) != 0)
101 puts ("barrier_init failed");
105 if (pthread_barrierattr_destroy (&ba) != 0)
107 puts ("barrierattr_destroy failed");
115 .l_whence = SEEK_SET,
118 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLKW, &fl)) != 0)
120 puts ("first fcntl failed");
127 puts ("fork failed");
133 /* Make sure the child does not stay around indefinitely. */
136 /* Try to get the lock. */
137 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLK, &fl)) == 0)
139 puts ("child: second flock succeeded");
144 pthread_barrier_wait (b);
149 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLKW, &fl)) != 0)
151 puts ("third fcntl failed");
156 pthread_barrier_wait (b);
161 if (pthread_mutex_lock (&lock) != 0)
163 puts ("1st locking of lock failed");
167 if (pthread_mutex_lock (&lock2) != 0)
169 puts ("1st locking of lock2 failed");
173 if (pthread_create (&th, NULL, tf, NULL) != 0)
175 puts ("pthread_create failed");
179 if (pthread_mutex_lock (&lock) != 0)
181 puts ("2nd locking of lock failed");
185 puts ("child locked file");
188 pthread_barrier_wait (b);
193 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLK, &fl)) == 0)
195 puts ("fifth fcntl succeeded");
199 puts ("file locked by child");
202 pthread_barrier_wait (b);
206 if (pthread_mutex_unlock (&lock2) != 0)
208 puts ("unlock of lock2 failed");
212 if (pthread_join (th, NULL) != 0)
214 puts ("join failed");
218 puts ("child's thread terminated");
221 pthread_barrier_wait (b);
226 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLK, &fl)) == 0)
228 puts ("fifth fcntl succeeded");
232 puts ("file still locked");
235 pthread_barrier_wait (b);
243 if (TEMP_FAILURE_RETRY (waitpid (pid, &status, 0)) != pid)
245 puts ("waitpid failed");
248 puts ("child terminated");
250 if (TEMP_FAILURE_RETRY (fcntl (fd, F_SETLKW, &fl)) != 0)
252 puts ("sixth fcntl failed");
259 #define TEST_FUNCTION do_test ()
260 #include "../test-skeleton.c"