* lib/savedir.c (CLOSEDIR): Remove. All uses changed to closedir.
[gnulib.git] / lib / chown.c
1 /* provide consistent interface to chown for systems that don't interpret
2    an ID of -1 as meaning `don't change the corresponding ID'.
3    Copyright (C) 1997, 2004, 2005 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 Jim Meyering */
20
21 #ifdef HAVE_CONFIG_H
22 # include <config.h>
23 #endif
24
25 /* Disable the definition of chown to rpl_chown (from config.h) in this
26    file.  Otherwise, we'd get conflicting prototypes for rpl_chown on
27    most systems.  */
28 #undef chown
29
30 #include <stdbool.h>
31 #include <sys/types.h>
32 #include <sys/stat.h>
33 #include <unistd.h>
34 #include <fcntl.h>
35 #include <errno.h>
36
37 #include "stat-macros.h"
38
39 /* Provide a more-closely POSIX-conforming version of chown on
40    systems with one or both of the following problems:
41    - chown doesn't treat an ID of -1 as meaning
42    `don't change the corresponding ID'.
43    - chown doesn't dereference symlinks.  */
44
45 int
46 rpl_chown (const char *file, uid_t uid, gid_t gid)
47 {
48 #if CHOWN_FAILS_TO_HONOR_ID_OF_NEGATIVE_ONE
49   if (gid == (gid_t) -1 || uid == (uid_t) -1)
50     {
51       struct stat file_stats;
52
53       /* Stat file to get id(s) that should remain unchanged.  */
54       if (stat (file, &file_stats))
55         return -1;
56
57       if (gid == (gid_t) -1)
58         gid = file_stats.st_gid;
59
60       if (uid == (uid_t) -1)
61         uid = file_stats.st_uid;
62     }
63 #endif
64
65 #if CHOWN_MODIFIES_SYMLINK
66   {
67     /* Handle the case in which the system-supplied chown function
68        does *not* follow symlinks.  Instead, it changes permissions
69        on the symlink itself.  To work around that, we open the
70        file (but this can fail due to lack of read or write permission) and
71        use fchown on the resulting descriptor.  */
72     int open_flags = O_NONBLOCK | O_NOCTTY;
73     int fd = open (file, O_RDONLY | open_flags);
74     if (0 <= fd
75         || (errno == EACCES
76             && 0 <= (fd = open (file, O_WRONLY | open_flags))))
77       {
78         int result = fchown (fd, uid, gid);
79         int saved_errno = errno;
80
81         /* POSIX says fchown can fail with errno == EINVAL on sockets,
82            so fall back on chown in that case.  */
83         struct stat sb;
84         bool fchown_socket_failure =
85           (result != 0 && saved_errno == EINVAL
86            && fstat (fd, &sb) == 0 && S_ISFIFO (sb.st_mode));
87
88         close (fd);
89
90         if (! fchown_socket_failure)
91           {
92             errno = saved_errno;
93             return result;
94           }
95       }
96     else if (errno != EACCES)
97       return -1;
98   }
99 #endif
100
101   return chown (file, uid, gid);
102 }