1 /* Test program for POSIX shm_* functions.
2 Copyright (C) 2000 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, write to the Free
18 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
35 /* We want to see output immediately. */
36 #define STDOUT_UNBUFFERED
44 /* Create the shared memory object. */
45 fd = shm_open ("/shm-test", O_RDWR, 0600);
48 /* We don't regard this as a bug. Simply don't run the test. It could
49 means there is no such implementation or the object is already in
50 use in which case we don't want to disturb. */
51 perror ("failed to open shared memory object: shm_open");
60 worker (int write_now)
71 if (fstat (fd, &st) == -1 || st.st_size != 4000)
72 error (EXIT_FAILURE, 0, "stat failed");
74 mem = mmap (NULL, 4000, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0);
76 error (EXIT_FAILURE, 0, "mmap failed");
79 ts.tv_nsec = 500000000;
82 for (i = 0; i <= 4; ++i)
85 /* Wait until the first bytes of the memory region are 0, 1, 2, 3, 4. */
88 for (i = 0; i <= 4; ++i)
93 /* OK, that's done. */
96 nanosleep (&ts, NULL);
100 for (i = 0; i <= 4; ++i)
103 /* Wait until the first bytes of the memory region are 4, 5, 6, 7, 8. */
106 for (i = 0; i <= 4; ++i)
111 /* OK, that's done. */
114 nanosleep (&ts, NULL);
117 if (munmap (mem, 4000) == -1)
118 error (EXIT_FAILURE, errno, "munmap");
135 /* Create the shared memory object. */
136 fd = shm_open ("/shm-test", O_RDWR | O_CREAT | O_TRUNC | O_EXCL, 0600);
139 /* We don't regard this as a bug. Simply don't run the test. It could
140 means there is no such implementation or the object is already in
141 use in which case we don't want to disturb. */
142 perror ("failed to create a shared memory object: shm_open");
146 /* Size the object. We make it 4000 bytes long. */
147 if (ftruncate (fd, 4000) == -1)
149 /* This failed. Must be a bug in the implementation of the
150 shared memory itself. */
151 perror ("failed to size of shared memory object: ftruncate");
153 shm_unlink ("/shm-test");
157 /* Spawn to processes which will do the work. */
163 /* Couldn't create a second process. */
166 shm_unlink ("/shm-test");
175 /* Couldn't create a second process. */
178 kill (pid1, SIGTERM);
179 waitpid (pid1, &ignore, 0);
181 shm_unlink ("/shm-test");
185 /* Wait until the two processes are finished. */
186 waitpid (pid1, &status1, 0);
187 waitpid (pid2, &status2, 0);
189 /* Now we can unlink the shared object. */
190 shm_unlink ("/shm-test");
192 return (!WIFEXITED (status1) || WEXITSTATUS (status1) != 0
193 || !WIFEXITED (status2) || WEXITSTATUS (status2) != 0);
195 #define TEST_FUNCTION do_test ()
197 #define CLEANUP_HANDLER shm_unlink ("/shm-test");
200 #include "../test-skeleton.c"