tests/test-symlinkat.c

   1 /* Tests of symlinkat and readlinkat.
   2    Copyright (C) 2009 Free Software Foundation, Inc.
   3
   4    This program is free software: you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 3 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  16
  17 /* Written by Eric Blake <ebb9@byu.net>, 2009.  */
  18
  19 #include <config.h>
  20
  21 #include <unistd.h>
  22
  23 #include <fcntl.h>
  24 #include <errno.h>
  25 #include <stdbool.h>
  26 #include <stdio.h>
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <sys/stat.h>
  30
  31 #ifndef HAVE_SYMLINK
  32 # define HAVE_SYMLINK 0
  33 #endif
  34
  35 #define ASSERT(expr) \
  36   do                                                                         \
  37     {                                                                        \
  38       if (!(expr))                                                           \
  39         {                                                                    \
  40           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__);  \
  41           fflush (stderr);                                                   \
  42           abort ();                                                          \
  43         }                                                                    \
  44     }                                                                        \
  45   while (0)
  46
  47 #define BASE "test-symlinkat.t"
  48
  49 #include "test-readlink.h"
  50 #include "test-symlink.h"
  51
  52 static int dfd = AT_FDCWD;
  53
  54 static int
  55 do_symlink (char const *contents, char const *name)
  56 {
  57   return symlinkat (contents, dfd, name);
  58 }
  59
  60 static ssize_t
  61 do_readlink (char const *name, char *buf, size_t len)
  62 {
  63   return readlinkat (dfd, name, buf, len);
  64 }
  65
  66 int
  67 main (void)
  68 {
  69   char buf[80];
  70   int result;
  71
  72   /* Remove any leftovers from a previous partial run.  */
  73   ASSERT (system ("rm -rf " BASE "*") == 0);
  74
  75   /* Perform same checks as counterpart functions.  */
  76   result = test_readlink (do_readlink, false);
  77   ASSERT (test_symlink (do_symlink, false) == result);
  78   dfd = openat (AT_FDCWD, ".", O_RDONLY);
  79   ASSERT (0 <= dfd);
  80   ASSERT (test_readlink (do_readlink, false) == result);
  81   ASSERT (test_symlink (do_symlink, false) == result);
  82
  83   /* Now perform some cross-directory checks.  Skip everything else on
  84      mingw.  */
  85   if (HAVE_SYMLINK)
  86     {
  87       const char *contents = "don't matter!";
  88       ssize_t exp = strlen (contents);
  89
  90       /* Create link while cwd is '.', then read it in '..'.  */
  91       ASSERT (symlinkat (contents, AT_FDCWD, BASE "link") == 0);
  92       errno = 0;
  93       ASSERT (symlinkat (contents, dfd, BASE "link") == -1);
  94       ASSERT (errno == EEXIST);
  95       ASSERT (chdir ("..") == 0);
  96       errno = 0;
  97       ASSERT (readlinkat (AT_FDCWD, BASE "link", buf, sizeof buf) == -1);
  98       ASSERT (errno == ENOENT);
  99       ASSERT (readlinkat (dfd, BASE "link", buf, sizeof buf) == exp);
 100       ASSERT (strncmp (contents, buf, exp) == 0);
 101       ASSERT (unlinkat (dfd, BASE "link", 0) == 0);
 102
 103       /* Create link while cwd is '..', then read it in '.'.  */
 104       ASSERT (symlinkat (contents, dfd, BASE "link") == 0);
 105       ASSERT (fchdir (dfd) == 0);
 106       errno = 0;
 107       ASSERT (symlinkat (contents, AT_FDCWD, BASE "link") == -1);
 108       ASSERT (errno == EEXIST);
 109       buf[0] = '\0';
 110       ASSERT (readlinkat (AT_FDCWD, BASE "link", buf, sizeof buf) == exp);
 111       ASSERT (strncmp (contents, buf, exp) == 0);
 112       buf[0] = '\0';
 113       ASSERT (readlinkat (dfd, BASE "link", buf, sizeof buf) == exp);
 114       ASSERT (strncmp (contents, buf, exp) == 0);
 115       ASSERT (unlink (BASE "link") == 0);
 116     }
 117
 118   ASSERT (close (dfd) == 0);
 119   if (result == 77)
 120     fputs ("skipping test: symlinks not supported on this file system\n",
 121            stderr);
 122   return result;
 123 }