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 https://opensource.org/licenses/CDDL-1.0.
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, 2015 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 */
91int
92dsl_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 (SET_ERROR(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 */
124int
125dsl_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 (SET_ERROR(EPERM));
143
144		if (strcmp(idstr, &nvpair_name(whopair)[3]) != 0)
145			return (SET_ERROR(EPERM));
146	}
147	return (0);
148}
149
150typedef struct dsl_deleg_arg {
151	const char *dda_name;
152	nvlist_t *dda_nvlist;
153} dsl_deleg_arg_t;
154
155static void
156dsl_deleg_set_sync(void *arg, dmu_tx_t *tx)
157{
158	dsl_deleg_arg_t *dda = arg;
159	dsl_dir_t *dd;
160	dsl_pool_t *dp = dmu_tx_pool(tx);
161	objset_t *mos = dp->dp_meta_objset;
162	nvpair_t *whopair = NULL;
163	uint64_t zapobj;
164
165	VERIFY0(dsl_dir_hold(dp, dda->dda_name, FTAG, &dd, NULL));
166
167	zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj;
168	if (zapobj == 0) {
169		dmu_buf_will_dirty(dd->dd_dbuf, tx);
170		zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj = zap_create(mos,
171		    DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
172	}
173
174	while ((whopair = nvlist_next_nvpair(dda->dda_nvlist, whopair))) {
175		const char *whokey = nvpair_name(whopair);
176		nvlist_t *perms;
177		nvpair_t *permpair = NULL;
178		uint64_t jumpobj;
179
180		perms = fnvpair_value_nvlist(whopair);
181
182		if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0) {
183			jumpobj = zap_create_link(mos, DMU_OT_DSL_PERMS,
184			    zapobj, whokey, tx);
185		}
186
187		while ((permpair = nvlist_next_nvpair(perms, permpair))) {
188			const char *perm = nvpair_name(permpair);
189			uint64_t n = 0;
190
191			VERIFY(zap_update(mos, jumpobj,
192			    perm, 8, 1, &n, tx) == 0);
193			spa_history_log_internal_dd(dd, "permission update", tx,
194			    "%s %s", whokey, perm);
195		}
196	}
197	dsl_dir_rele(dd, FTAG);
198}
199
200static void
201dsl_deleg_unset_sync(void *arg, dmu_tx_t *tx)
202{
203	dsl_deleg_arg_t *dda = arg;
204	dsl_dir_t *dd;
205	dsl_pool_t *dp = dmu_tx_pool(tx);
206	objset_t *mos = dp->dp_meta_objset;
207	nvpair_t *whopair = NULL;
208	uint64_t zapobj;
209
210	VERIFY0(dsl_dir_hold(dp, dda->dda_name, FTAG, &dd, NULL));
211	zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj;
212	if (zapobj == 0) {
213		dsl_dir_rele(dd, FTAG);
214		return;
215	}
216
217	while ((whopair = nvlist_next_nvpair(dda->dda_nvlist, whopair))) {
218		const char *whokey = nvpair_name(whopair);
219		nvlist_t *perms;
220		nvpair_t *permpair = NULL;
221		uint64_t jumpobj;
222
223		if (nvpair_value_nvlist(whopair, &perms) != 0) {
224			if (zap_lookup(mos, zapobj, whokey, 8,
225			    1, &jumpobj) == 0) {
226				(void) zap_remove(mos, zapobj, whokey, tx);
227				VERIFY(0 == zap_destroy(mos, jumpobj, tx));
228			}
229			spa_history_log_internal_dd(dd, "permission who remove",
230			    tx, "%s", whokey);
231			continue;
232		}
233
234		if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) != 0)
235			continue;
236
237		while ((permpair = nvlist_next_nvpair(perms, permpair))) {
238			const char *perm = nvpair_name(permpair);
239			uint64_t n = 0;
240
241			(void) zap_remove(mos, jumpobj, perm, tx);
242			if (zap_count(mos, jumpobj, &n) == 0 && n == 0) {
243				(void) zap_remove(mos, zapobj,
244				    whokey, tx);
245				VERIFY(0 == zap_destroy(mos,
246				    jumpobj, tx));
247			}
248			spa_history_log_internal_dd(dd, "permission remove", tx,
249			    "%s %s", whokey, perm);
250		}
251	}
252	dsl_dir_rele(dd, FTAG);
253}
254
255static int
256dsl_deleg_check(void *arg, dmu_tx_t *tx)
257{
258	dsl_deleg_arg_t *dda = arg;
259	dsl_dir_t *dd;
260	int error;
261
262	if (spa_version(dmu_tx_pool(tx)->dp_spa) <
263	    SPA_VERSION_DELEGATED_PERMS) {
264		return (SET_ERROR(ENOTSUP));
265	}
266
267	error = dsl_dir_hold(dmu_tx_pool(tx), dda->dda_name, FTAG, &dd, NULL);
268	if (error == 0)
269		dsl_dir_rele(dd, FTAG);
270	return (error);
271}
272
273int
274dsl_deleg_set(const char *ddname, nvlist_t *nvp, boolean_t unset)
275{
276	dsl_deleg_arg_t dda;
277
278	/* nvp must already have been verified to be valid */
279
280	dda.dda_name = ddname;
281	dda.dda_nvlist = nvp;
282
283	return (dsl_sync_task(ddname, dsl_deleg_check,
284	    unset ? dsl_deleg_unset_sync : dsl_deleg_set_sync,
285	    &dda, fnvlist_num_pairs(nvp), ZFS_SPACE_CHECK_RESERVED));
286}
287
288/*
289 * Find all 'allow' permissions from a given point and then continue
290 * traversing up to the root.
291 *
292 * This function constructs an nvlist of nvlists.
293 * each setpoint is an nvlist composed of an nvlist of an nvlist
294 * of the individual * users/groups/everyone/create
295 * permissions.
296 *
297 * The nvlist will look like this.
298 *
299 * { source fsname -> { whokeys { permissions,...}, ...}}
300 *
301 * The fsname nvpairs will be arranged in a bottom up order.  For example,
302 * if we have the following structure a/b/c then the nvpairs for the fsnames
303 * will be ordered a/b/c, a/b, a.
304 */
305int
306dsl_deleg_get(const char *ddname, nvlist_t **nvp)
307{
308	dsl_dir_t *dd, *startdd;
309	dsl_pool_t *dp;
310	int error;
311	objset_t *mos;
312	zap_cursor_t *basezc, *zc;
313	zap_attribute_t *baseza, *za;
314	char *source;
315
316	error = dsl_pool_hold(ddname, FTAG, &dp);
317	if (error != 0)
318		return (error);
319
320	error = dsl_dir_hold(dp, ddname, FTAG, &startdd, NULL);
321	if (error != 0) {
322		dsl_pool_rele(dp, FTAG);
323		return (error);
324	}
325
326	dp = startdd->dd_pool;
327	mos = dp->dp_meta_objset;
328
329	zc = kmem_alloc(sizeof (zap_cursor_t), KM_SLEEP);
330	za = kmem_alloc(sizeof (zap_attribute_t), KM_SLEEP);
331	basezc = kmem_alloc(sizeof (zap_cursor_t), KM_SLEEP);
332	baseza = kmem_alloc(sizeof (zap_attribute_t), KM_SLEEP);
333	source = kmem_alloc(ZFS_MAX_DATASET_NAME_LEN, KM_SLEEP);
334	VERIFY(nvlist_alloc(nvp, NV_UNIQUE_NAME, KM_SLEEP) == 0);
335
336	for (dd = startdd; dd != NULL; dd = dd->dd_parent) {
337		nvlist_t *sp_nvp;
338		uint64_t n;
339
340		if (dsl_dir_phys(dd)->dd_deleg_zapobj == 0 ||
341		    zap_count(mos,
342		    dsl_dir_phys(dd)->dd_deleg_zapobj, &n) != 0 || n == 0)
343			continue;
344
345		sp_nvp = fnvlist_alloc();
346		for (zap_cursor_init(basezc, mos,
347		    dsl_dir_phys(dd)->dd_deleg_zapobj);
348		    zap_cursor_retrieve(basezc, baseza) == 0;
349		    zap_cursor_advance(basezc)) {
350			nvlist_t *perms_nvp;
351
352			ASSERT(baseza->za_integer_length == 8);
353			ASSERT(baseza->za_num_integers == 1);
354
355			perms_nvp = fnvlist_alloc();
356			for (zap_cursor_init(zc, mos, baseza->za_first_integer);
357			    zap_cursor_retrieve(zc, za) == 0;
358			    zap_cursor_advance(zc)) {
359				fnvlist_add_boolean(perms_nvp, za->za_name);
360			}
361			zap_cursor_fini(zc);
362			fnvlist_add_nvlist(sp_nvp, baseza->za_name, perms_nvp);
363			fnvlist_free(perms_nvp);
364		}
365
366		zap_cursor_fini(basezc);
367
368		dsl_dir_name(dd, source);
369		fnvlist_add_nvlist(*nvp, source, sp_nvp);
370		nvlist_free(sp_nvp);
371	}
372
373	kmem_free(source, ZFS_MAX_DATASET_NAME_LEN);
374	kmem_free(baseza, sizeof (zap_attribute_t));
375	kmem_free(basezc, sizeof (zap_cursor_t));
376	kmem_free(za, sizeof (zap_attribute_t));
377	kmem_free(zc, sizeof (zap_cursor_t));
378
379	dsl_dir_rele(startdd, FTAG);
380	dsl_pool_rele(dp, FTAG);
381	return (0);
382}
383
384/*
385 * Routines for dsl_deleg_access() -- access checking.
386 */
387typedef struct perm_set {
388	avl_node_t	p_node;
389	boolean_t	p_matched;
390	char		p_setname[ZFS_MAX_DELEG_NAME];
391} perm_set_t;
392
393static int
394perm_set_compare(const void *arg1, const void *arg2)
395{
396	const perm_set_t *node1 = (const perm_set_t *)arg1;
397	const perm_set_t *node2 = (const perm_set_t *)arg2;
398	int val;
399
400	val = strcmp(node1->p_setname, node2->p_setname);
401
402	return (TREE_ISIGN(val));
403}
404
405/*
406 * Determine whether a specified permission exists.
407 *
408 * First the base attribute has to be retrieved.  i.e. ul$12
409 * Once the base object has been retrieved the actual permission
410 * is lookup up in the zap object the base object points to.
411 *
412 * Return 0 if permission exists, ENOENT if there is no whokey, EPERM if
413 * there is no perm in that jumpobj.
414 */
415static int
416dsl_check_access(objset_t *mos, uint64_t zapobj,
417    char type, char checkflag, void *valp, const char *perm)
418{
419	int error;
420	uint64_t jumpobj, zero;
421	char whokey[ZFS_MAX_DELEG_NAME];
422
423	zfs_deleg_whokey(whokey, type, checkflag, valp);
424	error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
425	if (error == 0) {
426		error = zap_lookup(mos, jumpobj, perm, 8, 1, &zero);
427		if (error == ENOENT)
428			error = SET_ERROR(EPERM);
429	}
430	return (error);
431}
432
433/*
434 * check a specified user/group for a requested permission
435 */
436static int
437dsl_check_user_access(objset_t *mos, uint64_t zapobj, const char *perm,
438    int checkflag, cred_t *cr)
439{
440	const	gid_t *gids;
441	int	ngids;
442	int	i;
443	uint64_t id;
444
445	/* check for user */
446	id = crgetuid(cr);
447	if (dsl_check_access(mos, zapobj,
448	    ZFS_DELEG_USER, checkflag, &id, perm) == 0)
449		return (0);
450
451	/* check for users primary group */
452	id = crgetgid(cr);
453	if (dsl_check_access(mos, zapobj,
454	    ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
455		return (0);
456
457	/* check for everyone entry */
458	id = -1;
459	if (dsl_check_access(mos, zapobj,
460	    ZFS_DELEG_EVERYONE, checkflag, &id, perm) == 0)
461		return (0);
462
463	/* check each supplemental group user is a member of */
464	ngids = crgetngroups(cr);
465	gids = crgetgroups(cr);
466	for (i = 0; i != ngids; i++) {
467		id = gids[i];
468		if (dsl_check_access(mos, zapobj,
469		    ZFS_DELEG_GROUP, checkflag, &id, perm) == 0)
470			return (0);
471	}
472
473	return (SET_ERROR(EPERM));
474}
475
476/*
477 * Iterate over the sets specified in the specified zapobj
478 * and load them into the permsets avl tree.
479 */
480static int
481dsl_load_sets(objset_t *mos, uint64_t zapobj,
482    char type, char checkflag, void *valp, avl_tree_t *avl)
483{
484	zap_cursor_t zc;
485	zap_attribute_t za;
486	perm_set_t *permnode;
487	avl_index_t idx;
488	uint64_t jumpobj;
489	int error;
490	char whokey[ZFS_MAX_DELEG_NAME];
491
492	zfs_deleg_whokey(whokey, type, checkflag, valp);
493
494	error = zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj);
495	if (error != 0)
496		return (error);
497
498	for (zap_cursor_init(&zc, mos, jumpobj);
499	    zap_cursor_retrieve(&zc, &za) == 0;
500	    zap_cursor_advance(&zc)) {
501		permnode = kmem_alloc(sizeof (perm_set_t), KM_SLEEP);
502		(void) strlcpy(permnode->p_setname, za.za_name,
503		    sizeof (permnode->p_setname));
504		permnode->p_matched = B_FALSE;
505
506		if (avl_find(avl, permnode, &idx) == NULL) {
507			avl_insert(avl, permnode, idx);
508		} else {
509			kmem_free(permnode, sizeof (perm_set_t));
510		}
511	}
512	zap_cursor_fini(&zc);
513	return (0);
514}
515
516/*
517 * Load all permissions user based on cred belongs to.
518 */
519static void
520dsl_load_user_sets(objset_t *mos, uint64_t zapobj, avl_tree_t *avl,
521    char checkflag, cred_t *cr)
522{
523	const	gid_t *gids;
524	int	ngids, i;
525	uint64_t id;
526
527	id = crgetuid(cr);
528	(void) dsl_load_sets(mos, zapobj,
529	    ZFS_DELEG_USER_SETS, checkflag, &id, avl);
530
531	id = crgetgid(cr);
532	(void) dsl_load_sets(mos, zapobj,
533	    ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
534
535	(void) dsl_load_sets(mos, zapobj,
536	    ZFS_DELEG_EVERYONE_SETS, checkflag, NULL, avl);
537
538	ngids = crgetngroups(cr);
539	gids = crgetgroups(cr);
540	for (i = 0; i != ngids; i++) {
541		id = gids[i];
542		(void) dsl_load_sets(mos, zapobj,
543		    ZFS_DELEG_GROUP_SETS, checkflag, &id, avl);
544	}
545}
546
547/*
548 * Check if user has requested permission.
549 */
550int
551dsl_deleg_access_impl(dsl_dataset_t *ds, const char *perm, cred_t *cr)
552{
553	dsl_dir_t *dd;
554	dsl_pool_t *dp;
555	void *cookie;
556	int	error;
557	char	checkflag;
558	objset_t *mos;
559	avl_tree_t permsets;
560	perm_set_t *setnode;
561
562	dp = ds->ds_dir->dd_pool;
563	mos = dp->dp_meta_objset;
564
565	if (dsl_delegation_on(mos) == B_FALSE)
566		return (SET_ERROR(ECANCELED));
567
568	if (spa_version(dmu_objset_spa(dp->dp_meta_objset)) <
569	    SPA_VERSION_DELEGATED_PERMS)
570		return (SET_ERROR(EPERM));
571
572	if (ds->ds_is_snapshot) {
573		/*
574		 * Snapshots are treated as descendents only,
575		 * local permissions do not apply.
576		 */
577		checkflag = ZFS_DELEG_DESCENDENT;
578	} else {
579		checkflag = ZFS_DELEG_LOCAL;
580	}
581
582	avl_create(&permsets, perm_set_compare, sizeof (perm_set_t),
583	    offsetof(perm_set_t, p_node));
584
585	ASSERT(dsl_pool_config_held(dp));
586	for (dd = ds->ds_dir; dd != NULL; dd = dd->dd_parent,
587	    checkflag = ZFS_DELEG_DESCENDENT) {
588		uint64_t zapobj;
589		boolean_t expanded;
590
591		/*
592		 * If not in global zone then make sure
593		 * the zoned property is set
594		 */
595		if (!INGLOBALZONE(curproc)) {
596			uint64_t zoned;
597
598			if (dsl_prop_get_dd(dd,
599			    zfs_prop_to_name(ZFS_PROP_ZONED),
600			    8, 1, &zoned, NULL, B_FALSE) != 0)
601				break;
602			if (!zoned)
603				break;
604		}
605		zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj;
606
607		if (zapobj == 0)
608			continue;
609
610		dsl_load_user_sets(mos, zapobj, &permsets, checkflag, cr);
611again:
612		expanded = B_FALSE;
613		for (setnode = avl_first(&permsets); setnode;
614		    setnode = AVL_NEXT(&permsets, setnode)) {
615			if (setnode->p_matched == B_TRUE)
616				continue;
617
618			/* See if this set directly grants this permission */
619			error = dsl_check_access(mos, zapobj,
620			    ZFS_DELEG_NAMED_SET, 0, setnode->p_setname, perm);
621			if (error == 0)
622				goto success;
623			if (error == EPERM)
624				setnode->p_matched = B_TRUE;
625
626			/* See if this set includes other sets */
627			error = dsl_load_sets(mos, zapobj,
628			    ZFS_DELEG_NAMED_SET_SETS, 0,
629			    setnode->p_setname, &permsets);
630			if (error == 0)
631				setnode->p_matched = expanded = B_TRUE;
632		}
633		/*
634		 * If we expanded any sets, that will define more sets,
635		 * which we need to check.
636		 */
637		if (expanded)
638			goto again;
639
640		error = dsl_check_user_access(mos, zapobj, perm, checkflag, cr);
641		if (error == 0)
642			goto success;
643	}
644	error = SET_ERROR(EPERM);
645success:
646
647	cookie = NULL;
648	while ((setnode = avl_destroy_nodes(&permsets, &cookie)) != NULL)
649		kmem_free(setnode, sizeof (perm_set_t));
650
651	return (error);
652}
653
654int
655dsl_deleg_access(const char *dsname, const char *perm, cred_t *cr)
656{
657	dsl_pool_t *dp;
658	dsl_dataset_t *ds;
659	int error;
660
661	error = dsl_pool_hold(dsname, FTAG, &dp);
662	if (error != 0)
663		return (error);
664	error = dsl_dataset_hold(dp, dsname, FTAG, &ds);
665	if (error == 0) {
666		error = dsl_deleg_access_impl(ds, perm, cr);
667		dsl_dataset_rele(ds, FTAG);
668	}
669	dsl_pool_rele(dp, FTAG);
670
671	return (error);
672}
673
674/*
675 * Other routines.
676 */
677
678static void
679copy_create_perms(dsl_dir_t *dd, uint64_t pzapobj,
680    boolean_t dosets, uint64_t uid, dmu_tx_t *tx)
681{
682	objset_t *mos = dd->dd_pool->dp_meta_objset;
683	uint64_t jumpobj, pjumpobj;
684	uint64_t zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj;
685	zap_cursor_t zc;
686	zap_attribute_t za;
687	char whokey[ZFS_MAX_DELEG_NAME];
688
689	zfs_deleg_whokey(whokey,
690	    dosets ? ZFS_DELEG_CREATE_SETS : ZFS_DELEG_CREATE,
691	    ZFS_DELEG_LOCAL, NULL);
692	if (zap_lookup(mos, pzapobj, whokey, 8, 1, &pjumpobj) != 0)
693		return;
694
695	if (zapobj == 0) {
696		dmu_buf_will_dirty(dd->dd_dbuf, tx);
697		zapobj = dsl_dir_phys(dd)->dd_deleg_zapobj = zap_create(mos,
698		    DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
699	}
700
701	zfs_deleg_whokey(whokey,
702	    dosets ? ZFS_DELEG_USER_SETS : ZFS_DELEG_USER,
703	    ZFS_DELEG_LOCAL, &uid);
704	if (zap_lookup(mos, zapobj, whokey, 8, 1, &jumpobj) == ENOENT) {
705		jumpobj = zap_create(mos, DMU_OT_DSL_PERMS, DMU_OT_NONE, 0, tx);
706		VERIFY(zap_add(mos, zapobj, whokey, 8, 1, &jumpobj, tx) == 0);
707	}
708
709	for (zap_cursor_init(&zc, mos, pjumpobj);
710	    zap_cursor_retrieve(&zc, &za) == 0;
711	    zap_cursor_advance(&zc)) {
712		uint64_t zero = 0;
713		ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
714
715		VERIFY(zap_update(mos, jumpobj, za.za_name,
716		    8, 1, &zero, tx) == 0);
717	}
718	zap_cursor_fini(&zc);
719}
720
721/*
722 * set all create time permission on new dataset.
723 */
724void
725dsl_deleg_set_create_perms(dsl_dir_t *sdd, dmu_tx_t *tx, cred_t *cr)
726{
727	dsl_dir_t *dd;
728	uint64_t uid = crgetuid(cr);
729
730	if (spa_version(dmu_objset_spa(sdd->dd_pool->dp_meta_objset)) <
731	    SPA_VERSION_DELEGATED_PERMS)
732		return;
733
734	for (dd = sdd->dd_parent; dd != NULL; dd = dd->dd_parent) {
735		uint64_t pzapobj = dsl_dir_phys(dd)->dd_deleg_zapobj;
736
737		if (pzapobj == 0)
738			continue;
739
740		copy_create_perms(sdd, pzapobj, B_FALSE, uid, tx);
741		copy_create_perms(sdd, pzapobj, B_TRUE, uid, tx);
742	}
743}
744
745int
746dsl_deleg_destroy(objset_t *mos, uint64_t zapobj, dmu_tx_t *tx)
747{
748	zap_cursor_t zc;
749	zap_attribute_t za;
750
751	if (zapobj == 0)
752		return (0);
753
754	for (zap_cursor_init(&zc, mos, zapobj);
755	    zap_cursor_retrieve(&zc, &za) == 0;
756	    zap_cursor_advance(&zc)) {
757		ASSERT(za.za_integer_length == 8 && za.za_num_integers == 1);
758		VERIFY(0 == zap_destroy(mos, za.za_first_integer, tx));
759	}
760	zap_cursor_fini(&zc);
761	VERIFY(0 == zap_destroy(mos, zapobj, tx));
762	return (0);
763}
764
765boolean_t
766dsl_delegation_on(objset_t *os)
767{
768	return (!!spa_delegation(os->os_spa));
769}
770
771#if defined(_KERNEL)
772EXPORT_SYMBOL(dsl_deleg_get);
773EXPORT_SYMBOL(dsl_deleg_set);
774#endif
775