Fix type of parameter for S_TYPEISMQ, S_TYPEISSEM, and S_TYPEISSHM.
[glibc.git] / io / tst-fcntl.c
blobeeb21e38146634f69a261e48b98c5f3d1bc36032
1 /* Tests for fcntl.
2 Copyright (C) 2000 Free Software Foundation, Inc.
3 Contributed by Ulrich Drepper <drepper@cygnus.com>, 2000.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 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 Library General Public License for more details.
15 You should have received a copy of the GNU Library General Public
16 License along with the GNU C Library; see the file COPYING.LIB. If not,
17 write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA. */
20 #include <errno.h>
21 #include <fcntl.h>
22 #include <paths.h>
23 #include <string.h>
24 #include <unistd.h>
25 #include <sys/stat.h>
28 /* Prototype for our test function. */
29 extern void do_prepare (int argc, char *argv[]);
30 extern int do_test (int argc, char *argv[]);
32 /* We have a preparation function. */
33 #define PREPARE do_prepare
35 #include "../test-skeleton.c"
38 /* Name of the temporary files. */
39 static char *name;
41 void
42 do_prepare (int argc, char *argv[])
44 char name_len;
46 name_len = strlen (test_dir);
47 name = malloc (name_len + sizeof ("/fcntlXXXXXX"));
48 mempcpy (mempcpy (name, test_dir, name_len),
49 "/fcntlXXXXXX", sizeof ("/fcntlXXXXXX"));
50 add_temp_file (name);
54 int
55 do_test (int argc, char *argv[])
57 int fd;
58 int fd2;
59 int fd3;
60 struct stat64 st;
61 int val;
62 int result = 0;
64 /* Create the temporary file. */
65 fd = mkstemp (name);
66 if (fd == -1)
68 printf ("cannot open temporary file: %m\n");
69 return 1;
71 if (fstat64 (fd, &st) != 0)
73 printf ("cannot stat test file: %m\n");
74 return 1;
76 if (! S_ISREG (st.st_mode) || st.st_size != 0)
78 puts ("file not created correctly");
79 return 1;
82 /* Get the flags with fcntl(). */
83 val = fcntl (fd, F_GETFL);
84 if (val == -1)
86 printf ("fcntl(fd, F_GETFL) failed: %m\n");
87 result = 1;
89 else if ((val & O_ACCMODE) != O_RDWR)
91 puts ("temporary file not opened for read and write");
92 result = 1;
95 /* Set the flags to something else. */
96 if (fcntl (fd, F_SETFL, O_RDONLY) == -1)
98 printf ("fcntl(fd, F_SETFL, O_RDONLY) failed: %m\n");
99 result = 1;
102 val = fcntl (fd, F_GETFL);
103 if (val == -1)
105 printf ("fcntl(fd, F_GETFL) after F_SETFL failed: %m\n");
106 result = 1;
108 else if ((val & O_ACCMODE) != O_RDWR)
110 puts ("temporary file access mode changed");
111 result = 1;
114 /* Set the flags to something else. */
115 if (fcntl (fd, F_SETFL, O_APPEND) == -1)
117 printf ("fcntl(fd, F_SETFL, O_APPEND) failed: %m\n");
118 result = 1;
121 val = fcntl (fd, F_GETFL);
122 if (val == -1)
124 printf ("fcntl(fd, F_GETFL) after second F_SETFL failed: %m\n");
125 result = 1;
127 else if ((val & O_APPEND) == 0)
129 puts ("O_APPEND not set");
130 result = 1;
133 val = fcntl (fd, F_GETFD);
134 if (val == -1)
136 printf ("fcntl(fd, F_GETFD) failed: %m\n");
137 result = 1;
139 else if (fcntl (fd, F_SETFD, val | FD_CLOEXEC) == -1)
141 printf ("fcntl(fd, F_SETFD, FD_CLOEXEC) failed: %m\n");
142 result = 1;
144 else
146 val = fcntl (fd, F_GETFD);
147 if (val == -1)
149 printf ("fcntl(fd, F_GETFD) after F_SETFD failed: %m\n");
150 result = 1;
152 else if ((val & FD_CLOEXEC) == 0)
154 puts ("FD_CLOEXEC not set");
155 result = 1;
159 /* Get a number of a free descriptor. If /dev/null is not available
160 don't continue testing. */
161 fd2 = open (_PATH_DEVNULL, O_RDWR);
162 if (fd2 == -1)
163 return result;
164 close (fd2);
166 fd3 = fcntl (fd, F_DUPFD, fd2 + 1);
167 if (fd3 == -1)
169 printf ("fcntl(fd, F_DUPFD, %d) failed: %m\n", fd2 + 1);
170 result = 1;
172 else if (fd3 <= fd2)
174 printf ("F_DUPFD returned %d which is not larger than %d\n", fd3, fd2);
175 result = 1;
178 if (fd3 != -1)
180 val = fcntl (fd3, F_GETFD);
181 if (val == -1)
183 printf ("fcntl(fd3, F_GETFD) after F_DUPFD failed: %m\n");
184 result = 1;
186 else if ((val & FD_CLOEXEC) != 0)
188 puts ("FD_CLOEXEC still set");
189 result = 1;
192 close (fd3);
195 return result;