source3/smbd/posix_acls.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    SMB NT Security Descriptor / Unix permission conversion.
   4    Copyright (C) Jeremy Allison 1994-2000.
   5    Copyright (C) Andreas Gruenbacher 2002.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19 */
  20
  21 #include "includes.h"
  22
  23 extern struct current_user current_user;
  24 extern const struct generic_mapping file_generic_mapping;
  25
  26 #undef  DBGC_CLASS
  27 #define DBGC_CLASS DBGC_ACLS
  28
  29 /****************************************************************************
  30  Data structures representing the internal ACE format.
  31 ****************************************************************************/
  32
  33 enum ace_owner {UID_ACE, GID_ACE, WORLD_ACE};
  34 enum ace_attribute {ALLOW_ACE, DENY_ACE}; /* Used for incoming NT ACLS. */
  35
  36 typedef union posix_id {
  37                 uid_t uid;
  38                 gid_t gid;
  39                 int world;
  40 } posix_id;
  41
  42 typedef struct canon_ace {
  43         struct canon_ace *next, *prev;
  44         SMB_ACL_TAG_T type;
  45         mode_t perms; /* Only use S_I(R|W|X)USR mode bits here. */
  46         DOM_SID trustee;
  47         enum ace_owner owner_type;
  48         enum ace_attribute attr;
  49         posix_id unix_ug;
  50         bool inherited;
  51 } canon_ace;
  52
  53 #define ALL_ACE_PERMS (S_IRUSR|S_IWUSR|S_IXUSR)
  54
  55 /*
  56  * EA format of user.SAMBA_PAI (Samba_Posix_Acl_Interitance)
  57  * attribute on disk.
  58  *
  59  * |  1   |  1   |   2         |         2           |  ....
  60  * +------+------+-------------+---------------------+-------------+--------------------+
  61  * | vers | flag | num_entries | num_default_entries | ..entries.. | default_entries... |
  62  * +------+------+-------------+---------------------+-------------+--------------------+
  63  */
  64
  65 #define PAI_VERSION_OFFSET      0
  66 #define PAI_FLAG_OFFSET         1
  67 #define PAI_NUM_ENTRIES_OFFSET  2
  68 #define PAI_NUM_DEFAULT_ENTRIES_OFFSET  4
  69 #define PAI_ENTRIES_BASE        6
  70
  71 #define PAI_VERSION             1
  72 #define PAI_ACL_FLAG_PROTECTED  0x1
  73 #define PAI_ENTRY_LENGTH        5
  74
  75 /*
  76  * In memory format of user.SAMBA_PAI attribute.
  77  */
  78
  79 struct pai_entry {
  80         struct pai_entry *next, *prev;
  81         enum ace_owner owner_type;
  82         posix_id unix_ug;
  83 };
  84
  85 struct pai_val {
  86         bool pai_protected;
  87         unsigned int num_entries;
  88         struct pai_entry *entry_list;
  89         unsigned int num_def_entries;
  90         struct pai_entry *def_entry_list;
  91 };
  92
  93 /************************************************************************
  94  Return a uint32 of the pai_entry principal.
  95 ************************************************************************/
  96
  97 static uint32 get_pai_entry_val(struct pai_entry *paie)
  98 {
  99         switch (paie->owner_type) {
 100                 case UID_ACE:
 101                         DEBUG(10,("get_pai_entry_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
 102                         return (uint32)paie->unix_ug.uid;
 103                 case GID_ACE:
 104                         DEBUG(10,("get_pai_entry_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
 105                         return (uint32)paie->unix_ug.gid;
 106                 case WORLD_ACE:
 107                 default:
 108                         DEBUG(10,("get_pai_entry_val: world ace\n"));
 109                         return (uint32)-1;
 110         }
 111 }
 112
 113 /************************************************************************
 114  Return a uint32 of the entry principal.
 115 ************************************************************************/
 116
 117 static uint32 get_entry_val(canon_ace *ace_entry)
 118 {
 119         switch (ace_entry->owner_type) {
 120                 case UID_ACE:
 121                         DEBUG(10,("get_entry_val: uid = %u\n", (unsigned int)ace_entry->unix_ug.uid ));
 122                         return (uint32)ace_entry->unix_ug.uid;
 123                 case GID_ACE:
 124                         DEBUG(10,("get_entry_val: gid = %u\n", (unsigned int)ace_entry->unix_ug.gid ));
 125                         return (uint32)ace_entry->unix_ug.gid;
 126                 case WORLD_ACE:
 127                 default:
 128                         DEBUG(10,("get_entry_val: world ace\n"));
 129                         return (uint32)-1;
 130         }
 131 }
 132
 133 /************************************************************************
 134  Count the inherited entries.
 135 ************************************************************************/
 136
 137 static unsigned int num_inherited_entries(canon_ace *ace_list)
 138 {
 139         unsigned int num_entries = 0;
 140
 141         for (; ace_list; ace_list = ace_list->next)
 142                 if (ace_list->inherited)
 143                         num_entries++;
 144         return num_entries;
 145 }
 146
 147 /************************************************************************
 148  Create the on-disk format. Caller must free.
 149 ************************************************************************/
 150
 151 static char *create_pai_buf(canon_ace *file_ace_list, canon_ace *dir_ace_list, bool pai_protected, size_t *store_size)
 152 {
 153         char *pai_buf = NULL;
 154         canon_ace *ace_list = NULL;
 155         char *entry_offset = NULL;
 156         unsigned int num_entries = 0;
 157         unsigned int num_def_entries = 0;
 158
 159         for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next)
 160                 if (ace_list->inherited)
 161                         num_entries++;
 162
 163         for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next)
 164                 if (ace_list->inherited)
 165                         num_def_entries++;
 166
 167         DEBUG(10,("create_pai_buf: num_entries = %u, num_def_entries = %u\n", num_entries, num_def_entries ));
 168
 169         *store_size = PAI_ENTRIES_BASE + ((num_entries + num_def_entries)*PAI_ENTRY_LENGTH);
 170
 171         pai_buf = (char *)SMB_MALLOC(*store_size);
 172         if (!pai_buf) {
 173                 return NULL;
 174         }
 175
 176         /* Set up the header. */
 177         memset(pai_buf, '\0', PAI_ENTRIES_BASE);
 178         SCVAL(pai_buf,PAI_VERSION_OFFSET,PAI_VERSION);
 179         SCVAL(pai_buf,PAI_FLAG_OFFSET,(pai_protected ? PAI_ACL_FLAG_PROTECTED : 0));
 180         SSVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET,num_entries);
 181         SSVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET,num_def_entries);
 182
 183         entry_offset = pai_buf + PAI_ENTRIES_BASE;
 184
 185         for (ace_list = file_ace_list; ace_list; ace_list = ace_list->next) {
 186                 if (ace_list->inherited) {
 187                         uint8 type_val = (unsigned char)ace_list->owner_type;
 188                         uint32 entry_val = get_entry_val(ace_list);
 189
 190                         SCVAL(entry_offset,0,type_val);
 191                         SIVAL(entry_offset,1,entry_val);
 192                         entry_offset += PAI_ENTRY_LENGTH;
 193                 }
 194         }
 195
 196         for (ace_list = dir_ace_list; ace_list; ace_list = ace_list->next) {
 197                 if (ace_list->inherited) {
 198                         uint8 type_val = (unsigned char)ace_list->owner_type;
 199                         uint32 entry_val = get_entry_val(ace_list);
 200
 201                         SCVAL(entry_offset,0,type_val);
 202                         SIVAL(entry_offset,1,entry_val);
 203                         entry_offset += PAI_ENTRY_LENGTH;
 204                 }
 205         }
 206
 207         return pai_buf;
 208 }
 209
 210 /************************************************************************
 211  Store the user.SAMBA_PAI attribute on disk.
 212 ************************************************************************/
 213
 214 static void store_inheritance_attributes(files_struct *fsp, canon_ace *file_ace_list,
 215                                         canon_ace *dir_ace_list, bool pai_protected)
 216 {
 217         int ret;
 218         size_t store_size;
 219         char *pai_buf;
 220
 221         if (!lp_map_acl_inherit(SNUM(fsp->conn)))
 222                 return;
 223
 224         /*
 225          * Don't store if this ACL isn't protected and
 226          * none of the entries in it are marked as inherited.
 227          */
 228
 229         if (!pai_protected && num_inherited_entries(file_ace_list) == 0 && num_inherited_entries(dir_ace_list) == 0) {
 230                 /* Instead just remove the attribute if it exists. */
 231                 if (fsp->fh->fd != -1)
 232                         SMB_VFS_FREMOVEXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME);
 233                 else
 234                         SMB_VFS_REMOVEXATTR(fsp->conn, fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME);
 235                 return;
 236         }
 237
 238         pai_buf = create_pai_buf(file_ace_list, dir_ace_list, pai_protected, &store_size);
 239
 240         if (fsp->fh->fd != -1)
 241                 ret = SMB_VFS_FSETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
 242                                 pai_buf, store_size, 0);
 243         else
 244                 ret = SMB_VFS_SETXATTR(fsp->conn,fsp->fsp_name, SAMBA_POSIX_INHERITANCE_EA_NAME,
 245                                 pai_buf, store_size, 0);
 246
 247         SAFE_FREE(pai_buf);
 248
 249         DEBUG(10,("store_inheritance_attribute:%s for file %s\n", pai_protected ? " (protected)" : "", fsp->fsp_name));
 250         if (ret == -1 && !no_acl_syscall_error(errno))
 251                 DEBUG(1,("store_inheritance_attribute: Error %s\n", strerror(errno) ));
 252 }
 253
 254 /************************************************************************
 255  Delete the in memory inheritance info.
 256 ************************************************************************/
 257
 258 static void free_inherited_info(struct pai_val *pal)
 259 {
 260         if (pal) {
 261                 struct pai_entry *paie, *paie_next;
 262                 for (paie = pal->entry_list; paie; paie = paie_next) {
 263                         paie_next = paie->next;
 264                         SAFE_FREE(paie);
 265                 }
 266                 for (paie = pal->def_entry_list; paie; paie = paie_next) {
 267                         paie_next = paie->next;
 268                         SAFE_FREE(paie);
 269                 }
 270                 SAFE_FREE(pal);
 271         }
 272 }
 273
 274 /************************************************************************
 275  Was this ACL protected ?
 276 ************************************************************************/
 277
 278 static bool get_protected_flag(struct pai_val *pal)
 279 {
 280         if (!pal)
 281                 return False;
 282         return pal->pai_protected;
 283 }
 284
 285 /************************************************************************
 286  Was this ACE inherited ?
 287 ************************************************************************/
 288
 289 static bool get_inherited_flag(struct pai_val *pal, canon_ace *ace_entry, bool default_ace)
 290 {
 291         struct pai_entry *paie;
 292
 293         if (!pal)
 294                 return False;
 295
 296         /* If the entry exists it is inherited. */
 297         for (paie = (default_ace ? pal->def_entry_list : pal->entry_list); paie; paie = paie->next) {
 298                 if (ace_entry->owner_type == paie->owner_type &&
 299                                 get_entry_val(ace_entry) == get_pai_entry_val(paie))
 300                         return True;
 301         }
 302         return False;
 303 }
 304
 305 /************************************************************************
 306  Ensure an attribute just read is valid.
 307 ************************************************************************/
 308
 309 static bool check_pai_ok(char *pai_buf, size_t pai_buf_data_size)
 310 {
 311         uint16 num_entries;
 312         uint16 num_def_entries;
 313
 314         if (pai_buf_data_size < PAI_ENTRIES_BASE) {
 315                 /* Corrupted - too small. */
 316                 return False;
 317         }
 318
 319         if (CVAL(pai_buf,PAI_VERSION_OFFSET) != PAI_VERSION)
 320                 return False;
 321
 322         num_entries = SVAL(pai_buf,PAI_NUM_ENTRIES_OFFSET);
 323         num_def_entries = SVAL(pai_buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
 324
 325         /* Check the entry lists match. */
 326         /* Each entry is 5 bytes (type plus 4 bytes of uid or gid). */
 327
 328         if (((num_entries + num_def_entries)*PAI_ENTRY_LENGTH) + PAI_ENTRIES_BASE != pai_buf_data_size)
 329                 return False;
 330
 331         return True;
 332 }
 333
 334
 335 /************************************************************************
 336  Convert to in-memory format.
 337 ************************************************************************/
 338
 339 static struct pai_val *create_pai_val(char *buf, size_t size)
 340 {
 341         char *entry_offset;
 342         struct pai_val *paiv = NULL;
 343         int i;
 344
 345         if (!check_pai_ok(buf, size))
 346                 return NULL;
 347
 348         paiv = SMB_MALLOC_P(struct pai_val);
 349         if (!paiv)
 350                 return NULL;
 351
 352         memset(paiv, '\0', sizeof(struct pai_val));
 353
 354         paiv->pai_protected = (CVAL(buf,PAI_FLAG_OFFSET) == PAI_ACL_FLAG_PROTECTED);
 355
 356         paiv->num_entries = SVAL(buf,PAI_NUM_ENTRIES_OFFSET);
 357         paiv->num_def_entries = SVAL(buf,PAI_NUM_DEFAULT_ENTRIES_OFFSET);
 358
 359         entry_offset = buf + PAI_ENTRIES_BASE;
 360
 361         DEBUG(10,("create_pai_val:%s num_entries = %u, num_def_entries = %u\n",
 362                         paiv->pai_protected ? " (pai_protected)" : "", paiv->num_entries, paiv->num_def_entries ));
 363
 364         for (i = 0; i < paiv->num_entries; i++) {
 365                 struct pai_entry *paie;
 366
 367                 paie = SMB_MALLOC_P(struct pai_entry);
 368                 if (!paie) {
 369                         free_inherited_info(paiv);
 370                         return NULL;
 371                 }
 372
 373                 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
 374                 switch( paie->owner_type) {
 375                         case UID_ACE:
 376                                 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
 377                                 DEBUG(10,("create_pai_val: uid = %u\n", (unsigned int)paie->unix_ug.uid ));
 378                                 break;
 379                         case GID_ACE:
 380                                 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
 381                                 DEBUG(10,("create_pai_val: gid = %u\n", (unsigned int)paie->unix_ug.gid ));
 382                                 break;
 383                         case WORLD_ACE:
 384                                 paie->unix_ug.world = -1;
 385                                 DEBUG(10,("create_pai_val: world ace\n"));
 386                                 break;
 387                         default:
 388                                 free_inherited_info(paiv);
 389                                 return NULL;
 390                 }
 391                 entry_offset += PAI_ENTRY_LENGTH;
 392                 DLIST_ADD(paiv->entry_list, paie);
 393         }
 394
 395         for (i = 0; i < paiv->num_def_entries; i++) {
 396                 struct pai_entry *paie;
 397
 398                 paie = SMB_MALLOC_P(struct pai_entry);
 399                 if (!paie) {
 400                         free_inherited_info(paiv);
 401                         return NULL;
 402                 }
 403
 404                 paie->owner_type = (enum ace_owner)CVAL(entry_offset,0);
 405                 switch( paie->owner_type) {
 406                         case UID_ACE:
 407                                 paie->unix_ug.uid = (uid_t)IVAL(entry_offset,1);
 408                                 DEBUG(10,("create_pai_val: (def) uid = %u\n", (unsigned int)paie->unix_ug.uid ));
 409                                 break;
 410                         case GID_ACE:
 411                                 paie->unix_ug.gid = (gid_t)IVAL(entry_offset,1);
 412                                 DEBUG(10,("create_pai_val: (def) gid = %u\n", (unsigned int)paie->unix_ug.gid ));
 413                                 break;
 414                         case WORLD_ACE:
 415                                 paie->unix_ug.world = -1;
 416                                 DEBUG(10,("create_pai_val: (def) world ace\n"));
 417                                 break;
 418                         default:
 419                                 free_inherited_info(paiv);
 420                                 return NULL;
 421                 }
 422                 entry_offset += PAI_ENTRY_LENGTH;
 423                 DLIST_ADD(paiv->def_entry_list, paie);
 424         }
 425
 426         return paiv;
 427 }
 428
 429 /************************************************************************
 430  Load the user.SAMBA_PAI attribute.
 431 ************************************************************************/
 432
 433 static struct pai_val *fload_inherited_info(files_struct *fsp)
 434 {
 435         char *pai_buf;
 436         size_t pai_buf_size = 1024;
 437         struct pai_val *paiv = NULL;
 438         ssize_t ret;
 439
 440         if (!lp_map_acl_inherit(SNUM(fsp->conn)))
 441                 return NULL;
 442
 443         if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
 444                 return NULL;
 445
 446         do {
 447                 if (fsp->fh->fd != -1)
 448                         ret = SMB_VFS_FGETXATTR(fsp, SAMBA_POSIX_INHERITANCE_EA_NAME,
 449                                         pai_buf, pai_buf_size);
 450                 else
 451                         ret = SMB_VFS_GETXATTR(fsp->conn,fsp->fsp_name,SAMBA_POSIX_INHERITANCE_EA_NAME,
 452                                         pai_buf, pai_buf_size);
 453
 454                 if (ret == -1) {
 455                         if (errno != ERANGE) {
 456                                 break;
 457                         }
 458                         /* Buffer too small - enlarge it. */
 459                         pai_buf_size *= 2;
 460                         SAFE_FREE(pai_buf);
 461                         if (pai_buf_size > 1024*1024) {
 462                                 return NULL; /* Limit malloc to 1mb. */
 463                         }
 464                         if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
 465                                 return NULL;
 466                 }
 467         } while (ret == -1);
 468
 469         DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fsp->fsp_name));
 470
 471         if (ret == -1) {
 472                 /* No attribute or not supported. */
 473 #if defined(ENOATTR)
 474                 if (errno != ENOATTR)
 475                         DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
 476 #else
 477                 if (errno != ENOSYS)
 478                         DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
 479 #endif
 480                 SAFE_FREE(pai_buf);
 481                 return NULL;
 482         }
 483
 484         paiv = create_pai_val(pai_buf, ret);
 485
 486         if (paiv && paiv->pai_protected)
 487                 DEBUG(10,("load_inherited_info: ACL is protected for file %s\n", fsp->fsp_name));
 488
 489         SAFE_FREE(pai_buf);
 490         return paiv;
 491 }
 492
 493 /************************************************************************
 494  Load the user.SAMBA_PAI attribute.
 495 ************************************************************************/
 496
 497 static struct pai_val *load_inherited_info(const struct connection_struct *conn,
 498                                            const char *fname)
 499 {
 500         char *pai_buf;
 501         size_t pai_buf_size = 1024;
 502         struct pai_val *paiv = NULL;
 503         ssize_t ret;
 504
 505         if (!lp_map_acl_inherit(SNUM(conn))) {
 506                 return NULL;
 507         }
 508
 509         if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL) {
 510                 return NULL;
 511         }
 512
 513         do {
 514                 ret = SMB_VFS_GETXATTR(conn, fname,
 515                                        SAMBA_POSIX_INHERITANCE_EA_NAME,
 516                                        pai_buf, pai_buf_size);
 517
 518                 if (ret == -1) {
 519                         if (errno != ERANGE) {
 520                                 break;
 521                         }
 522                         /* Buffer too small - enlarge it. */
 523                         pai_buf_size *= 2;
 524                         SAFE_FREE(pai_buf);
 525                         if (pai_buf_size > 1024*1024) {
 526                                 return NULL; /* Limit malloc to 1mb. */
 527                         }
 528                         if ((pai_buf = (char *)SMB_MALLOC(pai_buf_size)) == NULL)
 529                                 return NULL;
 530                 }
 531         } while (ret == -1);
 532
 533         DEBUG(10,("load_inherited_info: ret = %lu for file %s\n", (unsigned long)ret, fname));
 534
 535         if (ret == -1) {
 536                 /* No attribute or not supported. */
 537 #if defined(ENOATTR)
 538                 if (errno != ENOATTR)
 539                         DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
 540 #else
 541                 if (errno != ENOSYS)
 542                         DEBUG(10,("load_inherited_info: Error %s\n", strerror(errno) ));
 543 #endif
 544                 SAFE_FREE(pai_buf);
 545                 return NULL;
 546         }
 547
 548         paiv = create_pai_val(pai_buf, ret);
 549
 550         if (paiv && paiv->pai_protected) {
 551                 DEBUG(10,("load_inherited_info: ACL is protected for file %s\n", fname));
 552         }
 553
 554         SAFE_FREE(pai_buf);
 555         return paiv;
 556 }
 557
 558 /****************************************************************************
 559  Functions to manipulate the internal ACE format.
 560 ****************************************************************************/
 561
 562 /****************************************************************************
 563  Count a linked list of canonical ACE entries.
 564 ****************************************************************************/
 565
 566 static size_t count_canon_ace_list( canon_ace *list_head )
 567 {
 568         size_t count = 0;
 569         canon_ace *ace;
 570
 571         for (ace = list_head; ace; ace = ace->next)
 572                 count++;
 573
 574         return count;
 575 }
 576
 577 /****************************************************************************
 578  Free a linked list of canonical ACE entries.
 579 ****************************************************************************/
 580
 581 static void free_canon_ace_list( canon_ace *list_head )
 582 {
 583         canon_ace *list, *next;
 584
 585         for (list = list_head; list; list = next) {
 586                 next = list->next;
 587                 DLIST_REMOVE(list_head, list);
 588                 SAFE_FREE(list);
 589         }
 590 }
 591
 592 /****************************************************************************
 593  Function to duplicate a canon_ace entry.
 594 ****************************************************************************/
 595
 596 static canon_ace *dup_canon_ace( canon_ace *src_ace)
 597 {
 598         canon_ace *dst_ace = SMB_MALLOC_P(canon_ace);
 599
 600         if (dst_ace == NULL)
 601                 return NULL;
 602
 603         *dst_ace = *src_ace;
 604         dst_ace->prev = dst_ace->next = NULL;
 605         return dst_ace;
 606 }
 607
 608 /****************************************************************************
 609  Print out a canon ace.
 610 ****************************************************************************/
 611
 612 static void print_canon_ace(canon_ace *pace, int num)
 613 {
 614         dbgtext( "canon_ace index %d. Type = %s ", num, pace->attr == ALLOW_ACE ? "allow" : "deny" );
 615         dbgtext( "SID = %s ", sid_string_dbg(&pace->trustee));
 616         if (pace->owner_type == UID_ACE) {
 617                 const char *u_name = uidtoname(pace->unix_ug.uid);
 618                 dbgtext( "uid %u (%s) ", (unsigned int)pace->unix_ug.uid, u_name );
 619         } else if (pace->owner_type == GID_ACE) {
 620                 char *g_name = gidtoname(pace->unix_ug.gid);
 621                 dbgtext( "gid %u (%s) ", (unsigned int)pace->unix_ug.gid, g_name );
 622         } else
 623                 dbgtext( "other ");
 624         switch (pace->type) {
 625                 case SMB_ACL_USER:
 626                         dbgtext( "SMB_ACL_USER ");
 627                         break;
 628                 case SMB_ACL_USER_OBJ:
 629                         dbgtext( "SMB_ACL_USER_OBJ ");
 630                         break;
 631                 case SMB_ACL_GROUP:
 632                         dbgtext( "SMB_ACL_GROUP ");
 633                         break;
 634                 case SMB_ACL_GROUP_OBJ:
 635                         dbgtext( "SMB_ACL_GROUP_OBJ ");
 636                         break;
 637                 case SMB_ACL_OTHER:
 638                         dbgtext( "SMB_ACL_OTHER ");
 639                         break;
 640                 default:
 641                         dbgtext( "MASK " );
 642                         break;
 643         }
 644         if (pace->inherited)
 645                 dbgtext( "(inherited) ");
 646         dbgtext( "perms ");
 647         dbgtext( "%c", pace->perms & S_IRUSR ? 'r' : '-');
 648         dbgtext( "%c", pace->perms & S_IWUSR ? 'w' : '-');
 649         dbgtext( "%c\n", pace->perms & S_IXUSR ? 'x' : '-');
 650 }
 651
 652 /****************************************************************************
 653  Print out a canon ace list.
 654 ****************************************************************************/
 655
 656 static void print_canon_ace_list(const char *name, canon_ace *ace_list)
 657 {
 658         int count = 0;
 659
 660         if( DEBUGLVL( 10 )) {
 661                 dbgtext( "print_canon_ace_list: %s\n", name );
 662                 for (;ace_list; ace_list = ace_list->next, count++)
 663                         print_canon_ace(ace_list, count );
 664         }
 665 }
 666
 667 /****************************************************************************
 668  Map POSIX ACL perms to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
 669 ****************************************************************************/
 670
 671 static mode_t convert_permset_to_mode_t(connection_struct *conn, SMB_ACL_PERMSET_T permset)
 672 {
 673         mode_t ret = 0;
 674
 675         ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRUSR : 0);
 676         ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWUSR : 0);
 677         ret |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXUSR : 0);
 678
 679         return ret;
 680 }
 681
 682 /****************************************************************************
 683  Map generic UNIX permissions to canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits).
 684 ****************************************************************************/
 685
 686 static mode_t unix_perms_to_acl_perms(mode_t mode, int r_mask, int w_mask, int x_mask)
 687 {
 688         mode_t ret = 0;
 689
 690         if (mode & r_mask)
 691                 ret |= S_IRUSR;
 692         if (mode & w_mask)
 693                 ret |= S_IWUSR;
 694         if (mode & x_mask)
 695                 ret |= S_IXUSR;
 696
 697         return ret;
 698 }
 699
 700 /****************************************************************************
 701  Map canon_ace permissions (a mode_t containing only S_(R|W|X)USR bits) to
 702  an SMB_ACL_PERMSET_T.
 703 ****************************************************************************/
 704
 705 static int map_acl_perms_to_permset(connection_struct *conn, mode_t mode, SMB_ACL_PERMSET_T *p_permset)
 706 {
 707         if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) ==  -1)
 708                 return -1;
 709         if (mode & S_IRUSR) {
 710                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1)
 711                         return -1;
 712         }
 713         if (mode & S_IWUSR) {
 714                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1)
 715                         return -1;
 716         }
 717         if (mode & S_IXUSR) {
 718                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1)
 719                         return -1;
 720         }
 721         return 0;
 722 }
 723
 724 /****************************************************************************
 725  Function to create owner and group SIDs from a SMB_STRUCT_STAT.
 726 ****************************************************************************/
 727
 728 static void create_file_sids(const SMB_STRUCT_STAT *psbuf, DOM_SID *powner_sid, DOM_SID *pgroup_sid)
 729 {
 730         uid_to_sid( powner_sid, psbuf->st_uid );
 731         gid_to_sid( pgroup_sid, psbuf->st_gid );
 732 }
 733
 734 /****************************************************************************
 735  Is the identity in two ACEs equal ? Check both SID and uid/gid.
 736 ****************************************************************************/
 737
 738 static bool identity_in_ace_equal(canon_ace *ace1, canon_ace *ace2)
 739 {
 740         if (sid_equal(&ace1->trustee, &ace2->trustee)) {
 741                 return True;
 742         }
 743         if (ace1->owner_type == ace2->owner_type) {
 744                 if (ace1->owner_type == UID_ACE &&
 745                                 ace1->unix_ug.uid == ace2->unix_ug.uid) {
 746                         return True;
 747                 } else if (ace1->owner_type == GID_ACE &&
 748                                 ace1->unix_ug.gid == ace2->unix_ug.gid) {
 749                         return True;
 750                 }
 751         }
 752         return False;
 753 }
 754
 755 /****************************************************************************
 756  Merge aces with a common sid - if both are allow or deny, OR the permissions together and
 757  delete the second one. If the first is deny, mask the permissions off and delete the allow
 758  if the permissions become zero, delete the deny if the permissions are non zero.
 759 ****************************************************************************/
 760
 761 static void merge_aces( canon_ace **pp_list_head )
 762 {
 763         canon_ace *list_head = *pp_list_head;
 764         canon_ace *curr_ace_outer;
 765         canon_ace *curr_ace_outer_next;
 766
 767         /*
 768          * First, merge allow entries with identical SIDs, and deny entries
 769          * with identical SIDs.
 770          */
 771
 772         for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
 773                 canon_ace *curr_ace;
 774                 canon_ace *curr_ace_next;
 775
 776                 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
 777
 778                 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
 779
 780                         curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
 781
 782                         if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
 783                                 (curr_ace->attr == curr_ace_outer->attr)) {
 784
 785                                 if( DEBUGLVL( 10 )) {
 786                                         dbgtext("merge_aces: Merging ACE's\n");
 787                                         print_canon_ace( curr_ace_outer, 0);
 788                                         print_canon_ace( curr_ace, 0);
 789                                 }
 790
 791                                 /* Merge two allow or two deny ACE's. */
 792
 793                                 curr_ace_outer->perms |= curr_ace->perms;
 794                                 DLIST_REMOVE(list_head, curr_ace);
 795                                 SAFE_FREE(curr_ace);
 796                                 curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
 797                         }
 798                 }
 799         }
 800
 801         /*
 802          * Now go through and mask off allow permissions with deny permissions.
 803          * We can delete either the allow or deny here as we know that each SID
 804          * appears only once in the list.
 805          */
 806
 807         for (curr_ace_outer = list_head; curr_ace_outer; curr_ace_outer = curr_ace_outer_next) {
 808                 canon_ace *curr_ace;
 809                 canon_ace *curr_ace_next;
 810
 811                 curr_ace_outer_next = curr_ace_outer->next; /* Save the link in case we delete. */
 812
 813                 for (curr_ace = curr_ace_outer->next; curr_ace; curr_ace = curr_ace_next) {
 814
 815                         curr_ace_next = curr_ace->next; /* Save the link in case of delete. */
 816
 817                         /*
 818                          * Subtract ACE's with different entries. Due to the ordering constraints
 819                          * we've put on the ACL, we know the deny must be the first one.
 820                          */
 821
 822                         if (identity_in_ace_equal(curr_ace, curr_ace_outer) &&
 823                                 (curr_ace_outer->attr == DENY_ACE) && (curr_ace->attr == ALLOW_ACE)) {
 824
 825                                 if( DEBUGLVL( 10 )) {
 826                                         dbgtext("merge_aces: Masking ACE's\n");
 827                                         print_canon_ace( curr_ace_outer, 0);
 828                                         print_canon_ace( curr_ace, 0);
 829                                 }
 830
 831                                 curr_ace->perms &= ~curr_ace_outer->perms;
 832
 833                                 if (curr_ace->perms == 0) {
 834
 835                                         /*
 836                                          * The deny overrides the allow. Remove the allow.
 837                                          */
 838
 839                                         DLIST_REMOVE(list_head, curr_ace);
 840                                         SAFE_FREE(curr_ace);
 841                                         curr_ace_outer_next = curr_ace_outer->next; /* We may have deleted the link. */
 842
 843                                 } else {
 844
 845                                         /*
 846                                          * Even after removing permissions, there
 847                                          * are still allow permissions - delete the deny.
 848                                          * It is safe to delete the deny here,
 849                                          * as we are guarenteed by the deny first
 850                                          * ordering that all the deny entries for
 851                                          * this SID have already been merged into one
 852                                          * before we can get to an allow ace.
 853                                          */
 854
 855                                         DLIST_REMOVE(list_head, curr_ace_outer);
 856                                         SAFE_FREE(curr_ace_outer);
 857                                         break;
 858                                 }
 859                         }
 860
 861                 } /* end for curr_ace */
 862         } /* end for curr_ace_outer */
 863
 864         /* We may have modified the list. */
 865
 866         *pp_list_head = list_head;
 867 }
 868
 869 /****************************************************************************
 870  Check if we need to return NT4.x compatible ACL entries.
 871 ****************************************************************************/
 872
 873 static bool nt4_compatible_acls(void)
 874 {
 875         int compat = lp_acl_compatibility();
 876
 877         if (compat == ACL_COMPAT_AUTO) {
 878                 enum remote_arch_types ra_type = get_remote_arch();
 879
 880                 /* Automatically adapt to client */
 881                 return (ra_type <= RA_WINNT);
 882         } else
 883                 return (compat == ACL_COMPAT_WINNT);
 884 }
 885
 886
 887 /****************************************************************************
 888  Map canon_ace perms to permission bits NT.
 889  The attr element is not used here - we only process deny entries on set,
 890  not get. Deny entries are implicit on get with ace->perms = 0.
 891 ****************************************************************************/
 892
 893 static SEC_ACCESS map_canon_ace_perms(int snum,
 894                                 enum security_ace_type *pacl_type,
 895                                 mode_t perms,
 896                                 bool directory_ace)
 897 {
 898         SEC_ACCESS sa;
 899         uint32 nt_mask = 0;
 900
 901         *pacl_type = SEC_ACE_TYPE_ACCESS_ALLOWED;
 902
 903         if (lp_acl_map_full_control(snum) && ((perms & ALL_ACE_PERMS) == ALL_ACE_PERMS)) {
 904                 if (directory_ace) {
 905                         nt_mask = UNIX_DIRECTORY_ACCESS_RWX;
 906                 } else {
 907                         nt_mask = UNIX_ACCESS_RWX;
 908                 }
 909         } else if ((perms & ALL_ACE_PERMS) == (mode_t)0) {
 910                 /*
 911                  * Windows NT refuses to display ACEs with no permissions in them (but
 912                  * they are perfectly legal with Windows 2000). If the ACE has empty
 913                  * permissions we cannot use 0, so we use the otherwise unused
 914                  * WRITE_OWNER permission, which we ignore when we set an ACL.
 915                  * We abstract this into a #define of UNIX_ACCESS_NONE to allow this
 916                  * to be changed in the future.
 917                  */
 918
 919                 if (nt4_compatible_acls())
 920                         nt_mask = UNIX_ACCESS_NONE;
 921                 else
 922                         nt_mask = 0;
 923         } else {
 924                 if (directory_ace) {
 925                         nt_mask |= ((perms & S_IRUSR) ? UNIX_DIRECTORY_ACCESS_R : 0 );
 926                         nt_mask |= ((perms & S_IWUSR) ? UNIX_DIRECTORY_ACCESS_W : 0 );
 927                         nt_mask |= ((perms & S_IXUSR) ? UNIX_DIRECTORY_ACCESS_X : 0 );
 928                 } else {
 929                         nt_mask |= ((perms & S_IRUSR) ? UNIX_ACCESS_R : 0 );
 930                         nt_mask |= ((perms & S_IWUSR) ? UNIX_ACCESS_W : 0 );
 931                         nt_mask |= ((perms & S_IXUSR) ? UNIX_ACCESS_X : 0 );
 932                 }
 933         }
 934
 935         DEBUG(10,("map_canon_ace_perms: Mapped (UNIX) %x to (NT) %x\n",
 936                         (unsigned int)perms, (unsigned int)nt_mask ));
 937
 938         init_sec_access(&sa,nt_mask);
 939         return sa;
 940 }
 941
 942 /****************************************************************************
 943  Map NT perms to a UNIX mode_t.
 944 ****************************************************************************/
 945
 946 #define FILE_SPECIFIC_READ_BITS (FILE_READ_DATA|FILE_READ_EA|FILE_READ_ATTRIBUTES)
 947 #define FILE_SPECIFIC_WRITE_BITS (FILE_WRITE_DATA|FILE_APPEND_DATA|FILE_WRITE_EA|FILE_WRITE_ATTRIBUTES)
 948 #define FILE_SPECIFIC_EXECUTE_BITS (FILE_EXECUTE)
 949
 950 static mode_t map_nt_perms( uint32 *mask, int type)
 951 {
 952         mode_t mode = 0;
 953
 954         switch(type) {
 955         case S_IRUSR:
 956                 if((*mask) & GENERIC_ALL_ACCESS)
 957                         mode = S_IRUSR|S_IWUSR|S_IXUSR;
 958                 else {
 959                         mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRUSR : 0;
 960                         mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWUSR : 0;
 961                         mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXUSR : 0;
 962                 }
 963                 break;
 964         case S_IRGRP:
 965                 if((*mask) & GENERIC_ALL_ACCESS)
 966                         mode = S_IRGRP|S_IWGRP|S_IXGRP;
 967                 else {
 968                         mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IRGRP : 0;
 969                         mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWGRP : 0;
 970                         mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXGRP : 0;
 971                 }
 972                 break;
 973         case S_IROTH:
 974                 if((*mask) & GENERIC_ALL_ACCESS)
 975                         mode = S_IROTH|S_IWOTH|S_IXOTH;
 976                 else {
 977                         mode |= ((*mask) & (GENERIC_READ_ACCESS|FILE_SPECIFIC_READ_BITS)) ? S_IROTH : 0;
 978                         mode |= ((*mask) & (GENERIC_WRITE_ACCESS|FILE_SPECIFIC_WRITE_BITS)) ? S_IWOTH : 0;
 979                         mode |= ((*mask) & (GENERIC_EXECUTE_ACCESS|FILE_SPECIFIC_EXECUTE_BITS)) ? S_IXOTH : 0;
 980                 }
 981                 break;
 982         }
 983
 984         return mode;
 985 }
 986
 987 /****************************************************************************
 988  Unpack a SEC_DESC into a UNIX owner and group.
 989 ****************************************************************************/
 990
 991 NTSTATUS unpack_nt_owners(int snum, uid_t *puser, gid_t *pgrp, uint32 security_info_sent, SEC_DESC *psd)
 992 {
 993         DOM_SID owner_sid;
 994         DOM_SID grp_sid;
 995
 996         *puser = (uid_t)-1;
 997         *pgrp = (gid_t)-1;
 998
 999         if(security_info_sent == 0) {
1000                 DEBUG(0,("unpack_nt_owners: no security info sent !\n"));
1001                 return NT_STATUS_OK;
1002         }
1003
1004         /*
1005          * Validate the owner and group SID's.
1006          */
1007
1008         memset(&owner_sid, '\0', sizeof(owner_sid));
1009         memset(&grp_sid, '\0', sizeof(grp_sid));
1010
1011         DEBUG(5,("unpack_nt_owners: validating owner_sids.\n"));
1012
1013         /*
1014          * Don't immediately fail if the owner sid cannot be validated.
1015          * This may be a group chown only set.
1016          */
1017
1018         if (security_info_sent & OWNER_SECURITY_INFORMATION) {
1019                 sid_copy(&owner_sid, psd->owner_sid);
1020                 if (!sid_to_uid(&owner_sid, puser)) {
1021                         if (lp_force_unknown_acl_user(snum)) {
1022                                 /* this allows take ownership to work
1023                                  * reasonably */
1024                                 *puser = current_user.ut.uid;
1025                         } else {
1026                                 DEBUG(3,("unpack_nt_owners: unable to validate"
1027                                          " owner sid for %s\n",
1028                                          sid_string_dbg(&owner_sid)));
1029                                 return NT_STATUS_INVALID_OWNER;
1030                         }
1031                 }
1032                 DEBUG(3,("unpack_nt_owners: owner sid mapped to uid %u\n",
1033                          (unsigned int)*puser ));
1034         }
1035
1036         /*
1037          * Don't immediately fail if the group sid cannot be validated.
1038          * This may be an owner chown only set.
1039          */
1040
1041         if (security_info_sent & GROUP_SECURITY_INFORMATION) {
1042                 sid_copy(&grp_sid, psd->group_sid);
1043                 if (!sid_to_gid( &grp_sid, pgrp)) {
1044                         if (lp_force_unknown_acl_user(snum)) {
1045                                 /* this allows take group ownership to work
1046                                  * reasonably */
1047                                 *pgrp = current_user.ut.gid;
1048                         } else {
1049                                 DEBUG(3,("unpack_nt_owners: unable to validate"
1050                                          " group sid.\n"));
1051                                 return NT_STATUS_INVALID_OWNER;
1052                         }
1053                 }
1054                 DEBUG(3,("unpack_nt_owners: group sid mapped to gid %u\n",
1055                          (unsigned int)*pgrp));
1056         }
1057
1058         DEBUG(5,("unpack_nt_owners: owner_sids validated.\n"));
1059
1060         return NT_STATUS_OK;
1061 }
1062
1063 /****************************************************************************
1064  Ensure the enforced permissions for this share apply.
1065 ****************************************************************************/
1066
1067 static void apply_default_perms(const struct share_params *params,
1068                                 const bool is_directory, canon_ace *pace,
1069                                 mode_t type)
1070 {
1071         mode_t and_bits = (mode_t)0;
1072         mode_t or_bits = (mode_t)0;
1073
1074         /* Get the initial bits to apply. */
1075
1076         if (is_directory) {
1077                 and_bits = lp_dir_security_mask(params->service);
1078                 or_bits = lp_force_dir_security_mode(params->service);
1079         } else {
1080                 and_bits = lp_security_mask(params->service);
1081                 or_bits = lp_force_security_mode(params->service);
1082         }
1083
1084         /* Now bounce them into the S_USR space. */
1085         switch(type) {
1086         case S_IRUSR:
1087                 /* Ensure owner has read access. */
1088                 pace->perms |= S_IRUSR;
1089                 if (is_directory)
1090                         pace->perms |= (S_IWUSR|S_IXUSR);
1091                 and_bits = unix_perms_to_acl_perms(and_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1092                 or_bits = unix_perms_to_acl_perms(or_bits, S_IRUSR, S_IWUSR, S_IXUSR);
1093                 break;
1094         case S_IRGRP:
1095                 and_bits = unix_perms_to_acl_perms(and_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1096                 or_bits = unix_perms_to_acl_perms(or_bits, S_IRGRP, S_IWGRP, S_IXGRP);
1097                 break;
1098         case S_IROTH:
1099                 and_bits = unix_perms_to_acl_perms(and_bits, S_IROTH, S_IWOTH, S_IXOTH);
1100                 or_bits = unix_perms_to_acl_perms(or_bits, S_IROTH, S_IWOTH, S_IXOTH);
1101                 break;
1102         }
1103
1104         pace->perms = ((pace->perms & and_bits)|or_bits);
1105 }
1106
1107 /****************************************************************************
1108  Check if a given uid/SID is in a group gid/SID. This is probably very
1109  expensive and will need optimisation. A *lot* of optimisation :-). JRA.
1110 ****************************************************************************/
1111
1112 static bool uid_entry_in_group( canon_ace *uid_ace, canon_ace *group_ace )
1113 {
1114         const char *u_name = NULL;
1115
1116         /* "Everyone" always matches every uid. */
1117
1118         if (sid_equal(&group_ace->trustee, &global_sid_World))
1119                 return True;
1120
1121         /* Assume that the current user is in the current group (force group) */
1122
1123         if (uid_ace->unix_ug.uid == current_user.ut.uid && group_ace->unix_ug.gid == current_user.ut.gid)
1124                 return True;
1125
1126         /* u_name talloc'ed off tos. */
1127         u_name = uidtoname(uid_ace->unix_ug.uid);
1128         if (!u_name) {
1129                 return False;
1130         }
1131         return user_in_group_sid(u_name, &group_ace->trustee);
1132 }
1133
1134 /****************************************************************************
1135  A well formed POSIX file or default ACL has at least 3 entries, a
1136  SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ.
1137  In addition, the owner must always have at least read access.
1138  When using this call on get_acl, the pst struct is valid and contains
1139  the mode of the file. When using this call on set_acl, the pst struct has
1140  been modified to have a mode containing the default for this file or directory
1141  type.
1142 ****************************************************************************/
1143
1144 static bool ensure_canon_entry_valid(canon_ace **pp_ace,
1145                                      const struct share_params *params,
1146                                      const bool is_directory,
1147                                                         const DOM_SID *pfile_owner_sid,
1148                                                         const DOM_SID *pfile_grp_sid,
1149                                                         const SMB_STRUCT_STAT *pst,
1150                                                         bool setting_acl)
1151 {
1152         canon_ace *pace;
1153         bool got_user = False;
1154         bool got_grp = False;
1155         bool got_other = False;
1156         canon_ace *pace_other = NULL;
1157
1158         for (pace = *pp_ace; pace; pace = pace->next) {
1159                 if (pace->type == SMB_ACL_USER_OBJ) {
1160
1161                         if (setting_acl)
1162                                 apply_default_perms(params, is_directory, pace, S_IRUSR);
1163                         got_user = True;
1164
1165                 } else if (pace->type == SMB_ACL_GROUP_OBJ) {
1166
1167                         /*
1168                          * Ensure create mask/force create mode is respected on set.
1169                          */
1170
1171                         if (setting_acl)
1172                                 apply_default_perms(params, is_directory, pace, S_IRGRP);
1173                         got_grp = True;
1174
1175                 } else if (pace->type == SMB_ACL_OTHER) {
1176
1177                         /*
1178                          * Ensure create mask/force create mode is respected on set.
1179                          */
1180
1181                         if (setting_acl)
1182                                 apply_default_perms(params, is_directory, pace, S_IROTH);
1183                         got_other = True;
1184                         pace_other = pace;
1185                 }
1186         }
1187
1188         if (!got_user) {
1189                 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1190                         DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1191                         return False;
1192                 }
1193
1194                 ZERO_STRUCTP(pace);
1195                 pace->type = SMB_ACL_USER_OBJ;
1196                 pace->owner_type = UID_ACE;
1197                 pace->unix_ug.uid = pst->st_uid;
1198                 pace->trustee = *pfile_owner_sid;
1199                 pace->attr = ALLOW_ACE;
1200
1201                 if (setting_acl) {
1202                         /* See if the owning user is in any of the other groups in
1203                            the ACE. If so, OR in the permissions from that group. */
1204
1205                         bool group_matched = False;
1206                         canon_ace *pace_iter;
1207
1208                         for (pace_iter = *pp_ace; pace_iter; pace_iter = pace_iter->next) {
1209                                 if (pace_iter->type == SMB_ACL_GROUP_OBJ || pace_iter->type == SMB_ACL_GROUP) {
1210                                         if (uid_entry_in_group(pace, pace_iter)) {
1211                                                 pace->perms |= pace_iter->perms;
1212                                                 group_matched = True;
1213                                         }
1214                                 }
1215                         }
1216
1217                         /* If we only got an "everyone" perm, just use that. */
1218                         if (!group_matched) {
1219                                 if (got_other)
1220                                         pace->perms = pace_other->perms;
1221                                 else
1222                                         pace->perms = 0;
1223                         }
1224
1225                         apply_default_perms(params, is_directory, pace, S_IRUSR);
1226                 } else {
1227                         pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRUSR, S_IWUSR, S_IXUSR);
1228                 }
1229
1230                 DLIST_ADD(*pp_ace, pace);
1231         }
1232
1233         if (!got_grp) {
1234                 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1235                         DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1236                         return False;
1237                 }
1238
1239                 ZERO_STRUCTP(pace);
1240                 pace->type = SMB_ACL_GROUP_OBJ;
1241                 pace->owner_type = GID_ACE;
1242                 pace->unix_ug.uid = pst->st_gid;
1243                 pace->trustee = *pfile_grp_sid;
1244                 pace->attr = ALLOW_ACE;
1245                 if (setting_acl) {
1246                         /* If we only got an "everyone" perm, just use that. */
1247                         if (got_other)
1248                                 pace->perms = pace_other->perms;
1249                         else
1250                                 pace->perms = 0;
1251                         apply_default_perms(params, is_directory, pace, S_IRGRP);
1252                 } else {
1253                         pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IRGRP, S_IWGRP, S_IXGRP);
1254                 }
1255
1256                 DLIST_ADD(*pp_ace, pace);
1257         }
1258
1259         if (!got_other) {
1260                 if ((pace = SMB_MALLOC_P(canon_ace)) == NULL) {
1261                         DEBUG(0,("ensure_canon_entry_valid: malloc fail.\n"));
1262                         return False;
1263                 }
1264
1265                 ZERO_STRUCTP(pace);
1266                 pace->type = SMB_ACL_OTHER;
1267                 pace->owner_type = WORLD_ACE;
1268                 pace->unix_ug.world = -1;
1269                 pace->trustee = global_sid_World;
1270                 pace->attr = ALLOW_ACE;
1271                 if (setting_acl) {
1272                         pace->perms = 0;
1273                         apply_default_perms(params, is_directory, pace, S_IROTH);
1274                 } else
1275                         pace->perms = unix_perms_to_acl_perms(pst->st_mode, S_IROTH, S_IWOTH, S_IXOTH);
1276
1277                 DLIST_ADD(*pp_ace, pace);
1278         }
1279
1280         return True;
1281 }
1282
1283 /****************************************************************************
1284  Check if a POSIX ACL has the required SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries.
1285  If it does not have them, check if there are any entries where the trustee is the
1286  file owner or the owning group, and map these to SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ.
1287 ****************************************************************************/
1288
1289 static void check_owning_objs(canon_ace *ace, DOM_SID *pfile_owner_sid, DOM_SID *pfile_grp_sid)
1290 {
1291         bool got_user_obj, got_group_obj;
1292         canon_ace *current_ace;
1293         int i, entries;
1294
1295         entries = count_canon_ace_list(ace);
1296         got_user_obj = False;
1297         got_group_obj = False;
1298
1299         for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1300                 if (current_ace->type == SMB_ACL_USER_OBJ)
1301                         got_user_obj = True;
1302                 else if (current_ace->type == SMB_ACL_GROUP_OBJ)
1303                         got_group_obj = True;
1304         }
1305         if (got_user_obj && got_group_obj) {
1306                 DEBUG(10,("check_owning_objs: ACL had owning user/group entries.\n"));
1307                 return;
1308         }
1309
1310         for (i=0, current_ace = ace; i < entries; i++, current_ace = current_ace->next) {
1311                 if (!got_user_obj && current_ace->owner_type == UID_ACE &&
1312                                 sid_equal(&current_ace->trustee, pfile_owner_sid)) {
1313                         current_ace->type = SMB_ACL_USER_OBJ;
1314                         got_user_obj = True;
1315                 }
1316                 if (!got_group_obj && current_ace->owner_type == GID_ACE &&
1317                                 sid_equal(&current_ace->trustee, pfile_grp_sid)) {
1318                         current_ace->type = SMB_ACL_GROUP_OBJ;
1319                         got_group_obj = True;
1320                 }
1321         }
1322         if (!got_user_obj)
1323                 DEBUG(10,("check_owning_objs: ACL is missing an owner entry.\n"));
1324         if (!got_group_obj)
1325                 DEBUG(10,("check_owning_objs: ACL is missing an owning group entry.\n"));
1326 }
1327
1328 /****************************************************************************
1329  Unpack a SEC_DESC into two canonical ace lists.
1330 ****************************************************************************/
1331
1332 static bool create_canon_ace_lists(files_struct *fsp, SMB_STRUCT_STAT *pst,
1333                                                         DOM_SID *pfile_owner_sid,
1334                                                         DOM_SID *pfile_grp_sid,
1335                                                         canon_ace **ppfile_ace, canon_ace **ppdir_ace,
1336                                                         SEC_ACL *dacl)
1337 {
1338         bool all_aces_are_inherit_only = (fsp->is_directory ? True : False);
1339         canon_ace *file_ace = NULL;
1340         canon_ace *dir_ace = NULL;
1341         canon_ace *current_ace = NULL;
1342         bool got_dir_allow = False;
1343         bool got_file_allow = False;
1344         int i, j;
1345
1346         *ppfile_ace = NULL;
1347         *ppdir_ace = NULL;
1348
1349         /*
1350          * Convert the incoming ACL into a more regular form.
1351          */
1352
1353         for(i = 0; i < dacl->num_aces; i++) {
1354                 SEC_ACE *psa = &dacl->aces[i];
1355
1356                 if((psa->type != SEC_ACE_TYPE_ACCESS_ALLOWED) && (psa->type != SEC_ACE_TYPE_ACCESS_DENIED)) {
1357                         DEBUG(3,("create_canon_ace_lists: unable to set anything but an ALLOW or DENY ACE.\n"));
1358                         return False;
1359                 }
1360
1361                 if (nt4_compatible_acls()) {
1362                         /*
1363                          * The security mask may be UNIX_ACCESS_NONE which should map into
1364                          * no permissions (we overload the WRITE_OWNER bit for this) or it
1365                          * should be one of the ALL/EXECUTE/READ/WRITE bits. Arrange for this
1366                          * to be so. Any other bits override the UNIX_ACCESS_NONE bit.
1367                          */
1368
1369                         /*
1370                          * Convert GENERIC bits to specific bits.
1371                          */
1372
1373                         se_map_generic(&psa->access_mask, &file_generic_mapping);
1374
1375                         psa->access_mask &= (UNIX_ACCESS_NONE|FILE_ALL_ACCESS);
1376
1377                         if(psa->access_mask != UNIX_ACCESS_NONE)
1378                                 psa->access_mask &= ~UNIX_ACCESS_NONE;
1379                 }
1380         }
1381
1382         /*
1383          * Deal with the fact that NT 4.x re-writes the canonical format
1384          * that we return for default ACLs. If a directory ACE is identical
1385          * to a inherited directory ACE then NT changes the bits so that the
1386          * first ACE is set to OI|IO and the second ACE for this SID is set
1387          * to CI. We need to repair this. JRA.
1388          */
1389
1390         for(i = 0; i < dacl->num_aces; i++) {
1391                 SEC_ACE *psa1 = &dacl->aces[i];
1392
1393                 for (j = i + 1; j < dacl->num_aces; j++) {
1394                         SEC_ACE *psa2 = &dacl->aces[j];
1395
1396                         if (psa1->access_mask != psa2->access_mask)
1397                                 continue;
1398
1399                         if (!sid_equal(&psa1->trustee, &psa2->trustee))
1400                                 continue;
1401
1402                         /*
1403                          * Ok - permission bits and SIDs are equal.
1404                          * Check if flags were re-written.
1405                          */
1406
1407                         if (psa1->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1408
1409                                 psa1->flags |= (psa2->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1410                                 psa2->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1411
1412                         } else if (psa2->flags & SEC_ACE_FLAG_INHERIT_ONLY) {
1413
1414                                 psa2->flags |= (psa1->flags & (SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT));
1415                                 psa1->flags &= ~(SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_OBJECT_INHERIT);
1416
1417                         }
1418                 }
1419         }
1420
1421         for(i = 0; i < dacl->num_aces; i++) {
1422                 SEC_ACE *psa = &dacl->aces[i];
1423
1424                 /*
1425                  * Create a cannon_ace entry representing this NT DACL ACE.
1426                  */
1427
1428                 if ((current_ace = SMB_MALLOC_P(canon_ace)) == NULL) {
1429                         free_canon_ace_list(file_ace);
1430                         free_canon_ace_list(dir_ace);
1431                         DEBUG(0,("create_canon_ace_lists: malloc fail.\n"));
1432                         return False;
1433                 }
1434
1435                 ZERO_STRUCTP(current_ace);
1436
1437                 sid_copy(&current_ace->trustee, &psa->trustee);
1438
1439                 /*
1440                  * Try and work out if the SID is a user or group
1441                  * as we need to flag these differently for POSIX.
1442                  * Note what kind of a POSIX ACL this should map to.
1443                  */
1444
1445                 if( sid_equal(&current_ace->trustee, &global_sid_World)) {
1446                         current_ace->owner_type = WORLD_ACE;
1447                         current_ace->unix_ug.world = -1;
1448                         current_ace->type = SMB_ACL_OTHER;
1449                 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Owner)) {
1450                         current_ace->owner_type = UID_ACE;
1451                         current_ace->unix_ug.uid = pst->st_uid;
1452                         current_ace->type = SMB_ACL_USER_OBJ;
1453
1454                         /*
1455                          * The Creator Owner entry only specifies inheritable permissions,
1456                          * never access permissions. WinNT doesn't always set the ACE to
1457                          *INHERIT_ONLY, though.
1458                          */
1459
1460                         if (nt4_compatible_acls())
1461                                 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1462                 } else if (sid_equal(&current_ace->trustee, &global_sid_Creator_Group)) {
1463                         current_ace->owner_type = GID_ACE;
1464                         current_ace->unix_ug.gid = pst->st_gid;
1465                         current_ace->type = SMB_ACL_GROUP_OBJ;
1466
1467                         /*
1468                          * The Creator Group entry only specifies inheritable permissions,
1469                          * never access permissions. WinNT doesn't always set the ACE to
1470                          *INHERIT_ONLY, though.
1471                          */
1472                         if (nt4_compatible_acls())
1473                                 psa->flags |= SEC_ACE_FLAG_INHERIT_ONLY;
1474
1475                 } else if (sid_to_uid( &current_ace->trustee, &current_ace->unix_ug.uid)) {
1476                         current_ace->owner_type = UID_ACE;
1477                         current_ace->type = SMB_ACL_USER;
1478                 } else if (sid_to_gid( &current_ace->trustee, &current_ace->unix_ug.gid)) {
1479                         current_ace->owner_type = GID_ACE;
1480                         current_ace->type = SMB_ACL_GROUP;
1481                 } else {
1482                         /*
1483                          * Silently ignore map failures in non-mappable SIDs (NT Authority, BUILTIN etc).
1484                          */
1485
1486                         if (non_mappable_sid(&psa->trustee)) {
1487                                 DEBUG(10, ("create_canon_ace_lists: ignoring "
1488                                            "non-mappable SID %s\n",
1489                                            sid_string_dbg(&psa->trustee)));
1490                                 SAFE_FREE(current_ace);
1491                                 continue;
1492                         }
1493
1494                         free_canon_ace_list(file_ace);
1495                         free_canon_ace_list(dir_ace);
1496                         DEBUG(0, ("create_canon_ace_lists: unable to map SID "
1497                                   "%s to uid or gid.\n",
1498                                   sid_string_dbg(&current_ace->trustee)));
1499                         SAFE_FREE(current_ace);
1500                         return False;
1501                 }
1502
1503                 /*
1504                  * Map the given NT permissions into a UNIX mode_t containing only
1505                  * S_I(R|W|X)USR bits.
1506                  */
1507
1508                 current_ace->perms |= map_nt_perms( &psa->access_mask, S_IRUSR);
1509                 current_ace->attr = (psa->type == SEC_ACE_TYPE_ACCESS_ALLOWED) ? ALLOW_ACE : DENY_ACE;
1510                 current_ace->inherited = ((psa->flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False);
1511
1512                 /*
1513                  * Now add the created ace to either the file list, the directory
1514                  * list, or both. We *MUST* preserve the order here (hence we use
1515                  * DLIST_ADD_END) as NT ACLs are order dependent.
1516                  */
1517
1518                 if (fsp->is_directory) {
1519
1520                         /*
1521                          * We can only add to the default POSIX ACE list if the ACE is
1522                          * designed to be inherited by both files and directories.
1523                          */
1524
1525                         if ((psa->flags & (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) ==
1526                                 (SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT)) {
1527
1528                                 DLIST_ADD_END(dir_ace, current_ace, canon_ace *);
1529
1530                                 /*
1531                                  * Note if this was an allow ace. We can't process
1532                                  * any further deny ace's after this.
1533                                  */
1534
1535                                 if (current_ace->attr == ALLOW_ACE)
1536                                         got_dir_allow = True;
1537
1538                                 if ((current_ace->attr == DENY_ACE) && got_dir_allow) {
1539                                         DEBUG(0,("create_canon_ace_lists: malformed ACL in inheritable ACL ! \
1540 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1541                                         free_canon_ace_list(file_ace);
1542                                         free_canon_ace_list(dir_ace);
1543                                         return False;
1544                                 }
1545
1546                                 if( DEBUGLVL( 10 )) {
1547                                         dbgtext("create_canon_ace_lists: adding dir ACL:\n");
1548                                         print_canon_ace( current_ace, 0);
1549                                 }
1550
1551                                 /*
1552                                  * If this is not an inherit only ACE we need to add a duplicate
1553                                  * to the file acl.
1554                                  */
1555
1556                                 if (!(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1557                                         canon_ace *dup_ace = dup_canon_ace(current_ace);
1558
1559                                         if (!dup_ace) {
1560                                                 DEBUG(0,("create_canon_ace_lists: malloc fail !\n"));
1561                                                 free_canon_ace_list(file_ace);
1562                                                 free_canon_ace_list(dir_ace);
1563                                                 return False;
1564                                         }
1565
1566                                         /*
1567                                          * We must not free current_ace here as its
1568                                          * pointer is now owned by the dir_ace list.
1569                                          */
1570                                         current_ace = dup_ace;
1571                                 } else {
1572                                         /*
1573                                          * We must not free current_ace here as its
1574                                          * pointer is now owned by the dir_ace list.
1575                                          */
1576                                         current_ace = NULL;
1577                                 }
1578                         }
1579                 }
1580
1581                 /*
1582                  * Only add to the file ACL if not inherit only.
1583                  */
1584
1585                 if (current_ace && !(psa->flags & SEC_ACE_FLAG_INHERIT_ONLY)) {
1586                         DLIST_ADD_END(file_ace, current_ace, canon_ace *);
1587
1588                         /*
1589                          * Note if this was an allow ace. We can't process
1590                          * any further deny ace's after this.
1591                          */
1592
1593                         if (current_ace->attr == ALLOW_ACE)
1594                                 got_file_allow = True;
1595
1596                         if ((current_ace->attr == DENY_ACE) && got_file_allow) {
1597                                 DEBUG(0,("create_canon_ace_lists: malformed ACL in file ACL ! \
1598 Deny entry after Allow entry. Failing to set on file %s.\n", fsp->fsp_name ));
1599                                 free_canon_ace_list(file_ace);
1600                                 free_canon_ace_list(dir_ace);
1601                                 return False;
1602                         }
1603
1604                         if( DEBUGLVL( 10 )) {
1605                                 dbgtext("create_canon_ace_lists: adding file ACL:\n");
1606                                 print_canon_ace( current_ace, 0);
1607                         }
1608                         all_aces_are_inherit_only = False;
1609                         /*
1610                          * We must not free current_ace here as its
1611                          * pointer is now owned by the file_ace list.
1612                          */
1613                         current_ace = NULL;
1614                 }
1615
1616                 /*
1617                  * Free if ACE was not added.
1618                  */
1619
1620                 SAFE_FREE(current_ace);
1621         }
1622
1623         if (fsp->is_directory && all_aces_are_inherit_only) {
1624                 /*
1625                  * Windows 2000 is doing one of these weird 'inherit acl'
1626                  * traverses to conserve NTFS ACL resources. Just pretend
1627                  * there was no DACL sent. JRA.
1628                  */
1629
1630                 DEBUG(10,("create_canon_ace_lists: Win2k inherit acl traverse. Ignoring DACL.\n"));
1631                 free_canon_ace_list(file_ace);
1632                 free_canon_ace_list(dir_ace);
1633                 file_ace = NULL;
1634                 dir_ace = NULL;
1635         } else {
1636                 /*
1637                  * Check if we have SMB_ACL_USER_OBJ and SMB_ACL_GROUP_OBJ entries in each
1638                  * ACL. If we don't have them, check if any SMB_ACL_USER/SMB_ACL_GROUP
1639                  * entries can be converted to *_OBJ. Usually we will already have these
1640                  * entries in the Default ACL, and the Access ACL will not have them.
1641                  */
1642                 if (file_ace) {
1643                         check_owning_objs(file_ace, pfile_owner_sid, pfile_grp_sid);
1644                 }
1645                 if (dir_ace) {
1646                         check_owning_objs(dir_ace, pfile_owner_sid, pfile_grp_sid);
1647                 }
1648         }
1649
1650         *ppfile_ace = file_ace;
1651         *ppdir_ace = dir_ace;
1652
1653         return True;
1654 }
1655
1656 /****************************************************************************
1657  ASCII art time again... JRA :-).
1658
1659  We have 4 cases to process when moving from an NT ACL to a POSIX ACL. Firstly,
1660  we insist the ACL is in canonical form (ie. all DENY entries preceede ALLOW
1661  entries). Secondly, the merge code has ensured that all duplicate SID entries for
1662  allow or deny have been merged, so the same SID can only appear once in the deny
1663  list or once in the allow list.
1664
1665  We then process as follows :
1666
1667  ---------------------------------------------------------------------------
1668  First pass - look for a Everyone DENY entry.
1669
1670  If it is deny all (rwx) trunate the list at this point.
1671  Else, walk the list from this point and use the deny permissions of this
1672  entry as a mask on all following allow entries. Finally, delete
1673  the Everyone DENY entry (we have applied it to everything possible).
1674
1675  In addition, in this pass we remove any DENY entries that have
1676  no permissions (ie. they are a DENY nothing).
1677  ---------------------------------------------------------------------------
1678  Second pass - only deal with deny user entries.
1679
1680  DENY user1 (perms XXX)
1681
1682  new_perms = 0
1683  for all following allow group entries where user1 is in group
1684         new_perms |= group_perms;
1685
1686  user1 entry perms = new_perms & ~ XXX;
1687
1688  Convert the deny entry to an allow entry with the new perms and
1689  push to the end of the list. Note if the user was in no groups
1690  this maps to a specific allow nothing entry for this user.
1691
1692  The common case from the NT ACL choser (userX deny all) is
1693  optimised so we don't do the group lookup - we just map to
1694  an allow nothing entry.
1695
1696  What we're doing here is inferring the allow permissions the
1697  person setting the ACE on user1 wanted by looking at the allow
1698  permissions on the groups the user is currently in. This will
1699  be a snapshot, depending on group membership but is the best
1700  we can do and has the advantage of failing closed rather than
1701  open.
1702  ---------------------------------------------------------------------------
1703  Third pass - only deal with deny group entries.
1704
1705  DENY group1 (perms XXX)
1706
1707  for all following allow user entries where user is in group1
1708    user entry perms = user entry perms & ~ XXX;
1709
1710  If there is a group Everyone allow entry with permissions YYY,
1711  convert the group1 entry to an allow entry and modify its
1712  permissions to be :
1713
1714  new_perms = YYY & ~ XXX
1715
1716  and push to the end of the list.
1717
1718  If there is no group Everyone allow entry then convert the
1719  group1 entry to a allow nothing entry and push to the end of the list.
1720
1721  Note that the common case from the NT ACL choser (groupX deny all)
1722  cannot be optimised here as we need to modify user entries who are
1723  in the group to change them to a deny all also.
1724
1725  What we're doing here is modifying the allow permissions of
1726  user entries (which are more specific in POSIX ACLs) to mask
1727  out the explicit deny set on the group they are in. This will
1728  be a snapshot depending on current group membership but is the
1729  best we can do and has the advantage of failing closed rather
1730  than open.
1731  ---------------------------------------------------------------------------
1732  Fourth pass - cope with cumulative permissions.
1733
1734  for all allow user entries, if there exists an allow group entry with
1735  more permissive permissions, and the user is in that group, rewrite the
1736  allow user permissions to contain both sets of permissions.
1737
1738  Currently the code for this is #ifdef'ed out as these semantics make
1739  no sense to me. JRA.
1740  ---------------------------------------------------------------------------
1741
1742  Note we *MUST* do the deny user pass first as this will convert deny user
1743  entries into allow user entries which can then be processed by the deny
1744  group pass.
1745
1746  The above algorithm took a *lot* of thinking about - hence this
1747  explaination :-). JRA.
1748 ****************************************************************************/
1749
1750 /****************************************************************************
1751  Process a canon_ace list entries. This is very complex code. We need
1752  to go through and remove the "deny" permissions from any allow entry that matches
1753  the id of this entry. We have already refused any NT ACL that wasn't in correct
1754  order (DENY followed by ALLOW). If any allow entry ends up with zero permissions,
1755  we just remove it (to fail safe). We have already removed any duplicate ace
1756  entries. Treat an "Everyone" DENY_ACE as a special case - use it to mask all
1757  allow entries.
1758 ****************************************************************************/
1759
1760 static void process_deny_list( canon_ace **pp_ace_list )
1761 {
1762         canon_ace *ace_list = *pp_ace_list;
1763         canon_ace *curr_ace = NULL;
1764         canon_ace *curr_ace_next = NULL;
1765
1766         /* Pass 1 above - look for an Everyone, deny entry. */
1767
1768         for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1769                 canon_ace *allow_ace_p;
1770
1771                 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1772
1773                 if (curr_ace->attr != DENY_ACE)
1774                         continue;
1775
1776                 if (curr_ace->perms == (mode_t)0) {
1777
1778                         /* Deny nothing entry - delete. */
1779
1780                         DLIST_REMOVE(ace_list, curr_ace);
1781                         continue;
1782                 }
1783
1784                 if (!sid_equal(&curr_ace->trustee, &global_sid_World))
1785                         continue;
1786
1787                 /* JRATEST - assert. */
1788                 SMB_ASSERT(curr_ace->owner_type == WORLD_ACE);
1789
1790                 if (curr_ace->perms == ALL_ACE_PERMS) {
1791
1792                         /*
1793                          * Optimisation. This is a DENY_ALL to Everyone. Truncate the
1794                          * list at this point including this entry.
1795                          */
1796
1797                         canon_ace *prev_entry = curr_ace->prev;
1798
1799                         free_canon_ace_list( curr_ace );
1800                         if (prev_entry)
1801                                 prev_entry->next = NULL;
1802                         else {
1803                                 /* We deleted the entire list. */
1804                                 ace_list = NULL;
1805                         }
1806                         break;
1807                 }
1808
1809                 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1810
1811                         /*
1812                          * Only mask off allow entries.
1813                          */
1814
1815                         if (allow_ace_p->attr != ALLOW_ACE)
1816                                 continue;
1817
1818                         allow_ace_p->perms &= ~curr_ace->perms;
1819                 }
1820
1821                 /*
1822                  * Now it's been applied, remove it.
1823                  */
1824
1825                 DLIST_REMOVE(ace_list, curr_ace);
1826         }
1827
1828         /* Pass 2 above - deal with deny user entries. */
1829
1830         for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1831                 mode_t new_perms = (mode_t)0;
1832                 canon_ace *allow_ace_p;
1833
1834                 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1835
1836                 if (curr_ace->attr != DENY_ACE)
1837                         continue;
1838
1839                 if (curr_ace->owner_type != UID_ACE)
1840                         continue;
1841
1842                 if (curr_ace->perms == ALL_ACE_PERMS) {
1843
1844                         /*
1845                          * Optimisation - this is a deny everything to this user.
1846                          * Convert to an allow nothing and push to the end of the list.
1847                          */
1848
1849                         curr_ace->attr = ALLOW_ACE;
1850                         curr_ace->perms = (mode_t)0;
1851                         DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1852                         continue;
1853                 }
1854
1855                 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1856
1857                         if (allow_ace_p->attr != ALLOW_ACE)
1858                                 continue;
1859
1860                         /* We process GID_ACE and WORLD_ACE entries only. */
1861
1862                         if (allow_ace_p->owner_type == UID_ACE)
1863                                 continue;
1864
1865                         if (uid_entry_in_group( curr_ace, allow_ace_p))
1866                                 new_perms |= allow_ace_p->perms;
1867                 }
1868
1869                 /*
1870                  * Convert to a allow entry, modify the perms and push to the end
1871                  * of the list.
1872                  */
1873
1874                 curr_ace->attr = ALLOW_ACE;
1875                 curr_ace->perms = (new_perms & ~curr_ace->perms);
1876                 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1877         }
1878
1879         /* Pass 3 above - deal with deny group entries. */
1880
1881         for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1882                 canon_ace *allow_ace_p;
1883                 canon_ace *allow_everyone_p = NULL;
1884
1885                 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1886
1887                 if (curr_ace->attr != DENY_ACE)
1888                         continue;
1889
1890                 if (curr_ace->owner_type != GID_ACE)
1891                         continue;
1892
1893                 for (allow_ace_p = curr_ace->next; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1894
1895                         if (allow_ace_p->attr != ALLOW_ACE)
1896                                 continue;
1897
1898                         /* Store a pointer to the Everyone allow, if it exists. */
1899                         if (allow_ace_p->owner_type == WORLD_ACE)
1900                                 allow_everyone_p = allow_ace_p;
1901
1902                         /* We process UID_ACE entries only. */
1903
1904                         if (allow_ace_p->owner_type != UID_ACE)
1905                                 continue;
1906
1907                         /* Mask off the deny group perms. */
1908
1909                         if (uid_entry_in_group( allow_ace_p, curr_ace))
1910                                 allow_ace_p->perms &= ~curr_ace->perms;
1911                 }
1912
1913                 /*
1914                  * Convert the deny to an allow with the correct perms and
1915                  * push to the end of the list.
1916                  */
1917
1918                 curr_ace->attr = ALLOW_ACE;
1919                 if (allow_everyone_p)
1920                         curr_ace->perms = allow_everyone_p->perms & ~curr_ace->perms;
1921                 else
1922                         curr_ace->perms = (mode_t)0;
1923                 DLIST_DEMOTE(ace_list, curr_ace, canon_ace *);
1924         }
1925
1926         /* Doing this fourth pass allows Windows semantics to be layered
1927          * on top of POSIX semantics. I'm not sure if this is desirable.
1928          * For example, in W2K ACLs there is no way to say, "Group X no
1929          * access, user Y full access" if user Y is a member of group X.
1930          * This seems completely broken semantics to me.... JRA.
1931          */
1932
1933 #if 0
1934         /* Pass 4 above - deal with allow entries. */
1935
1936         for (curr_ace = ace_list; curr_ace; curr_ace = curr_ace_next) {
1937                 canon_ace *allow_ace_p;
1938
1939                 curr_ace_next = curr_ace->next; /* So we can't lose the link. */
1940
1941                 if (curr_ace->attr != ALLOW_ACE)
1942                         continue;
1943
1944                 if (curr_ace->owner_type != UID_ACE)
1945                         continue;
1946
1947                 for (allow_ace_p = ace_list; allow_ace_p; allow_ace_p = allow_ace_p->next) {
1948
1949                         if (allow_ace_p->attr != ALLOW_ACE)
1950                                 continue;
1951
1952                         /* We process GID_ACE entries only. */
1953
1954                         if (allow_ace_p->owner_type != GID_ACE)
1955                                 continue;
1956
1957                         /* OR in the group perms. */
1958
1959                         if (uid_entry_in_group( curr_ace, allow_ace_p))
1960                                 curr_ace->perms |= allow_ace_p->perms;
1961                 }
1962         }
1963 #endif
1964
1965         *pp_ace_list = ace_list;
1966 }
1967
1968 /****************************************************************************
1969  Create a default mode that will be used if a security descriptor entry has
1970  no user/group/world entries.
1971 ****************************************************************************/
1972
1973 static mode_t create_default_mode(files_struct *fsp, bool interitable_mode)
1974 {
1975         int snum = SNUM(fsp->conn);
1976         mode_t and_bits = (mode_t)0;
1977         mode_t or_bits = (mode_t)0;
1978         mode_t mode = interitable_mode
1979                 ? unix_mode( fsp->conn, FILE_ATTRIBUTE_ARCHIVE, fsp->fsp_name,
1980                              NULL )
1981                 : S_IRUSR;
1982
1983         if (fsp->is_directory)
1984                 mode |= (S_IWUSR|S_IXUSR);
1985
1986         /*
1987          * Now AND with the create mode/directory mode bits then OR with the
1988          * force create mode/force directory mode bits.
1989          */
1990
1991         if (fsp->is_directory) {
1992                 and_bits = lp_dir_security_mask(snum);
1993                 or_bits = lp_force_dir_security_mode(snum);
1994         } else {
1995                 and_bits = lp_security_mask(snum);
1996                 or_bits = lp_force_security_mode(snum);
1997         }
1998
1999         return ((mode & and_bits)|or_bits);
2000 }
2001
2002 /****************************************************************************
2003  Unpack a SEC_DESC into two canonical ace lists. We don't depend on this
2004  succeeding.
2005 ****************************************************************************/
2006
2007 static bool unpack_canon_ace(files_struct *fsp,
2008                                                         SMB_STRUCT_STAT *pst,
2009                                                         DOM_SID *pfile_owner_sid,
2010                                                         DOM_SID *pfile_grp_sid,
2011                                                         canon_ace **ppfile_ace, canon_ace **ppdir_ace,
2012                                                         uint32 security_info_sent, SEC_DESC *psd)
2013 {
2014         canon_ace *file_ace = NULL;
2015         canon_ace *dir_ace = NULL;
2016
2017         *ppfile_ace = NULL;
2018         *ppdir_ace = NULL;
2019
2020         if(security_info_sent == 0) {
2021                 DEBUG(0,("unpack_canon_ace: no security info sent !\n"));
2022                 return False;
2023         }
2024
2025         /*
2026          * If no DACL then this is a chown only security descriptor.
2027          */
2028
2029         if(!(security_info_sent & DACL_SECURITY_INFORMATION) || !psd->dacl)
2030                 return True;
2031
2032         /*
2033          * Now go through the DACL and create the canon_ace lists.
2034          */
2035
2036         if (!create_canon_ace_lists( fsp, pst, pfile_owner_sid, pfile_grp_sid,
2037                                                                 &file_ace, &dir_ace, psd->dacl))
2038                 return False;
2039
2040         if ((file_ace == NULL) && (dir_ace == NULL)) {
2041                 /* W2K traverse DACL set - ignore. */
2042                 return True;
2043         }
2044
2045         /*
2046          * Go through the canon_ace list and merge entries
2047          * belonging to identical users of identical allow or deny type.
2048          * We can do this as all deny entries come first, followed by
2049          * all allow entries (we have mandated this before accepting this acl).
2050          */
2051
2052         print_canon_ace_list( "file ace - before merge", file_ace);
2053         merge_aces( &file_ace );
2054
2055         print_canon_ace_list( "dir ace - before merge", dir_ace);
2056         merge_aces( &dir_ace );
2057
2058         /*
2059          * NT ACLs are order dependent. Go through the acl lists and
2060          * process DENY entries by masking the allow entries.
2061          */
2062
2063         print_canon_ace_list( "file ace - before deny", file_ace);
2064         process_deny_list( &file_ace);
2065
2066         print_canon_ace_list( "dir ace - before deny", dir_ace);
2067         process_deny_list( &dir_ace);
2068
2069         /*
2070          * A well formed POSIX file or default ACL has at least 3 entries, a
2071          * SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER_OBJ
2072          * and optionally a mask entry. Ensure this is the case.
2073          */
2074
2075         print_canon_ace_list( "file ace - before valid", file_ace);
2076
2077         /*
2078          * A default 3 element mode entry for a file should be r-- --- ---.
2079          * A default 3 element mode entry for a directory should be rwx --- ---.
2080          */
2081
2082         pst->st_mode = create_default_mode(fsp, False);
2083
2084         if (!ensure_canon_entry_valid(&file_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2085                 free_canon_ace_list(file_ace);
2086                 free_canon_ace_list(dir_ace);
2087                 return False;
2088         }
2089
2090         print_canon_ace_list( "dir ace - before valid", dir_ace);
2091
2092         /*
2093          * A default inheritable 3 element mode entry for a directory should be the
2094          * mode Samba will use to create a file within. Ensure user rwx bits are set if
2095          * it's a directory.
2096          */
2097
2098         pst->st_mode = create_default_mode(fsp, True);
2099
2100         if (dir_ace && !ensure_canon_entry_valid(&dir_ace, fsp->conn->params, fsp->is_directory, pfile_owner_sid, pfile_grp_sid, pst, True)) {
2101                 free_canon_ace_list(file_ace);
2102                 free_canon_ace_list(dir_ace);
2103                 return False;
2104         }
2105
2106         print_canon_ace_list( "file ace - return", file_ace);
2107         print_canon_ace_list( "dir ace - return", dir_ace);
2108
2109         *ppfile_ace = file_ace;
2110         *ppdir_ace = dir_ace;
2111         return True;
2112
2113 }
2114
2115 /******************************************************************************
2116  When returning permissions, try and fit NT display
2117  semantics if possible. Note the the canon_entries here must have been malloced.
2118  The list format should be - first entry = owner, followed by group and other user
2119  entries, last entry = other.
2120
2121  Note that this doesn't exactly match the NT semantics for an ACL. As POSIX entries
2122  are not ordered, and match on the most specific entry rather than walking a list,
2123  then a simple POSIX permission of rw-r--r-- should really map to 5 entries,
2124
2125  Entry 0: owner : deny all except read and write.
2126  Entry 1: owner : allow read and write.
2127  Entry 2: group : deny all except read.
2128  Entry 3: group : allow read.
2129  Entry 4: Everyone : allow read.
2130
2131  But NT cannot display this in their ACL editor !
2132 ********************************************************************************/
2133
2134 static void arrange_posix_perms(const char *filename, canon_ace **pp_list_head)
2135 {
2136         canon_ace *list_head = *pp_list_head;
2137         canon_ace *owner_ace = NULL;
2138         canon_ace *other_ace = NULL;
2139         canon_ace *ace = NULL;
2140
2141         for (ace = list_head; ace; ace = ace->next) {
2142                 if (ace->type == SMB_ACL_USER_OBJ)
2143                         owner_ace = ace;
2144                 else if (ace->type == SMB_ACL_OTHER) {
2145                         /* Last ace - this is "other" */
2146                         other_ace = ace;
2147                 }
2148         }
2149
2150         if (!owner_ace || !other_ace) {
2151                 DEBUG(0,("arrange_posix_perms: Invalid POSIX permissions for file %s, missing owner or other.\n",
2152                         filename ));
2153                 return;
2154         }
2155
2156         /*
2157          * The POSIX algorithm applies to owner first, and other last,
2158          * so ensure they are arranged in this order.
2159          */
2160
2161         if (owner_ace) {
2162                 DLIST_PROMOTE(list_head, owner_ace);
2163         }
2164
2165         if (other_ace) {
2166                 DLIST_DEMOTE(list_head, other_ace, canon_ace *);
2167         }
2168
2169         /* We have probably changed the head of the list. */
2170
2171         *pp_list_head = list_head;
2172 }
2173
2174 /****************************************************************************
2175  Create a linked list of canonical ACE entries.
2176 ****************************************************************************/
2177
2178 static canon_ace *canonicalise_acl(struct connection_struct *conn,
2179                                    const char *fname, SMB_ACL_T posix_acl,
2180                                    const SMB_STRUCT_STAT *psbuf,
2181                                    const DOM_SID *powner, const DOM_SID *pgroup, struct pai_val *pal, SMB_ACL_TYPE_T the_acl_type)
2182 {
2183         mode_t acl_mask = (S_IRUSR|S_IWUSR|S_IXUSR);
2184         canon_ace *list_head = NULL;
2185         canon_ace *ace = NULL;
2186         canon_ace *next_ace = NULL;
2187         int entry_id = SMB_ACL_FIRST_ENTRY;
2188         SMB_ACL_ENTRY_T entry;
2189         size_t ace_count;
2190
2191         while ( posix_acl && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1)) {
2192                 SMB_ACL_TAG_T tagtype;
2193                 SMB_ACL_PERMSET_T permset;
2194                 DOM_SID sid;
2195                 posix_id unix_ug;
2196                 enum ace_owner owner_type;
2197
2198                 /* get_next... */
2199                 if (entry_id == SMB_ACL_FIRST_ENTRY)
2200                         entry_id = SMB_ACL_NEXT_ENTRY;
2201
2202                 /* Is this a MASK entry ? */
2203                 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
2204                         continue;
2205
2206                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
2207                         continue;
2208
2209                 /* Decide which SID to use based on the ACL type. */
2210                 switch(tagtype) {
2211                         case SMB_ACL_USER_OBJ:
2212                                 /* Get the SID from the owner. */
2213                                 sid_copy(&sid, powner);
2214                                 unix_ug.uid = psbuf->st_uid;
2215                                 owner_type = UID_ACE;
2216                                 break;
2217                         case SMB_ACL_USER:
2218                                 {
2219                                         uid_t *puid = (uid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2220                                         if (puid == NULL) {
2221                                                 DEBUG(0,("canonicalise_acl: Failed to get uid.\n"));
2222                                                 continue;
2223                                         }
2224                                         /*
2225                                          * A SMB_ACL_USER entry for the owner is shadowed by the
2226                                          * SMB_ACL_USER_OBJ entry and Windows also cannot represent
2227                                          * that entry, so we ignore it. We also don't create such
2228                                          * entries out of the blue when setting ACLs, so a get/set
2229                                          * cycle will drop them.
2230                                          */
2231                                         if (the_acl_type == SMB_ACL_TYPE_ACCESS && *puid == psbuf->st_uid) {
2232                                                 SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2233                                                 continue;
2234                                         }
2235                                         uid_to_sid( &sid, *puid);
2236                                         unix_ug.uid = *puid;
2237                                         owner_type = UID_ACE;
2238                                         SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)puid,tagtype);
2239                                         break;
2240                                 }
2241                         case SMB_ACL_GROUP_OBJ:
2242                                 /* Get the SID from the owning group. */
2243                                 sid_copy(&sid, pgroup);
2244                                 unix_ug.gid = psbuf->st_gid;
2245                                 owner_type = GID_ACE;
2246                                 break;
2247                         case SMB_ACL_GROUP:
2248                                 {
2249                                         gid_t *pgid = (gid_t *)SMB_VFS_SYS_ACL_GET_QUALIFIER(conn, entry);
2250                                         if (pgid == NULL) {
2251                                                 DEBUG(0,("canonicalise_acl: Failed to get gid.\n"));
2252                                                 continue;
2253                                         }
2254                                         gid_to_sid( &sid, *pgid);
2255                                         unix_ug.gid = *pgid;
2256                                         owner_type = GID_ACE;
2257                                         SMB_VFS_SYS_ACL_FREE_QUALIFIER(conn, (void *)pgid,tagtype);
2258                                         break;
2259                                 }
2260                         case SMB_ACL_MASK:
2261                                 acl_mask = convert_permset_to_mode_t(conn, permset);
2262                                 continue; /* Don't count the mask as an entry. */
2263                         case SMB_ACL_OTHER:
2264                                 /* Use the Everyone SID */
2265                                 sid = global_sid_World;
2266                                 unix_ug.world = -1;
2267                                 owner_type = WORLD_ACE;
2268                                 break;
2269                         default:
2270                                 DEBUG(0,("canonicalise_acl: Unknown tagtype %u\n", (unsigned int)tagtype));
2271                                 continue;
2272                 }
2273
2274                 /*
2275                  * Add this entry to the list.
2276                  */
2277
2278                 if ((ace = SMB_MALLOC_P(canon_ace)) == NULL)
2279                         goto fail;
2280
2281                 ZERO_STRUCTP(ace);
2282                 ace->type = tagtype;
2283                 ace->perms = convert_permset_to_mode_t(conn, permset);
2284                 ace->attr = ALLOW_ACE;
2285                 ace->trustee = sid;
2286                 ace->unix_ug = unix_ug;
2287                 ace->owner_type = owner_type;
2288                 ace->inherited = get_inherited_flag(pal, ace, (the_acl_type == SMB_ACL_TYPE_DEFAULT));
2289
2290                 DLIST_ADD(list_head, ace);
2291         }
2292
2293         /*
2294          * This next call will ensure we have at least a user/group/world set.
2295          */
2296
2297         if (!ensure_canon_entry_valid(&list_head, conn->params,
2298                                       S_ISDIR(psbuf->st_mode), powner, pgroup,
2299                                       psbuf, False))
2300                 goto fail;
2301
2302         /*
2303          * Now go through the list, masking the permissions with the
2304          * acl_mask. Ensure all DENY Entries are at the start of the list.
2305          */
2306
2307         DEBUG(10,("canonicalise_acl: %s ace entries before arrange :\n", the_acl_type == SMB_ACL_TYPE_ACCESS ? "Access" : "Default" ));
2308
2309         for ( ace_count = 0, ace = list_head; ace; ace = next_ace, ace_count++) {
2310                 next_ace = ace->next;
2311
2312                 /* Masks are only applied to entries other than USER_OBJ and OTHER. */
2313                 if (ace->type != SMB_ACL_OTHER && ace->type != SMB_ACL_USER_OBJ)
2314                         ace->perms &= acl_mask;
2315
2316                 if (ace->perms == 0) {
2317                         DLIST_PROMOTE(list_head, ace);
2318                 }
2319
2320                 if( DEBUGLVL( 10 ) ) {
2321                         print_canon_ace(ace, ace_count);
2322                 }
2323         }
2324
2325         arrange_posix_perms(fname,&list_head );
2326
2327         print_canon_ace_list( "canonicalise_acl: ace entries after arrange", list_head );
2328
2329         return list_head;
2330
2331   fail:
2332
2333         free_canon_ace_list(list_head);
2334         return NULL;
2335 }
2336
2337 /****************************************************************************
2338  Check if the current user group list contains a given group.
2339 ****************************************************************************/
2340
2341 static bool current_user_in_group(gid_t gid)
2342 {
2343         int i;
2344
2345         for (i = 0; i < current_user.ut.ngroups; i++) {
2346                 if (current_user.ut.groups[i] == gid) {
2347                         return True;
2348                 }
2349         }
2350
2351         return False;
2352 }
2353
2354 /****************************************************************************
2355  Should we override a deny ?  Check deprecated 'acl group control'
2356  and 'dos filemode'
2357 ****************************************************************************/
2358
2359 static bool acl_group_override(connection_struct *conn, gid_t prim_gid)
2360 {
2361         if ( (errno == EACCES || errno == EPERM)
2362                 && (lp_acl_group_control(SNUM(conn)) || lp_dos_filemode(SNUM(conn)))
2363                 && current_user_in_group(prim_gid))
2364         {
2365                 return True;
2366         }
2367
2368         return False;
2369 }
2370
2371 /****************************************************************************
2372  Attempt to apply an ACL to a file or directory.
2373 ****************************************************************************/
2374
2375 static bool set_canon_ace_list(files_struct *fsp, canon_ace *the_ace, bool default_ace, gid_t prim_gid, bool *pacl_set_support)
2376 {
2377         connection_struct *conn = fsp->conn;
2378         bool ret = False;
2379         SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, (int)count_canon_ace_list(the_ace) + 1);
2380         canon_ace *p_ace;
2381         int i;
2382         SMB_ACL_ENTRY_T mask_entry;
2383         bool got_mask_entry = False;
2384         SMB_ACL_PERMSET_T mask_permset;
2385         SMB_ACL_TYPE_T the_acl_type = (default_ace ? SMB_ACL_TYPE_DEFAULT : SMB_ACL_TYPE_ACCESS);
2386         bool needs_mask = False;
2387         mode_t mask_perms = 0;
2388
2389 #if defined(POSIX_ACL_NEEDS_MASK)
2390         /* HP-UX always wants to have a mask (called "class" there). */
2391         needs_mask = True;
2392 #endif
2393
2394         if (the_acl == NULL) {
2395
2396                 if (!no_acl_syscall_error(errno)) {
2397                         /*
2398                          * Only print this error message if we have some kind of ACL
2399                          * support that's not working. Otherwise we would always get this.
2400                          */
2401                         DEBUG(0,("set_canon_ace_list: Unable to init %s ACL. (%s)\n",
2402                                 default_ace ? "default" : "file", strerror(errno) ));
2403                 }
2404                 *pacl_set_support = False;
2405                 return False;
2406         }
2407
2408         if( DEBUGLVL( 10 )) {
2409                 dbgtext("set_canon_ace_list: setting ACL:\n");
2410                 for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2411                         print_canon_ace( p_ace, i);
2412                 }
2413         }
2414
2415         for (i = 0, p_ace = the_ace; p_ace; p_ace = p_ace->next, i++ ) {
2416                 SMB_ACL_ENTRY_T the_entry;
2417                 SMB_ACL_PERMSET_T the_permset;
2418
2419                 /*
2420                  * ACLs only "need" an ACL_MASK entry if there are any named user or
2421                  * named group entries. But if there is an ACL_MASK entry, it applies
2422                  * to ACL_USER, ACL_GROUP, and ACL_GROUP_OBJ entries. Set the mask
2423                  * so that it doesn't deny (i.e., mask off) any permissions.
2424                  */
2425
2426                 if (p_ace->type == SMB_ACL_USER || p_ace->type == SMB_ACL_GROUP) {
2427                         needs_mask = True;
2428                         mask_perms |= p_ace->perms;
2429                 } else if (p_ace->type == SMB_ACL_GROUP_OBJ) {
2430                         mask_perms |= p_ace->perms;
2431                 }
2432
2433                 /*
2434                  * Get the entry for this ACE.
2435                  */
2436
2437                 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
2438                         DEBUG(0,("set_canon_ace_list: Failed to create entry %d. (%s)\n",
2439                                 i, strerror(errno) ));
2440                         goto fail;
2441                 }
2442
2443                 if (p_ace->type == SMB_ACL_MASK) {
2444                         mask_entry = the_entry;
2445                         got_mask_entry = True;
2446                 }
2447
2448                 /*
2449                  * Ok - we now know the ACL calls should be working, don't
2450                  * allow fallback to chmod.
2451                  */
2452
2453                 *pacl_set_support = True;
2454
2455                 /*
2456                  * Initialise the entry from the canon_ace.
2457                  */
2458
2459                 /*
2460                  * First tell the entry what type of ACE this is.
2461                  */
2462
2463                 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, p_ace->type) == -1) {
2464                         DEBUG(0,("set_canon_ace_list: Failed to set tag type on entry %d. (%s)\n",
2465                                 i, strerror(errno) ));
2466                         goto fail;
2467                 }
2468
2469                 /*
2470                  * Only set the qualifier (user or group id) if the entry is a user
2471                  * or group id ACE.
2472                  */
2473
2474                 if ((p_ace->type == SMB_ACL_USER) || (p_ace->type == SMB_ACL_GROUP)) {
2475                         if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&p_ace->unix_ug.uid) == -1) {
2476                                 DEBUG(0,("set_canon_ace_list: Failed to set qualifier on entry %d. (%s)\n",
2477                                         i, strerror(errno) ));
2478                                 goto fail;
2479                         }
2480                 }
2481
2482                 /*
2483                  * Convert the mode_t perms in the canon_ace to a POSIX permset.
2484                  */
2485
2486                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
2487                         DEBUG(0,("set_canon_ace_list: Failed to get permset on entry %d. (%s)\n",
2488                                 i, strerror(errno) ));
2489                         goto fail;
2490                 }
2491
2492                 if (map_acl_perms_to_permset(conn, p_ace->perms, &the_permset) == -1) {
2493                         DEBUG(0,("set_canon_ace_list: Failed to create permset for mode (%u) on entry %d. (%s)\n",
2494                                 (unsigned int)p_ace->perms, i, strerror(errno) ));
2495                         goto fail;
2496                 }
2497
2498                 /*
2499                  * ..and apply them to the entry.
2500                  */
2501
2502                 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
2503                         DEBUG(0,("set_canon_ace_list: Failed to add permset on entry %d. (%s)\n",
2504                                 i, strerror(errno) ));
2505                         goto fail;
2506                 }
2507
2508                 if( DEBUGLVL( 10 ))
2509                         print_canon_ace( p_ace, i);
2510
2511         }
2512
2513         if (needs_mask && !got_mask_entry) {
2514                 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &mask_entry) == -1) {
2515                         DEBUG(0,("set_canon_ace_list: Failed to create mask entry. (%s)\n", strerror(errno) ));
2516                         goto fail;
2517                 }
2518
2519                 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, mask_entry, SMB_ACL_MASK) == -1) {
2520                         DEBUG(0,("set_canon_ace_list: Failed to set tag type on mask entry. (%s)\n",strerror(errno) ));
2521                         goto fail;
2522                 }
2523
2524                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, mask_entry, &mask_permset) == -1) {
2525                         DEBUG(0,("set_canon_ace_list: Failed to get mask permset. (%s)\n", strerror(errno) ));
2526                         goto fail;
2527                 }
2528
2529                 if (map_acl_perms_to_permset(conn, S_IRUSR|S_IWUSR|S_IXUSR, &mask_permset) == -1) {
2530                         DEBUG(0,("set_canon_ace_list: Failed to create mask permset. (%s)\n", strerror(errno) ));
2531                         goto fail;
2532                 }
2533
2534                 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, mask_entry, mask_permset) == -1) {
2535                         DEBUG(0,("set_canon_ace_list: Failed to add mask permset. (%s)\n", strerror(errno) ));
2536                         goto fail;
2537                 }
2538         }
2539
2540         /*
2541          * Finally apply it to the file or directory.
2542          */
2543
2544         if(default_ace || fsp->is_directory || fsp->fh->fd == -1) {
2545                 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl) == -1) {
2546                         /*
2547                          * Some systems allow all the above calls and only fail with no ACL support
2548                          * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2549                          */
2550                         if (no_acl_syscall_error(errno)) {
2551                                 *pacl_set_support = False;
2552                         }
2553
2554                         if (acl_group_override(conn, prim_gid)) {
2555                                 int sret;
2556
2557                                 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2558                                         fsp->fsp_name ));
2559
2560                                 become_root();
2561                                 sret = SMB_VFS_SYS_ACL_SET_FILE(conn, fsp->fsp_name, the_acl_type, the_acl);
2562                                 unbecome_root();
2563                                 if (sret == 0) {
2564                                         ret = True;
2565                                 }
2566                         }
2567
2568                         if (ret == False) {
2569                                 DEBUG(2,("set_canon_ace_list: sys_acl_set_file type %s failed for file %s (%s).\n",
2570                                                 the_acl_type == SMB_ACL_TYPE_DEFAULT ? "directory default" : "file",
2571                                                 fsp->fsp_name, strerror(errno) ));
2572                                 goto fail;
2573                         }
2574                 }
2575         } else {
2576                 if (SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl) == -1) {
2577                         /*
2578                          * Some systems allow all the above calls and only fail with no ACL support
2579                          * when attempting to apply the acl. HPUX with HFS is an example of this. JRA.
2580                          */
2581                         if (no_acl_syscall_error(errno)) {
2582                                 *pacl_set_support = False;
2583                         }
2584
2585                         if (acl_group_override(conn, prim_gid)) {
2586                                 int sret;
2587
2588                                 DEBUG(5,("set_canon_ace_list: acl group control on and current user in file %s primary group.\n",
2589                                         fsp->fsp_name ));
2590
2591                                 become_root();
2592                                 sret = SMB_VFS_SYS_ACL_SET_FD(fsp, the_acl);
2593                                 unbecome_root();
2594                                 if (sret == 0) {
2595                                         ret = True;
2596                                 }
2597                         }
2598
2599                         if (ret == False) {
2600                                 DEBUG(2,("set_canon_ace_list: sys_acl_set_file failed for file %s (%s).\n",
2601                                                 fsp->fsp_name, strerror(errno) ));
2602                                 goto fail;
2603                         }
2604                 }
2605         }
2606
2607         ret = True;
2608
2609   fail:
2610
2611         if (the_acl != NULL) {
2612                 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2613         }
2614
2615         return ret;
2616 }
2617
2618 /****************************************************************************
2619  Find a particular canon_ace entry.
2620 ****************************************************************************/
2621
2622 static struct canon_ace *canon_ace_entry_for(struct canon_ace *list, SMB_ACL_TAG_T type, posix_id *id)
2623 {
2624         while (list) {
2625                 if (list->type == type && ((type != SMB_ACL_USER && type != SMB_ACL_GROUP) ||
2626                                 (type == SMB_ACL_USER  && id && id->uid == list->unix_ug.uid) ||
2627                                 (type == SMB_ACL_GROUP && id && id->gid == list->unix_ug.gid)))
2628                         break;
2629                 list = list->next;
2630         }
2631         return list;
2632 }
2633
2634 /****************************************************************************
2635
2636 ****************************************************************************/
2637
2638 SMB_ACL_T free_empty_sys_acl(connection_struct *conn, SMB_ACL_T the_acl)
2639 {
2640         SMB_ACL_ENTRY_T entry;
2641
2642         if (!the_acl)
2643                 return NULL;
2644         if (SMB_VFS_SYS_ACL_GET_ENTRY(conn, the_acl, SMB_ACL_FIRST_ENTRY, &entry) != 1) {
2645                 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
2646                 return NULL;
2647         }
2648         return the_acl;
2649 }
2650
2651 /****************************************************************************
2652  Convert a canon_ace to a generic 3 element permission - if possible.
2653 ****************************************************************************/
2654
2655 #define MAP_PERM(p,mask,result) (((p) & (mask)) ? (result) : 0 )
2656
2657 static bool convert_canon_ace_to_posix_perms( files_struct *fsp, canon_ace *file_ace_list, mode_t *posix_perms)
2658 {
2659         int snum = SNUM(fsp->conn);
2660         size_t ace_count = count_canon_ace_list(file_ace_list);
2661         canon_ace *ace_p;
2662         canon_ace *owner_ace = NULL;
2663         canon_ace *group_ace = NULL;
2664         canon_ace *other_ace = NULL;
2665         mode_t and_bits;
2666         mode_t or_bits;
2667
2668         if (ace_count != 3) {
2669                 DEBUG(3,("convert_canon_ace_to_posix_perms: Too many ACE entries for file %s to convert to \
2670 posix perms.\n", fsp->fsp_name ));
2671                 return False;
2672         }
2673
2674         for (ace_p = file_ace_list; ace_p; ace_p = ace_p->next) {
2675                 if (ace_p->owner_type == UID_ACE)
2676                         owner_ace = ace_p;
2677                 else if (ace_p->owner_type == GID_ACE)
2678                         group_ace = ace_p;
2679                 else if (ace_p->owner_type == WORLD_ACE)
2680                         other_ace = ace_p;
2681         }
2682
2683         if (!owner_ace || !group_ace || !other_ace) {
2684                 DEBUG(3,("convert_canon_ace_to_posix_perms: Can't get standard entries for file %s.\n",
2685                                 fsp->fsp_name ));
2686                 return False;
2687         }
2688
2689         *posix_perms = (mode_t)0;
2690
2691         *posix_perms |= owner_ace->perms;
2692         *posix_perms |= MAP_PERM(group_ace->perms, S_IRUSR, S_IRGRP);
2693         *posix_perms |= MAP_PERM(group_ace->perms, S_IWUSR, S_IWGRP);
2694         *posix_perms |= MAP_PERM(group_ace->perms, S_IXUSR, S_IXGRP);
2695         *posix_perms |= MAP_PERM(other_ace->perms, S_IRUSR, S_IROTH);
2696         *posix_perms |= MAP_PERM(other_ace->perms, S_IWUSR, S_IWOTH);
2697         *posix_perms |= MAP_PERM(other_ace->perms, S_IXUSR, S_IXOTH);
2698
2699         /* The owner must have at least read access. */
2700
2701         *posix_perms |= S_IRUSR;
2702         if (fsp->is_directory)
2703                 *posix_perms |= (S_IWUSR|S_IXUSR);
2704
2705         /* If requested apply the masks. */
2706
2707         /* Get the initial bits to apply. */
2708
2709         if (fsp->is_directory) {
2710                 and_bits = lp_dir_security_mask(snum);
2711                 or_bits = lp_force_dir_security_mode(snum);
2712         } else {
2713                 and_bits = lp_security_mask(snum);
2714                 or_bits = lp_force_security_mode(snum);
2715         }
2716
2717         *posix_perms = (((*posix_perms) & and_bits)|or_bits);
2718
2719         DEBUG(10,("convert_canon_ace_to_posix_perms: converted u=%o,g=%o,w=%o to perm=0%o for file %s.\n",
2720                 (int)owner_ace->perms, (int)group_ace->perms, (int)other_ace->perms, (int)*posix_perms,
2721                 fsp->fsp_name ));
2722
2723         return True;
2724 }
2725
2726 /****************************************************************************
2727   Incoming NT ACLs on a directory can be split into a default POSIX acl (CI|OI|IO) and
2728   a normal POSIX acl. Win2k needs these split acls re-merging into one ACL
2729   with CI|OI set so it is inherited and also applies to the directory.
2730   Based on code from "Jim McDonough" <jmcd@us.ibm.com>.
2731 ****************************************************************************/
2732
2733 static size_t merge_default_aces( SEC_ACE *nt_ace_list, size_t num_aces)
2734 {
2735         size_t i, j;
2736
2737         for (i = 0; i < num_aces; i++) {
2738                 for (j = i+1; j < num_aces; j++) {
2739                         uint32 i_flags_ni = (nt_ace_list[i].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2740                         uint32 j_flags_ni = (nt_ace_list[j].flags & ~SEC_ACE_FLAG_INHERITED_ACE);
2741                         bool i_inh = (nt_ace_list[i].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2742                         bool j_inh = (nt_ace_list[j].flags & SEC_ACE_FLAG_INHERITED_ACE) ? True : False;
2743
2744                         /* We know the lower number ACE's are file entries. */
2745                         if ((nt_ace_list[i].type == nt_ace_list[j].type) &&
2746                                 (nt_ace_list[i].size == nt_ace_list[j].size) &&
2747                                 (nt_ace_list[i].access_mask == nt_ace_list[j].access_mask) &&
2748                                 sid_equal(&nt_ace_list[i].trustee, &nt_ace_list[j].trustee) &&
2749                                 (i_inh == j_inh) &&
2750                                 (i_flags_ni == 0) &&
2751                                 (j_flags_ni == (SEC_ACE_FLAG_OBJECT_INHERIT|
2752                                                   SEC_ACE_FLAG_CONTAINER_INHERIT|
2753                                                   SEC_ACE_FLAG_INHERIT_ONLY))) {
2754                                 /*
2755                                  * W2K wants to have access allowed zero access ACE's
2756                                  * at the end of the list. If the mask is zero, merge
2757                                  * the non-inherited ACE onto the inherited ACE.
2758                                  */
2759
2760                                 if (nt_ace_list[i].access_mask == 0) {
2761                                         nt_ace_list[j].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2762                                                                 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2763                                         if (num_aces - i - 1 > 0)
2764                                                 memmove(&nt_ace_list[i], &nt_ace_list[i+1], (num_aces-i-1) *
2765                                                                 sizeof(SEC_ACE));
2766
2767                                         DEBUG(10,("merge_default_aces: Merging zero access ACE %u onto ACE %u.\n",
2768                                                 (unsigned int)i, (unsigned int)j ));
2769                                 } else {
2770                                         /*
2771                                          * These are identical except for the flags.
2772                                          * Merge the inherited ACE onto the non-inherited ACE.
2773                                          */
2774
2775                                         nt_ace_list[i].flags = SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2776                                                                 (i_inh ? SEC_ACE_FLAG_INHERITED_ACE : 0);
2777                                         if (num_aces - j - 1 > 0)
2778                                                 memmove(&nt_ace_list[j], &nt_ace_list[j+1], (num_aces-j-1) *
2779                                                                 sizeof(SEC_ACE));
2780
2781                                         DEBUG(10,("merge_default_aces: Merging ACE %u onto ACE %u.\n",
2782                                                 (unsigned int)j, (unsigned int)i ));
2783                                 }
2784                                 num_aces--;
2785                                 break;
2786                         }
2787                 }
2788         }
2789
2790         return num_aces;
2791 }
2792
2793 /****************************************************************************
2794  Reply to query a security descriptor from an fsp. If it succeeds it allocates
2795  the space for the return elements and returns the size needed to return the
2796  security descriptor. This should be the only external function needed for
2797  the UNIX style get ACL.
2798 ****************************************************************************/
2799
2800 static NTSTATUS posix_get_nt_acl_common(struct connection_struct *conn,
2801                                       const char *name,
2802                                       const SMB_STRUCT_STAT *sbuf,
2803                                       struct pai_val *pal,
2804                                       SMB_ACL_T posix_acl,
2805                                       SMB_ACL_T def_acl,
2806                                       uint32_t security_info,
2807                                       SEC_DESC **ppdesc)
2808 {
2809         DOM_SID owner_sid;
2810         DOM_SID group_sid;
2811         size_t sd_size = 0;
2812         SEC_ACL *psa = NULL;
2813         size_t num_acls = 0;
2814         size_t num_def_acls = 0;
2815         size_t num_aces = 0;
2816         canon_ace *file_ace = NULL;
2817         canon_ace *dir_ace = NULL;
2818         SEC_ACE *nt_ace_list = NULL;
2819         size_t num_profile_acls = 0;
2820         SEC_DESC *psd = NULL;
2821
2822         /*
2823          * Get the owner, group and world SIDs.
2824          */
2825
2826         if (lp_profile_acls(SNUM(conn))) {
2827                 /* For WXP SP1 the owner must be administrators. */
2828                 sid_copy(&owner_sid, &global_sid_Builtin_Administrators);
2829                 sid_copy(&group_sid, &global_sid_Builtin_Users);
2830                 num_profile_acls = 2;
2831         } else {
2832                 create_file_sids(sbuf, &owner_sid, &group_sid);
2833         }
2834
2835         if ((security_info & DACL_SECURITY_INFORMATION) && !(security_info & PROTECTED_DACL_SECURITY_INFORMATION)) {
2836
2837                 /*
2838                  * In the optimum case Creator Owner and Creator Group would be used for
2839                  * the ACL_USER_OBJ and ACL_GROUP_OBJ entries, respectively, but this
2840                  * would lead to usability problems under Windows: The Creator entries
2841                  * are only available in browse lists of directories and not for files;
2842                  * additionally the identity of the owning group couldn't be determined.
2843                  * We therefore use those identities only for Default ACLs.
2844                  */
2845
2846                 /* Create the canon_ace lists. */
2847                 file_ace = canonicalise_acl(conn, name, posix_acl, sbuf,
2848                                             &owner_sid, &group_sid, pal,
2849                                             SMB_ACL_TYPE_ACCESS);
2850
2851                 /* We must have *some* ACLS. */
2852
2853                 if (count_canon_ace_list(file_ace) == 0) {
2854                         DEBUG(0,("get_nt_acl : No ACLs on file (%s) !\n", name));
2855                         goto done;
2856                 }
2857
2858                 if (S_ISDIR(sbuf->st_mode) && def_acl) {
2859                         dir_ace = canonicalise_acl(conn, name, def_acl,
2860                                                    sbuf,
2861                                                    &global_sid_Creator_Owner,
2862                                                    &global_sid_Creator_Group,
2863                                                    pal, SMB_ACL_TYPE_DEFAULT);
2864                 }
2865
2866                 /*
2867                  * Create the NT ACE list from the canonical ace lists.
2868                  */
2869
2870                 {
2871                         canon_ace *ace;
2872                         enum security_ace_type nt_acl_type;
2873                         int i;
2874
2875                         if (nt4_compatible_acls() && dir_ace) {
2876                                 /*
2877                                  * NT 4 chokes if an ACL contains an INHERIT_ONLY entry
2878                                  * but no non-INHERIT_ONLY entry for one SID. So we only
2879                                  * remove entries from the Access ACL if the
2880                                  * corresponding Default ACL entries have also been
2881                                  * removed. ACEs for CREATOR-OWNER and CREATOR-GROUP
2882                                  * are exceptions. We can do nothing
2883                                  * intelligent if the Default ACL contains entries that
2884                                  * are not also contained in the Access ACL, so this
2885                                  * case will still fail under NT 4.
2886                                  */
2887
2888                                 ace = canon_ace_entry_for(dir_ace, SMB_ACL_OTHER, NULL);
2889                                 if (ace && !ace->perms) {
2890                                         DLIST_REMOVE(dir_ace, ace);
2891                                         SAFE_FREE(ace);
2892
2893                                         ace = canon_ace_entry_for(file_ace, SMB_ACL_OTHER, NULL);
2894                                         if (ace && !ace->perms) {
2895                                                 DLIST_REMOVE(file_ace, ace);
2896                                                 SAFE_FREE(ace);
2897                                         }
2898                                 }
2899
2900                                 /*
2901                                  * WinNT doesn't usually have Creator Group
2902                                  * in browse lists, so we send this entry to
2903                                  * WinNT even if it contains no relevant
2904                                  * permissions. Once we can add
2905                                  * Creator Group to browse lists we can
2906                                  * re-enable this.
2907                                  */
2908
2909 #if 0
2910                                 ace = canon_ace_entry_for(dir_ace, SMB_ACL_GROUP_OBJ, NULL);
2911                                 if (ace && !ace->perms) {
2912                                         DLIST_REMOVE(dir_ace, ace);
2913                                         SAFE_FREE(ace);
2914                                 }
2915 #endif
2916
2917                                 ace = canon_ace_entry_for(file_ace, SMB_ACL_GROUP_OBJ, NULL);
2918                                 if (ace && !ace->perms) {
2919                                         DLIST_REMOVE(file_ace, ace);
2920                                         SAFE_FREE(ace);
2921                                 }
2922                         }
2923
2924                         num_acls = count_canon_ace_list(file_ace);
2925                         num_def_acls = count_canon_ace_list(dir_ace);
2926
2927                         /* Allocate the ace list. */
2928                         if ((nt_ace_list = SMB_MALLOC_ARRAY(SEC_ACE,num_acls + num_profile_acls + num_def_acls)) == NULL) {
2929                                 DEBUG(0,("get_nt_acl: Unable to malloc space for nt_ace_list.\n"));
2930                                 goto done;
2931                         }
2932
2933                         memset(nt_ace_list, '\0', (num_acls + num_def_acls) * sizeof(SEC_ACE) );
2934
2935                         /*
2936                          * Create the NT ACE list from the canonical ace lists.
2937                          */
2938
2939                         ace = file_ace;
2940
2941                         for (i = 0; i < num_acls; i++, ace = ace->next) {
2942                                 SEC_ACCESS acc;
2943
2944                                 acc = map_canon_ace_perms(SNUM(conn),
2945                                                 &nt_acl_type,
2946                                                 ace->perms,
2947                                                 S_ISDIR(sbuf->st_mode));
2948                                 init_sec_ace(&nt_ace_list[num_aces++],
2949                                         &ace->trustee,
2950                                         nt_acl_type,
2951                                         acc,
2952                                         ace->inherited ?
2953                                                 SEC_ACE_FLAG_INHERITED_ACE : 0);
2954                         }
2955
2956                         /* The User must have access to a profile share - even
2957                          * if we can't map the SID. */
2958                         if (lp_profile_acls(SNUM(conn))) {
2959                                 SEC_ACCESS acc;
2960
2961                                 init_sec_access(&acc,FILE_GENERIC_ALL);
2962                                 init_sec_ace(&nt_ace_list[num_aces++],
2963                                                 &global_sid_Builtin_Users,
2964                                                 SEC_ACE_TYPE_ACCESS_ALLOWED,
2965                                                 acc, 0);
2966                         }
2967
2968                         ace = dir_ace;
2969
2970                         for (i = 0; i < num_def_acls; i++, ace = ace->next) {
2971                                 SEC_ACCESS acc;
2972
2973                                 acc = map_canon_ace_perms(SNUM(conn),
2974                                                 &nt_acl_type,
2975                                                 ace->perms,
2976                                                 S_ISDIR(sbuf->st_mode));
2977                                 init_sec_ace(&nt_ace_list[num_aces++],
2978                                         &ace->trustee,
2979                                         nt_acl_type,
2980                                         acc,
2981                                         SEC_ACE_FLAG_OBJECT_INHERIT|
2982                                         SEC_ACE_FLAG_CONTAINER_INHERIT|
2983                                         SEC_ACE_FLAG_INHERIT_ONLY|
2984                                         (ace->inherited ?
2985                                            SEC_ACE_FLAG_INHERITED_ACE : 0));
2986                         }
2987
2988                         /* The User must have access to a profile share - even
2989                          * if we can't map the SID. */
2990                         if (lp_profile_acls(SNUM(conn))) {
2991                                 SEC_ACCESS acc;
2992
2993                                 init_sec_access(&acc,FILE_GENERIC_ALL);
2994                                 init_sec_ace(&nt_ace_list[num_aces++], &global_sid_Builtin_Users, SEC_ACE_TYPE_ACCESS_ALLOWED, acc,
2995                                                 SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|
2996                                                 SEC_ACE_FLAG_INHERIT_ONLY|0);
2997                         }
2998
2999                         /*
3000                          * Merge POSIX default ACLs and normal ACLs into one NT ACE.
3001                          * Win2K needs this to get the inheritance correct when replacing ACLs
3002                          * on a directory tree. Based on work by Jim @ IBM.
3003                          */
3004
3005                         num_aces = merge_default_aces(nt_ace_list, num_aces);
3006
3007                 }
3008
3009                 if (num_aces) {
3010                         if((psa = make_sec_acl( talloc_tos(), NT4_ACL_REVISION, num_aces, nt_ace_list)) == NULL) {
3011                                 DEBUG(0,("get_nt_acl: Unable to malloc space for acl.\n"));
3012                                 goto done;
3013                         }
3014                 }
3015         } /* security_info & DACL_SECURITY_INFORMATION */
3016
3017         psd = make_standard_sec_desc( talloc_tos(),
3018                         (security_info & OWNER_SECURITY_INFORMATION) ? &owner_sid : NULL,
3019                         (security_info & GROUP_SECURITY_INFORMATION) ? &group_sid : NULL,
3020                         psa,
3021                         &sd_size);
3022
3023         if(!psd) {
3024                 DEBUG(0,("get_nt_acl: Unable to malloc space for security descriptor.\n"));
3025                 sd_size = 0;
3026                 goto done;
3027         }
3028
3029         /*
3030          * Windows 2000: The DACL_PROTECTED flag in the security
3031          * descriptor marks the ACL as non-inheriting, i.e., no
3032          * ACEs from higher level directories propagate to this
3033          * ACL. In the POSIX ACL model permissions are only
3034          * inherited at file create time, so ACLs never contain
3035          * any ACEs that are inherited dynamically. The DACL_PROTECTED
3036          * flag doesn't seem to bother Windows NT.
3037          * Always set this if map acl inherit is turned off.
3038          */
3039         if (get_protected_flag(pal) || !lp_map_acl_inherit(SNUM(conn))) {
3040                 psd->type |= SE_DESC_DACL_PROTECTED;
3041         }
3042
3043         if (psd->dacl) {
3044                 dacl_sort_into_canonical_order(psd->dacl->aces, (unsigned int)psd->dacl->num_aces);
3045         }
3046
3047         *ppdesc = psd;
3048
3049  done:
3050
3051         if (posix_acl) {
3052                 SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3053         }
3054         if (def_acl) {
3055                 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3056         }
3057         free_canon_ace_list(file_ace);
3058         free_canon_ace_list(dir_ace);
3059         free_inherited_info(pal);
3060         SAFE_FREE(nt_ace_list);
3061
3062         return NT_STATUS_OK;
3063 }
3064
3065 NTSTATUS posix_fget_nt_acl(struct files_struct *fsp, uint32_t security_info,
3066                            SEC_DESC **ppdesc)
3067 {
3068         SMB_STRUCT_STAT sbuf;
3069         SMB_ACL_T posix_acl = NULL;
3070         struct pai_val *pal;
3071
3072         *ppdesc = NULL;
3073
3074         DEBUG(10,("posix_fget_nt_acl: called for file %s\n", fsp->fsp_name ));
3075
3076         /* can it happen that fsp_name == NULL ? */
3077         if (fsp->is_directory ||  fsp->fh->fd == -1) {
3078                 return posix_get_nt_acl(fsp->conn, fsp->fsp_name,
3079                                         security_info, ppdesc);
3080         }
3081
3082         /* Get the stat struct for the owner info. */
3083         if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
3084                 return map_nt_error_from_unix(errno);
3085         }
3086
3087         /* Get the ACL from the fd. */
3088         posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
3089
3090         pal = fload_inherited_info(fsp);
3091
3092         return posix_get_nt_acl_common(fsp->conn, fsp->fsp_name, &sbuf, pal,
3093                                        posix_acl, NULL, security_info, ppdesc);
3094 }
3095
3096 NTSTATUS posix_get_nt_acl(struct connection_struct *conn, const char *name,
3097                           uint32_t security_info, SEC_DESC **ppdesc)
3098 {
3099         SMB_STRUCT_STAT sbuf;
3100         SMB_ACL_T posix_acl = NULL;
3101         SMB_ACL_T def_acl = NULL;
3102         struct pai_val *pal;
3103
3104         *ppdesc = NULL;
3105
3106         DEBUG(10,("posix_get_nt_acl: called for file %s\n", name ));
3107
3108         /* Get the stat struct for the owner info. */
3109         if(SMB_VFS_STAT(conn, name, &sbuf) != 0) {
3110                 return map_nt_error_from_unix(errno);
3111         }
3112
3113         /* Get the ACL from the path. */
3114         posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_ACCESS);
3115
3116         /* If it's a directory get the default POSIX ACL. */
3117         if(S_ISDIR(sbuf.st_mode)) {
3118                 def_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, name, SMB_ACL_TYPE_DEFAULT);
3119                 def_acl = free_empty_sys_acl(conn, def_acl);
3120         }
3121
3122         pal = load_inherited_info(conn, name);
3123
3124         return posix_get_nt_acl_common(conn, name, &sbuf, pal, posix_acl,
3125                                        def_acl, security_info, ppdesc);
3126 }
3127
3128 /****************************************************************************
3129  Try to chown a file. We will be able to chown it under the following conditions.
3130
3131   1) If we have root privileges, then it will just work.
3132   2) If we have SeTakeOwnershipPrivilege we can change the user to the current user.
3133   3) If we have SeRestorePrivilege we can change the user to any other user.
3134   4) If we have write permission to the file and dos_filemodes is set
3135      then allow chown to the currently authenticated user.
3136 ****************************************************************************/
3137
3138 int try_chown(connection_struct *conn, const char *fname, uid_t uid, gid_t gid)
3139 {
3140         int ret;
3141         files_struct *fsp;
3142         SMB_STRUCT_STAT st;
3143
3144         if(!CAN_WRITE(conn)) {
3145                 return -1;
3146         }
3147
3148         /* Case (1). */
3149         /* try the direct way first */
3150         ret = SMB_VFS_CHOWN(conn, fname, uid, gid);
3151         if (ret == 0)
3152                 return 0;
3153
3154         /* Case (2) / (3) */
3155         if (lp_enable_privileges()) {
3156
3157                 bool has_take_ownership_priv = user_has_privileges(current_user.nt_user_token,
3158                                                               &se_take_ownership);
3159                 bool has_restore_priv = user_has_privileges(current_user.nt_user_token,
3160                                                        &se_restore);
3161
3162                 /* Case (2) */
3163                 if ( ( has_take_ownership_priv && ( uid == current_user.ut.uid ) ) ||
3164                 /* Case (3) */
3165                      ( has_restore_priv ) ) {
3166
3167                         become_root();
3168                         /* Keep the current file gid the same - take ownership doesn't imply group change. */
3169                         ret = SMB_VFS_CHOWN(conn, fname, uid, (gid_t)-1);
3170                         unbecome_root();
3171                         return ret;
3172                 }
3173         }
3174
3175         /* Case (4). */
3176         if (!lp_dos_filemode(SNUM(conn))) {
3177                 errno = EPERM;
3178                 return -1;
3179         }
3180
3181         if (SMB_VFS_STAT(conn,fname,&st)) {
3182                 return -1;
3183         }
3184
3185         if (!NT_STATUS_IS_OK(open_file_fchmod(conn,fname,&st,&fsp))) {
3186                 return -1;
3187         }
3188
3189         /* only allow chown to the current user. This is more secure,
3190            and also copes with the case where the SID in a take ownership ACL is
3191            a local SID on the users workstation
3192         */
3193         uid = current_user.ut.uid;
3194
3195         become_root();
3196         /* Keep the current file gid the same. */
3197         ret = SMB_VFS_FCHOWN(fsp, uid, (gid_t)-1);
3198         unbecome_root();
3199
3200         close_file_fchmod(fsp);
3201
3202         return ret;
3203 }
3204
3205 /****************************************************************************
3206  Take care of parent ACL inheritance.
3207 ****************************************************************************/
3208
3209 static NTSTATUS append_parent_acl(files_struct *fsp,
3210                                 SMB_STRUCT_STAT *psbuf,
3211                                 SEC_DESC *psd,
3212                                 SEC_DESC **pp_new_sd)
3213 {
3214         SEC_DESC *parent_sd = NULL;
3215         files_struct *parent_fsp = NULL;
3216         TALLOC_CTX *mem_ctx = talloc_parent(psd);
3217         char *parent_name = NULL;
3218         SEC_ACE *new_ace = NULL;
3219         unsigned int num_aces = psd->dacl->num_aces;
3220         SMB_STRUCT_STAT sbuf;
3221         NTSTATUS status;
3222         int info;
3223         unsigned int i, j;
3224         bool is_dacl_protected = (psd->type & SE_DESC_DACL_PROTECTED);
3225
3226         ZERO_STRUCT(sbuf);
3227
3228         if (mem_ctx == NULL) {
3229                 return NT_STATUS_NO_MEMORY;
3230         }
3231
3232         if (!parent_dirname_talloc(mem_ctx,
3233                                 fsp->fsp_name,
3234                                 &parent_name,
3235                                 NULL)) {
3236                 return NT_STATUS_NO_MEMORY;
3237         }
3238
3239         status = open_directory(fsp->conn,
3240                                 NULL,
3241                                 parent_name,
3242                                 &sbuf,
3243                                 FILE_READ_ATTRIBUTES, /* Just a stat open */
3244                                 FILE_SHARE_NONE, /* Ignored for stat opens */
3245                                 FILE_OPEN,
3246                                 0,
3247                                 INTERNAL_OPEN_ONLY,
3248                                 &info,
3249                                 &parent_fsp);
3250
3251         if (!NT_STATUS_IS_OK(status)) {
3252                 return status;
3253         }
3254
3255         status = SMB_VFS_GET_NT_ACL(parent_fsp->conn, parent_fsp->fsp_name,
3256                                     DACL_SECURITY_INFORMATION, &parent_sd );
3257
3258         close_file(parent_fsp, NORMAL_CLOSE);
3259
3260         if (!NT_STATUS_IS_OK(status)) {
3261                 return status;
3262         }
3263
3264         /*
3265          * Make room for potentially all the ACLs from
3266          * the parent. We used to add the ugw triple here,
3267          * as we knew we were dealing with POSIX ACLs.
3268          * We no longer need to do so as we can guarentee
3269          * that a default ACL from the parent directory will
3270          * be well formed for POSIX ACLs if it came from a
3271          * POSIX ACL source, and if we're not writing to a
3272          * POSIX ACL sink then we don't care if it's not well
3273          * formed. JRA.
3274          */
3275
3276         num_aces += parent_sd->dacl->num_aces;
3277
3278         if((new_ace = TALLOC_ZERO_ARRAY(mem_ctx, SEC_ACE,
3279                                         num_aces)) == NULL) {
3280                 return NT_STATUS_NO_MEMORY;
3281         }
3282
3283         /* Start by copying in all the given ACE entries. */
3284         for (i = 0; i < psd->dacl->num_aces; i++) {
3285                 sec_ace_copy(&new_ace[i], &psd->dacl->aces[i]);
3286         }
3287
3288         /*
3289          * Note that we're ignoring "inherit permissions" here
3290          * as that really only applies to newly created files. JRA.
3291          */
3292
3293         /* Finally append any inherited ACEs. */
3294         for (j = 0; j < parent_sd->dacl->num_aces; j++) {
3295                 SEC_ACE *se = &parent_sd->dacl->aces[j];
3296
3297                 if (fsp->is_directory) {
3298                         if (!(se->flags & SEC_ACE_FLAG_CONTAINER_INHERIT)) {
3299                                 /* Doesn't apply to a directory - ignore. */
3300                                 DEBUG(10,("append_parent_acl: directory %s "
3301                                         "ignoring non container "
3302                                         "inherit flags %u from parent %s\n",
3303                                         fsp->fsp_name,
3304                                         (unsigned int)se->flags,
3305                                         parent_name));
3306                                 continue;
3307                         }
3308                 } else {
3309                         if (!(se->flags & SEC_ACE_FLAG_OBJECT_INHERIT)) {
3310                                 /* Doesn't apply to a file - ignore. */
3311                                 DEBUG(10,("append_parent_acl: file %s "
3312                                         "ignoring non object "
3313                                         "inherit flags %u from parent %s\n",
3314                                         fsp->fsp_name,
3315                                         (unsigned int)se->flags,
3316                                         parent_name));
3317                                 continue;
3318                         }
3319                 }
3320
3321                 if (is_dacl_protected) {
3322                         /* If the DACL is protected it means we must
3323                          * not overwrite an existing ACE entry with the
3324                          * same SID. This is order N^2. Ouch :-(. JRA. */
3325                         unsigned int k;
3326                         for (k = 0; k < psd->dacl->num_aces; k++) {
3327                                 if (sid_equal(&psd->dacl->aces[k].trustee,
3328                                                 &se->trustee)) {
3329                                         break;
3330                                 }
3331                         }
3332                         if (k < psd->dacl->num_aces) {
3333                                 /* SID matched. Ignore. */
3334                                 DEBUG(10,("append_parent_acl: path %s "
3335                                         "ignoring protected sid %s "
3336                                         "from parent %s\n",
3337                                         fsp->fsp_name,
3338                                         sid_string_dbg(&se->trustee),
3339                                         parent_name));
3340                                 continue;
3341                         }
3342                 }
3343
3344                 sec_ace_copy(&new_ace[i], se);
3345                 if (se->flags & SEC_ACE_FLAG_NO_PROPAGATE_INHERIT) {
3346                         new_ace[i].flags &= ~(SEC_ACE_FLAG_VALID_INHERIT);
3347                 }
3348                 new_ace[i].flags |= SEC_ACE_FLAG_INHERITED_ACE;
3349                 i++;
3350         }
3351
3352         parent_sd->dacl->aces = new_ace;
3353         parent_sd->dacl->num_aces = i;
3354
3355         *pp_new_sd = parent_sd;
3356         return status;
3357 }
3358
3359 /****************************************************************************
3360  Reply to set a security descriptor on an fsp. security_info_sent is the
3361  description of the following NT ACL.
3362  This should be the only external function needed for the UNIX style set ACL.
3363 ****************************************************************************/
3364
3365 NTSTATUS set_nt_acl(files_struct *fsp, uint32 security_info_sent, SEC_DESC *psd)
3366 {
3367         connection_struct *conn = fsp->conn;
3368         uid_t user = (uid_t)-1;
3369         gid_t grp = (gid_t)-1;
3370         SMB_STRUCT_STAT sbuf;
3371         DOM_SID file_owner_sid;
3372         DOM_SID file_grp_sid;
3373         canon_ace *file_ace_list = NULL;
3374         canon_ace *dir_ace_list = NULL;
3375         bool acl_perms = False;
3376         mode_t orig_mode = (mode_t)0;
3377         NTSTATUS status;
3378         uid_t orig_uid;
3379         gid_t orig_gid;
3380         bool need_chown = False;
3381
3382         DEBUG(10,("set_nt_acl: called for file %s\n", fsp->fsp_name ));
3383
3384         if (!CAN_WRITE(conn)) {
3385                 DEBUG(10,("set acl rejected on read-only share\n"));
3386                 return NT_STATUS_MEDIA_WRITE_PROTECTED;
3387         }
3388
3389         /*
3390          * Get the current state of the file.
3391          */
3392
3393         if(fsp->is_directory || fsp->fh->fd == -1) {
3394                 if(SMB_VFS_STAT(fsp->conn,fsp->fsp_name, &sbuf) != 0)
3395                         return map_nt_error_from_unix(errno);
3396         } else {
3397                 if(SMB_VFS_FSTAT(fsp, &sbuf) != 0)
3398                         return map_nt_error_from_unix(errno);
3399         }
3400
3401         /* Save the original elements we check against. */
3402         orig_mode = sbuf.st_mode;
3403         orig_uid = sbuf.st_uid;
3404         orig_gid = sbuf.st_gid;
3405
3406         /*
3407          * Unpack the user/group/world id's.
3408          */
3409
3410         status = unpack_nt_owners( SNUM(conn), &user, &grp, security_info_sent, psd);
3411         if (!NT_STATUS_IS_OK(status)) {
3412                 return status;
3413         }
3414
3415         /*
3416          * Do we need to chown ?
3417          */
3418
3419         if (((user != (uid_t)-1) && (orig_uid != user)) || (( grp != (gid_t)-1) && (orig_gid != grp))) {
3420                 need_chown = True;
3421         }
3422
3423         if (need_chown && (user == (uid_t)-1 || user == current_user.ut.uid)) {
3424
3425                 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3426                                 fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3427
3428                 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3429                         DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3430                                 fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3431                         if (errno == EPERM) {
3432                                 return NT_STATUS_INVALID_OWNER;
3433                         }
3434                         return map_nt_error_from_unix(errno);
3435                 }
3436
3437                 /*
3438                  * Recheck the current state of the file, which may have changed.
3439                  * (suid/sgid bits, for instance)
3440                  */
3441
3442                 if(fsp->is_directory) {
3443                         if(SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf) != 0) {
3444                                 return map_nt_error_from_unix(errno);
3445                         }
3446                 } else {
3447
3448                         int ret;
3449
3450                         if(fsp->fh->fd == -1)
3451                                 ret = SMB_VFS_STAT(fsp->conn, fsp->fsp_name, &sbuf);
3452                         else
3453                                 ret = SMB_VFS_FSTAT(fsp, &sbuf);
3454
3455                         if(ret != 0)
3456                                 return map_nt_error_from_unix(errno);
3457                 }
3458
3459                 /* Save the original elements we check against. */
3460                 orig_mode = sbuf.st_mode;
3461                 orig_uid = sbuf.st_uid;
3462                 orig_gid = sbuf.st_gid;
3463
3464                 /* We did chown already, drop the flag */
3465                 need_chown = False;
3466         }
3467
3468         create_file_sids(&sbuf, &file_owner_sid, &file_grp_sid);
3469
3470         if ((security_info_sent & DACL_SECURITY_INFORMATION) &&
3471                 psd->dacl != NULL &&
3472                 (psd->type & (SE_DESC_DACL_AUTO_INHERITED|
3473                               SE_DESC_DACL_AUTO_INHERIT_REQ))==
3474                         (SE_DESC_DACL_AUTO_INHERITED|
3475                          SE_DESC_DACL_AUTO_INHERIT_REQ) ) {
3476                 status = append_parent_acl(fsp, &sbuf, psd, &psd);
3477                 if (!NT_STATUS_IS_OK(status)) {
3478                         return status;
3479                 }
3480         }
3481
3482         acl_perms = unpack_canon_ace( fsp, &sbuf, &file_owner_sid, &file_grp_sid,
3483                                         &file_ace_list, &dir_ace_list, security_info_sent, psd);
3484
3485         /* Ignore W2K traverse DACL set. */
3486         if (file_ace_list || dir_ace_list) {
3487
3488                 if (!acl_perms) {
3489                         DEBUG(3,("set_nt_acl: cannot set permissions\n"));
3490                         free_canon_ace_list(file_ace_list);
3491                         free_canon_ace_list(dir_ace_list);
3492                         return NT_STATUS_ACCESS_DENIED;
3493                 }
3494
3495                 /*
3496                  * Only change security if we got a DACL.
3497                  */
3498
3499                 if((security_info_sent & DACL_SECURITY_INFORMATION) && (psd->dacl != NULL)) {
3500
3501                         bool acl_set_support = False;
3502                         bool ret = False;
3503
3504                         /*
3505                          * Try using the POSIX ACL set first. Fall back to chmod if
3506                          * we have no ACL support on this filesystem.
3507                          */
3508
3509                         if (acl_perms && file_ace_list) {
3510                                 ret = set_canon_ace_list(fsp, file_ace_list, False, sbuf.st_gid, &acl_set_support);
3511                                 if (acl_set_support && ret == False) {
3512                                         DEBUG(3,("set_nt_acl: failed to set file acl on file %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3513                                         free_canon_ace_list(file_ace_list);
3514                                         free_canon_ace_list(dir_ace_list);
3515                                         return map_nt_error_from_unix(errno);
3516                                 }
3517                         }
3518
3519                         if (acl_perms && acl_set_support && fsp->is_directory) {
3520                                 if (dir_ace_list) {
3521                                         if (!set_canon_ace_list(fsp, dir_ace_list, True, sbuf.st_gid, &acl_set_support)) {
3522                                                 DEBUG(3,("set_nt_acl: failed to set default acl on directory %s (%s).\n", fsp->fsp_name, strerror(errno) ));
3523                                                 free_canon_ace_list(file_ace_list);
3524                                                 free_canon_ace_list(dir_ace_list);
3525                                                 return map_nt_error_from_unix(errno);
3526                                         }
3527                                 } else {
3528
3529                                         /*
3530                                          * No default ACL - delete one if it exists.
3531                                          */
3532
3533                                         if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name) == -1) {
3534                                                 int sret = -1;
3535
3536                                                 if (acl_group_override(conn, sbuf.st_gid)) {
3537                                                         DEBUG(5,("set_nt_acl: acl group control on and "
3538                                                                 "current user in file %s primary group. Override delete_def_acl\n",
3539                                                                 fsp->fsp_name ));
3540
3541                                                         become_root();
3542                                                         sret = SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fsp->fsp_name);
3543                                                         unbecome_root();
3544                                                 }
3545
3546                                                 if (sret == -1) {
3547                                                         DEBUG(3,("set_nt_acl: sys_acl_delete_def_file failed (%s)\n", strerror(errno)));
3548                                                         free_canon_ace_list(file_ace_list);
3549                                                         free_canon_ace_list(dir_ace_list);
3550                                                         return map_nt_error_from_unix(errno);
3551                                                 }
3552                                         }
3553                                 }
3554                         }
3555
3556                         if (acl_set_support) {
3557                                 store_inheritance_attributes(fsp, file_ace_list, dir_ace_list,
3558                                                 (psd->type & SE_DESC_DACL_PROTECTED) ? True : False);
3559                         }
3560
3561                         /*
3562                          * If we cannot set using POSIX ACLs we fall back to checking if we need to chmod.
3563                          */
3564
3565                         if(!acl_set_support && acl_perms) {
3566                                 mode_t posix_perms;
3567
3568                                 if (!convert_canon_ace_to_posix_perms( fsp, file_ace_list, &posix_perms)) {
3569                                         free_canon_ace_list(file_ace_list);
3570                                         free_canon_ace_list(dir_ace_list);
3571                                         DEBUG(3,("set_nt_acl: failed to convert file acl to posix permissions for file %s.\n",
3572                                                 fsp->fsp_name ));
3573                                         return NT_STATUS_ACCESS_DENIED;
3574                                 }
3575
3576                                 if (orig_mode != posix_perms) {
3577
3578                                         DEBUG(3,("set_nt_acl: chmod %s. perms = 0%o.\n",
3579                                                 fsp->fsp_name, (unsigned int)posix_perms ));
3580
3581                                         if(SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms) == -1) {
3582                                                 int sret = -1;
3583                                                 if (acl_group_override(conn, sbuf.st_gid)) {
3584                                                         DEBUG(5,("set_nt_acl: acl group control on and "
3585                                                                 "current user in file %s primary group. Override chmod\n",
3586                                                                 fsp->fsp_name ));
3587
3588                                                         become_root();
3589                                                         sret = SMB_VFS_CHMOD(conn,fsp->fsp_name, posix_perms);
3590                                                         unbecome_root();
3591                                                 }
3592
3593                                                 if (sret == -1) {
3594                                                         DEBUG(3,("set_nt_acl: chmod %s, 0%o failed. Error = %s.\n",
3595                                                                 fsp->fsp_name, (unsigned int)posix_perms, strerror(errno) ));
3596                                                         free_canon_ace_list(file_ace_list);
3597                                                         free_canon_ace_list(dir_ace_list);
3598                                                         return map_nt_error_from_unix(errno);
3599                                                 }
3600                                         }
3601                                 }
3602                         }
3603                 }
3604
3605                 free_canon_ace_list(file_ace_list);
3606                 free_canon_ace_list(dir_ace_list);
3607         }
3608
3609         /* Any chown pending? */
3610         if (need_chown) {
3611                 DEBUG(3,("set_nt_acl: chown %s. uid = %u, gid = %u.\n",
3612                          fsp->fsp_name, (unsigned int)user, (unsigned int)grp ));
3613
3614                 if(try_chown( fsp->conn, fsp->fsp_name, user, grp) == -1) {
3615                         DEBUG(3,("set_nt_acl: chown %s, %u, %u failed. Error = %s.\n",
3616                                  fsp->fsp_name, (unsigned int)user, (unsigned int)grp, strerror(errno) ));
3617                         if (errno == EPERM) {
3618                                 return NT_STATUS_INVALID_OWNER;
3619                         }
3620                         return map_nt_error_from_unix(errno);
3621                 }
3622         }
3623
3624         return NT_STATUS_OK;
3625 }
3626
3627 /****************************************************************************
3628  Get the actual group bits stored on a file with an ACL. Has no effect if
3629  the file has no ACL. Needed in dosmode code where the stat() will return
3630  the mask bits, not the real group bits, for a file with an ACL.
3631 ****************************************************************************/
3632
3633 int get_acl_group_bits( connection_struct *conn, const char *fname, mode_t *mode )
3634 {
3635         int entry_id = SMB_ACL_FIRST_ENTRY;
3636         SMB_ACL_ENTRY_T entry;
3637         SMB_ACL_T posix_acl;
3638         int result = -1;
3639
3640         posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS);
3641         if (posix_acl == (SMB_ACL_T)NULL)
3642                 return -1;
3643
3644         while (SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3645                 SMB_ACL_TAG_T tagtype;
3646                 SMB_ACL_PERMSET_T permset;
3647
3648                 /* get_next... */
3649                 if (entry_id == SMB_ACL_FIRST_ENTRY)
3650                         entry_id = SMB_ACL_NEXT_ENTRY;
3651
3652                 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) ==-1)
3653                         break;
3654
3655                 if (tagtype == SMB_ACL_GROUP_OBJ) {
3656                         if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
3657                                 break;
3658                         } else {
3659                                 *mode &= ~(S_IRGRP|S_IWGRP|S_IXGRP);
3660                                 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_READ) ? S_IRGRP : 0);
3661                                 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_WRITE) ? S_IWGRP : 0);
3662                                 *mode |= (SMB_VFS_SYS_ACL_GET_PERM(conn, permset, SMB_ACL_EXECUTE) ? S_IXGRP : 0);
3663                                 result = 0;
3664                                 break;
3665                         }
3666                 }
3667         }
3668         SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3669         return result;
3670 }
3671
3672 /****************************************************************************
3673  Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3674  and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3675 ****************************************************************************/
3676
3677 static int chmod_acl_internals( connection_struct *conn, SMB_ACL_T posix_acl, mode_t mode)
3678 {
3679         int entry_id = SMB_ACL_FIRST_ENTRY;
3680         SMB_ACL_ENTRY_T entry;
3681         int num_entries = 0;
3682
3683         while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, posix_acl, entry_id, &entry) == 1) {
3684                 SMB_ACL_TAG_T tagtype;
3685                 SMB_ACL_PERMSET_T permset;
3686                 mode_t perms;
3687
3688                 /* get_next... */
3689                 if (entry_id == SMB_ACL_FIRST_ENTRY)
3690                         entry_id = SMB_ACL_NEXT_ENTRY;
3691
3692                 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1)
3693                         return -1;
3694
3695                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1)
3696                         return -1;
3697
3698                 num_entries++;
3699
3700                 switch(tagtype) {
3701                         case SMB_ACL_USER_OBJ:
3702                                 perms = unix_perms_to_acl_perms(mode, S_IRUSR, S_IWUSR, S_IXUSR);
3703                                 break;
3704                         case SMB_ACL_GROUP_OBJ:
3705                                 perms = unix_perms_to_acl_perms(mode, S_IRGRP, S_IWGRP, S_IXGRP);
3706                                 break;
3707                         case SMB_ACL_MASK:
3708                                 /*
3709                                  * FIXME: The ACL_MASK entry permissions should really be set to
3710                                  * the union of the permissions of all ACL_USER,
3711                                  * ACL_GROUP_OBJ, and ACL_GROUP entries. That's what
3712                                  * acl_calc_mask() does, but Samba ACLs doesn't provide it.
3713                                  */
3714                                 perms = S_IRUSR|S_IWUSR|S_IXUSR;
3715                                 break;
3716                         case SMB_ACL_OTHER:
3717                                 perms = unix_perms_to_acl_perms(mode, S_IROTH, S_IWOTH, S_IXOTH);
3718                                 break;
3719                         default:
3720                                 continue;
3721                 }
3722
3723                 if (map_acl_perms_to_permset(conn, perms, &permset) == -1)
3724                         return -1;
3725
3726                 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, entry, permset) == -1)
3727                         return -1;
3728         }
3729
3730         /*
3731          * If this is a simple 3 element ACL or no elements then it's a standard
3732          * UNIX permission set. Just use chmod...
3733          */
3734
3735         if ((num_entries == 3) || (num_entries == 0))
3736                 return -1;
3737
3738         return 0;
3739 }
3740
3741 /****************************************************************************
3742  Get the access ACL of FROM, do a chmod by setting the ACL USER_OBJ,
3743  GROUP_OBJ and OTHER bits in an ACL and set the mask to rwx. Set the
3744  resulting ACL on TO.  Note that name is in UNIX character set.
3745 ****************************************************************************/
3746
3747 static int copy_access_acl(connection_struct *conn, const char *from, const char *to, mode_t mode)
3748 {
3749         SMB_ACL_T posix_acl = NULL;
3750         int ret = -1;
3751
3752         if ((posix_acl = SMB_VFS_SYS_ACL_GET_FILE(conn, from, SMB_ACL_TYPE_ACCESS)) == NULL)
3753                 return -1;
3754
3755         if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3756                 goto done;
3757
3758         ret = SMB_VFS_SYS_ACL_SET_FILE(conn, to, SMB_ACL_TYPE_ACCESS, posix_acl);
3759
3760  done:
3761
3762         SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3763         return ret;
3764 }
3765
3766 /****************************************************************************
3767  Do a chmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3768  and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3769  Note that name is in UNIX character set.
3770 ****************************************************************************/
3771
3772 int chmod_acl(connection_struct *conn, const char *name, mode_t mode)
3773 {
3774         return copy_access_acl(conn, name, name, mode);
3775 }
3776
3777 /****************************************************************************
3778  If the parent directory has no default ACL but it does have an Access ACL,
3779  inherit this Access ACL to file name.
3780 ****************************************************************************/
3781
3782 int inherit_access_acl(connection_struct *conn, const char *inherit_from_dir,
3783                        const char *name, mode_t mode)
3784 {
3785         if (directory_has_default_acl(conn, inherit_from_dir))
3786                 return 0;
3787
3788         return copy_access_acl(conn, inherit_from_dir, name, mode);
3789 }
3790
3791 /****************************************************************************
3792  Do an fchmod by setting the ACL USER_OBJ, GROUP_OBJ and OTHER bits in an ACL
3793  and set the mask to rwx. Needed to preserve complex ACLs set by NT.
3794 ****************************************************************************/
3795
3796 int fchmod_acl(files_struct *fsp, mode_t mode)
3797 {
3798         connection_struct *conn = fsp->conn;
3799         SMB_ACL_T posix_acl = NULL;
3800         int ret = -1;
3801
3802         if ((posix_acl = SMB_VFS_SYS_ACL_GET_FD(fsp)) == NULL)
3803                 return -1;
3804
3805         if ((ret = chmod_acl_internals(conn, posix_acl, mode)) == -1)
3806                 goto done;
3807
3808         ret = SMB_VFS_SYS_ACL_SET_FD(fsp, posix_acl);
3809
3810   done:
3811
3812         SMB_VFS_SYS_ACL_FREE_ACL(conn, posix_acl);
3813         return ret;
3814 }
3815
3816 /****************************************************************************
3817  Check for an existing default POSIX ACL on a directory.
3818 ****************************************************************************/
3819
3820 bool directory_has_default_acl(connection_struct *conn, const char *fname)
3821 {
3822         SMB_ACL_T def_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_DEFAULT);
3823         bool has_acl = False;
3824         SMB_ACL_ENTRY_T entry;
3825
3826         if (def_acl != NULL && (SMB_VFS_SYS_ACL_GET_ENTRY(conn, def_acl, SMB_ACL_FIRST_ENTRY, &entry) == 1)) {
3827                 has_acl = True;
3828         }
3829
3830         if (def_acl) {
3831                 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
3832         }
3833         return has_acl;
3834 }
3835
3836 /****************************************************************************
3837  Map from wire type to permset.
3838 ****************************************************************************/
3839
3840 static bool unix_ex_wire_to_permset(connection_struct *conn, unsigned char wire_perm, SMB_ACL_PERMSET_T *p_permset)
3841 {
3842         if (wire_perm & ~(SMB_POSIX_ACL_READ|SMB_POSIX_ACL_WRITE|SMB_POSIX_ACL_EXECUTE)) {
3843                 return False;
3844         }
3845
3846         if (SMB_VFS_SYS_ACL_CLEAR_PERMS(conn, *p_permset) ==  -1) {
3847                 return False;
3848         }
3849
3850         if (wire_perm & SMB_POSIX_ACL_READ) {
3851                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_READ) == -1) {
3852                         return False;
3853                 }
3854         }
3855         if (wire_perm & SMB_POSIX_ACL_WRITE) {
3856                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_WRITE) == -1) {
3857                         return False;
3858                 }
3859         }
3860         if (wire_perm & SMB_POSIX_ACL_EXECUTE) {
3861                 if (SMB_VFS_SYS_ACL_ADD_PERM(conn, *p_permset, SMB_ACL_EXECUTE) == -1) {
3862                         return False;
3863                 }
3864         }
3865         return True;
3866 }
3867
3868 /****************************************************************************
3869  Map from wire type to tagtype.
3870 ****************************************************************************/
3871
3872 static bool unix_ex_wire_to_tagtype(unsigned char wire_tt, SMB_ACL_TAG_T *p_tt)
3873 {
3874         switch (wire_tt) {
3875                 case SMB_POSIX_ACL_USER_OBJ:
3876                         *p_tt = SMB_ACL_USER_OBJ;
3877                         break;
3878                 case SMB_POSIX_ACL_USER:
3879                         *p_tt = SMB_ACL_USER;
3880                         break;
3881                 case SMB_POSIX_ACL_GROUP_OBJ:
3882                         *p_tt = SMB_ACL_GROUP_OBJ;
3883                         break;
3884                 case SMB_POSIX_ACL_GROUP:
3885                         *p_tt = SMB_ACL_GROUP;
3886                         break;
3887                 case SMB_POSIX_ACL_MASK:
3888                         *p_tt = SMB_ACL_MASK;
3889                         break;
3890                 case SMB_POSIX_ACL_OTHER:
3891                         *p_tt = SMB_ACL_OTHER;
3892                         break;
3893                 default:
3894                         return False;
3895         }
3896         return True;
3897 }
3898
3899 /****************************************************************************
3900  Create a new POSIX acl from wire permissions.
3901  FIXME ! How does the share mask/mode fit into this.... ?
3902 ****************************************************************************/
3903
3904 static SMB_ACL_T create_posix_acl_from_wire(connection_struct *conn, uint16 num_acls, const char *pdata)
3905 {
3906         unsigned int i;
3907         SMB_ACL_T the_acl = SMB_VFS_SYS_ACL_INIT(conn, num_acls);
3908
3909         if (the_acl == NULL) {
3910                 return NULL;
3911         }
3912
3913         for (i = 0; i < num_acls; i++) {
3914                 SMB_ACL_ENTRY_T the_entry;
3915                 SMB_ACL_PERMSET_T the_permset;
3916                 SMB_ACL_TAG_T tag_type;
3917
3918                 if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &the_acl, &the_entry) == -1) {
3919                         DEBUG(0,("create_posix_acl_from_wire: Failed to create entry %u. (%s)\n",
3920                                 i, strerror(errno) ));
3921                         goto fail;
3922                 }
3923
3924                 if (!unix_ex_wire_to_tagtype(CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), &tag_type)) {
3925                         DEBUG(0,("create_posix_acl_from_wire: invalid wire tagtype %u on entry %u.\n",
3926                                 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)), i ));
3927                         goto fail;
3928                 }
3929
3930                 if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, the_entry, tag_type) == -1) {
3931                         DEBUG(0,("create_posix_acl_from_wire: Failed to set tagtype on entry %u. (%s)\n",
3932                                 i, strerror(errno) ));
3933                         goto fail;
3934                 }
3935
3936                 /* Get the permset pointer from the new ACL entry. */
3937                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, the_entry, &the_permset) == -1) {
3938                         DEBUG(0,("create_posix_acl_from_wire: Failed to get permset on entry %u. (%s)\n",
3939                                 i, strerror(errno) ));
3940                         goto fail;
3941                 }
3942
3943                 /* Map from wire to permissions. */
3944                 if (!unix_ex_wire_to_permset(conn, CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+1), &the_permset)) {
3945                         DEBUG(0,("create_posix_acl_from_wire: invalid permset %u on entry %u.\n",
3946                                 CVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE) + 1), i ));
3947                         goto fail;
3948                 }
3949
3950                 /* Now apply to the new ACL entry. */
3951                 if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, the_entry, the_permset) == -1) {
3952                         DEBUG(0,("create_posix_acl_from_wire: Failed to add permset on entry %u. (%s)\n",
3953                                 i, strerror(errno) ));
3954                         goto fail;
3955                 }
3956
3957                 if (tag_type == SMB_ACL_USER) {
3958                         uint32 uidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3959                         uid_t uid = (uid_t)uidval;
3960                         if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&uid) == -1) {
3961                                 DEBUG(0,("create_posix_acl_from_wire: Failed to set uid %u on entry %u. (%s)\n",
3962                                         (unsigned int)uid, i, strerror(errno) ));
3963                                 goto fail;
3964                         }
3965                 }
3966
3967                 if (tag_type == SMB_ACL_GROUP) {
3968                         uint32 gidval = IVAL(pdata,(i*SMB_POSIX_ACL_ENTRY_SIZE)+2);
3969                         gid_t gid = (uid_t)gidval;
3970                         if (SMB_VFS_SYS_ACL_SET_QUALIFIER(conn, the_entry,(void *)&gid) == -1) {
3971                                 DEBUG(0,("create_posix_acl_from_wire: Failed to set gid %u on entry %u. (%s)\n",
3972                                         (unsigned int)gid, i, strerror(errno) ));
3973                                 goto fail;
3974                         }
3975                 }
3976         }
3977
3978         return the_acl;
3979
3980  fail:
3981
3982         if (the_acl != NULL) {
3983                 SMB_VFS_SYS_ACL_FREE_ACL(conn, the_acl);
3984         }
3985         return NULL;
3986 }
3987
3988 /****************************************************************************
3989  Calls from UNIX extensions - Default POSIX ACL set.
3990  If num_def_acls == 0 and not a directory just return. If it is a directory
3991  and num_def_acls == 0 then remove the default acl. Else set the default acl
3992  on the directory.
3993 ****************************************************************************/
3994
3995 bool set_unix_posix_default_acl(connection_struct *conn, const char *fname, SMB_STRUCT_STAT *psbuf,
3996                                 uint16 num_def_acls, const char *pdata)
3997 {
3998         SMB_ACL_T def_acl = NULL;
3999
4000         if (num_def_acls && !S_ISDIR(psbuf->st_mode)) {
4001                 DEBUG(5,("set_unix_posix_default_acl: Can't set default ACL on non-directory file %s\n", fname ));
4002                 errno = EISDIR;
4003                 return False;
4004         }
4005
4006         if (!num_def_acls) {
4007                 /* Remove the default ACL. */
4008                 if (SMB_VFS_SYS_ACL_DELETE_DEF_FILE(conn, fname) == -1) {
4009                         DEBUG(5,("set_unix_posix_default_acl: acl_delete_def_file failed on directory %s (%s)\n",
4010                                 fname, strerror(errno) ));
4011                         return False;
4012                 }
4013                 return True;
4014         }
4015
4016         if ((def_acl = create_posix_acl_from_wire(conn, num_def_acls, pdata)) == NULL) {
4017                 return False;
4018         }
4019
4020         if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_DEFAULT, def_acl) == -1) {
4021                 DEBUG(5,("set_unix_posix_default_acl: acl_set_file failed on directory %s (%s)\n",
4022                         fname, strerror(errno) ));
4023                 SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4024                 return False;
4025         }
4026
4027         DEBUG(10,("set_unix_posix_default_acl: set default acl for file %s\n", fname ));
4028         SMB_VFS_SYS_ACL_FREE_ACL(conn, def_acl);
4029         return True;
4030 }
4031
4032 /****************************************************************************
4033  Remove an ACL from a file. As we don't have acl_delete_entry() available
4034  we must read the current acl and copy all entries except MASK, USER and GROUP
4035  to a new acl, then set that. This (at least on Linux) causes any ACL to be
4036  removed.
4037  FIXME ! How does the share mask/mode fit into this.... ?
4038 ****************************************************************************/
4039
4040 static bool remove_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname)
4041 {
4042         SMB_ACL_T file_acl = NULL;
4043         int entry_id = SMB_ACL_FIRST_ENTRY;
4044         SMB_ACL_ENTRY_T entry;
4045         bool ret = False;
4046         /* Create a new ACL with only 3 entries, u/g/w. */
4047         SMB_ACL_T new_file_acl = SMB_VFS_SYS_ACL_INIT(conn, 3);
4048         SMB_ACL_ENTRY_T user_ent = NULL;
4049         SMB_ACL_ENTRY_T group_ent = NULL;
4050         SMB_ACL_ENTRY_T other_ent = NULL;
4051
4052         if (new_file_acl == NULL) {
4053                 DEBUG(5,("remove_posix_acl: failed to init new ACL with 3 entries for file %s.\n", fname));
4054                 return False;
4055         }
4056
4057         /* Now create the u/g/w entries. */
4058         if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &user_ent) == -1) {
4059                 DEBUG(5,("remove_posix_acl: Failed to create user entry for file %s. (%s)\n",
4060                         fname, strerror(errno) ));
4061                 goto done;
4062         }
4063         if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, user_ent, SMB_ACL_USER_OBJ) == -1) {
4064                 DEBUG(5,("remove_posix_acl: Failed to set user entry for file %s. (%s)\n",
4065                         fname, strerror(errno) ));
4066                 goto done;
4067         }
4068
4069         if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &group_ent) == -1) {
4070                 DEBUG(5,("remove_posix_acl: Failed to create group entry for file %s. (%s)\n",
4071                         fname, strerror(errno) ));
4072                 goto done;
4073         }
4074         if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, group_ent, SMB_ACL_GROUP_OBJ) == -1) {
4075                 DEBUG(5,("remove_posix_acl: Failed to set group entry for file %s. (%s)\n",
4076                         fname, strerror(errno) ));
4077                 goto done;
4078         }
4079
4080         if (SMB_VFS_SYS_ACL_CREATE_ENTRY(conn, &new_file_acl, &other_ent) == -1) {
4081                 DEBUG(5,("remove_posix_acl: Failed to create other entry for file %s. (%s)\n",
4082                         fname, strerror(errno) ));
4083                 goto done;
4084         }
4085         if (SMB_VFS_SYS_ACL_SET_TAG_TYPE(conn, other_ent, SMB_ACL_OTHER) == -1) {
4086                 DEBUG(5,("remove_posix_acl: Failed to set other entry for file %s. (%s)\n",
4087                         fname, strerror(errno) ));
4088                 goto done;
4089         }
4090
4091         /* Get the current file ACL. */
4092         if (fsp && fsp->fh->fd != -1) {
4093                 file_acl = SMB_VFS_SYS_ACL_GET_FD(fsp);
4094         } else {
4095                 file_acl = SMB_VFS_SYS_ACL_GET_FILE( conn, fname, SMB_ACL_TYPE_ACCESS);
4096         }
4097
4098         if (file_acl == NULL) {
4099                 /* This is only returned if an error occurred. Even for a file with
4100                    no acl a u/g/w acl should be returned. */
4101                 DEBUG(5,("remove_posix_acl: failed to get ACL from file %s (%s).\n",
4102                         fname, strerror(errno) ));
4103                 goto done;
4104         }
4105
4106         while ( SMB_VFS_SYS_ACL_GET_ENTRY(conn, file_acl, entry_id, &entry) == 1) {
4107                 SMB_ACL_TAG_T tagtype;
4108                 SMB_ACL_PERMSET_T permset;
4109
4110                 /* get_next... */
4111                 if (entry_id == SMB_ACL_FIRST_ENTRY)
4112                         entry_id = SMB_ACL_NEXT_ENTRY;
4113
4114                 if (SMB_VFS_SYS_ACL_GET_TAG_TYPE(conn, entry, &tagtype) == -1) {
4115                         DEBUG(5,("remove_posix_acl: failed to get tagtype from ACL on file %s (%s).\n",
4116                                 fname, strerror(errno) ));
4117                         goto done;
4118                 }
4119
4120                 if (SMB_VFS_SYS_ACL_GET_PERMSET(conn, entry, &permset) == -1) {
4121                         DEBUG(5,("remove_posix_acl: failed to get permset from ACL on file %s (%s).\n",
4122                                 fname, strerror(errno) ));
4123                         goto done;
4124                 }
4125
4126                 if (tagtype == SMB_ACL_USER_OBJ) {
4127                         if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, user_ent, permset) == -1) {
4128                                 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4129                                         fname, strerror(errno) ));
4130                         }
4131                 } else if (tagtype == SMB_ACL_GROUP_OBJ) {
4132                         if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, group_ent, permset) == -1) {
4133                                 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4134                                         fname, strerror(errno) ));
4135                         }
4136                 } else if (tagtype == SMB_ACL_OTHER) {
4137                         if (SMB_VFS_SYS_ACL_SET_PERMSET(conn, other_ent, permset) == -1) {
4138                                 DEBUG(5,("remove_posix_acl: failed to set permset from ACL on file %s (%s).\n",
4139                                         fname, strerror(errno) ));
4140                         }
4141                 }
4142         }
4143
4144         /* Set the new empty file ACL. */
4145         if (fsp && fsp->fh->fd != -1) {
4146                 if (SMB_VFS_SYS_ACL_SET_FD(fsp, new_file_acl) == -1) {
4147                         DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4148                                 fname, strerror(errno) ));
4149                         goto done;
4150                 }
4151         } else {
4152                 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, new_file_acl) == -1) {
4153                         DEBUG(5,("remove_posix_acl: acl_set_file failed on %s (%s)\n",
4154                                 fname, strerror(errno) ));
4155                         goto done;
4156                 }
4157         }
4158
4159         ret = True;
4160
4161  done:
4162
4163         if (file_acl) {
4164                 SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4165         }
4166         if (new_file_acl) {
4167                 SMB_VFS_SYS_ACL_FREE_ACL(conn, new_file_acl);
4168         }
4169         return ret;
4170 }
4171
4172 /****************************************************************************
4173  Calls from UNIX extensions - POSIX ACL set.
4174  If num_def_acls == 0 then read/modify/write acl after removing all entries
4175  except SMB_ACL_USER_OBJ, SMB_ACL_GROUP_OBJ, SMB_ACL_OTHER.
4176 ****************************************************************************/
4177
4178 bool set_unix_posix_acl(connection_struct *conn, files_struct *fsp, const char *fname, uint16 num_acls, const char *pdata)
4179 {
4180         SMB_ACL_T file_acl = NULL;
4181
4182         if (!num_acls) {
4183                 /* Remove the ACL from the file. */
4184                 return remove_posix_acl(conn, fsp, fname);
4185         }
4186
4187         if ((file_acl = create_posix_acl_from_wire(conn, num_acls, pdata)) == NULL) {
4188                 return False;
4189         }
4190
4191         if (fsp && fsp->fh->fd != -1) {
4192                 /* The preferred way - use an open fd. */
4193                 if (SMB_VFS_SYS_ACL_SET_FD(fsp, file_acl) == -1) {
4194                         DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4195                                 fname, strerror(errno) ));
4196                         SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4197                         return False;
4198                 }
4199         } else {
4200                 if (SMB_VFS_SYS_ACL_SET_FILE(conn, fname, SMB_ACL_TYPE_ACCESS, file_acl) == -1) {
4201                         DEBUG(5,("set_unix_posix_acl: acl_set_file failed on %s (%s)\n",
4202                                 fname, strerror(errno) ));
4203                         SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4204                         return False;
4205                 }
4206         }
4207
4208         DEBUG(10,("set_unix_posix_acl: set acl for file %s\n", fname ));
4209         SMB_VFS_SYS_ACL_FREE_ACL(conn, file_acl);
4210         return True;
4211 }
4212
4213 /********************************************************************
4214  Pull the NT ACL from a file on disk or the OpenEventlog() access
4215  check.  Caller is responsible for freeing the returned security
4216  descriptor via TALLOC_FREE().  This is designed for dealing with
4217  user space access checks in smbd outside of the VFS.  For example,
4218  checking access rights in OpenEventlog().
4219
4220  Assume we are dealing with files (for now)
4221 ********************************************************************/
4222
4223 SEC_DESC *get_nt_acl_no_snum( TALLOC_CTX *ctx, const char *fname)
4224 {
4225         SEC_DESC *psd, *ret_sd;
4226         connection_struct conn;
4227         files_struct finfo;
4228         struct fd_handle fh;
4229
4230         ZERO_STRUCT( conn );
4231
4232         if ( !(conn.mem_ctx = talloc_init( "novfs_get_nt_acl" )) ) {
4233                 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4234                 return NULL;
4235         }
4236
4237         if (!(conn.params = TALLOC_P(conn.mem_ctx, struct share_params))) {
4238                 DEBUG(0,("get_nt_acl_no_snum: talloc() failed!\n"));
4239                 TALLOC_FREE(conn.mem_ctx);
4240                 return NULL;
4241         }
4242
4243         conn.params->service = -1;
4244
4245         set_conn_connectpath(&conn, "/");
4246
4247         if (!smbd_vfs_init(&conn)) {
4248                 DEBUG(0,("get_nt_acl_no_snum: Unable to create a fake connection struct!\n"));
4249                 conn_free_internal( &conn );
4250                 return NULL;
4251         }
4252
4253         ZERO_STRUCT( finfo );
4254         ZERO_STRUCT( fh );
4255
4256         finfo.fnum = -1;
4257         finfo.conn = &conn;
4258         finfo.fh = &fh;
4259         finfo.fh->fd = -1;
4260         finfo.fsp_name = CONST_DISCARD(char *,fname);
4261
4262         if (!NT_STATUS_IS_OK(posix_fget_nt_acl( &finfo, DACL_SECURITY_INFORMATION, &psd))) {
4263                 DEBUG(0,("get_nt_acl_no_snum: get_nt_acl returned zero.\n"));
4264                 conn_free_internal( &conn );
4265                 return NULL;
4266         }
4267
4268         ret_sd = dup_sec_desc( ctx, psd );
4269
4270         conn_free_internal( &conn );
4271
4272         return ret_sd;
4273 }