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