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