io/tst-mkfifoat.c

   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
  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
  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 #ifdef _DIRENT_HAVE_D_TYPE
 135         if (d->d_type != DT_UNKNOWN && d->d_type != DT_FIFO)
 136           {
 137             puts ("d_type for some-fifo wrong");
 138             return 1;
 139           }
 140 #endif
 141       }
 142     else if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
 143       {
 144         printf ("temp directory contains file \"%s\"\n", d->d_name);
 145         return 1;
 146       }
 147   closedir (dir);
 148
 149   if (!has_some_fifo)
 150     {
 151       puts ("some-fifo not in directory list");
 152       return 1;
 153     }
 154
 155   if (unlinkat (dir_fd, "some-fifo", 0) != 0)
 156     {
 157       puts ("unlinkat failed");
 158       return 1;
 159     }
 160
 161   close (dir_fd);
 162
 163   return 0;
 164 }