S390: Move utf8-utf32-z9.c to multiarch folder and use s390_libc_ifunc_expr macro.
[glibc.git] / io / tst-symlinkat.c
blob214a8e348e018ef438ddace694ca9200fe6f918f
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>
10 static void prepare (void);
11 #define PREPARE(argc, argv) prepare ()
13 static int do_test (void);
14 #define TEST_FUNCTION do_test ()
16 #include "../test-skeleton.c"
18 static int dir_fd;
20 static void
21 prepare (void)
23 size_t test_dir_len = strlen (test_dir);
24 static const char dir_name[] = "/tst-symlinkat.XXXXXX";
26 size_t dirbuflen = test_dir_len + sizeof (dir_name);
27 char *dirbuf = malloc (dirbuflen);
28 if (dirbuf == NULL)
30 puts ("out of memory");
31 exit (1);
34 snprintf (dirbuf, dirbuflen, "%s%s", test_dir, dir_name);
35 if (mkdtemp (dirbuf) == NULL)
37 puts ("cannot create temporary directory");
38 exit (1);
41 add_temp_file (dirbuf);
43 dir_fd = open (dirbuf, O_RDONLY | O_DIRECTORY);
44 if (dir_fd == -1)
46 puts ("cannot open directory");
47 exit (1);
52 static int
53 do_test (void)
55 /* fdopendir takes over the descriptor, make a copy. */
56 int dupfd = dup (dir_fd);
57 if (dupfd == -1)
59 puts ("dup failed");
60 return 1;
62 if (lseek (dupfd, 0, SEEK_SET) != 0)
64 puts ("1st lseek failed");
65 return 1;
68 /* The directory should be empty safe the . and .. files. */
69 DIR *dir = fdopendir (dupfd);
70 if (dir == NULL)
72 puts ("fdopendir failed");
73 return 1;
75 struct dirent64 *d;
76 while ((d = readdir64 (dir)) != NULL)
77 if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
79 printf ("temp directory contains file \"%s\"\n", d->d_name);
80 return 1;
82 closedir (dir);
84 /* Try to create a file. */
85 int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
86 if (fd == -1)
88 if (errno == ENOSYS)
90 puts ("*at functions not supported");
91 return 0;
94 puts ("file creation failed");
95 return 1;
97 write (fd, "hello", 5);
98 puts ("file created");
100 struct stat64 st1;
101 if (fstat64 (fd, &st1) != 0)
103 puts ("fstat64 failed");
104 return 1;
107 close (fd);
109 if (symlinkat ("some-file", dir_fd, "another-file") != 0)
111 puts ("symlinkat failed");
112 return 1;
115 struct stat64 st2;
116 if (fstatat64 (dir_fd, "some-file", &st2, 0) != 0)
118 puts ("fstatat64 failed");
119 return 1;
121 if (st1.st_dev != st2.st_dev || st1.st_ino != st2.st_ino)
123 puts ("file changed after symlinkat");
124 return 1;
127 if (fstatat64 (dir_fd, "another-file", &st2, AT_SYMLINK_NOFOLLOW) != 0)
129 puts ("2nd fstatat64 failed");
130 return 1;
132 if (!S_ISLNK (st2.st_mode))
134 puts ("2nd fstatat64 does not show file is a symlink");
135 return 1;
138 if (fstatat64 (dir_fd, "another-file", &st2, 0) != 0)
140 puts ("3rd fstatat64 failed");
141 return 1;
143 if (st1.st_dev != st2.st_dev
144 || st1.st_ino != st2.st_ino
145 || st1.st_size != st2.st_size)
147 puts ("stat results do not match");
148 return 1;
151 if (unlinkat (dir_fd, "another-file", 0) != 0)
153 puts ("unlinkat failed");
154 return 1;
156 if (unlinkat (dir_fd, "some-file", 0) != 0)
158 puts ("2nd unlinkat failed");
159 return 1;
162 close (dir_fd);
164 return 0;