S390: Move utf8-utf32-z9.c to multiarch folder and use s390_libc_ifunc_expr macro.
[glibc.git] / io / tst-fchmodat.c
blob7d4a8717ff5edfef3f2eafed84dbe3da56301a97
1 /* Test for fchmodat function. */
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>
12 static void prepare (void);
13 #define PREPARE(argc, argv) prepare ()
15 static int do_test (void);
16 #define TEST_FUNCTION do_test ()
18 #include "../test-skeleton.c"
20 static int dir_fd;
22 static void
23 prepare (void)
25 size_t test_dir_len = strlen (test_dir);
26 static const char dir_name[] = "/tst-fchmodat.XXXXXX";
28 size_t dirbuflen = test_dir_len + sizeof (dir_name);
29 char *dirbuf = malloc (dirbuflen);
30 if (dirbuf == NULL)
32 puts ("out of memory");
33 exit (1);
36 snprintf (dirbuf, dirbuflen, "%s%s", test_dir, dir_name);
37 if (mkdtemp (dirbuf) == NULL)
39 puts ("cannot create temporary directory");
40 exit (1);
43 add_temp_file (dirbuf);
45 dir_fd = open (dirbuf, O_RDONLY | O_DIRECTORY);
46 if (dir_fd == -1)
48 puts ("cannot open directory");
49 exit (1);
54 static int
55 do_test (void)
57 /* fdopendir takes over the descriptor, make a copy. */
58 int dupfd = dup (dir_fd);
59 if (dupfd == -1)
61 puts ("dup failed");
62 return 1;
64 if (lseek (dupfd, 0, SEEK_SET) != 0)
66 puts ("1st lseek failed");
67 return 1;
70 /* The directory should be empty save the . and .. files. */
71 DIR *dir = fdopendir (dupfd);
72 if (dir == NULL)
74 puts ("fdopendir failed");
75 return 1;
77 struct dirent64 *d;
78 while ((d = readdir64 (dir)) != NULL)
79 if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
81 printf ("temp directory contains file \"%s\"\n", d->d_name);
82 return 1;
84 closedir (dir);
86 umask (022);
88 /* Try to create a file. */
89 int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
90 if (fd == -1)
92 if (errno == ENOSYS)
94 puts ("*at functions not supported");
95 return 0;
98 puts ("file creation failed");
99 return 1;
101 write (fd, "hello", 5);
102 puts ("file created");
104 struct stat64 st1;
105 if (fstat64 (fd, &st1) != 0)
107 puts ("fstat64 failed");
108 return 1;
111 /* Before closing the file, try using this file descriptor to open
112 another file. This must fail. */
113 if (fchmodat (fd, "some-file", 0400, 0) != -1)
115 puts ("fchmodat using descriptor for normal file worked");
116 return 1;
118 if (errno != ENOTDIR)
120 puts ("\
121 error for fchmodat using descriptor for normal file not ENOTDIR ");
122 return 1;
125 close (fd);
127 if ((st1.st_mode & 0777) != 0644)
129 printf ("openat created mode %04o, not 0644\n", (st1.st_mode & 0777));
130 return 1;
133 if (fchmodat (dir_fd, "some-file", 0400, 0) != 0)
135 puts ("fchownat failed");
136 return 1;
139 struct stat64 st2;
140 if (fstatat64 (dir_fd, "some-file", &st2, 0) != 0)
142 puts ("fstatat64 failed");
143 return 1;
146 if ((st2.st_mode & 0777) != 0400)
148 puts ("mode change failed");
149 return 1;
152 if (unlinkat (dir_fd, "some-file", 0) != 0)
154 puts ("unlinkat failed");
155 return 1;
158 /* Create a file descriptor which is closed again right away. */
159 int dir_fd2 = dup (dir_fd);
160 if (dir_fd2 == -1)
162 puts ("dup failed");
163 return 1;
165 close (dir_fd2);
167 if (fchmodat (dir_fd2, "some-file", 0400, 0) != -1)
169 puts ("fchmodat using closed descriptor worked");
170 return 1;
172 if (errno != EBADF)
174 puts ("error for fchmodat using closed descriptor not EBADF ");
175 return 1;
178 close (dir_fd);
180 if (fchmodat (-1, "some-file", 0400, 0) != -1)
182 puts ("fchmodat using invalid descriptor worked");
183 return 1;
185 if (errno != EBADF)
187 puts ("error for fchmodat using invalid descriptor not EBADF ");
188 return 1;
191 return 0;