xref: /titanic_52/usr/src/uts/common/fs/zfs/dsl_deleg.c (revision 2b24ab6b3865caeede9eeb9db6b83e1d89dcd1ea)
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 2009 Sun Microsystems, Inc.  All rights reserved.
23  * Use is subject to license terms.
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/spa_impl.h>
79 #include <sys/zio_checksum.h> /* for the default checksum value */
80 #include <sys/zap.h>
81 #include <sys/fs/zfs.h>
82 #include <sys/cred.h>
83 #include <sys/sunddi.h>
84 
85 #include "zfs_deleg.h"
86 
87 /*
88  * Validate that user is allowed to delegate specified permissions.
89  *
90  * In order to delegate "create" you must have "create"
91  * and "allow".
92  */
93 int
94 dsl_deleg_can_allow(char *ddname, nvlist_t *nvp, cred_t *cr)
95 {
96 	nvpair_t *whopair = NULL;
97 	int error;
98 
99 	if ((error = dsl_deleg_access(ddname, ZFS_DELEG_PERM_ALLOW, cr)) != 0)
100 		return (error);
101 
102 	while (whopair = nvlist_next_nvpair(nvp, whopair)) {
103 		nvlist_t *perms;
104 		nvpair_t *permpair = NULL;
105 
106 		VERIFY(nvpair_value_nvlist(whopair, &perms) == 0);
107 
108 		while (permpair = nvlist_next_nvpair(perms, permpair)) {
109 			const char *perm = nvpair_name(permpair);
110 
111 			if (strcmp(perm, ZFS_DELEG_PERM_ALLOW) == 0)
112 				return (EPERM);
113 
114 			if ((error = dsl_deleg_access(ddname, perm, cr)) != 0)
115 				return (error);
116 		}
117 	}
118 	return (0);
119 }
120 
121 /*
122  * Validate that user is allowed to unallow specified permissions.  They
123  * must have the 'allow' permission, and even then can only unallow
124  * perms for their uid.
125  */
126 int
127 dsl_deleg_can_unallow(char *ddname, nvlist_t *nvp, cred_t *cr)
128 {
129 	nvpair_t *whopair = NULL;
130 	int error;
131 	char idstr[32];
132 
133 	if ((error = dsl_deleg_access(ddname, ZFS_DELEG_PERM_ALLOW, cr)) != 0)
134 		return (error);
135 
136 	(void) snprintf(idstr, sizeof (idstr), "%lld",
137 	    (longlong_t)crgetuid(cr));
138 
139 	while (whopair = nvlist_next_nvpair(nvp, whopair)) {
140 		zfs_deleg_who_type_t type = nvpair_name(whopair)[0];
141 
142 		if (type != ZFS_DELEG_USER &&
143 		    type != ZFS_DELEG_USER_SETS)
144 			return (EPERM);
145 
146 		if (strcmp(idstr, &nvpair_name(whopair)[3]) != 0)
147 			return (EPERM);
148 	}
149 	return (0);
150 }
151 
152 static void
153 dsl_deleg_set_sync(void *arg1, void *arg2, cred_t *cr, dmu_tx_t *tx)
154 {
155 	dsl_dir_t *dd = arg1;
156 	nvlist_t *nvp = arg2;
157 	objset_t *mos = dd->dd_pool->dp_meta_objset;
158 	nvpair_t *whopair = NULL;
159 	uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
160 
161 	if (zapobj == 0) {
162 		dmu_buf_will_dirty(dd->dd_dbuf, tx);
163 		zapobj = dd->dd_phys->dd_deleg_zapobj = zap_create(mos,
164 		    DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
165 	}
166 
167 	while (whopair = nvlist_next_nvpair(nvp, whopair)) {
168 		const char *whokey = nvpair_name(whopair);
169 		nvlist_t *perms;
170 		nvpair_t *permpair = NULL;
171 		uint64_t jumpobj;
172 
173 		VERIFY(nvpair_value_nvlist(whopair, &perms) == 0);
174 
175 		if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0) {
176 			jumpobj = zap_create(mos, DMU_OT_DSL_PERMS,
177 			    DMU_OT_NONE, 0, tx);
178 			VERIFY(zap_update(mos, zapobj,
179 			    whokey, 8, 1, &jumpobj, tx) == 0);
180 		}
181 
182 		while (permpair = nvlist_next_nvpair(perms, permpair)) {
183 			const char *perm = nvpair_name(permpair);
184 			uint64_t n = 0;
185 
186 			VERIFY(zap_update(mos, jumpobj,
187 			    perm, 8, 1, &n, tx) == 0);
188 			spa_history_internal_log(LOG_DS_PERM_UPDATE,
189 			    dd->dd_pool->dp_spa, tx, cr,
190 			    "%s %s dataset = %llu", whokey, perm,
191 			    dd->dd_phys->dd_head_dataset_obj);
192 		}
193 	}
194 }
195 
196 static void
197 dsl_deleg_unset_sync(void *arg1, void *arg2, cred_t *cr, dmu_tx_t *tx)
198 {
199 	dsl_dir_t *dd = arg1;
200 	nvlist_t *nvp = arg2;
201 	objset_t *mos = dd->dd_pool->dp_meta_objset;
202 	nvpair_t *whopair = NULL;
203 	uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
204 
205 	if (zapobj == 0)
206 		return;
207 
208 	while (whopair = nvlist_next_nvpair(nvp, whopair)) {
209 		const char *whokey = nvpair_name(whopair);
210 		nvlist_t *perms;
211 		nvpair_t *permpair = NULL;
212 		uint64_t jumpobj;
213 
214 		if (nvpair_value_nvlist(whopair, &perms) != 0) {
215 			if (zap_lookup(mos, zapobj, whokey, 8,
216 			    1, &jumpobj) == 0) {
217 				(void) zap_remove(mos, zapobj, whokey, tx);
218 				VERIFY(0 == zap_destroy(mos, jumpobj, tx));
219 			}
220 			spa_history_internal_log(LOG_DS_PERM_WHO_REMOVE,
221 			    dd->dd_pool->dp_spa, tx, cr,
222 			    "%s dataset = %llu", whokey,
223 			    dd->dd_phys->dd_head_dataset_obj);
224 			continue;
225 		}
226 
227 		if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0)
228 			continue;
229 
230 		while (permpair = nvlist_next_nvpair(perms, permpair)) {
231 			const char *perm = nvpair_name(permpair);
232 			uint64_t n = 0;
233 
234 			(void) zap_remove(mos, jumpobj, perm, tx);
235 			if (zap_count(mos, jumpobj, &n) == 0 && n == 0) {
236 				(void) zap_remove(mos, zapobj,
237 				    whokey, tx);
238 				VERIFY(0 == zap_destroy(mos,
239 				    jumpobj, tx));
240 			}
241 			spa_history_internal_log(LOG_DS_PERM_REMOVE,
242 			    dd->dd_pool->dp_spa, tx, cr,
243 			    "%s %s dataset = %llu", whokey, perm,
244 			    dd->dd_phys->dd_head_dataset_obj);
245 		}
246 	}
247 }
248 
249 int
250 dsl_deleg_set(const char *ddname, nvlist_t *nvp, boolean_t unset)
251 {
252 	dsl_dir_t *dd;
253 	int error;
254 	nvpair_t *whopair = NULL;
255 	int blocks_modified = 0;
256 
257 	error = dsl_dir_open(ddname, FTAG, &dd, NULL);
258 	if (error)
259 		return (error);
260 
261 	if (spa_version(dmu_objset_spa(dd->dd_pool->dp_meta_objset)) <
262 	    SPA_VERSION_DELEGATED_PERMS) {
263 		dsl_dir_close(dd, FTAG);
264 		return (ENOTSUP);
265 	}
266 
267 	while (whopair = nvlist_next_nvpair(nvp, whopair))
268 		blocks_modified++;
269 
270 	error = dsl_sync_task_do(dd->dd_pool, NULL,
271 	    unset ? dsl_deleg_unset_sync : dsl_deleg_set_sync,
272 	    dd, nvp, blocks_modified);
273 	dsl_dir_close(dd, FTAG);
274 
275 	return (error);
276 }
277 
278 /*
279  * Find all 'allow' permissions from a given point and then continue
280  * traversing up to the root.
281  *
282  * This function constructs an nvlist of nvlists.
283  * each setpoint is an nvlist composed of an nvlist of an nvlist
284  * of the individual * users/groups/everyone/create
285  * permissions.
286  *
287  * The nvlist will look like this.
288  *
289  * { source fsname -> { whokeys { permissions,...}, ...}}
290  *
291  * The fsname nvpairs will be arranged in a bottom up order.  For example,
292  * if we have the following structure a/b/c then the nvpairs for the fsnames
293  * will be ordered a/b/c, a/b, a.
294  */
295 int
296 dsl_deleg_get(const char *ddname, nvlist_t **nvp)
297 {
298 	dsl_dir_t *dd, *startdd;
299 	dsl_pool_t *dp;
300 	int error;
301 	objset_t *mos;
302 
303 	error = dsl_dir_open(ddname, FTAG, &startdd, NULL);
304 	if (error)
305 		return (error);
306 
307 	dp = startdd->dd_pool;
308 	mos = dp->dp_meta_objset;
309 
310 	VERIFY(nvlist_alloc(nvp, NV_UNIQUE_NAME, KM_SLEEP) == 0);
311 
312 	rw_enter(&dp->dp_config_rwlock, RW_READER);
313 	for (dd = startdd; dd != NULL; dd = dd->dd_parent) {
314 		zap_cursor_t basezc;
315 		zap_attribute_t baseza;
316 		nvlist_t *sp_nvp;
317 		uint64_t n;
318 		char source[MAXNAMELEN];
319 
320 		if (dd->dd_phys->dd_deleg_zapobj &&
321 		    (zap_count(mos, dd->dd_phys->dd_deleg_zapobj,
322 		    &n) == 0) && n) {
323 			VERIFY(nvlist_alloc(&sp_nvp,
324 			    NV_UNIQUE_NAME, KM_SLEEP) == 0);
325 		} else {
326 			continue;
327 		}
328 
329 		for (zap_cursor_init(&basezc, mos,
330 		    dd->dd_phys->dd_deleg_zapobj);
331 		    zap_cursor_retrieve(&basezc, &baseza) == 0;
332 		    zap_cursor_advance(&basezc)) {
333 			zap_cursor_t zc;
334 			zap_attribute_t za;
335 			nvlist_t *perms_nvp;
336 
337 			ASSERT(baseza.za_integer_length == 8);
338 			ASSERT(baseza.za_num_integers == 1);
339 
340 			VERIFY(nvlist_alloc(&perms_nvp,
341 			    NV_UNIQUE_NAME, KM_SLEEP) == 0);
342 			for (zap_cursor_init(&zc, mos, baseza.za_first_integer);
343 			    zap_cursor_retrieve(&zc, &za) == 0;
344 			    zap_cursor_advance(&zc)) {
345 				VERIFY(nvlist_add_boolean(perms_nvp,
346 				    za.za_name) == 0);
347 			}
348 			zap_cursor_fini(&zc);
349 			VERIFY(nvlist_add_nvlist(sp_nvp, baseza.za_name,
350 			    perms_nvp) == 0);
351 			nvlist_free(perms_nvp);
352 		}
353 
354 		zap_cursor_fini(&basezc);
355 
356 		dsl_dir_name(dd, source);
357 		VERIFY(nvlist_add_nvlist(*nvp, source, sp_nvp) == 0);
358 		nvlist_free(sp_nvp);
359 	}
360 	rw_exit(&dp->dp_config_rwlock);
361 
362 	dsl_dir_close(startdd, FTAG);
363 	return (0);
364 }
365 
366 /*
367  * Routines for dsl_deleg_access() -- access checking.
368  */
369 typedef struct perm_set {
370 	avl_node_t	p_node;
371 	boolean_t	p_matched;
372 	char		p_setname[ZFS_MAX_DELEG_NAME];
373 } perm_set_t;
374 
375 static int
376 perm_set_compare(const void *arg1, const void *arg2)
377 {
378 	const perm_set_t *node1 = arg1;
379 	const perm_set_t *node2 = arg2;
380 	int val;
381 
382 	val = strcmp(node1->p_setname, node2->p_setname);
383 	if (val == 0)
384 		return (0);
385 	return (val > 0 ? 1 : -1);
386 }
387 
388 /*
389  * Determine whether a specified permission exists.
390  *
391  * First the base attribute has to be retrieved.  i.e. ul$12
392  * Once the base object has been retrieved the actual permission
393  * is lookup up in the zap object the base object points to.
394  *
395  * Return 0 if permission exists, ENOENT if there is no whokey, EPERM if
396  * there is no perm in that jumpobj.
397  */
398 static int
399 dsl_check_access(objset_t *mos, uint64_t zapobj,
400     char type, char checkflag, void *valp, const char *perm)
401 {
402 	int error;
403 	uint64_t jumpobj, zero;
404 	char whokey[ZFS_MAX_DELEG_NAME];
405 
406 	zfs_deleg_whokey(whokey, type, checkflag, valp);
407 	error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
408 	if (error == 0) {
409 		error = zap_lookup(mos, jumpobj, perm, 8, 1, &zero);
410 		if (error == ENOENT)
411 			error = EPERM;
412 	}
413 	return (error);
414 }
415 
416 /*
417  * check a specified user/group for a requested permission
418  */
419 static int
420 dsl_check_user_access(objset_t *mos, uint64_t zapobj, const char *perm,
421     int checkflag, cred_t *cr)
422 {
423 	const	gid_t *gids;
424 	int	ngids;
425 	int	i;
426 	uint64_t id;
427 
428 	/* check for user */
429 	id = crgetuid(cr);
430 	if (dsl_check_access(mos, zapobj,
431 	    ZFS_DELEG_USER, checkflag, &id, perm) == 0)
432 		return (0);
433 
434 	/* check for users primary group */
435 	id = crgetgid(cr);
436 	if (dsl_check_access(mos, zapobj,
437 	    ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
438 		return (0);
439 
440 	/* check for everyone entry */
441 	id = -1;
442 	if (dsl_check_access(mos, zapobj,
443 	    ZFS_DELEG_EVERYONE, checkflag, &id, perm) == 0)
444 		return (0);
445 
446 	/* check each supplemental group user is a member of */
447 	ngids = crgetngroups(cr);
448 	gids = crgetgroups(cr);
449 	for (i = 0; i != ngids; i++) {
450 		id = gids[i];
451 		if (dsl_check_access(mos, zapobj,
452 		    ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
453 			return (0);
454 	}
455 
456 	return (EPERM);
457 }
458 
459 /*
460  * Iterate over the sets specified in the specified zapobj
461  * and load them into the permsets avl tree.
462  */
463 static int
464 dsl_load_sets(objset_t *mos, uint64_t zapobj,
465     char type, char checkflag, void *valp, avl_tree_t *avl)
466 {
467 	zap_cursor_t zc;
468 	zap_attribute_t za;
469 	perm_set_t *permnode;
470 	avl_index_t idx;
471 	uint64_t jumpobj;
472 	int error;
473 	char whokey[ZFS_MAX_DELEG_NAME];
474 
475 	zfs_deleg_whokey(whokey, type, checkflag, valp);
476 
477 	error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
478 	if (error != 0)
479 		return (error);
480 
481 	for (zap_cursor_init(&zc, mos, jumpobj);
482 	    zap_cursor_retrieve(&zc, &za) == 0;
483 	    zap_cursor_advance(&zc)) {
484 		permnode = kmem_alloc(sizeof (perm_set_t), KM_SLEEP);
485 		(void) strlcpy(permnode->p_setname, za.za_name,
486 		    sizeof (permnode->p_setname));
487 		permnode->p_matched = B_FALSE;
488 
489 		if (avl_find(avl, permnode, &idx) == NULL) {
490 			avl_insert(avl, permnode, idx);
491 		} else {
492 			kmem_free(permnode, sizeof (perm_set_t));
493 		}
494 	}
495 	zap_cursor_fini(&zc);
496 	return (0);
497 }
498 
499 /*
500  * Load all permissions user based on cred belongs to.
501  */
502 static void
503 dsl_load_user_sets(objset_t *mos, uint64_t zapobj, avl_tree_t *avl,
504     char checkflag, cred_t *cr)
505 {
506 	const	gid_t *gids;
507 	int	ngids, i;
508 	uint64_t id;
509 
510 	id = crgetuid(cr);
511 	(void) dsl_load_sets(mos, zapobj,
512 	    ZFS_DELEG_USER_SETS, checkflag, &id, avl);
513 
514 	id = crgetgid(cr);
515 	(void) dsl_load_sets(mos, zapobj,
516 	    ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
517 
518 	(void) dsl_load_sets(mos, zapobj,
519 	    ZFS_DELEG_EVERYONE_SETS, checkflag, NULL, avl);
520 
521 	ngids = crgetngroups(cr);
522 	gids = crgetgroups(cr);
523 	for (i = 0; i != ngids; i++) {
524 		id = gids[i];
525 		(void) dsl_load_sets(mos, zapobj,
526 		    ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
527 	}
528 }
529 
530 /*
531  * Check if user has requested permission.
532  */
533 int
534 dsl_deleg_access(const char *dsname, const char *perm, cred_t *cr)
535 {
536 	dsl_dataset_t *ds;
537 	dsl_dir_t *dd;
538 	dsl_pool_t *dp;
539 	void *cookie;
540 	int	error;
541 	char	checkflag;
542 	objset_t *mos;
543 	avl_tree_t permsets;
544 	perm_set_t *setnode;
545 
546 	error = dsl_dataset_hold(dsname, FTAG, &ds);
547 	if (error)
548 		return (error);
549 
550 	dp = ds->ds_dir->dd_pool;
551 	mos = dp->dp_meta_objset;
552 
553 	if (dsl_delegation_on(mos) == B_FALSE) {
554 		dsl_dataset_rele(ds, FTAG);
555 		return (ECANCELED);
556 	}
557 
558 	if (spa_version(dmu_objset_spa(dp->dp_meta_objset)) <
559 	    SPA_VERSION_DELEGATED_PERMS) {
560 		dsl_dataset_rele(ds, FTAG);
561 		return (EPERM);
562 	}
563 
564 	if (dsl_dataset_is_snapshot(ds)) {
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) != 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 	dsl_dataset_rele(ds, FTAG);
640 
641 	cookie = NULL;
642 	while ((setnode = avl_destroy_nodes(&permsets, &cookie)) != NULL)
643 		kmem_free(setnode, sizeof (perm_set_t));
644 
645 	return (error);
646 }
647 
648 /*
649  * Other routines.
650  */
651 
652 static void
653 copy_create_perms(dsl_dir_t *dd, uint64_t pzapobj,
654     boolean_t dosets, uint64_t uid, dmu_tx_t *tx)
655 {
656 	objset_t *mos = dd->dd_pool->dp_meta_objset;
657 	uint64_t jumpobj, pjumpobj;
658 	uint64_t zapobj = dd->dd_phys->dd_deleg_zapobj;
659 	zap_cursor_t zc;
660 	zap_attribute_t za;
661 	char whokey[ZFS_MAX_DELEG_NAME];
662 
663 	zfs_deleg_whokey(whokey,
664 	    dosets ? ZFS_DELEG_CREATE_SETS : ZFS_DELEG_CREATE,
665 	    ZFS_DELEG_LOCAL, NULL);
666 	if (zap_lookup(mos, pzapobj, whokey, 8, 1, &pjumpobj) != 0)
667 		return;
668 
669 	if (zapobj == 0) {
670 		dmu_buf_will_dirty(dd->dd_dbuf, tx);
671 		zapobj = dd->dd_phys->dd_deleg_zapobj = zap_create(mos,
672 		    DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
673 	}
674 
675 	zfs_deleg_whokey(whokey,
676 	    dosets ? ZFS_DELEG_USER_SETS : ZFS_DELEG_USER,
677 	    ZFS_DELEG_LOCAL, &uid);
678 	if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) == ENOENT) {
679 		jumpobj = zap_create(mos, DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
680 		VERIFY(zap_add(mos, zapobj, whokey, 8, 1, &jumpobj, tx) == 0);
681 	}
682 
683 	for (zap_cursor_init(&zc, mos, pjumpobj);
684 	    zap_cursor_retrieve(&zc, &za) == 0;
685 	    zap_cursor_advance(&zc)) {
686 		uint64_t zero = 0;
687 		ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
688 
689 		VERIFY(zap_update(mos, jumpobj, za.za_name,
690 		    8, 1, &zero, tx) == 0);
691 	}
692 	zap_cursor_fini(&zc);
693 }
694 
695 /*
696  * set all create time permission on new dataset.
697  */
698 void
699 dsl_deleg_set_create_perms(dsl_dir_t *sdd, dmu_tx_t *tx, cred_t *cr)
700 {
701 	dsl_dir_t *dd;
702 	uint64_t uid = crgetuid(cr);
703 
704 	if (spa_version(dmu_objset_spa(sdd->dd_pool->dp_meta_objset)) <
705 	    SPA_VERSION_DELEGATED_PERMS)
706 		return;
707 
708 	for (dd = sdd->dd_parent; dd != NULL; dd = dd->dd_parent) {
709 		uint64_t pzapobj = dd->dd_phys->dd_deleg_zapobj;
710 
711 		if (pzapobj == 0)
712 			continue;
713 
714 		copy_create_perms(sdd, pzapobj, B_FALSE, uid, tx);
715 		copy_create_perms(sdd, pzapobj, B_TRUE, uid, tx);
716 	}
717 }
718 
719 int
720 dsl_deleg_destroy(objset_t *mos, uint64_t zapobj, dmu_tx_t *tx)
721 {
722 	zap_cursor_t zc;
723 	zap_attribute_t za;
724 
725 	if (zapobj == 0)
726 		return (0);
727 
728 	for (zap_cursor_init(&zc, mos, zapobj);
729 	    zap_cursor_retrieve(&zc, &za) == 0;
730 	    zap_cursor_advance(&zc)) {
731 		ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
732 		VERIFY(0 == zap_destroy(mos, za.za_first_integer, tx));
733 	}
734 	zap_cursor_fini(&zc);
735 	VERIFY(0 == zap_destroy(mos, zapobj, tx));
736 	return (0);
737 }
738 
739 boolean_t
740 dsl_delegation_on(objset_t *os)
741 {
742 	return (os->os_spa->spa_delegation);
743 }
744