1 #include <dirent.h>
2 #include <fcntl.h>
3 #include <stdbool.h>
4 #include <stdio.h>
5 #include <stdlib.h>
6 #include <string.h>
7 #include <unistd.h>
8 #include <sys/stat.h>
9 
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
prepare(void)22 prepare (void)
23 {
24   size_t test_dir_len = strlen (test_dir);
25   static const char dir_name[] = "/tst-mkfifoat.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
do_test(void)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   /* Create a new directory.  */
86   int e = mkfifoat (dir_fd, "some-fifo", 0777);
87   if (e == -1)
88     {
89       if (errno == ENOSYS)
90 	{
91 	  puts ("*at functions not supported");
92 	  return 0;
93 	}
94 
95       puts ("fifo creation failed");
96       return 1;
97     }
98 
99   struct stat64 st1;
100   if (fstatat64 (dir_fd, "some-fifo", &st1, 0) != 0)
101     {
102       puts ("fstat64 failed");
103       return 1;
104     }
105   if (!S_ISFIFO (st1.st_mode))
106     {
107       puts ("mkfifoat did not create FIFO");
108       return 1;
109     }
110 
111   dupfd = dup (dir_fd);
112   if (dupfd == -1)
113     {
114       puts ("dup failed");
115       return 1;
116     }
117   if (lseek (dupfd, 0, SEEK_SET) != 0)
118     {
119       puts ("1st lseek failed");
120       return 1;
121     }
122 
123   dir = fdopendir (dupfd);
124   if (dir == NULL)
125     {
126       puts ("2nd fdopendir failed");
127       return 1;
128     }
129   bool has_some_fifo = false;
130   while ((d = readdir64 (dir)) != NULL)
131     if (strcmp (d->d_name, "some-fifo") == 0)
132       {
133 	has_some_fifo = true;
134 	if (d->d_type != DT_UNKNOWN && d->d_type != DT_FIFO)
135 	  {
136 	    puts ("d_type for some-fifo wrong");
137 	    return 1;
138 	  }
139       }
140     else if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
141       {
142 	printf ("temp directory contains file \"%s\"\n", d->d_name);
143 	return 1;
144       }
145   closedir (dir);
146 
147   if (!has_some_fifo)
148     {
149       puts ("some-fifo not in directory list");
150       return 1;
151     }
152 
153   if (unlinkat (dir_fd, "some-fifo", 0) != 0)
154     {
155       puts ("unlinkat failed");
156       return 1;
157     }
158 
159   close (dir_fd);
160 
161   return 0;
162 }
163