lustre/mdd/mdd_permission.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   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 version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  19  *
  20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  21  * CA 95054 USA or visit www.sun.com if you need additional information or
  22  * have any questions.
  23  *
  24  * GPL HEADER END
  25  */
  26 /*
  27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  */
  30 /*
  31  * This file is part of Lustre, http://www.lustre.org/
  32  * Lustre is a trademark of Sun Microsystems, Inc.
  33  *
  34  * lustre/mdd/mdd_permission.c
  35  *
  36  * Lustre Metadata Server (mdd) routines
  37  *
  38  * Author: fangyong@clusterfs.com
  39  * Author: lsy@clusterfs.com
  40  */
  41
  42 #define DEBUG_SUBSYSTEM S_MDS
  43
  44 #include <obd_class.h>
  45 #include <lustre_ver.h>
  46 #include <lprocfs_status.h>
  47 #include <lustre_mds.h>
  48
  49 #include "mdd_internal.h"
  50
  51 #ifdef CONFIG_FS_POSIX_ACL
  52
  53 /*
  54  * Get default acl EA only.
  55  * Hold read_lock for mdd_obj.
  56  */
  57 int mdd_def_acl_get(const struct lu_env *env, struct mdd_object *mdd_obj,
  58                     struct md_attr *ma)
  59 {
  60         struct lu_buf *buf;
  61         int rc;
  62         ENTRY;
  63
  64         if (ma->ma_valid & MA_ACL_DEF)
  65                 RETURN(0);
  66
  67         buf = mdd_buf_get(env, ma->ma_acl, ma->ma_acl_size);
  68         rc = mdo_xattr_get(env, mdd_obj, buf, XATTR_NAME_ACL_DEFAULT,
  69                            BYPASS_CAPA);
  70         if (rc > 0) {
  71                 ma->ma_acl_size = rc;
  72                 ma->ma_valid |= MA_ACL_DEF;
  73                 rc = 0;
  74         } else if ((rc == -EOPNOTSUPP) || (rc == -ENODATA)) {
  75                 rc = 0;
  76         }
  77         RETURN(rc);
  78 }
  79
  80 /*
  81  * Hold write_lock for o.
  82  */
  83 int mdd_acl_chmod(const struct lu_env *env, struct mdd_object *o, __u32 mode,
  84                   struct thandle *handle)
  85 {
  86         struct lu_buf           *buf;
  87         posix_acl_xattr_header  *head;
  88         posix_acl_xattr_entry   *entry;
  89         int                      entry_count;
  90         int                      rc;
  91
  92         ENTRY;
  93
  94         buf = mdd_buf_get(env, mdd_env_info(env)->mti_xattr_buf,
  95                           sizeof(mdd_env_info(env)->mti_xattr_buf));
  96
  97         rc = mdo_xattr_get(env, o, buf, XATTR_NAME_ACL_ACCESS, BYPASS_CAPA);
  98         if ((rc == -EOPNOTSUPP) || (rc == -ENODATA))
  99                 RETURN(0);
 100         else if (rc <= 0)
 101                 RETURN(rc);
 102
 103         buf->lb_len = rc;
 104         head = (posix_acl_xattr_header *)(buf->lb_buf);
 105         entry = head->a_entries;
 106         entry_count = (buf->lb_len - sizeof(head->a_version)) /
 107                 sizeof(posix_acl_xattr_entry);
 108         if (entry_count <= 0)
 109                 RETURN(0);
 110
 111         rc = lustre_posix_acl_chmod_masq(entry, mode, entry_count);
 112         if (rc)
 113                 RETURN(rc);
 114
 115         rc = mdo_xattr_set(env, o, buf, XATTR_NAME_ACL_ACCESS,
 116                            0, handle, BYPASS_CAPA);
 117         RETURN(rc);
 118 }
 119
 120 int mdd_acl_set(const struct lu_env *env, struct mdd_object *obj,
 121                 const struct lu_buf *buf, int fl)
 122 {
 123         struct mdd_device       *mdd = mdd_obj2mdd_dev(obj);
 124         struct lu_attr          *la = &mdd_env_info(env)->mti_la;
 125         struct thandle          *handle;
 126         posix_acl_xattr_header  *head;
 127         posix_acl_xattr_entry   *entry;
 128         int                      rc, entry_count;
 129         bool                     not_equiv, mode_change;
 130         mode_t                   mode;
 131         ENTRY;
 132
 133         rc = mdd_la_get(env, obj, la, BYPASS_CAPA);
 134         if (rc)
 135                 RETURN(rc);
 136
 137         head = (posix_acl_xattr_header *)(buf->lb_buf);
 138         entry = head->a_entries;
 139         entry_count = (buf->lb_len - sizeof(head->a_version)) /
 140                 sizeof(posix_acl_xattr_entry);
 141         if (entry_count <= 0)
 142                 RETURN(0);
 143
 144         LASSERT(la->la_valid & LA_MODE);
 145         mode = la->la_mode;
 146         rc = lustre_posix_acl_equiv_mode(entry, &mode, entry_count);
 147         if (rc < 0)
 148                 RETURN(rc);
 149
 150         not_equiv = (rc > 0);
 151         mode_change = (mode != la->la_mode);
 152
 153         handle = mdd_trans_create(env, mdd);
 154         if (IS_ERR(handle))
 155                 RETURN(PTR_ERR(handle));
 156
 157         /* rc tells whether ACL can be represented by i_mode only */
 158         if (not_equiv)
 159                 rc = mdo_declare_xattr_set(env, obj, buf,
 160                                 XATTR_NAME_ACL_ACCESS, fl, handle);
 161         else
 162                 rc = mdo_declare_xattr_del(env, obj, XATTR_NAME_ACL_ACCESS,
 163                                 handle);
 164         if (rc)
 165                 GOTO(stop, rc);
 166
 167         if (mode_change) {
 168                 la->la_mode = mode;
 169                 rc = mdo_declare_attr_set(env, obj, la, handle);
 170         }
 171
 172         rc = mdd_trans_start(env, mdd, handle);
 173         if (rc)
 174                 GOTO(stop, rc);
 175
 176         mdd_write_lock(env, obj, MOR_TGT_CHILD);
 177         /* whether ACL can be represented by i_mode only */
 178         if (not_equiv)
 179                 rc = mdo_xattr_set(env, obj, buf, XATTR_NAME_ACL_ACCESS, fl,
 180                                 handle, mdd_object_capa(env, obj));
 181         else
 182                 rc = mdo_xattr_del(env, obj, XATTR_NAME_ACL_ACCESS, handle,
 183                                 mdd_object_capa(env, obj));
 184         if (rc)
 185                 GOTO(unlock, rc);
 186
 187         if (mode_change)
 188                 rc = mdo_attr_set(env, obj, la, handle,
 189                                 mdd_object_capa(env, obj));
 190
 191         /* security-replated changes may require sync */
 192         handle->th_sync |= !!mdd->mdd_sync_permission;
 193 unlock:
 194         mdd_write_unlock(env, obj);
 195 stop:
 196         mdd_trans_stop(env, mdd, rc, handle);
 197
 198         RETURN(rc);
 199 }
 200
 201 /*
 202  * Hold write_lock for obj.
 203  */
 204 int __mdd_acl_init(const struct lu_env *env, struct mdd_object *obj,
 205                    struct lu_buf *buf, __u32 *mode, struct thandle *handle)
 206 {
 207         posix_acl_xattr_header  *head;
 208         posix_acl_xattr_entry   *entry;
 209         int                      entry_count;
 210         __u32                    old = *mode;
 211         int                      rc, rc2;
 212
 213         ENTRY;
 214
 215         head = (posix_acl_xattr_header *)(buf->lb_buf);
 216         entry = head->a_entries;
 217         entry_count = (buf->lb_len - sizeof(head->a_version)) /
 218                       sizeof(posix_acl_xattr_entry);
 219         if (entry_count <= 0)
 220                 RETURN(0);
 221
 222         if (S_ISDIR(*mode)) {
 223                 rc = mdo_xattr_set(env, obj, buf, XATTR_NAME_ACL_DEFAULT, 0,
 224                                    handle, BYPASS_CAPA);
 225                 if (rc)
 226                         RETURN(rc);
 227         }
 228
 229         rc = lustre_posix_acl_create_masq(entry, mode, entry_count);
 230         if (rc < 0)
 231                 RETURN(rc);
 232
 233         /* part of ACL went into i_mode */
 234         if (*mode != old) {
 235                 struct mdd_thread_info  *info = mdd_env_info(env);
 236                 struct lu_attr          *pattr = &info->mti_pattr;
 237
 238                 /* mode was initialized within object creation,
 239                  * so we need explict ->attr_set() to update it */
 240                 pattr->la_valid = LA_MODE;
 241                 pattr->la_mode = *mode;
 242                 rc2 = mdo_attr_set(env, obj, pattr, handle, BYPASS_CAPA);
 243                 if (rc2 < 0)
 244                         rc = rc2;
 245         }
 246
 247         if (rc > 0)
 248                 rc = mdo_xattr_set(env, obj, buf, XATTR_NAME_ACL_ACCESS, 0,
 249                                    handle, BYPASS_CAPA);
 250         RETURN(rc);
 251 }
 252 #endif
 253
 254 /*
 255  * Hold read_lock for obj.
 256  */
 257 static int mdd_check_acl(const struct lu_env *env, struct mdd_object *obj,
 258                          struct lu_attr *la, int mask)
 259 {
 260 #ifdef CONFIG_FS_POSIX_ACL
 261         struct md_ucred  *uc  = md_ucred(env);
 262         posix_acl_xattr_header *head;
 263         posix_acl_xattr_entry *entry;
 264         struct lu_buf   *buf;
 265         int entry_count;
 266         int rc;
 267         ENTRY;
 268
 269         buf = mdd_buf_get(env, mdd_env_info(env)->mti_xattr_buf,
 270                           sizeof(mdd_env_info(env)->mti_xattr_buf));
 271         rc = mdo_xattr_get(env, obj, buf, XATTR_NAME_ACL_ACCESS,
 272                            mdd_object_capa(env, obj));
 273         if (rc <= 0)
 274                 RETURN(rc ? : -EACCES);
 275
 276         buf->lb_len = rc;
 277         head = (posix_acl_xattr_header *)(buf->lb_buf);
 278         entry = head->a_entries;
 279         entry_count = (buf->lb_len - sizeof(head->a_version)) /
 280                       sizeof(posix_acl_xattr_entry);
 281
 282         rc = lustre_posix_acl_permission(uc, la, mask, entry, entry_count);
 283         RETURN(rc);
 284 #else
 285         ENTRY;
 286         RETURN(-EAGAIN);
 287 #endif
 288 }
 289
 290 int __mdd_permission_internal(const struct lu_env *env, struct mdd_object *obj,
 291                               struct lu_attr *la, int mask, int role)
 292 {
 293         struct md_ucred *uc = md_ucred(env);
 294         __u32 mode;
 295         int rc;
 296         ENTRY;
 297
 298         if (mask == 0)
 299                 RETURN(0);
 300
 301         /* These means unnecessary for permission check */
 302         if ((uc == NULL) || (uc->mu_valid == UCRED_INIT))
 303                 RETURN(0);
 304
 305         /* Invalid user credit */
 306         if (uc->mu_valid == UCRED_INVALID)
 307                 RETURN(-EACCES);
 308
 309         /*
 310          * Nobody gets write access to an immutable file.
 311          */
 312         if ((mask & MAY_WRITE) && mdd_is_immutable(obj))
 313                 RETURN(-EACCES);
 314
 315         if (la == NULL) {
 316                 la = &mdd_env_info(env)->mti_la;
 317                 rc = mdd_la_get(env, obj, la, BYPASS_CAPA);
 318                 if (rc)
 319                         RETURN(rc);
 320         }
 321
 322         mode = la->la_mode;
 323         if (uc->mu_fsuid == la->la_uid) {
 324                 mode >>= 6;
 325         } else {
 326                 if (mode & S_IRWXG) {
 327                         if (role != -1)
 328                                 mdd_read_lock(env, obj, role);
 329                         rc = mdd_check_acl(env, obj, la, mask);
 330                         if (role != -1)
 331                                 mdd_read_unlock(env, obj);
 332                         if (rc == -EACCES)
 333                                 goto check_capabilities;
 334                         else if ((rc != -EAGAIN) && (rc != -EOPNOTSUPP) &&
 335                                  (rc != -ENODATA))
 336                                 RETURN(rc);
 337                 }
 338                 if (lustre_in_group_p(uc, la->la_gid))
 339                         mode >>= 3;
 340         }
 341
 342         if (((mode & mask & S_IRWXO) == mask))
 343                 RETURN(0);
 344
 345 check_capabilities:
 346         if (!(mask & MAY_EXEC) ||
 347             (la->la_mode & S_IXUGO) || S_ISDIR(la->la_mode))
 348                 if (mdd_capable(uc, CFS_CAP_DAC_OVERRIDE))
 349                         RETURN(0);
 350
 351         if ((mask == MAY_READ) ||
 352             (S_ISDIR(la->la_mode) && !(mask & MAY_WRITE)))
 353                 if (mdd_capable(uc, CFS_CAP_DAC_READ_SEARCH))
 354                         RETURN(0);
 355
 356         RETURN(-EACCES);
 357 }
 358
 359 int mdd_permission(const struct lu_env *env,
 360                    struct md_object *pobj, struct md_object *cobj,
 361                    struct md_attr *ma, int mask)
 362 {
 363         struct mdd_object *mdd_pobj, *mdd_cobj;
 364         struct md_ucred *uc = NULL;
 365         struct lu_attr *la = &mdd_env_info(env)->mti_cattr;
 366         int check_create, check_link;
 367         int check_unlink;
 368         int check_rename_src, check_rename_tar;
 369         int check_vtx_part, check_vtx_full;
 370         int check_rgetfacl;
 371         int rc = 0;
 372         ENTRY;
 373
 374         LASSERT(cobj);
 375         mdd_cobj = md2mdd_obj(cobj);
 376
 377         rc = mdd_la_get(env, mdd_cobj, la, BYPASS_CAPA);
 378         if (rc)
 379                 RETURN(rc);
 380
 381         /* For cross_open case, the "mask" is open flags,
 382          * so convert it to permission mask first.
 383          * XXX: MDS_OPEN_CROSS must be NOT equal to permission mask MAY_*. */
 384         if (unlikely(mask & MDS_OPEN_CROSS))
 385                 mask = accmode(env, la, mask & ~MDS_OPEN_CROSS);
 386
 387         check_create = mask & MAY_CREATE;
 388         check_link = mask & MAY_LINK;
 389         check_unlink = mask & MAY_UNLINK;
 390         check_rename_src = mask & MAY_RENAME_SRC;
 391         check_rename_tar = mask & MAY_RENAME_TAR;
 392         check_vtx_part = mask & MAY_VTX_PART;
 393         check_vtx_full = mask & MAY_VTX_FULL;
 394         check_rgetfacl = mask & MAY_RGETFACL;
 395
 396         mask &= ~(MAY_CREATE | MAY_LINK |
 397                 MAY_UNLINK |
 398                 MAY_RENAME_SRC | MAY_RENAME_TAR |
 399                 MAY_VTX_PART | MAY_VTX_FULL |
 400                 MAY_RGETFACL);
 401
 402         rc = mdd_permission_internal_locked(env, mdd_cobj, NULL, mask,
 403                                             MOR_TGT_CHILD);
 404
 405         if (!rc && (check_create || check_link))
 406                 rc = mdd_may_create(env, mdd_cobj, NULL, 1, check_link);
 407
 408         if (!rc && check_unlink)
 409                 rc = mdd_may_unlink(env, mdd_cobj, la);
 410
 411         if (!rc && (check_rename_src || check_rename_tar)) {
 412                 LASSERT(pobj);
 413                 mdd_pobj = md2mdd_obj(pobj);
 414                 rc = mdd_may_delete(env, mdd_pobj, mdd_cobj, la, NULL, 1,
 415                                     check_rename_tar);
 416         }
 417
 418         if (!rc && (check_vtx_part || check_vtx_full)) {
 419                 uc = md_ucred(env);
 420                 if (likely(!la)) {
 421                         la = &mdd_env_info(env)->mti_la;
 422                         rc = mdd_la_get(env, mdd_cobj, la, BYPASS_CAPA);
 423                         if (rc)
 424                                 RETURN(rc);
 425                 }
 426
 427                 if (!(la->la_mode & S_ISVTX) || (la->la_uid == uc->mu_fsuid) ||
 428                     (check_vtx_full && (ma->ma_attr.la_valid & LA_UID) &&
 429                     (ma->ma_attr.la_uid == uc->mu_fsuid))) {
 430                         ma->ma_attr_flags |= MDS_VTX_BYPASS;
 431                 } else {
 432                         ma->ma_attr_flags &= ~MDS_VTX_BYPASS;
 433                         if (check_vtx_full)
 434                                 rc = -EPERM;
 435                 }
 436         }
 437
 438         if (unlikely(!rc && check_rgetfacl)) {
 439                 if (likely(!uc))
 440                         uc = md_ucred(env);
 441
 442                 if (la->la_uid != uc->mu_fsuid &&
 443                     !mdd_capable(uc, CFS_CAP_FOWNER))
 444                         rc = -EPERM;
 445         }
 446
 447         RETURN(rc);
 448 }
 449
 450 int mdd_capa_get(const struct lu_env *env, struct md_object *obj,
 451                  struct lustre_capa *capa, int renewal)
 452 {
 453         struct mdd_object *mdd_obj = md2mdd_obj(obj);
 454         struct obd_capa *oc;
 455         int rc = 0;
 456         ENTRY;
 457
 458         oc = mdo_capa_get(env, mdd_obj, renewal ? capa : NULL,
 459                           capa->lc_opc);
 460         if (IS_ERR(oc)) {
 461                 rc = PTR_ERR(oc);
 462         } else if (likely(oc != NULL)) {
 463                 capa_cpy(capa, oc);
 464                 capa_put(oc);
 465         }
 466
 467         RETURN(rc);
 468 }