rsync.c

   1 /*
   2    Copyright (C) Andrew Tridgell 1996
   3    Copyright (C) Paul Mackerras 1996
   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 of the License, or
   8    (at your option) 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
  17    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18 */
  19
  20 /* this file contains code used by more than one part of the rsync
  21    process */
  22
  23 #include "rsync.h"
  24
  25 extern int verbose;
  26 extern int dry_run;
  27 extern int preserve_times;
  28 extern int am_root;
  29 extern int preserve_uid;
  30 extern int preserve_gid;
  31 extern int preserve_perms;
  32 extern int make_backups;
  33 extern char *backup_suffix;
  34
  35
  36 /*
  37   free a sums struct
  38   */
  39 void free_sums(struct sum_struct *s)
  40 {
  41         if (s->sums) free(s->sums);
  42         free(s);
  43 }
  44
  45
  46 /*
  47  * delete a file or directory. If force_delet is set then delete
  48  * recursively
  49  */
  50 int delete_file(char *fname)
  51 {
  52         DIR *d;
  53         struct dirent *di;
  54         char buf[MAXPATHLEN];
  55         extern int force_delete;
  56         STRUCT_STAT st;
  57         int ret;
  58         extern int recurse;
  59
  60         if (do_unlink(fname) == 0 || errno == ENOENT) return 0;
  61
  62 #if SUPPORT_LINKS
  63         ret = do_lstat(fname, &st);
  64 #else
  65         ret = do_stat(fname, &st);
  66 #endif
  67         if (ret) {
  68                 rprintf(FERROR,"stat(%s) : %s\n", fname, strerror(errno));
  69                 return -1;
  70         }
  71
  72         if (!S_ISDIR(st.st_mode)) {
  73                 rprintf(FERROR,"unlink(%s) : %s\n", fname, strerror(errno));
  74                 return -1;
  75         }
  76
  77         if (do_rmdir(fname) == 0 || errno == ENOENT) return 0;
  78         if (!force_delete || !recurse ||
  79             (errno != ENOTEMPTY && errno != EEXIST)) {
  80                 rprintf(FERROR,"rmdir(%s) : %s\n", fname, strerror(errno));
  81                 return -1;
  82         }
  83
  84         /* now we do a recsursive delete on the directory ... */
  85         d = opendir(fname);
  86         if (!d) {
  87                 rprintf(FERROR,"opendir(%s): %s\n",
  88                         fname,strerror(errno));
  89                 return -1;
  90         }
  91
  92         for (di=readdir(d); di; di=readdir(d)) {
  93                 char *dname = d_name(di);
  94                 if (strcmp(dname,".")==0 ||
  95                     strcmp(dname,"..")==0)
  96                         continue;
  97                 slprintf(buf, sizeof(buf), "%s/%s", fname, dname);
  98                 if (verbose > 0)
  99                         rprintf(FINFO,"deleting %s\n", buf);
 100                 if (delete_file(buf) != 0) {
 101                         closedir(d);
 102                         return -1;
 103                 }
 104         }
 105
 106         closedir(d);
 107
 108         if (do_rmdir(fname) != 0) {
 109                 rprintf(FERROR,"rmdir(%s) : %s\n", fname, strerror(errno));
 110                 return -1;
 111         }
 112
 113         return 0;
 114 }
 115
 116 static int is_in_group(gid_t gid)
 117 {
 118 #ifdef HAVE_GETGROUPS
 119         static gid_t last_in = (gid_t) -2, last_out;
 120         static int ngroups = -2;
 121         static gid_t *gidset;
 122         int n;
 123
 124         if (gid == last_in)
 125                 return last_out;
 126         if (ngroups < -1) {
 127                 /* treat failure (-1) as if not member of any group */
 128                 ngroups = getgroups(0, 0);
 129                 if (ngroups > 0) {
 130                         gidset = (gid_t *) malloc(ngroups * sizeof(gid_t));
 131                         ngroups = getgroups(ngroups, gidset);
 132                 }
 133         }
 134
 135         last_in = gid;
 136         last_out = 0;
 137         for (n = 0; n < ngroups; n++) {
 138                 if (gidset[n] == gid) {
 139                         last_out = 1;
 140                         break;
 141                 }
 142         }
 143         return last_out;
 144
 145 #else
 146         return 0;
 147 #endif
 148 }
 149
 150 int set_perms(char *fname,struct file_struct *file,STRUCT_STAT *st,
 151               int report)
 152 {
 153         int updated = 0;
 154         STRUCT_STAT st2;
 155         int change_uid, change_gid;
 156         extern int am_daemon;
 157
 158         if (dry_run) return 0;
 159
 160         if (!st) {
 161                 if (link_stat(fname,&st2) != 0) {
 162                         rprintf(FERROR,"stat %s : %s\n",fname,strerror(errno));
 163                         return 0;
 164                 }
 165                 st = &st2;
 166         }
 167
 168         if (preserve_times && !S_ISLNK(st->st_mode) &&
 169             st->st_mtime != file->modtime) {
 170                 /* don't complain about not setting times on directories
 171                    because some filesystems can't do it */
 172                 if (set_modtime(fname,file->modtime) != 0 &&
 173                     !S_ISDIR(st->st_mode)) {
 174                         rprintf(FERROR,"failed to set times on %s : %s\n",
 175                                 fname,strerror(errno));
 176                         return 0;
 177                 } else {
 178                         updated = 1;
 179                 }
 180         }
 181
 182         change_uid = am_root && preserve_uid && st->st_uid != file->uid;
 183         change_gid = !am_daemon && preserve_gid && file->gid != -1 \
 184                                 && st->st_gid != file->gid;
 185         if (change_gid && !am_root) {
 186                 /* enforce bsd-style group semantics: non-root can only
 187                     change to groups that the user is a member of */
 188                 change_gid = is_in_group(file->gid);
 189         }
 190         if (change_uid || change_gid) {
 191                 if (do_lchown(fname,
 192                               change_uid?file->uid:st->st_uid,
 193                               change_gid?file->gid:st->st_gid) != 0) {
 194                         /* shouldn't have attempted to change uid or gid
 195                              unless have the privilege */
 196                         rprintf(FERROR,"chown %s : %s\n", fname,strerror(errno));
 197                         return 0;
 198                 }
 199                 updated = 1;
 200         }
 201
 202 #ifdef HAVE_CHMOD
 203         if (preserve_perms && !S_ISLNK(st->st_mode) &&
 204             (st->st_mode != file->mode ||
 205              (updated && (file->mode & ~ACCESSPERMS)))) {
 206                 updated = 1;
 207                 if (do_chmod(fname,file->mode) != 0) {
 208                         rprintf(FERROR,"failed to set permissions on %s : %s\n",
 209                                 fname,strerror(errno));
 210                         return 0;
 211                 }
 212         }
 213 #endif
 214
 215         if (verbose > 1 && report) {
 216                 if (updated)
 217                         rprintf(FINFO,"%s\n",fname);
 218                 else
 219                         rprintf(FINFO,"%s is uptodate\n",fname);
 220         }
 221         return updated;
 222 }
 223
 224
 225 void sig_int(void)
 226 {
 227         exit_cleanup(RERR_SIGNAL);
 228 }
 229
 230 int make_backup(char *fname)
 231 {
 232         char fnamebak[MAXPATHLEN];
 233         if (strlen(fname) + strlen(backup_suffix) > (MAXPATHLEN-1)) {
 234                 rprintf(FERROR,"backup filename too long\n");
 235                 return 0;
 236         }
 237
 238         slprintf(fnamebak,sizeof(fnamebak),"%s%s",fname,backup_suffix);
 239         if (do_rename(fname,fnamebak) != 0) {
 240                 if (errno != ENOENT) {
 241                         rprintf(FERROR,"rename %s %s : %s\n",fname,fnamebak,strerror(errno));
 242                         return 0;
 243                 }
 244         } else if (verbose > 1) {
 245                 rprintf(FINFO,"backed up %s to %s\n",fname,fnamebak);
 246         }
 247         return 1;
 248 }
 249
 250
 251 /* finish off a file transfer, renaming the file and setting the permissions
 252    and ownership */
 253 void finish_transfer(char *fname, char *fnametmp, struct file_struct *file)
 254 {
 255         if (make_backups && !make_backup(fname))
 256                 return;
 257
 258         /* move tmp file over real file */
 259         if (do_rename(fnametmp,fname) != 0) {
 260                 if (errno == EXDEV) {
 261                         /* rename failed on cross-filesystem link.
 262                            Copy the file instead. */
 263                         if (copy_file(fnametmp,fname, file->mode & ACCESSPERMS)) {
 264                                 rprintf(FERROR,"copy %s -> %s : %s\n",
 265                                         fnametmp,fname,strerror(errno));
 266                         } else {
 267                                 set_perms(fname,file,NULL,0);
 268                         }
 269                         do_unlink(fnametmp);
 270                 } else {
 271                         rprintf(FERROR,"rename %s -> %s : %s\n",
 272                                 fnametmp,fname,strerror(errno));
 273                         do_unlink(fnametmp);
 274                 }
 275         } else {
 276                 set_perms(fname,file,NULL,0);
 277         }
 278 }
 279
 280
 281