Adding the --fake-super option.
[rsync/rsync.git] / uidlist.c
1 /*
2  * Handle the mapping of uid/gid and user/group names between systems.
3  *
4  * Copyright (C) 1996 Andrew Tridgell
5  * Copyright (C) 1996 Paul Mackerras
6  * Copyright (C) 2004-2007 Wayne Davison
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 as
10  * published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License along
18  * with this program; if not, write to the Free Software Foundation, Inc.,
19  * 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
20  */
21
22 /* If the source username/group does not exist on the target then use
23  * the numeric IDs.  Never do any mapping for uid=0 or gid=0 as these
24  * are special. */
25
26 #include "rsync.h"
27 #include "io.h"
28
29 #ifdef HAVE_GETGROUPS
30 # ifndef GETGROUPS_T
31 #  define GETGROUPS_T gid_t
32 # endif
33 #endif
34
35 extern int verbose;
36 extern int am_root;
37 extern int preserve_uid;
38 extern int preserve_gid;
39 extern int preserve_acls;
40 extern int numeric_ids;
41
42 struct idlist {
43         struct idlist *next;
44         int id, id2;
45         char *name;
46 };
47
48 static struct idlist *uidlist;
49 static struct idlist *gidlist;
50
51 static struct idlist *add_to_list(struct idlist **root, int id, char *name,
52                                   int id2)
53 {
54         struct idlist *node = new(struct idlist);
55         if (!node)
56                 out_of_memory("add_to_list");
57         node->next = *root;
58         node->name = name;
59         node->id = id;
60         node->id2 = id2;
61         *root = node;
62         return node;
63 }
64
65 /* turn a uid into a user name */
66 static char *uid_to_name(uid_t uid)
67 {
68         struct passwd *pass = getpwuid(uid);
69         if (pass)
70                 return strdup(pass->pw_name);
71         return NULL;
72 }
73
74 /* turn a gid into a group name */
75 static char *gid_to_name(gid_t gid)
76 {
77         struct group *grp = getgrgid(gid);
78         if (grp)
79                 return strdup(grp->gr_name);
80         return NULL;
81 }
82
83 static uid_t map_uid(uid_t id, char *name)
84 {
85         uid_t uid;
86         if (id != 0 && name_to_uid(name, &uid))
87                 return uid;
88         return id;
89 }
90
91 static gid_t map_gid(gid_t id, char *name)
92 {
93         gid_t gid;
94         if (id != 0 && name_to_gid(name, &gid))
95                 return gid;
96         return id;
97 }
98
99 static int is_in_group(gid_t gid)
100 {
101 #ifdef HAVE_GETGROUPS
102         static gid_t last_in = GID_NONE, last_out;
103         static int ngroups = -2;
104         static GETGROUPS_T *gidset;
105         int n;
106
107         if (gid == last_in)
108                 return last_out;
109         if (ngroups < -1) {
110                 gid_t mygid = MY_GID();
111                 if ((ngroups = getgroups(0, NULL)) < 0)
112                         ngroups = 0;
113                 gidset = new_array(GETGROUPS_T, ngroups+1);
114                 if (!gidset)
115                         out_of_memory("is_in_group");
116                 if (ngroups > 0)
117                         ngroups = getgroups(ngroups, gidset);
118                 /* The default gid might not be in the list on some systems. */
119                 for (n = 0; n < ngroups; n++) {
120                         if (gidset[n] == mygid)
121                                 break;
122                 }
123                 if (n == ngroups)
124                         gidset[ngroups++] = mygid;
125                 if (verbose > 3) {
126                         int pos;
127                         char *gidbuf = new_array(char, ngroups*21+32);
128                         if (!gidbuf)
129                                 out_of_memory("is_in_group");
130                         pos = snprintf(gidbuf, 32, "process has %d gid%s: ",
131                                        ngroups, ngroups == 1? "" : "s");
132                         for (n = 0; n < ngroups; n++) {
133                                 pos += snprintf(gidbuf+pos, 21, " %d", (int)gidset[n]);
134                         }
135                         rprintf(FINFO, "%s\n", gidbuf);
136                         free(gidbuf);
137                 }
138         }
139
140         last_in = gid;
141         for (n = 0; n < ngroups; n++) {
142                 if (gidset[n] == gid)
143                         return last_out = 1;
144         }
145         return last_out = 0;
146
147 #else
148         static gid_t mygid = GID_NONE;
149         if (mygid == GID_NONE) {
150                 mygid = MY_GID();
151                 if (verbose > 3)
152                         rprintf(FINFO, "process has gid %d\n", (int)mygid);
153         }
154         return gid == mygid;
155 #endif
156 }
157
158 /* Add a uid to the list of uids.  Only called on receiving side. */
159 static uid_t recv_add_uid(uid_t id, char *name)
160 {
161         uid_t id2 = name ? map_uid(id, name) : id;
162         struct idlist *node;
163
164         node = add_to_list(&uidlist, (int)id, name, (int)id2);
165
166         if (verbose > 3) {
167                 rprintf(FINFO, "uid %d(%s) maps to %d\n",
168                         (int)id, name ? name : "", (int)id2);
169         }
170
171         return id2;
172 }
173
174 /* Add a gid to the list of gids.  Only called on receiving side. */
175 static gid_t recv_add_gid(gid_t id, char *name)
176 {
177         gid_t id2 = name ? map_gid(id, name) : id;
178         struct idlist *node;
179
180         if (!am_root && !is_in_group(id2))
181                 id2 = GID_NONE;
182         node = add_to_list(&gidlist, (int)id, name, (int)id2);
183
184         if (verbose > 3) {
185                 rprintf(FINFO, "gid %d(%s) maps to %d\n",
186                         (int)id, name ? name : "", (int)id2);
187         }
188
189         return id2;
190 }
191
192 /* this function is a definate candidate for a faster algorithm */
193 uid_t match_uid(uid_t uid)
194 {
195         static uid_t last_in, last_out;
196         struct idlist *list;
197
198         if (uid == 0)
199                 return 0;
200
201         if (uid == last_in)
202                 return last_out;
203
204         last_in = uid;
205
206         for (list = uidlist; list; list = list->next) {
207                 if (list->id == (int)uid)
208                         return last_out = (uid_t)list->id2;
209         }
210
211         return last_out = uid;
212 }
213
214 gid_t match_gid(gid_t gid)
215 {
216         static gid_t last_in = GID_NONE, last_out = GID_NONE;
217         struct idlist *list;
218
219         if (gid == GID_NONE)
220                 return GID_NONE;
221
222         if (gid == last_in)
223                 return last_out;
224
225         last_in = gid;
226
227         for (list = gidlist; list; list = list->next) {
228                 if (list->id == (int)gid)
229                         return last_out = (gid_t)list->id2;
230         }
231
232         return last_out = recv_add_gid(gid, NULL);
233 }
234
235 /* Add a uid to the list of uids.  Only called on sending side. */
236 char *add_uid(uid_t uid)
237 {
238         struct idlist *list;
239         struct idlist *node;
240
241         if (uid == 0)   /* don't map root */
242                 return NULL;
243
244         for (list = uidlist; list; list = list->next) {
245                 if (list->id == (int)uid)
246                         return NULL;
247         }
248
249         node = add_to_list(&uidlist, (int)uid, uid_to_name(uid), 0);
250         return node->name;
251 }
252
253 /* Add a gid to the list of gids.  Only called on sending side. */
254 char *add_gid(gid_t gid)
255 {
256         struct idlist *list;
257         struct idlist *node;
258
259         if (gid == 0)   /* don't map root */
260                 return NULL;
261
262         for (list = gidlist; list; list = list->next) {
263                 if (list->id == (int)gid)
264                         return NULL;
265         }
266
267         node = add_to_list(&gidlist, (int)gid, gid_to_name(gid), 0);
268         return node->name;
269 }
270
271 /* send a complete uid/gid mapping to the peer */
272 void send_uid_list(int f)
273 {
274         struct idlist *list;
275
276         if (preserve_uid || preserve_acls) {
277                 int len;
278                 /* we send sequences of uid/byte-length/name */
279                 for (list = uidlist; list; list = list->next) {
280                         if (!list->name)
281                                 continue;
282                         len = strlen(list->name);
283                         write_varint30(f, list->id);
284                         write_byte(f, len);
285                         write_buf(f, list->name, len);
286                 }
287
288                 /* terminate the uid list with a 0 uid. We explicitly exclude
289                  * 0 from the list */
290                 write_varint30(f, 0);
291         }
292
293         if (preserve_gid || preserve_acls) {
294                 int len;
295                 for (list = gidlist; list; list = list->next) {
296                         if (!list->name)
297                                 continue;
298                         len = strlen(list->name);
299                         write_varint30(f, list->id);
300                         write_byte(f, len);
301                         write_buf(f, list->name, len);
302                 }
303                 write_varint30(f, 0);
304         }
305 }
306
307 uid_t recv_user_name(int f, uid_t uid)
308 {
309         int len = read_byte(f);
310         char *name = new_array(char, len+1);
311         if (!name)
312                 out_of_memory("recv_user_name");
313         read_sbuf(f, name, len);
314         return recv_add_uid(uid, name); /* node keeps name's memory */
315 }
316
317 gid_t recv_group_name(int f, gid_t gid)
318 {
319         int len = read_byte(f);
320         char *name = new_array(char, len+1);
321         if (!name)
322                 out_of_memory("recv_group_name");
323         read_sbuf(f, name, len);
324         return recv_add_gid(gid, name); /* node keeps name's memory */
325 }
326
327 /* recv a complete uid/gid mapping from the peer and map the uid/gid
328  * in the file list to local names */
329 void recv_uid_list(int f, struct file_list *flist)
330 {
331         int id, i;
332
333         if ((preserve_uid || preserve_acls) && !numeric_ids) {
334                 /* read the uid list */
335                 while ((id = read_varint30(f)) != 0)
336                         recv_user_name(f, (uid_t)id);
337         }
338
339         if ((preserve_gid || preserve_acls) && !numeric_ids) {
340                 /* read the gid list */
341                 while ((id = read_varint30(f)) != 0)
342                         recv_group_name(f, (gid_t)id);
343         }
344
345         /* Now convert all the uids/gids from sender values to our values. */
346 #ifdef SUPPORT_ACLS
347         if (preserve_acls && !numeric_ids)
348                 match_acl_ids();
349 #endif
350         if (am_root && preserve_uid && !numeric_ids) {
351                 for (i = 0; i < flist->count; i++)
352                         F_OWNER(flist->files[i]) = match_uid(F_UID(flist->files[i]));
353         }
354         if (preserve_gid && (!am_root || !numeric_ids)) {
355                 for (i = 0; i < flist->count; i++)
356                         F_GROUP(flist->files[i]) = match_gid(F_GID(flist->files[i]));
357         }
358 }