vfs_solarisacl: fix build for samba 4.7 and up
[samba.git] / source3 / modules / vfs_solarisacl.c
1 /*
2    Unix SMB/Netbios implementation.
3    VFS module to get and set Solaris ACLs
4    Copyright (C) Michael Adam 2006,2008
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
21 #include "includes.h"
22 #include "system/filesys.h"
23 #include "smbd/smbd.h"
24 #include "modules/vfs_solarisacl.h"
25
26 /* typedef struct acl SOLARIS_ACE_T; */
27 typedef aclent_t SOLARIS_ACE_T;
28 typedef aclent_t *SOLARIS_ACL_T;
29 typedef int SOLARIS_ACL_TAG_T;   /* the type of an ACL entry */
30 typedef o_mode_t SOLARIS_PERM_T;
31
32 /* for convenience: check if solaris acl entry is a default entry?  */
33 #define _IS_DEFAULT(ace) ((ace).a_type & ACL_DEFAULT)
34 #define _IS_OF_TYPE(ace, type) ( \
35         (((type) == SMB_ACL_TYPE_ACCESS) && !_IS_DEFAULT(ace)) \
36         || \
37         (((type) == SMB_ACL_TYPE_DEFAULT) && _IS_DEFAULT(ace)) \
38 )
39
40
41 /* prototypes for private functions */
42
43 static SOLARIS_ACL_T solaris_acl_init(int count);
44 static bool smb_acl_to_solaris_acl(SMB_ACL_T smb_acl, 
45                 SOLARIS_ACL_T *solariacl, int *count, 
46                 SMB_ACL_TYPE_T type);
47 static SMB_ACL_T solaris_acl_to_smb_acl(SOLARIS_ACL_T solarisacl, int count,
48                                         SMB_ACL_TYPE_T type, TALLOC_CTX *mem_ctx);
49 static SOLARIS_ACL_TAG_T smb_tag_to_solaris_tag(SMB_ACL_TAG_T smb_tag);
50 static SMB_ACL_TAG_T solaris_tag_to_smb_tag(SOLARIS_ACL_TAG_T solaris_tag);
51 static bool solaris_add_to_acl(SOLARIS_ACL_T *solaris_acl, int *count,
52                 SOLARIS_ACL_T add_acl, int add_count, SMB_ACL_TYPE_T type);
53 static bool solaris_acl_get_file(const char *name, SOLARIS_ACL_T *solarisacl, 
54                 int *count);
55 static bool solaris_acl_get_fd(int fd, SOLARIS_ACL_T *solarisacl, int *count);
56 static bool solaris_acl_sort(SOLARIS_ACL_T theacl, int count);
57 static SMB_ACL_PERM_T solaris_perm_to_smb_perm(const SOLARIS_PERM_T perm);
58 static SOLARIS_PERM_T smb_perm_to_solaris_perm(const SMB_ACL_PERM_T perm);
59 #if 0
60 static bool solaris_acl_check(SOLARIS_ACL_T solaris_acl, int count);
61 #endif
62
63 /* public functions - the api */
64
65 SMB_ACL_T solarisacl_sys_acl_get_file(vfs_handle_struct *handle,
66                                 const struct smb_filename *smb_fname,
67                                 SMB_ACL_TYPE_T type,
68                                 TALLOC_CTX *mem_ctx)
69 {
70         SMB_ACL_T result = NULL;
71         int count;
72         SOLARIS_ACL_T solaris_acl = NULL;
73         const char *path_p = smb_fname->base_name;
74         
75         DEBUG(10, ("solarisacl_sys_acl_get_file called for file '%s'.\n", 
76                    path_p));
77
78         if (type != SMB_ACL_TYPE_ACCESS && type != SMB_ACL_TYPE_DEFAULT) {
79                 DEBUG(10, ("invalid SMB_ACL_TYPE given (%d)\n", type));
80                 errno = EINVAL;
81                 goto done;
82         }
83
84         DEBUGADD(10, ("getting %s acl\n", 
85                       ((type == SMB_ACL_TYPE_ACCESS) ? "access" : "default")));
86
87         if (!solaris_acl_get_file(path_p, &solaris_acl, &count)) {
88                 goto done;
89         }
90         result = solaris_acl_to_smb_acl(solaris_acl, count, type, mem_ctx);
91         if (result == NULL) {
92                 DEBUG(10, ("conversion solaris_acl -> smb_acl failed (%s).\n",
93                            strerror(errno)));
94         }
95         
96  done:
97         DEBUG(10, ("solarisacl_sys_acl_get_file %s.\n",
98                    ((result == NULL) ? "failed" : "succeeded" )));
99         SAFE_FREE(solaris_acl);
100         return result;
101 }
102
103
104 /*
105  * get the access ACL of a file referred to by a fd
106  */
107 SMB_ACL_T solarisacl_sys_acl_get_fd(vfs_handle_struct *handle,
108                                     files_struct *fsp, TALLOC_CTX *mem_ctx)
109 {
110         SMB_ACL_T result = NULL;
111         int count;
112         SOLARIS_ACL_T solaris_acl = NULL;
113
114         DEBUG(10, ("entering solarisacl_sys_acl_get_fd.\n"));
115
116         if (!solaris_acl_get_fd(fsp->fh->fd, &solaris_acl, &count)) {
117                 goto done;
118         }
119         /* 
120          * The facl call returns both ACCESS and DEFAULT acls (as present). 
121          * The posix acl_get_fd function returns only the
122          * access acl. So we need to filter this out here.  
123          */
124         result = solaris_acl_to_smb_acl(solaris_acl, count,
125                                         SMB_ACL_TYPE_ACCESS, mem_ctx);
126         if (result == NULL) {
127                 DEBUG(10, ("conversion solaris_acl -> smb_acl failed (%s).\n",
128                            strerror(errno)));
129         }
130         
131  done:
132         DEBUG(10, ("solarisacl_sys_acl_get_fd %s.\n", 
133                    ((result == NULL) ? "failed" : "succeeded")));
134         SAFE_FREE(solaris_acl);
135         return result;
136 }
137
138 int solarisacl_sys_acl_set_file(vfs_handle_struct *handle,
139                                 const struct smb_filename *smb_fname_in,
140                                 SMB_ACL_TYPE_T type,
141                                 SMB_ACL_T theacl)
142 {
143         int ret = -1;
144         SOLARIS_ACL_T solaris_acl = NULL;
145         int count;
146         struct smb_filename *smb_fname = NULL;
147
148         smb_fname = cp_smb_filename_nostream(talloc_tos(), smb_fname_in);
149         if (smb_fname == NULL) {
150                 errno = ENOMEM;
151                 goto done;
152         }
153
154         DEBUG(10, ("solarisacl_sys_acl_set_file called for file '%s'\n",
155                    smb_fname->base_name));
156
157         if ((type != SMB_ACL_TYPE_ACCESS) && (type != SMB_ACL_TYPE_DEFAULT)) {
158                 errno = EINVAL;
159                 DEBUG(10, ("invalid smb acl type given (%d).\n", type));
160                 goto done;
161         }
162         DEBUGADD(10, ("setting %s acl\n", 
163                       ((type == SMB_ACL_TYPE_ACCESS) ? "access" : "default")));
164
165         if(!smb_acl_to_solaris_acl(theacl, &solaris_acl, &count, type)) {
166                 DEBUG(10, ("conversion smb_acl -> solaris_acl failed (%s).\n",
167                            strerror(errno)));
168                 goto done;
169         }
170
171         /*
172          * if the file is a directory, there is extra work to do:
173          * since the solaris acl call stores both the access acl and 
174          * the default acl as provided, we have to get the acl part 
175          * that has not been specified in "type" from the file first 
176          * and concatenate it with the acl provided.
177          *
178          * We can directly use SMB_VFS_STAT here, as if this was a
179          * POSIX call on a symlink, we've already refused it.
180          * For a Windows acl mapped call on a symlink, we want to follow
181          * it.
182          */
183         ret = SMB_VFS_STAT(handle->conn, smb_fname);
184         if (ret != 0) {
185                 DEBUG(10, ("Error in stat call: %s\n", strerror(errno)));
186                 goto done;
187         }
188         if (S_ISDIR(smb_fname->st.st_ex_mode)) {
189                 SOLARIS_ACL_T other_acl = NULL;
190                 int other_count;
191                 SMB_ACL_TYPE_T other_type;
192
193                 other_type = (type == SMB_ACL_TYPE_ACCESS) 
194                         ? SMB_ACL_TYPE_DEFAULT
195                         : SMB_ACL_TYPE_ACCESS;
196                 DEBUGADD(10, ("getting acl from filesystem\n"));
197                 if (!solaris_acl_get_file(smb_fname->base_name,
198                                         &other_acl, &other_count)) {
199                         DEBUG(10, ("error getting acl from directory\n"));
200                         goto done;
201                 }
202                 DEBUG(10, ("adding %s part of fs acl to given acl\n",
203                            ((other_type == SMB_ACL_TYPE_ACCESS) 
204                             ? "access"
205                             : "default")));
206                 if (!solaris_add_to_acl(&solaris_acl, &count, other_acl,
207                                         other_count, other_type)) 
208                 {
209                         DEBUG(10, ("error adding other acl.\n"));
210                         SAFE_FREE(other_acl);
211                         goto done;
212                 }
213                 SAFE_FREE(other_acl);
214         }
215         else if (type != SMB_ACL_TYPE_ACCESS) {
216                 errno = EINVAL;
217                 goto done;
218         }
219
220         if (!solaris_acl_sort(solaris_acl, count)) {
221                 DEBUG(10, ("resulting acl is not valid!\n"));
222                 goto done;
223         }
224
225         ret = acl(smb_fname->base_name, SETACL, count, solaris_acl);
226
227  done:
228         DEBUG(10, ("solarisacl_sys_acl_set_file %s.\n",
229                    ((ret != 0) ? "failed" : "succeeded")));
230         SAFE_FREE(solaris_acl);
231         TALLOC_FREE(smb_fname);
232         return ret;
233 }
234
235 /*
236  * set the access ACL on the file referred to by a fd 
237  */
238 int solarisacl_sys_acl_set_fd(vfs_handle_struct *handle,
239                               files_struct *fsp,
240                               SMB_ACL_T theacl)
241 {
242         SOLARIS_ACL_T solaris_acl = NULL;
243         SOLARIS_ACL_T default_acl = NULL;
244         int count, default_count;
245         int ret = -1;
246
247         DEBUG(10, ("entering solarisacl_sys_acl_set_fd\n"));
248
249         /* 
250          * the posix acl_set_fd call sets the access acl of the
251          * file referred to by fd. the solaris facl-SETACL call
252          * sets the access and default acl as provided, so we
253          * have to retrieve the default acl of the file and 
254          * concatenate it with the access acl provided.
255          */
256         if (!smb_acl_to_solaris_acl(theacl, &solaris_acl, &count, 
257                                     SMB_ACL_TYPE_ACCESS))
258         {
259                 DEBUG(10, ("conversion smb_acl -> solaris_acl failed (%s).\n",
260                            strerror(errno)));
261                 goto done;
262         }
263         if (!solaris_acl_get_fd(fsp->fh->fd, &default_acl, &default_count)) {
264                 DEBUG(10, ("error getting (default) acl from fd\n"));
265                 goto done;
266         }
267         if (!solaris_add_to_acl(&solaris_acl, &count,
268                                 default_acl, default_count,
269                                 SMB_ACL_TYPE_DEFAULT))
270         {
271                 DEBUG(10, ("error adding default acl to solaris acl\n"));
272                 goto done;
273         }
274         if (!solaris_acl_sort(solaris_acl, count)) {
275                 DEBUG(10, ("resulting acl is not valid!\n"));
276                 goto done;
277         }
278
279         ret = facl(fsp->fh->fd, SETACL, count, solaris_acl);
280         if (ret != 0) {
281                 DEBUG(10, ("call of facl failed (%s).\n", strerror(errno)));
282         }
283
284  done:
285         DEBUG(10, ("solarisacl_sys_acl_set_fd %s.\n",
286                    ((ret == 0) ? "succeeded" : "failed" )));
287         SAFE_FREE(solaris_acl);
288         SAFE_FREE(default_acl);
289         return ret;
290 }
291
292 /*
293  * delete the default ACL of a directory
294  *
295  * This is achieved by fetching the access ACL and rewriting it 
296  * directly, via the solaris system call: the SETACL call on 
297  * directories writes both the access and the default ACL as provided.
298  *
299  * XXX: posix acl_delete_def_file returns an error if
300  * the file referred to by path is not a directory.
301  * this function does not complain but the actions 
302  * have no effect on a file other than a directory.
303  * But sys_acl_delete_default_file is only called in
304  * smbd/posixacls.c after having checked that the file
305  * is a directory, anyways. So implementing the extra
306  * check is considered unnecessary. --- Agreed? XXX
307  */
308 int solarisacl_sys_acl_delete_def_file(vfs_handle_struct *handle,
309                                 const struct smb_filename *smb_fname)
310 {
311         SMB_ACL_T smb_acl;
312         int ret = -1;
313         SOLARIS_ACL_T solaris_acl = NULL;
314         int count;
315
316         DEBUG(10, ("entering solarisacl_sys_acl_delete_def_file.\n"));
317         
318         smb_acl = solarisacl_sys_acl_get_file(handle, smb_fname->base_name,
319                                               SMB_ACL_TYPE_ACCESS, talloc_tos());
320         if (smb_acl == NULL) {
321                 DEBUG(10, ("getting file acl failed!\n"));
322                 goto done;
323         }
324         if (!smb_acl_to_solaris_acl(smb_acl, &solaris_acl, &count, 
325                                     SMB_ACL_TYPE_ACCESS))
326         {
327                 DEBUG(10, ("conversion smb_acl -> solaris_acl failed.\n"));
328                 goto done;
329         }
330         if (!solaris_acl_sort(solaris_acl, count)) {
331                 DEBUG(10, ("resulting acl is not valid!\n"));
332                 goto done;
333         }
334         ret = acl(smb_fname->base_name, SETACL, count, solaris_acl);
335         if (ret != 0) {
336                 DEBUG(10, ("settinge file acl failed!\n"));
337         }
338         
339  done:
340         DEBUG(10, ("solarisacl_sys_acl_delete_def_file %s.\n",
341                    ((ret != 0) ? "failed" : "succeeded" )));
342         TALLOC_FREE(smb_acl);
343         return ret;
344 }
345
346
347 /* private functions */
348
349 static SOLARIS_ACL_T solaris_acl_init(int count)
350 {
351         SOLARIS_ACL_T solaris_acl = 
352                 (SOLARIS_ACL_T)SMB_MALLOC(sizeof(aclent_t) * count);
353         if (solaris_acl == NULL) {
354                 errno = ENOMEM;
355         }
356         return solaris_acl;
357 }
358
359 /*
360  * Convert the SMB acl to the ACCESS or DEFAULT part of a 
361  * solaris ACL, as desired.
362  */
363 static bool smb_acl_to_solaris_acl(SMB_ACL_T smb_acl, 
364                                    SOLARIS_ACL_T *solaris_acl, int *count, 
365                                    SMB_ACL_TYPE_T type)
366 {
367         bool ret = False;
368         int i;
369
370         DEBUG(10, ("entering smb_acl_to_solaris_acl\n"));
371         
372         *solaris_acl = NULL;
373         *count = 0;
374
375         for (i = 0; i < smb_acl->count; i++) {
376                 const struct smb_acl_entry *smb_entry = &(smb_acl->acl[i]);
377                 SOLARIS_ACE_T solaris_entry;
378
379                 ZERO_STRUCT(solaris_entry);
380
381                 solaris_entry.a_type = smb_tag_to_solaris_tag(smb_entry->a_type);
382                 if (solaris_entry.a_type == 0) {
383                         DEBUG(10, ("smb_tag to solaris_tag failed\n"));
384                         goto fail;
385                 }
386                 switch(solaris_entry.a_type) {
387                 case USER:
388                         DEBUG(10, ("got tag type USER with uid %u\n", 
389                                    (unsigned int)smb_entry->info.user.uid));
390                         solaris_entry.a_id = (uid_t)smb_entry->info.user.uid;
391                         break;
392                 case GROUP:
393                         DEBUG(10, ("got tag type GROUP with gid %u\n", 
394                                    (unsigned int)smb_entry->info.group.gid));
395                         solaris_entry.a_id = (uid_t)smb_entry->info.group.gid;
396                         break;
397                 default:
398                         break;
399                 }
400                 if (type == SMB_ACL_TYPE_DEFAULT) {
401                         DEBUG(10, ("adding default bit to solaris ace\n"));
402                         solaris_entry.a_type |= ACL_DEFAULT;
403                 }
404                 
405                 solaris_entry.a_perm = 
406                         smb_perm_to_solaris_perm(smb_entry->a_perm);
407                 DEBUG(10, ("assembled the following solaris ace:\n"));
408                 DEBUGADD(10, (" - type: 0x%04x\n", solaris_entry.a_type));
409                 DEBUGADD(10, (" - id: %u\n", (unsigned int)solaris_entry.a_id));
410                 DEBUGADD(10, (" - perm: o%o\n", solaris_entry.a_perm));
411                 if (!solaris_add_to_acl(solaris_acl, count, &solaris_entry, 
412                                         1, type))
413                 {
414                         DEBUG(10, ("error adding acl entry\n"));
415                         goto fail;
416                 }
417                 DEBUG(10, ("count after adding: %d (i: %d)\n", *count, i));
418                 DEBUG(10, ("test, if entry has been copied into acl:\n"));
419                 DEBUGADD(10, (" - type: 0x%04x\n",
420                               (*solaris_acl)[(*count)-1].a_type));
421                 DEBUGADD(10, (" - id: %u\n",
422                               (unsigned int)(*solaris_acl)[(*count)-1].a_id));
423                 DEBUGADD(10, (" - perm: o%o\n",
424                               (*solaris_acl)[(*count)-1].a_perm));
425         }
426
427         ret = True;
428         goto done;
429         
430  fail:
431         SAFE_FREE(*solaris_acl);
432  done:
433         DEBUG(10, ("smb_acl_to_solaris_acl %s\n",
434                    ((ret == True) ? "succeeded" : "failed")));
435         return ret;
436 }
437
438 /* 
439  * convert either the access or the default part of a 
440  * soaris acl to the SMB_ACL format.
441  */
442 static SMB_ACL_T solaris_acl_to_smb_acl(SOLARIS_ACL_T solaris_acl, int count, 
443                                         SMB_ACL_TYPE_T type, TALLOC_CTX *mem_ctx)
444 {
445         SMB_ACL_T result;
446         int i;
447
448         if ((result = sys_acl_init(mem_ctx)) == NULL) {
449                 DEBUG(10, ("error allocating memory for SMB_ACL\n"));
450                 goto fail;
451         }
452         for (i = 0; i < count; i++) {
453                 SMB_ACL_ENTRY_T smb_entry;
454                 SMB_ACL_PERM_T smb_perm;
455                 
456                 if (!_IS_OF_TYPE(solaris_acl[i], type)) {
457                         continue;
458                 }
459                 result->acl = talloc_realloc(result, result->acl, struct smb_acl_entry, result->count + 1);
460                 if (result->acl == NULL) {
461                         DEBUG(10, ("error reallocating memory for SMB_ACL\n"));
462                         goto fail;
463                 }
464                 smb_entry = &result->acl[result->count];
465                 if (sys_acl_set_tag_type(smb_entry,
466                                          solaris_tag_to_smb_tag(solaris_acl[i].a_type)) != 0)
467                 {
468                         DEBUG(10, ("invalid tag type given: 0x%04x\n",
469                                    solaris_acl[i].a_type));
470                         goto fail;
471                 }
472                 /* intentionally not checking return code here: */
473                 sys_acl_set_qualifier(smb_entry, (void *)&solaris_acl[i].a_id);
474                 smb_perm = solaris_perm_to_smb_perm(solaris_acl[i].a_perm);
475                 if (sys_acl_set_permset(smb_entry, &smb_perm) != 0) {
476                         DEBUG(10, ("invalid permset given: %d\n", 
477                                    solaris_acl[i].a_perm));
478                         goto fail;
479                 }
480                 result->count += 1;
481         }
482         goto done;
483         
484  fail:
485         TALLOC_FREE(result);
486  done:
487         DEBUG(10, ("solaris_acl_to_smb_acl %s\n",
488                    ((result == NULL) ? "failed" : "succeeded")));
489         return result;
490 }
491
492
493
494 static SOLARIS_ACL_TAG_T smb_tag_to_solaris_tag(SMB_ACL_TAG_T smb_tag)
495 {
496         SOLARIS_ACL_TAG_T solaris_tag = 0;
497
498         DEBUG(10, ("smb_tag_to_solaris_tag\n"));
499         DEBUGADD(10, (" --> got smb tag 0x%04x\n", smb_tag));
500         
501         switch (smb_tag) {
502         case SMB_ACL_USER:
503                 solaris_tag = USER;
504                 break;
505         case SMB_ACL_USER_OBJ:
506                 solaris_tag = USER_OBJ;
507                 break;
508         case SMB_ACL_GROUP:
509                 solaris_tag = GROUP;
510                 break;
511         case SMB_ACL_GROUP_OBJ:
512                 solaris_tag = GROUP_OBJ;
513                 break;
514         case SMB_ACL_OTHER:
515                 solaris_tag = OTHER_OBJ;
516                 break;
517         case SMB_ACL_MASK:
518                 solaris_tag = CLASS_OBJ;
519                 break;
520         default:
521                 DEBUGADD(10, (" !!! unknown smb tag type 0x%04x\n", smb_tag));
522                 break;
523         }
524         
525         DEBUGADD(10, (" --> determined solaris tag 0x%04x\n", solaris_tag));
526
527         return solaris_tag;
528 }
529
530 static SMB_ACL_TAG_T solaris_tag_to_smb_tag(SOLARIS_ACL_TAG_T solaris_tag)
531 {
532         SMB_ACL_TAG_T smb_tag = 0;
533
534         DEBUG(10, ("solaris_tag_to_smb_tag:\n"));
535         DEBUGADD(10, (" --> got solaris tag 0x%04x\n", solaris_tag)); 
536         
537         solaris_tag &= ~ACL_DEFAULT; 
538
539         switch (solaris_tag) {
540         case USER:
541                 smb_tag = SMB_ACL_USER;
542                 break;
543         case USER_OBJ:
544                 smb_tag = SMB_ACL_USER_OBJ;
545                 break;
546         case GROUP:
547                 smb_tag = SMB_ACL_GROUP;
548                 break;
549         case GROUP_OBJ:
550                 smb_tag = SMB_ACL_GROUP_OBJ;
551                 break;
552         case OTHER_OBJ:
553                 smb_tag = SMB_ACL_OTHER;
554                 break;
555         case CLASS_OBJ:
556                 smb_tag = SMB_ACL_MASK;
557                 break;
558         default:
559                 DEBUGADD(10, (" !!! unknown solaris tag type: 0x%04x\n", 
560                                         solaris_tag));
561                 break;
562         }
563
564         DEBUGADD(10, (" --> determined smb tag 0x%04x\n", smb_tag));
565         
566         return smb_tag;
567 }
568
569
570 static SMB_ACL_PERM_T solaris_perm_to_smb_perm(const SOLARIS_PERM_T perm)
571 {
572         SMB_ACL_PERM_T smb_perm = 0;
573         smb_perm |= ((perm & SMB_ACL_READ) ? SMB_ACL_READ : 0);
574         smb_perm |= ((perm & SMB_ACL_WRITE) ? SMB_ACL_WRITE : 0);
575         smb_perm |= ((perm & SMB_ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
576         return smb_perm;
577 }
578
579
580 static SOLARIS_PERM_T smb_perm_to_solaris_perm(const SMB_ACL_PERM_T perm)
581 {
582         SOLARIS_PERM_T solaris_perm = 0;
583         solaris_perm |= ((perm & SMB_ACL_READ) ? SMB_ACL_READ : 0);
584         solaris_perm |= ((perm & SMB_ACL_WRITE) ? SMB_ACL_WRITE : 0);
585         solaris_perm |= ((perm & SMB_ACL_EXECUTE) ? SMB_ACL_EXECUTE : 0);
586         return solaris_perm;
587 }
588
589
590 static bool solaris_acl_get_file(const char *name, SOLARIS_ACL_T *solaris_acl, 
591                                  int *count)
592 {
593         bool result = False;
594
595         DEBUG(10, ("solaris_acl_get_file called for file '%s'\n", name));
596         
597         /* 
598          * The original code tries some INITIAL_ACL_SIZE
599          * and only did the GETACLCNT call upon failure
600          * (for performance reasons).
601          * For the sake of simplicity, I skip this for now. 
602          */
603         *count = acl(name, GETACLCNT, 0, NULL);
604         if (*count < 0) {
605                 DEBUG(10, ("acl GETACLCNT failed: %s\n", strerror(errno)));
606                 goto done;
607         }
608         *solaris_acl = solaris_acl_init(*count);
609         if (*solaris_acl == NULL) {
610                 DEBUG(10, ("error allocating memory for solaris acl...\n"));
611                 goto done;
612         }
613         *count = acl(name, GETACL, *count, *solaris_acl);
614         if (*count < 0) {
615                 DEBUG(10, ("acl GETACL failed: %s\n", strerror(errno)));
616                 goto done;
617         }
618         result = True;
619
620  done:
621         DEBUG(10, ("solaris_acl_get_file %s.\n",
622                    ((result == True) ? "succeeded" : "failed" )));
623         return result;
624 }
625
626
627 static bool solaris_acl_get_fd(int fd, SOLARIS_ACL_T *solaris_acl, int *count)
628 {
629         bool ret = False;
630
631         DEBUG(10, ("entering solaris_acl_get_fd\n"));
632
633         /* 
634          * see solaris_acl_get_file for comment about omission 
635          * of INITIAL_ACL_SIZE... 
636          */
637         *count = facl(fd, GETACLCNT, 0, NULL);
638         if (*count < 0) {
639                 DEBUG(10, ("facl GETACLCNT failed: %s\n", strerror(errno)));
640                 goto done;
641         }
642         *solaris_acl = solaris_acl_init(*count);
643         if (*solaris_acl == NULL) {
644                 DEBUG(10, ("error allocating memory for solaris acl...\n"));
645                 goto done;
646         }
647         *count = facl(fd, GETACL, *count, *solaris_acl);
648         if (*count < 0) {
649                 DEBUG(10, ("facl GETACL failed: %s\n", strerror(errno)));
650                 goto done;
651         }
652         ret = True;
653
654  done:
655         DEBUG(10, ("solaris_acl_get_fd %s\n",
656                    ((ret == True) ? "succeeded" : "failed")));
657         return ret;
658 }
659
660
661
662 /*
663  * Add entries to a solaris ACL.
664  *
665  * Entries are directly added to the solarisacl parameter.
666  * if memory allocation fails, this may result in solarisacl 
667  * being NULL. if the resulting acl is to be checked and is 
668  * not valid, it is kept in solarisacl but False is returned.
669  *
670  * The type of ACEs (access/default) to be added to the ACL can 
671  * be selected via the type parameter. 
672  * I use the SMB_ACL_TYPE_T type here. Since SMB_ACL_TYPE_ACCESS
673  * is defined as "0", this means that one can only add either
674  * access or default ACEs, not both at the same time. If it 
675  * should become necessary to add all of an ACL, one would have
676  * to replace this parameter by another type.
677  */
678 static bool solaris_add_to_acl(SOLARIS_ACL_T *solaris_acl, int *count,
679                                SOLARIS_ACL_T add_acl, int add_count, 
680                                SMB_ACL_TYPE_T type)
681 {
682         int i;
683         
684         if ((type != SMB_ACL_TYPE_ACCESS) && (type != SMB_ACL_TYPE_DEFAULT)) 
685         {
686                 DEBUG(10, ("invalid acl type given: %d\n", type));
687                 errno = EINVAL;
688                 return False;
689         }
690         for (i = 0; i < add_count; i++) {
691                 if (!_IS_OF_TYPE(add_acl[i], type)) {
692                         continue;
693                 }
694                 ADD_TO_ARRAY(NULL, SOLARIS_ACE_T, add_acl[i], 
695                              solaris_acl, count);
696                 if (solaris_acl == NULL) {
697                         DEBUG(10, ("error enlarging acl.\n"));
698                         errno = ENOMEM;
699                         return False;
700                 }
701         }
702         return True;
703 }
704
705
706 /* 
707  * sort the ACL and check it for validity
708  *
709  * [original comment from lib/sysacls.c:]
710  * 
711  * if it's a minimal ACL with only 4 entries then we
712  * need to recalculate the mask permissions to make
713  * sure that they are the same as the GROUP_OBJ
714  * permissions as required by the UnixWare acl() system call.
715  *
716  * (note: since POSIX allows minimal ACLs which only contain
717  * 3 entries - ie there is no mask entry - we should, in theory,
718  * check for this and add a mask entry if necessary - however
719  * we "know" that the caller of this interface always specifies
720  * a mask, so in practice "this never happens" (tm) - if it *does*
721  * happen aclsort() will fail and return an error and someone will
722  * have to fix it...)
723  */
724 static bool solaris_acl_sort(SOLARIS_ACL_T solaris_acl, int count)
725 {
726         int fixmask = (count <= 4);
727
728         if (aclsort(count, fixmask, solaris_acl) != 0) {
729                 errno = EINVAL;
730                 return False;
731         }
732         return True;
733 }
734
735 #if 0
736 /*
737  * acl check function:
738  *   unused at the moment but could be used to get more
739  *   concrete error messages for debugging...
740  *   (acl sort just says that the acl is invalid...)
741  */
742 static bool solaris_acl_check(SOLARIS_ACL_T solaris_acl, int count)
743 {
744         int check_rc;
745         int check_which;
746         
747         check_rc = aclcheck(solaris_acl, count, &check_which);
748         if (check_rc != 0) {
749                 DEBUG(10, ("acl is not valid:\n"));
750                 DEBUGADD(10, (" - return code: %d\n", check_rc));
751                 DEBUGADD(10, (" - which: %d\n", check_which));
752                 if (check_which != -1) {
753                         DEBUGADD(10, (" - invalid entry:\n"));
754                         DEBUGADD(10, ("   * type: %d:\n", 
755                                       solaris_acl[check_which].a_type));
756                         DEBUGADD(10, ("   * id: %d\n",
757                                       solaris_acl[check_which].a_id));
758                         DEBUGADD(10, ("   * perm: 0o%o\n",
759                                       solaris_acl[check_which].a_perm));
760                 }
761                 return False;
762         }
763         return True;
764 }
765 #endif
766
767 static struct vfs_fn_pointers solarisacl_fns = {
768         .sys_acl_get_file_fn = solarisacl_sys_acl_get_file,
769         .sys_acl_get_fd_fn = solarisacl_sys_acl_get_fd,
770         .sys_acl_blob_get_file_fn = posix_sys_acl_blob_get_file,
771         .sys_acl_blob_get_fd_fn = posix_sys_acl_blob_get_fd,
772         .sys_acl_set_file_fn = solarisacl_sys_acl_set_file,
773         .sys_acl_set_fd_fn = solarisacl_sys_acl_set_fd,
774         .sys_acl_delete_def_file_fn = solarisacl_sys_acl_delete_def_file,
775 };
776
777 NTSTATUS vfs_solarisacl_init(TALLOC_CTX *);
778 NTSTATUS vfs_solarisacl_init(TALLOC_CTX *ctx)
779 {
780         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "solarisacl",
781                                 &solarisacl_fns);
782 }
783
784 /* ENTE */