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
  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-faccessat.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 save 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   /* Try to create a file.  */
  86   int fd = openat (dir_fd, "some-file", O_CREAT|O_RDWR|O_EXCL, 0666);
  87   if (fd == -1)
  88     {
  89       if (errno == ENOSYS)
  90         {
  91           puts ("*at functions not supported");
  92           return 0;
  93         }
  94
  95       puts ("file creation failed");
  96       return 1;
  97     }
  98   write (fd, "hello", 5);
  99   puts ("file created");
 100
 101   /* Before closing the file, try using this file descriptor to open
 102      another file.  This must fail.  */
 103   if (faccessat (fd, "should-not-work", F_OK, AT_EACCESS) != -1)
 104     {
 105       puts ("faccessat using descriptor for normal file worked");
 106       return 1;
 107     }
 108   if (errno != ENOTDIR)
 109     {
 110       puts ("\
 111 error for faccessat using descriptor for normal file not ENOTDIR ");
 112       return 1;
 113     }
 114
 115   close (fd);
 116
 117   int result = 0;
 118
 119   if (faccessat (dir_fd, "some-file", F_OK, AT_EACCESS))
 120     {
 121       printf ("faccessat F_OK: %m\n");
 122       result = 1;
 123     }
 124   if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS))
 125     {
 126       printf ("faccessat W_OK: %m\n");
 127       result = 1;
 128     }
 129
 130   errno = 0;
 131   if (faccessat (dir_fd, "some-file", X_OK, AT_EACCESS) == 0
 132       || errno != EACCES)
 133     {
 134       printf ("faccessat X_OK on nonexecutable: %m\n");
 135       result = 1;
 136     }
 137
 138   if (fchmodat (dir_fd, "some-file", 0400, 0) != 0)
 139     {
 140       printf ("fchownat failed: %m\n");
 141       return 1;
 142     }
 143
 144   if (faccessat (dir_fd, "some-file", R_OK, AT_EACCESS))
 145     {
 146       printf ("faccessat R_OK: %m\n");
 147       result = 1;
 148     }
 149
 150   errno = 0;
 151   if (faccessat (dir_fd, "some-file", W_OK, AT_EACCESS) == 0
 152       ? (geteuid () != 0) : (errno != EACCES))
 153     {
 154       printf ("faccessat W_OK on unwritable file: %m\n");
 155       result = 1;
 156     }
 157
 158   /* Create a file descriptor which is closed again right away.  */
 159   int dir_fd2 = dup (dir_fd);
 160   if (dir_fd2 == -1)
 161     {
 162       puts ("dup failed");
 163       return 1;
 164     }
 165   close (dir_fd2);
 166
 167   /* With the file descriptor closed the next call must fail.  */
 168   if (faccessat (dir_fd2, "some-file", F_OK, AT_EACCESS) != -1)
 169     {
 170       puts ("faccessat using closed descriptor succeeded");
 171       return 1;
 172     }
 173   if (errno != EBADF)
 174     {
 175       puts ("faccessat using closed descriptor did not set EBADF");
 176       return 1;
 177     }
 178
 179   /* Same with a non-existing file.  */
 180   if (faccessat (dir_fd2, "non-existing-file", F_OK, AT_EACCESS) != -1)
 181     {
 182       puts ("2nd faccessat using closed descriptor succeeded");
 183       return 1;
 184     }
 185   if (errno != EBADF)
 186     {
 187       puts ("2nd faccessat using closed descriptor did not set EBADF");
 188       return 1;
 189     }
 190
 191   if (unlinkat (dir_fd, "some-file", 0) != 0)
 192     {
 193       puts ("unlinkat failed");
 194       result = 1;
 195     }
 196
 197   close (dir_fd);
 198
 199   fd = faccessat (-1, "some-file", F_OK, AT_EACCESS);
 200   if (fd != -1)
 201     {
 202       puts ("faccessat using -1 descriptor succeeded");
 203       return 1;
 204     }
 205   if (errno != EBADF)
 206     {
 207       puts ("faccessat using -1 descriptor did not set EBADF");
 208       return 1;
 209     }
 210
 211   return result;
 212 }