2 Copyright (c) 2008, 2009, 2010 Frank Lahm <franklahm@gmail.com>
3 Copyright (c) 2011 Laura Mueller <laura-mueller@uni-duesseldorf.de>
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
18 #endif /* HAVE_CONFIG_H */
27 #ifdef HAVE_SOLARIS_ACLS
30 #ifdef HAVE_POSIX_ACLS
33 #ifdef HAVE_ACL_LIBACL_H
34 #include <acl/libacl.h>
37 #include <atalk/errchk.h>
38 #include <atalk/adouble.h>
39 #include <atalk/vfs.h>
40 #include <atalk/afp.h>
41 #include <atalk/util.h>
42 #include <atalk/cnid.h>
43 #include <atalk/logger.h>
44 #include <atalk/uuid.h>
45 #include <atalk/acl.h>
46 #include <atalk/bstrlib.h>
47 #include <atalk/bstradd.h>
48 #include <atalk/unix.h>
49 #include <atalk/netatalk_conf.h>
51 #include "directory.h"
57 #include "acl_mappings.h"
61 #define SOLARIS_2_DARWIN 1
62 #define DARWIN_2_SOLARIS 2
63 #define POSIX_DEFAULT_2_DARWIN 3
64 #define POSIX_ACCESS_2_DARWIN 4
65 #define DARWIN_2_POSIX_DEFAULT 5
66 #define DARWIN_2_POSIX_ACCESS 6
71 /* bit flags for set_acl() and map_aces_darwin_to_posix() */
72 #define HAS_DEFAULT_ACL 0x01
73 #define HAS_EXT_DEFAULT_ACL 0x02
75 /********************************************************
77 ********************************************************/
79 #ifdef HAVE_SOLARIS_ACLS
82 * Compile access rights for a user to one file-system object
84 * This combines combines all access rights for a user to one fs-object and
85 * returns the result as a Darwin allowed rights ACE.
86 * This must honor trivial ACEs which are a mode_t mapping.
88 * @param obj (r) handle
89 * @param path (r) path to filesystem object
90 * @param sb (r) struct stat of path
91 * @param result (w) resulting Darwin allow ACE
93 * @returns 0 or -1 on error
95 static int solaris_acl_rights(const AFPObj *obj,
97 const struct stat *sb,
101 int i, ace_count, checkgroup;
104 uint16_t flags, type;
105 uint32_t rights, allowed_rights = 0, denied_rights = 0, darwin_rights;
107 /* Get ACL from file/dir */
108 EC_NEG1_LOG(ace_count = get_nfsv4_acl(path, &aces));
113 /* Now check requested rights */
115 do { /* Loop through ACEs */
117 flags = aces[i].a_flags;
118 type = aces[i].a_type;
119 rights = aces[i].a_access_mask;
121 if (flags & ACE_INHERIT_ONLY_ACE)
124 /* Now the tricky part: decide if ACE effects our user. I'll explain:
125 if its a dedicated (non trivial) ACE for the user
127 if its a ACE for a group we're member of
129 if its a trivial ACE_OWNER ACE and requested UUID is the owner
131 if its a trivial ACE_GROUP ACE and requested UUID is group
133 if its a trivial ACE_EVERYONE ACE
136 if (((who == obj->uid) && !(flags & (ACE_TRIVIAL|ACE_IDENTIFIER_GROUP)))
138 ((flags & ACE_IDENTIFIER_GROUP) && !(flags & ACE_GROUP) && gmem(who, obj->ngroups, obj->groups))
140 ((flags & ACE_OWNER) && (obj->uid == sb->st_uid))
142 ((flags & ACE_GROUP) && !(obj->uid == sb->st_uid) && gmem(sb->st_gid, obj->ngroups, obj->groups))
144 (flags & ACE_EVERYONE && !(obj->uid == sb->st_uid) && !gmem(sb->st_gid, obj->ngroups, obj->groups))
146 /* Found an applicable ACE */
147 if (type == ACE_ACCESS_ALLOWED_ACE_TYPE)
148 allowed_rights |= rights;
149 else if (type == ACE_ACCESS_DENIED_ACE_TYPE)
150 /* Only or to denied rights if not previously allowed !! */
151 denied_rights |= ((!allowed_rights) & rights);
153 } while (++i < ace_count);
156 /* Darwin likes to ask for "delete_child" on dir,
157 "write_data" is actually the same, so we add that for dirs */
158 if (S_ISDIR(sb->st_mode) && (allowed_rights & ACE_WRITE_DATA))
159 allowed_rights |= ACE_DELETE_CHILD;
161 /* Remove denied from allowed rights */
162 allowed_rights &= ~denied_rights;
166 for (i=0; nfsv4_to_darwin_rights[i].from != 0; i++) {
167 if (allowed_rights & nfsv4_to_darwin_rights[i].from)
168 darwin_rights |= nfsv4_to_darwin_rights[i].to;
171 *result |= darwin_rights;
174 if (aces) free(aces);
180 Maps ACE array from Solaris to Darwin. Darwin ACEs are stored in network byte order.
181 Return numer of mapped ACEs or -1 on error.
182 All errors while mapping (e.g. getting UUIDs from LDAP) are fatal.
184 static int map_aces_solaris_to_darwin(const ace_t *aces,
185 darwin_ace_t *darwin_aces,
192 struct passwd *pwd = NULL;
193 struct group *grp = NULL;
195 LOG(log_maxdebug, logtype_afpd, "map_aces_solaris_to_darwin: parsing %d ACES", ace_count);
198 LOG(log_maxdebug, logtype_afpd, "ACE No. %d", ace_count + 1);
199 /* if its a ACE resulting from nfsv4 mode mapping, discard it */
200 if (aces->a_flags & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE)) {
201 LOG(log_debug, logtype_afpd, "trivial ACE");
206 if ( ! (aces->a_flags & ACE_IDENTIFIER_GROUP) ) { /* user ace */
207 LOG(log_debug, logtype_afpd, "uid: %d", aces->a_who);
208 EC_NULL_LOG(pwd = getpwuid(aces->a_who));
209 LOG(log_debug, logtype_afpd, "uid: %d -> name: %s", aces->a_who, pwd->pw_name);
210 EC_ZERO_LOG(getuuidfromname(pwd->pw_name,
212 darwin_aces->darwin_ace_uuid));
213 } else { /* group ace */
214 LOG(log_debug, logtype_afpd, "gid: %d", aces->a_who);
215 EC_NULL_LOG(grp = getgrgid(aces->a_who));
216 LOG(log_debug, logtype_afpd, "gid: %d -> name: %s", aces->a_who, grp->gr_name);
217 EC_ZERO_LOG(getuuidfromname(grp->gr_name,
219 darwin_aces->darwin_ace_uuid));
223 if (aces->a_type == ACE_ACCESS_ALLOWED_ACE_TYPE)
224 flags = DARWIN_ACE_FLAGS_PERMIT;
225 else if (aces->a_type == ACE_ACCESS_DENIED_ACE_TYPE)
226 flags = DARWIN_ACE_FLAGS_DENY;
227 else { /* unsupported type */
231 for(i=0; nfsv4_to_darwin_flags[i].from != 0; i++) {
232 if (aces->a_flags & nfsv4_to_darwin_flags[i].from)
233 flags |= nfsv4_to_darwin_flags[i].to;
235 darwin_aces->darwin_ace_flags = htonl(flags);
239 for (i=0; nfsv4_to_darwin_rights[i].from != 0; i++) {
240 if (aces->a_access_mask & nfsv4_to_darwin_rights[i].from)
241 rights |= nfsv4_to_darwin_rights[i].to;
243 darwin_aces->darwin_ace_rights = htonl(rights);
256 Maps ACE array from Darwin to Solaris. Darwin ACEs are expected in network byte order.
257 Return numer of mapped ACEs or -1 on error.
258 All errors while mapping (e.g. getting UUIDs from LDAP) are fatal.
260 static int map_aces_darwin_to_solaris(darwin_ace_t *darwin_aces,
265 int i, mapped_aces = 0;
266 uint32_t darwin_ace_flags;
267 uint32_t darwin_ace_rights;
268 uint16_t nfsv4_ace_flags;
269 uint32_t nfsv4_ace_rights;
277 nfsv4_ace_rights = 0;
280 EC_ZERO(getnamefromuuid(darwin_aces->darwin_ace_uuid, &name, &uuidtype));
283 EC_NULL_LOG(pwd = getpwnam(name));
284 nfsv4_aces->a_who = pwd->pw_uid;
287 EC_NULL_LOG(grp = getgrnam(name));
288 nfsv4_aces->a_who = (uid_t)(grp->gr_gid);
289 nfsv4_ace_flags |= ACE_IDENTIFIER_GROUP;
292 LOG(log_error, logtype_afpd, "map_aces_darwin_to_solaris: unkown uuidtype");
298 /* now type: allow/deny */
299 darwin_ace_flags = ntohl(darwin_aces->darwin_ace_flags);
300 if (darwin_ace_flags & DARWIN_ACE_FLAGS_PERMIT)
301 nfsv4_aces->a_type = ACE_ACCESS_ALLOWED_ACE_TYPE;
302 else if (darwin_ace_flags & DARWIN_ACE_FLAGS_DENY)
303 nfsv4_aces->a_type = ACE_ACCESS_DENIED_ACE_TYPE;
304 else { /* unsupported type */
309 for(i=0; darwin_to_nfsv4_flags[i].from != 0; i++) {
310 if (darwin_ace_flags & darwin_to_nfsv4_flags[i].from)
311 nfsv4_ace_flags |= darwin_to_nfsv4_flags[i].to;
315 darwin_ace_rights = ntohl(darwin_aces->darwin_ace_rights);
316 for (i=0; darwin_to_nfsv4_rights[i].from != 0; i++) {
317 if (darwin_ace_rights & darwin_to_nfsv4_rights[i].from)
318 nfsv4_ace_rights |= darwin_to_nfsv4_rights[i].to;
321 LOG(log_debug9, logtype_afpd,
322 "map_aces_darwin_to_solaris: ACE flags: Darwin:%08x -> NFSv4:%04x",
323 darwin_ace_flags, nfsv4_ace_flags);
324 LOG(log_debug9, logtype_afpd,
325 "map_aces_darwin_to_solaris: ACE rights: Darwin:%08x -> NFSv4:%08x",
326 darwin_ace_rights, nfsv4_ace_rights);
328 nfsv4_aces->a_flags = nfsv4_ace_flags;
329 nfsv4_aces->a_access_mask = nfsv4_ace_rights;
342 #endif /* HAVE_SOLARIS_ACLS */
344 /********************************************************
346 ********************************************************/
348 #ifdef HAVE_POSIX_ACLS
350 static uint32_t posix_permset_to_darwin_rights(acl_entry_t e, int is_dir)
354 acl_permset_t permset;
356 EC_ZERO_LOG(acl_get_permset(e, &permset));
358 #ifdef HAVE_ACL_GET_PERM_NP
359 if (acl_get_perm_np(permset, ACL_READ))
361 if (acl_get_perm(permset, ACL_READ))
363 rights = DARWIN_ACE_READ_DATA
364 | DARWIN_ACE_READ_EXTATTRIBUTES
365 | DARWIN_ACE_READ_ATTRIBUTES
366 | DARWIN_ACE_READ_SECURITY;
367 #ifdef HAVE_ACL_GET_PERM_NP
368 if (acl_get_perm_np(permset, ACL_WRITE)) {
370 if (acl_get_perm(permset, ACL_WRITE)) {
372 rights |= DARWIN_ACE_WRITE_DATA
373 | DARWIN_ACE_APPEND_DATA
374 | DARWIN_ACE_WRITE_EXTATTRIBUTES
375 | DARWIN_ACE_WRITE_ATTRIBUTES;
377 rights |= DARWIN_ACE_DELETE_CHILD;
379 #ifdef HAVE_ACL_GET_PERM_NP
380 if (acl_get_perm_np(permset, ACL_EXECUTE))
382 if (acl_get_perm(permset, ACL_EXECUTE))
384 rights |= DARWIN_ACE_EXECUTE;
387 LOG(log_maxdebug, logtype_afpd, "mapped rights: 0x%08x", rights);
392 * Compile access rights for a user to one file-system object
394 * This combines combines all access rights for a user to one fs-object and
395 * returns the result as a Darwin allowed rights ACE.
396 * This must honor trivial ACEs which are a mode_t mapping.
398 * @param path (r) path to filesystem object
399 * @param sb (r) struct stat of path
400 * @param result (rw) resulting Darwin allow ACE
402 * @returns 0 or -1 on error
405 static int posix_acl_rights(const AFPObj *obj,
407 const struct stat *sb,
411 int entry_id = ACL_FIRST_ENTRY;
412 uint32_t rights = 0; /* rights which do not depend on ACL_MASK */
413 uint32_t acl_rights = 0; /* rights which are subject to limitations imposed by ACL_MASK */
414 uint32_t mask_rights = 0xffffffff;
421 EC_NULL_LOGSTR(acl = acl_get_file(path, ACL_TYPE_ACCESS),
422 "acl_get_file(\"%s\"): %s", fullpathname(path), strerror(errno));
424 /* Iterate through all ACEs. If we apply mask_rights later there is no need to iterate twice. */
425 while (acl_get_entry(acl, entry_id, &e) == 1) {
426 entry_id = ACL_NEXT_ENTRY;
427 EC_ZERO_LOG(acl_get_tag_type(e, &tag));
431 if (sb->st_uid == obj->uid) {
432 LOG(log_maxdebug, logtype_afpd, "ACL_USER_OBJ: %u", sb->st_uid);
433 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
438 EC_NULL_LOG(uid = (uid_t *)acl_get_qualifier(e));
440 if (*uid == obj->uid) {
441 LOG(log_maxdebug, logtype_afpd, "ACL_USER: %u", *uid);
442 acl_rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
449 if (!(sb->st_uid == obj->uid) && gmem(sb->st_gid, obj->ngroups, obj->groups)) {
450 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP_OBJ: %u", sb->st_gid);
451 acl_rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
456 EC_NULL_LOG(gid = (gid_t *)acl_get_qualifier(e));
458 if (gmem(*gid, obj->ngroups, obj->groups)) {
459 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP: %u", *gid);
460 acl_rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
467 mask_rights = posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
468 LOG(log_maxdebug, logtype_afpd, "maskrights: 0x%08x", mask_rights);
472 if (!(sb->st_uid == obj->uid) && !gmem(sb->st_gid, obj->ngroups, obj->groups)) {
473 LOG(log_maxdebug, logtype_afpd, "ACL_OTHER");
474 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode));
483 /* apply the mask and collect the rights */
484 rights |= (acl_rights & mask_rights);
489 if (acl) acl_free(acl);
490 if (uid) acl_free(uid);
491 if (gid) acl_free(gid);
496 * Helper function for posix_acls_to_uaperms() to convert Posix ACL permissions
497 * into access rights needed to fill ua_permissions of a FPUnixPrivs structure.
499 * @param entry (r) Posix ACL entry
501 * @returns access rights
503 static u_char acl_permset_to_uarights(acl_entry_t entry) {
504 acl_permset_t permset;
507 if (acl_get_permset(entry, &permset) == -1)
510 #ifdef HAVE_ACL_GET_PERM_NP
511 if (acl_get_perm_np(permset, ACL_READ))
513 if (acl_get_perm(permset, ACL_READ))
517 #ifdef HAVE_ACL_GET_PERM_NP
518 if (acl_get_perm_np(permset, ACL_WRITE))
520 if (acl_get_perm(permset, ACL_WRITE))
524 #ifdef HAVE_ACL_GET_PERM_NP
525 if (acl_get_perm_np(permset, ACL_EXECUTE))
527 if (acl_get_perm(permset, ACL_EXECUTE))
529 rights |= AR_USEARCH;
535 * Update FPUnixPrivs for a file-system object on a volume supporting ACLs
537 * Checks permissions granted by ACLS for a user to one fs-object and
538 * updates user and group permissions in given struct maccess. As OS X
539 * doesn't conform to Posix 1003.1e Draft 17 it expects proper group
540 * permissions in st_mode of struct stat even if the fs-object has an
541 * ACL_MASK entry, st_mode gets modified to properly reflect group
544 * @param path (r) path to filesystem object
545 * @param sb (rw) struct stat of path
546 * @param maccess (rw) struct maccess of path
548 * @returns 0 or -1 on error
550 static int posix_acls_to_uaperms(const AFPObj *obj, const char *path, struct stat *sb, struct maccess *ma) {
553 int entry_id = ACL_FIRST_ENTRY;
559 uid_t whoami = geteuid();
561 u_char group_rights = 0x00;
562 u_char acl_rights = 0x00;
565 EC_NULL_LOG(acl = acl_get_file(path, ACL_TYPE_ACCESS));
567 /* iterate through all ACEs */
568 while (acl_get_entry(acl, entry_id, &entry) == 1) {
569 entry_id = ACL_NEXT_ENTRY;
570 EC_ZERO_LOG(acl_get_tag_type(entry, &tag));
574 EC_NULL_LOG(uid = (uid_t *)acl_get_qualifier(entry));
576 if (*uid == obj->uid && !(whoami == sb->st_uid)) {
577 LOG(log_maxdebug, logtype_afpd, "ACL_USER: %u", *uid);
578 acl_rights |= acl_permset_to_uarights(entry);
584 group_rights = acl_permset_to_uarights(entry);
585 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP_OBJ: %u", sb->st_gid);
587 if (gmem(sb->st_gid, obj->ngroups, obj->groups) && !(whoami == sb->st_uid))
588 acl_rights |= group_rights;
592 EC_NULL_LOG(gid = (gid_t *)acl_get_qualifier(entry));
594 if (gmem(*gid, obj->ngroups, obj->groups) && !(whoami == sb->st_uid)) {
595 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP: %u", *gid);
596 acl_rights |= acl_permset_to_uarights(entry);
602 mask = acl_permset_to_uarights(entry);
603 LOG(log_maxdebug, logtype_afpd, "ACL_MASK: 0x%02x", mask);
610 /* apply the mask and adjust user and group permissions */
611 ma->ma_user |= (acl_rights & mask);
612 ma->ma_group = (group_rights & mask);
614 /* update st_mode to properly reflect group permissions */
615 sb->st_mode &= ~S_IRWXG;
617 if (ma->ma_group & AR_USEARCH)
618 sb->st_mode |= S_IXGRP;
620 if (ma->ma_group & AR_UWRITE)
621 sb->st_mode |= S_IWGRP;
623 if (ma->ma_group & AR_UREAD)
624 sb->st_mode |= S_IRGRP;
627 if (acl) acl_free(acl);
633 * Add entries of one acl to another acl
635 * @param aclp (rw) destination acl where new aces will be added
636 * @param acl (r) source acl where aces will be copied from
638 * @returns 0 on success, -1 on error
640 static int acl_add_acl(acl_t *aclp, const acl_t acl)
646 for (id = ACL_FIRST_ENTRY; acl_get_entry(acl, id, &se) == 1; id = ACL_NEXT_ENTRY) {
647 EC_ZERO_LOG_ERR(acl_create_entry(aclp, &de), AFPERR_MISC);
648 EC_ZERO_LOG_ERR(acl_copy_entry(de, se), AFPERR_MISC);
656 * Map Darwin ACE rights to POSIX 1e perm
658 * We can only map few rights:
659 * DARWIN_ACE_READ_DATA -> ACL_READ
660 * DARWIN_ACE_WRITE_DATA -> ACL_WRITE
661 * DARWIN_ACE_DELETE_CHILD & (is_dir == 1) -> ACL_WRITE
662 * DARWIN_ACE_EXECUTE -> ACL_EXECUTE
664 * @param entry (rw) result of the mapping
665 * @param is_dir (r) 1 for dirs, 0 for files
667 * @returns mapping result as acl_perm_t, -1 on error
669 static acl_perm_t map_darwin_right_to_posix_permset(uint32_t darwin_ace_rights, int is_dir)
673 if (darwin_ace_rights & DARWIN_ACE_READ_DATA)
676 if (darwin_ace_rights & (DARWIN_ACE_WRITE_DATA | (is_dir ? DARWIN_ACE_DELETE_CHILD : 0)))
679 if (darwin_ace_rights & DARWIN_ACE_EXECUTE)
686 * Add a ACL_USER or ACL_GROUP permission to an ACL, extending existing ACEs
688 * Add a permission of "type" for user or group "id" to an ACL. Scan the ACL
689 * for existing permissions for this type/id, if there is one add the perm,
690 * otherwise create a new ACL entry.
691 * perm can be or'ed ACL_READ, ACL_WRITE and ACL_EXECUTE.
693 * @param aclp (rw) pointer to ACL
694 * @param type (r) acl_tag_t of ACL_USER or ACL_GROUP
695 * @param id (r) uid_t uid for ACL_USER, or gid casted to uid_t for ACL_GROUP
696 * @param perm (r) acl_perm_t permissions to add
698 * @returns 0 on success, -1 on failure
700 static int posix_acl_add_perm(acl_t *aclp, acl_tag_t type, uid_t id, acl_perm_t perm)
706 int entry_id = ACL_FIRST_ENTRY;
707 acl_permset_t permset;
710 for ( ; (! found) && acl_get_entry(*aclp, entry_id, &e) == 1; entry_id = ACL_NEXT_ENTRY) {
711 EC_ZERO_LOG(acl_get_tag_type(e, &tag));
712 if (tag != ACL_USER && tag != ACL_GROUP)
714 EC_NULL_LOG(eid = (uid_t *)acl_get_qualifier(e));
715 if ((*eid == id) && (type == tag)) {
716 /* found an ACE for this type/id */
718 EC_ZERO_LOG(acl_get_permset(e, &permset));
719 EC_ZERO_LOG(acl_add_perm(permset, perm));
727 /* there was no existing ACE for this type/id */
728 EC_ZERO_LOG(acl_create_entry(aclp, &e));
729 EC_ZERO_LOG(acl_set_tag_type(e, type));
730 EC_ZERO_LOG(acl_set_qualifier(e, &id));
731 EC_ZERO_LOG(acl_get_permset(e, &permset));
732 EC_ZERO_LOG(acl_clear_perms(permset));
733 EC_ZERO_LOG(acl_add_perm(permset, perm));
734 EC_ZERO_LOG(acl_set_permset(e, permset));
738 if (eid) acl_free(eid);
744 * Map Darwin ACL to POSIX ACL.
746 * aclp must point to a acl_init'ed acl_t or an acl_t that can eg contain default ACEs.
747 * Mapping pecularities:
748 * - we create a default ace (which inherits to files and dirs) if either
749 DARWIN_ACE_FLAGS_FILE_INHERIT or DARWIN_ACE_FLAGS_DIRECTORY_INHERIT is requested
750 * - we throw away DARWIN_ACE_FLAGS_LIMIT_INHERIT (can't be mapped), thus the ACL will
753 * @param darwin_aces (r) pointer to darwin_aces buffer
754 * @param def_aclp (rw) directories: pointer to an initialized acl_t with
755 the default acl files: *def_aclp will be NULL
756 * @param acc_aclp (rw) pointer to an initialized acl_t with the access acl
757 * @param ace_count (r) number of ACEs in darwin_aces buffer
758 * @param default_acl_flags (rw) flags to indicate if the object has a basic default
759 * acl or an extended default acl.
761 * @returns 0 on success storing the result in aclp, -1 on error. default_acl_flags
762 * is set to HAS_DEFAULT_ACL|HAS_EXT_DEFAULT_ACL in case there is at least one
763 * extended default ace. Otherwise default_acl_flags is left unchanged.
765 static int map_aces_darwin_to_posix(const darwin_ace_t *darwin_aces,
769 uint32_t *default_acl_flags)
777 uint32_t darwin_ace_flags, darwin_ace_rights;
781 for ( ; ace_count != 0; ace_count--, darwin_aces++) {
782 /* type: allow/deny, posix only has allow */
783 darwin_ace_flags = ntohl(darwin_aces->darwin_ace_flags);
784 if ( ! (darwin_ace_flags & DARWIN_ACE_FLAGS_PERMIT))
787 darwin_ace_rights = ntohl(darwin_aces->darwin_ace_rights);
788 perm = map_darwin_right_to_posix_permset(darwin_ace_rights, (*def_aclp != NULL));
790 continue; /* dont add empty perm */
792 LOG(log_debug, logtype_afpd, "map_ace: no: %u, flags: %08x, darwin: %08x, posix: %02x",
793 ace_count, darwin_ace_flags, darwin_ace_rights, perm);
796 EC_ZERO_LOG(getnamefromuuid(darwin_aces->darwin_ace_uuid, &name, &uuidtype));
799 EC_NULL_LOG(pwd = getpwnam(name));
802 LOG(log_debug, logtype_afpd, "map_ace: name: %s, uid: %u", name, id);
805 EC_NULL_LOG(grp = getgrnam(name));
807 id = (uid_t)(grp->gr_gid);
808 LOG(log_debug, logtype_afpd, "map_ace: name: %s, gid: %u", name, id);
816 if (darwin_ace_flags & DARWIN_ACE_INHERIT_CONTROL_FLAGS) {
817 if (*def_aclp == NULL) {
818 /* ace request inheritane but we haven't got a default acl pointer */
819 LOG(log_warning, logtype_afpd, "map_acl: unexpected ACE, flags: 0x%04x",
823 /* add it as default ace */
824 EC_ZERO_LOG(posix_acl_add_perm(def_aclp, tag, id, perm));
825 *default_acl_flags = (HAS_DEFAULT_ACL|HAS_EXT_DEFAULT_ACL);
827 if (! (darwin_ace_flags & DARWIN_ACE_FLAGS_ONLY_INHERIT))
828 /* if it not a "inherit only" ace, it must be added as access aces too */
829 EC_ZERO_LOG(posix_acl_add_perm(acc_aclp, tag, id, perm));
831 EC_ZERO_LOG(posix_acl_add_perm(acc_aclp, tag, id, perm));
843 * Map ACEs from POSIX to Darwin.
844 * type is either POSIX_DEFAULT_2_DARWIN or POSIX_ACCESS_2_DARWIN, cf. acl_get_file.
845 * Return number of mapped ACES, -1 on error.
847 static int map_acl_posix_to_darwin(int type, const acl_t acl, darwin_ace_t *darwin_aces)
851 int entry_id = ACL_FIRST_ENTRY;
856 struct passwd *pwd = NULL;
857 struct group *grp = NULL;
859 uint32_t rights, maskrights = 0;
860 darwin_ace_t *saved_darwin_aces = darwin_aces;
862 LOG(log_maxdebug, logtype_afpd, "map_aces_posix_to_darwin(%s)",
863 (type & MAP_MASK) == POSIX_DEFAULT_2_DARWIN ?
864 "POSIX_DEFAULT_2_DARWIN" : "POSIX_ACCESS_2_DARWIN");
866 /* itereate through all ACEs */
867 while (acl_get_entry(acl, entry_id, &e) == 1) {
868 entry_id = ACL_NEXT_ENTRY;
871 EC_ZERO_LOG(acl_get_tag_type(e, &tag));
873 /* we return user and group ACE */
876 EC_NULL_LOG(uid = (uid_t *)acl_get_qualifier(e));
877 EC_NULL_LOG(pwd = getpwuid(*uid));
878 LOG(log_debug, logtype_afpd, "map_aces_posix_to_darwin: uid: %d -> name: %s",
880 EC_ZERO_LOG(getuuidfromname(pwd->pw_name, UUID_USER, darwin_aces->darwin_ace_uuid));
886 EC_NULL_LOG(gid = (gid_t *)acl_get_qualifier(e));
887 EC_NULL_LOG(grp = getgrgid(*gid));
888 LOG(log_debug, logtype_afpd, "map_aces_posix_to_darwin: gid: %d -> name: %s",
890 EC_ZERO_LOG(getuuidfromname(grp->gr_name, UUID_GROUP, darwin_aces->darwin_ace_uuid));
896 maskrights = posix_permset_to_darwin_rights(e, type & IS_DIR);
904 flags = DARWIN_ACE_FLAGS_PERMIT;
905 if ((type & MAP_MASK) == POSIX_DEFAULT_2_DARWIN)
906 flags |= DARWIN_ACE_FLAGS_FILE_INHERIT
907 | DARWIN_ACE_FLAGS_DIRECTORY_INHERIT
908 | DARWIN_ACE_FLAGS_ONLY_INHERIT;
909 darwin_aces->darwin_ace_flags = htonl(flags);
912 rights = posix_permset_to_darwin_rights(e, type & IS_DIR);
913 darwin_aces->darwin_ace_rights = htonl(rights);
919 /* Loop through the mapped ACE buffer once again, applying the mask */
920 for (int i = mapped_aces; i > 0; i--) {
921 saved_darwin_aces->darwin_ace_rights &= htonl(maskrights);
925 EC_STATUS(mapped_aces);
928 if (uid) acl_free(uid);
929 if (gid) acl_free(gid);
935 * Multiplex ACL mapping (SOLARIS_2_DARWIN, DARWIN_2_SOLARIS, POSIX_2_DARWIN, DARWIN_2_POSIX).
936 * Reads from 'aces' buffer, writes to 'rbuf' buffer.
937 * Caller must provide buffer.
938 * Darwin ACEs are read and written in network byte order.
939 * Needs to know how many ACEs are in the ACL (ace_count) for Solaris ACLs.
940 * Ignores trivial ACEs.
941 * Return no of mapped ACEs or -1 on error.
943 static int map_acl(int type, void *acl, darwin_ace_t *buf, int ace_count)
947 LOG(log_debug9, logtype_afpd, "map_acl: BEGIN");
949 switch (type & MAP_MASK) {
951 #ifdef HAVE_SOLARIS_ACLS
952 case SOLARIS_2_DARWIN:
953 mapped_aces = map_aces_solaris_to_darwin( acl, buf, ace_count);
956 case DARWIN_2_SOLARIS:
957 mapped_aces = map_aces_darwin_to_solaris( buf, acl, ace_count);
959 #endif /* HAVE_SOLARIS_ACLS */
961 #ifdef HAVE_POSIX_ACLS
962 case POSIX_DEFAULT_2_DARWIN:
963 mapped_aces = map_acl_posix_to_darwin(type, (const acl_t)acl, buf);
966 case POSIX_ACCESS_2_DARWIN:
967 mapped_aces = map_acl_posix_to_darwin(type, (const acl_t)acl, buf);
970 case DARWIN_2_POSIX_DEFAULT:
973 case DARWIN_2_POSIX_ACCESS:
975 #endif /* HAVE_POSIX_ACLS */
982 LOG(log_debug9, logtype_afpd, "map_acl: END");
986 /* Get ACL from object omitting trivial ACEs. Map to Darwin ACL style and
987 store Darwin ACL at rbuf. Add length of ACL written to rbuf to *rbuflen.
988 Returns 0 on success, -1 on error. */
989 static int get_and_map_acl(char *name, char *rbuf, size_t *rbuflen)
994 uint32_t *darwin_ace_count = (uint32_t *)rbuf;
995 #ifdef HAVE_SOLARIS_ACLS
999 #ifdef HAVE_POSIX_ACLS
1002 LOG(log_debug9, logtype_afpd, "get_and_map_acl: BEGIN");
1004 /* Skip length and flags */
1009 #ifdef HAVE_SOLARIS_ACLS
1010 EC_NEG1(ace_count = get_nfsv4_acl(name, &aces));
1011 EC_NEG1(mapped_aces = map_acl(SOLARIS_2_DARWIN, aces, (darwin_ace_t *)rbuf, ace_count));
1012 #endif /* HAVE_SOLARIS_ACLS */
1014 #ifdef HAVE_POSIX_ACLS
1015 acl_t defacl = NULL , accacl = NULL;
1017 /* stat to check if its a dir */
1018 EC_ZERO_LOG(lstat(name, &st));
1020 /* if its a dir, check for default acl too */
1022 if (S_ISDIR(st.st_mode)) {
1024 EC_NULL_LOG(defacl = acl_get_file(name, ACL_TYPE_DEFAULT));
1025 EC_NEG1(mapped_aces = map_acl(POSIX_DEFAULT_2_DARWIN | dirflag,
1027 (darwin_ace_t *)rbuf,
1031 EC_NULL_LOG(accacl = acl_get_file(name, ACL_TYPE_ACCESS));
1034 EC_NEG1(tmp = map_acl(POSIX_ACCESS_2_DARWIN | dirflag,
1036 (darwin_ace_t *)(rbuf + mapped_aces * sizeof(darwin_ace_t)),
1039 #endif /* HAVE_POSIX_ACLS */
1041 LOG(log_debug, logtype_afpd, "get_and_map_acl: mapped %d ACEs", mapped_aces);
1043 *darwin_ace_count = htonl(mapped_aces);
1044 *rbuflen += sizeof(darwin_acl_header_t) + (mapped_aces * sizeof(darwin_ace_t));
1049 #ifdef HAVE_SOLARIS_ACLS
1050 if (aces) free(aces);
1052 #ifdef HAVE_POSIX_ACLS
1053 if (defacl) acl_free(defacl);
1054 if (accacl) acl_free(accacl);
1055 #endif /* HAVE_POSIX_ACLS */
1057 LOG(log_debug9, logtype_afpd, "get_and_map_acl: END");
1062 /* Removes all non-trivial ACLs from object. Returns full AFPERR code. */
1063 static int remove_acl(const struct vol *vol,const char *path, int dir)
1067 #if (defined HAVE_SOLARIS_ACLS || defined HAVE_POSIX_ACLS)
1068 /* Ressource etc. first */
1069 if ((ret = vol->vfs->vfs_remove_acl(vol, path, dir)) != AFP_OK)
1071 /* now the data fork or dir */
1072 ret = remove_acl_vfs(path);
1078 Set ACL. Subtleties:
1079 - the client sends a complete list of ACEs, not only new ones. So we dont need to do
1080 any combination business (one exception being 'kFileSec_Inherit': see next)
1081 - client might request that we add inherited ACEs via 'kFileSec_Inherit'.
1082 We will store inherited ACEs first, which is Darwins canonical order.
1083 - returns AFPerror code
1085 #ifdef HAVE_SOLARIS_ACLS
1086 static int set_acl(const struct vol *vol,
1089 darwin_ace_t *daces,
1093 int i, nfsv4_ace_count;
1094 int tocopy_aces_count = 0, new_aces_count = 0, trivial_ace_count = 0;
1095 ace_t *old_aces, *new_aces = NULL;
1098 LOG(log_debug9, logtype_afpd, "set_acl: BEGIN");
1101 /* inherited + trivial ACEs */
1102 flags = ACE_INHERITED_ACE | ACE_OWNER | ACE_GROUP | ACE_EVERYONE;
1104 /* only trivial ACEs */
1105 flags = ACE_OWNER | ACE_GROUP | ACE_EVERYONE;
1107 /* Get existing ACL and count ACEs which have to be copied */
1108 if ((nfsv4_ace_count = get_nfsv4_acl(name, &old_aces)) == -1)
1110 for ( i=0; i < nfsv4_ace_count; i++) {
1111 if (old_aces[i].a_flags & flags)
1112 tocopy_aces_count++;
1115 /* Now malloc buffer exactly sized to fit all new ACEs */
1116 if ((new_aces = malloc((ace_count + tocopy_aces_count) * sizeof(ace_t))) == NULL) {
1117 LOG(log_error, logtype_afpd, "set_acl: malloc %s", strerror(errno));
1118 EC_STATUS(AFPERR_MISC);
1122 /* Start building new ACL */
1124 /* Copy local inherited ACEs. Therefore we have 'Darwin canonical order' (see chmod there):
1125 inherited ACEs first. */
1127 for (i=0; i < nfsv4_ace_count; i++) {
1128 if (old_aces[i].a_flags & ACE_INHERITED_ACE) {
1129 memcpy(&new_aces[new_aces_count], &old_aces[i], sizeof(ace_t));
1134 LOG(log_debug7, logtype_afpd, "set_acl: copied %d inherited ACEs", new_aces_count);
1136 /* Now the ACEs from the client */
1137 if ((ret = (map_acl(DARWIN_2_SOLARIS,
1138 &new_aces[new_aces_count],
1140 ace_count))) == -1) {
1141 EC_STATUS(AFPERR_PARAM);
1144 new_aces_count += ret;
1145 LOG(log_debug7, logtype_afpd, "set_acl: mapped %d ACEs from client", ret);
1147 /* Now copy the trivial ACEs */
1148 for (i=0; i < nfsv4_ace_count; i++) {
1149 if (old_aces[i].a_flags & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE)) {
1150 memcpy(&new_aces[new_aces_count], &old_aces[i], sizeof(ace_t));
1152 trivial_ace_count++;
1155 LOG(log_debug7, logtype_afpd, "set_acl: copied %d trivial ACEs", trivial_ace_count);
1157 /* Ressourcefork first.
1158 Note: for dirs we set the same ACL on the .AppleDouble/.Parent _file_. This
1159 might be strange for ACE_DELETE_CHILD and for inheritance flags. */
1160 if ((ret = (vol->vfs->vfs_acl(vol, name, ACE_SETACL, new_aces_count, new_aces))) != 0) {
1161 LOG(log_error, logtype_afpd, "set_acl: error setting acl: %s", strerror(errno));
1162 if (errno == (EACCES | EPERM))
1163 EC_STATUS(AFPERR_ACCESS);
1164 else if (errno == ENOENT)
1165 EC_STATUS(AFPERR_NOITEM);
1167 EC_STATUS(AFPERR_MISC);
1170 if ((ret = (acl(name, ACE_SETACL, new_aces_count, new_aces))) != 0) {
1171 LOG(log_error, logtype_afpd, "set_acl: error setting acl: %s", strerror(errno));
1172 if (errno == (EACCES | EPERM))
1173 EC_STATUS(AFPERR_ACCESS);
1174 else if (errno == ENOENT)
1175 EC_STATUS(AFPERR_NOITEM);
1177 EC_STATUS(AFPERR_MISC);
1184 if (old_aces) free(old_aces);
1185 if (new_aces) free(new_aces);
1187 LOG(log_debug9, logtype_afpd, "set_acl: END");
1190 #endif /* HAVE_SOLARIS_ACLS */
1192 #ifdef HAVE_POSIX_ACLS
1193 #ifndef HAVE_ACL_FROM_MODE
1194 static acl_t acl_from_mode(mode_t mode)
1198 acl_permset_t permset;
1200 if (!(acl = acl_init(3)))
1203 if (acl_create_entry(&acl, &entry) != 0)
1205 acl_set_tag_type(entry, ACL_USER_OBJ);
1206 acl_get_permset(entry, &permset);
1207 acl_clear_perms(permset);
1209 acl_add_perm(permset, ACL_READ);
1211 acl_add_perm(permset, ACL_WRITE);
1213 acl_add_perm(permset, ACL_EXECUTE);
1214 acl_set_permset(entry, permset);
1216 if (acl_create_entry(&acl, &entry) != 0)
1218 acl_set_tag_type(entry, ACL_GROUP_OBJ);
1219 acl_get_permset(entry, &permset);
1220 acl_clear_perms(permset);
1222 acl_add_perm(permset, ACL_READ);
1224 acl_add_perm(permset, ACL_WRITE);
1226 acl_add_perm(permset, ACL_EXECUTE);
1227 acl_set_permset(entry, permset);
1229 if (acl_create_entry(&acl, &entry) != 0)
1231 acl_set_tag_type(entry, ACL_OTHER);
1232 acl_get_permset(entry, &permset);
1233 acl_clear_perms(permset);
1235 acl_add_perm(permset, ACL_READ);
1237 acl_add_perm(permset, ACL_WRITE);
1239 acl_add_perm(permset, ACL_EXECUTE);
1240 acl_set_permset(entry, permset);
1250 static int set_acl(const struct vol *vol,
1253 darwin_ace_t *daces,
1258 acl_t default_acl = NULL;
1259 acl_t access_acl = NULL;
1262 int entry_id = ACL_FIRST_ENTRY;
1263 int has_def_acl = 0;
1264 /* flags to indicate if the object has a minimal default acl and/or an extended
1267 uint32_t default_acl_flags = 0;
1269 LOG(log_maxdebug, logtype_afpd, "set_acl: BEGIN");
1271 EC_NULL_LOG_ERR(access_acl = acl_get_file(name, ACL_TYPE_ACCESS), AFPERR_MISC);
1273 /* Iterate through acl and remove all extended acl entries. */
1274 while (acl_get_entry(access_acl, entry_id, &entry) == 1) {
1275 entry_id = ACL_NEXT_ENTRY;
1276 EC_ZERO_LOG(acl_get_tag_type(entry, &tag));
1278 if ((tag == ACL_USER) || (tag == ACL_GROUP) || (tag == ACL_MASK)) {
1279 EC_ZERO_LOG_ERR(acl_delete_entry(access_acl, entry), AFPERR_MISC);
1283 /* In case we are acting on a directory prepare a default acl. For files default_acl will be NULL.
1284 * If the directory already has a default acl it will be preserved.
1286 EC_ZERO_LOG_ERR(lstat(name, &st), AFPERR_NOOBJ);
1288 if (S_ISDIR(st.st_mode)) {
1289 default_acl = acl_get_file(name, ACL_TYPE_DEFAULT);
1292 /* If default_acl is not empty then the dir has a default acl. */
1293 if (acl_get_entry(default_acl, ACL_FIRST_ENTRY, &entry) == 1)
1294 default_acl_flags = HAS_DEFAULT_ACL;
1296 acl_free(default_acl);
1298 default_acl = acl_dup(access_acl);
1300 /* adds the clients aces */
1301 EC_ZERO_ERR(map_aces_darwin_to_posix(daces, &default_acl, &access_acl, ace_count, &default_acl_flags), AFPERR_MISC);
1303 /* calcuate ACL mask */
1304 EC_ZERO_LOG_ERR(acl_calc_mask(&access_acl), AFPERR_MISC);
1307 EC_ZERO_LOG_ERR(acl_valid(access_acl), AFPERR_MISC);
1310 EC_ZERO_LOG_ERR(acl_set_file(name, ACL_TYPE_ACCESS, access_acl), AFPERR_MISC);
1311 EC_ZERO_LOG_ERR(vol->vfs->vfs_acl(vol, name, ACL_TYPE_ACCESS, 0, access_acl), AFPERR_MISC);
1314 /* If the dir has an extended default acl it's ACL_MASK must be updated.*/
1315 if (default_acl_flags & HAS_EXT_DEFAULT_ACL)
1316 EC_ZERO_LOG_ERR(acl_calc_mask(&default_acl), AFPERR_MISC);
1318 if (default_acl_flags) {
1319 EC_ZERO_LOG_ERR(acl_valid(default_acl), AFPERR_MISC);
1320 EC_ZERO_LOG_ERR(acl_set_file(name, ACL_TYPE_DEFAULT, default_acl), AFPERR_MISC);
1321 EC_ZERO_LOG_ERR(vol->vfs->vfs_acl(vol, name, ACL_TYPE_DEFAULT, 0, default_acl), AFPERR_MISC);
1326 if (access_acl) acl_free(access_acl);
1327 if (default_acl) acl_free(default_acl);
1329 LOG(log_maxdebug, logtype_afpd, "set_acl: END");
1332 #endif /* HAVE_POSIX_ACLS */
1335 * Checks if a given UUID has requested_rights(type darwin_ace_rights) for path.
1337 * Note: this gets called frequently and is a good place for optimizations !
1339 * @param vol (r) volume
1340 * @param dir (rw) directory
1341 * @param path (r) path to filesystem object
1342 * @param uuid (r) UUID of user
1343 * @param requested_rights (r) requested Darwin ACE
1345 * @returns AFP result code
1347 static int check_acl_access(const AFPObj *obj,
1348 const struct vol *vol,
1352 uint32_t requested_rights)
1355 uint32_t allowed_rights = 0;
1356 char *username = NULL;
1357 uuidtype_t uuidtype;
1359 bstring parent = NULL;
1362 LOG(log_maxdebug, logtype_afpd, "check_acl_access(dir: \"%s\", path: \"%s\", curdir: \"%s\", 0x%08x)",
1363 cfrombstr(dir->d_fullpath), path, getcwdpath(), requested_rights);
1365 /* This check is not used anymore, as OS X Server seems to be ignoring too */
1367 /* Get uid or gid from UUID */
1368 EC_ZERO_ERR(getnamefromuuid(uuid, &username, &uuidtype), AFPERR_PARAM);
1373 LOG(log_warning, logtype_afpd, "check_acl_access: afp_access not supported for groups");
1374 EC_STATUS(AFPERR_MISC);
1377 EC_STATUS(AFPERR_MISC);
1382 EC_ZERO_LOG_ERR(lstat(path, &st), AFPERR_PARAM);
1384 is_dir = !strcmp(path, ".");
1386 if (is_dir && (curdir->d_rights_cache != 0xffffffff)) {
1387 /* its a dir and the cache value is valid */
1388 allowed_rights = curdir->d_rights_cache;
1389 LOG(log_debug, logtype_afpd, "check_access: allowed rights from dircache: 0x%08x", allowed_rights);
1391 #ifdef HAVE_SOLARIS_ACLS
1392 EC_ZERO_LOG(solaris_acl_rights(obj, path, &st, &allowed_rights));
1394 #ifdef HAVE_POSIX_ACLS
1395 EC_ZERO_LOG(posix_acl_rights(obj, path, &st, &allowed_rights));
1398 * The DARWIN_ACE_DELETE right might implicitly result from write acces to the parent
1399 * directory. As it seems the 10.6 AFP client is puzzled when this right is not
1400 * allowed where a delete would succeed because the parent dir gives write perms.
1401 * So we check the parent dir for write access and set the right accordingly.
1402 * Currentyl acl2ownermode calls us with dir = NULL, because it doesn't make sense
1403 * there to do this extra check -- afaict.
1405 if (vol && dir && (requested_rights & DARWIN_ACE_DELETE)) {
1407 uint32_t parent_rights = 0;
1409 if (curdir->d_did == DIRDID_ROOT_PARENT) {
1410 /* use volume path */
1411 EC_NULL_LOG_ERR(parent = bfromcstr(vol->v_path), AFPERR_MISC);
1413 /* build path for parent */
1414 EC_NULL_LOG_ERR(parent = bstrcpy(curdir->d_fullpath), AFPERR_MISC);
1415 EC_ZERO_LOG_ERR(bconchar(parent, '/'), AFPERR_MISC);
1416 EC_ZERO_LOG_ERR(bcatcstr(parent, path), AFPERR_MISC);
1417 EC_NEG1_LOG_ERR(i = bstrrchr(parent, '/'), AFPERR_MISC);
1418 EC_ZERO_LOG_ERR(binsertch(parent, i, 1, 0), AFPERR_MISC);
1421 LOG(log_debug, logtype_afpd,"parent: %s", cfrombstr(parent));
1422 EC_ZERO_LOG_ERR(lstat(cfrombstr(parent), &st), AFPERR_MISC);
1424 #ifdef HAVE_SOLARIS_ACLS
1425 EC_ZERO_LOG(solaris_acl_rights(obj, cfrombstr(parent), &st, &parent_rights));
1427 #ifdef HAVE_POSIX_ACLS
1428 EC_ZERO_LOG(posix_acl_rights(obj, path, &st, &parent_rights));
1430 if (parent_rights & (DARWIN_ACE_WRITE_DATA | DARWIN_ACE_DELETE_CHILD))
1431 allowed_rights |= DARWIN_ACE_DELETE; /* man, that was a lot of work! */
1435 /* Without DARWIN_ACE_DELETE set OS X 10.6 refuses to rename subdirectories in a
1438 if (allowed_rights & DARWIN_ACE_ADD_SUBDIRECTORY)
1439 allowed_rights |= DARWIN_ACE_DELETE;
1441 curdir->d_rights_cache = allowed_rights;
1443 LOG(log_debug, logtype_afpd, "allowed rights: 0x%08x", allowed_rights);
1446 if ((requested_rights & allowed_rights) != requested_rights) {
1447 LOG(log_debug, logtype_afpd, "some requested right wasn't allowed: 0x%08x / 0x%08x",
1448 requested_rights, allowed_rights);
1449 EC_STATUS(AFPERR_ACCESS);
1451 LOG(log_debug, logtype_afpd, "all requested rights are allowed: 0x%08x",
1457 if (username) free(username);
1458 if (parent) bdestroy(parent);
1463 /********************************************************
1465 ********************************************************/
1467 int afp_access(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
1472 uint32_t did, darwin_ace_rights;
1474 struct path *s_path;
1480 memcpy(&vid, ibuf, sizeof( vid ));
1481 ibuf += sizeof(vid);
1482 if (NULL == ( vol = getvolbyvid( vid ))) {
1483 LOG(log_error, logtype_afpd, "afp_access: error getting volid:%d", vid);
1484 return AFPERR_NOOBJ;
1487 memcpy(&did, ibuf, sizeof( did ));
1488 ibuf += sizeof( did );
1489 if (NULL == ( dir = dirlookup( vol, did ))) {
1490 LOG(log_error, logtype_afpd, "afp_access: error getting did:%d", did);
1497 /* Store UUID address */
1498 uuid = (uuidp_t)ibuf;
1499 ibuf += UUID_BINSIZE;
1501 /* Store ACE rights */
1502 memcpy(&darwin_ace_rights, ibuf, 4);
1503 darwin_ace_rights = ntohl(darwin_ace_rights);
1506 /* get full path and handle file/dir subtleties in netatalk code*/
1507 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) {
1508 LOG(log_error, logtype_afpd, "afp_getacl: cname got an error!");
1509 return AFPERR_NOOBJ;
1511 if (!s_path->st_valid)
1512 of_statdir(vol, s_path);
1513 if ( s_path->st_errno != 0 ) {
1514 LOG(log_error, logtype_afpd, "afp_getacl: cant stat");
1515 return AFPERR_NOOBJ;
1518 ret = check_acl_access(obj, vol, dir, s_path->u_name, uuid, darwin_ace_rights);
1523 int afp_getacl(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
1529 uint16_t vid, bitmap;
1530 struct path *s_path;
1534 LOG(log_debug9, logtype_afpd, "afp_getacl: BEGIN");
1538 memcpy(&vid, ibuf, sizeof( vid ));
1539 ibuf += sizeof(vid);
1540 if (NULL == ( vol = getvolbyvid( vid ))) {
1541 LOG(log_error, logtype_afpd, "afp_getacl: error getting volid:%d", vid);
1542 return AFPERR_NOOBJ;
1545 memcpy(&did, ibuf, sizeof( did ));
1546 ibuf += sizeof( did );
1547 if (NULL == ( dir = dirlookup( vol, did ))) {
1548 LOG(log_error, logtype_afpd, "afp_getacl: error getting did:%d", did);
1552 memcpy(&bitmap, ibuf, sizeof( bitmap ));
1553 memcpy(rbuf, ibuf, sizeof( bitmap ));
1554 bitmap = ntohs( bitmap );
1555 ibuf += sizeof( bitmap );
1556 rbuf += sizeof( bitmap );
1557 *rbuflen += sizeof( bitmap );
1559 /* skip maxreplysize */
1562 /* get full path and handle file/dir subtleties in netatalk code*/
1563 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) {
1564 LOG(log_error, logtype_afpd, "afp_getacl: cname got an error!");
1565 return AFPERR_NOOBJ;
1567 if (!s_path->st_valid)
1568 of_statdir(vol, s_path);
1569 if ( s_path->st_errno != 0 ) {
1570 LOG(log_error, logtype_afpd, "afp_getacl: cant stat");
1571 return AFPERR_NOOBJ;
1574 /* Shall we return owner UUID ? */
1575 if (bitmap & kFileSec_UUID) {
1576 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files owner user UUID");
1577 if (NULL == (pw = getpwuid(s_path->st.st_uid))) {
1578 LOG(log_debug, logtype_afpd, "afp_getacl: local uid: %u", s_path->st.st_uid);
1579 localuuid_from_id(rbuf, UUID_USER, s_path->st.st_uid);
1581 LOG(log_debug, logtype_afpd, "afp_getacl: got uid: %d, name: %s", s_path->st.st_uid, pw->pw_name);
1582 if ((ret = getuuidfromname(pw->pw_name, UUID_USER, rbuf)) != 0)
1585 rbuf += UUID_BINSIZE;
1586 *rbuflen += UUID_BINSIZE;
1589 /* Shall we return group UUID ? */
1590 if (bitmap & kFileSec_GRPUUID) {
1591 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files owner group UUID");
1592 if (NULL == (gr = getgrgid(s_path->st.st_gid))) {
1593 LOG(log_debug, logtype_afpd, "afp_getacl: local gid: %u", s_path->st.st_gid);
1594 localuuid_from_id(rbuf, UUID_GROUP, s_path->st.st_gid);
1596 LOG(log_debug, logtype_afpd, "afp_getacl: got gid: %d, name: %s", s_path->st.st_gid, gr->gr_name);
1597 if ((ret = getuuidfromname(gr->gr_name, UUID_GROUP, rbuf)) != 0)
1600 rbuf += UUID_BINSIZE;
1601 *rbuflen += UUID_BINSIZE;
1604 /* Shall we return ACL ? */
1605 if (bitmap & kFileSec_ACL) {
1606 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files ACL");
1607 if (get_and_map_acl(s_path->u_name, rbuf, rbuflen) != 0) {
1608 LOG(log_error, logtype_afpd, "afp_getacl(\"%s/%s\"): mapping error",
1609 getcwdpath(), s_path->u_name);
1614 LOG(log_debug9, logtype_afpd, "afp_getacl: END");
1618 int afp_setacl(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen)
1624 uint16_t vid, bitmap;
1625 struct path *s_path;
1627 LOG(log_debug9, logtype_afpd, "afp_setacl: BEGIN");
1631 memcpy(&vid, ibuf, sizeof( vid ));
1632 ibuf += sizeof(vid);
1633 if (NULL == ( vol = getvolbyvid( vid ))) {
1634 LOG(log_error, logtype_afpd, "afp_setacl: error getting volid:%d", vid);
1635 return AFPERR_NOOBJ;
1638 memcpy(&did, ibuf, sizeof( did ));
1639 ibuf += sizeof( did );
1640 if (NULL == ( dir = dirlookup( vol, did ))) {
1641 LOG(log_error, logtype_afpd, "afp_setacl: error getting did:%d", did);
1645 memcpy(&bitmap, ibuf, sizeof( bitmap ));
1646 bitmap = ntohs( bitmap );
1647 ibuf += sizeof( bitmap );
1649 /* get full path and handle file/dir subtleties in netatalk code*/
1650 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) {
1651 LOG(log_error, logtype_afpd, "afp_setacl: cname got an error!");
1652 return AFPERR_NOOBJ;
1654 if (!s_path->st_valid)
1655 of_statdir(vol, s_path);
1656 if ( s_path->st_errno != 0 ) {
1657 LOG(log_error, logtype_afpd, "afp_setacl: cant stat");
1658 return AFPERR_NOOBJ;
1660 LOG(log_debug, logtype_afpd, "afp_setacl: unixname: %s", s_path->u_name);
1663 if ((unsigned long)ibuf & 1)
1666 /* Start processing request */
1668 /* Change owner: dont even try */
1669 if (bitmap & kFileSec_UUID) {
1670 LOG(log_note, logtype_afpd, "afp_setacl: change owner request, discarded");
1671 ret = AFPERR_ACCESS;
1672 ibuf += UUID_BINSIZE;
1675 /* Change group: certain changes might be allowed, so try it. FIXME: not implemented yet. */
1676 if (bitmap & kFileSec_UUID) {
1677 LOG(log_note, logtype_afpd, "afp_setacl: change group request, not supported");
1679 ibuf += UUID_BINSIZE;
1683 if (bitmap & kFileSec_REMOVEACL) {
1684 LOG(log_debug, logtype_afpd, "afp_setacl: Remove ACL request.");
1685 if ((ret = remove_acl(vol, s_path->u_name, S_ISDIR(s_path->st.st_mode))) != AFP_OK)
1686 LOG(log_error, logtype_afpd, "afp_setacl: error from remove_acl");
1690 if (bitmap & kFileSec_ACL) {
1691 LOG(log_debug, logtype_afpd, "afp_setacl: Change ACL request.");
1692 /* Get no of ACEs the client put on the wire */
1694 memcpy(&ace_count, ibuf, sizeof(uint32_t));
1695 ace_count = htonl(ace_count);
1696 ibuf += 8; /* skip ACL flags (see acls.h) */
1700 (bitmap & kFileSec_Inherit),
1701 (darwin_ace_t *)ibuf,
1706 LOG(log_warning, logtype_afpd, "afp_setacl(\"%s/%s\"): error",
1707 getcwdpath(), s_path->u_name);
1712 LOG(log_debug9, logtype_afpd, "afp_setacl: END");
1716 /********************************************************************
1717 * ACL funcs interfacing with other parts
1718 ********************************************************************/
1721 * map ACL to user maccess
1723 * This is the magic function that makes ACLs usable by calculating
1724 * the access granted by ACEs to the logged in user.
1726 int acltoownermode(const AFPObj *obj, const struct vol *vol, char *path, struct stat *st, struct maccess *ma)
1729 uint32_t rights = 0;
1731 if ( ! (obj->options.flags & OPTION_ACL2MACCESS)
1732 || ! (vol->v_flags & AFPVOL_ACLS))
1735 LOG(log_maxdebug, logtype_afpd, "acltoownermode(\"%s/%s\", 0x%02x)",
1736 getcwdpath(), path, ma->ma_user);
1738 #ifdef HAVE_SOLARIS_ACLS
1739 EC_ZERO_LOG(solaris_acl_rights(obj, path, st, &rights));
1741 LOG(log_maxdebug, logtype_afpd, "rights: 0x%08x", rights);
1743 if (rights & DARWIN_ACE_READ_DATA)
1744 ma->ma_user |= AR_UREAD;
1745 if (rights & DARWIN_ACE_WRITE_DATA)
1746 ma->ma_user |= AR_UWRITE;
1747 if (rights & (DARWIN_ACE_EXECUTE | DARWIN_ACE_SEARCH))
1748 ma->ma_user |= AR_USEARCH;
1751 #ifdef HAVE_POSIX_ACLS
1752 EC_ZERO_LOG(posix_acls_to_uaperms(obj, path, st, ma));
1755 LOG(log_maxdebug, logtype_afpd, "resulting user maccess: 0x%02x group maccess: 0x%02x", ma->ma_user, ma->ma_group);