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