* lib/openat.h (rpl_fstatat): New macro, if
[gnulib.git] / lib / fstatat.c
1 /* Work around an fstatat bug on Solaris 9.
2
3    Copyright (C) 2006 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 2, or (at your option)
8    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, write to the Free Software Foundation,
17    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
18
19 /* Written by Paul Eggert and Jim Meyering.  */
20
21 #include <config.h>
22
23 #define COMPILING_FSTATAT 1
24 #include "openat.h"
25
26 #include <errno.h>
27 #include <string.h>
28
29 /* fstatat should always follow symbolic links that end in /, but on
30    Solaris 9 it doesn't if AT_SYMLINK_NOFOLLOW is specified.  This is
31    the same problem that lstat.c addresses, so solve it in a similar
32    way.  */
33
34 int
35 rpl_fstatat (int fd, char const *file, struct stat *st, int flag)
36 {
37   int result = fstatat (fd, file, st, flag);
38
39   if (result == 0 && (flag & AT_SYMLINK_NOFOLLOW) && S_ISLNK (st->st_mode)
40       && file[strlen (file) - 1] == '/')
41     {
42       /* FILE refers to a symbolic link and the name ends with a slash.
43          Get info about the link's referent.  */
44       result = fstatat (fd, file, st, flag & ~AT_SYMLINK_NOFOLLOW);
45       if (result == 0 && ! S_ISDIR (st->st_mode))
46         {
47           /* fstatat succeeded and FILE references a non-directory.
48              But it was specified via a name including a trailing
49              slash.  Fail with errno set to ENOTDIR to indicate the
50              contradiction.  */
51           errno = ENOTDIR;
52           return -1;
53         }
54     }
55
56   return result;
57 }