fs/xfs/xfs_acl.c

   1 /*
   2  * Copyright (c) 2001-2002,2005 Silicon Graphics, Inc.
   3  * All Rights Reserved.
   4  *
   5  * This program is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU General Public License as
   7  * published by the Free Software Foundation.
   8  *
   9  * This program is distributed in the hope that it would be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write the Free Software Foundation,
  16  * Inc.,  51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  17  */
  18 #include "xfs.h"
  19 #include "xfs_fs.h"
  20 #include "xfs_types.h"
  21 #include "xfs_bit.h"
  22 #include "xfs_inum.h"
  23 #include "xfs_ag.h"
  24 #include "xfs_dir2.h"
  25 #include "xfs_bmap_btree.h"
  26 #include "xfs_alloc_btree.h"
  27 #include "xfs_ialloc_btree.h"
  28 #include "xfs_dir2_sf.h"
  29 #include "xfs_attr_sf.h"
  30 #include "xfs_dinode.h"
  31 #include "xfs_inode.h"
  32 #include "xfs_btree.h"
  33 #include "xfs_acl.h"
  34 #include "xfs_mac.h"
  35 #include "xfs_attr.h"
  36
  37 #include <linux/capability.h>
  38 #include <linux/posix_acl_xattr.h>
  39
  40 STATIC int      xfs_acl_setmode(bhv_vnode_t *, xfs_acl_t *, int *);
  41 STATIC void     xfs_acl_filter_mode(mode_t, xfs_acl_t *);
  42 STATIC void     xfs_acl_get_endian(xfs_acl_t *);
  43 STATIC int      xfs_acl_access(uid_t, gid_t, xfs_acl_t *, mode_t, cred_t *);
  44 STATIC int      xfs_acl_invalid(xfs_acl_t *);
  45 STATIC void     xfs_acl_sync_mode(mode_t, xfs_acl_t *);
  46 STATIC void     xfs_acl_get_attr(bhv_vnode_t *, xfs_acl_t *, int, int, int *);
  47 STATIC void     xfs_acl_set_attr(bhv_vnode_t *, xfs_acl_t *, int, int *);
  48 STATIC int      xfs_acl_allow_set(bhv_vnode_t *, int);
  49
  50 kmem_zone_t *xfs_acl_zone;
  51
  52
  53 /*
  54  * Test for existence of access ACL attribute as efficiently as possible.
  55  */
  56 int
  57 xfs_acl_vhasacl_access(
  58         bhv_vnode_t     *vp)
  59 {
  60         int             error;
  61
  62         xfs_acl_get_attr(vp, NULL, _ACL_TYPE_ACCESS, ATTR_KERNOVAL, &error);
  63         return (error == 0);
  64 }
  65
  66 /*
  67  * Test for existence of default ACL attribute as efficiently as possible.
  68  */
  69 int
  70 xfs_acl_vhasacl_default(
  71         bhv_vnode_t     *vp)
  72 {
  73         int             error;
  74
  75         if (!VN_ISDIR(vp))
  76                 return 0;
  77         xfs_acl_get_attr(vp, NULL, _ACL_TYPE_DEFAULT, ATTR_KERNOVAL, &error);
  78         return (error == 0);
  79 }
  80
  81 /*
  82  * Convert from extended attribute representation to in-memory for XFS.
  83  */
  84 STATIC int
  85 posix_acl_xattr_to_xfs(
  86         posix_acl_xattr_header  *src,
  87         size_t                  size,
  88         xfs_acl_t               *dest)
  89 {
  90         posix_acl_xattr_entry   *src_entry;
  91         xfs_acl_entry_t         *dest_entry;
  92         int                     n;
  93
  94         if (!src || !dest)
  95                 return EINVAL;
  96
  97         if (size < sizeof(posix_acl_xattr_header))
  98                 return EINVAL;
  99
 100         if (src->a_version != cpu_to_le32(POSIX_ACL_XATTR_VERSION))
 101                 return EOPNOTSUPP;
 102
 103         memset(dest, 0, sizeof(xfs_acl_t));
 104         dest->acl_cnt = posix_acl_xattr_count(size);
 105         if (dest->acl_cnt < 0 || dest->acl_cnt > XFS_ACL_MAX_ENTRIES)
 106                 return EINVAL;
 107
 108         /*
 109          * acl_set_file(3) may request that we set default ACLs with
 110          * zero length -- defend (gracefully) against that here.
 111          */
 112         if (!dest->acl_cnt)
 113                 return 0;
 114
 115         src_entry = (posix_acl_xattr_entry *)((char *)src + sizeof(*src));
 116         dest_entry = &dest->acl_entry[0];
 117
 118         for (n = 0; n < dest->acl_cnt; n++, src_entry++, dest_entry++) {
 119                 dest_entry->ae_perm = le16_to_cpu(src_entry->e_perm);
 120                 if (_ACL_PERM_INVALID(dest_entry->ae_perm))
 121                         return EINVAL;
 122                 dest_entry->ae_tag  = le16_to_cpu(src_entry->e_tag);
 123                 switch(dest_entry->ae_tag) {
 124                 case ACL_USER:
 125                 case ACL_GROUP:
 126                         dest_entry->ae_id = le32_to_cpu(src_entry->e_id);
 127                         break;
 128                 case ACL_USER_OBJ:
 129                 case ACL_GROUP_OBJ:
 130                 case ACL_MASK:
 131                 case ACL_OTHER:
 132                         dest_entry->ae_id = ACL_UNDEFINED_ID;
 133                         break;
 134                 default:
 135                         return EINVAL;
 136                 }
 137         }
 138         if (xfs_acl_invalid(dest))
 139                 return EINVAL;
 140
 141         return 0;
 142 }
 143
 144 /*
 145  * Comparison function called from xfs_sort().
 146  * Primary key is ae_tag, secondary key is ae_id.
 147  */
 148 STATIC int
 149 xfs_acl_entry_compare(
 150         const void      *va,
 151         const void      *vb)
 152 {
 153         xfs_acl_entry_t *a = (xfs_acl_entry_t *)va,
 154                         *b = (xfs_acl_entry_t *)vb;
 155
 156         if (a->ae_tag == b->ae_tag)
 157                 return (a->ae_id - b->ae_id);
 158         return (a->ae_tag - b->ae_tag);
 159 }
 160
 161 /*
 162  * Convert from in-memory XFS to extended attribute representation.
 163  */
 164 STATIC int
 165 posix_acl_xfs_to_xattr(
 166         xfs_acl_t               *src,
 167         posix_acl_xattr_header  *dest,
 168         size_t                  size)
 169 {
 170         int                     n;
 171         size_t                  new_size = posix_acl_xattr_size(src->acl_cnt);
 172         posix_acl_xattr_entry   *dest_entry;
 173         xfs_acl_entry_t         *src_entry;
 174
 175         if (size < new_size)
 176                 return -ERANGE;
 177
 178         /* Need to sort src XFS ACL by <ae_tag,ae_id> */
 179         xfs_sort(src->acl_entry, src->acl_cnt, sizeof(src->acl_entry[0]),
 180                  xfs_acl_entry_compare);
 181
 182         dest->a_version = cpu_to_le32(POSIX_ACL_XATTR_VERSION);
 183         dest_entry = &dest->a_entries[0];
 184         src_entry = &src->acl_entry[0];
 185         for (n = 0; n < src->acl_cnt; n++, dest_entry++, src_entry++) {
 186                 dest_entry->e_perm = cpu_to_le16(src_entry->ae_perm);
 187                 if (_ACL_PERM_INVALID(src_entry->ae_perm))
 188                         return -EINVAL;
 189                 dest_entry->e_tag  = cpu_to_le16(src_entry->ae_tag);
 190                 switch (src_entry->ae_tag) {
 191                 case ACL_USER:
 192                 case ACL_GROUP:
 193                         dest_entry->e_id = cpu_to_le32(src_entry->ae_id);
 194                                 break;
 195                 case ACL_USER_OBJ:
 196                 case ACL_GROUP_OBJ:
 197                 case ACL_MASK:
 198                 case ACL_OTHER:
 199                         dest_entry->e_id = cpu_to_le32(ACL_UNDEFINED_ID);
 200                         break;
 201                 default:
 202                         return -EINVAL;
 203                 }
 204         }
 205         return new_size;
 206 }
 207
 208 int
 209 xfs_acl_vget(
 210         bhv_vnode_t     *vp,
 211         void            *acl,
 212         size_t          size,
 213         int             kind)
 214 {
 215         int                     error;
 216         xfs_acl_t               *xfs_acl = NULL;
 217         posix_acl_xattr_header  *ext_acl = acl;
 218         int                     flags = 0;
 219
 220         VN_HOLD(vp);
 221         if(size) {
 222                 if (!(_ACL_ALLOC(xfs_acl))) {
 223                         error = ENOMEM;
 224                         goto out;
 225                 }
 226                 memset(xfs_acl, 0, sizeof(xfs_acl_t));
 227         } else
 228                 flags = ATTR_KERNOVAL;
 229
 230         xfs_acl_get_attr(vp, xfs_acl, kind, flags, &error);
 231         if (error)
 232                 goto out;
 233
 234         if (!size) {
 235                 error = -posix_acl_xattr_size(XFS_ACL_MAX_ENTRIES);
 236         } else {
 237                 if (xfs_acl_invalid(xfs_acl)) {
 238                         error = EINVAL;
 239                         goto out;
 240                 }
 241                 if (kind == _ACL_TYPE_ACCESS) {
 242                         bhv_vattr_t     va;
 243
 244                         va.va_mask = XFS_AT_MODE;
 245                         error = bhv_vop_getattr(vp, &va, 0, sys_cred);
 246                         if (error)
 247                                 goto out;
 248                         xfs_acl_sync_mode(va.va_mode, xfs_acl);
 249                 }
 250                 error = -posix_acl_xfs_to_xattr(xfs_acl, ext_acl, size);
 251         }
 252 out:
 253         VN_RELE(vp);
 254         if(xfs_acl)
 255                 _ACL_FREE(xfs_acl);
 256         return -error;
 257 }
 258
 259 int
 260 xfs_acl_vremove(
 261         bhv_vnode_t     *vp,
 262         int             kind)
 263 {
 264         int             error;
 265
 266         VN_HOLD(vp);
 267         error = xfs_acl_allow_set(vp, kind);
 268         if (!error) {
 269                 error = bhv_vop_attr_remove(vp, kind == _ACL_TYPE_DEFAULT?
 270                                                 SGI_ACL_DEFAULT: SGI_ACL_FILE,
 271                                                 ATTR_ROOT, sys_cred);
 272                 if (error == ENOATTR)
 273                         error = 0;      /* 'scool */
 274         }
 275         VN_RELE(vp);
 276         return -error;
 277 }
 278
 279 int
 280 xfs_acl_vset(
 281         bhv_vnode_t             *vp,
 282         void                    *acl,
 283         size_t                  size,
 284         int                     kind)
 285 {
 286         posix_acl_xattr_header  *ext_acl = acl;
 287         xfs_acl_t               *xfs_acl;
 288         int                     error;
 289         int                     basicperms = 0; /* more than std unix perms? */
 290
 291         if (!acl)
 292                 return -EINVAL;
 293
 294         if (!(_ACL_ALLOC(xfs_acl)))
 295                 return -ENOMEM;
 296
 297         error = posix_acl_xattr_to_xfs(ext_acl, size, xfs_acl);
 298         if (error) {
 299                 _ACL_FREE(xfs_acl);
 300                 return -error;
 301         }
 302         if (!xfs_acl->acl_cnt) {
 303                 _ACL_FREE(xfs_acl);
 304                 return 0;
 305         }
 306
 307         VN_HOLD(vp);
 308         error = xfs_acl_allow_set(vp, kind);
 309         if (error)
 310                 goto out;
 311
 312         /* Incoming ACL exists, set file mode based on its value */
 313         if (kind == _ACL_TYPE_ACCESS)
 314                 xfs_acl_setmode(vp, xfs_acl, &basicperms);
 315
 316         /*
 317          * If we have more than std unix permissions, set up the actual attr.
 318          * Otherwise, delete any existing attr.  This prevents us from
 319          * having actual attrs for permissions that can be stored in the
 320          * standard permission bits.
 321          */
 322         if (!basicperms) {
 323                 xfs_acl_set_attr(vp, xfs_acl, kind, &error);
 324         } else {
 325                 xfs_acl_vremove(vp, _ACL_TYPE_ACCESS);
 326         }
 327
 328 out:
 329         VN_RELE(vp);
 330         _ACL_FREE(xfs_acl);
 331         return -error;
 332 }
 333
 334 int
 335 xfs_acl_iaccess(
 336         xfs_inode_t     *ip,
 337         mode_t          mode,
 338         cred_t          *cr)
 339 {
 340         xfs_acl_t       *acl;
 341         int             rval;
 342
 343         if (!(_ACL_ALLOC(acl)))
 344                 return -1;
 345
 346         /* If the file has no ACL return -1. */
 347         rval = sizeof(xfs_acl_t);
 348         if (xfs_attr_fetch(ip, SGI_ACL_FILE, SGI_ACL_FILE_SIZE,
 349                         (char *)acl, &rval, ATTR_ROOT | ATTR_KERNACCESS, cr)) {
 350                 _ACL_FREE(acl);
 351                 return -1;
 352         }
 353         xfs_acl_get_endian(acl);
 354
 355         /* If the file has an empty ACL return -1. */
 356         if (acl->acl_cnt == XFS_ACL_NOT_PRESENT) {
 357                 _ACL_FREE(acl);
 358                 return -1;
 359         }
 360
 361         /* Synchronize ACL with mode bits */
 362         xfs_acl_sync_mode(ip->i_d.di_mode, acl);
 363
 364         rval = xfs_acl_access(ip->i_d.di_uid, ip->i_d.di_gid, acl, mode, cr);
 365         _ACL_FREE(acl);
 366         return rval;
 367 }
 368
 369 STATIC int
 370 xfs_acl_allow_set(
 371         bhv_vnode_t     *vp,
 372         int             kind)
 373 {
 374         bhv_vattr_t     va;
 375         int             error;
 376
 377         if (vp->v_inode.i_flags & (S_IMMUTABLE|S_APPEND))
 378                 return EPERM;
 379         if (kind == _ACL_TYPE_DEFAULT && !VN_ISDIR(vp))
 380                 return ENOTDIR;
 381         if (vp->v_vfsp->vfs_flag & VFS_RDONLY)
 382                 return EROFS;
 383         va.va_mask = XFS_AT_UID;
 384         error = bhv_vop_getattr(vp, &va, 0, NULL);
 385         if (error)
 386                 return error;
 387         if (va.va_uid != current->fsuid && !capable(CAP_FOWNER))
 388                 return EPERM;
 389         return error;
 390 }
 391
 392 /*
 393  * The access control process to determine the access permission:
 394  *      if uid == file owner id, use the file owner bits.
 395  *      if gid == file owner group id, use the file group bits.
 396  *      scan ACL for a matching user or group, and use matched entry
 397  *      permission. Use total permissions of all matching group entries,
 398  *      until all acl entries are exhausted. The final permission produced
 399  *      by matching acl entry or entries needs to be & with group permission.
 400  *      if not owner, owning group, or matching entry in ACL, use file
 401  *      other bits.
 402  */
 403 STATIC int
 404 xfs_acl_capability_check(
 405         mode_t          mode,
 406         cred_t          *cr)
 407 {
 408         if ((mode & ACL_READ) && !capable_cred(cr, CAP_DAC_READ_SEARCH))
 409                 return EACCES;
 410         if ((mode & ACL_WRITE) && !capable_cred(cr, CAP_DAC_OVERRIDE))
 411                 return EACCES;
 412         if ((mode & ACL_EXECUTE) && !capable_cred(cr, CAP_DAC_OVERRIDE))
 413                 return EACCES;
 414
 415         return 0;
 416 }
 417
 418 /*
 419  * Note: cr is only used here for the capability check if the ACL test fails.
 420  *       It is not used to find out the credentials uid or groups etc, as was
 421  *       done in IRIX. It is assumed that the uid and groups for the current
 422  *       thread are taken from "current" instead of the cr parameter.
 423  */
 424 STATIC int
 425 xfs_acl_access(
 426         uid_t           fuid,
 427         gid_t           fgid,
 428         xfs_acl_t       *fap,
 429         mode_t          md,
 430         cred_t          *cr)
 431 {
 432         xfs_acl_entry_t matched;
 433         int             i, allows;
 434         int             maskallows = -1;        /* true, but not 1, either */
 435         int             seen_userobj = 0;
 436
 437         matched.ae_tag = 0;     /* Invalid type */
 438         matched.ae_perm = 0;
 439         md >>= 6;       /* Normalize the bits for comparison */
 440
 441         for (i = 0; i < fap->acl_cnt; i++) {
 442                 /*
 443                  * Break out if we've got a user_obj entry or
 444                  * a user entry and the mask (and have processed USER_OBJ)
 445                  */
 446                 if (matched.ae_tag == ACL_USER_OBJ)
 447                         break;
 448                 if (matched.ae_tag == ACL_USER) {
 449                         if (maskallows != -1 && seen_userobj)
 450                                 break;
 451                         if (fap->acl_entry[i].ae_tag != ACL_MASK &&
 452                             fap->acl_entry[i].ae_tag != ACL_USER_OBJ)
 453                                 continue;
 454                 }
 455                 /* True if this entry allows the requested access */
 456                 allows = ((fap->acl_entry[i].ae_perm & md) == md);
 457
 458                 switch (fap->acl_entry[i].ae_tag) {
 459                 case ACL_USER_OBJ:
 460                         seen_userobj = 1;
 461                         if (fuid != current->fsuid)
 462                                 continue;
 463                         matched.ae_tag = ACL_USER_OBJ;
 464                         matched.ae_perm = allows;
 465                         break;
 466                 case ACL_USER:
 467                         if (fap->acl_entry[i].ae_id != current->fsuid)
 468                                 continue;
 469                         matched.ae_tag = ACL_USER;
 470                         matched.ae_perm = allows;
 471                         break;
 472                 case ACL_GROUP_OBJ:
 473                         if ((matched.ae_tag == ACL_GROUP_OBJ ||
 474                             matched.ae_tag == ACL_GROUP) && !allows)
 475                                 continue;
 476                         if (!in_group_p(fgid))
 477                                 continue;
 478                         matched.ae_tag = ACL_GROUP_OBJ;
 479                         matched.ae_perm = allows;
 480                         break;
 481                 case ACL_GROUP:
 482                         if ((matched.ae_tag == ACL_GROUP_OBJ ||
 483                             matched.ae_tag == ACL_GROUP) && !allows)
 484                                 continue;
 485                         if (!in_group_p(fap->acl_entry[i].ae_id))
 486                                 continue;
 487                         matched.ae_tag = ACL_GROUP;
 488                         matched.ae_perm = allows;
 489                         break;
 490                 case ACL_MASK:
 491                         maskallows = allows;
 492                         break;
 493                 case ACL_OTHER:
 494                         if (matched.ae_tag != 0)
 495                                 continue;
 496                         matched.ae_tag = ACL_OTHER;
 497                         matched.ae_perm = allows;
 498                         break;
 499                 }
 500         }
 501         /*
 502          * First possibility is that no matched entry allows access.
 503          * The capability to override DAC may exist, so check for it.
 504          */
 505         switch (matched.ae_tag) {
 506         case ACL_OTHER:
 507         case ACL_USER_OBJ:
 508                 if (matched.ae_perm)
 509                         return 0;
 510                 break;
 511         case ACL_USER:
 512         case ACL_GROUP_OBJ:
 513         case ACL_GROUP:
 514                 if (maskallows && matched.ae_perm)
 515                         return 0;
 516                 break;
 517         case 0:
 518                 break;
 519         }
 520
 521         return xfs_acl_capability_check(md, cr);
 522 }
 523
 524 /*
 525  * ACL validity checker.
 526  *   This acl validation routine checks each ACL entry read in makes sense.
 527  */
 528 STATIC int
 529 xfs_acl_invalid(
 530         xfs_acl_t       *aclp)
 531 {
 532         xfs_acl_entry_t *entry, *e;
 533         int             user = 0, group = 0, other = 0, mask = 0;
 534         int             mask_required = 0;
 535         int             i, j;
 536
 537         if (!aclp)
 538                 goto acl_invalid;
 539
 540         if (aclp->acl_cnt > XFS_ACL_MAX_ENTRIES)
 541                 goto acl_invalid;
 542
 543         for (i = 0; i < aclp->acl_cnt; i++) {
 544                 entry = &aclp->acl_entry[i];
 545                 switch (entry->ae_tag) {
 546                 case ACL_USER_OBJ:
 547                         if (user++)
 548                                 goto acl_invalid;
 549                         break;
 550                 case ACL_GROUP_OBJ:
 551                         if (group++)
 552                                 goto acl_invalid;
 553                         break;
 554                 case ACL_OTHER:
 555                         if (other++)
 556                                 goto acl_invalid;
 557                         break;
 558                 case ACL_USER:
 559                 case ACL_GROUP:
 560                         for (j = i + 1; j < aclp->acl_cnt; j++) {
 561                                 e = &aclp->acl_entry[j];
 562                                 if (e->ae_id == entry->ae_id &&
 563                                     e->ae_tag == entry->ae_tag)
 564                                         goto acl_invalid;
 565                         }
 566                         mask_required++;
 567                         break;
 568                 case ACL_MASK:
 569                         if (mask++)
 570                                 goto acl_invalid;
 571                         break;
 572                 default:
 573                         goto acl_invalid;
 574                 }
 575         }
 576         if (!user || !group || !other || (mask_required && !mask))
 577                 goto acl_invalid;
 578         else
 579                 return 0;
 580 acl_invalid:
 581         return EINVAL;
 582 }
 583
 584 /*
 585  * Do ACL endian conversion.
 586  */
 587 STATIC void
 588 xfs_acl_get_endian(
 589         xfs_acl_t       *aclp)
 590 {
 591         xfs_acl_entry_t *ace, *end;
 592
 593         INT_SET(aclp->acl_cnt, ARCH_CONVERT, aclp->acl_cnt);
 594         end = &aclp->acl_entry[0]+aclp->acl_cnt;
 595         for (ace = &aclp->acl_entry[0]; ace < end; ace++) {
 596                 INT_SET(ace->ae_tag, ARCH_CONVERT, ace->ae_tag);
 597                 INT_SET(ace->ae_id, ARCH_CONVERT, ace->ae_id);
 598                 INT_SET(ace->ae_perm, ARCH_CONVERT, ace->ae_perm);
 599         }
 600 }
 601
 602 /*
 603  * Get the ACL from the EA and do endian conversion.
 604  */
 605 STATIC void
 606 xfs_acl_get_attr(
 607         bhv_vnode_t     *vp,
 608         xfs_acl_t       *aclp,
 609         int             kind,
 610         int             flags,
 611         int             *error)
 612 {
 613         int             len = sizeof(xfs_acl_t);
 614
 615         ASSERT((flags & ATTR_KERNOVAL) ? (aclp == NULL) : 1);
 616         flags |= ATTR_ROOT;
 617         *error = bhv_vop_attr_get(vp, kind == _ACL_TYPE_ACCESS ?
 618                                         SGI_ACL_FILE : SGI_ACL_DEFAULT,
 619                                         (char *)aclp, &len, flags, sys_cred);
 620         if (*error || (flags & ATTR_KERNOVAL))
 621                 return;
 622         xfs_acl_get_endian(aclp);
 623 }
 624
 625 /*
 626  * Set the EA with the ACL and do endian conversion.
 627  */
 628 STATIC void
 629 xfs_acl_set_attr(
 630         bhv_vnode_t     *vp,
 631         xfs_acl_t       *aclp,
 632         int             kind,
 633         int             *error)
 634 {
 635         xfs_acl_entry_t *ace, *newace, *end;
 636         xfs_acl_t       *newacl;
 637         int             len;
 638
 639         if (!(_ACL_ALLOC(newacl))) {
 640                 *error = ENOMEM;
 641                 return;
 642         }
 643
 644         len = sizeof(xfs_acl_t) -
 645               (sizeof(xfs_acl_entry_t) * (XFS_ACL_MAX_ENTRIES - aclp->acl_cnt));
 646         end = &aclp->acl_entry[0]+aclp->acl_cnt;
 647         for (ace = &aclp->acl_entry[0], newace = &newacl->acl_entry[0];
 648              ace < end;
 649              ace++, newace++) {
 650                 INT_SET(newace->ae_tag, ARCH_CONVERT, ace->ae_tag);
 651                 INT_SET(newace->ae_id, ARCH_CONVERT, ace->ae_id);
 652                 INT_SET(newace->ae_perm, ARCH_CONVERT, ace->ae_perm);
 653         }
 654         INT_SET(newacl->acl_cnt, ARCH_CONVERT, aclp->acl_cnt);
 655         *error = bhv_vop_attr_set(vp, kind == _ACL_TYPE_ACCESS ?
 656                                 SGI_ACL_FILE: SGI_ACL_DEFAULT,
 657                                 (char *)newacl, len, ATTR_ROOT, sys_cred);
 658         _ACL_FREE(newacl);
 659 }
 660
 661 int
 662 xfs_acl_vtoacl(
 663         bhv_vnode_t     *vp,
 664         xfs_acl_t       *access_acl,
 665         xfs_acl_t       *default_acl)
 666 {
 667         bhv_vattr_t     va;
 668         int             error = 0;
 669
 670         if (access_acl) {
 671                 /*
 672                  * Get the Access ACL and the mode.  If either cannot
 673                  * be obtained for some reason, invalidate the access ACL.
 674                  */
 675                 xfs_acl_get_attr(vp, access_acl, _ACL_TYPE_ACCESS, 0, &error);
 676                 if (!error) {
 677                         /* Got the ACL, need the mode... */
 678                         va.va_mask = XFS_AT_MODE;
 679                         error = bhv_vop_getattr(vp, &va, 0, sys_cred);
 680                 }
 681
 682                 if (error)
 683                         access_acl->acl_cnt = XFS_ACL_NOT_PRESENT;
 684                 else /* We have a good ACL and the file mode, synchronize. */
 685                         xfs_acl_sync_mode(va.va_mode, access_acl);
 686         }
 687
 688         if (default_acl) {
 689                 xfs_acl_get_attr(vp, default_acl, _ACL_TYPE_DEFAULT, 0, &error);
 690                 if (error)
 691                         default_acl->acl_cnt = XFS_ACL_NOT_PRESENT;
 692         }
 693         return error;
 694 }
 695
 696 /*
 697  * This function retrieves the parent directory's acl, processes it
 698  * and lets the child inherit the acl(s) that it should.
 699  */
 700 int
 701 xfs_acl_inherit(
 702         bhv_vnode_t     *vp,
 703         bhv_vattr_t     *vap,
 704         xfs_acl_t       *pdaclp)
 705 {
 706         xfs_acl_t       *cacl;
 707         int             error = 0;
 708         int             basicperms = 0;
 709
 710         /*
 711          * If the parent does not have a default ACL, or it's an
 712          * invalid ACL, we're done.
 713          */
 714         if (!vp)
 715                 return 0;
 716         if (!pdaclp || xfs_acl_invalid(pdaclp))
 717                 return 0;
 718
 719         /*
 720          * Copy the default ACL of the containing directory to
 721          * the access ACL of the new file and use the mode that
 722          * was passed in to set up the correct initial values for
 723          * the u::,g::[m::], and o:: entries.  This is what makes
 724          * umask() "work" with ACL's.
 725          */
 726
 727         if (!(_ACL_ALLOC(cacl)))
 728                 return ENOMEM;
 729
 730         memcpy(cacl, pdaclp, sizeof(xfs_acl_t));
 731         xfs_acl_filter_mode(vap->va_mode, cacl);
 732         xfs_acl_setmode(vp, cacl, &basicperms);
 733
 734         /*
 735          * Set the Default and Access ACL on the file.  The mode is already
 736          * set on the file, so we don't need to worry about that.
 737          *
 738          * If the new file is a directory, its default ACL is a copy of
 739          * the containing directory's default ACL.
 740          */
 741         if (VN_ISDIR(vp))
 742                 xfs_acl_set_attr(vp, pdaclp, _ACL_TYPE_DEFAULT, &error);
 743         if (!error && !basicperms)
 744                 xfs_acl_set_attr(vp, cacl, _ACL_TYPE_ACCESS, &error);
 745         _ACL_FREE(cacl);
 746         return error;
 747 }
 748
 749 /*
 750  * Set up the correct mode on the file based on the supplied ACL.  This
 751  * makes sure that the mode on the file reflects the state of the
 752  * u::,g::[m::], and o:: entries in the ACL.  Since the mode is where
 753  * the ACL is going to get the permissions for these entries, we must
 754  * synchronize the mode whenever we set the ACL on a file.
 755  */
 756 STATIC int
 757 xfs_acl_setmode(
 758         bhv_vnode_t     *vp,
 759         xfs_acl_t       *acl,
 760         int             *basicperms)
 761 {
 762         bhv_vattr_t     va;
 763         xfs_acl_entry_t *ap;
 764         xfs_acl_entry_t *gap = NULL;
 765         int             i, error, nomask = 1;
 766
 767         *basicperms = 1;
 768
 769         if (acl->acl_cnt == XFS_ACL_NOT_PRESENT)
 770                 return 0;
 771
 772         /*
 773          * Copy the u::, g::, o::, and m:: bits from the ACL into the
 774          * mode.  The m:: bits take precedence over the g:: bits.
 775          */
 776         va.va_mask = XFS_AT_MODE;
 777         error = bhv_vop_getattr(vp, &va, 0, sys_cred);
 778         if (error)
 779                 return error;
 780
 781         va.va_mask = XFS_AT_MODE;
 782         va.va_mode &= ~(S_IRWXU|S_IRWXG|S_IRWXO);
 783         ap = acl->acl_entry;
 784         for (i = 0; i < acl->acl_cnt; ++i) {
 785                 switch (ap->ae_tag) {
 786                 case ACL_USER_OBJ:
 787                         va.va_mode |= ap->ae_perm << 6;
 788                         break;
 789                 case ACL_GROUP_OBJ:
 790                         gap = ap;
 791                         break;
 792                 case ACL_MASK:  /* more than just standard modes */
 793                         nomask = 0;
 794                         va.va_mode |= ap->ae_perm << 3;
 795                         *basicperms = 0;
 796                         break;
 797                 case ACL_OTHER:
 798                         va.va_mode |= ap->ae_perm;
 799                         break;
 800                 default:        /* more than just standard modes */
 801                         *basicperms = 0;
 802                         break;
 803                 }
 804                 ap++;
 805         }
 806
 807         /* Set the group bits from ACL_GROUP_OBJ if there's no ACL_MASK */
 808         if (gap && nomask)
 809                 va.va_mode |= gap->ae_perm << 3;
 810
 811         return bhv_vop_setattr(vp, &va, 0, sys_cred);
 812 }
 813
 814 /*
 815  * The permissions for the special ACL entries (u::, g::[m::], o::) are
 816  * actually stored in the file mode (if there is both a group and a mask,
 817  * the group is stored in the ACL entry and the mask is stored on the file).
 818  * This allows the mode to remain automatically in sync with the ACL without
 819  * the need for a call-back to the ACL system at every point where the mode
 820  * could change.  This function takes the permissions from the specified mode
 821  * and places it in the supplied ACL.
 822  *
 823  * This implementation draws its validity from the fact that, when the ACL
 824  * was assigned, the mode was copied from the ACL.
 825  * If the mode did not change, therefore, the mode remains exactly what was
 826  * taken from the special ACL entries at assignment.
 827  * If a subsequent chmod() was done, the POSIX spec says that the change in
 828  * mode must cause an update to the ACL seen at user level and used for
 829  * access checks.  Before and after a mode change, therefore, the file mode
 830  * most accurately reflects what the special ACL entries should permit/deny.
 831  *
 832  * CAVEAT: If someone sets the SGI_ACL_FILE attribute directly,
 833  *         the existing mode bits will override whatever is in the
 834  *         ACL. Similarly, if there is a pre-existing ACL that was
 835  *         never in sync with its mode (owing to a bug in 6.5 and
 836  *         before), it will now magically (or mystically) be
 837  *         synchronized.  This could cause slight astonishment, but
 838  *         it is better than inconsistent permissions.
 839  *
 840  * The supplied ACL is a template that may contain any combination
 841  * of special entries.  These are treated as place holders when we fill
 842  * out the ACL.  This routine does not add or remove special entries, it
 843  * simply unites each special entry with its associated set of permissions.
 844  */
 845 STATIC void
 846 xfs_acl_sync_mode(
 847         mode_t          mode,
 848         xfs_acl_t       *acl)
 849 {
 850         int             i, nomask = 1;
 851         xfs_acl_entry_t *ap;
 852         xfs_acl_entry_t *gap = NULL;
 853
 854         /*
 855          * Set ACL entries. POSIX1003.1eD16 requires that the MASK
 856          * be set instead of the GROUP entry, if there is a MASK.
 857          */
 858         for (ap = acl->acl_entry, i = 0; i < acl->acl_cnt; ap++, i++) {
 859                 switch (ap->ae_tag) {
 860                 case ACL_USER_OBJ:
 861                         ap->ae_perm = (mode >> 6) & 0x7;
 862                         break;
 863                 case ACL_GROUP_OBJ:
 864                         gap = ap;
 865                         break;
 866                 case ACL_MASK:
 867                         nomask = 0;
 868                         ap->ae_perm = (mode >> 3) & 0x7;
 869                         break;
 870                 case ACL_OTHER:
 871                         ap->ae_perm = mode & 0x7;
 872                         break;
 873                 default:
 874                         break;
 875                 }
 876         }
 877         /* Set the ACL_GROUP_OBJ if there's no ACL_MASK */
 878         if (gap && nomask)
 879                 gap->ae_perm = (mode >> 3) & 0x7;
 880 }
 881
 882 /*
 883  * When inheriting an Access ACL from a directory Default ACL,
 884  * the ACL bits are set to the intersection of the ACL default
 885  * permission bits and the file permission bits in mode. If there
 886  * are no permission bits on the file then we must not give them
 887  * the ACL. This is what what makes umask() work with ACLs.
 888  */
 889 STATIC void
 890 xfs_acl_filter_mode(
 891         mode_t          mode,
 892         xfs_acl_t       *acl)
 893 {
 894         int             i, nomask = 1;
 895         xfs_acl_entry_t *ap;
 896         xfs_acl_entry_t *gap = NULL;
 897
 898         /*
 899          * Set ACL entries. POSIX1003.1eD16 requires that the MASK
 900          * be merged with GROUP entry, if there is a MASK.
 901          */
 902         for (ap = acl->acl_entry, i = 0; i < acl->acl_cnt; ap++, i++) {
 903                 switch (ap->ae_tag) {
 904                 case ACL_USER_OBJ:
 905                         ap->ae_perm &= (mode >> 6) & 0x7;
 906                         break;
 907                 case ACL_GROUP_OBJ:
 908                         gap = ap;
 909                         break;
 910                 case ACL_MASK:
 911                         nomask = 0;
 912                         ap->ae_perm &= (mode >> 3) & 0x7;
 913                         break;
 914                 case ACL_OTHER:
 915                         ap->ae_perm &= mode & 0x7;
 916                         break;
 917                 default:
 918                         break;
 919                 }
 920         }
 921         /* Set the ACL_GROUP_OBJ if there's no ACL_MASK */
 922         if (gap && nomask)
 923                 gap->ae_perm &= (mode >> 3) & 0x7;
 924 }