source3/modules/vfs_afsacl.c

   1 /*
   2  * Convert AFS acls to NT acls and vice versa.
   3  *
   4  * Copyright (C) Volker Lendecke, 2003
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 3 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20 #include "includes.h"
  21 #include "system/filesys.h"
  22 #include "smbd/smbd.h"
  23 #include "../librpc/gen_ndr/lsa.h"
  24 #include "../libcli/security/security.h"
  25 #include "../libcli/security/dom_sid.h"
  26 #include "passdb.h"
  27
  28 #undef DBGC_CLASS
  29 #define DBGC_CLASS DBGC_VFS
  30
  31 #include <afs/stds.h>
  32 #include <afs/afs.h>
  33 #include <afs/auth.h>
  34 #include <afs/venus.h>
  35 #include <afs/prs_fs.h>
  36
  37 #define MAXSIZE 2049
  38
  39 extern const struct dom_sid global_sid_World;
  40 extern const struct dom_sid global_sid_Builtin_Administrators;
  41 extern const struct dom_sid global_sid_Builtin_Backup_Operators;
  42 extern const struct dom_sid global_sid_Authenticated_Users;
  43 extern const struct dom_sid global_sid_NULL;
  44
  45 static char space_replacement = '%';
  46
  47 /* Do we expect SIDs as pts names? */
  48 static bool sidpts;
  49
  50 extern int afs_syscall(int, const char *, int, char *, int);
  51
  52 struct afs_ace {
  53         bool positive;
  54         char *name;
  55         struct dom_sid sid;
  56         enum lsa_SidType type;
  57         uint32 rights;
  58         struct afs_ace *next;
  59 };
  60
  61 struct afs_acl {
  62         TALLOC_CTX *ctx;
  63         int type;
  64         int num_aces;
  65         struct afs_ace *acelist;
  66 };
  67
  68 struct afs_iob {
  69         char *in, *out;
  70         uint16 in_size, out_size;
  71 };
  72
  73
  74 static bool init_afs_acl(struct afs_acl *acl)
  75 {
  76         ZERO_STRUCT(*acl);
  77         acl->ctx = talloc_init("afs_acl");
  78         if (acl->ctx == NULL) {
  79                 DEBUG(10, ("Could not init afs_acl"));
  80                 return false;
  81         }
  82         return true;
  83 }
  84
  85 static void free_afs_acl(struct afs_acl *acl)
  86 {
  87         if (acl->ctx != NULL)
  88                 talloc_destroy(acl->ctx);
  89         acl->ctx = NULL;
  90         acl->num_aces = 0;
  91         acl->acelist = NULL;
  92 }
  93
  94 static struct afs_ace *clone_afs_ace(TALLOC_CTX *mem_ctx, struct afs_ace *ace)
  95 {
  96         struct afs_ace *result = talloc(mem_ctx, struct afs_ace);
  97
  98         if (result == NULL)
  99                 return NULL;
 100
 101         *result = *ace;
 102
 103         result->next = NULL;
 104         result->name = talloc_strdup(mem_ctx, ace->name);
 105
 106         if (result->name == NULL) {
 107                 return NULL;
 108         }
 109
 110         return result;
 111 }
 112
 113 static struct afs_ace *new_afs_ace(TALLOC_CTX *mem_ctx,
 114                                    bool positive,
 115                                    const char *name, uint32 rights)
 116 {
 117         struct dom_sid sid;
 118         enum lsa_SidType type;
 119         struct afs_ace *result;
 120
 121         if (strcmp(name, "system:administrators") == 0) {
 122
 123                 sid_copy(&sid, &global_sid_Builtin_Administrators);
 124                 type = SID_NAME_ALIAS;
 125
 126         } else if (strcmp(name, "system:anyuser") == 0) {
 127
 128                 sid_copy(&sid, &global_sid_World);
 129                 type = SID_NAME_ALIAS;
 130
 131         } else if (strcmp(name, "system:authuser") == 0) {
 132
 133                 sid_copy(&sid, &global_sid_Authenticated_Users);
 134                 type = SID_NAME_WKN_GRP;
 135
 136         } else if (strcmp(name, "system:backup") == 0) {
 137
 138                 sid_copy(&sid, &global_sid_Builtin_Backup_Operators);
 139                 type = SID_NAME_ALIAS;
 140
 141         } else if (sidpts) {
 142                 /* All PTS users/groups are expressed as SIDs */
 143
 144                 sid_copy(&sid, &global_sid_NULL);
 145                 type = SID_NAME_UNKNOWN;
 146
 147                 if (string_to_sid(&sid, name)) {
 148                         const char *user, *domain;
 149                         /* We have to find the type, look up the SID */
 150                         lookup_sid(talloc_tos(), &sid,
 151                                    &domain, &user, &type);
 152                 }
 153
 154         } else {
 155
 156                 const char *domain, *uname;
 157                 char *p;
 158
 159                 p = strchr_m(name, *lp_winbind_separator());
 160                 if (p != NULL) {
 161                         *p = '\\';
 162                 }
 163
 164                 if (!lookup_name(talloc_tos(), name, LOOKUP_NAME_ALL,
 165                                  &domain, &uname, &sid, &type)) {
 166                         DEBUG(10, ("Could not find AFS user %s\n", name));
 167
 168                         sid_copy(&sid, &global_sid_NULL);
 169                         type = SID_NAME_UNKNOWN;
 170
 171                 }
 172         }
 173
 174         result = talloc(mem_ctx, struct afs_ace);
 175
 176         if (result == NULL) {
 177                 DEBUG(0, ("Could not talloc AFS ace\n"));
 178                 return NULL;
 179         }
 180
 181         result->name = talloc_strdup(mem_ctx, name);
 182         if (result->name == NULL) {
 183                 DEBUG(0, ("Could not talloc AFS ace name\n"));
 184                 return NULL;
 185         }
 186
 187         result->sid = sid;
 188         result->type = type;
 189
 190         result->positive = positive;
 191         result->rights = rights;
 192
 193         return result;
 194 }
 195
 196 static void add_afs_ace(struct afs_acl *acl,
 197                         bool positive,
 198                         const char *name, uint32 rights)
 199 {
 200         struct afs_ace *ace;
 201
 202         for (ace = acl->acelist; ace != NULL; ace = ace->next) {
 203                 if ((ace->positive == positive) &&
 204                     (strequal(ace->name, name))) {
 205                         ace->rights |= rights;
 206                         return;
 207                 }
 208         }
 209
 210         ace = new_afs_ace(acl->ctx, positive, name, rights);
 211
 212         ace->next = acl->acelist;
 213         acl->acelist = ace;
 214
 215         acl->num_aces += 1;
 216
 217         DEBUG(10, ("add_afs_ace: Added %s entry for %s with rights %d\n",
 218                    ace->positive?"positive":"negative",
 219                    ace->name, ace->rights));
 220 }
 221
 222 /* AFS ACLs in string form are a long string of fields delimited with \n.
 223  *
 224  * First line:  Number of positive entries
 225  * Second line: Number of negative entries
 226  * Third and following lines: The entries themselves
 227  *
 228  * An ACE is a line of two fields, delimited by \t.
 229  *
 230  * First field:  Name
 231  * Second field: Rights
 232  */
 233
 234 static bool parse_afs_acl(struct afs_acl *acl, const char *acl_str)
 235 {
 236         int nplus, nminus;
 237         int aces;
 238
 239         char str[MAXSIZE];
 240         char *p = str;
 241
 242         strlcpy(str, acl_str, MAXSIZE);
 243
 244         if (sscanf(p, "%d", &nplus) != 1)
 245                 return false;
 246
 247         DEBUG(10, ("Found %d positive entries\n", nplus));
 248
 249         if ((p = strchr(p, '\n')) == NULL)
 250                 return false;
 251         p += 1;
 252
 253         if (sscanf(p, "%d", &nminus) != 1)
 254                 return false;
 255
 256         DEBUG(10, ("Found %d negative entries\n", nminus));
 257
 258         if ((p = strchr(p, '\n')) == NULL)
 259                 return false;
 260         p += 1;
 261
 262         for (aces = nplus+nminus; aces > 0; aces--)
 263         {
 264
 265                 const char *namep;
 266                 fstring name;
 267                 uint32 rights;
 268                 char *space;
 269
 270                 namep = p;
 271
 272                 if ((p = strchr(p, '\t')) == NULL)
 273                         return false;
 274                 *p = '\0';
 275                 p += 1;
 276
 277                 if (sscanf(p, "%d", &rights) != 1)
 278                         return false;
 279
 280                 if ((p = strchr(p, '\n')) == NULL)
 281                         return false;
 282                 p += 1;
 283
 284                 fstrcpy(name, namep);
 285
 286                 while ((space = strchr_m(name, space_replacement)) != NULL)
 287                         *space = ' ';
 288
 289                 add_afs_ace(acl, nplus>0, name, rights);
 290
 291                 nplus -= 1;
 292         }
 293
 294         return true;
 295 }
 296
 297 static bool unparse_afs_acl(struct afs_acl *acl, char *acl_str)
 298 {
 299         /* TODO: String length checks!!!! */
 300
 301         int positives = 0;
 302         int negatives = 0;
 303         fstring line;
 304         struct afs_ace *ace = acl->acelist;
 305
 306         *acl_str = 0;
 307
 308         while (ace != NULL) {
 309                 if (ace->positive)
 310                         positives++;
 311                 else
 312                         negatives++;
 313                 ace = ace->next;
 314         }
 315
 316         fstr_sprintf(line, "%d\n", positives);
 317         if (strlcat(acl_str, line, MAXSIZE) >= MAXSIZE) {
 318                 return false;
 319         }
 320
 321         fstr_sprintf(line, "%d\n", negatives);
 322         if (strlcat(acl_str, line, MAXSIZE) >= MAXSIZE) {
 323                 return false;
 324         }
 325
 326         ace = acl->acelist;
 327
 328         while (ace != NULL) {
 329                 fstr_sprintf(line, "%s\t%d\n", ace->name, ace->rights);
 330                 if (strlcat(acl_str, line, MAXSIZE) >= MAXSIZE) {
 331                         return false;
 332                 }
 333                 ace = ace->next;
 334         }
 335         return true;
 336 }
 337
 338 static uint32 afs_to_nt_file_rights(uint32 rights)
 339 {
 340         uint32 result = 0;
 341
 342         if (rights & PRSFS_READ)
 343                 result |= FILE_READ_DATA | FILE_READ_EA |
 344                         FILE_EXECUTE | FILE_READ_ATTRIBUTES |
 345                         READ_CONTROL_ACCESS | SYNCHRONIZE_ACCESS;
 346
 347         if (rights & PRSFS_WRITE)
 348                 result |= FILE_WRITE_DATA | FILE_WRITE_ATTRIBUTES |
 349                         FILE_WRITE_EA | FILE_APPEND_DATA;
 350
 351         if (rights & PRSFS_LOCK)
 352                 result |= WRITE_OWNER_ACCESS;
 353
 354         if (rights & PRSFS_DELETE)
 355                 result |= DELETE_ACCESS;
 356
 357         return result;
 358 }
 359
 360 static void afs_to_nt_dir_rights(uint32 afs_rights, uint32 *nt_rights,
 361                                  uint8 *flag)
 362 {
 363         *nt_rights = 0;
 364         *flag = SEC_ACE_FLAG_OBJECT_INHERIT |
 365                 SEC_ACE_FLAG_CONTAINER_INHERIT;
 366
 367         if (afs_rights & PRSFS_INSERT)
 368                 *nt_rights |= FILE_ADD_FILE | FILE_ADD_SUBDIRECTORY;
 369
 370         if (afs_rights & PRSFS_LOOKUP)
 371                 *nt_rights |= FILE_READ_DATA | FILE_READ_EA |
 372                         FILE_EXECUTE | FILE_READ_ATTRIBUTES |
 373                         READ_CONTROL_ACCESS | SYNCHRONIZE_ACCESS;
 374
 375         if (afs_rights & PRSFS_WRITE)
 376                 *nt_rights |= FILE_WRITE_ATTRIBUTES | FILE_WRITE_DATA |
 377                         FILE_APPEND_DATA | FILE_WRITE_EA;
 378
 379         if ((afs_rights & (PRSFS_INSERT|PRSFS_LOOKUP|PRSFS_DELETE)) ==
 380             (PRSFS_INSERT|PRSFS_LOOKUP|PRSFS_DELETE))
 381                 *nt_rights |= FILE_WRITE_ATTRIBUTES | FILE_WRITE_EA |
 382                         GENERIC_WRITE_ACCESS;
 383
 384         if (afs_rights & PRSFS_DELETE)
 385                 *nt_rights |= DELETE_ACCESS;
 386
 387         if (afs_rights & PRSFS_ADMINISTER)
 388                 *nt_rights |= FILE_DELETE_CHILD | WRITE_DAC_ACCESS |
 389                         WRITE_OWNER_ACCESS;
 390
 391         if ( (afs_rights & PRSFS_LOOKUP) ==
 392              (afs_rights & (PRSFS_LOOKUP|PRSFS_READ)) ) {
 393                 /* Only lookup right */
 394                 *flag = SEC_ACE_FLAG_CONTAINER_INHERIT;
 395         }
 396 }
 397
 398 #define AFS_FILE_RIGHTS (PRSFS_READ|PRSFS_WRITE|PRSFS_LOCK)
 399 #define AFS_DIR_RIGHTS  (PRSFS_INSERT|PRSFS_LOOKUP|PRSFS_DELETE|PRSFS_ADMINISTER)
 400
 401 static void split_afs_acl(struct afs_acl *acl,
 402                           struct afs_acl *dir_acl,
 403                           struct afs_acl *file_acl)
 404 {
 405         struct afs_ace *ace;
 406
 407         init_afs_acl(dir_acl);
 408         init_afs_acl(file_acl);
 409
 410         for (ace = acl->acelist; ace != NULL; ace = ace->next) {
 411                 if (ace->rights & AFS_FILE_RIGHTS) {
 412                         add_afs_ace(file_acl, ace->positive, ace->name,
 413                                     ace->rights & AFS_FILE_RIGHTS);
 414                 }
 415
 416                 if (ace->rights & AFS_DIR_RIGHTS) {
 417                         add_afs_ace(dir_acl, ace->positive, ace->name,
 418                                     ace->rights & AFS_DIR_RIGHTS);
 419                 }
 420         }
 421 }
 422
 423 static bool same_principal(struct afs_ace *x, struct afs_ace *y)
 424 {
 425         return ( (x->positive == y->positive) &&
 426                  (dom_sid_compare(&x->sid, &y->sid) == 0) );
 427 }
 428
 429 static void merge_afs_acls(struct afs_acl *dir_acl,
 430                            struct afs_acl *file_acl,
 431                            struct afs_acl *target)
 432 {
 433         struct afs_ace *ace;
 434
 435         init_afs_acl(target);
 436
 437         for (ace = dir_acl->acelist; ace != NULL; ace = ace->next) {
 438                 struct afs_ace *file_ace;
 439                 bool found = false;
 440
 441                 for (file_ace = file_acl->acelist;
 442                      file_ace != NULL;
 443                      file_ace = file_ace->next) {
 444                         if (!same_principal(ace, file_ace))
 445                                 continue;
 446
 447                         add_afs_ace(target, ace->positive, ace->name,
 448                                     ace->rights | file_ace->rights);
 449                         found = true;
 450                         break;
 451                 }
 452                 if (!found)
 453                         add_afs_ace(target, ace->positive, ace->name,
 454                                     ace->rights);
 455         }
 456
 457         for (ace = file_acl->acelist; ace != NULL; ace = ace->next) {
 458                 struct afs_ace *dir_ace;
 459                 bool already_seen = false;
 460
 461                 for (dir_ace = dir_acl->acelist;
 462                      dir_ace != NULL;
 463                      dir_ace = dir_ace->next) {
 464                         if (!same_principal(ace, dir_ace))
 465                                 continue;
 466                         already_seen = true;
 467                         break;
 468                 }
 469                 if (!already_seen)
 470                         add_afs_ace(target, ace->positive, ace->name,
 471                                     ace->rights);
 472         }
 473 }
 474
 475 #define PERMS_READ   0x001200a9
 476 #define PERMS_CHANGE 0x001301bf
 477 #define PERMS_FULL   0x001f01ff
 478
 479 static struct static_dir_ace_mapping {
 480         uint8 type;
 481         uint8 flags;
 482         uint32 mask;
 483         uint32 afs_rights;
 484 } ace_mappings[] = {
 485
 486         /* Full control */
 487         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT,
 488           PERMS_FULL, 127 /* rlidwka */ },
 489
 490         /* Change (write) */
 491         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT,
 492           PERMS_CHANGE, 63 /* rlidwk */ },
 493
 494         /* Read (including list folder content) */
 495         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT,
 496           PERMS_READ, 9 /* rl */ },
 497
 498         /* Read without list folder content -- same as "l" */
 499         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT,
 500           0x00120089, 8 /* l */ },
 501
 502         /* some stupid workaround for preventing fallbacks */
 503         { 0, 0x3, 0x0012019F, 9 /* rl */ },
 504         { 0, 0x13, PERMS_FULL, 127 /* full */ },
 505
 506         /* read, delete and execute access plus synchronize */
 507         { 0, 0x3, 0x001300A9, 9 /* should be rdl, set to rl */},
 508         /* classical read list */
 509         { 0, 0x13, 0x001200A9, 9 /* rl */},
 510         /* almost full control, no delete */
 511         { 0, 0x13, PERMS_CHANGE, 63 /* rwidlk */},
 512
 513         /* List folder */
 514         { 0, SEC_ACE_FLAG_CONTAINER_INHERIT,
 515           PERMS_READ, 8 /* l */ },
 516
 517         /* FULL without inheritance -- in all cases here we also get
 518            the corresponding INHERIT_ONLY ACE in the same ACL */
 519         { 0, 0, PERMS_FULL, 127 /* rlidwka */ },
 520
 521         /* FULL inherit only -- counterpart to previous one */
 522         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_INHERIT_ONLY,
 523           PERMS_FULL | SEC_GENERIC_WRITE, 127 /* rlidwka */ },
 524
 525         /* CHANGE without inheritance -- in all cases here we also get
 526            the corresponding INHERIT_ONLY ACE in the same ACL */
 527         { 0, 0, PERMS_CHANGE, 63 /* rlidwk */ },
 528
 529         /* CHANGE inherit only -- counterpart to previous one */
 530         { 0, SEC_ACE_FLAG_OBJECT_INHERIT|SEC_ACE_FLAG_CONTAINER_INHERIT|SEC_ACE_FLAG_INHERIT_ONLY,
 531           PERMS_CHANGE | SEC_GENERIC_WRITE, 63 /* rlidwk */ },
 532
 533         /* End marker, hopefully there's no afs right 9999 :-) */
 534         { 0, 0, 0, 9999 }
 535 };
 536
 537 static uint32 nt_to_afs_dir_rights(const char *filename, const struct security_ace *ace)
 538 {
 539         uint32 result = 0;
 540         uint32 rights = ace->access_mask;
 541         uint8 flags = ace->flags;
 542
 543         struct static_dir_ace_mapping *m;
 544
 545         for (m = &ace_mappings[0]; m->afs_rights != 9999; m++) {
 546                 if ( (ace->type == m->type) &&
 547                      (ace->flags == m->flags) &&
 548                      (ace->access_mask == m->mask) )
 549                         return m->afs_rights;
 550         }
 551
 552         DEBUG(1, ("AFSACL FALLBACK: 0x%X 0x%X 0x%X %s %X\n",
 553                   ace->type, ace->flags, ace->access_mask, filename, rights));
 554
 555         if (rights & (GENERIC_ALL_ACCESS|WRITE_DAC_ACCESS)) {
 556                 result |= PRSFS_READ | PRSFS_WRITE | PRSFS_INSERT |
 557                         PRSFS_LOOKUP | PRSFS_DELETE | PRSFS_LOCK |
 558                         PRSFS_ADMINISTER;
 559         }
 560
 561         if (rights & (GENERIC_READ_ACCESS|FILE_READ_DATA)) {
 562                 result |= PRSFS_LOOKUP;
 563                 if (flags & SEC_ACE_FLAG_OBJECT_INHERIT) {
 564                         result |= PRSFS_READ;
 565                 }
 566         }
 567
 568         if (rights & (GENERIC_WRITE_ACCESS|FILE_WRITE_DATA)) {
 569                 result |= PRSFS_INSERT | PRSFS_DELETE;
 570                 if (flags & SEC_ACE_FLAG_OBJECT_INHERIT) {
 571                         result |= PRSFS_WRITE | PRSFS_LOCK;
 572                 }
 573         }
 574
 575         return result;
 576 }
 577
 578 static uint32 nt_to_afs_file_rights(const char *filename, const struct security_ace *ace)
 579 {
 580         uint32 result = 0;
 581         uint32 rights = ace->access_mask;
 582
 583         if (rights & (GENERIC_READ_ACCESS|FILE_READ_DATA)) {
 584                 result |= PRSFS_READ;
 585         }
 586
 587         if (rights & (GENERIC_WRITE_ACCESS|FILE_WRITE_DATA)) {
 588                 result |= PRSFS_WRITE | PRSFS_LOCK;
 589         }
 590
 591         return result;
 592 }
 593
 594 static size_t afs_to_nt_acl_common(struct afs_acl *afs_acl,
 595                                    SMB_STRUCT_STAT *psbuf,
 596                                    uint32 security_info,
 597                                    TALLOC_CTX *mem_ctx,
 598                                    struct security_descriptor **ppdesc)
 599 {
 600         struct security_ace *nt_ace_list;
 601         struct dom_sid owner_sid, group_sid;
 602         struct security_acl *psa = NULL;
 603         int good_aces;
 604         size_t sd_size;
 605
 606         struct afs_ace *afs_ace;
 607
 608         uid_to_sid(&owner_sid, psbuf->st_ex_uid);
 609         gid_to_sid(&group_sid, psbuf->st_ex_gid);
 610
 611         if (afs_acl->num_aces) {
 612                 nt_ace_list = talloc_array(mem_ctx, struct security_ace, afs_acl->num_aces);
 613
 614                 if (nt_ace_list == NULL)
 615                         return 0;
 616         } else {
 617                 nt_ace_list = NULL;
 618         }
 619
 620         afs_ace = afs_acl->acelist;
 621         good_aces = 0;
 622
 623         while (afs_ace != NULL) {
 624                 uint32_t nt_rights;
 625                 uint8 flag = SEC_ACE_FLAG_OBJECT_INHERIT |
 626                         SEC_ACE_FLAG_CONTAINER_INHERIT;
 627
 628                 if (afs_ace->type == SID_NAME_UNKNOWN) {
 629                         DEBUG(10, ("Ignoring unknown name %s\n",
 630                                    afs_ace->name));
 631                         afs_ace = afs_ace->next;
 632                         continue;
 633                 }
 634
 635                 if (S_ISDIR(psbuf->st_ex_mode))
 636                         afs_to_nt_dir_rights(afs_ace->rights, &nt_rights,
 637                                              &flag);
 638                 else
 639                         nt_rights = afs_to_nt_file_rights(afs_ace->rights);
 640
 641                 init_sec_ace(&nt_ace_list[good_aces++], &(afs_ace->sid),
 642                              SEC_ACE_TYPE_ACCESS_ALLOWED, nt_rights, flag);
 643                 afs_ace = afs_ace->next;
 644         }
 645
 646         psa = make_sec_acl(mem_ctx, NT4_ACL_REVISION,
 647                            good_aces, nt_ace_list);
 648         if (psa == NULL)
 649                 return 0;
 650
 651         *ppdesc = make_sec_desc(mem_ctx, SD_REVISION,
 652                                 SEC_DESC_SELF_RELATIVE,
 653                                 (security_info & SECINFO_OWNER)
 654                                 ? &owner_sid : NULL,
 655                                 (security_info & SECINFO_GROUP)
 656                                 ? &group_sid : NULL,
 657                                 NULL, psa, &sd_size);
 658
 659         return sd_size;
 660 }
 661
 662 static size_t afs_to_nt_acl(struct afs_acl *afs_acl,
 663                             struct connection_struct *conn,
 664                             struct smb_filename *smb_fname,
 665                             uint32 security_info,
 666                              TALLOC_CTX *mem_ctx,
 667                             struct security_descriptor **ppdesc)
 668 {
 669         int ret;
 670
 671         /* Get the stat struct for the owner info. */
 672         if (lp_posix_pathnames()) {
 673                 ret = SMB_VFS_LSTAT(conn, smb_fname);
 674         } else {
 675                 ret = SMB_VFS_STAT(conn, smb_fname);
 676         }
 677         if (ret == -1) {
 678                 return 0;
 679         }
 680
 681         return afs_to_nt_acl_common(afs_acl, &smb_fname->st, security_info,
 682                                     mem_ctx, ppdesc);
 683 }
 684
 685 static size_t afs_fto_nt_acl(struct afs_acl *afs_acl,
 686                              struct files_struct *fsp,
 687                              uint32 security_info,
 688                              TALLOC_CTX *mem_ctx,
 689                              struct security_descriptor **ppdesc)
 690 {
 691         SMB_STRUCT_STAT sbuf;
 692
 693         if (fsp->fh->fd == -1) {
 694                 /* Get the stat struct for the owner info. */
 695                 return afs_to_nt_acl(afs_acl, fsp->conn, fsp->fsp_name,
 696                                      security_info, mem_ctx, ppdesc);
 697         }
 698
 699         if(SMB_VFS_FSTAT(fsp, &sbuf) != 0) {
 700                 return 0;
 701         }
 702
 703         return afs_to_nt_acl_common(afs_acl, &sbuf, security_info, ppdesc);
 704 }
 705
 706 static bool mappable_sid(const struct dom_sid *sid)
 707 {
 708         struct dom_sid domain_sid;
 709
 710         if (dom_sid_compare(sid, &global_sid_Builtin_Administrators) == 0)
 711                 return true;
 712
 713         if (dom_sid_compare(sid, &global_sid_World) == 0)
 714                 return true;
 715
 716         if (dom_sid_compare(sid, &global_sid_Authenticated_Users) == 0)
 717                 return true;
 718
 719         if (dom_sid_compare(sid, &global_sid_Builtin_Backup_Operators) == 0)
 720                 return true;
 721
 722         string_to_sid(&domain_sid, "S-1-5-21");
 723
 724         if (sid_compare_domain(sid, &domain_sid) == 0)
 725                 return true;
 726
 727         return false;
 728 }
 729
 730 static bool nt_to_afs_acl(const char *filename,
 731                           uint32 security_info_sent,
 732                           const struct security_descriptor *psd,
 733                           uint32 (*nt_to_afs_rights)(const char *filename,
 734                                                      const struct security_ace *ace),
 735                           struct afs_acl *afs_acl)
 736 {
 737         const struct security_acl *dacl;
 738         int i;
 739
 740         /* Currently we *only* look at the dacl */
 741
 742         if (((security_info_sent & SECINFO_DACL) == 0) ||
 743             (psd->dacl == NULL))
 744                 return true;
 745
 746         if (!init_afs_acl(afs_acl))
 747                 return false;
 748
 749         dacl = psd->dacl;
 750
 751         for (i = 0; i < dacl->num_aces; i++) {
 752                 const struct security_ace *ace = &(dacl->aces[i]);
 753                 const char *dom_name, *name;
 754                 enum lsa_SidType name_type;
 755                 char *p;
 756
 757                 if (ace->type != SEC_ACE_TYPE_ACCESS_ALLOWED) {
 758                         /* First cut: Only positive ACEs */
 759                         return false;
 760                 }
 761
 762                 if (!mappable_sid(&ace->trustee)) {
 763                         DEBUG(10, ("Ignoring unmappable SID %s\n",
 764                                    sid_string_dbg(&ace->trustee)));
 765                         continue;
 766                 }
 767
 768                 if (dom_sid_compare(&ace->trustee,
 769                                 &global_sid_Builtin_Administrators) == 0) {
 770
 771                         name = "system:administrators";
 772
 773                 } else if (dom_sid_compare(&ace->trustee,
 774                                        &global_sid_World) == 0) {
 775
 776                         name = "system:anyuser";
 777
 778                 } else if (dom_sid_compare(&ace->trustee,
 779                                        &global_sid_Authenticated_Users) == 0) {
 780
 781                         name = "system:authuser";
 782
 783                 } else if (dom_sid_compare(&ace->trustee,
 784                                        &global_sid_Builtin_Backup_Operators)
 785                            == 0) {
 786
 787                         name = "system:backup";
 788
 789                 } else {
 790
 791                         if (!lookup_sid(talloc_tos(), &ace->trustee,
 792                                         &dom_name, &name, &name_type)) {
 793                                 DEBUG(1, ("AFSACL: Could not lookup SID %s on file %s\n",
 794                                           sid_string_dbg(&ace->trustee),
 795                                           filename));
 796                                 continue;
 797                         }
 798
 799                         if ( (name_type == SID_NAME_USER) ||
 800                              (name_type == SID_NAME_DOM_GRP) ||
 801                              (name_type == SID_NAME_ALIAS) ) {
 802                                 char *tmp;
 803                                 tmp = talloc_asprintf(talloc_tos(), "%s%s%s",
 804                                                        dom_name, lp_winbind_separator(),
 805                                                        name);
 806                                 if (tmp == NULL) {
 807                                         return false;
 808                                 }
 809                                 if (!strlower_m(tmp)) {
 810                                         return false;
 811                                 }
 812                                 name = tmp;
 813                         }
 814
 815                         if (sidpts) {
 816                                 /* Expect all users/groups in pts as SIDs */
 817                                 name = talloc_strdup(
 818                                         talloc_tos(),
 819                                         sid_string_tos(&ace->trustee));
 820                                 if (name == NULL) {
 821                                         return false;
 822                                 }
 823                         }
 824                 }
 825
 826                 while ((p = strchr_m(name, ' ')) != NULL)
 827                         *p = space_replacement;
 828
 829                 add_afs_ace(afs_acl, true, name,
 830                             nt_to_afs_rights(filename, ace));
 831         }
 832
 833         return true;
 834 }
 835
 836 static bool afs_get_afs_acl(const char *filename, struct afs_acl *acl)
 837 {
 838         struct afs_iob iob;
 839
 840         int ret;
 841
 842         char space[MAXSIZE];
 843
 844         DEBUG(5, ("afs_get_afs_acl: %s\n", filename));
 845
 846         iob.in_size = 0;
 847         iob.out_size = MAXSIZE;
 848         iob.in = iob.out = space;
 849
 850         ret = afs_syscall(AFSCALL_PIOCTL, filename, VIOCGETAL,
 851                           (char *)&iob, 0);
 852
 853         if (ret) {
 854                 DEBUG(1, ("got error from PIOCTL: %d\n", ret));
 855                 return false;
 856         }
 857
 858         if (!init_afs_acl(acl))
 859                 return false;
 860
 861         if (!parse_afs_acl(acl, space)) {
 862                 DEBUG(1, ("Could not parse AFS acl\n"));
 863                 free_afs_acl(acl);
 864                 return false;
 865         }
 866
 867         return true;
 868 }
 869
 870 /* For setting an AFS ACL we have to take care of the ACEs we could
 871  * not properly map to SIDs. Merge all of them into the new ACL. */
 872
 873 static void merge_unknown_aces(struct afs_acl *src, struct afs_acl *dst)
 874 {
 875         struct afs_ace *ace;
 876
 877         for (ace = src->acelist; ace != NULL; ace = ace->next)
 878         {
 879                 struct afs_ace *copy;
 880
 881                 if (ace->type != SID_NAME_UNKNOWN) {
 882                         DEBUG(10, ("Not merging known ACE for %s\n",
 883                                    ace->name));
 884                         continue;
 885                 }
 886
 887                 DEBUG(10, ("Merging unknown ACE for %s\n", ace->name));
 888
 889                 copy = clone_afs_ace(dst->ctx, ace);
 890
 891                 if (copy == NULL) {
 892                         DEBUG(0, ("Could not clone ACE for %s\n", ace->name));
 893                         continue;
 894                 }
 895
 896                 copy->next = dst->acelist;
 897                 dst->acelist = copy;
 898                 dst->num_aces += 1;
 899         }
 900 }
 901
 902 static NTSTATUS afs_set_nt_acl(vfs_handle_struct *handle, files_struct *fsp,
 903                            uint32 security_info_sent,
 904                            const struct security_descriptor *psd)
 905 {
 906         struct afs_acl old_afs_acl, new_afs_acl;
 907         struct afs_acl dir_acl, file_acl;
 908         char acl_string[MAXSIZE];
 909         struct afs_iob iob;
 910         int ret = -1;
 911         char *name = NULL;
 912         const char *fileacls;
 913
 914         fileacls = lp_parm_const_string(SNUM(handle->conn), "afsacl", "fileacls",
 915                                         "yes");
 916
 917         sidpts = lp_parm_bool(SNUM(handle->conn), "afsacl", "sidpts", false);
 918
 919         ZERO_STRUCT(old_afs_acl);
 920         ZERO_STRUCT(new_afs_acl);
 921         ZERO_STRUCT(dir_acl);
 922         ZERO_STRUCT(file_acl);
 923
 924         name = talloc_strdup(talloc_tos(), fsp->fsp_name->base_name);
 925         if (!name) {
 926                 return NT_STATUS_NO_MEMORY;
 927         }
 928
 929         if (!fsp->is_directory) {
 930                 /* We need to get the name of the directory containing the
 931                  * file, this is where the AFS acls live */
 932                 char *p = strrchr(name, '/');
 933                 if (p != NULL) {
 934                         *p = '\0';
 935                 } else {
 936                         name = talloc_strdup(talloc_tos(), ".");
 937                         if (!name) {
 938                                 return NT_STATUS_NO_MEMORY;
 939                         }
 940                 }
 941         }
 942
 943         if (!afs_get_afs_acl(name, &old_afs_acl)) {
 944                 DEBUG(3, ("Could not get old ACL of %s\n", fsp_str_dbg(fsp)));
 945                 goto done;
 946         }
 947
 948         split_afs_acl(&old_afs_acl, &dir_acl, &file_acl);
 949
 950         if (fsp->is_directory) {
 951
 952                 if (!strequal(fileacls, "yes")) {
 953                         /* Throw away file acls, we depend on the
 954                          * inheritance ACEs that also give us file
 955                          * permissions */
 956                         free_afs_acl(&file_acl);
 957                 }
 958
 959                 free_afs_acl(&dir_acl);
 960                 if (!nt_to_afs_acl(fsp->fsp_name->base_name,
 961                                    security_info_sent, psd,
 962                                    nt_to_afs_dir_rights, &dir_acl))
 963                         goto done;
 964         } else {
 965                 if (strequal(fileacls, "no")) {
 966                         ret = -1;
 967                         goto done;
 968                 }
 969
 970                 if (strequal(fileacls, "ignore")) {
 971                         ret = 0;
 972                         goto done;
 973                 }
 974
 975                 free_afs_acl(&file_acl);
 976                 if (!nt_to_afs_acl(fsp->fsp_name->base_name,
 977                                    security_info_sent, psd,
 978                                    nt_to_afs_file_rights, &file_acl))
 979                         goto done;
 980         }
 981
 982         merge_afs_acls(&dir_acl, &file_acl, &new_afs_acl);
 983
 984         merge_unknown_aces(&old_afs_acl, &new_afs_acl);
 985
 986         unparse_afs_acl(&new_afs_acl, acl_string);
 987
 988         iob.in = acl_string;
 989         iob.in_size = 1+strlen(iob.in);
 990         iob.out = NULL;
 991         iob.out_size = 0;
 992
 993         DEBUG(10, ("trying to set acl '%s' on file %s\n", iob.in, name));
 994
 995         ret = afs_syscall(AFSCALL_PIOCTL, name, VIOCSETAL, (char *)&iob, 0);
 996
 997         if (ret != 0) {
 998                 DEBUG(10, ("VIOCSETAL returned %d\n", ret));
 999         }
1000
1001  done:
1002         free_afs_acl(&dir_acl);
1003         free_afs_acl(&file_acl);
1004         free_afs_acl(&old_afs_acl);
1005         free_afs_acl(&new_afs_acl);
1006
1007         return (ret == 0) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
1008 }
1009
1010 static NTSTATUS afsacl_fget_nt_acl(struct vfs_handle_struct *handle,
1011                                    struct files_struct *fsp,
1012                                    uint32 security_info,
1013                                    TALLOC_CTX *mem_ctx,
1014                                    struct security_descriptor **ppdesc)
1015 {
1016         struct afs_acl acl;
1017         size_t sd_size;
1018
1019         DEBUG(5, ("afsacl_fget_nt_acl: %s\n", fsp_str_dbg(fsp)));
1020
1021         sidpts = lp_parm_bool(SNUM(fsp->conn), "afsacl", "sidpts", false);
1022
1023         if (!afs_get_afs_acl(fsp->fsp_name->base_name, &acl)) {
1024                 return NT_STATUS_ACCESS_DENIED;
1025         }
1026
1027         sd_size = afs_fto_nt_acl(&acl, fsp, security_info, mem_ctx, ppdesc);
1028
1029         free_afs_acl(&acl);
1030
1031         return (sd_size != 0) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
1032 }
1033
1034 static NTSTATUS afsacl_get_nt_acl(struct vfs_handle_struct *handle,
1035                                   const char *name, uint32 security_info,
1036                                   TALLOC_CTX *mem_ctx,
1037                                   struct security_descriptor **ppdesc)
1038 {
1039         struct afs_acl acl;
1040         size_t sd_size;
1041         struct smb_filename *smb_fname = NULL;
1042         NTSTATUS status;
1043
1044         DEBUG(5, ("afsacl_get_nt_acl: %s\n", name));
1045
1046         sidpts = lp_parm_bool(SNUM(handle->conn), "afsacl", "sidpts", false);
1047
1048         if (!afs_get_afs_acl(name, &acl)) {
1049                 return NT_STATUS_ACCESS_DENIED;
1050         }
1051
1052         status = create_synthetic_smb_fname(talloc_tos(), name, NULL, NULL,
1053                                             &smb_fname);
1054         if (!NT_STATUS_IS_OK(status)) {
1055                 free_afs_acl(&acl);
1056                 return status;
1057         }
1058
1059         sd_size = afs_to_nt_acl(&acl, handle->conn, smb_fname, security_info,
1060                                 mem_ctx, ppdesc);
1061         TALLOC_FREE(smb_fname);
1062
1063         free_afs_acl(&acl);
1064
1065         return (sd_size != 0) ? NT_STATUS_OK : NT_STATUS_ACCESS_DENIED;
1066 }
1067
1068 NTSTATUS afsacl_fset_nt_acl(vfs_handle_struct *handle,
1069                          files_struct *fsp,
1070                          uint32 security_info_sent,
1071                          const struct security_descriptor *psd)
1072 {
1073         return afs_set_nt_acl(handle, fsp, security_info_sent, psd);
1074 }
1075
1076 static int afsacl_connect(vfs_handle_struct *handle,
1077                           const char *service,
1078                           const char *user)
1079 {
1080         const char *spc;
1081         int ret = SMB_VFS_NEXT_CONNECT(handle, service, user);
1082
1083         if (ret < 0) {
1084                 return ret;
1085         }
1086
1087         spc = lp_parm_const_string(SNUM(handle->conn), "afsacl", "space", "%");
1088
1089         if (spc != NULL)
1090                 space_replacement = spc[0];
1091
1092         return 0;
1093 }
1094
1095 /* We don't have a linear form of the AFS ACL yet */
1096 static int afsacl_sys_acl_blob_get_file(vfs_handle_struct *handle, const char *path_p, TALLOC_CTX *mem_ctx, char **blob_description, DATA_BLOB *blob)
1097 {
1098         errno = ENOSYS;
1099         return -1;
1100 }
1101
1102 /* We don't have a linear form of the AFS ACL yet */
1103 static int afsacl_sys_acl_blob_get_fd(vfs_handle_struct *handle, files_struct *fsp, TALLOC_CTX *mem_ctx, char **blob_description, DATA_BLOB *blob)
1104 {
1105         errno = ENOSYS;
1106         return -1;
1107 }
1108
1109 static struct vfs_fn_pointers vfs_afsacl_fns = {
1110         .connect_fn = afsacl_connect,
1111         .fget_nt_acl_fn = afsacl_fget_nt_acl,
1112         .get_nt_acl_fn = afsacl_get_nt_acl,
1113         .fset_nt_acl_fn = afsacl_fset_nt_acl,
1114         .sys_acl_blob_get_file_fn = afsacl_sys_acl_blob_get_file,
1115         .sys_acl_blob_get_fd_fn = afsacl_sys_acl_blob_get_fd
1116 };
1117
1118 NTSTATUS vfs_afsacl_init(void);
1119 NTSTATUS vfs_afsacl_init(void)
1120 {
1121         return smb_register_vfs(SMB_VFS_INTERFACE_VERSION, "afsacl",
1122                                 &vfs_afsacl_fns);
1123 }