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