libcli: Remove uneeded debug message
[obnox/samba/samba-obnox.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 char *path_p,
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(path_p, 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 = acl_get_fd(fsp->fh->fd);
73
74         if (acl == NULL) {
75                 return NULL;
76         }
77
78         result = smb_acl_to_internal(acl, mem_ctx);
79         acl_free(acl);
80         return result;
81 }
82
83 int posixacl_sys_acl_set_file(vfs_handle_struct *handle,
84                               const char *name,
85                               SMB_ACL_TYPE_T type,
86                               SMB_ACL_T theacl)
87 {
88         int res;
89         acl_type_t acl_type;
90         acl_t acl;
91
92         DEBUG(10, ("Calling acl_set_file: %s, %d\n", name, type));
93
94         switch(type) {
95         case SMB_ACL_TYPE_ACCESS:
96                 acl_type = ACL_TYPE_ACCESS;
97                 break;
98         case SMB_ACL_TYPE_DEFAULT:
99                 acl_type = ACL_TYPE_DEFAULT;
100                 break;
101         default:
102                 errno = EINVAL;
103                 return -1;
104         }
105
106         if ((acl = smb_acl_to_posix(theacl)) == NULL) {
107                 return -1;
108         }
109         res = acl_set_file(name, acl_type, acl);
110         if (res != 0) {
111                 DEBUG(10, ("acl_set_file failed: %s\n", strerror(errno)));
112         }
113         acl_free(acl);
114         return res;
115 }
116
117 int posixacl_sys_acl_set_fd(vfs_handle_struct *handle,
118                             files_struct *fsp,
119                             SMB_ACL_T theacl)
120 {
121         int res;
122         acl_t acl = smb_acl_to_posix(theacl);
123         if (acl == NULL) {
124                 return -1;
125         }
126         res =  acl_set_fd(fsp->fh->fd, acl);
127         acl_free(acl);
128         return res;
129 }
130
131 int posixacl_sys_acl_delete_def_file(vfs_handle_struct *handle,
132                                      const char *path)
133 {
134         return acl_delete_def_file(path);
135 }
136
137
138 /* private functions */
139
140 static bool smb_ace_to_internal(acl_entry_t posix_ace,
141                                 struct smb_acl_entry *ace)
142 {
143         acl_tag_t tag;
144         acl_permset_t permset;
145
146         if (acl_get_tag_type(posix_ace, &tag) != 0) {
147                 DEBUG(0, ("smb_acl_get_tag_type failed\n"));
148                 return False;
149         }
150
151         switch(tag) {
152         case ACL_USER:
153                 ace->a_type = SMB_ACL_USER;
154                 break;
155         case ACL_USER_OBJ:
156                 ace->a_type = SMB_ACL_USER_OBJ;
157                 break;
158         case ACL_GROUP:
159                 ace->a_type = SMB_ACL_GROUP;
160                 break;
161         case ACL_GROUP_OBJ:
162                 ace->a_type = SMB_ACL_GROUP_OBJ;
163                 break;
164         case ACL_OTHER:
165                 ace->a_type = SMB_ACL_OTHER;
166                 break;
167         case ACL_MASK:
168                 ace->a_type = SMB_ACL_MASK;
169                 break;
170         default:
171                 DEBUG(0, ("unknown tag type %d\n", (unsigned int)tag));
172                 return False;
173         }
174         switch(ace->a_type) {
175         case SMB_ACL_USER: {
176                 uid_t *puid = (uid_t *)acl_get_qualifier(posix_ace);
177                 if (puid == NULL) {
178                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
179                         return False;
180                 }
181                 ace->info.user.uid = *puid;
182                 acl_free(puid);
183                 break;
184         }
185                 
186         case SMB_ACL_GROUP: {
187                 gid_t *pgid = (uid_t *)acl_get_qualifier(posix_ace);
188                 if (pgid == NULL) {
189                         DEBUG(0, ("smb_acl_get_qualifier failed\n"));
190                         return False;
191                 }
192                 ace->info.group.gid = *pgid;
193                 acl_free(pgid);
194                 break;
195         }
196         default:
197                 break;
198         }
199         if (acl_get_permset(posix_ace, &permset) != 0) {
200                 DEBUG(0, ("smb_acl_get_mode failed\n"));
201                 return False;
202         }
203         ace->a_perm = 0;
204 #ifdef HAVE_ACL_GET_PERM_NP
205         ace->a_perm |= (acl_get_perm_np(permset, ACL_READ) ? SMB_ACL_READ : 0);
206         ace->a_perm |= (acl_get_perm_np(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
207         ace->a_perm |= (acl_get_perm_np(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
208 #else
209         ace->a_perm |= (acl_get_perm(permset, ACL_READ) ? SMB_ACL_READ : 0);
210         ace->a_perm |= (acl_get_perm(permset, ACL_WRITE) ? SMB_ACL_WRITE : 0);
211         ace->a_perm |= (acl_get_perm(permset, ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
212 #endif
213         return True;
214 }
215
216 static struct smb_acl_t *smb_acl_to_internal(acl_t acl, TALLOC_CTX *mem_ctx)
217 {
218         struct smb_acl_t *result = sys_acl_init(mem_ctx);
219         int entry_id = ACL_FIRST_ENTRY;
220         acl_entry_t e;
221         if (result == NULL) {
222                 return NULL;
223         }
224         while (acl_get_entry(acl, entry_id, &e) == 1) {
225
226                 entry_id = ACL_NEXT_ENTRY;
227
228                 result->acl = talloc_realloc(result, result->acl, 
229                                              struct smb_acl_entry, result->count+1);
230                 if (result->acl == NULL) {
231                         TALLOC_FREE(result);
232                         DEBUG(0, ("talloc_realloc failed\n"));
233                         errno = ENOMEM;
234                         return NULL;
235                 }
236
237                 if (!smb_ace_to_internal(e, &result->acl[result->count])) {
238                         TALLOC_FREE(result);
239                         return NULL;
240                 }
241
242                 result->count += 1;
243         }
244         return result;
245 }
246
247 static int smb_acl_set_mode(acl_entry_t entry, SMB_ACL_PERM_T perm)
248 {
249         int ret;
250         acl_permset_t permset;
251
252         if ((ret = acl_get_permset(entry, &permset)) != 0) {
253                 return ret;
254         }
255         if ((ret = acl_clear_perms(permset)) != 0) {
256                 return ret;
257         }
258         if ((perm & SMB_ACL_READ) &&
259             ((ret = acl_add_perm(permset, ACL_READ)) != 0)) {
260                 return ret;
261         }
262         if ((perm & SMB_ACL_WRITE) &&
263             ((ret = acl_add_perm(permset, ACL_WRITE)) != 0)) {
264                 return ret;
265         }
266         if ((perm & SMB_ACL_EXECUTE) &&
267             ((ret = acl_add_perm(permset, ACL_EXECUTE)) != 0)) {
268                 return ret;
269         }
270         return acl_set_permset(entry, permset);
271 }
272
273 static acl_t smb_acl_to_posix(const struct smb_acl_t *acl)
274 {
275         acl_t result;
276         int i;
277
278         result = acl_init(acl->count);
279         if (result == NULL) {
280                 DEBUG(10, ("acl_init failed\n"));
281                 return NULL;
282         }
283
284         for (i=0; i<acl->count; i++) {
285                 const struct smb_acl_entry *entry = &acl->acl[i];
286                 acl_entry_t e;
287                 acl_tag_t tag;
288
289                 if (acl_create_entry(&result, &e) != 0) {
290                         DEBUG(1, ("acl_create_entry failed: %s\n",
291                                   strerror(errno)));
292                         goto fail;
293                 }
294
295                 switch (entry->a_type) {
296                 case SMB_ACL_USER:
297                         tag = ACL_USER;
298                         break;
299                 case SMB_ACL_USER_OBJ:
300                         tag = ACL_USER_OBJ;
301                         break;
302                 case SMB_ACL_GROUP:
303                         tag = ACL_GROUP;
304                         break;
305                 case SMB_ACL_GROUP_OBJ:
306                         tag = ACL_GROUP_OBJ;
307                         break;
308                 case SMB_ACL_OTHER:
309                         tag = ACL_OTHER;
310                         break;
311                 case SMB_ACL_MASK:
312                         tag = ACL_MASK;
313                         break;
314                 default:
315                         DEBUG(1, ("Unknown tag value %d\n", entry->a_type));
316                         goto fail;
317                 }
318
319                 if (acl_set_tag_type(e, tag) != 0) {
320                         DEBUG(10, ("acl_set_tag_type(%d) failed: %s\n",
321                                    tag, strerror(errno)));
322                         goto fail;
323                 }
324
325                 switch (entry->a_type) {
326                 case SMB_ACL_USER:
327                         if (acl_set_qualifier(e, &entry->info.user.uid) != 0) {
328                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
329                                           strerror(errno)));
330                                 goto fail;
331                         }
332                         break;
333                 case SMB_ACL_GROUP:
334                         if (acl_set_qualifier(e, &entry->info.group.gid) != 0) {
335                                 DEBUG(1, ("acl_set_qualifiier failed: %s\n",
336                                           strerror(errno)));
337                                 goto fail;
338                         }
339                         break;
340                 default:        /* Shut up, compiler! :-) */
341                         break;
342                 }
343
344                 if (smb_acl_set_mode(e, entry->a_perm) != 0) {
345                         goto fail;
346                 }
347         }
348
349         if (acl_valid(result) != 0) {
350                 char *acl_string = sys_acl_to_text(acl, NULL);
351                 DEBUG(0, ("smb_acl_to_posix: ACL %s is invalid for set (%s)\n",
352                           acl_string, strerror(errno)));
353                 SAFE_FREE(acl_string);
354                 goto fail;
355         }
356
357         return result;
358
359  fail:
360         if (result != NULL) {
361                 acl_free(result);
362         }
363         return NULL;
364 }
365
366 /* VFS operations structure */
367
368 static struct vfs_fn_pointers posixacl_fns = {
369         .sys_acl_get_file_fn = posixacl_sys_acl_get_file,
370         .sys_acl_get_fd_fn = posixacl_sys_acl_get_fd,
371         .sys_acl_blob_get_file_fn = posix_sys_acl_blob_get_file,
372         .sys_acl_blob_get_fd_fn = posix_sys_acl_blob_get_fd,
373         .sys_acl_set_file_fn = posixacl_sys_acl_set_file,
374         .sys_acl_set_fd_fn = posixacl_sys_acl_set_fd,
375         .sys_acl_delete_def_file_fn = posixacl_sys_acl_delete_def_file,
376 };
377
378 NTSTATUS vfs_posixacl_init(void);
379 NTSTATUS vfs_posixacl_init(void)
380 {
381         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "posixacl",
382                                 &posixacl_fns);
383 }