1500c28d54554baf35a6619798cf946fe0858a1c
[gnulib.git] / tests / test-readlinkat.c
1 /* Tests of readlinkat.
2    Copyright (C) 2009-2012 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 "signature.h"
24 SIGNATURE_CHECK (readlinkat, ssize_t, (int, char const *, char *, size_t));
25
26 #include <fcntl.h>
27 #include <errno.h>
28 #include <stdbool.h>
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include <string.h>
32 #include <sys/stat.h>
33
34 #include "ignore-value.h"
35 #include "macros.h"
36
37 #ifndef HAVE_SYMLINK
38 # define HAVE_SYMLINK 0
39 #endif
40
41 #define BASE "test-readlinkat.t"
42
43 #include "test-readlink.h"
44
45 static int dfd = AT_FDCWD;
46
47 static ssize_t
48 do_readlink (char const *name, char *buf, size_t len)
49 {
50   return readlinkat (dfd, name, buf, len);
51 }
52
53 int
54 main (void)
55 {
56   char buf[80];
57   int result;
58
59   /* Remove any leftovers from a previous partial run.  */
60   ignore_value (system ("rm -rf " BASE "*"));
61
62   /* Test behaviour for invalid file descriptors.  */
63   {
64     errno = 0;
65     ASSERT (readlinkat (-1, "foo", buf, sizeof buf) == -1);
66     ASSERT (errno == EBADF);
67   }
68   {
69     errno = 0;
70     ASSERT (readlinkat (99, "foo", buf, sizeof buf) == -1);
71     ASSERT (errno == EBADF);
72   }
73
74   /* Perform same checks as counterpart functions.  */
75   result = test_readlink (do_readlink, false);
76   dfd = openat (AT_FDCWD, ".", O_RDONLY);
77   ASSERT (0 <= dfd);
78   ASSERT (test_readlink (do_readlink, false) == result);
79
80   /* Now perform some cross-directory checks.  Skip everything else on
81      mingw.  */
82   if (HAVE_SYMLINK)
83     {
84       const char *contents = "don't matter!";
85       ssize_t exp = strlen (contents);
86
87       /* Create link while cwd is '.', then read it in '..'.  */
88       ASSERT (symlinkat (contents, AT_FDCWD, BASE "link") == 0);
89       errno = 0;
90       ASSERT (symlinkat (contents, dfd, BASE "link") == -1);
91       ASSERT (errno == EEXIST);
92       ASSERT (chdir ("..") == 0);
93       errno = 0;
94       ASSERT (readlinkat (AT_FDCWD, BASE "link", buf, sizeof buf) == -1);
95       ASSERT (errno == ENOENT);
96       ASSERT (readlinkat (dfd, BASE "link", buf, sizeof buf) == exp);
97       ASSERT (strncmp (contents, buf, exp) == 0);
98       ASSERT (unlinkat (dfd, BASE "link", 0) == 0);
99
100       /* Create link while cwd is '..', then read it in '.'.  */
101       ASSERT (symlinkat (contents, dfd, BASE "link") == 0);
102       ASSERT (fchdir (dfd) == 0);
103       errno = 0;
104       ASSERT (symlinkat (contents, AT_FDCWD, BASE "link") == -1);
105       ASSERT (errno == EEXIST);
106       buf[0] = '\0';
107       ASSERT (readlinkat (AT_FDCWD, BASE "link", buf, sizeof buf) == exp);
108       ASSERT (strncmp (contents, buf, exp) == 0);
109       buf[0] = '\0';
110       ASSERT (readlinkat (dfd, BASE "link", buf, sizeof buf) == exp);
111       ASSERT (strncmp (contents, buf, exp) == 0);
112       ASSERT (unlink (BASE "link") == 0);
113     }
114
115   ASSERT (close (dfd) == 0);
116   if (result == 77)
117     fputs ("skipping test: symlinks not supported on this file system\n",
118            stderr);
119   return result;
120 }