1 | /* Tests for fcntl. |
2 | Copyright (C) 2000-2022 Free Software Foundation, Inc. |
3 | This file is part of the GNU C Library. |
4 | |
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. |
9 | |
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. |
14 | |
15 | You should have received a copy of the GNU Lesser General Public |
16 | License along with the GNU C Library; if not, see |
17 | <https://www.gnu.org/licenses/>. */ |
18 | |
19 | #include <errno.h> |
20 | #include <fcntl.h> |
21 | #include <paths.h> |
22 | #include <string.h> |
23 | #include <unistd.h> |
24 | #include <sys/stat.h> |
25 | |
26 | |
27 | /* Prototype for our test function. */ |
28 | extern void do_prepare (int argc, char *argv[]); |
29 | extern int do_test (int argc, char *argv[]); |
30 | |
31 | /* We have a preparation function. */ |
32 | #define PREPARE do_prepare |
33 | |
34 | #include "../test-skeleton.c" |
35 | |
36 | |
37 | /* Name of the temporary files. */ |
38 | static char *name; |
39 | |
40 | /* File descriptor to temporary file. */ |
41 | static int fd; |
42 | |
43 | void |
44 | do_prepare (int argc, char *argv[]) |
45 | { |
46 | size_t name_len; |
47 | |
48 | name_len = strlen (test_dir); |
49 | name = xmalloc (n: name_len + sizeof ("/fcntlXXXXXX" )); |
50 | mempcpy (mempcpy (name, test_dir, name_len), |
51 | "/fcntlXXXXXX" , sizeof ("/fcntlXXXXXX" )); |
52 | /* Create the temporary file. */ |
53 | fd = mkstemp (template: name); |
54 | if (fd == -1) |
55 | { |
56 | printf (format: "cannot open temporary file: %m\n" ); |
57 | exit (1); |
58 | } |
59 | add_temp_file (name); |
60 | } |
61 | |
62 | |
63 | int |
64 | do_test (int argc, char *argv[]) |
65 | { |
66 | int fd2; |
67 | int fd3; |
68 | struct stat64 st; |
69 | int val; |
70 | int result = 0; |
71 | |
72 | if (fstat64 (fd: fd, buf: &st) != 0) |
73 | { |
74 | printf (format: "cannot stat test file: %m\n" ); |
75 | return 1; |
76 | } |
77 | if (! S_ISREG (st.st_mode) || st.st_size != 0) |
78 | { |
79 | puts (s: "file not created correctly" ); |
80 | return 1; |
81 | } |
82 | |
83 | /* Get the flags with fcntl(). */ |
84 | val = fcntl (fd: fd, F_GETFL); |
85 | if (val == -1) |
86 | { |
87 | printf (format: "fcntl(fd, F_GETFL) failed: %m\n" ); |
88 | result = 1; |
89 | } |
90 | else if ((val & O_ACCMODE) != O_RDWR) |
91 | { |
92 | puts (s: "temporary file not opened for read and write" ); |
93 | result = 1; |
94 | } |
95 | |
96 | /* Set the flags to something else. */ |
97 | if (fcntl (fd: fd, F_SETFL, O_RDONLY) == -1) |
98 | { |
99 | printf (format: "fcntl(fd, F_SETFL, O_RDONLY) failed: %m\n" ); |
100 | result = 1; |
101 | } |
102 | |
103 | val = fcntl (fd: fd, F_GETFL); |
104 | if (val == -1) |
105 | { |
106 | printf (format: "fcntl(fd, F_GETFL) after F_SETFL failed: %m\n" ); |
107 | result = 1; |
108 | } |
109 | else if ((val & O_ACCMODE) != O_RDWR) |
110 | { |
111 | puts (s: "temporary file access mode changed" ); |
112 | result = 1; |
113 | } |
114 | |
115 | /* Set the flags to something else. */ |
116 | if (fcntl (fd: fd, F_SETFL, O_APPEND) == -1) |
117 | { |
118 | printf (format: "fcntl(fd, F_SETFL, O_APPEND) failed: %m\n" ); |
119 | result = 1; |
120 | } |
121 | |
122 | val = fcntl (fd: fd, F_GETFL); |
123 | if (val == -1) |
124 | { |
125 | printf (format: "fcntl(fd, F_GETFL) after second F_SETFL failed: %m\n" ); |
126 | result = 1; |
127 | } |
128 | else if ((val & O_APPEND) == 0) |
129 | { |
130 | puts (s: "O_APPEND not set" ); |
131 | result = 1; |
132 | } |
133 | |
134 | val = fcntl (fd: fd, F_GETFD); |
135 | if (val == -1) |
136 | { |
137 | printf (format: "fcntl(fd, F_GETFD) failed: %m\n" ); |
138 | result = 1; |
139 | } |
140 | else if (fcntl (fd: fd, F_SETFD, val | FD_CLOEXEC) == -1) |
141 | { |
142 | printf (format: "fcntl(fd, F_SETFD, FD_CLOEXEC) failed: %m\n" ); |
143 | result = 1; |
144 | } |
145 | else |
146 | { |
147 | val = fcntl (fd: fd, F_GETFD); |
148 | if (val == -1) |
149 | { |
150 | printf (format: "fcntl(fd, F_GETFD) after F_SETFD failed: %m\n" ); |
151 | result = 1; |
152 | } |
153 | else if ((val & FD_CLOEXEC) == 0) |
154 | { |
155 | puts (s: "FD_CLOEXEC not set" ); |
156 | result = 1; |
157 | } |
158 | } |
159 | |
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 (fd: fd2); |
166 | |
167 | fd3 = fcntl (fd: fd, F_DUPFD, fd2 + 1); |
168 | if (fd3 == -1) |
169 | { |
170 | printf (format: "fcntl(fd, F_DUPFD, %d) failed: %m\n" , fd2 + 1); |
171 | result = 1; |
172 | } |
173 | else if (fd3 <= fd2) |
174 | { |
175 | printf (format: "F_DUPFD returned %d which is not larger than %d\n" , fd3, fd2); |
176 | result = 1; |
177 | } |
178 | |
179 | if (fd3 != -1) |
180 | { |
181 | val = fcntl (fd: fd3, F_GETFD); |
182 | if (val == -1) |
183 | { |
184 | printf (format: "fcntl(fd3, F_GETFD) after F_DUPFD failed: %m\n" ); |
185 | result = 1; |
186 | } |
187 | else if ((val & FD_CLOEXEC) != 0) |
188 | { |
189 | puts (s: "FD_CLOEXEC still set" ); |
190 | result = 1; |
191 | } |
192 | |
193 | close (fd: fd3); |
194 | } |
195 | |
196 | return result; |
197 | } |
198 | |