alpha: Include errno.h in sysdep.h
[glibc.git] / io / tst-openat.c
blob0ceb7458805293c950fd718e4d7734a8bfe6dc6d
1 #include <dirent.h>
2 #include <fcntl.h>
3 #include <stdio.h>
4 #include <stdlib.h>
5 #include <string.h>
6 #include <unistd.h>
9 static void prepare (void);
10 #define PREPARE(argc, argv) prepare ()
12 static int do_test (void);
13 #define TEST_FUNCTION do_test ()
15 #include "../test-skeleton.c"
17 static int dir_fd;
19 static void
20 prepare (void)
22 size_t test_dir_len = strlen (test_dir);
23 static const char dir_name[] = "/tst-openat.XXXXXX";
25 size_t dirbuflen = test_dir_len + sizeof (dir_name);
26 char *dirbuf = malloc (dirbuflen);
27 if (dirbuf == NULL)
29 puts ("out of memory");
30 exit (1);
33 snprintf (dirbuf, dirbuflen, "%s%s", test_dir, dir_name);
34 if (mkdtemp (dirbuf) == NULL)
36 puts ("cannot create temporary directory");
37 exit (1);
40 add_temp_file (dirbuf);
42 dir_fd = open (dirbuf, O_RDONLY | O_DIRECTORY);
43 if (dir_fd == -1)
45 puts ("cannot open directory");
46 exit (1);
51 static int
52 do_test (void)
54 /* fdopendir takes over the descriptor, make a copy. */
55 int dupfd = dup (dir_fd);
56 if (dupfd == -1)
58 puts ("dup failed");
59 return 1;
61 if (lseek (dupfd, 0, SEEK_SET) != 0)
63 puts ("1st lseek failed");
64 return 1;
67 /* The directory should be empty safe the . and .. files. */
68 DIR *dir = fdopendir (dupfd);
69 if (dir == NULL)
71 puts ("fdopendir failed");
72 return 1;
74 struct dirent64 *d;
75 while ((d = readdir64 (dir)) != NULL)
76 if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
78 printf ("temp directory contains file \"%s\"\n", d->d_name);
79 return 1;
81 closedir (dir);
83 /* Try to create a file. */
84 int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
85 if (fd == -1)
87 if (errno == ENOSYS)
89 puts ("*at functions not supported");
90 return 0;
93 puts ("file creation failed");
94 return 1;
96 write (fd, "hello", 5);
98 /* Before closing the file, try using this file descriptor to open
99 another file. This must fail. */
100 int fd2 = openat (fd, "should-not-work", O_CREAT|O_RDWR, 0666);
101 if (fd2 != -1)
103 puts ("openat using descriptor for normal file worked");
104 return 1;
106 if (errno != ENOTDIR)
108 puts ("error for openat using descriptor for normal file not ENOTDIR ");
109 return 1;
112 close (fd);
113 puts ("file created");
115 /* fdopendir takes over the descriptor, make a copy. */
116 dupfd = dup (dir_fd);
117 if (dupfd == -1)
119 puts ("dup failed");
120 return 1;
122 if (lseek (dupfd, 0, SEEK_SET) != 0)
124 puts ("2nd lseek failed");
125 return 1;
128 /* The directory should be empty safe the . and .. files. */
129 dir = fdopendir (dupfd);
130 if (dir == NULL)
132 puts ("fdopendir failed");
133 return 1;
135 bool seen_file = false;
136 while ((d = readdir64 (dir)) != NULL)
137 if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
139 if (strcmp (d->d_name, "some-file") != 0)
141 printf ("temp directory contains file \"%s\"\n", d->d_name);
142 return 1;
145 seen_file = true;
147 closedir (dir);
149 if (!seen_file)
151 puts ("file not created in correct directory");
152 return 1;
155 int cwdfd = open (".", O_RDONLY | O_DIRECTORY);
156 if (cwdfd == -1)
158 puts ("cannot get descriptor for cwd");
159 return 1;
162 if (fchdir (dir_fd) != 0)
164 puts ("1st fchdir failed");
165 return 1;
168 if (unlink ("some-file") != 0)
170 puts ("unlink failed");
171 return 1;
174 if (fchdir (cwdfd) != 0)
176 puts ("2nd fchdir failed");
177 return 1;
180 close (dir_fd);
181 close (cwdfd);
183 /* With the file descriptor closed the next call must fail. */
184 fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
185 if (fd != -1)
187 puts ("openat using closed descriptor succeeded");
188 return 1;
190 if (errno != EBADF)
192 puts ("openat using closed descriptor did not set EBADF");
193 return 1;
196 fd = openat (-1, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
197 if (fd != -1)
199 puts ("openat using -1 descriptor succeeded");
200 return 1;
202 if (errno != EBADF)
204 puts ("openat using -1 descriptor did not set EBADF");
205 return 1;
208 return 0;