* _fpending.c: Include <config.h> unconditionally, since we no
[gnulib.git] / lib / utimens.c
1 /* Set file access and modification times.
2
3    Copyright (C) 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify it
6    under the terms of the GNU General Public License as published by the
7    Free Software Foundation; either version 2, or (at your option) any
8    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.  */
20
21 /* derived from a function in touch.c */
22
23 #include <config.h>
24
25 #include "utimens.h"
26
27 #include <errno.h>
28 #include <fcntl.h>
29 #include <unistd.h>
30
31 #if HAVE_UTIME_H
32 # include <utime.h>
33 #endif
34
35 /* Some systems (even some that do have <utime.h>) don't declare this
36    structure anywhere.  */
37 #ifndef HAVE_STRUCT_UTIMBUF
38 struct utimbuf
39 {
40   long actime;
41   long modtime;
42 };
43 #endif
44
45 /* Some systems don't have ENOSYS.  */
46 #ifndef ENOSYS
47 # ifdef ENOTSUP
48 #  define ENOSYS ENOTSUP
49 # else
50 /* Some systems don't have ENOTSUP either.  */
51 #  define ENOSYS EINVAL
52 # endif
53 #endif
54
55 #ifndef __attribute__
56 # if __GNUC__ < 2 || (__GNUC__ == 2 && __GNUC_MINOR__ < 8) || __STRICT_ANSI__
57 #  define __attribute__(x)
58 # endif
59 #endif
60
61 #ifndef ATTRIBUTE_UNUSED
62 # define ATTRIBUTE_UNUSED __attribute__ ((__unused__))
63 #endif
64
65 /* Set the access and modification time stamps of FD (a.k.a. FILE) to be
66    TIMESPEC[0] and TIMESPEC[1], respectively.
67    FD must be either negative -- in which case it is ignored --
68    or a file descriptor that is open on FILE.
69    If FD is nonnegative, then FILE can be NULL, which means
70    use just futimes (or equivalent) instead of utimes (or equivalent),
71    and fail if on an old system without futimes (or equivalent).
72    If TIMESPEC is null, set the time stamps to the current time.
73    Return 0 on success, -1 (setting errno) on failure.  */
74
75 int
76 futimens (int fd ATTRIBUTE_UNUSED,
77           char const *file, struct timespec const timespec[2])
78 {
79   /* There's currently no interface to set file timestamps with
80      nanosecond resolution, so do the best we can, discarding any
81      fractional part of the timestamp.  */
82 #if HAVE_FUTIMESAT || HAVE_WORKING_UTIMES
83   struct timeval timeval[2];
84   struct timeval const *t;
85   if (timespec)
86     {
87       timeval[0].tv_sec = timespec[0].tv_sec;
88       timeval[0].tv_usec = timespec[0].tv_nsec / 1000;
89       timeval[1].tv_sec = timespec[1].tv_sec;
90       timeval[1].tv_usec = timespec[1].tv_nsec / 1000;
91       t = timeval;
92     }
93   else
94     t = NULL;
95
96
97   if (fd < 0)
98     {
99 # if HAVE_FUTIMESAT
100       return futimesat (AT_FDCWD, file, t);
101 # endif
102     }
103   else
104     {
105       /* If futimesat or futimes fails here, don't try to speed things
106          up by returning right away.  glibc can incorrectly fail with
107          errno == ENOENT if /proc isn't mounted.  Also, Mandrake 10.0
108          in high security mode doesn't allow ordinary users to read
109          /proc/self, so glibc incorrectly fails with errno == EACCES.
110          If errno == EIO, EPERM, or EROFS, it's probably safe to fail
111          right away, but these cases are rare enough that they're not
112          worth optimizing, and who knows what other messed-up systems
113          are out there?  So play it safe and fall back on the code
114          below.  */
115 # if HAVE_FUTIMESAT
116       if (futimesat (fd, NULL, t) == 0)
117         return 0;
118 # elif HAVE_FUTIMES
119       if (futimes (fd, t) == 0)
120         return 0;
121 # endif
122     }
123 #endif
124
125   if (!file)
126     {
127 #if ! (HAVE_FUTIMESAT || (HAVE_WORKING_UTIMES && HAVE_FUTIMES))
128       errno = ENOSYS;
129 #endif
130
131       /* Prefer EBADF to ENOSYS if both error numbers apply.  */
132       if (errno == ENOSYS)
133         {
134           int fd2 = dup (fd);
135           int dup_errno = errno;
136           if (0 <= fd2)
137             close (fd2);
138           errno = (fd2 < 0 && dup_errno == EBADF ? EBADF : ENOSYS);
139         }
140
141       return -1;
142     }
143
144 #if HAVE_WORKING_UTIMES
145   return utimes (file, t);
146 #else
147   {
148     struct utimbuf utimbuf;
149     struct utimbuf const *ut;
150     if (timespec)
151       {
152         utimbuf.actime = timespec[0].tv_sec;
153         utimbuf.modtime = timespec[1].tv_sec;
154         ut = &utimbuf;
155       }
156     else
157       ut = NULL;
158
159     return utime (file, ut);
160   }
161 #endif
162 }
163
164 /* Set the access and modification time stamps of FILE to be
165    TIMESPEC[0] and TIMESPEC[1], respectively.  */
166 int
167 utimens (char const *file, struct timespec const timespec[2])
168 {
169   return futimens (-1, file, timespec);
170 }