source4/ntvfs/posix/pvfs_acl.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    POSIX NTVFS backend - ACL support
   5
   6    Copyright (C) Andrew Tridgell 2004
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23 #include "auth/auth.h"
  24 #include "vfs_posix.h"
  25 #include "librpc/gen_ndr/xattr.h"
  26 #include "libcli/security/security.h"
  27 #include "param/param.h"
  28
  29
  30 /* the list of currently registered ACL backends */
  31 static struct pvfs_acl_backend {
  32         const struct pvfs_acl_ops *ops;
  33 } *backends = NULL;
  34 static int num_backends;
  35
  36 /*
  37   register a pvfs acl backend.
  38
  39   The 'name' can be later used by other backends to find the operations
  40   structure for this backend.
  41 */
  42 NTSTATUS pvfs_acl_register(const struct pvfs_acl_ops *ops)
  43 {
  44         struct pvfs_acl_ops *new_ops;
  45
  46         if (pvfs_acl_backend_byname(ops->name) != NULL) {
  47                 DEBUG(0,("pvfs acl backend '%s' already registered\n", ops->name));
  48                 return NT_STATUS_OBJECT_NAME_COLLISION;
  49         }
  50
  51         backends = talloc_realloc(talloc_autofree_context(), backends, struct pvfs_acl_backend, num_backends+1);
  52         NT_STATUS_HAVE_NO_MEMORY(backends);
  53
  54         new_ops = talloc_memdup(backends, ops, sizeof(*ops));
  55         new_ops->name = talloc_strdup(new_ops, ops->name);
  56
  57         backends[num_backends].ops = new_ops;
  58
  59         num_backends++;
  60
  61         DEBUG(3,("NTVFS backend '%s' registered\n", ops->name));
  62
  63         return NT_STATUS_OK;
  64 }
  65
  66
  67 /*
  68   return the operations structure for a named backend
  69 */
  70 const struct pvfs_acl_ops *pvfs_acl_backend_byname(const char *name)
  71 {
  72         int i;
  73
  74         for (i=0;i<num_backends;i++) {
  75                 if (strcmp(backends[i].ops->name, name) == 0) {
  76                         return backends[i].ops;
  77                 }
  78         }
  79
  80         return NULL;
  81 }
  82
  83 NTSTATUS pvfs_acl_init(struct loadparm_context *lp_ctx)
  84 {
  85         static bool initialized = false;
  86         extern NTSTATUS pvfs_acl_nfs4_init(void);
  87         extern NTSTATUS pvfs_acl_xattr_init(void);
  88         init_module_fn static_init[] = { STATIC_pvfs_acl_MODULES };
  89         init_module_fn *shared_init;
  90
  91         if (initialized) return NT_STATUS_OK;
  92         initialized = true;
  93
  94         shared_init = load_samba_modules(NULL, lp_ctx, "pvfs_acl");
  95
  96         run_init_functions(static_init);
  97         run_init_functions(shared_init);
  98
  99         talloc_free(shared_init);
 100
 101         return NT_STATUS_OK;
 102 }
 103
 104
 105 /*
 106   map a single access_mask from generic to specific bits for files/dirs
 107 */
 108 static uint32_t pvfs_translate_mask(uint32_t access_mask)
 109 {
 110         if (access_mask & SEC_MASK_GENERIC) {
 111                 if (access_mask & SEC_GENERIC_READ)    access_mask |= SEC_RIGHTS_FILE_READ;
 112                 if (access_mask & SEC_GENERIC_WRITE)   access_mask |= SEC_RIGHTS_FILE_WRITE;
 113                 if (access_mask & SEC_GENERIC_EXECUTE) access_mask |= SEC_RIGHTS_FILE_EXECUTE;
 114                 if (access_mask & SEC_GENERIC_ALL)     access_mask |= SEC_RIGHTS_FILE_ALL;
 115                 access_mask &= ~SEC_MASK_GENERIC;
 116         }
 117         return access_mask;
 118 }
 119
 120
 121 /*
 122   map any generic access bits in the given acl
 123   this relies on the fact that the mappings for files and directories
 124   are the same
 125 */
 126 static void pvfs_translate_generic_bits(struct security_acl *acl)
 127 {
 128         unsigned i;
 129
 130         if (!acl) return;
 131
 132         for (i=0;i<acl->num_aces;i++) {
 133                 struct security_ace *ace = &acl->aces[i];
 134                 ace->access_mask = pvfs_translate_mask(ace->access_mask);
 135         }
 136 }
 137
 138
 139 /*
 140   setup a default ACL for a file
 141 */
 142 static NTSTATUS pvfs_default_acl(struct pvfs_state *pvfs,
 143                                  struct ntvfs_request *req,
 144                                  struct pvfs_filename *name, int fd,
 145                                  struct security_descriptor **psd)
 146 {
 147         struct security_descriptor *sd;
 148         NTSTATUS status;
 149         struct security_ace ace;
 150         mode_t mode;
 151         struct id_mapping *ids;
 152         struct composite_context *ctx;
 153
 154         *psd = security_descriptor_initialise(req);
 155         if (*psd == NULL) {
 156                 return NT_STATUS_NO_MEMORY;
 157         }
 158         sd = *psd;
 159
 160         ids = talloc_zero_array(sd, struct id_mapping, 2);
 161         NT_STATUS_HAVE_NO_MEMORY(ids);
 162
 163         ids[0].unixid = talloc(ids, struct unixid);
 164         NT_STATUS_HAVE_NO_MEMORY(ids[0].unixid);
 165
 166         ids[0].unixid->id = name->st.st_uid;
 167         ids[0].unixid->type = ID_TYPE_UID;
 168         ids[0].sid = NULL;
 169
 170         ids[1].unixid = talloc(ids, struct unixid);
 171         NT_STATUS_HAVE_NO_MEMORY(ids[1].unixid);
 172
 173         ids[1].unixid->id = name->st.st_gid;
 174         ids[1].unixid->type = ID_TYPE_GID;
 175         ids[1].sid = NULL;
 176
 177         ctx = wbc_xids_to_sids_send(pvfs->wbc_ctx, ids, 2, ids);
 178         NT_STATUS_HAVE_NO_MEMORY(ctx);
 179
 180         status = wbc_xids_to_sids_recv(ctx, &ids);
 181         NT_STATUS_NOT_OK_RETURN(status);
 182
 183         sd->owner_sid = talloc_steal(sd, ids[0].sid);
 184         sd->group_sid = talloc_steal(sd, ids[1].sid);
 185
 186         talloc_free(ids);
 187         sd->type |= SEC_DESC_DACL_PRESENT;
 188
 189         mode = name->st.st_mode;
 190
 191         /*
 192           we provide up to 4 ACEs
 193             - Owner
 194             - Group
 195             - Everyone
 196             - Administrator
 197          */
 198
 199
 200         /* setup owner ACE */
 201         ace.type = SEC_ACE_TYPE_ACCESS_ALLOWED;
 202         ace.flags = 0;
 203         ace.trustee = *sd->owner_sid;
 204         ace.access_mask = 0;
 205
 206         if (mode & S_IRUSR) {
 207                 if (mode & S_IWUSR) {
 208                         ace.access_mask |= SEC_RIGHTS_FILE_ALL;
 209                 } else {
 210                         ace.access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
 211                 }
 212         }
 213         if (mode & S_IWUSR) {
 214                 ace.access_mask |= SEC_RIGHTS_FILE_WRITE | SEC_STD_DELETE;
 215         }
 216         if (ace.access_mask) {
 217                 security_descriptor_dacl_add(sd, &ace);
 218         }
 219
 220
 221         /* setup group ACE */
 222         ace.trustee = *sd->group_sid;
 223         ace.access_mask = 0;
 224         if (mode & S_IRGRP) {
 225                 ace.access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
 226         }
 227         if (mode & S_IWGRP) {
 228                 /* note that delete is not granted - this matches posix behaviour */
 229                 ace.access_mask |= SEC_RIGHTS_FILE_WRITE;
 230         }
 231         if (ace.access_mask) {
 232                 security_descriptor_dacl_add(sd, &ace);
 233         }
 234
 235         /* setup other ACE */
 236         ace.trustee = *dom_sid_parse_talloc(req, SID_WORLD);
 237         ace.access_mask = 0;
 238         if (mode & S_IROTH) {
 239                 ace.access_mask |= SEC_RIGHTS_FILE_READ | SEC_FILE_EXECUTE;
 240         }
 241         if (mode & S_IWOTH) {
 242                 ace.access_mask |= SEC_RIGHTS_FILE_WRITE;
 243         }
 244         if (ace.access_mask) {
 245                 security_descriptor_dacl_add(sd, &ace);
 246         }
 247
 248         /* setup system ACE */
 249         ace.trustee = *dom_sid_parse_talloc(req, SID_NT_SYSTEM);
 250         ace.access_mask = SEC_RIGHTS_FILE_ALL;
 251         security_descriptor_dacl_add(sd, &ace);
 252
 253         return NT_STATUS_OK;
 254 }
 255
 256
 257 /*
 258   omit any security_descriptor elements not specified in the given
 259   secinfo flags
 260 */
 261 static void normalise_sd_flags(struct security_descriptor *sd, uint32_t secinfo_flags)
 262 {
 263         if (!(secinfo_flags & SECINFO_OWNER)) {
 264                 sd->owner_sid = NULL;
 265         }
 266         if (!(secinfo_flags & SECINFO_GROUP)) {
 267                 sd->group_sid = NULL;
 268         }
 269         if (!(secinfo_flags & SECINFO_DACL)) {
 270                 sd->dacl = NULL;
 271         }
 272         if (!(secinfo_flags & SECINFO_SACL)) {
 273                 sd->sacl = NULL;
 274         }
 275 }
 276
 277 /*
 278   answer a setfileinfo for an ACL
 279 */
 280 NTSTATUS pvfs_acl_set(struct pvfs_state *pvfs,
 281                       struct ntvfs_request *req,
 282                       struct pvfs_filename *name, int fd,
 283                       uint32_t access_mask,
 284                       union smb_setfileinfo *info)
 285 {
 286         uint32_t secinfo_flags = info->set_secdesc.in.secinfo_flags;
 287         struct security_descriptor *new_sd, *sd, orig_sd;
 288         NTSTATUS status = NT_STATUS_NOT_FOUND;
 289         uid_t old_uid = -1;
 290         gid_t old_gid = -1;
 291         uid_t new_uid = -1;
 292         gid_t new_gid = -1;
 293         struct id_mapping *ids;
 294         struct composite_context *ctx;
 295
 296         if (pvfs->acl_ops != NULL) {
 297                 status = pvfs->acl_ops->acl_load(pvfs, name, fd, req, &sd);
 298         }
 299         if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
 300                 status = pvfs_default_acl(pvfs, req, name, fd, &sd);
 301         }
 302         if (!NT_STATUS_IS_OK(status)) {
 303                 return status;
 304         }
 305
 306         ids = talloc(req, struct id_mapping);
 307         NT_STATUS_HAVE_NO_MEMORY(ids);
 308         ids->unixid = NULL;
 309         ids->sid = NULL;
 310         ids->status = NT_STATUS_NONE_MAPPED;
 311
 312         new_sd = info->set_secdesc.in.sd;
 313         orig_sd = *sd;
 314
 315         old_uid = name->st.st_uid;
 316         old_gid = name->st.st_gid;
 317
 318         /* only set the elements that have been specified */
 319         if (secinfo_flags & SECINFO_OWNER) {
 320                 if (!(access_mask & SEC_STD_WRITE_OWNER)) {
 321                         return NT_STATUS_ACCESS_DENIED;
 322                 }
 323                 if (!dom_sid_equal(sd->owner_sid, new_sd->owner_sid)) {
 324                         ids->sid = new_sd->owner_sid;
 325                         ctx = wbc_sids_to_xids_send(pvfs->wbc_ctx, ids, 1, ids);
 326                         NT_STATUS_HAVE_NO_MEMORY(ctx);
 327                         status = wbc_sids_to_xids_recv(ctx, &ids);
 328                         NT_STATUS_NOT_OK_RETURN(status);
 329
 330                         if (ids->unixid->type == ID_TYPE_BOTH ||
 331                             ids->unixid->type == ID_TYPE_UID) {
 332                                 new_uid = ids->unixid->id;
 333                         }
 334                 }
 335                 sd->owner_sid = new_sd->owner_sid;
 336         }
 337         if (secinfo_flags & SECINFO_GROUP) {
 338                 if (!(access_mask & SEC_STD_WRITE_OWNER)) {
 339                         return NT_STATUS_ACCESS_DENIED;
 340                 }
 341                 if (!dom_sid_equal(sd->group_sid, new_sd->group_sid)) {
 342                         ids->sid = new_sd->group_sid;
 343                         ctx = wbc_sids_to_xids_send(pvfs->wbc_ctx, ids, 1, ids);
 344                         NT_STATUS_HAVE_NO_MEMORY(ctx);
 345                         status = wbc_sids_to_xids_recv(ctx, &ids);
 346                         NT_STATUS_NOT_OK_RETURN(status);
 347
 348                         if (ids->unixid->type == ID_TYPE_BOTH ||
 349                             ids->unixid->type == ID_TYPE_GID) {
 350                                 new_gid = ids->unixid->id;
 351                         }
 352
 353                 }
 354                 sd->group_sid = new_sd->group_sid;
 355         }
 356         if (secinfo_flags & SECINFO_DACL) {
 357                 if (!(access_mask & SEC_STD_WRITE_DAC)) {
 358                         return NT_STATUS_ACCESS_DENIED;
 359                 }
 360                 sd->dacl = new_sd->dacl;
 361                 pvfs_translate_generic_bits(sd->dacl);
 362         }
 363         if (secinfo_flags & SECINFO_SACL) {
 364                 if (!(access_mask & SEC_FLAG_SYSTEM_SECURITY)) {
 365                         return NT_STATUS_ACCESS_DENIED;
 366                 }
 367                 sd->sacl = new_sd->sacl;
 368                 pvfs_translate_generic_bits(sd->sacl);
 369         }
 370
 371         if (new_uid == old_uid) {
 372                 new_uid = -1;
 373         }
 374
 375         if (new_gid == old_gid) {
 376                 new_gid = -1;
 377         }
 378
 379         /* if there's something to change try it */
 380         if (new_uid != -1 || new_gid != -1) {
 381                 int ret;
 382                 if (fd == -1) {
 383                         ret = chown(name->full_name, new_uid, new_gid);
 384                 } else {
 385                         ret = fchown(fd, new_uid, new_gid);
 386                 }
 387                 if (ret == -1) {
 388                         return pvfs_map_errno(pvfs, errno);
 389                 }
 390         }
 391
 392         /* we avoid saving if the sd is the same. This means when clients
 393            copy files and end up copying the default sd that we don't
 394            needlessly use xattrs */
 395         if (!security_descriptor_equal(sd, &orig_sd) && pvfs->acl_ops) {
 396                 status = pvfs->acl_ops->acl_save(pvfs, name, fd, sd);
 397         }
 398
 399         return status;
 400 }
 401
 402
 403 /*
 404   answer a fileinfo query for the ACL
 405 */
 406 NTSTATUS pvfs_acl_query(struct pvfs_state *pvfs,
 407                         struct ntvfs_request *req,
 408                         struct pvfs_filename *name, int fd,
 409                         union smb_fileinfo *info)
 410 {
 411         NTSTATUS status = NT_STATUS_NOT_FOUND;
 412         struct security_descriptor *sd;
 413
 414         if (pvfs->acl_ops) {
 415                 status = pvfs->acl_ops->acl_load(pvfs, name, fd, req, &sd);
 416         }
 417         if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
 418                 status = pvfs_default_acl(pvfs, req, name, fd, &sd);
 419         }
 420         if (!NT_STATUS_IS_OK(status)) {
 421                 return status;
 422         }
 423
 424         normalise_sd_flags(sd, info->query_secdesc.in.secinfo_flags);
 425
 426         info->query_secdesc.out.sd = sd;
 427
 428         return NT_STATUS_OK;
 429 }
 430
 431
 432 /*
 433   check the read only bit against any of the write access bits
 434 */
 435 static bool pvfs_read_only(struct pvfs_state *pvfs, uint32_t access_mask)
 436 {
 437         if ((pvfs->flags & PVFS_FLAG_READONLY) &&
 438             (access_mask & (SEC_FILE_WRITE_DATA |
 439                             SEC_FILE_APPEND_DATA |
 440                             SEC_FILE_WRITE_EA |
 441                             SEC_FILE_WRITE_ATTRIBUTE |
 442                             SEC_STD_DELETE |
 443                             SEC_STD_WRITE_DAC |
 444                             SEC_STD_WRITE_OWNER |
 445                             SEC_DIR_DELETE_CHILD))) {
 446                 return true;
 447         }
 448         return false;
 449 }
 450
 451 /*
 452   default access check function based on unix permissions
 453   doing this saves on building a full security descriptor
 454   for the common case of access check on files with no
 455   specific NT ACL
 456 */
 457 NTSTATUS pvfs_access_check_unix(struct pvfs_state *pvfs,
 458                                 struct ntvfs_request *req,
 459                                 struct pvfs_filename *name,
 460                                 uint32_t *access_mask)
 461 {
 462         uid_t uid = geteuid();
 463         uint32_t max_bits = SEC_RIGHTS_FILE_READ | SEC_FILE_ALL;
 464
 465         if (pvfs_read_only(pvfs, *access_mask)) {
 466                 return NT_STATUS_ACCESS_DENIED;
 467         }
 468
 469         /* owner and root get extra permissions */
 470         if (uid == 0) {
 471                 max_bits |= SEC_STD_ALL | SEC_FLAG_SYSTEM_SECURITY;
 472         } else if (uid == name->st.st_uid) {
 473                 max_bits |= SEC_STD_ALL;
 474         }
 475
 476         if (*access_mask == SEC_FLAG_MAXIMUM_ALLOWED) {
 477                 *access_mask = max_bits;
 478                 return NT_STATUS_OK;
 479         }
 480
 481         if (uid != 0 && (*access_mask & SEC_FLAG_SYSTEM_SECURITY)) {
 482                 return NT_STATUS_ACCESS_DENIED;
 483         }
 484
 485         if (*access_mask & ~max_bits) {
 486                 return NT_STATUS_ACCESS_DENIED;
 487         }
 488
 489         if (pvfs->ntvfs->ctx->protocol != PROTOCOL_SMB2) {
 490                 /* on SMB, this bit is always granted, even if not
 491                    asked for */
 492                 *access_mask |= SEC_FILE_READ_ATTRIBUTE;
 493         }
 494
 495         return NT_STATUS_OK;
 496 }
 497
 498
 499 /*
 500   check the security descriptor on a file, if any
 501
 502   *access_mask is modified with the access actually granted
 503 */
 504 NTSTATUS pvfs_access_check(struct pvfs_state *pvfs,
 505                            struct ntvfs_request *req,
 506                            struct pvfs_filename *name,
 507                            uint32_t *access_mask)
 508 {
 509         struct security_token *token = req->session_info->security_token;
 510         struct xattr_NTACL *acl;
 511         NTSTATUS status;
 512         struct security_descriptor *sd;
 513
 514         if (pvfs_read_only(pvfs, *access_mask)) {
 515                 return NT_STATUS_ACCESS_DENIED;
 516         }
 517
 518         acl = talloc(req, struct xattr_NTACL);
 519         if (acl == NULL) {
 520                 return NT_STATUS_NO_MEMORY;
 521         }
 522
 523         /* expand the generic access bits to file specific bits */
 524         *access_mask = pvfs_translate_mask(*access_mask);
 525         if (pvfs->ntvfs->ctx->protocol != PROTOCOL_SMB2) {
 526                 *access_mask &= ~SEC_FILE_READ_ATTRIBUTE;
 527         }
 528
 529         status = pvfs_acl_load(pvfs, name, -1, acl);
 530         if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
 531                 talloc_free(acl);
 532                 return pvfs_access_check_unix(pvfs, req, name, access_mask);
 533         }
 534         if (!NT_STATUS_IS_OK(status)) {
 535                 return status;
 536         }
 537
 538         switch (acl->version) {
 539         case 1:
 540                 sd = acl->info.sd;
 541                 break;
 542         default:
 543                 return NT_STATUS_INVALID_ACL;
 544         }
 545
 546         /* check the acl against the required access mask */
 547         status = sec_access_check(sd, token, *access_mask, access_mask);
 548
 549         if (pvfs->ntvfs->ctx->protocol != PROTOCOL_SMB2) {
 550                 /* on SMB, this bit is always granted, even if not
 551                    asked for */
 552                 *access_mask |= SEC_FILE_READ_ATTRIBUTE;
 553         }
 554
 555         talloc_free(acl);
 556
 557         return status;
 558 }
 559
 560
 561 /*
 562   a simplified interface to access check, designed for calls that
 563   do not take or return an access check mask
 564 */
 565 NTSTATUS pvfs_access_check_simple(struct pvfs_state *pvfs,
 566                                   struct ntvfs_request *req,
 567                                   struct pvfs_filename *name,
 568                                   uint32_t access_needed)
 569 {
 570         if (access_needed == 0) {
 571                 return NT_STATUS_OK;
 572         }
 573         return pvfs_access_check(pvfs, req, name, &access_needed);
 574 }
 575
 576 /*
 577   access check for creating a new file/directory
 578 */
 579 NTSTATUS pvfs_access_check_create(struct pvfs_state *pvfs,
 580                                   struct ntvfs_request *req,
 581                                   struct pvfs_filename *name,
 582                                   uint32_t *access_mask)
 583 {
 584         struct pvfs_filename *parent;
 585         NTSTATUS status;
 586
 587         status = pvfs_resolve_parent(pvfs, req, name, &parent);
 588         if (!NT_STATUS_IS_OK(status)) {
 589                 return status;
 590         }
 591
 592         status = pvfs_access_check(pvfs, req, parent, access_mask);
 593         if (!NT_STATUS_IS_OK(status)) {
 594                 return status;
 595         }
 596
 597         if (! ((*access_mask) & SEC_DIR_ADD_FILE)) {
 598                 return pvfs_access_check_simple(pvfs, req, parent, SEC_DIR_ADD_FILE);
 599         }
 600
 601         return status;
 602 }
 603
 604 /*
 605   access check for creating a new file/directory - no access mask supplied
 606 */
 607 NTSTATUS pvfs_access_check_parent(struct pvfs_state *pvfs,
 608                                   struct ntvfs_request *req,
 609                                   struct pvfs_filename *name,
 610                                   uint32_t access_mask)
 611 {
 612         struct pvfs_filename *parent;
 613         NTSTATUS status;
 614
 615         status = pvfs_resolve_parent(pvfs, req, name, &parent);
 616         if (!NT_STATUS_IS_OK(status)) {
 617                 return status;
 618         }
 619
 620         return pvfs_access_check_simple(pvfs, req, parent, access_mask);
 621 }
 622
 623
 624 /*
 625   determine if an ACE is inheritable
 626 */
 627 static bool pvfs_inheritable_ace(struct pvfs_state *pvfs,
 628                                  const struct security_ace *ace,
 629                                  bool container)
 630 {
 631         if (!container) {
 632                 return (ace->flags & SEC_ACE_FLAG_OBJECT_INHERIT) != 0;
 633         }
 634
 635         if (ace->flags & SEC_ACE_FLAG_CONTAINER_INHERIT) {
 636                 return true;
 637         }
 638
 639         if ((ace->flags & SEC_ACE_FLAG_OBJECT_INHERIT) &&
 640             !(ace->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT)) {
 641                 return true;
 642         }
 643
 644         return false;
 645 }
 646
 647 /*
 648   this is the core of ACL inheritance. It copies any inheritable
 649   aces from the parent SD to the child SD. Note that the algorithm
 650   depends on whether the child is a container or not
 651 */
 652 static NTSTATUS pvfs_acl_inherit_aces(struct pvfs_state *pvfs,
 653                                       struct security_descriptor *parent_sd,
 654                                       struct security_descriptor *sd,
 655                                       bool container)
 656 {
 657         int i;
 658
 659         for (i=0;i<parent_sd->dacl->num_aces;i++) {
 660                 struct security_ace ace = parent_sd->dacl->aces[i];
 661                 NTSTATUS status;
 662                 const struct dom_sid *creator = NULL, *new_id = NULL;
 663                 uint32_t orig_flags;
 664
 665                 if (!pvfs_inheritable_ace(pvfs, &ace, container)) {
 666                         continue;
 667                 }
 668
 669                 orig_flags = ace.flags;
 670
 671                 /* see the RAW-ACLS inheritance test for details on these rules */
 672                 if (!container) {
 673                         ace.flags = 0;
 674                 } else {
 675                         ace.flags &= ~SEC_ACE_FLAG_INHERIT_ONLY;
 676
 677                         if (!(ace.flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
 678                                 ace.flags |= SEC_ACE_FLAG_INHERIT_ONLY;
 679                         }
 680                         if (ace.flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
 681                                 ace.flags = 0;
 682                         }
 683                 }
 684
 685                 /* the CREATOR sids are special when inherited */
 686                 if (dom_sid_equal(&ace.trustee, pvfs->sid_cache.creator_owner)) {
 687                         creator = pvfs->sid_cache.creator_owner;
 688                         new_id = sd->owner_sid;
 689                 } else if (dom_sid_equal(&ace.trustee, pvfs->sid_cache.creator_group)) {
 690                         creator = pvfs->sid_cache.creator_group;
 691                         new_id = sd->group_sid;
 692                 } else {
 693                         new_id = &ace.trustee;
 694                 }
 695
 696                 if (creator && container &&
 697                     (ace.flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
 698                         uint32_t flags = ace.flags;
 699
 700                         ace.trustee = *new_id;
 701                         ace.flags = 0;
 702                         status = security_descriptor_dacl_add(sd, &ace);
 703                         if (!NT_STATUS_IS_OK(status)) {
 704                                 return status;
 705                         }
 706
 707                         ace.trustee = *creator;
 708                         ace.flags = flags | SEC_ACE_FLAG_INHERIT_ONLY;
 709                         status = security_descriptor_dacl_add(sd, &ace);
 710                 } else if (container &&
 711                            !(orig_flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT)) {
 712                         status = security_descriptor_dacl_add(sd, &ace);
 713                 } else {
 714                         ace.trustee = *new_id;
 715                         status = security_descriptor_dacl_add(sd, &ace);
 716                 }
 717
 718                 if (!NT_STATUS_IS_OK(status)) {
 719                         return status;
 720                 }
 721         }
 722
 723         return NT_STATUS_OK;
 724 }
 725
 726
 727
 728 /*
 729   setup an ACL on a new file/directory based on the inherited ACL from
 730   the parent. If there is no inherited ACL then we don't set anything,
 731   as the default ACL applies anyway
 732 */
 733 NTSTATUS pvfs_acl_inherit(struct pvfs_state *pvfs,
 734                           struct ntvfs_request *req,
 735                           struct pvfs_filename *name,
 736                           int fd)
 737 {
 738         struct xattr_NTACL *acl;
 739         NTSTATUS status;
 740         struct pvfs_filename *parent;
 741         struct security_descriptor *parent_sd, *sd;
 742         bool container;
 743         struct id_mapping *ids;
 744         struct composite_context *ctx;
 745
 746         /* form the parents path */
 747         status = pvfs_resolve_parent(pvfs, req, name, &parent);
 748         if (!NT_STATUS_IS_OK(status)) {
 749                 return status;
 750         }
 751
 752         acl = talloc(req, struct xattr_NTACL);
 753         if (acl == NULL) {
 754                 return NT_STATUS_NO_MEMORY;
 755         }
 756
 757         status = pvfs_acl_load(pvfs, parent, -1, acl);
 758         if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
 759                 return NT_STATUS_OK;
 760         }
 761         if (!NT_STATUS_IS_OK(status)) {
 762                 return status;
 763         }
 764
 765         switch (acl->version) {
 766         case 1:
 767                 parent_sd = acl->info.sd;
 768                 break;
 769         default:
 770                 return NT_STATUS_INVALID_ACL;
 771         }
 772
 773         if (parent_sd == NULL ||
 774             parent_sd->dacl == NULL ||
 775             parent_sd->dacl->num_aces == 0) {
 776                 /* go with the default ACL */
 777                 return NT_STATUS_OK;
 778         }
 779
 780         /* create the new sd */
 781         sd = security_descriptor_initialise(req);
 782         if (sd == NULL) {
 783                 return NT_STATUS_NO_MEMORY;
 784         }
 785
 786         ids = talloc_array(sd, struct id_mapping, 2);
 787         NT_STATUS_HAVE_NO_MEMORY(ids);
 788
 789         ids[0].unixid = talloc(ids, struct unixid);
 790         NT_STATUS_HAVE_NO_MEMORY(ids[0].unixid);
 791         ids[0].unixid->id = name->st.st_uid;
 792         ids[0].unixid->type = ID_TYPE_UID;
 793         ids[0].sid = NULL;
 794         ids[0].status = NT_STATUS_NONE_MAPPED;
 795
 796         ids[1].unixid = talloc(ids, struct unixid);
 797         NT_STATUS_HAVE_NO_MEMORY(ids[1].unixid);
 798         ids[1].unixid->id = name->st.st_gid;
 799         ids[1].unixid->type = ID_TYPE_GID;
 800         ids[1].sid = NULL;
 801         ids[1].status = NT_STATUS_NONE_MAPPED;
 802
 803         ctx = wbc_xids_to_sids_send(pvfs->wbc_ctx, ids, 2, ids);
 804         NT_STATUS_HAVE_NO_MEMORY(ctx);
 805
 806         status = wbc_xids_to_sids_recv(ctx, &ids);
 807         NT_STATUS_NOT_OK_RETURN(status);
 808
 809         sd->owner_sid = talloc_steal(sd, ids[0].sid);
 810         sd->group_sid = talloc_steal(sd, ids[1].sid);
 811
 812         sd->type |= SEC_DESC_DACL_PRESENT;
 813
 814         container = (name->dos.attrib & FILE_ATTRIBUTE_DIRECTORY) ? true:false;
 815
 816         /* fill in the aces from the parent */
 817         status = pvfs_acl_inherit_aces(pvfs, parent_sd, sd, container);
 818         if (!NT_STATUS_IS_OK(status)) {
 819                 return status;
 820         }
 821
 822         /* if there is nothing to inherit then we fallback to the
 823            default acl */
 824         if (sd->dacl == NULL || sd->dacl->num_aces == 0) {
 825                 return NT_STATUS_OK;
 826         }
 827
 828         acl->info.sd = sd;
 829
 830         status = pvfs_acl_save(pvfs, name, fd, acl);
 831
 832         return status;
 833 }
 834
 835 /*
 836   return the maximum allowed access mask
 837 */
 838 NTSTATUS pvfs_access_maximal_allowed(struct pvfs_state *pvfs,
 839                                      struct ntvfs_request *req,
 840                                      struct pvfs_filename *name,
 841                                      uint32_t *maximal_access)
 842 {
 843         *maximal_access = SEC_FLAG_MAXIMUM_ALLOWED;
 844         return pvfs_access_check(pvfs, req, name, maximal_access);
 845 }