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-mknodat.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 fifo.  */
      86    int e = mknodat (dir_fd, "some-fifo", 0777 | S_IFIFO, 0);
      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 ("mknodat did not create a 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  }