1/* 2 Copyright (c) 2008, 2009, 2010 Frank Lahm <franklahm@gmail.com> 3 4 This program is free software; you can redistribute it and/or modify 5 it under the terms of the GNU General Public License as published by 6 the Free Software Foundation; either version 2 of the License, or 7 (at your option) any later version. 8 9 This program is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 GNU General Public License for more details. 13*/ 14 15#ifdef HAVE_CONFIG_H 16#include "config.h" 17#endif /* HAVE_CONFIG_H */ 18 19#include <string.h> 20#include <strings.h> 21#include <stdio.h> 22#include <stdlib.h> 23#include <grp.h> 24#include <pwd.h> 25#include <errno.h> 26#ifdef HAVE_SOLARIS_ACLS 27#include <sys/acl.h> 28#endif 29#ifdef HAVE_POSIX_ACLS 30#include <sys/acl.h> 31#endif 32#ifdef HAVE_ACL_LIBACL_H 33#include <acl/libacl.h> 34#endif 35 36#include <atalk/errchk.h> 37#include <atalk/adouble.h> 38#include <atalk/vfs.h> 39#include <atalk/afp.h> 40#include <atalk/util.h> 41#include <atalk/cnid.h> 42#include <atalk/logger.h> 43#include <atalk/uuid.h> 44#include <atalk/acl.h> 45#include <atalk/bstrlib.h> 46#include <atalk/bstradd.h> 47 48#include "directory.h" 49#include "desktop.h" 50#include "volume.h" 51#include "fork.h" 52#include "unix.h" 53#include "acls.h" 54#include "acl_mappings.h" 55#include "auth.h" 56 57/* for map_acl() */ 58#define SOLARIS_2_DARWIN 1 59#define DARWIN_2_SOLARIS 2 60#define POSIX_DEFAULT_2_DARWIN 3 61#define POSIX_ACCESS_2_DARWIN 4 62#define DARWIN_2_POSIX_DEFAULT 5 63#define DARWIN_2_POSIX_ACCESS 6 64 65#define MAP_MASK 31 66#define IS_DIR 32 67 68/******************************************************** 69 * Solaris funcs 70 ********************************************************/ 71 72#ifdef HAVE_SOLARIS_ACLS 73 74/*! 75 * Compile access rights for a user to one file-system object 76 * 77 * This combines combines all access rights for a user to one fs-object and 78 * returns the result as a Darwin allowed rights ACE. 79 * This must honor trivial ACEs which are a mode_t mapping. 80 * 81 * @param path (r) path to filesystem object 82 * @param sb (r) struct stat of path 83 * @param result (w) resulting Darwin allow ACE 84 * 85 * @returns 0 or -1 on error 86 */ 87static int solaris_acl_rights(const char *path, 88 const struct stat *sb, 89 uint32_t *result) 90{ 91 EC_INIT; 92 int i, ace_count, checkgroup; 93 ace_t *aces = NULL; 94 uid_t who; 95 uint16_t flags, type; 96 uint32_t rights, allowed_rights = 0, denied_rights = 0, darwin_rights; 97 98 /* Get ACL from file/dir */ 99 EC_NEG1_LOG(ace_count = get_nfsv4_acl(path, &aces)); 100 101 if (ace_count == 0) 102 goto EC_CLEANUP; 103 104 /* Now check requested rights */ 105 i = 0; 106 do { /* Loop through ACEs */ 107 who = aces[i].a_who; 108 flags = aces[i].a_flags; 109 type = aces[i].a_type; 110 rights = aces[i].a_access_mask; 111 112 if (flags & ACE_INHERIT_ONLY_ACE) 113 continue; 114 115 /* Now the tricky part: decide if ACE effects our user. I'll explain: 116 if its a dedicated (non trivial) ACE for the user 117 OR 118 if its a ACE for a group we're member of 119 OR 120 if its a trivial ACE_OWNER ACE and requested UUID is the owner 121 OR 122 if its a trivial ACE_GROUP ACE and requested UUID is group 123 OR 124 if its a trivial ACE_EVERYONE ACE 125 THEN 126 process ACE */ 127 if (((who == uuid) && !(flags & (ACE_TRIVIAL|ACE_IDENTIFIER_GROUP))) 128 || 129 ((flags & ACE_IDENTIFIER_GROUP) && !(flags & ACE_GROUP) && gmem(who)) 130 || 131 ((flags & ACE_OWNER) && (uuid == sb->st_uid)) 132 || 133 ((flags & ACE_GROUP) && !(uuid == sb->st_uid) && gmem(sb->st_gid)) 134 || 135 (flags & ACE_EVERYONE && !(uuid == sb->st_uid) && !gmem(sb->st_gid)) 136 ) { 137 /* Found an applicable ACE */ 138 if (type == ACE_ACCESS_ALLOWED_ACE_TYPE) 139 allowed_rights |= rights; 140 else if (type == ACE_ACCESS_DENIED_ACE_TYPE) 141 /* Only or to denied rights if not previously allowed !! */ 142 denied_rights |= ((!allowed_rights) & rights); 143 } 144 } while (++i < ace_count); 145 146 147 /* Darwin likes to ask for "delete_child" on dir, 148 "write_data" is actually the same, so we add that for dirs */ 149 if (S_ISDIR(sb->st_mode) && (allowed_rights & ACE_WRITE_DATA)) 150 allowed_rights |= ACE_DELETE_CHILD; 151 152 /* Remove denied from allowed rights */ 153 allowed_rights &= ~denied_rights; 154 155 /* map rights */ 156 darwin_rights = 0; 157 for (i=0; nfsv4_to_darwin_rights[i].from != 0; i++) { 158 if (allowed_rights & nfsv4_to_darwin_rights[i].from) 159 darwin_rights |= nfsv4_to_darwin_rights[i].to; 160 } 161 162 *result |= darwin_rights; 163 164EC_CLEANUP: 165 if (aces) free(aces); 166 167 EC_EXIT; 168} 169 170/* 171 Maps ACE array from Solaris to Darwin. Darwin ACEs are stored in network byte order. 172 Return numer of mapped ACEs or -1 on error. 173 All errors while mapping (e.g. getting UUIDs from LDAP) are fatal. 174*/ 175static int map_aces_solaris_to_darwin(const ace_t *aces, 176 darwin_ace_t *darwin_aces, 177 int ace_count) 178{ 179 EC_INIT; 180 int i, count = 0; 181 uint32_t flags; 182 uint32_t rights; 183 struct passwd *pwd = NULL; 184 struct group *grp = NULL; 185 186 LOG(log_maxdebug, logtype_afpd, "map_aces_solaris_to_darwin: parsing %d ACES", ace_count); 187 188 while(ace_count--) { 189 LOG(log_maxdebug, logtype_afpd, "ACE No. %d", ace_count + 1); 190 /* if its a ACE resulting from nfsv4 mode mapping, discard it */ 191 if (aces->a_flags & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE)) { 192 LOG(log_debug, logtype_afpd, "trivial ACE"); 193 aces++; 194 continue; 195 } 196 197 if ( ! (aces->a_flags & ACE_IDENTIFIER_GROUP) ) { /* user ace */ 198 LOG(log_debug, logtype_afpd, "uid: %d", aces->a_who); 199 EC_NULL_LOG(pwd = getpwuid(aces->a_who)); 200 LOG(log_debug, logtype_afpd, "uid: %d -> name: %s", aces->a_who, pwd->pw_name); 201 EC_ZERO_LOG(getuuidfromname(pwd->pw_name, 202 UUID_USER, 203 darwin_aces->darwin_ace_uuid)); 204 } else { /* group ace */ 205 LOG(log_debug, logtype_afpd, "gid: %d", aces->a_who); 206 EC_NULL_LOG(grp = getgrgid(aces->a_who)); 207 LOG(log_debug, logtype_afpd, "gid: %d -> name: %s", aces->a_who, grp->gr_name); 208 EC_ZERO_LOG(getuuidfromname(grp->gr_name, 209 UUID_GROUP, 210 darwin_aces->darwin_ace_uuid)); 211 } 212 213 /* map flags */ 214 if (aces->a_type == ACE_ACCESS_ALLOWED_ACE_TYPE) 215 flags = DARWIN_ACE_FLAGS_PERMIT; 216 else if (aces->a_type == ACE_ACCESS_DENIED_ACE_TYPE) 217 flags = DARWIN_ACE_FLAGS_DENY; 218 else { /* unsupported type */ 219 aces++; 220 continue; 221 } 222 for(i=0; nfsv4_to_darwin_flags[i].from != 0; i++) { 223 if (aces->a_flags & nfsv4_to_darwin_flags[i].from) 224 flags |= nfsv4_to_darwin_flags[i].to; 225 } 226 darwin_aces->darwin_ace_flags = htonl(flags); 227 228 /* map rights */ 229 rights = 0; 230 for (i=0; nfsv4_to_darwin_rights[i].from != 0; i++) { 231 if (aces->a_access_mask & nfsv4_to_darwin_rights[i].from) 232 rights |= nfsv4_to_darwin_rights[i].to; 233 } 234 darwin_aces->darwin_ace_rights = htonl(rights); 235 236 count++; 237 aces++; 238 darwin_aces++; 239 } 240 241 return count; 242EC_CLEANUP: 243 EC_EXIT; 244} 245 246/* 247 Maps ACE array from Darwin to Solaris. Darwin ACEs are expected in network byte order. 248 Return numer of mapped ACEs or -1 on error. 249 All errors while mapping (e.g. getting UUIDs from LDAP) are fatal. 250*/ 251static int map_aces_darwin_to_solaris(darwin_ace_t *darwin_aces, 252 ace_t *nfsv4_aces, 253 int ace_count) 254{ 255 EC_INIT; 256 int i, mapped_aces = 0; 257 uint32_t darwin_ace_flags; 258 uint32_t darwin_ace_rights; 259 uint16_t nfsv4_ace_flags; 260 uint32_t nfsv4_ace_rights; 261 char *name = NULL; 262 uuidtype_t uuidtype; 263 struct passwd *pwd; 264 struct group *grp; 265 266 while(ace_count--) { 267 nfsv4_ace_flags = 0; 268 nfsv4_ace_rights = 0; 269 270 /* uid/gid first */ 271 EC_ZERO(getnamefromuuid(darwin_aces->darwin_ace_uuid, &name, &uuidtype)); 272 switch (uuidtype) { 273 case UUID_USER: 274 EC_NULL_LOG(pwd = getpwnam(name)); 275 nfsv4_aces->a_who = pwd->pw_uid; 276 break; 277 case UUID_GROUP: 278 EC_NULL_LOG(grp = getgrnam(name)); 279 nfsv4_aces->a_who = (uid_t)(grp->gr_gid); 280 nfsv4_ace_flags |= ACE_IDENTIFIER_GROUP; 281 break; 282 default: 283 LOG(log_error, logtype_afpd, "map_aces_darwin_to_solaris: unkown uuidtype"); 284 EC_FAIL; 285 } 286 free(name); 287 name = NULL; 288 289 /* now type: allow/deny */ 290 darwin_ace_flags = ntohl(darwin_aces->darwin_ace_flags); 291 if (darwin_ace_flags & DARWIN_ACE_FLAGS_PERMIT) 292 nfsv4_aces->a_type = ACE_ACCESS_ALLOWED_ACE_TYPE; 293 else if (darwin_ace_flags & DARWIN_ACE_FLAGS_DENY) 294 nfsv4_aces->a_type = ACE_ACCESS_DENIED_ACE_TYPE; 295 else { /* unsupported type */ 296 darwin_aces++; 297 continue; 298 } 299 /* map flags */ 300 for(i=0; darwin_to_nfsv4_flags[i].from != 0; i++) { 301 if (darwin_ace_flags & darwin_to_nfsv4_flags[i].from) 302 nfsv4_ace_flags |= darwin_to_nfsv4_flags[i].to; 303 } 304 305 /* map rights */ 306 darwin_ace_rights = ntohl(darwin_aces->darwin_ace_rights); 307 for (i=0; darwin_to_nfsv4_rights[i].from != 0; i++) { 308 if (darwin_ace_rights & darwin_to_nfsv4_rights[i].from) 309 nfsv4_ace_rights |= darwin_to_nfsv4_rights[i].to; 310 } 311 312 LOG(log_debug9, logtype_afpd, 313 "map_aces_darwin_to_solaris: ACE flags: Darwin:%08x -> NFSv4:%04x", 314 darwin_ace_flags, nfsv4_ace_flags); 315 LOG(log_debug9, logtype_afpd, 316 "map_aces_darwin_to_solaris: ACE rights: Darwin:%08x -> NFSv4:%08x", 317 darwin_ace_rights, nfsv4_ace_rights); 318 319 nfsv4_aces->a_flags = nfsv4_ace_flags; 320 nfsv4_aces->a_access_mask = nfsv4_ace_rights; 321 322 mapped_aces++; 323 darwin_aces++; 324 nfsv4_aces++; 325 } 326 327 return mapped_aces; 328EC_CLEANUP: 329 if (name) 330 free(name); 331 EC_EXIT; 332} 333#endif /* HAVE_SOLARIS_ACLS */ 334 335/******************************************************** 336 * POSIX 1e funcs 337 ********************************************************/ 338 339#ifdef HAVE_POSIX_ACLS 340 341static uint32_t posix_permset_to_darwin_rights(acl_entry_t e, int is_dir) 342{ 343 EC_INIT; 344 uint32_t rights = 0; 345 acl_permset_t permset; 346 347 EC_ZERO_LOG(acl_get_permset(e, &permset)); 348 349#ifdef HAVE_ACL_GET_PERM_NP 350 if (acl_get_perm_np(permset, ACL_READ)) 351#else 352 if (acl_get_perm(permset, ACL_READ)) 353#endif 354 rights = DARWIN_ACE_READ_DATA 355 | DARWIN_ACE_READ_EXTATTRIBUTES 356 | DARWIN_ACE_READ_ATTRIBUTES 357 | DARWIN_ACE_READ_SECURITY; 358#ifdef HAVE_ACL_GET_PERM_NP 359 if (acl_get_perm_np(permset, ACL_WRITE)) { 360#else 361 if (acl_get_perm(permset, ACL_WRITE)) { 362#endif 363 rights |= DARWIN_ACE_WRITE_DATA 364 | DARWIN_ACE_APPEND_DATA 365 | DARWIN_ACE_WRITE_EXTATTRIBUTES 366 | DARWIN_ACE_WRITE_ATTRIBUTES; 367 if (is_dir) 368 rights |= DARWIN_ACE_DELETE_CHILD; 369 } 370#ifdef HAVE_ACL_GET_PERM_NP 371 if (acl_get_perm_np(permset, ACL_EXECUTE)) 372#else 373 if (acl_get_perm(permset, ACL_EXECUTE)) 374#endif 375 rights |= DARWIN_ACE_EXECUTE; 376 377EC_CLEANUP: 378 LOG(log_maxdebug, logtype_afpd, "mapped rights: 0x%08x", rights); 379 return rights; 380} 381 382/*! 383 * Compile access rights for a user to one file-system object 384 * 385 * This combines combines all access rights for a user to one fs-object and 386 * returns the result as a Darwin allowed rights ACE. 387 * This must honor trivial ACEs which are a mode_t mapping. 388 * 389 * @param path (r) path to filesystem object 390 * @param sb (r) struct stat of path 391 * @param result (rw) resulting Darwin allow ACE 392 * 393 * @returns 0 or -1 on error 394 */ 395static int posix_acl_rights(const char *path, 396 const struct stat *sb, 397 uint32_t *result) 398{ 399 EC_INIT; 400 int havemask = 0; 401 int entry_id = ACL_FIRST_ENTRY; 402 uint32_t rights = 0, maskrights = 0; 403 uid_t *uid = NULL; 404 gid_t *gid = NULL; 405 acl_t acl = NULL; 406 acl_entry_t e; 407 acl_tag_t tag; 408 409 EC_NULL_LOG(acl = acl_get_file(path, ACL_TYPE_ACCESS)); 410 411 /* itereate through all ACEs to get the mask */ 412 while (!havemask && acl_get_entry(acl, entry_id, &e) == 1) { 413 entry_id = ACL_NEXT_ENTRY; 414 EC_ZERO_LOG(acl_get_tag_type(e, &tag)); 415 switch (tag) { 416 case ACL_MASK: 417 maskrights = posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)); 418 LOG(log_maxdebug, logtype_afpd, "maskrights: 0x%08x", maskrights); 419 havemask = 1; 420 break; 421 default: 422 continue; 423 } 424 } 425 426 /* itereate through all ACEs */ 427 entry_id = ACL_FIRST_ENTRY; 428 while (acl_get_entry(acl, entry_id, &e) == 1) { 429 entry_id = ACL_NEXT_ENTRY; 430 EC_ZERO_LOG(acl_get_tag_type(e, &tag)); 431 switch (tag) { 432 case ACL_USER: 433 EC_NULL_LOG(uid = (uid_t *)acl_get_qualifier(e)); 434 if (*uid == uuid) { 435 LOG(log_maxdebug, logtype_afpd, "ACL_USER: %u", *uid); 436 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)); 437 } 438 acl_free(uid); 439 uid = NULL; 440 break; 441 case ACL_USER_OBJ: 442 if (sb->st_uid == uuid) { 443 LOG(log_maxdebug, logtype_afpd, "ACL_USER_OBJ: %u", sb->st_uid); 444 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)); 445 } 446 break; 447 case ACL_GROUP: 448 EC_NULL_LOG(gid = (gid_t *)acl_get_qualifier(e)); 449 if (gmem(*gid)) { 450 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP: %u", *gid); 451 rights |= (posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)) & maskrights); 452 } 453 acl_free(gid); 454 gid = NULL; 455 break; 456 case ACL_GROUP_OBJ: 457 if (!(sb->st_uid == uuid) && gmem(sb->st_gid)) { 458 LOG(log_maxdebug, logtype_afpd, "ACL_GROUP_OBJ: %u", sb->st_gid); 459 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)); 460 } 461 break; 462 case ACL_OTHER: 463 if (!(sb->st_uid == uuid) && !gmem(sb->st_gid)) { 464 LOG(log_maxdebug, logtype_afpd, "ACL_OTHER"); 465 rights |= posix_permset_to_darwin_rights(e, S_ISDIR(sb->st_mode)); 466 } 467 break; 468 default: 469 continue; 470 } 471 } /* while */ 472 473 *result |= rights; 474 475EC_CLEANUP: 476 if (acl) acl_free(acl); 477 if (uid) acl_free(uid); 478 if (gid) acl_free(gid); 479 EC_EXIT; 480} 481 482/*! 483 * Add entries of one acl to another acl 484 * 485 * @param aclp (rw) destination acl where new aces will be added 486 * @param acl (r) source acl where aces will be copied from 487 * 488 * @returns 0 on success, -1 on error 489 */ 490static int acl_add_acl(acl_t *aclp, const acl_t acl) 491{ 492 EC_INIT; 493 int id; 494 acl_entry_t se, de; 495 496 for (id = ACL_FIRST_ENTRY; acl_get_entry(acl, id, &se) == 1; id = ACL_NEXT_ENTRY) { 497 EC_ZERO_LOG_ERR(acl_create_entry(aclp, &de), AFPERR_MISC); 498 EC_ZERO_LOG_ERR(acl_copy_entry(de, se), AFPERR_MISC); 499 } 500 501EC_CLEANUP: 502 EC_EXIT; 503} 504 505/*! 506 * Map Darwin ACE rights to POSIX 1e perm 507 * 508 * We can only map few rights: 509 * DARWIN_ACE_READ_DATA -> ACL_READ 510 * DARWIN_ACE_WRITE_DATA -> ACL_WRITE 511 * DARWIN_ACE_DELETE_CHILD & (is_dir == 1) -> ACL_WRITE 512 * DARWIN_ACE_EXECUTE -> ACL_EXECUTE 513 * 514 * @param entry (rw) result of the mapping 515 * @param is_dir (r) 1 for dirs, 0 for files 516 * 517 * @returns mapping result as acl_perm_t, -1 on error 518 */ 519static acl_perm_t map_darwin_right_to_posix_permset(uint32_t darwin_ace_rights, int is_dir) 520{ 521 acl_perm_t perm = 0; 522 523 if (darwin_ace_rights & DARWIN_ACE_READ_DATA) 524 perm |= ACL_READ; 525 526 if (darwin_ace_rights & (DARWIN_ACE_WRITE_DATA | (DARWIN_ACE_DELETE_CHILD & is_dir))) 527 perm |= ACL_WRITE; 528 529 if (darwin_ace_rights & DARWIN_ACE_EXECUTE) 530 perm |= ACL_EXECUTE; 531 532 return perm; 533} 534 535/*! 536 * Add a ACL_USER or ACL_GROUP permission to an ACL, extending existing ACEs 537 * 538 * Add a permission of "type" for user or group "id" to an ACL. Scan the ACL 539 * for existing permissions for this type/id, if there is one add the perm, 540 * otherwise create a new ACL entry. 541 * perm can be or'ed ACL_READ, ACL_WRITE and ACL_EXECUTE. 542 * 543 * @param aclp (rw) pointer to ACL 544 * @param type (r) acl_tag_t of ACL_USER or ACL_GROUP 545 * @param id (r) uid_t uid for ACL_USER, or gid casted to uid_t for ACL_GROUP 546 * @param perm (r) acl_perm_t permissions to add 547 * 548 * @returns 0 on success, -1 on failure 549 */ 550static int posix_acl_add_perm(acl_t *aclp, acl_tag_t type, uid_t id, acl_perm_t perm) 551{ 552 EC_INIT; 553 uid_t *eid = NULL; 554 acl_entry_t e; 555 acl_tag_t tag; 556 int entry_id = ACL_FIRST_ENTRY; 557 acl_permset_t permset; 558 559 int found = 0; 560 for ( ; (! found) && acl_get_entry(*aclp, entry_id, &e) == 1; entry_id = ACL_NEXT_ENTRY) { 561 EC_ZERO_LOG(acl_get_tag_type(e, &tag)); 562 if (tag != ACL_USER && tag != ACL_GROUP) 563 continue; 564 EC_NULL_LOG(eid = (uid_t *)acl_get_qualifier(e)); 565 if ((*eid == id) && (type == tag)) { 566 /* found an ACE for this type/id */ 567 found = 1; 568 EC_ZERO_LOG(acl_get_permset(e, &permset)); 569 EC_ZERO_LOG(acl_add_perm(permset, perm)); 570 } 571 572 acl_free(eid); 573 eid = NULL; 574 } 575 576 if ( ! found) { 577 /* there was no existing ACE for this type/id */ 578 EC_ZERO_LOG(acl_create_entry(aclp, &e)); 579 EC_ZERO_LOG(acl_set_tag_type(e, type)); 580 EC_ZERO_LOG(acl_set_qualifier(e, &id)); 581 EC_ZERO_LOG(acl_get_permset(e, &permset)); 582 EC_ZERO_LOG(acl_clear_perms(permset)); 583 EC_ZERO_LOG(acl_add_perm(permset, perm)); 584 EC_ZERO_LOG(acl_set_permset(e, permset)); 585 } 586 587EC_CLEANUP: 588 if (eid) acl_free(eid); 589 590 EC_EXIT; 591} 592 593/*! 594 * Map Darwin ACL to POSIX ACL. 595 * 596 * aclp must point to a acl_init'ed acl_t or an acl_t that can eg contain default ACEs. 597 * Mapping pecularities: 598 * - we create a default ace (which inherits to files and dirs) if either 599 DARWIN_ACE_FLAGS_FILE_INHERIT or DARWIN_ACE_FLAGS_DIRECTORY_INHERIT is requested 600 * - we throw away DARWIN_ACE_FLAGS_LIMIT_INHERIT (can't be mapped), thus the ACL will 601 * not be limited 602 * 603 * @param darwin_aces (r) pointer to darwin_aces buffer 604 * @param def_aclp (rw) directories: pointer to an initialized acl_t with the default acl 605 * files: *def_aclp will be NULL 606 * @param acc_aclp (rw) pointer to an initialized acl_t with the access acl 607 * @param ace_count (r) number of ACEs in darwin_aces buffer 608 * 609 * @returns 0 on success storing the result in aclp, -1 on error. 610 */ 611static int map_aces_darwin_to_posix(const darwin_ace_t *darwin_aces, 612 acl_t *def_aclp, 613 acl_t *acc_aclp, 614 int ace_count) 615{ 616 EC_INIT; 617 char *name = NULL; 618 uuidtype_t uuidtype; 619 struct passwd *pwd; 620 struct group *grp; 621 uid_t id; 622 uint32_t darwin_ace_flags, darwin_ace_rights; 623 acl_tag_t tag; 624 acl_perm_t perm; 625 626 for ( ; ace_count != 0; ace_count--, darwin_aces++) { 627 /* type: allow/deny, posix only has allow */ 628 darwin_ace_flags = ntohl(darwin_aces->darwin_ace_flags); 629 if ( ! (darwin_ace_flags & DARWIN_ACE_FLAGS_PERMIT)) 630 continue; 631 632 darwin_ace_rights = ntohl(darwin_aces->darwin_ace_rights); 633 perm = map_darwin_right_to_posix_permset(darwin_ace_rights, (*def_aclp != NULL)); 634 if (perm == 0) 635 continue; /* dont add empty perm */ 636 637 LOG(log_debug, logtype_afpd, "map_ace: no: %u, flags: %08x, darwin: %08x, posix: %02x", 638 ace_count, darwin_ace_flags, darwin_ace_rights, perm); 639 640 /* uid/gid */ 641 EC_ZERO_LOG(getnamefromuuid(darwin_aces->darwin_ace_uuid, &name, &uuidtype)); 642 switch (uuidtype) { 643 case UUID_USER: 644 EC_NULL_LOG(pwd = getpwnam(name)); 645 tag = ACL_USER; 646 id = pwd->pw_uid; 647 LOG(log_debug, logtype_afpd, "map_ace: name: %s, uid: %u", name, id); 648 break; 649 case UUID_GROUP: 650 EC_NULL_LOG(grp = getgrnam(name)); 651 tag = ACL_GROUP; 652 id = (uid_t)(grp->gr_gid); 653 LOG(log_debug, logtype_afpd, "map_ace: name: %s, gid: %u", name, id); 654 break; 655 default: 656 continue; 657 } 658 free(name); 659 name = NULL; 660 661 if (darwin_ace_flags & DARWIN_ACE_INHERIT_CONTROL_FLAGS) { 662 if (*def_aclp == NULL) { 663 /* ace request inheritane but we haven't got a default acl pointer */ 664 LOG(log_warning, logtype_afpd, "map_acl: unexpected ACE, flags: 0x%04x", 665 darwin_ace_flags); 666 EC_FAIL; 667 } 668 /* add it as default ace */ 669 EC_ZERO_LOG(posix_acl_add_perm(def_aclp, tag, id, perm)); 670 671 672 if (! (darwin_ace_flags & DARWIN_ACE_FLAGS_ONLY_INHERIT)) 673 /* if it not a "inherit only" ace, it must be added as access aces too */ 674 EC_ZERO_LOG(posix_acl_add_perm(acc_aclp, tag, id, perm)); 675 } else { 676 EC_ZERO_LOG(posix_acl_add_perm(acc_aclp, tag, id, perm)); 677 } 678 } 679 680EC_CLEANUP: 681 if (name) 682 free(name); 683 684 EC_EXIT; 685} 686 687/* 688 * Map ACEs from POSIX to Darwin. 689 * type is either POSIX_DEFAULT_2_DARWIN or POSIX_ACCESS_2_DARWIN, cf. acl_get_file. 690 * Return number of mapped ACES, -1 on error. 691 */ 692static int map_acl_posix_to_darwin(int type, const acl_t acl, darwin_ace_t *darwin_aces) 693{ 694 EC_INIT; 695 int mapped_aces = 0; 696 int entry_id = ACL_FIRST_ENTRY; 697 acl_entry_t e; 698 acl_tag_t tag; 699 uid_t *uid = NULL; 700 gid_t *gid = NULL; 701 struct passwd *pwd = NULL; 702 struct group *grp = NULL; 703 uint32_t flags; 704 uint32_t rights, maskrights = 0; 705 darwin_ace_t *saved_darwin_aces = darwin_aces; 706 707 LOG(log_maxdebug, logtype_afpd, "map_aces_posix_to_darwin(%s)", 708 (type & MAP_MASK) == POSIX_DEFAULT_2_DARWIN ? 709 "POSIX_DEFAULT_2_DARWIN" : "POSIX_ACCESS_2_DARWIN"); 710 711 /* itereate through all ACEs */ 712 while (acl_get_entry(acl, entry_id, &e) == 1) { 713 entry_id = ACL_NEXT_ENTRY; 714 715 /* get ACE type */ 716 EC_ZERO_LOG(acl_get_tag_type(e, &tag)); 717 718 /* we return user and group ACE */ 719 switch (tag) { 720 case ACL_USER: 721 EC_NULL_LOG(uid = (uid_t *)acl_get_qualifier(e)); 722 EC_NULL_LOG(pwd = getpwuid(*uid)); 723 LOG(log_debug, logtype_afpd, "map_aces_posix_to_darwin: uid: %d -> name: %s", 724 *uid, pwd->pw_name); 725 EC_ZERO_LOG(getuuidfromname(pwd->pw_name, UUID_USER, darwin_aces->darwin_ace_uuid)); 726 acl_free(uid); 727 uid = NULL; 728 break; 729 730 case ACL_GROUP: 731 EC_NULL_LOG(gid = (gid_t *)acl_get_qualifier(e)); 732 EC_NULL_LOG(grp = getgrgid(*gid)); 733 LOG(log_debug, logtype_afpd, "map_aces_posix_to_darwin: gid: %d -> name: %s", 734 *gid, grp->gr_name); 735 EC_ZERO_LOG(getuuidfromname(grp->gr_name, UUID_GROUP, darwin_aces->darwin_ace_uuid)); 736 acl_free(gid); 737 gid = NULL; 738 break; 739 740 case ACL_MASK: 741 maskrights = posix_permset_to_darwin_rights(e, type & IS_DIR); 742 continue; 743 744 default: 745 continue; 746 } 747 748 /* flags */ 749 flags = DARWIN_ACE_FLAGS_PERMIT; 750 if ((type & MAP_MASK) == POSIX_DEFAULT_2_DARWIN) 751 flags |= DARWIN_ACE_FLAGS_FILE_INHERIT 752 | DARWIN_ACE_FLAGS_DIRECTORY_INHERIT 753 | DARWIN_ACE_FLAGS_ONLY_INHERIT; 754 darwin_aces->darwin_ace_flags = htonl(flags); 755 756 /* rights */ 757 rights = posix_permset_to_darwin_rights(e, type & IS_DIR); 758 darwin_aces->darwin_ace_rights = htonl(rights); 759 760 darwin_aces++; 761 mapped_aces++; 762 } /* while */ 763 764 /* Loop through the mapped ACE buffer once again, applying the mask */ 765 for (int i = mapped_aces; i > 0; i--) { 766 saved_darwin_aces->darwin_ace_rights &= htonl(maskrights); 767 saved_darwin_aces++; 768 } 769 770 EC_STATUS(mapped_aces); 771 772EC_CLEANUP: 773 if (uid) acl_free(uid); 774 if (gid) acl_free(gid); 775 EC_EXIT; 776} 777#endif 778 779/* 780 * Multiplex ACL mapping (SOLARIS_2_DARWIN, DARWIN_2_SOLARIS, POSIX_2_DARWIN, DARWIN_2_POSIX). 781 * Reads from 'aces' buffer, writes to 'rbuf' buffer. 782 * Caller must provide buffer. 783 * Darwin ACEs are read and written in network byte order. 784 * Needs to know how many ACEs are in the ACL (ace_count) for Solaris ACLs. 785 * Ignores trivial ACEs. 786 * Return no of mapped ACEs or -1 on error. 787 */ 788static int map_acl(int type, void *acl, darwin_ace_t *buf, int ace_count) 789{ 790 int mapped_aces; 791 792 LOG(log_debug9, logtype_afpd, "map_acl: BEGIN"); 793 794 switch (type & MAP_MASK) { 795 796#ifdef HAVE_SOLARIS_ACLS 797 case SOLARIS_2_DARWIN: 798 mapped_aces = map_aces_solaris_to_darwin( acl, buf, ace_count); 799 break; 800 801 case DARWIN_2_SOLARIS: 802 mapped_aces = map_aces_darwin_to_solaris( buf, acl, ace_count); 803 break; 804#endif /* HAVE_SOLARIS_ACLS */ 805 806#ifdef HAVE_POSIX_ACLS 807 case POSIX_DEFAULT_2_DARWIN: 808 mapped_aces = map_acl_posix_to_darwin(type, (const acl_t)acl, buf); 809 break; 810 811 case POSIX_ACCESS_2_DARWIN: 812 mapped_aces = map_acl_posix_to_darwin(type, (const acl_t)acl, buf); 813 break; 814 815 case DARWIN_2_POSIX_DEFAULT: 816 break; 817 818 case DARWIN_2_POSIX_ACCESS: 819 break; 820#endif /* HAVE_POSIX_ACLS */ 821 822 default: 823 mapped_aces = -1; 824 break; 825 } 826 827 LOG(log_debug9, logtype_afpd, "map_acl: END"); 828 return mapped_aces; 829} 830 831/* Get ACL from object omitting trivial ACEs. Map to Darwin ACL style and 832 store Darwin ACL at rbuf. Add length of ACL written to rbuf to *rbuflen. 833 Returns 0 on success, -1 on error. */ 834static int get_and_map_acl(char *name, char *rbuf, size_t *rbuflen) 835{ 836 EC_INIT; 837 int mapped_aces = 0; 838 int dirflag; 839 uint32_t *darwin_ace_count = (u_int32_t *)rbuf; 840#ifdef HAVE_SOLARIS_ACLS 841 int ace_count = 0; 842 ace_t *aces = NULL; 843#endif 844#ifdef HAVE_POSIX_ACLS 845 struct stat st; 846#endif 847 LOG(log_debug9, logtype_afpd, "get_and_map_acl: BEGIN"); 848 849 /* Skip length and flags */ 850 rbuf += 4; 851 *rbuf = 0; 852 rbuf += 4; 853 854#ifdef HAVE_SOLARIS_ACLS 855 EC_NEG1(ace_count = get_nfsv4_acl(name, &aces)); 856 EC_NEG1(mapped_aces = map_acl(SOLARIS_2_DARWIN, aces, (darwin_ace_t *)rbuf, ace_count)); 857#endif /* HAVE_SOLARIS_ACLS */ 858 859#ifdef HAVE_POSIX_ACLS 860 acl_t defacl = NULL , accacl = NULL; 861 862 /* stat to check if its a dir */ 863 EC_ZERO_LOG(lstat(name, &st)); 864 865 /* if its a dir, check for default acl too */ 866 dirflag = 0; 867 if (S_ISDIR(st.st_mode)) { 868 dirflag = IS_DIR; 869 EC_NULL_LOG(defacl = acl_get_file(name, ACL_TYPE_DEFAULT)); 870 EC_NEG1(mapped_aces = map_acl(POSIX_DEFAULT_2_DARWIN | dirflag, 871 defacl, 872 (darwin_ace_t *)rbuf, 873 0)); 874 } 875 876 EC_NULL_LOG(accacl = acl_get_file(name, ACL_TYPE_ACCESS)); 877 878 int tmp; 879 EC_NEG1(tmp = map_acl(POSIX_ACCESS_2_DARWIN | dirflag, 880 accacl, 881 (darwin_ace_t *)(rbuf + mapped_aces * sizeof(darwin_ace_t)), 882 0)); 883 mapped_aces += tmp; 884#endif /* HAVE_POSIX_ACLS */ 885 886 LOG(log_debug, logtype_afpd, "get_and_map_acl: mapped %d ACEs", mapped_aces); 887 888 *darwin_ace_count = htonl(mapped_aces); 889 *rbuflen += sizeof(darwin_acl_header_t) + (mapped_aces * sizeof(darwin_ace_t)); 890 891 EC_STATUS(0); 892 893EC_CLEANUP: 894#ifdef HAVE_SOLARIS_ACLS 895 if (aces) free(aces); 896#endif 897#ifdef HAVE_POSIX_ACLS 898 if (defacl) acl_free(defacl); 899 if (accacl) acl_free(accacl); 900#endif /* HAVE_POSIX_ACLS */ 901 902 LOG(log_debug9, logtype_afpd, "get_and_map_acl: END"); 903 904 EC_EXIT; 905} 906 907/* Removes all non-trivial ACLs from object. Returns full AFPERR code. */ 908static int remove_acl(const struct vol *vol,const char *path, int dir) 909{ 910 int ret = AFP_OK; 911 912#if (defined HAVE_SOLARIS_ACLS || defined HAVE_POSIX_ACLS) 913 /* Ressource etc. first */ 914 if ((ret = vol->vfs->vfs_remove_acl(vol, path, dir)) != AFP_OK) 915 return ret; 916 /* now the data fork or dir */ 917 ret = remove_acl_vfs(path); 918#endif 919 return ret; 920} 921 922/* 923 Set ACL. Subtleties: 924 - the client sends a complete list of ACEs, not only new ones. So we dont need to do 925 any combination business (one exception being 'kFileSec_Inherit': see next) 926 - client might request that we add inherited ACEs via 'kFileSec_Inherit'. 927 We will store inherited ACEs first, which is Darwins canonical order. 928 - returns AFPerror code 929*/ 930#ifdef HAVE_SOLARIS_ACLS 931static int set_acl(const struct vol *vol, 932 char *name, 933 int inherit, 934 darwin_ace_t *daces, 935 uint32_t ace_count) 936{ 937 EC_INIT; 938 int i, nfsv4_ace_count; 939 int tocopy_aces_count = 0, new_aces_count = 0, trivial_ace_count = 0; 940 ace_t *old_aces, *new_aces = NULL; 941 uint16_t flags; 942 943 LOG(log_debug9, logtype_afpd, "set_acl: BEGIN"); 944 945 if (inherit) 946 /* inherited + trivial ACEs */ 947 flags = ACE_INHERITED_ACE | ACE_OWNER | ACE_GROUP | ACE_EVERYONE; 948 else 949 /* only trivial ACEs */ 950 flags = ACE_OWNER | ACE_GROUP | ACE_EVERYONE; 951 952 /* Get existing ACL and count ACEs which have to be copied */ 953 if ((nfsv4_ace_count = get_nfsv4_acl(name, &old_aces)) == -1) 954 return AFPERR_MISC; 955 for ( i=0; i < nfsv4_ace_count; i++) { 956 if (old_aces[i].a_flags & flags) 957 tocopy_aces_count++; 958 } 959 960 /* Now malloc buffer exactly sized to fit all new ACEs */ 961 if ((new_aces = malloc((ace_count + tocopy_aces_count) * sizeof(ace_t))) == NULL) { 962 LOG(log_error, logtype_afpd, "set_acl: malloc %s", strerror(errno)); 963 EC_STATUS(AFPERR_MISC); 964 goto EC_CLEANUP; 965 } 966 967 /* Start building new ACL */ 968 969 /* Copy local inherited ACEs. Therefore we have 'Darwin canonical order' (see chmod there): 970 inherited ACEs first. */ 971 if (inherit) { 972 for (i=0; i < nfsv4_ace_count; i++) { 973 if (old_aces[i].a_flags & ACE_INHERITED_ACE) { 974 memcpy(&new_aces[new_aces_count], &old_aces[i], sizeof(ace_t)); 975 new_aces_count++; 976 } 977 } 978 } 979 LOG(log_debug7, logtype_afpd, "set_acl: copied %d inherited ACEs", new_aces_count); 980 981 /* Now the ACEs from the client */ 982 if ((ret = (map_acl(DARWIN_2_SOLARIS, 983 &new_aces[new_aces_count], 984 daces, 985 ace_count))) == -1) { 986 EC_STATUS(AFPERR_PARAM); 987 goto EC_CLEANUP; 988 } 989 new_aces_count += ret; 990 LOG(log_debug7, logtype_afpd, "set_acl: mapped %d ACEs from client", ret); 991 992 /* Now copy the trivial ACEs */ 993 for (i=0; i < nfsv4_ace_count; i++) { 994 if (old_aces[i].a_flags & (ACE_OWNER | ACE_GROUP | ACE_EVERYONE)) { 995 memcpy(&new_aces[new_aces_count], &old_aces[i], sizeof(ace_t)); 996 new_aces_count++; 997 trivial_ace_count++; 998 } 999 } 1000 LOG(log_debug7, logtype_afpd, "set_acl: copied %d trivial ACEs", trivial_ace_count); 1001 1002 /* Ressourcefork first. 1003 Note: for dirs we set the same ACL on the .AppleDouble/.Parent _file_. This 1004 might be strange for ACE_DELETE_CHILD and for inheritance flags. */ 1005 if ((ret = (vol->vfs->vfs_acl(vol, name, ACE_SETACL, new_aces_count, new_aces))) != 0) { 1006 LOG(log_error, logtype_afpd, "set_acl: error setting acl: %s", strerror(errno)); 1007 if (errno == (EACCES | EPERM)) 1008 EC_STATUS(AFPERR_ACCESS); 1009 else if (errno == ENOENT) 1010 EC_STATUS(AFPERR_NOITEM); 1011 else 1012 EC_STATUS(AFPERR_MISC); 1013 goto EC_CLEANUP; 1014 } 1015 if ((ret = (acl(name, ACE_SETACL, new_aces_count, new_aces))) != 0) { 1016 LOG(log_error, logtype_afpd, "set_acl: error setting acl: %s", strerror(errno)); 1017 if (errno == (EACCES | EPERM)) 1018 EC_STATUS(AFPERR_ACCESS); 1019 else if (errno == ENOENT) 1020 EC_STATUS(AFPERR_NOITEM); 1021 else 1022 EC_STATUS(AFPERR_MISC); 1023 goto EC_CLEANUP; 1024 } 1025 1026 EC_STATUS(AFP_OK); 1027 1028EC_CLEANUP: 1029 if (old_aces) free(old_aces); 1030 if (new_aces) free(new_aces); 1031 1032 LOG(log_debug9, logtype_afpd, "set_acl: END"); 1033 EC_EXIT; 1034} 1035#endif /* HAVE_SOLARIS_ACLS */ 1036 1037#ifdef HAVE_POSIX_ACLS 1038static int set_acl(const struct vol *vol, 1039 const char *name, 1040 int inherit _U_, 1041 darwin_ace_t *daces, 1042 uint32_t ace_count) 1043{ 1044 EC_INIT; 1045 acl_t def_acl = NULL; 1046 acl_t acc_acl = NULL; 1047 1048 LOG(log_maxdebug, logtype_afpd, "set_acl: BEGIN"); 1049 1050 struct stat st; 1051 EC_ZERO_LOG_ERR(lstat(name, &st), AFPERR_NOOBJ); 1052 1053 /* seed default ACL with access ACL */ 1054 if (S_ISDIR(st.st_mode)) 1055 EC_NULL_LOG_ERR(def_acl = acl_get_file(name, ACL_TYPE_ACCESS), AFPERR_MISC); 1056 1057 /* for files def_acl will be NULL */ 1058 1059 /* create access acl from mode */ 1060#ifdef HAVE_ACL_FROM_MODE 1061 EC_NULL_LOG_ERR(acc_acl = acl_from_mode(st.st_mode), AFPERR_MISC); 1062#else 1063#error "Missing acl_from_mode() replacement" 1064#endif 1065 /* adds the clients aces */ 1066 EC_ZERO_ERR(map_aces_darwin_to_posix(daces, &def_acl, &acc_acl, ace_count), AFPERR_MISC); 1067 1068 /* calcuate ACL mask */ 1069 EC_ZERO_LOG_ERR(acl_calc_mask(&acc_acl), AFPERR_MISC); 1070 1071 /* is it ok? */ 1072 EC_ZERO_LOG_ERR(acl_valid(acc_acl), AFPERR_MISC); 1073 1074 /* set it */ 1075 EC_ZERO_LOG_ERR(acl_set_file(name, ACL_TYPE_ACCESS, acc_acl), AFPERR_MISC); 1076 EC_ZERO_LOG_ERR(vol->vfs->vfs_acl(vol, name, ACL_TYPE_ACCESS, 0, acc_acl), AFPERR_MISC); 1077 1078 if (def_acl) { 1079 EC_ZERO_LOG_ERR(acl_set_file(name, ACL_TYPE_DEFAULT, def_acl), AFPERR_MISC); 1080 EC_ZERO_LOG_ERR(vol->vfs->vfs_acl(vol, name, ACL_TYPE_DEFAULT, 0, def_acl), AFPERR_MISC); 1081 } 1082 1083EC_CLEANUP: 1084 acl_free(acc_acl); 1085 acl_free(def_acl); 1086 1087 LOG(log_maxdebug, logtype_afpd, "set_acl: END"); 1088 EC_EXIT; 1089} 1090#endif /* HAVE_POSIX_ACLS */ 1091 1092/*! 1093 * Checks if a given UUID has requested_rights(type darwin_ace_rights) for path. 1094 * 1095 * Note: this gets called frequently and is a good place for optimizations ! 1096 * 1097 * @param vol (r) volume 1098 * @param dir (rw) directory 1099 * @param path (r) path to filesystem object 1100 * @param uuid (r) UUID of user 1101 * @param requested_rights (r) requested Darwin ACE 1102 * 1103 * @returns AFP result code 1104*/ 1105static int check_acl_access(const struct vol *vol, 1106 struct dir *dir, 1107 const char *path, 1108 const uuidp_t uuid, 1109 uint32_t requested_rights) 1110{ 1111 int ret; 1112 uint32_t allowed_rights = 0; 1113 char *username = NULL; 1114 uuidtype_t uuidtype; 1115 struct stat st; 1116 bstring parent = NULL; 1117 1118 LOG(log_maxdebug, logtype_afpd, "check_access: Request: 0x%08x", requested_rights); 1119 1120 /* Get uid or gid from UUID */ 1121 EC_ZERO_LOG_ERR(getnamefromuuid(uuid, &username, &uuidtype), AFPERR_PARAM); 1122 EC_ZERO_LOG_ERR(lstat(path, &st), AFPERR_PARAM); 1123 1124 switch (uuidtype) { 1125 case UUID_USER: 1126 break; 1127 case UUID_GROUP: 1128 LOG(log_warning, logtype_afpd, "check_access: afp_access not supported for groups"); 1129 EC_STATUS(AFPERR_MISC); 1130 goto EC_CLEANUP; 1131 default: 1132 EC_STATUS(AFPERR_MISC); 1133 goto EC_CLEANUP; 1134 } 1135 1136 if ((strcmp(path, ".") == 0) && (dir->d_rights_cache != 0xffffffff)) { 1137 /* its a dir and the cache value is valid */ 1138 allowed_rights = dir->d_rights_cache; 1139 LOG(log_debug, logtype_afpd, "allowed rights from dircache: 0x%08x", allowed_rights); 1140 } else { 1141#ifdef HAVE_SOLARIS_ACLS 1142 EC_ZERO_LOG(solaris_acl_rights(path, &st, &allowed_rights)); 1143#endif 1144#ifdef HAVE_POSIX_ACLS 1145 EC_ZERO_LOG(posix_acl_rights(path, &st, &allowed_rights)); 1146#endif 1147 /* 1148 * The DARWIN_ACE_DELETE right might implicitly result from write acces to the parent 1149 * directory. As it seems the 10.6 AFP client is puzzled when this right is not 1150 * allowed where a delete would succeed because the parent dir gives write perms. 1151 * So we check the parent dir for write access and set the right accordingly. 1152 * Currentyl acl2ownermode calls us with dir = NULL, because it doesn't make sense 1153 * there to do this extra check -- afaict. 1154 */ 1155 if (vol && dir && (requested_rights & DARWIN_ACE_DELETE)) { 1156 int i; 1157 uint32_t parent_rights = 0; 1158 1159 if (dir->d_did == DIRDID_ROOT_PARENT) { 1160 /* use volume path */ 1161 EC_NULL_LOG_ERR(parent = bfromcstr(vol->v_path), AFPERR_MISC); 1162 } else { 1163 /* build path for parent */ 1164 EC_NULL_LOG_ERR(parent = bstrcpy(dir->d_fullpath), AFPERR_MISC); 1165 EC_ZERO_LOG_ERR(bconchar(parent, '/'), AFPERR_MISC); 1166 EC_ZERO_LOG_ERR(bcatcstr(parent, path), AFPERR_MISC); 1167 EC_NEG1_LOG_ERR(i = bstrrchr(parent, '/'), AFPERR_MISC); 1168 EC_ZERO_LOG_ERR(binsertch(parent, i, 1, 0), AFPERR_MISC); 1169 } 1170 1171 LOG(log_debug, logtype_afpd,"parent: %s", cfrombstr(parent)); 1172 EC_ZERO_LOG_ERR(lstat(cfrombstr(parent), &st), AFPERR_MISC); 1173 1174#ifdef HAVE_SOLARIS_ACLS 1175 EC_ZERO_LOG(solaris_acl_rights(cfrombstr(parent), &st, &parent_rights)); 1176#endif 1177#ifdef HAVE_POSIX_ACLS 1178 EC_ZERO_LOG(posix_acl_rights(path, &st, &allowed_rights)); 1179#endif 1180 if (parent_rights & (DARWIN_ACE_WRITE_DATA | DARWIN_ACE_DELETE_CHILD)) 1181 allowed_rights |= DARWIN_ACE_DELETE; /* man, that was a lot of work! */ 1182 } 1183 LOG(log_debug, logtype_afpd, "allowed rights: 0x%08x", allowed_rights); 1184 dir->d_rights_cache = allowed_rights; 1185 } 1186 1187 if ((requested_rights & allowed_rights) != requested_rights) { 1188 LOG(log_debug, logtype_afpd, "some requested right wasn't allowed: 0x%08x / 0x%08x", 1189 requested_rights, allowed_rights); 1190 EC_STATUS(AFPERR_ACCESS); 1191 } else { 1192 LOG(log_debug, logtype_afpd, "all requested rights are allowed: 0x%08x", 1193 requested_rights); 1194 EC_STATUS(AFP_OK); 1195 } 1196 1197EC_CLEANUP: 1198 if (username) free(username); 1199 if (parent) bdestroy(parent); 1200 1201 EC_EXIT; 1202} 1203 1204/******************************************************** 1205 * Interface 1206 ********************************************************/ 1207 1208int afp_access(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen) 1209{ 1210 int ret; 1211 struct vol *vol; 1212 struct dir *dir; 1213 uint32_t did, darwin_ace_rights; 1214 uint16_t vid; 1215 struct path *s_path; 1216 uuidp_t uuid; 1217 1218 *rbuflen = 0; 1219 ibuf += 2; 1220 1221 memcpy(&vid, ibuf, sizeof( vid )); 1222 ibuf += sizeof(vid); 1223 if (NULL == ( vol = getvolbyvid( vid ))) { 1224 LOG(log_error, logtype_afpd, "afp_access: error getting volid:%d", vid); 1225 return AFPERR_NOOBJ; 1226 } 1227 1228 memcpy(&did, ibuf, sizeof( did )); 1229 ibuf += sizeof( did ); 1230 if (NULL == ( dir = dirlookup( vol, did ))) { 1231 LOG(log_error, logtype_afpd, "afp_access: error getting did:%d", did); 1232 return afp_errno; 1233 } 1234 1235 /* Skip bitmap */ 1236 ibuf += 2; 1237 1238 /* Store UUID address */ 1239 uuid = (uuidp_t)ibuf; 1240 ibuf += UUID_BINSIZE; 1241 1242 /* Store ACE rights */ 1243 memcpy(&darwin_ace_rights, ibuf, 4); 1244 darwin_ace_rights = ntohl(darwin_ace_rights); 1245 ibuf += 4; 1246 1247 /* get full path and handle file/dir subtleties in netatalk code*/ 1248 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) { 1249 LOG(log_error, logtype_afpd, "afp_getacl: cname got an error!"); 1250 return AFPERR_NOOBJ; 1251 } 1252 if (!s_path->st_valid) 1253 of_statdir(vol, s_path); 1254 if ( s_path->st_errno != 0 ) { 1255 LOG(log_error, logtype_afpd, "afp_getacl: cant stat"); 1256 return AFPERR_NOOBJ; 1257 } 1258 1259 ret = check_acl_access(vol, dir, s_path->u_name, uuid, darwin_ace_rights); 1260 1261 return ret; 1262} 1263 1264int afp_getacl(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen) 1265{ 1266 struct vol *vol; 1267 struct dir *dir; 1268 int ret; 1269 uint32_t did; 1270 uint16_t vid, bitmap; 1271 struct path *s_path; 1272 struct passwd *pw; 1273 struct group *gr; 1274 1275 LOG(log_debug9, logtype_afpd, "afp_getacl: BEGIN"); 1276 *rbuflen = 0; 1277 ibuf += 2; 1278 1279 memcpy(&vid, ibuf, sizeof( vid )); 1280 ibuf += sizeof(vid); 1281 if (NULL == ( vol = getvolbyvid( vid ))) { 1282 LOG(log_error, logtype_afpd, "afp_getacl: error getting volid:%d", vid); 1283 return AFPERR_NOOBJ; 1284 } 1285 1286 memcpy(&did, ibuf, sizeof( did )); 1287 ibuf += sizeof( did ); 1288 if (NULL == ( dir = dirlookup( vol, did ))) { 1289 LOG(log_error, logtype_afpd, "afp_getacl: error getting did:%d", did); 1290 return afp_errno; 1291 } 1292 1293 memcpy(&bitmap, ibuf, sizeof( bitmap )); 1294 memcpy(rbuf, ibuf, sizeof( bitmap )); 1295 bitmap = ntohs( bitmap ); 1296 ibuf += sizeof( bitmap ); 1297 rbuf += sizeof( bitmap ); 1298 *rbuflen += sizeof( bitmap ); 1299 1300 /* skip maxreplysize */ 1301 ibuf += 4; 1302 1303 /* get full path and handle file/dir subtleties in netatalk code*/ 1304 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) { 1305 LOG(log_error, logtype_afpd, "afp_getacl: cname got an error!"); 1306 return AFPERR_NOOBJ; 1307 } 1308 if (!s_path->st_valid) 1309 of_statdir(vol, s_path); 1310 if ( s_path->st_errno != 0 ) { 1311 LOG(log_error, logtype_afpd, "afp_getacl: cant stat"); 1312 return AFPERR_NOOBJ; 1313 } 1314 1315 /* Shall we return owner UUID ? */ 1316 if (bitmap & kFileSec_UUID) { 1317 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files owner user UUID"); 1318 if (NULL == (pw = getpwuid(s_path->st.st_uid))) { 1319 LOG(log_debug, logtype_afpd, "afp_getacl: local uid: %u", s_path->st.st_uid); 1320 localuuid_from_id(rbuf, UUID_USER, s_path->st.st_uid); 1321 } else { 1322 LOG(log_debug, logtype_afpd, "afp_getacl: got uid: %d, name: %s", s_path->st.st_uid, pw->pw_name); 1323 if ((ret = getuuidfromname(pw->pw_name, UUID_USER, rbuf)) != 0) 1324 return AFPERR_MISC; 1325 } 1326 rbuf += UUID_BINSIZE; 1327 *rbuflen += UUID_BINSIZE; 1328 } 1329 1330 /* Shall we return group UUID ? */ 1331 if (bitmap & kFileSec_GRPUUID) { 1332 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files owner group UUID"); 1333 if (NULL == (gr = getgrgid(s_path->st.st_gid))) { 1334 LOG(log_debug, logtype_afpd, "afp_getacl: local gid: %u", s_path->st.st_gid); 1335 localuuid_from_id(rbuf, UUID_GROUP, s_path->st.st_gid); 1336 } else { 1337 LOG(log_debug, logtype_afpd, "afp_getacl: got gid: %d, name: %s", s_path->st.st_gid, gr->gr_name); 1338 if ((ret = getuuidfromname(gr->gr_name, UUID_GROUP, rbuf)) != 0) 1339 return AFPERR_MISC; 1340 } 1341 rbuf += UUID_BINSIZE; 1342 *rbuflen += UUID_BINSIZE; 1343 } 1344 1345 /* Shall we return ACL ? */ 1346 if (bitmap & kFileSec_ACL) { 1347 LOG(log_debug, logtype_afpd, "afp_getacl: client requested files ACL"); 1348 if (get_and_map_acl(s_path->u_name, rbuf, rbuflen) != 0) { 1349 LOG(log_error, logtype_afpd, "afp_getacl(\"%s/%s\"): mapping error", 1350 getcwdpath(), s_path->u_name); 1351 return AFPERR_MISC; 1352 } 1353 } 1354 1355 LOG(log_debug9, logtype_afpd, "afp_getacl: END"); 1356 return AFP_OK; 1357} 1358 1359int afp_setacl(AFPObj *obj, char *ibuf, size_t ibuflen _U_, char *rbuf _U_, size_t *rbuflen) 1360{ 1361 struct vol *vol; 1362 struct dir *dir; 1363 int ret; 1364 uint32_t did; 1365 uint16_t vid, bitmap; 1366 struct path *s_path; 1367 1368 LOG(log_debug9, logtype_afpd, "afp_setacl: BEGIN"); 1369 *rbuflen = 0; 1370 ibuf += 2; 1371 1372 memcpy(&vid, ibuf, sizeof( vid )); 1373 ibuf += sizeof(vid); 1374 if (NULL == ( vol = getvolbyvid( vid ))) { 1375 LOG(log_error, logtype_afpd, "afp_setacl: error getting volid:%d", vid); 1376 return AFPERR_NOOBJ; 1377 } 1378 1379 memcpy(&did, ibuf, sizeof( did )); 1380 ibuf += sizeof( did ); 1381 if (NULL == ( dir = dirlookup( vol, did ))) { 1382 LOG(log_error, logtype_afpd, "afp_setacl: error getting did:%d", did); 1383 return afp_errno; 1384 } 1385 1386 memcpy(&bitmap, ibuf, sizeof( bitmap )); 1387 bitmap = ntohs( bitmap ); 1388 ibuf += sizeof( bitmap ); 1389 1390 /* get full path and handle file/dir subtleties in netatalk code*/ 1391 if (NULL == ( s_path = cname( vol, dir, &ibuf ))) { 1392 LOG(log_error, logtype_afpd, "afp_setacl: cname got an error!"); 1393 return AFPERR_NOOBJ; 1394 } 1395 if (!s_path->st_valid) 1396 of_statdir(vol, s_path); 1397 if ( s_path->st_errno != 0 ) { 1398 LOG(log_error, logtype_afpd, "afp_setacl: cant stat"); 1399 return AFPERR_NOOBJ; 1400 } 1401 LOG(log_debug, logtype_afpd, "afp_setacl: unixname: %s", s_path->u_name); 1402 1403 /* Padding? */ 1404 if ((unsigned long)ibuf & 1) 1405 ibuf++; 1406 1407 /* Start processing request */ 1408 1409 /* Change owner: dont even try */ 1410 if (bitmap & kFileSec_UUID) { 1411 LOG(log_note, logtype_afpd, "afp_setacl: change owner request, discarded"); 1412 ret = AFPERR_ACCESS; 1413 ibuf += UUID_BINSIZE; 1414 } 1415 1416 /* Change group: certain changes might be allowed, so try it. FIXME: not implemented yet. */ 1417 if (bitmap & kFileSec_UUID) { 1418 LOG(log_note, logtype_afpd, "afp_setacl: change group request, not supported"); 1419 ret = AFPERR_PARAM; 1420 ibuf += UUID_BINSIZE; 1421 } 1422 1423 /* Remove ACL ? */ 1424 if (bitmap & kFileSec_REMOVEACL) { 1425 LOG(log_debug, logtype_afpd, "afp_setacl: Remove ACL request."); 1426 if ((ret = remove_acl(vol, s_path->u_name, S_ISDIR(s_path->st.st_mode))) != AFP_OK) 1427 LOG(log_error, logtype_afpd, "afp_setacl: error from remove_acl"); 1428 } 1429 1430 /* Change ACL ? */ 1431 if (bitmap & kFileSec_ACL) { 1432 LOG(log_debug, logtype_afpd, "afp_setacl: Change ACL request."); 1433 /* Get no of ACEs the client put on the wire */ 1434 uint32_t ace_count; 1435 memcpy(&ace_count, ibuf, sizeof(uint32_t)); 1436 ace_count = htonl(ace_count); 1437 ibuf += 8; /* skip ACL flags (see acls.h) */ 1438 1439 ret = set_acl(vol, 1440 s_path->u_name, 1441 (bitmap & kFileSec_Inherit), 1442 (darwin_ace_t *)ibuf, 1443 ace_count); 1444 if (ret == 0) 1445 ret = AFP_OK; 1446 else { 1447 LOG(log_warning, logtype_afpd, "afp_setacl(\"%s/%s\"): error", 1448 getcwdpath(), s_path->u_name); 1449 ret = AFPERR_MISC; 1450 } 1451 } 1452 1453 LOG(log_debug9, logtype_afpd, "afp_setacl: END"); 1454 return ret; 1455} 1456 1457/******************************************************************** 1458 * ACL funcs interfacing with other parts 1459 ********************************************************************/ 1460 1461/*! 1462 * map ACL to user maccess 1463 * 1464 * This is the magic function that makes ACLs usable by calculating 1465 * the access granted by ACEs to the logged in user. 1466 */ 1467int acltoownermode(char *path, struct stat *st, struct maccess *ma) 1468{ 1469 EC_INIT; 1470 uint32_t rights = 0; 1471 1472 if ( ! (AFPobj->options.flags & OPTION_ACL2MACCESS) 1473 || (current_vol == NULL) 1474 || ! (current_vol->v_flags & AFPVOL_ACLS)) 1475 return 0; 1476 1477 LOG(log_maxdebug, logtype_afpd, "acltoownermode(\"%s/%s\", 0x%02x)", 1478 getcwdpath(), path, ma->ma_user); 1479 1480#ifdef HAVE_SOLARIS_ACLS 1481 EC_ZERO_LOG(solaris_acl_rights(path, st, &rights)); 1482#endif 1483#ifdef HAVE_POSIX_ACLS 1484 EC_ZERO_LOG(posix_acl_rights(path, st, &rights)); 1485#endif 1486 1487 LOG(log_maxdebug, logtype_afpd, "rights: 0x%08x", rights); 1488 1489 if (rights & DARWIN_ACE_READ_DATA) 1490 ma->ma_user |= AR_UREAD; 1491 if (rights & DARWIN_ACE_WRITE_DATA) 1492 ma->ma_user |= AR_UWRITE; 1493 if (rights & (DARWIN_ACE_EXECUTE | DARWIN_ACE_SEARCH)) 1494 ma->ma_user |= AR_USEARCH; 1495 1496 LOG(log_maxdebug, logtype_afpd, "resulting user maccess: 0x%02x", ma->ma_user); 1497 1498EC_CLEANUP: 1499 EC_EXIT; 1500} 1501 1502/*! 1503 * Check whether a volume supports ACLs 1504 * 1505 * @param vol (r) volume 1506 * 1507 * @returns 0 if not, 1 if yes 1508 */ 1509int check_vol_acl_support(const struct vol *vol) 1510{ 1511 int ret = 1; 1512 1513#ifdef HAVE_SOLARIS_ACLS 1514 ace_t *aces = NULL; 1515 if (get_nfsv4_acl(vol->v_path, &aces) == -1) 1516 ret = 0; 1517#endif 1518#ifdef HAVE_POSIX_ACLS 1519 acl_t acl = NULL; 1520 if ((acl = acl_get_file(vol->v_path, ACL_TYPE_ACCESS)) == NULL) 1521 ret = 0; 1522#endif 1523 1524#ifdef HAVE_SOLARIS_ACLS 1525 if (aces) free(aces); 1526#endif 1527#ifdef HAVE_POSIX_ACLS 1528 if (acl) acl_free(acl); 1529#endif /* HAVE_POSIX_ACLS */ 1530 1531 LOG(log_debug, logtype_afpd, "Volume \"%s\" ACL support: %s", 1532 vol->v_path, ret ? "yes" : "no"); 1533 return ret; 1534} 1535