fstatat: fix compilation on Solaris
[gnulib.git] / lib / fstatat.c
1 /* Work around an fstatat bug on Solaris 9.
2
3    Copyright (C) 2006, 2009 Free Software Foundation, Inc.
4
5    This program is free software: you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17
18 /* Written by Paul Eggert and Jim Meyering.  */
19
20 #include <config.h>
21
22 #include <sys/stat.h>
23
24 #include <errno.h>
25 #include <fcntl.h>
26 #include <string.h>
27
28 #undef fstatat
29
30 /* fstatat should always follow symbolic links that end in /, but on
31    Solaris 9 it doesn't if AT_SYMLINK_NOFOLLOW is specified.  This is
32    the same problem that lstat.c addresses, so solve it in a similar
33    way.  */
34
35 int
36 rpl_fstatat (int fd, char const *file, struct stat *st, int flag)
37 {
38   int result = fstatat (fd, file, st, flag);
39
40   if (result == 0 && (flag & AT_SYMLINK_NOFOLLOW) && S_ISLNK (st->st_mode)
41       && file[strlen (file) - 1] == '/')
42     {
43       /* FILE refers to a symbolic link and the name ends with a slash.
44          Get info about the link's referent.  */
45       result = fstatat (fd, file, st, flag & ~AT_SYMLINK_NOFOLLOW);
46       if (result == 0 && ! S_ISDIR (st->st_mode))
47         {
48           /* fstatat succeeded and FILE references a non-directory.
49              But it was specified via a name including a trailing
50              slash.  Fail with errno set to ENOTDIR to indicate the
51              contradiction.  */
52           errno = ENOTDIR;
53           return -1;
54         }
55     }
56
57   return result;
58 }