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
13static void prepare (void);
14#define PREPARE(argc, argv) prepare ()
15
16static int do_test (void);
17#define TEST_FUNCTION do_test ()
18
19#include "../test-skeleton.c"
20
21static int dir_fd;
22
23static void
24prepare (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
55static int
56do_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: "\
113error 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

source code of glibc/io/tst-faccessat.c