s3: VFS: posixacl: Missing acl_free() in error code path.
[samba.git] / source3 / modules / vfs_posixacl.c
1 /*
2    Unix SMB/Netbios implementation.
3    VFS module to get and set posix acls
4    Copyright (C) Volker Lendecke 2006
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "includes.h"
21 #include "system/filesys.h"
22 #include "smbd/smbd.h"
23 #include "modules/vfs_posixacl.h"
24
25 /* prototypes for static functions first - for clarity */
26
27 static bool smb_ace_to_internal(acl_entry_t posix_ace,
28                                 struct smb_acl_entry *ace);
29 static struct smb_acl_t *smb_acl_to_internal(acl_t acl, TALLOC_CTX *mem_ctx);
30 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm);
31 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl);
32
33
34 /* public functions - the api */
35
36 SMB_ACL_T posixacl_sys_acl_get_file(vfs_handle_struct *handle,
37                                 const struct smb_filename *smb_fname,
38                                 SMB_ACL_TYPE_T type,
39                                 TALLOC_CTX *mem_ctx)
40 {
41         struct smb_acl_t *result;
42         acl_type_t acl_type;
43         acl_t acl;
44
45         switch(type) {
46         case SMB_ACL_TYPE_ACCESS:
47                 acl_type = ACL_TYPE_ACCESS;
48                 break;
49         case SMB_ACL_TYPE_DEFAULT:
50                 acl_type = ACL_TYPE_DEFAULT;
51                 break;
52         default:
53                 errno = EINVAL;
54                 return NULL;
55         }
56
57         acl = acl_get_file(smb_fname->base_name, acl_type);
58
59         if (acl == NULL) {
60                 return NULL;
61         }
62
63         result = smb_acl_to_internal(acl, mem_ctx);
64         acl_free(acl);
65         return result;
66 }
67
68 SMB_ACL_T posixacl_sys_acl_get_fd(vfs_handle_struct *handle,
69                                   files_struct *fsp, TALLOC_CTX *mem_ctx)
70 {
71         struct smb_acl_t *result;
72         acl_t acl = NULL;
73
74         if (!fsp->fsp_flags.is_pathref) {
75                 acl = acl_get_fd(fsp_get_io_fd(fsp));
76         } else if (fsp->fsp_flags.have_proc_fds) {
77                 int fd = fsp_get_pathref_fd(fsp);
78                 const char *proc_fd_path = NULL;
79                 char buf[PATH_MAX];
80
81                 proc_fd_path = sys_proc_fd_path(fd, buf, sizeof(buf));
82                 if (proc_fd_path == NULL) {
83                         return NULL;
84                 }
85
86                 acl = acl_get_file(proc_fd_path, ACL_TYPE_ACCESS);
87         } else {
88                 /*
89                  * This is no longer a handle based call.
90                  */
91                 acl = acl_get_file(fsp->fsp_name->base_name, ACL_TYPE_ACCESS);
92         }
93         if (acl == NULL) {
94                 return NULL;
95         }
96
97         result = smb_acl_to_internal(acl, mem_ctx);
98         acl_free(acl);
99         return result;
100 }
101
102 int posixacl_sys_acl_set_file(vfs_handle_struct *handle,
103                               const struct smb_filename *smb_fname,
104                               SMB_ACL_TYPE_T type,
105                               SMB_ACL_T theacl)
106 {
107         int res;
108         acl_type_t acl_type;
109         acl_t acl;
110
111         DEBUG(10, ("Calling acl_set_file: %s, %d\n",
112                         smb_fname->base_name,
113                         type));
114
115         switch(type) {
116         case SMB_ACL_TYPE_ACCESS:
117                 acl_type = ACL_TYPE_ACCESS;
118                 break;
119         case SMB_ACL_TYPE_DEFAULT:
120                 acl_type = ACL_TYPE_DEFAULT;
121                 break;
122         default:
123                 errno = EINVAL;
124                 return -1;
125         }
126
127         if ((acl = smb_acl_to_posix(theacl)) == NULL) {
128                 return -1;
129         }
130         res = acl_set_file(smb_fname->base_name, acl_type, acl);
131         if (res != 0) {
132                 DEBUG(10, ("acl_set_file failed: %s\n", strerror(errno)));
133         }
134         acl_free(acl);
135         return res;
136 }
137
138 int posixacl_sys_acl_set_fd(vfs_handle_struct *handle,
139                             files_struct *fsp,
140                             SMB_ACL_TYPE_T type,
141                             SMB_ACL_T theacl)
142 {
143         int res;
144         acl_t acl = smb_acl_to_posix(theacl);
145         int fd = fsp_get_pathref_fd(fsp);
146
147         if (acl == NULL) {
148                 return -1;
149         }
150
151         if (!fsp->fsp_flags.is_pathref && type == SMB_ACL_TYPE_ACCESS) {
152                 res = acl_set_fd(fd, acl);
153         } else if (fsp->fsp_flags.have_proc_fds) {
154                 const char *proc_fd_path = NULL;
155                 char buf[PATH_MAX];
156
157                 proc_fd_path = sys_proc_fd_path(fd, buf, sizeof(buf));
158                 if (proc_fd_path == NULL) {
159                         acl_free(acl);
160                         return -1;
161                 }
162                 res = acl_set_file(proc_fd_path, type, acl);
163         } else {
164                 /*
165                  * This is no longer a handle based call.
166                  */
167                 res = acl_set_file(fsp->fsp_name->base_name,
168                                    type,
169                                    acl);
170         }
171
172         acl_free(acl);
173         return res;
174 }
175
176 int posixacl_sys_acl_delete_def_fd(vfs_handle_struct *handle,
177                                 files_struct *fsp)
178 {
179         if (fsp->fsp_flags.have_proc_fds) {
180                 int fd = fsp_get_pathref_fd(fsp);
181                 const char *proc_fd_path = NULL;
182                 char buf[PATH_MAX];
183
184                 proc_fd_path = sys_proc_fd_path(fd, buf, sizeof(buf));
185                 if (proc_fd_path == NULL) {
186                         return -1;
187                 }
188                 return acl_delete_def_file(proc_fd_path);
189         }
190
191         /*
192          * This is no longer a handle based call.
193          */
194         return acl_delete_def_file(fsp->fsp_name->base_name);
195 }
196
197 /* private functions */
198
199 static bool smb_ace_to_internal(acl_entry_t posix_ace,
200                                 struct smb_acl_entry *ace)
201 {
202         acl_tag_t tag;
203         acl_permset_t permset;
204
205         if (acl_get_tag_type(posix_ace, &tag) != 0) {
206                 DEBUG(0, ("smb_acl_get_tag_type failed\n"));
207                 return False;
208         }
209
210         switch(tag) {
211         case ACL_USER:
212                 ace->a_type = SMB_ACL_USER;
213                 break;
214         case ACL_USER_OBJ:
215                 ace->a_type = SMB_ACL_USER_OBJ;
216                 break;
217         case ACL_GROUP:
218                 ace->a_type = SMB_ACL_GROUP;
219                 break;
220         case ACL_GROUP_OBJ:
221                 ace->a_type = SMB_ACL_GROUP_OBJ;
222                 break;
223         case ACL_OTHER:
224                 ace->a_type = SMB_ACL_OTHER;
225                 break;
226         case ACL_MASK:
227                 ace->a_type = SMB_ACL_MASK;
228                 break;
229 #ifdef HAVE_ACL_EVERYONE
230         case ACL_EVERYONE:
231                 DEBUG(1, ("ACL tag type ACL_EVERYONE. FreeBSD with ZFS? Use 'vfs objects = zfsacl'\n"));
232                 return false;
233 #endif
234         default:
235                 DEBUG(0, ("unknown tag type %d\n", (unsigned int)tag));
236                 return False;
237         }
238         switch(ace->a_type) {
239         case SMB_ACL_USER: {
240                 uid_t *puid = (uid_t *)acl_get_qualifier(posix_ace);
241                 if (puid == NULL) {
242                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
243                         return False;
244                 }
245                 ace->info.user.uid = *puid;
246                 acl_free(puid);
247                 break;
248         }
249
250         case SMB_ACL_GROUP: {
251                 gid_t *pgid = (uid_t *)acl_get_qualifier(posix_ace);
252                 if (pgid == NULL) {
253                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
254                         return False;
255                 }
256                 ace->info.group.gid = *pgid;
257                 acl_free(pgid);
258                 break;
259         }
260         default:
261                 break;
262         }
263         if (acl_get_permset(posix_ace, &permset) != 0) {
264                 DEBUG(0, ("smb_acl_get_mode failed\n"));
265                 return False;
266         }
267         ace->a_perm = 0;
268 #ifdef HAVE_ACL_GET_PERM_NP
269         ace->a_perm |= (acl_get_perm_np(permset, ACL_READ) ? SMB_ACL_READ : 0);
270         ace->a_perm |= (acl_get_perm_np(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
271         ace->a_perm |= (acl_get_perm_np(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
272 #else
273         ace->a_perm |= (acl_get_perm(permset, ACL_READ) ? SMB_ACL_READ : 0);
274         ace->a_perm |= (acl_get_perm(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
275         ace->a_perm |= (acl_get_perm(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
276 #endif
277         return True;
278 }
279
280 static struct smb_acl_t *smb_acl_to_internal(acl_t acl, TALLOC_CTX *mem_ctx)
281 {
282         struct smb_acl_t *result = sys_acl_init(mem_ctx);
283         int entry_id = ACL_FIRST_ENTRY;
284         acl_entry_t e;
285         if (result == NULL) {
286                 return NULL;
287         }
288         while (acl_get_entry(acl, entry_id, &e) == 1) {
289
290                 entry_id = ACL_NEXT_ENTRY;
291
292                 result->acl = talloc_realloc(result, result->acl,
293                                              struct smb_acl_entry, result->count+1);
294                 if (result->acl == NULL) {
295                         TALLOC_FREE(result);
296                         DEBUG(0, ("talloc_realloc failed\n"));
297                         errno = ENOMEM;
298                         return NULL;
299                 }
300
301                 if (!smb_ace_to_internal(e, &result->acl[result->count])) {
302                         TALLOC_FREE(result);
303                         return NULL;
304                 }
305
306                 result->count += 1;
307         }
308         return result;
309 }
310
311 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm)
312 {
313         int ret;
314         acl_permset_t permset;
315
316         if ((ret = acl_get_permset(entry, &permset)) != 0) {
317                 return ret;
318         }
319         if ((ret = acl_clear_perms(permset)) != 0) {
320                 return ret;
321         }
322         if ((perm & SMB_ACL_READ) &&
323             ((ret = acl_add_perm(permset, ACL_READ)) != 0)) {
324                 return ret;
325         }
326         if ((perm & SMB_ACL_WRITE) &&
327             ((ret = acl_add_perm(permset, ACL_WRITE)) != 0)) {
328                 return ret;
329         }
330         if ((perm & SMB_ACL_EXECUTE) &&
331             ((ret = acl_add_perm(permset, ACL_EXECUTE)) != 0)) {
332                 return ret;
333         }
334
335         return 0;
336 }
337
338 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl)
339 {
340         acl_t result;
341         int i;
342
343         result = acl_init(acl->count);
344         if (result == NULL) {
345                 DEBUG(10, ("acl_init failed\n"));
346                 return NULL;
347         }
348
349         for (i=0; i<acl->count; i++) {
350                 const struct smb_acl_entry *entry = &acl->acl[i];
351                 acl_entry_t e;
352                 acl_tag_t tag;
353
354                 if (acl_create_entry(&result, &e) != 0) {
355                         DEBUG(1, ("acl_create_entry failed: %s\n",
356                                   strerror(errno)));
357                         goto fail;
358                 }
359
360                 switch (entry->a_type) {
361                 case SMB_ACL_USER:
362                         tag = ACL_USER;
363                         break;
364                 case SMB_ACL_USER_OBJ:
365                         tag = ACL_USER_OBJ;
366                         break;
367                 case SMB_ACL_GROUP:
368                         tag = ACL_GROUP;
369                         break;
370                 case SMB_ACL_GROUP_OBJ:
371                         tag = ACL_GROUP_OBJ;
372                         break;
373                 case SMB_ACL_OTHER:
374                         tag = ACL_OTHER;
375                         break;
376                 case SMB_ACL_MASK:
377                         tag = ACL_MASK;
378                         break;
379                 default:
380                         DEBUG(1, ("Unknown tag value %d\n", entry->a_type));
381                         goto fail;
382                 }
383
384                 if (acl_set_tag_type(e, tag) != 0) {
385                         DEBUG(10, ("acl_set_tag_type(%d) failed: %s\n",
386                                    tag, strerror(errno)));
387                         goto fail;
388                 }
389
390                 switch (entry->a_type) {
391                 case SMB_ACL_USER:
392                         if (acl_set_qualifier(e, &entry->info.user.uid) != 0) {
393                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
394                                           strerror(errno)));
395                                 goto fail;
396                         }
397                         break;
398                 case SMB_ACL_GROUP:
399                         if (acl_set_qualifier(e, &entry->info.group.gid) != 0) {
400                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
401                                           strerror(errno)));
402                                 goto fail;
403                         }
404                         break;
405                 default:        /* Shut up, compiler! :-) */
406                         break;
407                 }
408
409                 if (smb_acl_set_mode(e, entry->a_perm) != 0) {
410                         goto fail;
411                 }
412         }
413
414         if (acl_valid(result) != 0) {
415                 char *acl_string = sys_acl_to_text(acl, NULL);
416                 DEBUG(0, ("smb_acl_to_posix: ACL %s is invalid for set (%s)\n",
417                           acl_string, strerror(errno)));
418                 SAFE_FREE(acl_string);
419                 goto fail;
420         }
421
422         return result;
423
424  fail:
425         if (result != NULL) {
426                 acl_free(result);
427         }
428         return NULL;
429 }
430
431 /* VFS operations structure */
432
433 static struct vfs_fn_pointers posixacl_fns = {
434         .sys_acl_get_file_fn = posixacl_sys_acl_get_file,
435         .sys_acl_get_fd_fn = posixacl_sys_acl_get_fd,
436         .sys_acl_blob_get_file_fn = posix_sys_acl_blob_get_file,
437         .sys_acl_blob_get_fd_fn = posix_sys_acl_blob_get_fd,
438         .sys_acl_set_fd_fn = posixacl_sys_acl_set_fd,
439         .sys_acl_delete_def_fd_fn = posixacl_sys_acl_delete_def_fd,
440 };
441
442 static_decl_vfs;
443 NTSTATUS vfs_posixacl_init(TALLOC_CTX *ctx)
444 {
445         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "posixacl",
446                                 &posixacl_fns);
447 }