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