Further modifications to the copyright comment section.
[rsync/rsync.git] / syscall.c
1 /*
2  * Syscall wrappers to ensure that nothing gets done in dry_run mode
3  * and to handle system peculiarities.
4  *
5  * Copyright (C) 1998 Andrew Tridgell
6  * Copyright (C) 2002 Martin Pool
7  * Copyright (C) 2003-2007 Wayne Davison
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License version 2 as
11  * published by the Free Software Foundation.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License along
19  * with this program; if not, write to the Free Software Foundation, Inc.,
20  * 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
21  */
22
23 #include "rsync.h"
24
25 #if !defined MKNOD_CREATES_SOCKETS && defined HAVE_SYS_UN_H
26 #include <sys/un.h>
27 #endif
28
29 extern int dry_run;
30 extern int read_only;
31 extern int list_only;
32 extern int preserve_perms;
33
34 #define RETURN_ERROR_IF(x,e) \
35         do { \
36                 if (x) { \
37                         errno = (e); \
38                         return -1; \
39                 } \
40         } while (0)
41
42 #define RETURN_ERROR_IF_RO_OR_LO RETURN_ERROR_IF(read_only || list_only, EROFS)
43
44 int do_unlink(const char *fname)
45 {
46         if (dry_run) return 0;
47         RETURN_ERROR_IF_RO_OR_LO;
48         return unlink(fname);
49 }
50
51 int do_symlink(const char *fname1, const char *fname2)
52 {
53         if (dry_run) return 0;
54         RETURN_ERROR_IF_RO_OR_LO;
55         return symlink(fname1, fname2);
56 }
57
58 #ifdef HAVE_LINK
59 int do_link(const char *fname1, const char *fname2)
60 {
61         if (dry_run) return 0;
62         RETURN_ERROR_IF_RO_OR_LO;
63         return link(fname1, fname2);
64 }
65 #endif
66
67 int do_lchown(const char *path, uid_t owner, gid_t group)
68 {
69         if (dry_run) return 0;
70         RETURN_ERROR_IF_RO_OR_LO;
71 #ifndef HAVE_LCHOWN
72 #define lchown chown
73 #endif
74         return lchown(path, owner, group);
75 }
76
77 int do_mknod(const char *pathname, mode_t mode, dev_t dev)
78 {
79         if (dry_run) return 0;
80         RETURN_ERROR_IF_RO_OR_LO;
81 #if !defined MKNOD_CREATES_FIFOS && defined HAVE_MKFIFO
82         if (S_ISFIFO(mode))
83                 return mkfifo(pathname, mode);
84 #endif
85 #if !defined MKNOD_CREATES_SOCKETS && defined HAVE_SYS_UN_H
86         if (S_ISSOCK(mode)) {
87                 int sock;
88                 struct sockaddr_un saddr;
89 #ifdef HAVE_SOCKADDR_UN_LEN
90                 unsigned int len =
91 #endif
92                     strlcpy(saddr.sun_path, pathname, sizeof saddr.sun_path);
93 #ifdef HAVE_SOCKADDR_UN_LEN
94                 saddr.sun_len = len >= sizeof saddr.sun_path
95                               ? sizeof saddr.sun_path : len + 1;
96 #endif
97                 saddr.sun_family = AF_UNIX;
98
99                 if ((sock = socket(PF_UNIX, SOCK_STREAM, 0)) < 0
100                     || (unlink(pathname) < 0 && errno != ENOENT)
101                     || (bind(sock, (struct sockaddr*)&saddr, sizeof saddr)) < 0)
102                         return -1;
103                 close(sock);
104 #ifdef HAVE_CHMOD
105                 return do_chmod(pathname, mode);
106 #else
107                 return 0;
108 #endif
109         }
110 #endif
111 #ifdef HAVE_MKNOD
112         return mknod(pathname, mode, dev);
113 #else
114         return -1;
115 #endif
116 }
117
118 int do_rmdir(const char *pathname)
119 {
120         if (dry_run) return 0;
121         RETURN_ERROR_IF_RO_OR_LO;
122         return rmdir(pathname);
123 }
124
125 int do_open(const char *pathname, int flags, mode_t mode)
126 {
127         if (flags != O_RDONLY) {
128                 RETURN_ERROR_IF(dry_run, 0);
129                 RETURN_ERROR_IF_RO_OR_LO;
130         }
131
132         return open(pathname, flags | O_BINARY, mode);
133 }
134
135 #ifdef HAVE_CHMOD
136 int do_chmod(const char *path, mode_t mode)
137 {
138         int code;
139         if (dry_run) return 0;
140         RETURN_ERROR_IF_RO_OR_LO;
141         if (S_ISLNK(mode)) {
142 #ifdef HAVE_LCHMOD
143                 code = lchmod(path, mode & CHMOD_BITS);
144 #else
145                 code = 1;
146 #endif
147         } else
148                 code = chmod(path, mode & CHMOD_BITS);
149         if (code != 0 && preserve_perms)
150             return code;
151         return 0;
152 }
153 #endif
154
155 int do_rename(const char *fname1, const char *fname2)
156 {
157         if (dry_run) return 0;
158         RETURN_ERROR_IF_RO_OR_LO;
159         return rename(fname1, fname2);
160 }
161
162 void trim_trailing_slashes(char *name)
163 {
164         int l;
165         /* Some BSD systems cannot make a directory if the name
166          * contains a trailing slash.
167          * <http://www.opensource.apple.com/bugs/X/BSD%20Kernel/2734739.html> */
168
169         /* Don't change empty string; and also we can't improve on
170          * "/" */
171
172         l = strlen(name);
173         while (l > 1) {
174                 if (name[--l] != '/')
175                         break;
176                 name[l] = '\0';
177         }
178 }
179
180 int do_mkdir(char *fname, mode_t mode)
181 {
182         if (dry_run) return 0;
183         RETURN_ERROR_IF_RO_OR_LO;
184         trim_trailing_slashes(fname);
185         return mkdir(fname, mode);
186 }
187
188 /* like mkstemp but forces permissions */
189 int do_mkstemp(char *template, mode_t perms)
190 {
191         RETURN_ERROR_IF(dry_run, 0);
192         RETURN_ERROR_IF(read_only, EROFS);
193
194 #if defined HAVE_SECURE_MKSTEMP && defined HAVE_FCHMOD && (!defined HAVE_OPEN64 || defined HAVE_MKSTEMP64)
195         {
196                 int fd = mkstemp(template);
197                 if (fd == -1)
198                         return -1;
199                 if (fchmod(fd, perms) != 0 && preserve_perms) {
200                         int errno_save = errno;
201                         close(fd);
202                         unlink(template);
203                         errno = errno_save;
204                         return -1;
205                 }
206 #if defined HAVE_SETMODE && O_BINARY
207                 setmode(fd, O_BINARY);
208 #endif
209                 return fd;
210         }
211 #else
212         if (!mktemp(template))
213                 return -1;
214         return do_open(template, O_RDWR|O_EXCL|O_CREAT, perms);
215 #endif
216 }
217
218 int do_stat(const char *fname, STRUCT_STAT *st)
219 {
220 #ifdef USE_STAT64_FUNCS
221         return stat64(fname, st);
222 #else
223         return stat(fname, st);
224 #endif
225 }
226
227 int do_lstat(const char *fname, STRUCT_STAT *st)
228 {
229 #ifdef SUPPORT_LINKS
230 # ifdef USE_STAT64_FUNCS
231         return lstat64(fname, st);
232 # else
233         return lstat(fname, st);
234 # endif
235 #else
236         return do_stat(fname, st);
237 #endif
238 }
239
240 int do_fstat(int fd, STRUCT_STAT *st)
241 {
242 #ifdef USE_STAT64_FUNCS
243         return fstat64(fd, st);
244 #else
245         return fstat(fd, st);
246 #endif
247 }
248
249 OFF_T do_lseek(int fd, OFF_T offset, int whence)
250 {
251 #ifdef HAVE_LSEEK64
252 #if !SIZEOF_OFF64_T
253         OFF_T lseek64();
254 #else
255         off64_t lseek64();
256 #endif
257         return lseek64(fd, offset, whence);
258 #else
259         return lseek(fd, offset, whence);
260 #endif
261 }
262
263 char *d_name(struct dirent *di)
264 {
265 #ifdef HAVE_BROKEN_READDIR
266         return (di->d_name - 2);
267 #else
268         return di->d_name;
269 #endif
270 }