1 | /* Test for faccessat function. */ |
2 | |
3 | #include <dirent.h> |
4 | #include <fcntl.h> |
5 | #include <stdio.h> |
6 | #include <stdlib.h> |
7 | #include <string.h> |
8 | #include <unistd.h> |
9 | #include <sys/stat.h> |
10 | |
11 | #include <support/xunistd.h> |
12 | |
13 | static void prepare (void); |
14 | #define PREPARE(argc, argv) prepare () |
15 | |
16 | static int do_test (void); |
17 | #define TEST_FUNCTION do_test () |
18 | |
19 | #include "../test-skeleton.c" |
20 | |
21 | static int dir_fd; |
22 | |
23 | static void |
24 | prepare (void) |
25 | { |
26 | size_t test_dir_len = strlen (test_dir); |
27 | static const char dir_name[] = "/tst-faccessat.XXXXXX" ; |
28 | |
29 | size_t dirbuflen = test_dir_len + sizeof (dir_name); |
30 | char *dirbuf = malloc (size: dirbuflen); |
31 | if (dirbuf == NULL) |
32 | { |
33 | puts (s: "out of memory" ); |
34 | exit (1); |
35 | } |
36 | |
37 | snprintf (s: dirbuf, maxlen: dirbuflen, format: "%s%s" , test_dir, dir_name); |
38 | if (mkdtemp (template: dirbuf) == NULL) |
39 | { |
40 | puts (s: "cannot create temporary directory" ); |
41 | exit (1); |
42 | } |
43 | |
44 | add_temp_file (name: dirbuf); |
45 | |
46 | dir_fd = open (file: dirbuf, O_RDONLY | O_DIRECTORY); |
47 | if (dir_fd == -1) |
48 | { |
49 | puts (s: "cannot open directory" ); |
50 | exit (1); |
51 | } |
52 | } |
53 | |
54 | |
55 | static int |
56 | do_test (void) |
57 | { |
58 | /* fdopendir takes over the descriptor, make a copy. */ |
59 | int dupfd = dup (fd: dir_fd); |
60 | if (dupfd == -1) |
61 | { |
62 | puts (s: "dup failed" ); |
63 | return 1; |
64 | } |
65 | if (lseek (fd: dupfd, offset: 0, SEEK_SET) != 0) |
66 | { |
67 | puts (s: "1st lseek failed" ); |
68 | return 1; |
69 | } |
70 | |
71 | /* The directory should be empty save the . and .. files. */ |
72 | DIR *dir = fdopendir (fd: dupfd); |
73 | if (dir == NULL) |
74 | { |
75 | puts (s: "fdopendir failed" ); |
76 | return 1; |
77 | } |
78 | struct dirent64 *d; |
79 | while ((d = readdir64 (dirp: dir)) != NULL) |
80 | if (strcmp (d->d_name, "." ) != 0 && strcmp (d->d_name, ".." ) != 0) |
81 | { |
82 | printf (format: "temp directory contains file \"%s\"\n" , d->d_name); |
83 | return 1; |
84 | } |
85 | closedir (dirp: dir); |
86 | |
87 | /* Try to create a file. */ |
88 | int fd = openat (fd: dir_fd, file: "some-file" , O_CREAT|O_RDWR|O_EXCL, 0666); |
89 | if (fd == -1) |
90 | { |
91 | if (errno == ENOSYS) |
92 | { |
93 | puts (s: "*at functions not supported" ); |
94 | return 0; |
95 | } |
96 | |
97 | puts (s: "file creation failed" ); |
98 | return 1; |
99 | } |
100 | xwrite (fd, "hello" , 5); |
101 | puts (s: "file created" ); |
102 | |
103 | /* Before closing the file, try using this file descriptor to open |
104 | another file. This must fail. */ |
105 | if (faccessat (fd: fd, file: "should-not-work" , F_OK, AT_EACCESS) != -1) |
106 | { |
107 | puts (s: "faccessat using descriptor for normal file worked" ); |
108 | return 1; |
109 | } |
110 | if (errno != ENOTDIR) |
111 | { |
112 | puts (s: "\ |
113 | error for faccessat using descriptor for normal file not ENOTDIR " ); |
114 | return 1; |
115 | } |
116 | |
117 | close (fd: fd); |
118 | |
119 | int result = 0; |
120 | |
121 | if (faccessat (fd: dir_fd, file: "some-file" , F_OK, AT_EACCESS)) |
122 | { |
123 | printf (format: "faccessat F_OK: %m\n" ); |
124 | result = 1; |
125 | } |
126 | if (faccessat (fd: dir_fd, file: "some-file" , W_OK, AT_EACCESS)) |
127 | { |
128 | printf (format: "faccessat W_OK: %m\n" ); |
129 | result = 1; |
130 | } |
131 | |
132 | errno = 0; |
133 | if (faccessat (fd: dir_fd, file: "some-file" , X_OK, AT_EACCESS) == 0 |
134 | || errno != EACCES) |
135 | { |
136 | printf (format: "faccessat X_OK on nonexecutable: %m\n" ); |
137 | result = 1; |
138 | } |
139 | |
140 | if (fchmodat (dir_fd, "some-file" , 0400, 0) != 0) |
141 | { |
142 | printf (format: "fchownat failed: %m\n" ); |
143 | return 1; |
144 | } |
145 | |
146 | if (faccessat (fd: dir_fd, file: "some-file" , R_OK, AT_EACCESS)) |
147 | { |
148 | printf (format: "faccessat R_OK: %m\n" ); |
149 | result = 1; |
150 | } |
151 | |
152 | errno = 0; |
153 | if (faccessat (fd: dir_fd, file: "some-file" , W_OK, AT_EACCESS) == 0 |
154 | ? (geteuid () != 0) : (errno != EACCES)) |
155 | { |
156 | printf (format: "faccessat W_OK on unwritable file: %m\n" ); |
157 | result = 1; |
158 | } |
159 | |
160 | /* Create a file descriptor which is closed again right away. */ |
161 | int dir_fd2 = dup (fd: dir_fd); |
162 | if (dir_fd2 == -1) |
163 | { |
164 | puts (s: "dup failed" ); |
165 | return 1; |
166 | } |
167 | close (fd: dir_fd2); |
168 | |
169 | /* With the file descriptor closed the next call must fail. */ |
170 | if (faccessat (fd: dir_fd2, file: "some-file" , F_OK, AT_EACCESS) != -1) |
171 | { |
172 | puts (s: "faccessat using closed descriptor succeeded" ); |
173 | return 1; |
174 | } |
175 | if (errno != EBADF) |
176 | { |
177 | puts (s: "faccessat using closed descriptor did not set EBADF" ); |
178 | return 1; |
179 | } |
180 | |
181 | /* Same with a non-existing file. */ |
182 | if (faccessat (fd: dir_fd2, file: "non-existing-file" , F_OK, AT_EACCESS) != -1) |
183 | { |
184 | puts (s: "2nd faccessat using closed descriptor succeeded" ); |
185 | return 1; |
186 | } |
187 | if (errno != EBADF) |
188 | { |
189 | puts (s: "2nd faccessat using closed descriptor did not set EBADF" ); |
190 | return 1; |
191 | } |
192 | |
193 | if (unlinkat (fd: dir_fd, name: "some-file" , flag: 0) != 0) |
194 | { |
195 | puts (s: "unlinkat failed" ); |
196 | result = 1; |
197 | } |
198 | |
199 | close (fd: dir_fd); |
200 | |
201 | fd = faccessat (fd: -1, file: "some-file" , F_OK, AT_EACCESS); |
202 | if (fd != -1) |
203 | { |
204 | puts (s: "faccessat using -1 descriptor succeeded" ); |
205 | return 1; |
206 | } |
207 | if (errno != EBADF) |
208 | { |
209 | puts (s: "faccessat using -1 descriptor did not set EBADF" ); |
210 | return 1; |
211 | } |
212 | |
213 | return result; |
214 | } |
215 | |