s3: VFS: posixacl: Add posixacl_sys_acl_delete_def_fd().
[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                         return -1;
160                 }
161                 res = acl_set_file(proc_fd_path, type, acl);
162         } else {
163                 /*
164                  * This is no longer a handle based call.
165                  */
166                 res = acl_set_file(fsp->fsp_name->base_name,
167                                    type,
168                                    acl);
169         }
170
171         acl_free(acl);
172         return res;
173 }
174
175 int posixacl_sys_acl_delete_def_file(vfs_handle_struct *handle,
176                                 const struct smb_filename *smb_fname)
177 {
178         return acl_delete_def_file(smb_fname->base_name);
179 }
180
181 int posixacl_sys_acl_delete_def_fd(vfs_handle_struct *handle,
182                                 files_struct *fsp)
183 {
184         if (fsp->fsp_flags.have_proc_fds) {
185                 int fd = fsp_get_pathref_fd(fsp);
186                 const char *proc_fd_path = NULL;
187                 char buf[PATH_MAX];
188
189                 proc_fd_path = sys_proc_fd_path(fd, buf, sizeof(buf));
190                 if (proc_fd_path == NULL) {
191                         return -1;
192                 }
193                 return acl_delete_def_file(proc_fd_path);
194         }
195
196         /*
197          * This is no longer a handle based call.
198          */
199         return acl_delete_def_file(fsp->fsp_name->base_name);
200 }
201
202 /* private functions */
203
204 static bool smb_ace_to_internal(acl_entry_t posix_ace,
205                                 struct smb_acl_entry *ace)
206 {
207         acl_tag_t tag;
208         acl_permset_t permset;
209
210         if (acl_get_tag_type(posix_ace, &tag) != 0) {
211                 DEBUG(0, ("smb_acl_get_tag_type failed\n"));
212                 return False;
213         }
214
215         switch(tag) {
216         case ACL_USER:
217                 ace->a_type = SMB_ACL_USER;
218                 break;
219         case ACL_USER_OBJ:
220                 ace->a_type = SMB_ACL_USER_OBJ;
221                 break;
222         case ACL_GROUP:
223                 ace->a_type = SMB_ACL_GROUP;
224                 break;
225         case ACL_GROUP_OBJ:
226                 ace->a_type = SMB_ACL_GROUP_OBJ;
227                 break;
228         case ACL_OTHER:
229                 ace->a_type = SMB_ACL_OTHER;
230                 break;
231         case ACL_MASK:
232                 ace->a_type = SMB_ACL_MASK;
233                 break;
234 #ifdef HAVE_ACL_EVERYONE
235         case ACL_EVERYONE:
236                 DEBUG(1, ("ACL tag type ACL_EVERYONE. FreeBSD with ZFS? Use 'vfs objects = zfsacl'\n"));
237                 return false;
238 #endif
239         default:
240                 DEBUG(0, ("unknown tag type %d\n", (unsigned int)tag));
241                 return False;
242         }
243         switch(ace->a_type) {
244         case SMB_ACL_USER: {
245                 uid_t *puid = (uid_t *)acl_get_qualifier(posix_ace);
246                 if (puid == NULL) {
247                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
248                         return False;
249                 }
250                 ace->info.user.uid = *puid;
251                 acl_free(puid);
252                 break;
253         }
254
255         case SMB_ACL_GROUP: {
256                 gid_t *pgid = (uid_t *)acl_get_qualifier(posix_ace);
257                 if (pgid == NULL) {
258                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
259                         return False;
260                 }
261                 ace->info.group.gid = *pgid;
262                 acl_free(pgid);
263                 break;
264         }
265         default:
266                 break;
267         }
268         if (acl_get_permset(posix_ace, &permset) != 0) {
269                 DEBUG(0, ("smb_acl_get_mode failed\n"));
270                 return False;
271         }
272         ace->a_perm = 0;
273 #ifdef HAVE_ACL_GET_PERM_NP
274         ace->a_perm |= (acl_get_perm_np(permset, ACL_READ) ? SMB_ACL_READ : 0);
275         ace->a_perm |= (acl_get_perm_np(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
276         ace->a_perm |= (acl_get_perm_np(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
277 #else
278         ace->a_perm |= (acl_get_perm(permset, ACL_READ) ? SMB_ACL_READ : 0);
279         ace->a_perm |= (acl_get_perm(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
280         ace->a_perm |= (acl_get_perm(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
281 #endif
282         return True;
283 }
284
285 static struct smb_acl_t *smb_acl_to_internal(acl_t acl, TALLOC_CTX *mem_ctx)
286 {
287         struct smb_acl_t *result = sys_acl_init(mem_ctx);
288         int entry_id = ACL_FIRST_ENTRY;
289         acl_entry_t e;
290         if (result == NULL) {
291                 return NULL;
292         }
293         while (acl_get_entry(acl, entry_id, &e) == 1) {
294
295                 entry_id = ACL_NEXT_ENTRY;
296
297                 result->acl = talloc_realloc(result, result->acl,
298                                              struct smb_acl_entry, result->count+1);
299                 if (result->acl == NULL) {
300                         TALLOC_FREE(result);
301                         DEBUG(0, ("talloc_realloc failed\n"));
302                         errno = ENOMEM;
303                         return NULL;
304                 }
305
306                 if (!smb_ace_to_internal(e, &result->acl[result->count])) {
307                         TALLOC_FREE(result);
308                         return NULL;
309                 }
310
311                 result->count += 1;
312         }
313         return result;
314 }
315
316 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm)
317 {
318         int ret;
319         acl_permset_t permset;
320
321         if ((ret = acl_get_permset(entry, &permset)) != 0) {
322                 return ret;
323         }
324         if ((ret = acl_clear_perms(permset)) != 0) {
325                 return ret;
326         }
327         if ((perm & SMB_ACL_READ) &&
328             ((ret = acl_add_perm(permset, ACL_READ)) != 0)) {
329                 return ret;
330         }
331         if ((perm & SMB_ACL_WRITE) &&
332             ((ret = acl_add_perm(permset, ACL_WRITE)) != 0)) {
333                 return ret;
334         }
335         if ((perm & SMB_ACL_EXECUTE) &&
336             ((ret = acl_add_perm(permset, ACL_EXECUTE)) != 0)) {
337                 return ret;
338         }
339
340         return 0;
341 }
342
343 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl)
344 {
345         acl_t result;
346         int i;
347
348         result = acl_init(acl->count);
349         if (result == NULL) {
350                 DEBUG(10, ("acl_init failed\n"));
351                 return NULL;
352         }
353
354         for (i=0; i<acl->count; i++) {
355                 const struct smb_acl_entry *entry = &acl->acl[i];
356                 acl_entry_t e;
357                 acl_tag_t tag;
358
359                 if (acl_create_entry(&result, &e) != 0) {
360                         DEBUG(1, ("acl_create_entry failed: %s\n",
361                                   strerror(errno)));
362                         goto fail;
363                 }
364
365                 switch (entry->a_type) {
366                 case SMB_ACL_USER:
367                         tag = ACL_USER;
368                         break;
369                 case SMB_ACL_USER_OBJ:
370                         tag = ACL_USER_OBJ;
371                         break;
372                 case SMB_ACL_GROUP:
373                         tag = ACL_GROUP;
374                         break;
375                 case SMB_ACL_GROUP_OBJ:
376                         tag = ACL_GROUP_OBJ;
377                         break;
378                 case SMB_ACL_OTHER:
379                         tag = ACL_OTHER;
380                         break;
381                 case SMB_ACL_MASK:
382                         tag = ACL_MASK;
383                         break;
384                 default:
385                         DEBUG(1, ("Unknown tag value %d\n", entry->a_type));
386                         goto fail;
387                 }
388
389                 if (acl_set_tag_type(e, tag) != 0) {
390                         DEBUG(10, ("acl_set_tag_type(%d) failed: %s\n",
391                                    tag, strerror(errno)));
392                         goto fail;
393                 }
394
395                 switch (entry->a_type) {
396                 case SMB_ACL_USER:
397                         if (acl_set_qualifier(e, &entry->info.user.uid) != 0) {
398                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
399                                           strerror(errno)));
400                                 goto fail;
401                         }
402                         break;
403                 case SMB_ACL_GROUP:
404                         if (acl_set_qualifier(e, &entry->info.group.gid) != 0) {
405                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
406                                           strerror(errno)));
407                                 goto fail;
408                         }
409                         break;
410                 default:        /* Shut up, compiler! :-) */
411                         break;
412                 }
413
414                 if (smb_acl_set_mode(e, entry->a_perm) != 0) {
415                         goto fail;
416                 }
417         }
418
419         if (acl_valid(result) != 0) {
420                 char *acl_string = sys_acl_to_text(acl, NULL);
421                 DEBUG(0, ("smb_acl_to_posix: ACL %s is invalid for set (%s)\n",
422                           acl_string, strerror(errno)));
423                 SAFE_FREE(acl_string);
424                 goto fail;
425         }
426
427         return result;
428
429  fail:
430         if (result != NULL) {
431                 acl_free(result);
432         }
433         return NULL;
434 }
435
436 /* VFS operations structure */
437
438 static struct vfs_fn_pointers posixacl_fns = {
439         .sys_acl_get_file_fn = posixacl_sys_acl_get_file,
440         .sys_acl_get_fd_fn = posixacl_sys_acl_get_fd,
441         .sys_acl_blob_get_file_fn = posix_sys_acl_blob_get_file,
442         .sys_acl_blob_get_fd_fn = posix_sys_acl_blob_get_fd,
443         .sys_acl_set_fd_fn = posixacl_sys_acl_set_fd,
444         .sys_acl_delete_def_file_fn = posixacl_sys_acl_delete_def_file,
445         .sys_acl_delete_def_fd_fn = posixacl_sys_acl_delete_def_fd,
446 };
447
448 static_decl_vfs;
449 NTSTATUS vfs_posixacl_init(TALLOC_CTX *ctx)
450 {
451         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "posixacl",
452                                 &posixacl_fns);
453 }