io/tst-faccessat.c

   1 /* Test for faccessat function.  */
   2
   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>
  10
  11 #include <support/xunistd.h>
  12
  13 static void prepare (void);
  14 #define PREPARE(argc, argv) prepare ()
  15
  16 static int do_test (void);
  17 #define TEST_FUNCTION do_test ()
  18
  19 #include "../test-skeleton.c"
  20
  21 static int dir_fd;
  22
  23 static void
  24 prepare (void)
  25 {
  26   size_t test_dir_len = strlen (test_dir);
  27   static const char dir_name[] = "/tst-faccessat.XXXXXX";
  28
  29   size_t dirbuflen = test_dir_len + sizeof (dir_name);
  30   char *dirbuf = malloc (dirbuflen);
  31   if (dirbuf == NULL)
  32     {
  33       puts ("out of memory");
  34       exit (1);
  35     }
  36
  37   snprintf (dirbuf, dirbuflen, "%s%s", test_dir, dir_name);
  38   if (mkdtemp (dirbuf) == NULL)
  39     {
  40       puts ("cannot create temporary directory");
  41       exit (1);
  42     }
  43
  44   add_temp_file (dirbuf);
  45
  46   dir_fd = open (dirbuf, O_RDONLY | O_DIRECTORY);
  47   if (dir_fd == -1)
  48     {
  49       puts ("cannot open directory");
  50       exit (1);
  51     }
  52 }
  53
  54
  55 static int
  56 do_test (void)
  57 {
  58   /* fdopendir takes over the descriptor, make a copy.  */
  59   int dupfd = dup (dir_fd);
  60   if (dupfd == -1)
  61     {
  62       puts ("dup failed");
  63       return 1;
  64     }
  65   if (lseek (dupfd, 0, SEEK_SET) != 0)
  66     {
  67       puts ("1st lseek failed");
  68       return 1;
  69     }
  70
  71   /* The directory should be empty save the . and .. files.  */
  72   DIR *dir = fdopendir (dupfd);
  73   if (dir == NULL)
  74     {
  75       puts ("fdopendir failed");
  76       return 1;
  77     }
  78   struct dirent64 *d;
  79   while ((d = readdir64 (dir)) != NULL)
  80     if (strcmp (d->d_name, ".") != 0 && strcmp (d->d_name, "..") != 0)
  81       {
  82         printf ("temp directory contains file \"%s\"\n", d->d_name);
  83         return 1;
  84       }
  85   closedir (dir);
  86
  87   /* Try to create a file.  */
  88   int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
  89   if (fd == -1)
  90     {
  91       if (errno == ENOSYS)
  92         {
  93           puts ("*at functions not supported");
  94           return 0;
  95         }
  96
  97       puts ("file creation failed");
  98       return 1;
  99     }
 100   xwrite (fd, "hello", 5);
 101   puts ("file created");
 102
 103   /* Before closing the file, try using this file descriptor to open
 104      another file.  This must fail.  */
 105   if (faccessat (fd, "should-not-work", F_OK, AT_EACCESS) != -1)
 106     {
 107       puts ("faccessat using descriptor for normal file worked");
 108       return 1;
 109     }
 110   if (errno != ENOTDIR)
 111     {
 112       puts ("\
 113 error for faccessat using descriptor for normal file not ENOTDIR ");
 114       return 1;
 115     }
 116
 117   close (fd);
 118
 119   int result = 0;
 120
 121   if (faccessat (dir_fd, "some-file", F_OK, AT_EACCESS))
 122     {
 123       printf ("faccessat F_OK: %m\n");
 124       result = 1;
 125     }
 126   if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS))
 127     {
 128       printf ("faccessat W_OK: %m\n");
 129       result = 1;
 130     }
 131
 132   errno = 0;
 133   if (faccessat (dir_fd, "some-file", X_OK, AT_EACCESS) == 0
 134       || errno != EACCES)
 135     {
 136       printf ("faccessat X_OK on nonexecutable: %m\n");
 137       result = 1;
 138     }
 139
 140   if (fchmodat (dir_fd, "some-file", 0400, 0) != 0)
 141     {
 142       printf ("fchownat failed: %m\n");
 143       return 1;
 144     }
 145
 146   if (faccessat (dir_fd, "some-file", R_OK, AT_EACCESS))
 147     {
 148       printf ("faccessat R_OK: %m\n");
 149       result = 1;
 150     }
 151
 152   errno = 0;
 153   if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS) == 0
 154       ? (geteuid () != 0) : (errno != EACCES))
 155     {
 156       printf ("faccessat W_OK on unwritable file: %m\n");
 157       result = 1;
 158     }
 159
 160   /* Create a file descriptor which is closed again right away.  */
 161   int dir_fd2 = dup (dir_fd);
 162   if (dir_fd2 == -1)
 163     {
 164       puts ("dup failed");
 165       return 1;
 166     }
 167   close (dir_fd2);
 168
 169   /* With the file descriptor closed the next call must fail.  */
 170   if (faccessat (dir_fd2, "some-file", F_OK, AT_EACCESS) != -1)
 171     {
 172       puts ("faccessat using closed descriptor succeeded");
 173       return 1;
 174     }
 175   if (errno != EBADF)
 176     {
 177       puts ("faccessat using closed descriptor did not set EBADF");
 178       return 1;
 179     }
 180
 181   /* Same with a non-existing file.  */
 182   if (faccessat (dir_fd2, "non-existing-file", F_OK, AT_EACCESS) != -1)
 183     {
 184       puts ("2nd faccessat using closed descriptor succeeded");
 185       return 1;
 186     }
 187   if (errno != EBADF)
 188     {
 189       puts ("2nd faccessat using closed descriptor did not set EBADF");
 190       return 1;
 191     }
 192
 193   if (unlinkat (dir_fd, "some-file", 0) != 0)
 194     {
 195       puts ("unlinkat failed");
 196       result = 1;
 197     }
 198
 199   close (dir_fd);
 200
 201   fd = faccessat (-1, "some-file", F_OK, AT_EACCESS);
 202   if (fd != -1)
 203     {
 204       puts ("faccessat using -1 descriptor succeeded");
 205       return 1;
 206     }
 207   if (errno != EBADF)
 208     {
 209       puts ("faccessat using -1 descriptor did not set EBADF");
 210       return 1;
 211     }
 212
 213   return result;
 214 }