module/zfs/dsl_deleg.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 /*
  22  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  23  * Copyright (c) 2011 by Delphix. All rights reserved.
  24  */
  25
  26 /*
  27  * DSL permissions are stored in a two level zap attribute
  28  * mechanism.   The first level identifies the "class" of
  29  * entry.  The class is identified by the first 2 letters of
  30  * the attribute.  The second letter "l" or "d" identifies whether
  31  * it is a local or descendent permission.  The first letter
  32  * identifies the type of entry.
  33  *
  34  * ul$<id>    identifies permissions granted locally for this userid.
  35  * ud$<id>    identifies permissions granted on descendent datasets for
  36  *            this userid.
  37  * Ul$<id>    identifies permission sets granted locally for this userid.
  38  * Ud$<id>    identifies permission sets granted on descendent datasets for
  39  *            this userid.
  40  * gl$<id>    identifies permissions granted locally for this groupid.
  41  * gd$<id>    identifies permissions granted on descendent datasets for
  42  *            this groupid.
  43  * Gl$<id>    identifies permission sets granted locally for this groupid.
  44  * Gd$<id>    identifies permission sets granted on descendent datasets for
  45  *            this groupid.
  46  * el$        identifies permissions granted locally for everyone.
  47  * ed$        identifies permissions granted on descendent datasets
  48  *            for everyone.
  49  * El$        identifies permission sets granted locally for everyone.
  50  * Ed$        identifies permission sets granted to descendent datasets for
  51  *            everyone.
  52  * c-$        identifies permission to create at dataset creation time.
  53  * C-$        identifies permission sets to grant locally at dataset creation
  54  *            time.
  55  * s-$@<name> permissions defined in specified set @<name>
  56  * S-$@<name> Sets defined in named set @<name>
  57  *
  58  * Each of the above entities points to another zap attribute that contains one
  59  * attribute for each allowed permission, such as create, destroy,...
  60  * All of the "upper" case class types will specify permission set names
  61  * rather than permissions.
  62  *
  63  * Basically it looks something like this:
  64  * ul$12 -> ZAP OBJ -> permissions...
  65  *
  66  * The ZAP OBJ is referred to as the jump object.
  67  */
  68
  69 #include <sys/dmu.h>
  70 #include <sys/dmu_objset.h>
  71 #include <sys/dmu_tx.h>
  72 #include <sys/dsl_dataset.h>
  73 #include <sys/dsl_dir.h>
  74 #include <sys/dsl_prop.h>
  75 #include <sys/dsl_synctask.h>
  76 #include <sys/dsl_deleg.h>
  77 #include <sys/spa.h>
  78 #include <sys/zap.h>
  79 #include <sys/fs/zfs.h>
  80 #include <sys/cred.h>
  81 #include <sys/sunddi.h>
  82
  83 #include "zfs_deleg.h"
  84
  85 /*
  86  * Validate that user is allowed to delegate specified permissions.
  87  *
  88  * In order to delegate "create" you must have "create"
  89  * and "allow".
  90  */
  91 int
  92 dsl_deleg_can_allow(char *ddname, nvlist_t *nvp, cred_t *cr)
  93 {
  94         nvpair_t *whopair = NULL;
  95         int error;
  96
  97         if ((error = dsl_deleg_access(ddname, ZFS_DELEG_PERM_ALLOW, cr)) != 0)
  98                 return (error);
  99
 100         while ((whopair = nvlist_next_nvpair(nvp, whopair))) {
 101                 nvlist_t *perms;
 102                 nvpair_t *permpair = NULL;
 103
 104                 VERIFY(nvpair_value_nvlist(whopair, &perms) == 0);
 105
 106                 while ((permpair = nvlist_next_nvpair(perms, permpair))) {
 107                         const char *perm = nvpair_name(permpair);
 108
 109                         if (strcmp(perm, ZFS_DELEG_PERM_ALLOW) == 0)
 110                                 return (EPERM);
 111
 112                         if ((error = dsl_deleg_access(ddname, perm, cr)) != 0)
 113                                 return (error);
 114                 }
 115         }
 116         return (0);
 117 }
 118
 119 /*
 120  * Validate that user is allowed to unallow specified permissions.  They
 121  * must have the 'allow' permission, and even then can only unallow
 122  * perms for their uid.
 123  */
 124 int
 125 dsl_deleg_can_unallow(char *ddname, nvlist_t *nvp, cred_t *cr)
 126 {
 127         nvpair_t *whopair = NULL;
 128         int error;
 129         char idstr[32];
 130
 131         if ((error = dsl_deleg_access(ddname, ZFS_DELEG_PERM_ALLOW, cr)) != 0)
 132                 return (error);
 133
 134         (void) snprintf(idstr, sizeof (idstr), "%lld",
 135             (longlong_t)crgetuid(cr));
 136
 137         while ((whopair = nvlist_next_nvpair(nvp, whopair))) {
 138                 zfs_deleg_who_type_t type = nvpair_name(whopair)[0];
 139
 140                 if (type != ZFS_DELEG_USER &&
 141                     type != ZFS_DELEG_USER_SETS)
 142                         return (EPERM);
 143
 144                 if (strcmp(idstr, &nvpair_name(whopair)[3]) != 0)
 145                         return (EPERM);
 146         }
 147         return (0);
 148 }
 149
 150 static void
 151 dsl_deleg_set_sync(void *arg1, void *arg2, dmu_tx_t *tx)
 152 {
 153         dsl_dir_t *dd = arg1;
 154         nvlist_t *nvp = arg2;
 155         objset_t *mos = dd->dd_pool->dp_meta_objset;
 156         nvpair_t *whopair = NULL;
 157         uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
 158
 159         if (zapobj == 0) {
 160                 dmu_buf_will_dirty(dd->dd_dbuf, tx);
 161                 zapobj = dd->dd_phys->dd_deleg_zapobj = zap_create(mos,
 162                     DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
 163         }
 164
 165         while ((whopair = nvlist_next_nvpair(nvp, whopair))) {
 166                 const char *whokey = nvpair_name(whopair);
 167                 nvlist_t *perms;
 168                 nvpair_t *permpair = NULL;
 169                 uint64_t jumpobj;
 170
 171                 VERIFY(nvpair_value_nvlist(whopair, &perms) == 0);
 172
 173                 if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0) {
 174                         jumpobj = zap_create(mos, DMU_OT_DSL_PERMS,
 175                             DMU_OT_NONE, 0, tx);
 176                         VERIFY(zap_update(mos, zapobj,
 177                             whokey, 8, 1, &jumpobj, tx) == 0);
 178                 }
 179
 180                 while ((permpair = nvlist_next_nvpair(perms, permpair))) {
 181                         const char *perm = nvpair_name(permpair);
 182                         uint64_t n = 0;
 183
 184                         VERIFY(zap_update(mos, jumpobj,
 185                             perm, 8, 1, &n, tx) == 0);
 186                         spa_history_log_internal(LOG_DS_PERM_UPDATE,
 187                             dd->dd_pool->dp_spa, tx,
 188                             "%s %s dataset = %llu", whokey, perm,
 189                             dd->dd_phys->dd_head_dataset_obj);
 190                 }
 191         }
 192 }
 193
 194 static void
 195 dsl_deleg_unset_sync(void *arg1, void *arg2, dmu_tx_t *tx)
 196 {
 197         dsl_dir_t *dd = arg1;
 198         nvlist_t *nvp = arg2;
 199         objset_t *mos = dd->dd_pool->dp_meta_objset;
 200         nvpair_t *whopair = NULL;
 201         uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
 202
 203         if (zapobj == 0)
 204                 return;
 205
 206         while ((whopair = nvlist_next_nvpair(nvp, whopair))) {
 207                 const char *whokey = nvpair_name(whopair);
 208                 nvlist_t *perms;
 209                 nvpair_t *permpair = NULL;
 210                 uint64_t jumpobj;
 211
 212                 if (nvpair_value_nvlist(whopair, &perms) != 0) {
 213                         if (zap_lookup(mos, zapobj, whokey, 8,
 214                             1, &jumpobj) == 0) {
 215                                 (void) zap_remove(mos, zapobj, whokey, tx);
 216                                 VERIFY(0 == zap_destroy(mos, jumpobj, tx));
 217                         }
 218                         spa_history_log_internal(LOG_DS_PERM_WHO_REMOVE,
 219                             dd->dd_pool->dp_spa, tx,
 220                             "%s dataset = %llu", whokey,
 221                             dd->dd_phys->dd_head_dataset_obj);
 222                         continue;
 223                 }
 224
 225                 if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0)
 226                         continue;
 227
 228                 while ((permpair = nvlist_next_nvpair(perms, permpair))) {
 229                         const char *perm = nvpair_name(permpair);
 230                         uint64_t n = 0;
 231
 232                         (void) zap_remove(mos, jumpobj, perm, tx);
 233                         if (zap_count(mos, jumpobj, &n) == 0 && n == 0) {
 234                                 (void) zap_remove(mos, zapobj,
 235                                     whokey, tx);
 236                                 VERIFY(0 == zap_destroy(mos,
 237                                     jumpobj, tx));
 238                         }
 239                         spa_history_log_internal(LOG_DS_PERM_REMOVE,
 240                             dd->dd_pool->dp_spa, tx,
 241                             "%s %s dataset = %llu", whokey, perm,
 242                             dd->dd_phys->dd_head_dataset_obj);
 243                 }
 244         }
 245 }
 246
 247 int
 248 dsl_deleg_set(const char *ddname, nvlist_t *nvp, boolean_t unset)
 249 {
 250         dsl_dir_t *dd;
 251         int error;
 252         nvpair_t *whopair = NULL;
 253         int blocks_modified = 0;
 254
 255         error = dsl_dir_open(ddname, FTAG, &dd, NULL);
 256         if (error)
 257                 return (error);
 258
 259         if (spa_version(dmu_objset_spa(dd->dd_pool->dp_meta_objset)) <
 260             SPA_VERSION_DELEGATED_PERMS) {
 261                 dsl_dir_close(dd, FTAG);
 262                 return (ENOTSUP);
 263         }
 264
 265         while ((whopair = nvlist_next_nvpair(nvp, whopair)))
 266                 blocks_modified++;
 267
 268         error = dsl_sync_task_do(dd->dd_pool, NULL,
 269             unset ? dsl_deleg_unset_sync : dsl_deleg_set_sync,
 270             dd, nvp, blocks_modified);
 271         dsl_dir_close(dd, FTAG);
 272
 273         return (error);
 274 }
 275
 276 /*
 277  * Find all 'allow' permissions from a given point and then continue
 278  * traversing up to the root.
 279  *
 280  * This function constructs an nvlist of nvlists.
 281  * each setpoint is an nvlist composed of an nvlist of an nvlist
 282  * of the individual * users/groups/everyone/create
 283  * permissions.
 284  *
 285  * The nvlist will look like this.
 286  *
 287  * { source fsname -> { whokeys { permissions,...}, ...}}
 288  *
 289  * The fsname nvpairs will be arranged in a bottom up order.  For example,
 290  * if we have the following structure a/b/c then the nvpairs for the fsnames
 291  * will be ordered a/b/c, a/b, a.
 292  */
 293 int
 294 dsl_deleg_get(const char *ddname, nvlist_t **nvp)
 295 {
 296         dsl_dir_t *dd, *startdd;
 297         dsl_pool_t *dp;
 298         int error;
 299         objset_t *mos;
 300         zap_cursor_t *basezc, *zc;
 301         zap_attribute_t *baseza, *za;
 302         char *source;
 303
 304         error = dsl_dir_open(ddname, FTAG, &startdd, NULL);
 305         if (error)
 306                 return (error);
 307
 308         dp = startdd->dd_pool;
 309         mos = dp->dp_meta_objset;
 310
 311         zc = kmem_alloc(sizeof(zap_cursor_t), KM_SLEEP);
 312         za = kmem_alloc(sizeof(zap_attribute_t), KM_SLEEP);
 313         basezc = kmem_alloc(sizeof(zap_cursor_t), KM_SLEEP);
 314         baseza = kmem_alloc(sizeof(zap_attribute_t), KM_SLEEP);
 315         source = kmem_alloc(MAXNAMELEN + strlen(MOS_DIR_NAME) + 1, KM_SLEEP);
 316         VERIFY(nvlist_alloc(nvp, NV_UNIQUE_NAME, KM_SLEEP) == 0);
 317
 318         rw_enter(&dp->dp_config_rwlock, RW_READER);
 319         for (dd = startdd; dd != NULL; dd = dd->dd_parent) {
 320                 nvlist_t *sp_nvp;
 321                 uint64_t n;
 322
 323                 if (dd->dd_phys->dd_deleg_zapobj &&
 324                     (zap_count(mos, dd->dd_phys->dd_deleg_zapobj,
 325                     &n) == 0) && n) {
 326                         VERIFY(nvlist_alloc(&sp_nvp,
 327                             NV_UNIQUE_NAME, KM_SLEEP) == 0);
 328                 } else {
 329                         continue;
 330                 }
 331
 332                 for (zap_cursor_init(basezc, mos,
 333                     dd->dd_phys->dd_deleg_zapobj);
 334                     zap_cursor_retrieve(basezc, baseza) == 0;
 335                     zap_cursor_advance(basezc)) {
 336                         nvlist_t *perms_nvp;
 337
 338                         ASSERT(baseza->za_integer_length == 8);
 339                         ASSERT(baseza->za_num_integers == 1);
 340
 341                         VERIFY(nvlist_alloc(&perms_nvp,
 342                             NV_UNIQUE_NAME, KM_SLEEP) == 0);
 343                         for (zap_cursor_init(zc, mos, baseza->za_first_integer);
 344                             zap_cursor_retrieve(zc, za) == 0;
 345                             zap_cursor_advance(zc)) {
 346                                 VERIFY(nvlist_add_boolean(perms_nvp,
 347                                     za->za_name) == 0);
 348                         }
 349                         zap_cursor_fini(zc);
 350                         VERIFY(nvlist_add_nvlist(sp_nvp, baseza->za_name,
 351                             perms_nvp) == 0);
 352                         nvlist_free(perms_nvp);
 353                 }
 354
 355                 zap_cursor_fini(basezc);
 356
 357                 dsl_dir_name(dd, source);
 358                 VERIFY(nvlist_add_nvlist(*nvp, source, sp_nvp) == 0);
 359                 nvlist_free(sp_nvp);
 360         }
 361         rw_exit(&dp->dp_config_rwlock);
 362
 363         kmem_free(source, MAXNAMELEN + strlen(MOS_DIR_NAME) + 1);
 364         kmem_free(baseza, sizeof(zap_attribute_t));
 365         kmem_free(basezc, sizeof(zap_cursor_t));
 366         kmem_free(za, sizeof(zap_attribute_t));
 367         kmem_free(zc, sizeof(zap_cursor_t));
 368
 369         dsl_dir_close(startdd, FTAG);
 370         return (0);
 371 }
 372
 373 /*
 374  * Routines for dsl_deleg_access() -- access checking.
 375  */
 376 typedef struct perm_set {
 377         avl_node_t      p_node;
 378         boolean_t       p_matched;
 379         char            p_setname[ZFS_MAX_DELEG_NAME];
 380 } perm_set_t;
 381
 382 static int
 383 perm_set_compare(const void *arg1, const void *arg2)
 384 {
 385         const perm_set_t *node1 = arg1;
 386         const perm_set_t *node2 = arg2;
 387         int val;
 388
 389         val = strcmp(node1->p_setname, node2->p_setname);
 390         if (val == 0)
 391                 return (0);
 392         return (val > 0 ? 1 : -1);
 393 }
 394
 395 /*
 396  * Determine whether a specified permission exists.
 397  *
 398  * First the base attribute has to be retrieved.  i.e. ul$12
 399  * Once the base object has been retrieved the actual permission
 400  * is lookup up in the zap object the base object points to.
 401  *
 402  * Return 0 if permission exists, ENOENT if there is no whokey, EPERM if
 403  * there is no perm in that jumpobj.
 404  */
 405 static int
 406 dsl_check_access(objset_t *mos, uint64_t zapobj,
 407     char type, char checkflag, void *valp, const char *perm)
 408 {
 409         int error;
 410         uint64_t jumpobj, zero;
 411         char whokey[ZFS_MAX_DELEG_NAME];
 412
 413         zfs_deleg_whokey(whokey, type, checkflag, valp);
 414         error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
 415         if (error == 0) {
 416                 error = zap_lookup(mos, jumpobj, perm, 8, 1, &zero);
 417                 if (error == ENOENT)
 418                         error = EPERM;
 419         }
 420         return (error);
 421 }
 422
 423 /*
 424  * check a specified user/group for a requested permission
 425  */
 426 static int
 427 dsl_check_user_access(objset_t *mos, uint64_t zapobj, const char *perm,
 428     int checkflag, cred_t *cr)
 429 {
 430         const   gid_t *gids;
 431         int     ngids;
 432         int     i;
 433         uint64_t id;
 434
 435         /* check for user */
 436         id = crgetuid(cr);
 437         if (dsl_check_access(mos, zapobj,
 438             ZFS_DELEG_USER, checkflag, &id, perm) == 0)
 439                 return (0);
 440
 441         /* check for users primary group */
 442         id = crgetgid(cr);
 443         if (dsl_check_access(mos, zapobj,
 444             ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
 445                 return (0);
 446
 447         /* check for everyone entry */
 448         id = -1;
 449         if (dsl_check_access(mos, zapobj,
 450             ZFS_DELEG_EVERYONE, checkflag, &id, perm) == 0)
 451                 return (0);
 452
 453         /* check each supplemental group user is a member of */
 454         ngids = crgetngroups(cr);
 455         gids = crgetgroups(cr);
 456         for (i = 0; i != ngids; i++) {
 457                 id = gids[i];
 458                 if (dsl_check_access(mos, zapobj,
 459                     ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
 460                         return (0);
 461         }
 462
 463         return (EPERM);
 464 }
 465
 466 /*
 467  * Iterate over the sets specified in the specified zapobj
 468  * and load them into the permsets avl tree.
 469  */
 470 static int
 471 dsl_load_sets(objset_t *mos, uint64_t zapobj,
 472     char type, char checkflag, void *valp, avl_tree_t *avl)
 473 {
 474         zap_cursor_t zc;
 475         zap_attribute_t za;
 476         perm_set_t *permnode;
 477         avl_index_t idx;
 478         uint64_t jumpobj;
 479         int error;
 480         char whokey[ZFS_MAX_DELEG_NAME];
 481
 482         zfs_deleg_whokey(whokey, type, checkflag, valp);
 483
 484         error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
 485         if (error != 0)
 486                 return (error);
 487
 488         for (zap_cursor_init(&zc, mos, jumpobj);
 489             zap_cursor_retrieve(&zc, &za) == 0;
 490             zap_cursor_advance(&zc)) {
 491                 permnode = kmem_alloc(sizeof (perm_set_t), KM_SLEEP);
 492                 (void) strlcpy(permnode->p_setname, za.za_name,
 493                     sizeof (permnode->p_setname));
 494                 permnode->p_matched = B_FALSE;
 495
 496                 if (avl_find(avl, permnode, &idx) == NULL) {
 497                         avl_insert(avl, permnode, idx);
 498                 } else {
 499                         kmem_free(permnode, sizeof (perm_set_t));
 500                 }
 501         }
 502         zap_cursor_fini(&zc);
 503         return (0);
 504 }
 505
 506 /*
 507  * Load all permissions user based on cred belongs to.
 508  */
 509 static void
 510 dsl_load_user_sets(objset_t *mos, uint64_t zapobj, avl_tree_t *avl,
 511     char checkflag, cred_t *cr)
 512 {
 513         const   gid_t *gids;
 514         int     ngids, i;
 515         uint64_t id;
 516
 517         id = crgetuid(cr);
 518         (void) dsl_load_sets(mos, zapobj,
 519             ZFS_DELEG_USER_SETS, checkflag, &id, avl);
 520
 521         id = crgetgid(cr);
 522         (void) dsl_load_sets(mos, zapobj,
 523             ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
 524
 525         (void) dsl_load_sets(mos, zapobj,
 526             ZFS_DELEG_EVERYONE_SETS, checkflag, NULL, avl);
 527
 528         ngids = crgetngroups(cr);
 529         gids = crgetgroups(cr);
 530         for (i = 0; i != ngids; i++) {
 531                 id = gids[i];
 532                 (void) dsl_load_sets(mos, zapobj,
 533                     ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
 534         }
 535 }
 536
 537 /*
 538  * Check if user has requested permission.  If descendent is set, must have
 539  * descendent perms.
 540  */
 541 int
 542 dsl_deleg_access_impl(dsl_dataset_t *ds, boolean_t descendent, const char *perm,
 543     cred_t *cr)
 544 {
 545         dsl_dir_t *dd;
 546         dsl_pool_t *dp;
 547         void *cookie;
 548         int     error;
 549         char    checkflag;
 550         objset_t *mos;
 551         avl_tree_t permsets;
 552         perm_set_t *setnode;
 553
 554         dp = ds->ds_dir->dd_pool;
 555         mos = dp->dp_meta_objset;
 556
 557         if (dsl_delegation_on(mos) == B_FALSE)
 558                 return (ECANCELED);
 559
 560         if (spa_version(dmu_objset_spa(dp->dp_meta_objset)) <
 561             SPA_VERSION_DELEGATED_PERMS)
 562                 return (EPERM);
 563
 564         if (dsl_dataset_is_snapshot(ds) || descendent) {
 565                 /*
 566                  * Snapshots are treated as descendents only,
 567                  * local permissions do not apply.
 568                  */
 569                 checkflag = ZFS_DELEG_DESCENDENT;
 570         } else {
 571                 checkflag = ZFS_DELEG_LOCAL;
 572         }
 573
 574         avl_create(&permsets, perm_set_compare, sizeof (perm_set_t),
 575             offsetof(perm_set_t, p_node));
 576
 577         rw_enter(&dp->dp_config_rwlock, RW_READER);
 578         for (dd = ds->ds_dir; dd != NULL; dd = dd->dd_parent,
 579             checkflag = ZFS_DELEG_DESCENDENT) {
 580                 uint64_t zapobj;
 581                 boolean_t expanded;
 582
 583                 /*
 584                  * If not in global zone then make sure
 585                  * the zoned property is set
 586                  */
 587                 if (!INGLOBALZONE(curproc)) {
 588                         uint64_t zoned;
 589
 590                         if (dsl_prop_get_dd(dd,
 591                             zfs_prop_to_name(ZFS_PROP_ZONED),
 592                             8, 1, &zoned, NULL, B_FALSE) != 0)
 593                                 break;
 594                         if (!zoned)
 595                                 break;
 596                 }
 597                 zapobj = dd->dd_phys->dd_deleg_zapobj;
 598
 599                 if (zapobj == 0)
 600                         continue;
 601
 602                 dsl_load_user_sets(mos, zapobj, &permsets, checkflag, cr);
 603 again:
 604                 expanded = B_FALSE;
 605                 for (setnode = avl_first(&permsets); setnode;
 606                     setnode = AVL_NEXT(&permsets, setnode)) {
 607                         if (setnode->p_matched == B_TRUE)
 608                                 continue;
 609
 610                         /* See if this set directly grants this permission */
 611                         error = dsl_check_access(mos, zapobj,
 612                             ZFS_DELEG_NAMED_SET, 0, setnode->p_setname, perm);
 613                         if (error == 0)
 614                                 goto success;
 615                         if (error == EPERM)
 616                                 setnode->p_matched = B_TRUE;
 617
 618                         /* See if this set includes other sets */
 619                         error = dsl_load_sets(mos, zapobj,
 620                             ZFS_DELEG_NAMED_SET_SETS, 0,
 621                             setnode->p_setname, &permsets);
 622                         if (error == 0)
 623                                 setnode->p_matched = expanded = B_TRUE;
 624                 }
 625                 /*
 626                  * If we expanded any sets, that will define more sets,
 627                  * which we need to check.
 628                  */
 629                 if (expanded)
 630                         goto again;
 631
 632                 error = dsl_check_user_access(mos, zapobj, perm, checkflag, cr);
 633                 if (error == 0)
 634                         goto success;
 635         }
 636         error = EPERM;
 637 success:
 638         rw_exit(&dp->dp_config_rwlock);
 639
 640         cookie = NULL;
 641         while ((setnode = avl_destroy_nodes(&permsets, &cookie)) != NULL)
 642                 kmem_free(setnode, sizeof (perm_set_t));
 643
 644         return (error);
 645 }
 646
 647 int
 648 dsl_deleg_access(const char *dsname, const char *perm, cred_t *cr)
 649 {
 650         dsl_dataset_t *ds;
 651         int error;
 652
 653         error = dsl_dataset_hold(dsname, FTAG, &ds);
 654         if (error)
 655                 return (error);
 656
 657         error = dsl_deleg_access_impl(ds, B_FALSE, perm, cr);
 658         dsl_dataset_rele(ds, FTAG);
 659
 660         return (error);
 661 }
 662
 663 /*
 664  * Other routines.
 665  */
 666
 667 static void
 668 copy_create_perms(dsl_dir_t *dd, uint64_t pzapobj,
 669     boolean_t dosets, uint64_t uid, dmu_tx_t *tx)
 670 {
 671         objset_t *mos = dd->dd_pool->dp_meta_objset;
 672         uint64_t jumpobj, pjumpobj;
 673         uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
 674         zap_cursor_t zc;
 675         zap_attribute_t za;
 676         char whokey[ZFS_MAX_DELEG_NAME];
 677
 678         zfs_deleg_whokey(whokey,
 679             dosets ? ZFS_DELEG_CREATE_SETS : ZFS_DELEG_CREATE,
 680             ZFS_DELEG_LOCAL, NULL);
 681         if (zap_lookup(mos, pzapobj, whokey, 8, 1, &pjumpobj) != 0)
 682                 return;
 683
 684         if (zapobj == 0) {
 685                 dmu_buf_will_dirty(dd->dd_dbuf, tx);
 686                 zapobj = dd->dd_phys->dd_deleg_zapobj = zap_create(mos,
 687                     DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
 688         }
 689
 690         zfs_deleg_whokey(whokey,
 691             dosets ? ZFS_DELEG_USER_SETS : ZFS_DELEG_USER,
 692             ZFS_DELEG_LOCAL, &uid);
 693         if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) == ENOENT) {
 694                 jumpobj = zap_create(mos, DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
 695                 VERIFY(zap_add(mos, zapobj, whokey, 8, 1, &jumpobj, tx) == 0);
 696         }
 697
 698         for (zap_cursor_init(&zc, mos, pjumpobj);
 699             zap_cursor_retrieve(&zc, &za) == 0;
 700             zap_cursor_advance(&zc)) {
 701                 uint64_t zero = 0;
 702                 ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
 703
 704                 VERIFY(zap_update(mos, jumpobj, za.za_name,
 705                     8, 1, &zero, tx) == 0);
 706         }
 707         zap_cursor_fini(&zc);
 708 }
 709
 710 /*
 711  * set all create time permission on new dataset.
 712  */
 713 void
 714 dsl_deleg_set_create_perms(dsl_dir_t *sdd, dmu_tx_t *tx, cred_t *cr)
 715 {
 716         dsl_dir_t *dd;
 717         uint64_t uid = crgetuid(cr);
 718
 719         if (spa_version(dmu_objset_spa(sdd->dd_pool->dp_meta_objset)) <
 720             SPA_VERSION_DELEGATED_PERMS)
 721                 return;
 722
 723         for (dd = sdd->dd_parent; dd != NULL; dd = dd->dd_parent) {
 724                 uint64_t pzapobj = dd->dd_phys->dd_deleg_zapobj;
 725
 726                 if (pzapobj == 0)
 727                         continue;
 728
 729                 copy_create_perms(sdd, pzapobj, B_FALSE, uid, tx);
 730                 copy_create_perms(sdd, pzapobj, B_TRUE, uid, tx);
 731         }
 732 }
 733
 734 int
 735 dsl_deleg_destroy(objset_t *mos, uint64_t zapobj, dmu_tx_t *tx)
 736 {
 737         zap_cursor_t zc;
 738         zap_attribute_t za;
 739
 740         if (zapobj == 0)
 741                 return (0);
 742
 743         for (zap_cursor_init(&zc, mos, zapobj);
 744             zap_cursor_retrieve(&zc, &za) == 0;
 745             zap_cursor_advance(&zc)) {
 746                 ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
 747                 VERIFY(0 == zap_destroy(mos, za.za_first_integer, tx));
 748         }
 749         zap_cursor_fini(&zc);
 750         VERIFY(0 == zap_destroy(mos, zapobj, tx));
 751         return (0);
 752 }
 753
 754 boolean_t
 755 dsl_delegation_on(objset_t *os)
 756 {
 757         return (!!spa_delegation(os->os_spa));
 758 }
 759
 760 #if defined(_KERNEL) && defined(HAVE_SPL)
 761 EXPORT_SYMBOL(dsl_deleg_get);
 762 EXPORT_SYMBOL(dsl_deleg_set);
 763 #endif