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

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