source3/lib/sysacls.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Samba system utilities for ACL support.
   4    Copyright (C) Jeremy Allison 2000.
   5    Copyright (C) Volker Lendecke 2006
   6    Copyright (C) Michael Adam 2006,2008
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23 #include "system/passwd.h"
  24
  25 #if defined(HAVE_POSIX_ACLS)
  26 #include "modules/vfs_posixacl.h"
  27 #endif
  28
  29 #if defined(HAVE_TRU64_ACLS)
  30 #include "modules/vfs_tru64acl.h"
  31 #endif
  32
  33 #if defined(HAVE_SOLARIS_ACLS) || defined(HAVE_UNIXWARE_ACLS)
  34 #include "modules/vfs_solarisacl.h"
  35 #endif
  36
  37 #if defined(HAVE_HPUX_ACLS)
  38 #include "modules/vfs_hpuxacl.h"
  39 #endif
  40
  41 #if defined(HAVE_IRIX_ACLS)
  42 #include "modules/vfs_irixacl.h"
  43 #endif
  44
  45 #undef  DBGC_CLASS
  46 #define DBGC_CLASS DBGC_ACLS
  47
  48 /*
  49  * Note that while this code implements sufficient functionality
  50  * to support the sys_acl_* interfaces it does not provide all
  51  * of the semantics of the POSIX ACL interfaces.
  52  *
  53  * In particular, an ACL entry descriptor (SMB_ACL_ENTRY_T) returned
  54  * from a call to sys_acl_get_entry() should not be assumed to be
  55  * valid after calling any of the following functions, which may
  56  * reorder the entries in the ACL.
  57  *
  58  *      sys_acl_valid()
  59  *      sys_acl_set_file()
  60  *      sys_acl_set_fd()
  61  */
  62
  63 int sys_acl_get_entry(SMB_ACL_T acl_d, int entry_id, SMB_ACL_ENTRY_T *entry_p)
  64 {
  65         if (entry_id != SMB_ACL_FIRST_ENTRY && entry_id != SMB_ACL_NEXT_ENTRY) {
  66                 errno = EINVAL;
  67                 return -1;
  68         }
  69
  70         if (entry_p == NULL) {
  71                 errno = EINVAL;
  72                 return -1;
  73         }
  74
  75         if (entry_id == SMB_ACL_FIRST_ENTRY) {
  76                 acl_d->next = 0;
  77         }
  78
  79         if (acl_d->next < 0) {
  80                 errno = EINVAL;
  81                 return -1;
  82         }
  83
  84         if (acl_d->next >= acl_d->count) {
  85                 return 0;
  86         }
  87
  88         *entry_p = &acl_d->acl[acl_d->next++];
  89
  90         return 1;
  91 }
  92
  93 int sys_acl_get_tag_type(SMB_ACL_ENTRY_T entry_d, SMB_ACL_TAG_T *type_p)
  94 {
  95         *type_p = entry_d->a_type;
  96
  97         return 0;
  98 }
  99
 100 int sys_acl_get_permset(SMB_ACL_ENTRY_T entry_d, SMB_ACL_PERMSET_T *permset_p)
 101 {
 102         *permset_p = &entry_d->a_perm;
 103
 104         return 0;
 105 }
 106
 107 void *sys_acl_get_qualifier(SMB_ACL_ENTRY_T entry_d)
 108 {
 109         if (entry_d->a_type == SMB_ACL_USER) {
 110                 return &entry_d->info.user.uid;
 111                 }
 112
 113         if (entry_d->a_type == SMB_ACL_GROUP) {
 114                 return &entry_d->info.group.gid;
 115         }
 116
 117         errno = EINVAL;
 118                 return NULL;
 119 }
 120
 121 int sys_acl_clear_perms(SMB_ACL_PERMSET_T permset_d)
 122 {
 123         *permset_d = 0;
 124
 125         return 0;
 126 }
 127
 128 int sys_acl_add_perm(SMB_ACL_PERMSET_T permset_d, SMB_ACL_PERM_T perm)
 129 {
 130         if (perm != SMB_ACL_READ && perm != SMB_ACL_WRITE
 131             && perm != SMB_ACL_EXECUTE) {
 132                 errno = EINVAL;
 133                 return -1;
 134                 }
 135
 136         if (permset_d == NULL) {
 137                 errno = EINVAL;
 138                 return -1;
 139         }
 140
 141         *permset_d |= perm;
 142
 143         return 0;
 144 }
 145
 146 int sys_acl_get_perm(SMB_ACL_PERMSET_T permset_d, SMB_ACL_PERM_T perm)
 147 {
 148         return *permset_d & perm;
 149 }
 150
 151 char *sys_acl_to_text(const struct smb_acl_t *acl_d, ssize_t *len_p)
 152 {
 153         int     i;
 154         int     len, maxlen;
 155         char    *text;
 156
 157         /*
 158          * use an initial estimate of 20 bytes per ACL entry
 159          * when allocating memory for the text representation
 160          * of the ACL
 161          */
 162         len     = 0;
 163         maxlen  = 20 * acl_d->count;
 164         if ((text = (char *)SMB_MALLOC(maxlen)) == NULL) {
 165                 errno = ENOMEM;
 166                 return NULL;
 167         }
 168
 169         for (i = 0; i < acl_d->count; i++) {
 170                 struct smb_acl_entry *ap = &acl_d->acl[i];
 171                 struct group    *gr;
 172                 char            tagbuf[12];
 173                 char            idbuf[12];
 174                 const char      *tag;
 175                 const char      *id     = "";
 176                 char            perms[4];
 177                 int             nbytes;
 178
 179                 switch (ap->a_type) {
 180                         /*
 181                          * for debugging purposes it's probably more
 182                          * useful to dump unknown tag types rather
 183                          * than just returning an error
 184                          */
 185                         default:
 186                                 slprintf(tagbuf, sizeof(tagbuf)-1, "0x%x",
 187                                          ap->a_type);
 188                                 tag = tagbuf;
 189                                 break;
 190
 191                         case SMB_ACL_USER:
 192                                 id = uidtoname(ap->info.user.uid);
 193                         case SMB_ACL_USER_OBJ:
 194                                 tag = "user";
 195                                 break;
 196
 197                         case SMB_ACL_GROUP:
 198                                 if ((gr = getgrgid(ap->info.group.gid)) == NULL) {
 199                                         slprintf(idbuf, sizeof(idbuf)-1, "%ld",
 200                                                 (long)ap->info.group.gid);
 201                                         id = idbuf;
 202                                 } else {
 203                                         id = gr->gr_name;
 204                                 }
 205                         case SMB_ACL_GROUP_OBJ:
 206                                 tag = "group";
 207                                 break;
 208
 209                         case SMB_ACL_OTHER:
 210                                 tag = "other";
 211                                 break;
 212
 213                         case SMB_ACL_MASK:
 214                                 tag = "mask";
 215                                 break;
 216
 217                 }
 218
 219                 perms[0] = (ap->a_perm & SMB_ACL_READ) ? 'r' : '-';
 220                 perms[1] = (ap->a_perm & SMB_ACL_WRITE) ? 'w' : '-';
 221                 perms[2] = (ap->a_perm & SMB_ACL_EXECUTE) ? 'x' : '-';
 222                 perms[3] = '\0';
 223
 224                 /*          <tag>      :  <qualifier>   :  rwx \n  \0 */
 225                 nbytes = strlen(tag) + 1 + strlen(id) + 1 + 3 + 1 + 1;
 226
 227                 /*
 228                  * If this entry would overflow the buffer
 229                  * allocate enough additional memory for this
 230                  * entry and an estimate of another 20 bytes
 231                  * for each entry still to be processed
 232                  */
 233                 if ((len + nbytes) > maxlen) {
 234                         maxlen += nbytes + 20 * (acl_d->count - i);
 235                         if ((text = (char *)SMB_REALLOC(text, maxlen)) == NULL) {
 236                                 errno = ENOMEM;
 237                                 return NULL;
 238                         }
 239                 }
 240
 241
 242                 slprintf(&text[len], nbytes, "%s:%s:%s\n", tag, id, perms);
 243                 len += (nbytes - 1);
 244         }
 245
 246         if (len_p)
 247                 *len_p = len;
 248
 249         return text;
 250 }
 251
 252 SMB_ACL_T sys_acl_init(TALLOC_CTX *mem_ctx)
 253 {
 254         SMB_ACL_T       a;
 255
 256         if ((a = talloc(mem_ctx, struct smb_acl_t)) == NULL) {
 257                 errno = ENOMEM;
 258                 return NULL;
 259         }
 260
 261         a->count = 0;
 262         a->next = -1;
 263
 264         a->acl = talloc_array(a, struct smb_acl_entry, 0);
 265         if (!a->acl) {
 266                 TALLOC_FREE(a);
 267                 errno = ENOMEM;
 268                 return NULL;
 269         }
 270
 271         return a;
 272 }
 273
 274 int sys_acl_create_entry(SMB_ACL_T *acl_p, SMB_ACL_ENTRY_T *entry_p)
 275 {
 276         SMB_ACL_T       acl_d;
 277         SMB_ACL_ENTRY_T entry_d;
 278         struct smb_acl_entry *acl;
 279
 280         if (acl_p == NULL || entry_p == NULL || (acl_d = *acl_p) == NULL) {
 281                 errno = EINVAL;
 282                 return -1;
 283         }
 284
 285         acl = talloc_realloc(acl_d, acl_d->acl, struct smb_acl_entry, acl_d->count+1);
 286         if (!acl) {
 287                 errno = ENOMEM;
 288                 return -1;
 289         }
 290         acl_d->acl = acl;
 291         entry_d         = &acl_d->acl[acl_d->count];
 292         entry_d->a_type = SMB_ACL_TAG_INVALID;
 293         entry_d->a_perm = 0;
 294         *entry_p        = entry_d;
 295
 296         acl_d->count++;
 297         return 0;
 298 }
 299
 300 int sys_acl_set_tag_type(SMB_ACL_ENTRY_T entry_d, SMB_ACL_TAG_T tag_type)
 301 {
 302         switch (tag_type) {
 303                 case SMB_ACL_USER:
 304                 case SMB_ACL_USER_OBJ:
 305                 case SMB_ACL_GROUP:
 306                 case SMB_ACL_GROUP_OBJ:
 307                 case SMB_ACL_OTHER:
 308                 case SMB_ACL_MASK:
 309                         entry_d->a_type = tag_type;
 310                         break;
 311                 default:
 312                         errno = EINVAL;
 313                         return -1;
 314                 }
 315
 316         return 0;
 317 }
 318
 319 int sys_acl_set_qualifier(SMB_ACL_ENTRY_T entry_d, void *qual_p)
 320 {
 321         if (entry_d->a_type == SMB_ACL_USER) {
 322                 entry_d->info.user.uid = *((uid_t *)qual_p);
 323                 return 0;
 324                 }
 325         if (entry_d->a_type == SMB_ACL_GROUP) {
 326                 entry_d->info.group.gid = *((gid_t *)qual_p);
 327                 return 0;
 328         }
 329
 330         errno = EINVAL;
 331         return -1;
 332 }
 333
 334 int sys_acl_set_permset(SMB_ACL_ENTRY_T entry_d, SMB_ACL_PERMSET_T permset_d)
 335 {
 336         if (*permset_d & ~(SMB_ACL_READ|SMB_ACL_WRITE|SMB_ACL_EXECUTE)) {
 337                 errno = EINVAL;
 338                 return -1;
 339         }
 340
 341         entry_d->a_perm = *permset_d;
 342
 343         return 0;
 344 }
 345
 346 int sys_acl_free_text(char *text)
 347 {
 348         SAFE_FREE(text);
 349         return 0;
 350 }
 351
 352 int sys_acl_valid(SMB_ACL_T acl_d)
 353 {
 354         errno = EINVAL;
 355         return -1;
 356 }
 357
 358 /*
 359  * acl_get_file, acl_get_fd, acl_set_file, acl_set_fd and
 360  * sys_acl_delete_def_file are to be redirected to the default
 361  * statically-bound acl vfs module, but they are replacable.
 362  */
 363
 364 #if defined(HAVE_POSIX_ACLS)
 365
 366 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 367                            const char *path_p, SMB_ACL_TYPE_T type, TALLOC_CTX *mem_ctx)
 368 {
 369         return posixacl_sys_acl_get_file(handle, path_p, type, mem_ctx);
 370 }
 371
 372 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp, TALLOC_CTX *mem_ctx)
 373 {
 374         return posixacl_sys_acl_get_fd(handle, fsp, mem_ctx);
 375 }
 376
 377 int sys_acl_set_file(vfs_handle_struct *handle,
 378                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 379 {
 380         return posixacl_sys_acl_set_file(handle, name, type, acl_d);
 381 }
 382
 383 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 384                    SMB_ACL_T acl_d)
 385 {
 386         return posixacl_sys_acl_set_fd(handle, fsp, acl_d);
 387 }
 388
 389 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 390                             const char *path)
 391 {
 392         return posixacl_sys_acl_delete_def_file(handle, path);
 393 }
 394
 395 #elif defined(HAVE_AIX_ACLS)
 396
 397 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 398                            const char *path_p, SMB_ACL_TYPE_T type,
 399                            TALLOC_CTX *mem_ctx)
 400 {
 401         return aixacl_sys_acl_get_file(handle, path_p, type, mem_ctx);
 402 }
 403
 404 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 405                            TALLOC_CTX *mem_ctx)
 406 {
 407         return aixacl_sys_acl_get_fd(handle, fsp, mem_ctx);
 408 }
 409
 410 int sys_acl_set_file(vfs_handle_struct *handle,
 411                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 412 {
 413         return aixacl_sys_acl_set_file(handle, name, type, acl_d);
 414 }
 415
 416 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 417                    SMB_ACL_T acl_d)
 418 {
 419         return aixacl_sys_acl_set_fd(handle, fsp, acl_d);
 420 }
 421
 422 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 423                             const char *path)
 424 {
 425         return aixacl_sys_acl_delete_def_file(handle, path);
 426 }
 427
 428 #elif defined(HAVE_TRU64_ACLS)
 429
 430 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 431                            const char *path_p, SMB_ACL_TYPE_T type,
 432                            TALLOC_CTX *mem_ctx)
 433 {
 434         return tru64acl_sys_acl_get_file(handle, path_p, type,
 435                                          mem_ctx);
 436 }
 437
 438 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 439                          TALLOC_CTX *mem_ctx)
 440 {
 441         return tru64acl_sys_acl_get_fd(handle, fsp, mem_ctx);
 442 }
 443
 444 int sys_acl_set_file(vfs_handle_struct *handle,
 445                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 446 {
 447         return tru64acl_sys_acl_set_file(handle, name, type, acl_d);
 448 }
 449
 450 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 451                    SMB_ACL_T acl_d)
 452 {
 453         return tru64acl_sys_acl_set_fd(handle, fsp, acl_d);
 454 }
 455
 456 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 457                             const char *path)
 458 {
 459         return tru64acl_sys_acl_delete_def_file(handle, path);
 460 }
 461
 462 #elif defined(HAVE_SOLARIS_ACLS) || defined(HAVE_UNIXWARE_ACLS)
 463
 464 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 465                            const char *path_p, SMB_ACL_TYPE_T type,
 466                            TALLOC_CTX *mem_ctx)
 467 {
 468         return solarisacl_sys_acl_get_file(handle, path_p, type,
 469                                            mem_ctx);
 470 }
 471
 472 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 473                          TALLOC_CTX *mem_ctx)
 474 {
 475         return solarisacl_sys_acl_get_fd(handle, fsp,
 476                                          mem_ctx);
 477 }
 478
 479 int sys_acl_set_file(vfs_handle_struct *handle,
 480                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 481 {
 482         return solarisacl_sys_acl_set_file(handle, name, type, acl_d);
 483 }
 484
 485 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 486                    SMB_ACL_T acl_d)
 487 {
 488         return solarisacl_sys_acl_set_fd(handle, fsp, acl_d);
 489 }
 490
 491 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 492                             const char *path)
 493 {
 494         return solarisacl_sys_acl_delete_def_file(handle, path);
 495 }
 496
 497 #elif defined(HAVE_HPUX_ACLS)
 498
 499 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 500                            const char *path_p, SMB_ACL_TYPE_T type,
 501                            TALLOC_CTX *mem_ctx)
 502 {
 503         return hpuxacl_sys_acl_get_file(handle, path_p, type, mem_ctx);
 504 }
 505
 506 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 507                            TALLOC_CTX *mem_ctx)
 508 {
 509         return hpuxacl_sys_acl_get_fd(handle, fsp, mem_ctx);
 510 }
 511
 512 int sys_acl_set_file(vfs_handle_struct *handle,
 513                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 514 {
 515         return hpuxacl_sys_acl_set_file(handle, name, type, acl_d);
 516 }
 517
 518 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 519                    SMB_ACL_T acl_d)
 520 {
 521         return hpuxacl_sys_acl_set_fd(handle, fsp, acl_d);
 522 }
 523
 524 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 525                             const char *path)
 526 {
 527         return hpuxacl_sys_acl_delete_def_file(handle, path);
 528 }
 529
 530 #elif defined(HAVE_IRIX_ACLS)
 531
 532 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 533                            const char *path_p, SMB_ACL_TYPE_T type,
 534                            TALLOC_CTX *mem_ctx)
 535 {
 536         return irixacl_sys_acl_get_file(handle, path_p, type, mem_ctx);
 537 }
 538
 539 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 540                          TALLOC_CTX *mem_ctx)
 541 {
 542         return irixacl_sys_acl_get_fd(handle, fsp, mem_ctx);
 543 }
 544
 545 int sys_acl_set_file(vfs_handle_struct *handle,
 546                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 547 {
 548         return irixacl_sys_acl_set_file(handle, name, type, acl_d);
 549 }
 550
 551 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 552                    SMB_ACL_T acl_d)
 553 {
 554         return irixacl_sys_acl_set_fd(handle, fsp, acl_d);
 555 }
 556
 557 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 558                             const char *path)
 559 {
 560         return irixacl_sys_acl_delete_def_file(handle, path);
 561 }
 562
 563 #else /* No ACLs. */
 564
 565 SMB_ACL_T sys_acl_get_file(vfs_handle_struct *handle,
 566                            const char *path_p, SMB_ACL_TYPE_T type,
 567                            TALLOC_CTX *mem_ctx)
 568 {
 569 #ifdef ENOTSUP
 570         errno = ENOTSUP;
 571 #else
 572         errno = ENOSYS;
 573 #endif
 574         return NULL;
 575 }
 576
 577 SMB_ACL_T sys_acl_get_fd(vfs_handle_struct *handle, files_struct *fsp,
 578                          TALLOC_CTX *mem_ctx)
 579 {
 580 #ifdef ENOTSUP
 581         errno = ENOTSUP;
 582 #else
 583         errno = ENOSYS;
 584 #endif
 585         return NULL;
 586 }
 587
 588 int sys_acl_set_file(vfs_handle_struct *handle,
 589                      const char *name, SMB_ACL_TYPE_T type, SMB_ACL_T acl_d)
 590 {
 591 #ifdef ENOTSUP
 592         errno = ENOTSUP;
 593 #else
 594         errno = ENOSYS;
 595 #endif
 596         return -1;
 597 }
 598
 599 int sys_acl_set_fd(vfs_handle_struct *handle, files_struct *fsp,
 600                    SMB_ACL_T acl_d)
 601 {
 602 #ifdef ENOTSUP
 603         errno = ENOTSUP;
 604 #else
 605         errno = ENOSYS;
 606 #endif
 607         return -1;
 608 }
 609
 610 int sys_acl_delete_def_file(vfs_handle_struct *handle,
 611                             const char *path)
 612 {
 613 #ifdef ENOTSUP
 614         errno = ENOTSUP;
 615 #else
 616         errno = ENOSYS;
 617 #endif
 618         return -1;
 619 }
 620
 621 #endif
 622
 623 /************************************************************************
 624  Deliberately outside the ACL defines. Return 1 if this is a "no acls"
 625  errno, 0 if not.
 626 ************************************************************************/
 627
 628 int no_acl_syscall_error(int err)
 629 {
 630 #if defined(ENOSYS)
 631         if (err == ENOSYS) {
 632                 return 1;
 633         }
 634 #endif
 635 #if defined(ENOTSUP)
 636         if (err == ENOTSUP) {
 637                 return 1;
 638         }
 639 #endif
 640         return 0;
 641 }