Update.
[glibc.git] / io / tst-fcntl.c
blobfed884913c4cb238e144d3411984b4eef11ba397
1 /* Tests for fcntl.
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
19 02111-1307 USA. */
21 #include <errno.h>
22 #include <fcntl.h>
23 #include <paths.h>
24 #include <string.h>
25 #include <unistd.h>
26 #include <sys/stat.h>
29 /* Prototype for our test function. */
30 extern void do_prepare (int argc, char *argv[]);
31 extern int do_test (int argc, char *argv[]);
33 /* We have a preparation function. */
34 #define PREPARE do_prepare
36 #include "../test-skeleton.c"
39 /* Name of the temporary files. */
40 static char *name;
42 void
43 do_prepare (int argc, char *argv[])
45 char name_len;
47 name_len = strlen (test_dir);
48 name = malloc (name_len + sizeof ("/fcntlXXXXXX"));
49 mempcpy (mempcpy (name, test_dir, name_len),
50 "/fcntlXXXXXX", sizeof ("/fcntlXXXXXX"));
51 add_temp_file (name);
55 int
56 do_test (int argc, char *argv[])
58 int fd;
59 int fd2;
60 int fd3;
61 struct stat64 st;
62 int val;
63 int result = 0;
65 /* Create the temporary file. */
66 fd = mkstemp (name);
67 if (fd == -1)
69 printf ("cannot open temporary file: %m\n");
70 return 1;
72 if (fstat64 (fd, &st) != 0)
74 printf ("cannot stat test file: %m\n");
75 return 1;
77 if (! S_ISREG (st.st_mode) || st.st_size != 0)
79 puts ("file not created correctly");
80 return 1;
83 /* Get the flags with fcntl(). */
84 val = fcntl (fd, F_GETFL);
85 if (val == -1)
87 printf ("fcntl(fd, F_GETFL) failed: %m\n");
88 result = 1;
90 else if ((val & O_ACCMODE) != O_RDWR)
92 puts ("temporary file not opened for read and write");
93 result = 1;
96 /* Set the flags to something else. */
97 if (fcntl (fd, F_SETFL, O_RDONLY) == -1)
99 printf ("fcntl(fd, F_SETFL, O_RDONLY) failed: %m\n");
100 result = 1;
103 val = fcntl (fd, F_GETFL);
104 if (val == -1)
106 printf ("fcntl(fd, F_GETFL) after F_SETFL failed: %m\n");
107 result = 1;
109 else if ((val & O_ACCMODE) != O_RDWR)
111 puts ("temporary file access mode changed");
112 result = 1;
115 /* Set the flags to something else. */
116 if (fcntl (fd, F_SETFL, O_APPEND) == -1)
118 printf ("fcntl(fd, F_SETFL, O_APPEND) failed: %m\n");
119 result = 1;
122 val = fcntl (fd, F_GETFL);
123 if (val == -1)
125 printf ("fcntl(fd, F_GETFL) after second F_SETFL failed: %m\n");
126 result = 1;
128 else if ((val & O_APPEND) == 0)
130 puts ("O_APPEND not set");
131 result = 1;
134 val = fcntl (fd, F_GETFD);
135 if (val == -1)
137 printf ("fcntl(fd, F_GETFD) failed: %m\n");
138 result = 1;
140 else if (fcntl (fd, F_SETFD, val | FD_CLOEXEC) == -1)
142 printf ("fcntl(fd, F_SETFD, FD_CLOEXEC) failed: %m\n");
143 result = 1;
145 else
147 val = fcntl (fd, F_GETFD);
148 if (val == -1)
150 printf ("fcntl(fd, F_GETFD) after F_SETFD failed: %m\n");
151 result = 1;
153 else if ((val & FD_CLOEXEC) == 0)
155 puts ("FD_CLOEXEC not set");
156 result = 1;
160 /* Get a number of a free descriptor. If /dev/null is not available
161 don't continue testing. */
162 fd2 = open (_PATH_DEVNULL, O_RDWR);
163 if (fd2 == -1)
164 return result;
165 close (fd2);
167 fd3 = fcntl (fd, F_DUPFD, fd2 + 1);
168 if (fd3 == -1)
170 printf ("fcntl(fd, F_DUPFD, %d) failed: %m\n", fd2 + 1);
171 result = 1;
173 else if (fd3 <= fd2)
175 printf ("F_DUPFD returned %d which is not larger than %d\n", fd3, fd2);
176 result = 1;
179 if (fd3 != -1)
181 val = fcntl (fd3, F_GETFD);
182 if (val == -1)
184 printf ("fcntl(fd3, F_GETFD) after F_DUPFD failed: %m\n");
185 result = 1;
187 else if ((val & FD_CLOEXEC) != 0)
189 puts ("FD_CLOEXEC still set");
190 result = 1;
193 close (fd3);
196 return result;