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-2009 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 as published by
  11  * the Free Software Foundation; either version 3 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License along
  20  * with this program; if not, visit the http://fsf.org website.
  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 #ifdef HAVE_SYS_ATTR_H
  29 #include <sys/attr.h>
  30 #endif
  31
  32 extern int dry_run;
  33 extern int am_root;
  34 extern int read_only;
  35 extern int list_only;
  36 extern int preserve_perms;
  37 extern int preserve_executability;
  38
  39 #define RETURN_ERROR_IF(x,e) \
  40         do { \
  41                 if (x) { \
  42                         errno = (e); \
  43                         return -1; \
  44                 } \
  45         } while (0)
  46
  47 #define RETURN_ERROR_IF_RO_OR_LO RETURN_ERROR_IF(read_only || list_only, EROFS)
  48
  49 int do_unlink(const char *fname)
  50 {
  51         if (dry_run) return 0;
  52         RETURN_ERROR_IF_RO_OR_LO;
  53         return unlink(fname);
  54 }
  55
  56 #ifdef SUPPORT_LINKS
  57 int do_symlink(const char *lnk, const char *fname)
  58 {
  59         if (dry_run) return 0;
  60         RETURN_ERROR_IF_RO_OR_LO;
  61         return symlink(lnk, fname);
  62 }
  63 #endif
  64
  65 #ifdef HAVE_LINK
  66 int do_link(const char *fname1, const char *fname2)
  67 {
  68         if (dry_run) return 0;
  69         RETURN_ERROR_IF_RO_OR_LO;
  70         return link(fname1, fname2);
  71 }
  72 #endif
  73
  74 int do_lchown(const char *path, uid_t owner, gid_t group)
  75 {
  76         if (dry_run) return 0;
  77         RETURN_ERROR_IF_RO_OR_LO;
  78 #ifndef HAVE_LCHOWN
  79 #define lchown chown
  80 #endif
  81         return lchown(path, owner, group);
  82 }
  83
  84 int do_mknod(const char *pathname, mode_t mode, dev_t dev)
  85 {
  86         if (dry_run) return 0;
  87         RETURN_ERROR_IF_RO_OR_LO;
  88
  89         /* For --fake-super, we create a normal file with mode 0600. */
  90         if (am_root < 0) {
  91                 int fd = open(pathname, O_WRONLY|O_CREAT|O_TRUNC, S_IWUSR|S_IRUSR);
  92                 if (fd < 0 || close(fd) < 0)
  93                         return -1;
  94                 return 0;
  95         }
  96
  97 #if !defined MKNOD_CREATES_FIFOS && defined HAVE_MKFIFO
  98         if (S_ISFIFO(mode))
  99                 return mkfifo(pathname, mode);
 100 #endif
 101 #if !defined MKNOD_CREATES_SOCKETS && defined HAVE_SYS_UN_H
 102         if (S_ISSOCK(mode)) {
 103                 int sock;
 104                 struct sockaddr_un saddr;
 105 #ifdef HAVE_SOCKADDR_UN_LEN
 106                 unsigned int len =
 107 #endif
 108                     strlcpy(saddr.sun_path, pathname, sizeof saddr.sun_path);
 109 #ifdef HAVE_SOCKADDR_UN_LEN
 110                 saddr.sun_len = len >= sizeof saddr.sun_path
 111                               ? sizeof saddr.sun_path : len + 1;
 112 #endif
 113                 saddr.sun_family = AF_UNIX;
 114
 115                 if ((sock = socket(PF_UNIX, SOCK_STREAM, 0)) < 0
 116                     || (unlink(pathname) < 0 && errno != ENOENT)
 117                     || (bind(sock, (struct sockaddr*)&saddr, sizeof saddr)) < 0)
 118                         return -1;
 119                 close(sock);
 120 #ifdef HAVE_CHMOD
 121                 return do_chmod(pathname, mode);
 122 #else
 123                 return 0;
 124 #endif
 125         }
 126 #endif
 127 #ifdef HAVE_MKNOD
 128         return mknod(pathname, mode, dev);
 129 #else
 130         return -1;
 131 #endif
 132 }
 133
 134 int do_rmdir(const char *pathname)
 135 {
 136         if (dry_run) return 0;
 137         RETURN_ERROR_IF_RO_OR_LO;
 138         return rmdir(pathname);
 139 }
 140
 141 int do_open(const char *pathname, int flags, mode_t mode)
 142 {
 143         if (flags != O_RDONLY) {
 144                 RETURN_ERROR_IF(dry_run, 0);
 145                 RETURN_ERROR_IF_RO_OR_LO;
 146         }
 147
 148         return open(pathname, flags | O_BINARY, mode);
 149 }
 150
 151 #ifdef HAVE_CHMOD
 152 int do_chmod(const char *path, mode_t mode)
 153 {
 154         int code;
 155         if (dry_run) return 0;
 156         RETURN_ERROR_IF_RO_OR_LO;
 157         if (S_ISLNK(mode)) {
 158 #ifdef HAVE_LCHMOD
 159                 code = lchmod(path, mode & CHMOD_BITS);
 160 #elif defined HAVE_SETATTRLIST
 161                 struct attrlist attrList;
 162                 uint32_t m = mode & CHMOD_BITS; /* manpage is wrong: not mode_t! */
 163
 164                 memset(&attrList, 0, sizeof attrList);
 165                 attrList.bitmapcount = ATTR_BIT_MAP_COUNT;
 166                 attrList.commonattr = ATTR_CMN_ACCESSMASK;
 167                 code = setattrlist(path, &attrList, &m, sizeof m, FSOPT_NOFOLLOW);
 168 #else
 169                 code = 1;
 170 #endif
 171         } else
 172                 code = chmod(path, mode & CHMOD_BITS); /* DISCOURAGED FUNCTION */
 173         if (code != 0 && (preserve_perms || preserve_executability))
 174                 return code;
 175         return 0;
 176 }
 177 #endif
 178
 179 int do_rename(const char *fname1, const char *fname2)
 180 {
 181         if (dry_run) return 0;
 182         RETURN_ERROR_IF_RO_OR_LO;
 183         return rename(fname1, fname2);
 184 }
 185
 186 void trim_trailing_slashes(char *name)
 187 {
 188         int l;
 189         /* Some BSD systems cannot make a directory if the name
 190          * contains a trailing slash.
 191          * <http://www.opensource.apple.com/bugs/X/BSD%20Kernel/2734739.html> */
 192
 193         /* Don't change empty string; and also we can't improve on
 194          * "/" */
 195
 196         l = strlen(name);
 197         while (l > 1) {
 198                 if (name[--l] != '/')
 199                         break;
 200                 name[l] = '\0';
 201         }
 202 }
 203
 204 int do_mkdir(char *fname, mode_t mode)
 205 {
 206         if (dry_run) return 0;
 207         RETURN_ERROR_IF_RO_OR_LO;
 208         trim_trailing_slashes(fname);
 209         return mkdir(fname, mode);
 210 }
 211
 212 /* like mkstemp but forces permissions */
 213 int do_mkstemp(char *template, mode_t perms)
 214 {
 215         RETURN_ERROR_IF(dry_run, 0);
 216         RETURN_ERROR_IF(read_only, EROFS);
 217         perms |= S_IWUSR;
 218
 219 #if defined HAVE_SECURE_MKSTEMP && defined HAVE_FCHMOD && (!defined HAVE_OPEN64 || defined HAVE_MKSTEMP64)
 220         {
 221                 int fd = mkstemp(template);
 222                 if (fd == -1)
 223                         return -1;
 224                 if (fchmod(fd, perms) != 0 && preserve_perms) {
 225                         int errno_save = errno;
 226                         close(fd);
 227                         unlink(template);
 228                         errno = errno_save;
 229                         return -1;
 230                 }
 231 #if defined HAVE_SETMODE && O_BINARY
 232                 setmode(fd, O_BINARY);
 233 #endif
 234                 return fd;
 235         }
 236 #else
 237         if (!mktemp(template))
 238                 return -1;
 239         return do_open(template, O_RDWR|O_EXCL|O_CREAT, perms);
 240 #endif
 241 }
 242
 243 int do_stat(const char *fname, STRUCT_STAT *st)
 244 {
 245 #ifdef USE_STAT64_FUNCS
 246         return stat64(fname, st);
 247 #else
 248         return stat(fname, st);
 249 #endif
 250 }
 251
 252 int do_lstat(const char *fname, STRUCT_STAT *st)
 253 {
 254 #ifdef SUPPORT_LINKS
 255 # ifdef USE_STAT64_FUNCS
 256         return lstat64(fname, st);
 257 # else
 258         return lstat(fname, st);
 259 # endif
 260 #else
 261         return do_stat(fname, st);
 262 #endif
 263 }
 264
 265 int do_fstat(int fd, STRUCT_STAT *st)
 266 {
 267 #ifdef USE_STAT64_FUNCS
 268         return fstat64(fd, st);
 269 #else
 270         return fstat(fd, st);
 271 #endif
 272 }
 273
 274 OFF_T do_lseek(int fd, OFF_T offset, int whence)
 275 {
 276 #ifdef HAVE_LSEEK64
 277 #if !SIZEOF_OFF64_T
 278         OFF_T lseek64();
 279 #else
 280         off64_t lseek64();
 281 #endif
 282         return lseek64(fd, offset, whence);
 283 #else
 284         return lseek(fd, offset, whence);
 285 #endif
 286 }