io/tst-renameat.c

   1 #include <dirent.h>
   2 #include <fcntl.h>
   3 #include <stdio.h>
   4 #include <stdlib.h>
   5 #include <string.h>
   6 #include <unistd.h>
   7 #include <sys/stat.h>
   8
   9 #include <support/xunistd.h>
  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-renameat.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   /* 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   xwrite (fd, "hello", 5);
  99   puts ("file created");
 100
 101   struct stat64 st1;
 102   if (fstat64 (fd, &st1) != 0)
 103     {
 104       puts ("fstat64 failed");
 105       return 1;
 106     }
 107
 108   /* Using a descriptor for a normal file must fail.  */
 109   if (renameat (fd, "some-file", dir_fd, "another-file") == 0)
 110     {
 111       puts ("renameat with normal file descriptor succeeded");
 112       return 1;
 113     }
 114   if (errno != ENOTDIR)
 115     {
 116       puts ("error for renameat with normal file descriptor not ENOTDIR");
 117       return 1;
 118     }
 119
 120   if (renameat (dir_fd, "some-file", fd, "another-file") == 0)
 121     {
 122       puts ("2nd renameat with normal file descriptor succeeded");
 123       return 1;
 124     }
 125   if (errno != ENOTDIR)
 126     {
 127       puts ("error for 2nd renameat with normal file descriptor not ENOTDIR");
 128       return 1;
 129     }
 130
 131   close (fd);
 132
 133   if (renameat (dir_fd, "some-file", dir_fd, "another-file") != 0)
 134     {
 135       puts ("renameat failed");
 136       return 1;
 137     }
 138
 139   struct stat64 st2;
 140   if (fstatat64 (dir_fd, "some-file", &st2, 0) == 0)
 141     {
 142       puts ("fstatat64 succeeded");
 143       return 1;
 144     }
 145   if (errno != ENOENT)
 146     {
 147       puts ("fstatat64 did not fail with ENOENT");
 148       return 1;
 149     }
 150
 151   if (fstatat64 (dir_fd, "another-file", &st2, 0) != 0)
 152     {
 153       puts ("2nd fstatat64 failed");
 154       return 1;
 155     }
 156
 157   if (st1.st_dev != st2.st_dev
 158       || st1.st_ino != st2.st_ino
 159       || st1.st_size != st2.st_size)
 160     {
 161       puts ("stat results do not match");
 162       return 1;
 163     }
 164
 165   /* Create a file descriptor which is closed again right away.  */
 166   int dir_fd2 = dup (dir_fd);
 167   if (dir_fd2 == -1)
 168     {
 169       puts ("dup failed");
 170       return 1;
 171     }
 172   close (dir_fd2);
 173
 174   if (renameat (dir_fd2, "another-file", dir_fd, "some-file") == 0)
 175     {
 176       puts ("renameat with closed file descriptor succeeded");
 177       return 1;
 178     }
 179   if (errno != EBADF)
 180     {
 181       puts ("error for renameat with closed file descriptor not EBADF");
 182       return 1;
 183     }
 184
 185   if (renameat (dir_fd, "another-file", dir_fd2, "some-file") == 0)
 186     {
 187       puts ("2nd renameat with closed file descriptor succeeded");
 188       return 1;
 189     }
 190   if (errno != EBADF)
 191     {
 192       puts ("error for 2nd renameat with closed file descriptor not EBADF");
 193       return 1;
 194     }
 195
 196   if (unlinkat (dir_fd, "another-file", 0) != 0)
 197     {
 198       puts ("unlinkat failed");
 199       return 1;
 200     }
 201
 202   if (renameat (-1, "another-file", dir_fd, "some-file") == 0)
 203     {
 204       puts ("renameat with invalid file descriptor succeeded");
 205       return 1;
 206     }
 207   if (errno != EBADF)
 208     {
 209       puts ("error for renameat with invalid file descriptor not EBADF");
 210       return 1;
 211     }
 212
 213   if (renameat (dir_fd, "another-file", -1, "some-file") == 0)
 214     {
 215       puts ("2nd renameat with invalid file descriptor succeeded");
 216       return 1;
 217     }
 218   if (errno != EBADF)
 219     {
 220       puts ("error for 2nd renameat with invalid file descriptor not EBADF");
 221       return 1;
 222     }
 223
 224   close (dir_fd);
 225
 226   return 0;
 227 }