r17179: Merge the vl-posixacls tmp branch into mainline. It
[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 2 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, write to the Free Software
18    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19 */
20
21 #include "includes.h"
22
23
24 /* prototypes for static functions first - for clarity */
25
26 static BOOL smb_ace_to_internal(acl_entry_t posix_ace,
27                                 struct smb_acl_entry *ace);
28 static struct smb_acl_t *smb_acl_to_internal(acl_t acl);
29 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm);
30 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl);
31
32
33 /* public functions - the api */
34
35 SMB_ACL_T posixacl_sys_acl_get_file(vfs_handle_struct *handle,
36                                     const char *path_p,
37                                     SMB_ACL_TYPE_T type)
38 {
39         struct smb_acl_t *result;
40         acl_type_t acl_type;
41         acl_t acl;
42
43         switch(type) {
44         case SMB_ACL_TYPE_ACCESS:
45                 acl_type = ACL_TYPE_ACCESS;
46                 break;
47         case SMB_ACL_TYPE_DEFAULT:
48                 acl_type = ACL_TYPE_DEFAULT;
49                 break;
50         default:
51                 errno = EINVAL;
52                 return NULL;
53         }
54
55         acl = acl_get_file(path_p, acl_type);
56
57         if (acl == NULL) {
58                 return NULL;
59         }
60
61         result = smb_acl_to_internal(acl);
62         acl_free(acl);
63         return result;
64 }
65
66 SMB_ACL_T posixacl_sys_acl_get_fd(vfs_handle_struct *handle,
67                                   files_struct *fsp,
68                                   int fd)
69 {
70         struct smb_acl_t *result;
71         acl_t acl = acl_get_fd(fd);
72
73         if (acl == NULL) {
74                 return NULL;
75         }
76
77         result = smb_acl_to_internal(acl);
78         acl_free(acl);
79         return result;
80 }
81
82 int posixacl_sys_acl_set_file(vfs_handle_struct *handle,
83                               const char *name,
84                               SMB_ACL_TYPE_T type,
85                               SMB_ACL_T theacl)
86 {
87         int res;
88         acl_type_t acl_type;
89         acl_t acl;
90
91         DEBUG(10, ("Calling acl_set_file: %s, %d\n", name, type));
92
93         switch(type) {
94         case SMB_ACL_TYPE_ACCESS:
95                 acl_type = ACL_TYPE_ACCESS;
96                 break;
97         case SMB_ACL_TYPE_DEFAULT:
98                 acl_type = ACL_TYPE_DEFAULT;
99                 break;
100         default:
101                 errno = EINVAL;
102                 return -1;
103         }
104
105         if ((acl = smb_acl_to_posix(theacl)) == NULL) {
106                 return -1;
107         }
108         res = acl_set_file(name, acl_type, acl);
109         if (res != 0) {
110                 DEBUG(10, ("acl_set_file failed: %s\n", strerror(errno)));
111         }
112         acl_free(acl);
113         return res;
114 }
115
116 int posixacl_sys_acl_set_fd(vfs_handle_struct *handle,
117                             files_struct *fsp,
118                             int fd, SMB_ACL_T theacl)
119 {
120         int res;
121         acl_t acl = smb_acl_to_posix(theacl);
122         if (acl == NULL) {
123                 return -1;
124         }
125         res =  acl_set_fd(fd, acl);
126         acl_free(acl);
127         return res;
128 }
129
130 int posixacl_sys_acl_delete_def_file(vfs_handle_struct *handle,
131                                      const char *path)
132 {
133         return acl_delete_def_file(path);
134 }
135
136
137 /* private functions */
138
139 static BOOL smb_ace_to_internal(acl_entry_t posix_ace,
140                                 struct smb_acl_entry *ace)
141 {
142         acl_tag_t tag;
143         acl_permset_t permset;
144
145         if (acl_get_tag_type(posix_ace, &tag) != 0) {
146                 DEBUG(0, ("smb_acl_get_tag_type failed\n"));
147                 return False;
148         }
149
150         switch(tag) {
151         case ACL_USER:
152                 ace->a_type = SMB_ACL_USER;
153                 break;
154         case ACL_USER_OBJ:
155                 ace->a_type = SMB_ACL_USER_OBJ;
156                 break;
157         case ACL_GROUP:
158                 ace->a_type = SMB_ACL_GROUP;
159                 break;
160         case ACL_GROUP_OBJ:
161                 ace->a_type = SMB_ACL_GROUP_OBJ;
162                 break;
163         case ACL_OTHER:
164                 ace->a_type = SMB_ACL_OTHER;
165                 break;
166         case ACL_MASK:
167                 ace->a_type = SMB_ACL_MASK;
168                 break;
169         default:
170                 DEBUG(0, ("unknown tag type %d\n", (unsigned int)tag));
171                 return False;
172         }
173         switch(ace->a_type) {
174         case SMB_ACL_USER: {
175                 uid_t *puid = acl_get_qualifier(posix_ace);
176                 if (puid == NULL) {
177                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
178                         return False;
179                 }
180                 ace->uid = *puid;
181                 acl_free(puid);
182                 break;
183         }
184                 
185         case SMB_ACL_GROUP: {
186                 gid_t *pgid = acl_get_qualifier(posix_ace);
187                 if (pgid == NULL) {
188                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
189                         return False;
190                 }
191                 ace->gid = *pgid;
192                 acl_free(pgid);
193                 break;
194         }
195         default:
196                 break;
197         }
198         if (acl_get_permset(posix_ace, &permset) != 0) {
199                 DEBUG(0, ("smb_acl_get_mode failed\n"));
200                 return False;
201         }
202         ace->a_perm = 0;
203         ace->a_perm |= (acl_get_perm(permset, ACL_READ) ? SMB_ACL_READ : 0);
204         ace->a_perm |= (acl_get_perm(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
205         ace->a_perm |= (acl_get_perm(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
206         return True;
207 }
208
209 static struct smb_acl_t *smb_acl_to_internal(acl_t acl)
210 {
211         struct smb_acl_t *result = SMB_MALLOC_P(struct smb_acl_t);
212         int entry_id = ACL_FIRST_ENTRY;
213         acl_entry_t e;
214         if (result == NULL) {
215                 return NULL;
216         }
217         ZERO_STRUCTP(result);
218         while (acl_get_entry(acl, entry_id, &e) == 1) {
219
220                 entry_id = ACL_NEXT_ENTRY;
221
222                 result = SMB_REALLOC(result, sizeof(struct smb_acl_t) +
223                                      (sizeof(struct smb_acl_entry) *
224                                       (result->count+1)));
225                 if (result == NULL) {
226                         DEBUG(0, ("SMB_REALLOC failed\n"));
227                         errno = ENOMEM;
228                         return NULL;
229                 }
230
231                 if (!smb_ace_to_internal(e, &result->acl[result->count])) {
232                         SAFE_FREE(result);
233                         return NULL;
234                 }
235
236                 result->count += 1;
237         }
238         return result;
239 }
240
241 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm)
242 {
243         int ret;
244         acl_permset_t permset;
245
246         if ((ret = acl_get_permset(entry, &permset)) != 0) {
247                 return ret;
248         }
249         if ((ret = acl_clear_perms(permset)) != 0) {
250                 return ret;
251         }
252         if ((perm & SMB_ACL_READ) &&
253             ((ret = acl_add_perm(permset, ACL_READ)) != 0)) {
254                 return ret;
255         }
256         if ((perm & SMB_ACL_WRITE) &&
257             ((ret = acl_add_perm(permset, ACL_WRITE)) != 0)) {
258                 return ret;
259         }
260         if ((perm & SMB_ACL_EXECUTE) &&
261             ((ret = acl_add_perm(permset, ACL_EXECUTE)) != 0)) {
262                 return ret;
263         }
264         return acl_set_permset(entry, permset);
265 }
266
267 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl)
268 {
269         acl_t result;
270         int i;
271
272         result = acl_init(acl->count);
273         if (result == NULL) {
274                 DEBUG(10, ("acl_init failed\n"));
275                 return NULL;
276         }
277
278         for (i=0; i<acl->count; i++) {
279                 const struct smb_acl_entry *entry = &acl->acl[i];
280                 acl_entry_t e;
281                 acl_tag_t tag;
282
283                 if (acl_create_entry(&result, &e) != 0) {
284                         DEBUG(1, ("acl_create_entry failed: %s\n",
285                                   strerror(errno)));
286                         goto fail;
287                 }
288
289                 switch (entry->a_type) {
290                 case SMB_ACL_USER:
291                         tag = ACL_USER;
292                         break;
293                 case SMB_ACL_USER_OBJ:
294                         tag = ACL_USER_OBJ;
295                         break;
296                 case SMB_ACL_GROUP:
297                         tag = ACL_GROUP;
298                         break;
299                 case SMB_ACL_GROUP_OBJ:
300                         tag = ACL_GROUP_OBJ;
301                         break;
302                 case SMB_ACL_OTHER:
303                         tag = ACL_OTHER;
304                         break;
305                 case SMB_ACL_MASK:
306                         tag = ACL_MASK;
307                         break;
308                 default:
309                         DEBUG(1, ("Unknown tag value %d\n", entry->a_type));
310                         goto fail;
311                 }
312
313                 if (acl_set_tag_type(e, tag) != 0) {
314                         DEBUG(10, ("acl_set_tag_type(%d) failed: %s\n",
315                                    tag, strerror(errno)));
316                         goto fail;
317                 }
318
319                 switch (entry->a_type) {
320                 case SMB_ACL_USER:
321                         if (acl_set_qualifier(e, &entry->uid) != 0) {
322                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
323                                           strerror(errno)));
324                                 goto fail;
325                         }
326                         break;
327                 case SMB_ACL_GROUP:
328                         if (acl_set_qualifier(e, &entry->gid) != 0) {
329                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
330                                           strerror(errno)));
331                                 goto fail;
332                         }
333                         break;
334                 default:        /* Shut up, compiler! :-) */
335                         break;
336                 }
337
338                 if (smb_acl_set_mode(e, entry->a_perm) != 0) {
339                         goto fail;
340                 }
341         }
342
343         if (acl_valid(result) != 0) {
344                 DEBUG(0, ("smb_acl_to_posix: ACL is invalid for set (%s)\n",
345                           strerror(errno)));
346                 goto fail;
347         }
348
349         return result;
350
351  fail:
352         if (result != NULL) {
353                 acl_free(result);
354         }
355         return NULL;
356 }
357
358 /* VFS operations structure */
359
360 static vfs_op_tuple posixacl_op_tuples[] = {
361         /* Disk operations */
362   {SMB_VFS_OP(posixacl_sys_acl_get_file),
363    SMB_VFS_OP_SYS_ACL_GET_FILE,
364    SMB_VFS_LAYER_TRANSPARENT},
365
366   {SMB_VFS_OP(posixacl_sys_acl_get_fd),
367    SMB_VFS_OP_SYS_ACL_GET_FD,
368    SMB_VFS_LAYER_TRANSPARENT},
369
370   {SMB_VFS_OP(posixacl_sys_acl_set_file),
371    SMB_VFS_OP_SYS_ACL_SET_FILE,
372    SMB_VFS_LAYER_TRANSPARENT},
373
374   {SMB_VFS_OP(posixacl_sys_acl_set_fd),
375    SMB_VFS_OP_SYS_ACL_SET_FD,
376    SMB_VFS_LAYER_TRANSPARENT},
377
378   {SMB_VFS_OP(posixacl_sys_acl_delete_def_file),
379    SMB_VFS_OP_SYS_ACL_DELETE_DEF_FILE,
380    SMB_VFS_LAYER_TRANSPARENT},
381
382   {SMB_VFS_OP(NULL),
383    SMB_VFS_OP_NOOP,
384    SMB_VFS_LAYER_NOOP}
385 };
386
387 NTSTATUS vfs_posixacl_init(void)
388 {
389         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "posixacl",
390                                 posixacl_op_tuples);
391 }