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 /*
23  * Copyright (c) 2005, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Portions Copyright 2011 Martin Matuska
25  * Copyright 2015, OmniTI Computer Consulting, Inc. All rights reserved.
26  * Copyright (c) 2012 Pawel Jakub Dawidek
27  * Copyright (c) 2014, 2016 Joyent, Inc. All rights reserved.
28  * Copyright 2016 Nexenta Systems, Inc.  All rights reserved.
29  * Copyright (c) 2014, Joyent, Inc. All rights reserved.
30  * Copyright (c) 2011, 2024 by Delphix. All rights reserved.
31  * Copyright (c) 2013 by Saso Kiselkov. All rights reserved.
32  * Copyright (c) 2013 Steven Hartland. All rights reserved.
33  * Copyright (c) 2014 Integros [integros.com]
34  * Copyright 2016 Toomas Soome <[email protected]>
35  * Copyright (c) 2016 Actifio, Inc. All rights reserved.
36  * Copyright (c) 2018, loli10K <[email protected]>. All rights reserved.
37  * Copyright 2017 RackTop Systems.
38  * Copyright (c) 2017 Open-E, Inc. All Rights Reserved.
39  * Copyright (c) 2019 Datto Inc.
40  * Copyright (c) 2019, 2020 by Christian Schwarz. All rights reserved.
41  * Copyright (c) 2019, 2021, Klara Inc.
42  * Copyright (c) 2019, Allan Jude
43  */
44 
45 /*
46  * ZFS ioctls.
47  *
48  * This file handles the ioctls to /dev/zfs, used for configuring ZFS storage
49  * pools and filesystems, e.g. with /sbin/zfs and /sbin/zpool.
50  *
51  * There are two ways that we handle ioctls: the legacy way where almost
52  * all of the logic is in the ioctl callback, and the new way where most
53  * of the marshalling is handled in the common entry point, zfsdev_ioctl().
54  *
55  * Non-legacy ioctls should be registered by calling
56  * zfs_ioctl_register() from zfs_ioctl_init().  The ioctl is invoked
57  * from userland by lzc_ioctl().
58  *
59  * The registration arguments are as follows:
60  *
61  * const char *name
62  *   The name of the ioctl.  This is used for history logging.  If the
63  *   ioctl returns successfully (the callback returns 0), and allow_log
64  *   is true, then a history log entry will be recorded with the input &
65  *   output nvlists.  The log entry can be printed with "zpool history -i".
66  *
67  * zfs_ioc_t ioc
68  *   The ioctl request number, which userland will pass to ioctl(2).
69  *   We want newer versions of libzfs and libzfs_core to run against
70  *   existing zfs kernel modules (i.e. a deferred reboot after an update).
71  *   Therefore the ioctl numbers cannot change from release to release.
72  *
73  * zfs_secpolicy_func_t *secpolicy
74  *   This function will be called before the zfs_ioc_func_t, to
75  *   determine if this operation is permitted.  It should return EPERM
76  *   on failure, and 0 on success.  Checks include determining if the
77  *   dataset is visible in this zone, and if the user has either all
78  *   zfs privileges in the zone (SYS_MOUNT), or has been granted permission
79  *   to do this operation on this dataset with "zfs allow".
80  *
81  * zfs_ioc_namecheck_t namecheck
82  *   This specifies what to expect in the zfs_cmd_t:zc_name -- a pool
83  *   name, a dataset name, or nothing.  If the name is not well-formed,
84  *   the ioctl will fail and the callback will not be called.
85  *   Therefore, the callback can assume that the name is well-formed
86  *   (e.g. is null-terminated, doesn't have more than one '@' character,
87  *   doesn't have invalid characters).
88  *
89  * zfs_ioc_poolcheck_t pool_check
90  *   This specifies requirements on the pool state.  If the pool does
91  *   not meet them (is suspended or is readonly), the ioctl will fail
92  *   and the callback will not be called.  If any checks are specified
93  *   (i.e. it is not POOL_CHECK_NONE), namecheck must not be NO_NAME.
94  *   Multiple checks can be or-ed together (e.g. POOL_CHECK_SUSPENDED |
95  *   POOL_CHECK_READONLY).
96  *
97  * zfs_ioc_key_t *nvl_keys
98  *  The list of expected/allowable innvl input keys. This list is used
99  *  to validate the nvlist input to the ioctl.
100  *
101  * boolean_t smush_outnvlist
102  *   If smush_outnvlist is true, then the output is presumed to be a
103  *   list of errors, and it will be "smushed" down to fit into the
104  *   caller's buffer, by removing some entries and replacing them with a
105  *   single "N_MORE_ERRORS" entry indicating how many were removed.  See
106  *   nvlist_smush() for details.  If smush_outnvlist is false, and the
107  *   outnvlist does not fit into the userland-provided buffer, then the
108  *   ioctl will fail with ENOMEM.
109  *
110  * zfs_ioc_func_t *func
111  *   The callback function that will perform the operation.
112  *
113  *   The callback should return 0 on success, or an error number on
114  *   failure.  If the function fails, the userland ioctl will return -1,
115  *   and errno will be set to the callback's return value.  The callback
116  *   will be called with the following arguments:
117  *
118  *   const char *name
119  *     The name of the pool or dataset to operate on, from
120  *     zfs_cmd_t:zc_name.  The 'namecheck' argument specifies the
121  *     expected type (pool, dataset, or none).
122  *
123  *   nvlist_t *innvl
124  *     The input nvlist, deserialized from zfs_cmd_t:zc_nvlist_src.  Or
125  *     NULL if no input nvlist was provided.  Changes to this nvlist are
126  *     ignored.  If the input nvlist could not be deserialized, the
127  *     ioctl will fail and the callback will not be called.
128  *
129  *   nvlist_t *outnvl
130  *     The output nvlist, initially empty.  The callback can fill it in,
131  *     and it will be returned to userland by serializing it into
132  *     zfs_cmd_t:zc_nvlist_dst.  If it is non-empty, and serialization
133  *     fails (e.g. because the caller didn't supply a large enough
134  *     buffer), then the overall ioctl will fail.  See the
135  *     'smush_nvlist' argument above for additional behaviors.
136  *
137  *     There are two typical uses of the output nvlist:
138  *       - To return state, e.g. property values.  In this case,
139  *         smush_outnvlist should be false.  If the buffer was not large
140  *         enough, the caller will reallocate a larger buffer and try
141  *         the ioctl again.
142  *
143  *       - To return multiple errors from an ioctl which makes on-disk
144  *         changes.  In this case, smush_outnvlist should be true.
145  *         Ioctls which make on-disk modifications should generally not
146  *         use the outnvl if they succeed, because the caller can not
147  *         distinguish between the operation failing, and
148  *         deserialization failing.
149  *
150  * IOCTL Interface Errors
151  *
152  * The following ioctl input errors can be returned:
153  *   ZFS_ERR_IOC_CMD_UNAVAIL	the ioctl number is not supported by kernel
154  *   ZFS_ERR_IOC_ARG_UNAVAIL	an input argument is not supported by kernel
155  *   ZFS_ERR_IOC_ARG_REQUIRED	a required input argument is missing
156  *   ZFS_ERR_IOC_ARG_BADTYPE	an input argument has an invalid type
157  */
158 
159 #include <sys/types.h>
160 #include <sys/param.h>
161 #include <sys/errno.h>
162 #include <sys/uio_impl.h>
163 #include <sys/file.h>
164 #include <sys/kmem.h>
165 #include <sys/cmn_err.h>
166 #include <sys/stat.h>
167 #include <sys/zfs_ioctl.h>
168 #include <sys/zfs_quota.h>
169 #include <sys/zfs_vfsops.h>
170 #include <sys/zfs_znode.h>
171 #include <sys/zap.h>
172 #include <sys/spa.h>
173 #include <sys/spa_impl.h>
174 #include <sys/vdev.h>
175 #include <sys/vdev_impl.h>
176 #include <sys/dmu.h>
177 #include <sys/dsl_dir.h>
178 #include <sys/dsl_dataset.h>
179 #include <sys/dsl_prop.h>
180 #include <sys/dsl_deleg.h>
181 #include <sys/dmu_objset.h>
182 #include <sys/dmu_impl.h>
183 #include <sys/dmu_redact.h>
184 #include <sys/dmu_tx.h>
185 #include <sys/sunddi.h>
186 #include <sys/policy.h>
187 #include <sys/zone.h>
188 #include <sys/nvpair.h>
189 #include <sys/pathname.h>
190 #include <sys/fs/zfs.h>
191 #include <sys/zfs_ctldir.h>
192 #include <sys/zfs_dir.h>
193 #include <sys/zfs_onexit.h>
194 #include <sys/zvol.h>
195 #include <sys/dsl_scan.h>
196 #include <sys/fm/util.h>
197 #include <sys/dsl_crypt.h>
198 #include <sys/rrwlock.h>
199 #include <sys/zfs_file.h>
200 
201 #include <sys/dmu_recv.h>
202 #include <sys/dmu_send.h>
203 #include <sys/dmu_recv.h>
204 #include <sys/dsl_destroy.h>
205 #include <sys/dsl_bookmark.h>
206 #include <sys/dsl_userhold.h>
207 #include <sys/zfeature.h>
208 #include <sys/zcp.h>
209 #include <sys/zio_checksum.h>
210 #include <sys/vdev_removal.h>
211 #include <sys/vdev_impl.h>
212 #include <sys/vdev_initialize.h>
213 #include <sys/vdev_trim.h>
214 
215 #include "zfs_namecheck.h"
216 #include "zfs_prop.h"
217 #include "zfs_deleg.h"
218 #include "zfs_comutil.h"
219 
220 #include <sys/lua/lua.h>
221 #include <sys/lua/lauxlib.h>
222 #include <sys/zfs_ioctl_impl.h>
223 
224 kmutex_t zfsdev_state_lock;
225 static zfsdev_state_t zfsdev_state_listhead;
226 
227 /*
228  * Limit maximum nvlist size.  We don't want users passing in insane values
229  * for zc->zc_nvlist_src_size, since we will need to allocate that much memory.
230  * Defaults to 0=auto which is handled by platform code.
231  */
232 uint64_t zfs_max_nvlist_src_size = 0;
233 
234 /*
235  * When logging the output nvlist of an ioctl in the on-disk history, limit
236  * the logged size to this many bytes.  This must be less than DMU_MAX_ACCESS.
237  * This applies primarily to zfs_ioc_channel_program().
238  */
239 static uint64_t zfs_history_output_max = 1024 * 1024;
240 
241 uint_t zfs_fsyncer_key;
242 uint_t zfs_allow_log_key;
243 
244 /* DATA_TYPE_ANY is used when zkey_type can vary. */
245 #define	DATA_TYPE_ANY	DATA_TYPE_UNKNOWN
246 
247 typedef struct zfs_ioc_vec {
248 	zfs_ioc_legacy_func_t	*zvec_legacy_func;
249 	zfs_ioc_func_t		*zvec_func;
250 	zfs_secpolicy_func_t	*zvec_secpolicy;
251 	zfs_ioc_namecheck_t	zvec_namecheck;
252 	boolean_t		zvec_allow_log;
253 	zfs_ioc_poolcheck_t	zvec_pool_check;
254 	boolean_t		zvec_smush_outnvlist;
255 	const char		*zvec_name;
256 	const zfs_ioc_key_t	*zvec_nvl_keys;
257 	size_t			zvec_nvl_key_count;
258 } zfs_ioc_vec_t;
259 
260 /* This array is indexed by zfs_userquota_prop_t */
261 static const char *userquota_perms[] = {
262 	ZFS_DELEG_PERM_USERUSED,
263 	ZFS_DELEG_PERM_USERQUOTA,
264 	ZFS_DELEG_PERM_GROUPUSED,
265 	ZFS_DELEG_PERM_GROUPQUOTA,
266 	ZFS_DELEG_PERM_USEROBJUSED,
267 	ZFS_DELEG_PERM_USEROBJQUOTA,
268 	ZFS_DELEG_PERM_GROUPOBJUSED,
269 	ZFS_DELEG_PERM_GROUPOBJQUOTA,
270 	ZFS_DELEG_PERM_PROJECTUSED,
271 	ZFS_DELEG_PERM_PROJECTQUOTA,
272 	ZFS_DELEG_PERM_PROJECTOBJUSED,
273 	ZFS_DELEG_PERM_PROJECTOBJQUOTA,
274 };
275 
276 static int zfs_ioc_userspace_upgrade(zfs_cmd_t *zc);
277 static int zfs_ioc_id_quota_upgrade(zfs_cmd_t *zc);
278 static int zfs_check_settable(const char *name, nvpair_t *property,
279     cred_t *cr);
280 static int zfs_check_clearable(const char *dataset, nvlist_t *props,
281     nvlist_t **errors);
282 static int zfs_fill_zplprops_root(uint64_t, nvlist_t *, nvlist_t *,
283     boolean_t *);
284 int zfs_set_prop_nvlist(const char *, zprop_source_t, nvlist_t *, nvlist_t *);
285 static int get_nvlist(uint64_t nvl, uint64_t size, int iflag, nvlist_t **nvp);
286 
287 static void
history_str_free(char * buf)288 history_str_free(char *buf)
289 {
290 	kmem_free(buf, HIS_MAX_RECORD_LEN);
291 }
292 
293 static char *
history_str_get(zfs_cmd_t * zc)294 history_str_get(zfs_cmd_t *zc)
295 {
296 	char *buf;
297 
298 	if (zc->zc_history == 0)
299 		return (NULL);
300 
301 	buf = kmem_alloc(HIS_MAX_RECORD_LEN, KM_SLEEP);
302 	if (copyinstr((void *)(uintptr_t)zc->zc_history,
303 	    buf, HIS_MAX_RECORD_LEN, NULL) != 0) {
304 		history_str_free(buf);
305 		return (NULL);
306 	}
307 
308 	buf[HIS_MAX_RECORD_LEN -1] = '\0';
309 
310 	return (buf);
311 }
312 
313 /*
314  * Return non-zero if the spa version is less than requested version.
315  */
316 static int
zfs_earlier_version(const char * name,int version)317 zfs_earlier_version(const char *name, int version)
318 {
319 	spa_t *spa;
320 
321 	if (spa_open(name, &spa, FTAG) == 0) {
322 		if (spa_version(spa) < version) {
323 			spa_close(spa, FTAG);
324 			return (1);
325 		}
326 		spa_close(spa, FTAG);
327 	}
328 	return (0);
329 }
330 
331 /*
332  * Return TRUE if the ZPL version is less than requested version.
333  */
334 static boolean_t
zpl_earlier_version(const char * name,int version)335 zpl_earlier_version(const char *name, int version)
336 {
337 	objset_t *os;
338 	boolean_t rc = B_TRUE;
339 
340 	if (dmu_objset_hold(name, FTAG, &os) == 0) {
341 		uint64_t zplversion;
342 
343 		if (dmu_objset_type(os) != DMU_OST_ZFS) {
344 			dmu_objset_rele(os, FTAG);
345 			return (B_TRUE);
346 		}
347 		/* XXX reading from non-owned objset */
348 		if (zfs_get_zplprop(os, ZFS_PROP_VERSION, &zplversion) == 0)
349 			rc = zplversion < version;
350 		dmu_objset_rele(os, FTAG);
351 	}
352 	return (rc);
353 }
354 
355 static void
zfs_log_history(zfs_cmd_t * zc)356 zfs_log_history(zfs_cmd_t *zc)
357 {
358 	spa_t *spa;
359 	char *buf;
360 
361 	if ((buf = history_str_get(zc)) == NULL)
362 		return;
363 
364 	if (spa_open(zc->zc_name, &spa, FTAG) == 0) {
365 		if (spa_version(spa) >= SPA_VERSION_ZPOOL_HISTORY)
366 			(void) spa_history_log(spa, buf);
367 		spa_close(spa, FTAG);
368 	}
369 	history_str_free(buf);
370 }
371 
372 /*
373  * Policy for top-level read operations (list pools).  Requires no privileges,
374  * and can be used in the local zone, as there is no associated dataset.
375  */
376 static int
zfs_secpolicy_none(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)377 zfs_secpolicy_none(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
378 {
379 	(void) zc, (void) innvl, (void) cr;
380 	return (0);
381 }
382 
383 /*
384  * Policy for dataset read operations (list children, get statistics).  Requires
385  * no privileges, but must be visible in the local zone.
386  */
387 static int
zfs_secpolicy_read(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)388 zfs_secpolicy_read(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
389 {
390 	(void) innvl, (void) cr;
391 	if (INGLOBALZONE(curproc) ||
392 	    zone_dataset_visible(zc->zc_name, NULL))
393 		return (0);
394 
395 	return (SET_ERROR(ENOENT));
396 }
397 
398 static int
zfs_dozonecheck_impl(const char * dataset,uint64_t zoned,cred_t * cr)399 zfs_dozonecheck_impl(const char *dataset, uint64_t zoned, cred_t *cr)
400 {
401 	int writable = 1;
402 
403 	/*
404 	 * The dataset must be visible by this zone -- check this first
405 	 * so they don't see EPERM on something they shouldn't know about.
406 	 */
407 	if (!INGLOBALZONE(curproc) &&
408 	    !zone_dataset_visible(dataset, &writable))
409 		return (SET_ERROR(ENOENT));
410 
411 	if (INGLOBALZONE(curproc)) {
412 		/*
413 		 * If the fs is zoned, only root can access it from the
414 		 * global zone.
415 		 */
416 		if (secpolicy_zfs(cr) && zoned)
417 			return (SET_ERROR(EPERM));
418 	} else {
419 		/*
420 		 * If we are in a local zone, the 'zoned' property must be set.
421 		 */
422 		if (!zoned)
423 			return (SET_ERROR(EPERM));
424 
425 		/* must be writable by this zone */
426 		if (!writable)
427 			return (SET_ERROR(EPERM));
428 	}
429 	return (0);
430 }
431 
432 static int
zfs_dozonecheck(const char * dataset,cred_t * cr)433 zfs_dozonecheck(const char *dataset, cred_t *cr)
434 {
435 	uint64_t zoned;
436 
437 	if (dsl_prop_get_integer(dataset, zfs_prop_to_name(ZFS_PROP_ZONED),
438 	    &zoned, NULL))
439 		return (SET_ERROR(ENOENT));
440 
441 	return (zfs_dozonecheck_impl(dataset, zoned, cr));
442 }
443 
444 static int
zfs_dozonecheck_ds(const char * dataset,dsl_dataset_t * ds,cred_t * cr)445 zfs_dozonecheck_ds(const char *dataset, dsl_dataset_t *ds, cred_t *cr)
446 {
447 	uint64_t zoned;
448 
449 	if (dsl_prop_get_int_ds(ds, zfs_prop_to_name(ZFS_PROP_ZONED), &zoned))
450 		return (SET_ERROR(ENOENT));
451 
452 	return (zfs_dozonecheck_impl(dataset, zoned, cr));
453 }
454 
455 static int
zfs_secpolicy_write_perms_ds(const char * name,dsl_dataset_t * ds,const char * perm,cred_t * cr)456 zfs_secpolicy_write_perms_ds(const char *name, dsl_dataset_t *ds,
457     const char *perm, cred_t *cr)
458 {
459 	int error;
460 
461 	error = zfs_dozonecheck_ds(name, ds, cr);
462 	if (error == 0) {
463 		error = secpolicy_zfs(cr);
464 		if (error != 0)
465 			error = dsl_deleg_access_impl(ds, perm, cr);
466 	}
467 	return (error);
468 }
469 
470 static int
zfs_secpolicy_write_perms(const char * name,const char * perm,cred_t * cr)471 zfs_secpolicy_write_perms(const char *name, const char *perm, cred_t *cr)
472 {
473 	int error;
474 	dsl_dataset_t *ds;
475 	dsl_pool_t *dp;
476 
477 	/*
478 	 * First do a quick check for root in the global zone, which
479 	 * is allowed to do all write_perms.  This ensures that zfs_ioc_*
480 	 * will get to handle nonexistent datasets.
481 	 */
482 	if (INGLOBALZONE(curproc) && secpolicy_zfs(cr) == 0)
483 		return (0);
484 
485 	error = dsl_pool_hold(name, FTAG, &dp);
486 	if (error != 0)
487 		return (error);
488 
489 	error = dsl_dataset_hold(dp, name, FTAG, &ds);
490 	if (error != 0) {
491 		dsl_pool_rele(dp, FTAG);
492 		return (error);
493 	}
494 
495 	error = zfs_secpolicy_write_perms_ds(name, ds, perm, cr);
496 
497 	dsl_dataset_rele(ds, FTAG);
498 	dsl_pool_rele(dp, FTAG);
499 	return (error);
500 }
501 
502 /*
503  * Policy for setting the security label property.
504  *
505  * Returns 0 for success, non-zero for access and other errors.
506  */
507 static int
zfs_set_slabel_policy(const char * name,const char * strval,cred_t * cr)508 zfs_set_slabel_policy(const char *name, const char *strval, cred_t *cr)
509 {
510 #ifdef HAVE_MLSLABEL
511 	char		ds_hexsl[MAXNAMELEN];
512 	bslabel_t	ds_sl, new_sl;
513 	boolean_t	new_default = FALSE;
514 	uint64_t	zoned;
515 	int		needed_priv = -1;
516 	int		error;
517 
518 	/* First get the existing dataset label. */
519 	error = dsl_prop_get(name, zfs_prop_to_name(ZFS_PROP_MLSLABEL),
520 	    1, sizeof (ds_hexsl), &ds_hexsl, NULL);
521 	if (error != 0)
522 		return (SET_ERROR(EPERM));
523 
524 	if (strcasecmp(strval, ZFS_MLSLABEL_DEFAULT) == 0)
525 		new_default = TRUE;
526 
527 	/* The label must be translatable */
528 	if (!new_default && (hexstr_to_label(strval, &new_sl) != 0))
529 		return (SET_ERROR(EINVAL));
530 
531 	/*
532 	 * In a non-global zone, disallow attempts to set a label that
533 	 * doesn't match that of the zone; otherwise no other checks
534 	 * are needed.
535 	 */
536 	if (!INGLOBALZONE(curproc)) {
537 		if (new_default || !blequal(&new_sl, CR_SL(CRED())))
538 			return (SET_ERROR(EPERM));
539 		return (0);
540 	}
541 
542 	/*
543 	 * For global-zone datasets (i.e., those whose zoned property is
544 	 * "off", verify that the specified new label is valid for the
545 	 * global zone.
546 	 */
547 	if (dsl_prop_get_integer(name,
548 	    zfs_prop_to_name(ZFS_PROP_ZONED), &zoned, NULL))
549 		return (SET_ERROR(EPERM));
550 	if (!zoned) {
551 		if (zfs_check_global_label(name, strval) != 0)
552 			return (SET_ERROR(EPERM));
553 	}
554 
555 	/*
556 	 * If the existing dataset label is nondefault, check if the
557 	 * dataset is mounted (label cannot be changed while mounted).
558 	 * Get the zfsvfs_t; if there isn't one, then the dataset isn't
559 	 * mounted (or isn't a dataset, doesn't exist, ...).
560 	 */
561 	if (strcasecmp(ds_hexsl, ZFS_MLSLABEL_DEFAULT) != 0) {
562 		objset_t *os;
563 		static const char *setsl_tag = "setsl_tag";
564 
565 		/*
566 		 * Try to own the dataset; abort if there is any error,
567 		 * (e.g., already mounted, in use, or other error).
568 		 */
569 		error = dmu_objset_own(name, DMU_OST_ZFS, B_TRUE, B_TRUE,
570 		    setsl_tag, &os);
571 		if (error != 0)
572 			return (SET_ERROR(EPERM));
573 
574 		dmu_objset_disown(os, B_TRUE, setsl_tag);
575 
576 		if (new_default) {
577 			needed_priv = PRIV_FILE_DOWNGRADE_SL;
578 			goto out_check;
579 		}
580 
581 		if (hexstr_to_label(strval, &new_sl) != 0)
582 			return (SET_ERROR(EPERM));
583 
584 		if (blstrictdom(&ds_sl, &new_sl))
585 			needed_priv = PRIV_FILE_DOWNGRADE_SL;
586 		else if (blstrictdom(&new_sl, &ds_sl))
587 			needed_priv = PRIV_FILE_UPGRADE_SL;
588 	} else {
589 		/* dataset currently has a default label */
590 		if (!new_default)
591 			needed_priv = PRIV_FILE_UPGRADE_SL;
592 	}
593 
594 out_check:
595 	if (needed_priv != -1)
596 		return (PRIV_POLICY(cr, needed_priv, B_FALSE, EPERM, NULL));
597 	return (0);
598 #else
599 	return (SET_ERROR(ENOTSUP));
600 #endif /* HAVE_MLSLABEL */
601 }
602 
603 static int
zfs_secpolicy_setprop(const char * dsname,zfs_prop_t prop,nvpair_t * propval,cred_t * cr)604 zfs_secpolicy_setprop(const char *dsname, zfs_prop_t prop, nvpair_t *propval,
605     cred_t *cr)
606 {
607 	const char *strval;
608 
609 	/*
610 	 * Check permissions for special properties.
611 	 */
612 	switch (prop) {
613 	default:
614 		break;
615 	case ZFS_PROP_ZONED:
616 		/*
617 		 * Disallow setting of 'zoned' from within a local zone.
618 		 */
619 		if (!INGLOBALZONE(curproc))
620 			return (SET_ERROR(EPERM));
621 		break;
622 
623 	case ZFS_PROP_QUOTA:
624 	case ZFS_PROP_FILESYSTEM_LIMIT:
625 	case ZFS_PROP_SNAPSHOT_LIMIT:
626 		if (!INGLOBALZONE(curproc)) {
627 			uint64_t zoned;
628 			char setpoint[ZFS_MAX_DATASET_NAME_LEN];
629 			/*
630 			 * Unprivileged users are allowed to modify the
631 			 * limit on things *under* (ie. contained by)
632 			 * the thing they own.
633 			 */
634 			if (dsl_prop_get_integer(dsname,
635 			    zfs_prop_to_name(ZFS_PROP_ZONED), &zoned, setpoint))
636 				return (SET_ERROR(EPERM));
637 			if (!zoned || strlen(dsname) <= strlen(setpoint))
638 				return (SET_ERROR(EPERM));
639 		}
640 		break;
641 
642 	case ZFS_PROP_MLSLABEL:
643 		if (!is_system_labeled())
644 			return (SET_ERROR(EPERM));
645 
646 		if (nvpair_value_string(propval, &strval) == 0) {
647 			int err;
648 
649 			err = zfs_set_slabel_policy(dsname, strval, CRED());
650 			if (err != 0)
651 				return (err);
652 		}
653 		break;
654 	}
655 
656 	return (zfs_secpolicy_write_perms(dsname, zfs_prop_to_name(prop), cr));
657 }
658 
659 static int
zfs_secpolicy_set_fsacl(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)660 zfs_secpolicy_set_fsacl(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
661 {
662 	/*
663 	 * permission to set permissions will be evaluated later in
664 	 * dsl_deleg_can_allow()
665 	 */
666 	(void) innvl;
667 	return (zfs_dozonecheck(zc->zc_name, cr));
668 }
669 
670 static int
zfs_secpolicy_rollback(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)671 zfs_secpolicy_rollback(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
672 {
673 	(void) innvl;
674 	return (zfs_secpolicy_write_perms(zc->zc_name,
675 	    ZFS_DELEG_PERM_ROLLBACK, cr));
676 }
677 
678 static int
zfs_secpolicy_send(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)679 zfs_secpolicy_send(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
680 {
681 	(void) innvl;
682 	dsl_pool_t *dp;
683 	dsl_dataset_t *ds;
684 	const char *cp;
685 	int error;
686 
687 	/*
688 	 * Generate the current snapshot name from the given objsetid, then
689 	 * use that name for the secpolicy/zone checks.
690 	 */
691 	cp = strchr(zc->zc_name, '@');
692 	if (cp == NULL)
693 		return (SET_ERROR(EINVAL));
694 	error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
695 	if (error != 0)
696 		return (error);
697 
698 	error = dsl_dataset_hold_obj(dp, zc->zc_sendobj, FTAG, &ds);
699 	if (error != 0) {
700 		dsl_pool_rele(dp, FTAG);
701 		return (error);
702 	}
703 
704 	dsl_dataset_name(ds, zc->zc_name);
705 
706 	error = zfs_secpolicy_write_perms_ds(zc->zc_name, ds,
707 	    ZFS_DELEG_PERM_SEND, cr);
708 	dsl_dataset_rele(ds, FTAG);
709 	dsl_pool_rele(dp, FTAG);
710 
711 	return (error);
712 }
713 
714 static int
zfs_secpolicy_send_new(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)715 zfs_secpolicy_send_new(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
716 {
717 	(void) innvl;
718 	return (zfs_secpolicy_write_perms(zc->zc_name,
719 	    ZFS_DELEG_PERM_SEND, cr));
720 }
721 
722 static int
zfs_secpolicy_share(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)723 zfs_secpolicy_share(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
724 {
725 	(void) zc, (void) innvl, (void) cr;
726 	return (SET_ERROR(ENOTSUP));
727 }
728 
729 static int
zfs_secpolicy_smb_acl(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)730 zfs_secpolicy_smb_acl(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
731 {
732 	(void) zc, (void) innvl, (void) cr;
733 	return (SET_ERROR(ENOTSUP));
734 }
735 
736 static int
zfs_get_parent(const char * datasetname,char * parent,int parentsize)737 zfs_get_parent(const char *datasetname, char *parent, int parentsize)
738 {
739 	char *cp;
740 
741 	/*
742 	 * Remove the @bla or /bla from the end of the name to get the parent.
743 	 */
744 	(void) strlcpy(parent, datasetname, parentsize);
745 	cp = strrchr(parent, '@');
746 	if (cp != NULL) {
747 		cp[0] = '\0';
748 	} else {
749 		cp = strrchr(parent, '/');
750 		if (cp == NULL)
751 			return (SET_ERROR(ENOENT));
752 		cp[0] = '\0';
753 	}
754 
755 	return (0);
756 }
757 
758 int
zfs_secpolicy_destroy_perms(const char * name,cred_t * cr)759 zfs_secpolicy_destroy_perms(const char *name, cred_t *cr)
760 {
761 	int error;
762 
763 	if ((error = zfs_secpolicy_write_perms(name,
764 	    ZFS_DELEG_PERM_MOUNT, cr)) != 0)
765 		return (error);
766 
767 	return (zfs_secpolicy_write_perms(name, ZFS_DELEG_PERM_DESTROY, cr));
768 }
769 
770 static int
zfs_secpolicy_destroy(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)771 zfs_secpolicy_destroy(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
772 {
773 	(void) innvl;
774 	return (zfs_secpolicy_destroy_perms(zc->zc_name, cr));
775 }
776 
777 /*
778  * Destroying snapshots with delegated permissions requires
779  * descendant mount and destroy permissions.
780  */
781 static int
zfs_secpolicy_destroy_snaps(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)782 zfs_secpolicy_destroy_snaps(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
783 {
784 	(void) zc;
785 	nvlist_t *snaps;
786 	nvpair_t *pair, *nextpair;
787 	int error = 0;
788 
789 	snaps = fnvlist_lookup_nvlist(innvl, "snaps");
790 
791 	for (pair = nvlist_next_nvpair(snaps, NULL); pair != NULL;
792 	    pair = nextpair) {
793 		nextpair = nvlist_next_nvpair(snaps, pair);
794 		error = zfs_secpolicy_destroy_perms(nvpair_name(pair), cr);
795 		if (error == ENOENT) {
796 			/*
797 			 * Ignore any snapshots that don't exist (we consider
798 			 * them "already destroyed").  Remove the name from the
799 			 * nvl here in case the snapshot is created between
800 			 * now and when we try to destroy it (in which case
801 			 * we don't want to destroy it since we haven't
802 			 * checked for permission).
803 			 */
804 			fnvlist_remove_nvpair(snaps, pair);
805 			error = 0;
806 		}
807 		if (error != 0)
808 			break;
809 	}
810 
811 	return (error);
812 }
813 
814 int
zfs_secpolicy_rename_perms(const char * from,const char * to,cred_t * cr)815 zfs_secpolicy_rename_perms(const char *from, const char *to, cred_t *cr)
816 {
817 	char	parentname[ZFS_MAX_DATASET_NAME_LEN];
818 	int	error;
819 
820 	if ((error = zfs_secpolicy_write_perms(from,
821 	    ZFS_DELEG_PERM_RENAME, cr)) != 0)
822 		return (error);
823 
824 	if ((error = zfs_secpolicy_write_perms(from,
825 	    ZFS_DELEG_PERM_MOUNT, cr)) != 0)
826 		return (error);
827 
828 	if ((error = zfs_get_parent(to, parentname,
829 	    sizeof (parentname))) != 0)
830 		return (error);
831 
832 	if ((error = zfs_secpolicy_write_perms(parentname,
833 	    ZFS_DELEG_PERM_CREATE, cr)) != 0)
834 		return (error);
835 
836 	if ((error = zfs_secpolicy_write_perms(parentname,
837 	    ZFS_DELEG_PERM_MOUNT, cr)) != 0)
838 		return (error);
839 
840 	return (error);
841 }
842 
843 static int
zfs_secpolicy_rename(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)844 zfs_secpolicy_rename(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
845 {
846 	(void) innvl;
847 	return (zfs_secpolicy_rename_perms(zc->zc_name, zc->zc_value, cr));
848 }
849 
850 static int
zfs_secpolicy_promote(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)851 zfs_secpolicy_promote(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
852 {
853 	(void) innvl;
854 	dsl_pool_t *dp;
855 	dsl_dataset_t *clone;
856 	int error;
857 
858 	error = zfs_secpolicy_write_perms(zc->zc_name,
859 	    ZFS_DELEG_PERM_PROMOTE, cr);
860 	if (error != 0)
861 		return (error);
862 
863 	error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
864 	if (error != 0)
865 		return (error);
866 
867 	error = dsl_dataset_hold(dp, zc->zc_name, FTAG, &clone);
868 
869 	if (error == 0) {
870 		char parentname[ZFS_MAX_DATASET_NAME_LEN];
871 		dsl_dataset_t *origin = NULL;
872 		dsl_dir_t *dd;
873 		dd = clone->ds_dir;
874 
875 		error = dsl_dataset_hold_obj(dd->dd_pool,
876 		    dsl_dir_phys(dd)->dd_origin_obj, FTAG, &origin);
877 		if (error != 0) {
878 			dsl_dataset_rele(clone, FTAG);
879 			dsl_pool_rele(dp, FTAG);
880 			return (error);
881 		}
882 
883 		error = zfs_secpolicy_write_perms_ds(zc->zc_name, clone,
884 		    ZFS_DELEG_PERM_MOUNT, cr);
885 
886 		dsl_dataset_name(origin, parentname);
887 		if (error == 0) {
888 			error = zfs_secpolicy_write_perms_ds(parentname, origin,
889 			    ZFS_DELEG_PERM_PROMOTE, cr);
890 		}
891 		dsl_dataset_rele(clone, FTAG);
892 		dsl_dataset_rele(origin, FTAG);
893 	}
894 	dsl_pool_rele(dp, FTAG);
895 	return (error);
896 }
897 
898 static int
zfs_secpolicy_recv(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)899 zfs_secpolicy_recv(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
900 {
901 	(void) innvl;
902 	int error;
903 
904 	if ((error = zfs_secpolicy_write_perms(zc->zc_name,
905 	    ZFS_DELEG_PERM_RECEIVE, cr)) != 0)
906 		return (error);
907 
908 	if ((error = zfs_secpolicy_write_perms(zc->zc_name,
909 	    ZFS_DELEG_PERM_MOUNT, cr)) != 0)
910 		return (error);
911 
912 	return (zfs_secpolicy_write_perms(zc->zc_name,
913 	    ZFS_DELEG_PERM_CREATE, cr));
914 }
915 
916 int
zfs_secpolicy_snapshot_perms(const char * name,cred_t * cr)917 zfs_secpolicy_snapshot_perms(const char *name, cred_t *cr)
918 {
919 	return (zfs_secpolicy_write_perms(name,
920 	    ZFS_DELEG_PERM_SNAPSHOT, cr));
921 }
922 
923 /*
924  * Check for permission to create each snapshot in the nvlist.
925  */
926 static int
zfs_secpolicy_snapshot(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)927 zfs_secpolicy_snapshot(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
928 {
929 	(void) zc;
930 	nvlist_t *snaps;
931 	int error = 0;
932 	nvpair_t *pair;
933 
934 	snaps = fnvlist_lookup_nvlist(innvl, "snaps");
935 
936 	for (pair = nvlist_next_nvpair(snaps, NULL); pair != NULL;
937 	    pair = nvlist_next_nvpair(snaps, pair)) {
938 		char *name = (char *)nvpair_name(pair);
939 		char *atp = strchr(name, '@');
940 
941 		if (atp == NULL) {
942 			error = SET_ERROR(EINVAL);
943 			break;
944 		}
945 		*atp = '\0';
946 		error = zfs_secpolicy_snapshot_perms(name, cr);
947 		*atp = '@';
948 		if (error != 0)
949 			break;
950 	}
951 	return (error);
952 }
953 
954 /*
955  * Check for permission to create each bookmark in the nvlist.
956  */
957 static int
zfs_secpolicy_bookmark(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)958 zfs_secpolicy_bookmark(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
959 {
960 	(void) zc;
961 	int error = 0;
962 
963 	for (nvpair_t *pair = nvlist_next_nvpair(innvl, NULL);
964 	    pair != NULL; pair = nvlist_next_nvpair(innvl, pair)) {
965 		char *name = (char *)nvpair_name(pair);
966 		char *hashp = strchr(name, '#');
967 
968 		if (hashp == NULL) {
969 			error = SET_ERROR(EINVAL);
970 			break;
971 		}
972 		*hashp = '\0';
973 		error = zfs_secpolicy_write_perms(name,
974 		    ZFS_DELEG_PERM_BOOKMARK, cr);
975 		*hashp = '#';
976 		if (error != 0)
977 			break;
978 	}
979 	return (error);
980 }
981 
982 static int
zfs_secpolicy_destroy_bookmarks(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)983 zfs_secpolicy_destroy_bookmarks(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
984 {
985 	(void) zc;
986 	nvpair_t *pair, *nextpair;
987 	int error = 0;
988 
989 	for (pair = nvlist_next_nvpair(innvl, NULL); pair != NULL;
990 	    pair = nextpair) {
991 		char *name = (char *)nvpair_name(pair);
992 		char *hashp = strchr(name, '#');
993 		nextpair = nvlist_next_nvpair(innvl, pair);
994 
995 		if (hashp == NULL) {
996 			error = SET_ERROR(EINVAL);
997 			break;
998 		}
999 
1000 		*hashp = '\0';
1001 		error = zfs_secpolicy_write_perms(name,
1002 		    ZFS_DELEG_PERM_DESTROY, cr);
1003 		*hashp = '#';
1004 		if (error == ENOENT) {
1005 			/*
1006 			 * Ignore any filesystems that don't exist (we consider
1007 			 * their bookmarks "already destroyed").  Remove
1008 			 * the name from the nvl here in case the filesystem
1009 			 * is created between now and when we try to destroy
1010 			 * the bookmark (in which case we don't want to
1011 			 * destroy it since we haven't checked for permission).
1012 			 */
1013 			fnvlist_remove_nvpair(innvl, pair);
1014 			error = 0;
1015 		}
1016 		if (error != 0)
1017 			break;
1018 	}
1019 
1020 	return (error);
1021 }
1022 
1023 static int
zfs_secpolicy_log_history(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1024 zfs_secpolicy_log_history(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1025 {
1026 	(void) zc, (void) innvl, (void) cr;
1027 	/*
1028 	 * Even root must have a proper TSD so that we know what pool
1029 	 * to log to.
1030 	 */
1031 	if (tsd_get(zfs_allow_log_key) == NULL)
1032 		return (SET_ERROR(EPERM));
1033 	return (0);
1034 }
1035 
1036 static int
zfs_secpolicy_create_clone(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1037 zfs_secpolicy_create_clone(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1038 {
1039 	char		parentname[ZFS_MAX_DATASET_NAME_LEN];
1040 	int		error;
1041 	const char	*origin;
1042 
1043 	if ((error = zfs_get_parent(zc->zc_name, parentname,
1044 	    sizeof (parentname))) != 0)
1045 		return (error);
1046 
1047 	if (nvlist_lookup_string(innvl, "origin", &origin) == 0 &&
1048 	    (error = zfs_secpolicy_write_perms(origin,
1049 	    ZFS_DELEG_PERM_CLONE, cr)) != 0)
1050 		return (error);
1051 
1052 	if ((error = zfs_secpolicy_write_perms(parentname,
1053 	    ZFS_DELEG_PERM_CREATE, cr)) != 0)
1054 		return (error);
1055 
1056 	return (zfs_secpolicy_write_perms(parentname,
1057 	    ZFS_DELEG_PERM_MOUNT, cr));
1058 }
1059 
1060 /*
1061  * Policy for pool operations - create/destroy pools, add vdevs, etc.  Requires
1062  * SYS_CONFIG privilege, which is not available in a local zone.
1063  */
1064 int
zfs_secpolicy_config(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1065 zfs_secpolicy_config(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1066 {
1067 	(void) zc, (void) innvl;
1068 
1069 	if (secpolicy_sys_config(cr, B_FALSE) != 0)
1070 		return (SET_ERROR(EPERM));
1071 
1072 	return (0);
1073 }
1074 
1075 /*
1076  * Policy for object to name lookups.
1077  */
1078 static int
zfs_secpolicy_diff(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1079 zfs_secpolicy_diff(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1080 {
1081 	(void) innvl;
1082 	int error;
1083 
1084 	if (secpolicy_sys_config(cr, B_FALSE) == 0)
1085 		return (0);
1086 
1087 	error = zfs_secpolicy_write_perms(zc->zc_name, ZFS_DELEG_PERM_DIFF, cr);
1088 	return (error);
1089 }
1090 
1091 /*
1092  * Policy for fault injection.  Requires all privileges.
1093  */
1094 static int
zfs_secpolicy_inject(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1095 zfs_secpolicy_inject(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1096 {
1097 	(void) zc, (void) innvl;
1098 	return (secpolicy_zinject(cr));
1099 }
1100 
1101 static int
zfs_secpolicy_inherit_prop(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1102 zfs_secpolicy_inherit_prop(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1103 {
1104 	(void) innvl;
1105 	zfs_prop_t prop = zfs_name_to_prop(zc->zc_value);
1106 
1107 	if (prop == ZPROP_USERPROP) {
1108 		if (!zfs_prop_user(zc->zc_value))
1109 			return (SET_ERROR(EINVAL));
1110 		return (zfs_secpolicy_write_perms(zc->zc_name,
1111 		    ZFS_DELEG_PERM_USERPROP, cr));
1112 	} else {
1113 		return (zfs_secpolicy_setprop(zc->zc_name, prop,
1114 		    NULL, cr));
1115 	}
1116 }
1117 
1118 static int
zfs_secpolicy_userspace_one(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1119 zfs_secpolicy_userspace_one(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1120 {
1121 	int err = zfs_secpolicy_read(zc, innvl, cr);
1122 	if (err)
1123 		return (err);
1124 
1125 	if (zc->zc_objset_type >= ZFS_NUM_USERQUOTA_PROPS)
1126 		return (SET_ERROR(EINVAL));
1127 
1128 	if (zc->zc_value[0] == 0) {
1129 		/*
1130 		 * They are asking about a posix uid/gid.  If it's
1131 		 * themself, allow it.
1132 		 */
1133 		if (zc->zc_objset_type == ZFS_PROP_USERUSED ||
1134 		    zc->zc_objset_type == ZFS_PROP_USERQUOTA ||
1135 		    zc->zc_objset_type == ZFS_PROP_USEROBJUSED ||
1136 		    zc->zc_objset_type == ZFS_PROP_USEROBJQUOTA) {
1137 			if (zc->zc_guid == crgetuid(cr))
1138 				return (0);
1139 		} else if (zc->zc_objset_type == ZFS_PROP_GROUPUSED ||
1140 		    zc->zc_objset_type == ZFS_PROP_GROUPQUOTA ||
1141 		    zc->zc_objset_type == ZFS_PROP_GROUPOBJUSED ||
1142 		    zc->zc_objset_type == ZFS_PROP_GROUPOBJQUOTA) {
1143 			if (groupmember(zc->zc_guid, cr))
1144 				return (0);
1145 		}
1146 		/* else is for project quota/used */
1147 	}
1148 
1149 	return (zfs_secpolicy_write_perms(zc->zc_name,
1150 	    userquota_perms[zc->zc_objset_type], cr));
1151 }
1152 
1153 static int
zfs_secpolicy_userspace_many(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1154 zfs_secpolicy_userspace_many(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1155 {
1156 	int err = zfs_secpolicy_read(zc, innvl, cr);
1157 	if (err)
1158 		return (err);
1159 
1160 	if (zc->zc_objset_type >= ZFS_NUM_USERQUOTA_PROPS)
1161 		return (SET_ERROR(EINVAL));
1162 
1163 	return (zfs_secpolicy_write_perms(zc->zc_name,
1164 	    userquota_perms[zc->zc_objset_type], cr));
1165 }
1166 
1167 static int
zfs_secpolicy_userspace_upgrade(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1168 zfs_secpolicy_userspace_upgrade(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1169 {
1170 	(void) innvl;
1171 	return (zfs_secpolicy_setprop(zc->zc_name, ZFS_PROP_VERSION,
1172 	    NULL, cr));
1173 }
1174 
1175 static int
zfs_secpolicy_hold(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1176 zfs_secpolicy_hold(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1177 {
1178 	(void) zc;
1179 	nvpair_t *pair;
1180 	nvlist_t *holds;
1181 	int error;
1182 
1183 	holds = fnvlist_lookup_nvlist(innvl, "holds");
1184 
1185 	for (pair = nvlist_next_nvpair(holds, NULL); pair != NULL;
1186 	    pair = nvlist_next_nvpair(holds, pair)) {
1187 		char fsname[ZFS_MAX_DATASET_NAME_LEN];
1188 		error = dmu_fsname(nvpair_name(pair), fsname);
1189 		if (error != 0)
1190 			return (error);
1191 		error = zfs_secpolicy_write_perms(fsname,
1192 		    ZFS_DELEG_PERM_HOLD, cr);
1193 		if (error != 0)
1194 			return (error);
1195 	}
1196 	return (0);
1197 }
1198 
1199 static int
zfs_secpolicy_release(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1200 zfs_secpolicy_release(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1201 {
1202 	(void) zc;
1203 	nvpair_t *pair;
1204 	int error;
1205 
1206 	for (pair = nvlist_next_nvpair(innvl, NULL); pair != NULL;
1207 	    pair = nvlist_next_nvpair(innvl, pair)) {
1208 		char fsname[ZFS_MAX_DATASET_NAME_LEN];
1209 		error = dmu_fsname(nvpair_name(pair), fsname);
1210 		if (error != 0)
1211 			return (error);
1212 		error = zfs_secpolicy_write_perms(fsname,
1213 		    ZFS_DELEG_PERM_RELEASE, cr);
1214 		if (error != 0)
1215 			return (error);
1216 	}
1217 	return (0);
1218 }
1219 
1220 /*
1221  * Policy for allowing temporary snapshots to be taken or released
1222  */
1223 static int
zfs_secpolicy_tmp_snapshot(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1224 zfs_secpolicy_tmp_snapshot(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1225 {
1226 	/*
1227 	 * A temporary snapshot is the same as a snapshot,
1228 	 * hold, destroy and release all rolled into one.
1229 	 * Delegated diff alone is sufficient that we allow this.
1230 	 */
1231 	int error;
1232 
1233 	if (zfs_secpolicy_write_perms(zc->zc_name,
1234 	    ZFS_DELEG_PERM_DIFF, cr) == 0)
1235 		return (0);
1236 
1237 	error = zfs_secpolicy_snapshot_perms(zc->zc_name, cr);
1238 
1239 	if (innvl != NULL) {
1240 		if (error == 0)
1241 			error = zfs_secpolicy_hold(zc, innvl, cr);
1242 		if (error == 0)
1243 			error = zfs_secpolicy_release(zc, innvl, cr);
1244 		if (error == 0)
1245 			error = zfs_secpolicy_destroy(zc, innvl, cr);
1246 	}
1247 	return (error);
1248 }
1249 
1250 static int
zfs_secpolicy_load_key(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1251 zfs_secpolicy_load_key(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1252 {
1253 	return (zfs_secpolicy_write_perms(zc->zc_name,
1254 	    ZFS_DELEG_PERM_LOAD_KEY, cr));
1255 }
1256 
1257 static int
zfs_secpolicy_change_key(zfs_cmd_t * zc,nvlist_t * innvl,cred_t * cr)1258 zfs_secpolicy_change_key(zfs_cmd_t *zc, nvlist_t *innvl, cred_t *cr)
1259 {
1260 	return (zfs_secpolicy_write_perms(zc->zc_name,
1261 	    ZFS_DELEG_PERM_CHANGE_KEY, cr));
1262 }
1263 
1264 /*
1265  * Returns the nvlist as specified by the user in the zfs_cmd_t.
1266  */
1267 static int
get_nvlist(uint64_t nvl,uint64_t size,int iflag,nvlist_t ** nvp)1268 get_nvlist(uint64_t nvl, uint64_t size, int iflag, nvlist_t **nvp)
1269 {
1270 	char *packed;
1271 	int error;
1272 	nvlist_t *list = NULL;
1273 
1274 	/*
1275 	 * Read in and unpack the user-supplied nvlist.
1276 	 */
1277 	if (size == 0)
1278 		return (SET_ERROR(EINVAL));
1279 
1280 	packed = vmem_alloc(size, KM_SLEEP);
1281 
1282 	if (ddi_copyin((void *)(uintptr_t)nvl, packed, size, iflag) != 0) {
1283 		vmem_free(packed, size);
1284 		return (SET_ERROR(EFAULT));
1285 	}
1286 
1287 	if ((error = nvlist_unpack(packed, size, &list, 0)) != 0) {
1288 		vmem_free(packed, size);
1289 		return (error);
1290 	}
1291 
1292 	vmem_free(packed, size);
1293 
1294 	*nvp = list;
1295 	return (0);
1296 }
1297 
1298 /*
1299  * Reduce the size of this nvlist until it can be serialized in 'max' bytes.
1300  * Entries will be removed from the end of the nvlist, and one int32 entry
1301  * named "N_MORE_ERRORS" will be added indicating how many entries were
1302  * removed.
1303  */
1304 static int
nvlist_smush(nvlist_t * errors,size_t max)1305 nvlist_smush(nvlist_t *errors, size_t max)
1306 {
1307 	size_t size;
1308 
1309 	size = fnvlist_size(errors);
1310 
1311 	if (size > max) {
1312 		nvpair_t *more_errors;
1313 		int n = 0;
1314 
1315 		if (max < 1024)
1316 			return (SET_ERROR(ENOMEM));
1317 
1318 		fnvlist_add_int32(errors, ZPROP_N_MORE_ERRORS, 0);
1319 		more_errors = nvlist_prev_nvpair(errors, NULL);
1320 
1321 		do {
1322 			nvpair_t *pair = nvlist_prev_nvpair(errors,
1323 			    more_errors);
1324 			fnvlist_remove_nvpair(errors, pair);
1325 			n++;
1326 			size = fnvlist_size(errors);
1327 		} while (size > max);
1328 
1329 		fnvlist_remove_nvpair(errors, more_errors);
1330 		fnvlist_add_int32(errors, ZPROP_N_MORE_ERRORS, n);
1331 		ASSERT3U(fnvlist_size(errors), <=, max);
1332 	}
1333 
1334 	return (0);
1335 }
1336 
1337 static int
put_nvlist(zfs_cmd_t * zc,nvlist_t * nvl)1338 put_nvlist(zfs_cmd_t *zc, nvlist_t *nvl)
1339 {
1340 	char *packed = NULL;
1341 	int error = 0;
1342 	size_t size;
1343 
1344 	size = fnvlist_size(nvl);
1345 
1346 	if (size > zc->zc_nvlist_dst_size) {
1347 		error = SET_ERROR(ENOMEM);
1348 	} else {
1349 		packed = fnvlist_pack(nvl, &size);
1350 		if (ddi_copyout(packed, (void *)(uintptr_t)zc->zc_nvlist_dst,
1351 		    size, zc->zc_iflags) != 0)
1352 			error = SET_ERROR(EFAULT);
1353 		fnvlist_pack_free(packed, size);
1354 	}
1355 
1356 	zc->zc_nvlist_dst_size = size;
1357 	zc->zc_nvlist_dst_filled = B_TRUE;
1358 	return (error);
1359 }
1360 
1361 int
getzfsvfs_impl(objset_t * os,zfsvfs_t ** zfvp)1362 getzfsvfs_impl(objset_t *os, zfsvfs_t **zfvp)
1363 {
1364 	int error = 0;
1365 	if (dmu_objset_type(os) != DMU_OST_ZFS) {
1366 		return (SET_ERROR(EINVAL));
1367 	}
1368 
1369 	mutex_enter(&os->os_user_ptr_lock);
1370 	*zfvp = dmu_objset_get_user(os);
1371 	/* bump s_active only when non-zero to prevent umount race */
1372 	error = zfs_vfs_ref(zfvp);
1373 	mutex_exit(&os->os_user_ptr_lock);
1374 	return (error);
1375 }
1376 
1377 int
getzfsvfs(const char * dsname,zfsvfs_t ** zfvp)1378 getzfsvfs(const char *dsname, zfsvfs_t **zfvp)
1379 {
1380 	objset_t *os;
1381 	int error;
1382 
1383 	error = dmu_objset_hold(dsname, FTAG, &os);
1384 	if (error != 0)
1385 		return (error);
1386 
1387 	error = getzfsvfs_impl(os, zfvp);
1388 	dmu_objset_rele(os, FTAG);
1389 	return (error);
1390 }
1391 
1392 /*
1393  * Find a zfsvfs_t for a mounted filesystem, or create our own, in which
1394  * case its z_sb will be NULL, and it will be opened as the owner.
1395  * If 'writer' is set, the z_teardown_lock will be held for RW_WRITER,
1396  * which prevents all inode ops from running.
1397  */
1398 static int
zfsvfs_hold(const char * name,const void * tag,zfsvfs_t ** zfvp,boolean_t writer)1399 zfsvfs_hold(const char *name, const void *tag, zfsvfs_t **zfvp,
1400     boolean_t writer)
1401 {
1402 	int error = 0;
1403 
1404 	if (getzfsvfs(name, zfvp) != 0)
1405 		error = zfsvfs_create(name, B_FALSE, zfvp);
1406 	if (error == 0) {
1407 		if (writer)
1408 			ZFS_TEARDOWN_ENTER_WRITE(*zfvp, tag);
1409 		else
1410 			ZFS_TEARDOWN_ENTER_READ(*zfvp, tag);
1411 		if ((*zfvp)->z_unmounted) {
1412 			/*
1413 			 * XXX we could probably try again, since the unmounting
1414 			 * thread should be just about to disassociate the
1415 			 * objset from the zfsvfs.
1416 			 */
1417 			ZFS_TEARDOWN_EXIT(*zfvp, tag);
1418 			return (SET_ERROR(EBUSY));
1419 		}
1420 	}
1421 	return (error);
1422 }
1423 
1424 static void
zfsvfs_rele(zfsvfs_t * zfsvfs,const void * tag)1425 zfsvfs_rele(zfsvfs_t *zfsvfs, const void *tag)
1426 {
1427 	ZFS_TEARDOWN_EXIT(zfsvfs, tag);
1428 
1429 	if (zfs_vfs_held(zfsvfs)) {
1430 		zfs_vfs_rele(zfsvfs);
1431 	} else {
1432 		dmu_objset_disown(zfsvfs->z_os, B_TRUE, zfsvfs);
1433 		zfsvfs_free(zfsvfs);
1434 	}
1435 }
1436 
1437 static int
zfs_ioc_pool_create(zfs_cmd_t * zc)1438 zfs_ioc_pool_create(zfs_cmd_t *zc)
1439 {
1440 	int error;
1441 	nvlist_t *config, *props = NULL;
1442 	nvlist_t *rootprops = NULL;
1443 	nvlist_t *zplprops = NULL;
1444 	dsl_crypto_params_t *dcp = NULL;
1445 	const char *spa_name = zc->zc_name;
1446 	boolean_t unload_wkey = B_TRUE;
1447 
1448 	if ((error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
1449 	    zc->zc_iflags, &config)))
1450 		return (error);
1451 
1452 	if (zc->zc_nvlist_src_size != 0 && (error =
1453 	    get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
1454 	    zc->zc_iflags, &props))) {
1455 		nvlist_free(config);
1456 		return (error);
1457 	}
1458 
1459 	if (props) {
1460 		nvlist_t *nvl = NULL;
1461 		nvlist_t *hidden_args = NULL;
1462 		uint64_t version = SPA_VERSION;
1463 		const char *tname;
1464 
1465 		(void) nvlist_lookup_uint64(props,
1466 		    zpool_prop_to_name(ZPOOL_PROP_VERSION), &version);
1467 		if (!SPA_VERSION_IS_SUPPORTED(version)) {
1468 			error = SET_ERROR(EINVAL);
1469 			goto pool_props_bad;
1470 		}
1471 		(void) nvlist_lookup_nvlist(props, ZPOOL_ROOTFS_PROPS, &nvl);
1472 		if (nvl) {
1473 			error = nvlist_dup(nvl, &rootprops, KM_SLEEP);
1474 			if (error != 0)
1475 				goto pool_props_bad;
1476 			(void) nvlist_remove_all(props, ZPOOL_ROOTFS_PROPS);
1477 		}
1478 
1479 		(void) nvlist_lookup_nvlist(props, ZPOOL_HIDDEN_ARGS,
1480 		    &hidden_args);
1481 		error = dsl_crypto_params_create_nvlist(DCP_CMD_NONE,
1482 		    rootprops, hidden_args, &dcp);
1483 		if (error != 0)
1484 			goto pool_props_bad;
1485 		(void) nvlist_remove_all(props, ZPOOL_HIDDEN_ARGS);
1486 
1487 		VERIFY(nvlist_alloc(&zplprops, NV_UNIQUE_NAME, KM_SLEEP) == 0);
1488 		error = zfs_fill_zplprops_root(version, rootprops,
1489 		    zplprops, NULL);
1490 		if (error != 0)
1491 			goto pool_props_bad;
1492 
1493 		if (nvlist_lookup_string(props,
1494 		    zpool_prop_to_name(ZPOOL_PROP_TNAME), &tname) == 0)
1495 			spa_name = tname;
1496 	}
1497 
1498 	error = spa_create(zc->zc_name, config, props, zplprops, dcp);
1499 
1500 	/*
1501 	 * Set the remaining root properties
1502 	 */
1503 	if (!error && (error = zfs_set_prop_nvlist(spa_name,
1504 	    ZPROP_SRC_LOCAL, rootprops, NULL)) != 0) {
1505 		(void) spa_destroy(spa_name);
1506 		unload_wkey = B_FALSE; /* spa_destroy() unloads wrapping keys */
1507 	}
1508 
1509 pool_props_bad:
1510 	nvlist_free(rootprops);
1511 	nvlist_free(zplprops);
1512 	nvlist_free(config);
1513 	nvlist_free(props);
1514 	dsl_crypto_params_free(dcp, unload_wkey && !!error);
1515 
1516 	return (error);
1517 }
1518 
1519 static int
zfs_ioc_pool_destroy(zfs_cmd_t * zc)1520 zfs_ioc_pool_destroy(zfs_cmd_t *zc)
1521 {
1522 	int error;
1523 	zfs_log_history(zc);
1524 	error = spa_destroy(zc->zc_name);
1525 
1526 	return (error);
1527 }
1528 
1529 static int
zfs_ioc_pool_import(zfs_cmd_t * zc)1530 zfs_ioc_pool_import(zfs_cmd_t *zc)
1531 {
1532 	nvlist_t *config, *props = NULL;
1533 	uint64_t guid;
1534 	int error;
1535 
1536 	if ((error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
1537 	    zc->zc_iflags, &config)) != 0)
1538 		return (error);
1539 
1540 	if (zc->zc_nvlist_src_size != 0 && (error =
1541 	    get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
1542 	    zc->zc_iflags, &props))) {
1543 		nvlist_free(config);
1544 		return (error);
1545 	}
1546 
1547 	if (nvlist_lookup_uint64(config, ZPOOL_CONFIG_POOL_GUID, &guid) != 0 ||
1548 	    guid != zc->zc_guid)
1549 		error = SET_ERROR(EINVAL);
1550 	else
1551 		error = spa_import(zc->zc_name, config, props, zc->zc_cookie);
1552 
1553 	if (zc->zc_nvlist_dst != 0) {
1554 		int err;
1555 
1556 		if ((err = put_nvlist(zc, config)) != 0)
1557 			error = err;
1558 	}
1559 
1560 	nvlist_free(config);
1561 	nvlist_free(props);
1562 
1563 	return (error);
1564 }
1565 
1566 static int
zfs_ioc_pool_export(zfs_cmd_t * zc)1567 zfs_ioc_pool_export(zfs_cmd_t *zc)
1568 {
1569 	int error;
1570 	boolean_t force = (boolean_t)zc->zc_cookie;
1571 	boolean_t hardforce = (boolean_t)zc->zc_guid;
1572 
1573 	zfs_log_history(zc);
1574 	error = spa_export(zc->zc_name, NULL, force, hardforce);
1575 
1576 	return (error);
1577 }
1578 
1579 static int
zfs_ioc_pool_configs(zfs_cmd_t * zc)1580 zfs_ioc_pool_configs(zfs_cmd_t *zc)
1581 {
1582 	nvlist_t *configs;
1583 	int error;
1584 
1585 	error = spa_all_configs(&zc->zc_cookie, &configs);
1586 	if (error)
1587 		return (error);
1588 
1589 	error = put_nvlist(zc, configs);
1590 
1591 	nvlist_free(configs);
1592 
1593 	return (error);
1594 }
1595 
1596 /*
1597  * inputs:
1598  * zc_name		name of the pool
1599  *
1600  * outputs:
1601  * zc_cookie		real errno
1602  * zc_nvlist_dst	config nvlist
1603  * zc_nvlist_dst_size	size of config nvlist
1604  */
1605 static int
zfs_ioc_pool_stats(zfs_cmd_t * zc)1606 zfs_ioc_pool_stats(zfs_cmd_t *zc)
1607 {
1608 	nvlist_t *config;
1609 	int error;
1610 	int ret = 0;
1611 
1612 	error = spa_get_stats(zc->zc_name, &config, zc->zc_value,
1613 	    sizeof (zc->zc_value));
1614 
1615 	if (config != NULL) {
1616 		ret = put_nvlist(zc, config);
1617 		nvlist_free(config);
1618 
1619 		/*
1620 		 * The config may be present even if 'error' is non-zero.
1621 		 * In this case we return success, and preserve the real errno
1622 		 * in 'zc_cookie'.
1623 		 */
1624 		zc->zc_cookie = error;
1625 	} else {
1626 		ret = error;
1627 	}
1628 
1629 	return (ret);
1630 }
1631 
1632 /*
1633  * Try to import the given pool, returning pool stats as appropriate so that
1634  * user land knows which devices are available and overall pool health.
1635  */
1636 static int
zfs_ioc_pool_tryimport(zfs_cmd_t * zc)1637 zfs_ioc_pool_tryimport(zfs_cmd_t *zc)
1638 {
1639 	nvlist_t *tryconfig, *config = NULL;
1640 	int error;
1641 
1642 	if ((error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
1643 	    zc->zc_iflags, &tryconfig)) != 0)
1644 		return (error);
1645 
1646 	config = spa_tryimport(tryconfig);
1647 
1648 	nvlist_free(tryconfig);
1649 
1650 	if (config == NULL)
1651 		return (SET_ERROR(EINVAL));
1652 
1653 	error = put_nvlist(zc, config);
1654 	nvlist_free(config);
1655 
1656 	return (error);
1657 }
1658 
1659 /*
1660  * inputs:
1661  * zc_name              name of the pool
1662  * zc_cookie            scan func (pool_scan_func_t)
1663  * zc_flags             scrub pause/resume flag (pool_scrub_cmd_t)
1664  */
1665 static int
zfs_ioc_pool_scan(zfs_cmd_t * zc)1666 zfs_ioc_pool_scan(zfs_cmd_t *zc)
1667 {
1668 	spa_t *spa;
1669 	int error;
1670 
1671 	if (zc->zc_flags >= POOL_SCRUB_FLAGS_END)
1672 		return (SET_ERROR(EINVAL));
1673 
1674 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1675 		return (error);
1676 
1677 	if (zc->zc_flags == POOL_SCRUB_PAUSE)
1678 		error = spa_scrub_pause_resume(spa, POOL_SCRUB_PAUSE);
1679 	else if (zc->zc_cookie == POOL_SCAN_NONE)
1680 		error = spa_scan_stop(spa);
1681 	else
1682 		error = spa_scan(spa, zc->zc_cookie);
1683 
1684 	spa_close(spa, FTAG);
1685 
1686 	return (error);
1687 }
1688 
1689 /*
1690  * inputs:
1691  * poolname             name of the pool
1692  * scan_type            scan func (pool_scan_func_t)
1693  * scan_command         scrub pause/resume flag (pool_scrub_cmd_t)
1694  */
1695 static const zfs_ioc_key_t zfs_keys_pool_scrub[] = {
1696 	{"scan_type",		DATA_TYPE_UINT64,	0},
1697 	{"scan_command",	DATA_TYPE_UINT64,	0},
1698 };
1699 
1700 static int
zfs_ioc_pool_scrub(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)1701 zfs_ioc_pool_scrub(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
1702 {
1703 	spa_t *spa;
1704 	int error;
1705 	uint64_t scan_type, scan_cmd;
1706 
1707 	if (nvlist_lookup_uint64(innvl, "scan_type", &scan_type) != 0)
1708 		return (SET_ERROR(EINVAL));
1709 	if (nvlist_lookup_uint64(innvl, "scan_command", &scan_cmd) != 0)
1710 		return (SET_ERROR(EINVAL));
1711 
1712 	if (scan_cmd >= POOL_SCRUB_FLAGS_END)
1713 		return (SET_ERROR(EINVAL));
1714 
1715 	if ((error = spa_open(poolname, &spa, FTAG)) != 0)
1716 		return (error);
1717 
1718 	if (scan_cmd == POOL_SCRUB_PAUSE) {
1719 		error = spa_scrub_pause_resume(spa, POOL_SCRUB_PAUSE);
1720 	} else if (scan_type == POOL_SCAN_NONE) {
1721 		error = spa_scan_stop(spa);
1722 	} else {
1723 		error = spa_scan(spa, scan_type);
1724 	}
1725 
1726 	spa_close(spa, FTAG);
1727 	return (error);
1728 }
1729 
1730 static int
zfs_ioc_pool_freeze(zfs_cmd_t * zc)1731 zfs_ioc_pool_freeze(zfs_cmd_t *zc)
1732 {
1733 	spa_t *spa;
1734 	int error;
1735 
1736 	error = spa_open(zc->zc_name, &spa, FTAG);
1737 	if (error == 0) {
1738 		spa_freeze(spa);
1739 		spa_close(spa, FTAG);
1740 	}
1741 	return (error);
1742 }
1743 
1744 static int
zfs_ioc_pool_upgrade(zfs_cmd_t * zc)1745 zfs_ioc_pool_upgrade(zfs_cmd_t *zc)
1746 {
1747 	spa_t *spa;
1748 	int error;
1749 
1750 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1751 		return (error);
1752 
1753 	if (zc->zc_cookie < spa_version(spa) ||
1754 	    !SPA_VERSION_IS_SUPPORTED(zc->zc_cookie)) {
1755 		spa_close(spa, FTAG);
1756 		return (SET_ERROR(EINVAL));
1757 	}
1758 
1759 	spa_upgrade(spa, zc->zc_cookie);
1760 	spa_close(spa, FTAG);
1761 
1762 	return (error);
1763 }
1764 
1765 static int
zfs_ioc_pool_get_history(zfs_cmd_t * zc)1766 zfs_ioc_pool_get_history(zfs_cmd_t *zc)
1767 {
1768 	spa_t *spa;
1769 	char *hist_buf;
1770 	uint64_t size;
1771 	int error;
1772 
1773 	if ((size = zc->zc_history_len) == 0)
1774 		return (SET_ERROR(EINVAL));
1775 
1776 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1777 		return (error);
1778 
1779 	if (spa_version(spa) < SPA_VERSION_ZPOOL_HISTORY) {
1780 		spa_close(spa, FTAG);
1781 		return (SET_ERROR(ENOTSUP));
1782 	}
1783 
1784 	hist_buf = vmem_alloc(size, KM_SLEEP);
1785 	if ((error = spa_history_get(spa, &zc->zc_history_offset,
1786 	    &zc->zc_history_len, hist_buf)) == 0) {
1787 		error = ddi_copyout(hist_buf,
1788 		    (void *)(uintptr_t)zc->zc_history,
1789 		    zc->zc_history_len, zc->zc_iflags);
1790 	}
1791 
1792 	spa_close(spa, FTAG);
1793 	vmem_free(hist_buf, size);
1794 	return (error);
1795 }
1796 
1797 static int
zfs_ioc_pool_reguid(zfs_cmd_t * zc)1798 zfs_ioc_pool_reguid(zfs_cmd_t *zc)
1799 {
1800 	spa_t *spa;
1801 	int error;
1802 
1803 	error = spa_open(zc->zc_name, &spa, FTAG);
1804 	if (error == 0) {
1805 		error = spa_change_guid(spa);
1806 		spa_close(spa, FTAG);
1807 	}
1808 	return (error);
1809 }
1810 
1811 static int
zfs_ioc_dsobj_to_dsname(zfs_cmd_t * zc)1812 zfs_ioc_dsobj_to_dsname(zfs_cmd_t *zc)
1813 {
1814 	return (dsl_dsobj_to_dsname(zc->zc_name, zc->zc_obj, zc->zc_value));
1815 }
1816 
1817 /*
1818  * inputs:
1819  * zc_name		name of filesystem
1820  * zc_obj		object to find
1821  *
1822  * outputs:
1823  * zc_value		name of object
1824  */
1825 static int
zfs_ioc_obj_to_path(zfs_cmd_t * zc)1826 zfs_ioc_obj_to_path(zfs_cmd_t *zc)
1827 {
1828 	objset_t *os;
1829 	int error;
1830 
1831 	/* XXX reading from objset not owned */
1832 	if ((error = dmu_objset_hold_flags(zc->zc_name, B_TRUE,
1833 	    FTAG, &os)) != 0)
1834 		return (error);
1835 	if (dmu_objset_type(os) != DMU_OST_ZFS) {
1836 		dmu_objset_rele_flags(os, B_TRUE, FTAG);
1837 		return (SET_ERROR(EINVAL));
1838 	}
1839 	error = zfs_obj_to_path(os, zc->zc_obj, zc->zc_value,
1840 	    sizeof (zc->zc_value));
1841 	dmu_objset_rele_flags(os, B_TRUE, FTAG);
1842 
1843 	return (error);
1844 }
1845 
1846 /*
1847  * inputs:
1848  * zc_name		name of filesystem
1849  * zc_obj		object to find
1850  *
1851  * outputs:
1852  * zc_stat		stats on object
1853  * zc_value		path to object
1854  */
1855 static int
zfs_ioc_obj_to_stats(zfs_cmd_t * zc)1856 zfs_ioc_obj_to_stats(zfs_cmd_t *zc)
1857 {
1858 	objset_t *os;
1859 	int error;
1860 
1861 	/* XXX reading from objset not owned */
1862 	if ((error = dmu_objset_hold_flags(zc->zc_name, B_TRUE,
1863 	    FTAG, &os)) != 0)
1864 		return (error);
1865 	if (dmu_objset_type(os) != DMU_OST_ZFS) {
1866 		dmu_objset_rele_flags(os, B_TRUE, FTAG);
1867 		return (SET_ERROR(EINVAL));
1868 	}
1869 	error = zfs_obj_to_stats(os, zc->zc_obj, &zc->zc_stat, zc->zc_value,
1870 	    sizeof (zc->zc_value));
1871 	dmu_objset_rele_flags(os, B_TRUE, FTAG);
1872 
1873 	return (error);
1874 }
1875 
1876 static int
zfs_ioc_vdev_add(zfs_cmd_t * zc)1877 zfs_ioc_vdev_add(zfs_cmd_t *zc)
1878 {
1879 	spa_t *spa;
1880 	int error;
1881 	nvlist_t *config;
1882 
1883 	error = spa_open(zc->zc_name, &spa, FTAG);
1884 	if (error != 0)
1885 		return (error);
1886 
1887 	error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
1888 	    zc->zc_iflags, &config);
1889 	if (error == 0) {
1890 		error = spa_vdev_add(spa, config, zc->zc_flags);
1891 		nvlist_free(config);
1892 	}
1893 	spa_close(spa, FTAG);
1894 	return (error);
1895 }
1896 
1897 /*
1898  * inputs:
1899  * zc_name		name of the pool
1900  * zc_guid		guid of vdev to remove
1901  * zc_cookie		cancel removal
1902  */
1903 static int
zfs_ioc_vdev_remove(zfs_cmd_t * zc)1904 zfs_ioc_vdev_remove(zfs_cmd_t *zc)
1905 {
1906 	spa_t *spa;
1907 	int error;
1908 
1909 	error = spa_open(zc->zc_name, &spa, FTAG);
1910 	if (error != 0)
1911 		return (error);
1912 	if (zc->zc_cookie != 0) {
1913 		error = spa_vdev_remove_cancel(spa);
1914 	} else {
1915 		error = spa_vdev_remove(spa, zc->zc_guid, B_FALSE);
1916 	}
1917 	spa_close(spa, FTAG);
1918 	return (error);
1919 }
1920 
1921 static int
zfs_ioc_vdev_set_state(zfs_cmd_t * zc)1922 zfs_ioc_vdev_set_state(zfs_cmd_t *zc)
1923 {
1924 	spa_t *spa;
1925 	int error;
1926 	vdev_state_t newstate = VDEV_STATE_UNKNOWN;
1927 
1928 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1929 		return (error);
1930 	switch (zc->zc_cookie) {
1931 	case VDEV_STATE_ONLINE:
1932 		error = vdev_online(spa, zc->zc_guid, zc->zc_obj, &newstate);
1933 		break;
1934 
1935 	case VDEV_STATE_OFFLINE:
1936 		error = vdev_offline(spa, zc->zc_guid, zc->zc_obj);
1937 		break;
1938 
1939 	case VDEV_STATE_FAULTED:
1940 		if (zc->zc_obj != VDEV_AUX_ERR_EXCEEDED &&
1941 		    zc->zc_obj != VDEV_AUX_EXTERNAL &&
1942 		    zc->zc_obj != VDEV_AUX_EXTERNAL_PERSIST)
1943 			zc->zc_obj = VDEV_AUX_ERR_EXCEEDED;
1944 
1945 		error = vdev_fault(spa, zc->zc_guid, zc->zc_obj);
1946 		break;
1947 
1948 	case VDEV_STATE_DEGRADED:
1949 		if (zc->zc_obj != VDEV_AUX_ERR_EXCEEDED &&
1950 		    zc->zc_obj != VDEV_AUX_EXTERNAL)
1951 			zc->zc_obj = VDEV_AUX_ERR_EXCEEDED;
1952 
1953 		error = vdev_degrade(spa, zc->zc_guid, zc->zc_obj);
1954 		break;
1955 
1956 	case VDEV_STATE_REMOVED:
1957 		error = vdev_remove_wanted(spa, zc->zc_guid);
1958 		break;
1959 
1960 	default:
1961 		error = SET_ERROR(EINVAL);
1962 	}
1963 	zc->zc_cookie = newstate;
1964 	spa_close(spa, FTAG);
1965 	return (error);
1966 }
1967 
1968 static int
zfs_ioc_vdev_attach(zfs_cmd_t * zc)1969 zfs_ioc_vdev_attach(zfs_cmd_t *zc)
1970 {
1971 	spa_t *spa;
1972 	nvlist_t *config;
1973 	int replacing = zc->zc_cookie;
1974 	int rebuild = zc->zc_simple;
1975 	int error;
1976 
1977 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1978 		return (error);
1979 
1980 	if ((error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
1981 	    zc->zc_iflags, &config)) == 0) {
1982 		error = spa_vdev_attach(spa, zc->zc_guid, config, replacing,
1983 		    rebuild);
1984 		nvlist_free(config);
1985 	}
1986 
1987 	spa_close(spa, FTAG);
1988 	return (error);
1989 }
1990 
1991 static int
zfs_ioc_vdev_detach(zfs_cmd_t * zc)1992 zfs_ioc_vdev_detach(zfs_cmd_t *zc)
1993 {
1994 	spa_t *spa;
1995 	int error;
1996 
1997 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
1998 		return (error);
1999 
2000 	error = spa_vdev_detach(spa, zc->zc_guid, 0, B_FALSE);
2001 
2002 	spa_close(spa, FTAG);
2003 	return (error);
2004 }
2005 
2006 static int
zfs_ioc_vdev_split(zfs_cmd_t * zc)2007 zfs_ioc_vdev_split(zfs_cmd_t *zc)
2008 {
2009 	spa_t *spa;
2010 	nvlist_t *config, *props = NULL;
2011 	int error;
2012 	boolean_t exp = !!(zc->zc_cookie & ZPOOL_EXPORT_AFTER_SPLIT);
2013 
2014 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
2015 		return (error);
2016 
2017 	if ((error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
2018 	    zc->zc_iflags, &config))) {
2019 		spa_close(spa, FTAG);
2020 		return (error);
2021 	}
2022 
2023 	if (zc->zc_nvlist_src_size != 0 && (error =
2024 	    get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
2025 	    zc->zc_iflags, &props))) {
2026 		spa_close(spa, FTAG);
2027 		nvlist_free(config);
2028 		return (error);
2029 	}
2030 
2031 	error = spa_vdev_split_mirror(spa, zc->zc_string, config, props, exp);
2032 
2033 	spa_close(spa, FTAG);
2034 
2035 	nvlist_free(config);
2036 	nvlist_free(props);
2037 
2038 	return (error);
2039 }
2040 
2041 static int
zfs_ioc_vdev_setpath(zfs_cmd_t * zc)2042 zfs_ioc_vdev_setpath(zfs_cmd_t *zc)
2043 {
2044 	spa_t *spa;
2045 	const char *path = zc->zc_value;
2046 	uint64_t guid = zc->zc_guid;
2047 	int error;
2048 
2049 	error = spa_open(zc->zc_name, &spa, FTAG);
2050 	if (error != 0)
2051 		return (error);
2052 
2053 	error = spa_vdev_setpath(spa, guid, path);
2054 	spa_close(spa, FTAG);
2055 	return (error);
2056 }
2057 
2058 static int
zfs_ioc_vdev_setfru(zfs_cmd_t * zc)2059 zfs_ioc_vdev_setfru(zfs_cmd_t *zc)
2060 {
2061 	spa_t *spa;
2062 	const char *fru = zc->zc_value;
2063 	uint64_t guid = zc->zc_guid;
2064 	int error;
2065 
2066 	error = spa_open(zc->zc_name, &spa, FTAG);
2067 	if (error != 0)
2068 		return (error);
2069 
2070 	error = spa_vdev_setfru(spa, guid, fru);
2071 	spa_close(spa, FTAG);
2072 	return (error);
2073 }
2074 
2075 static int
zfs_ioc_objset_stats_impl(zfs_cmd_t * zc,objset_t * os)2076 zfs_ioc_objset_stats_impl(zfs_cmd_t *zc, objset_t *os)
2077 {
2078 	int error = 0;
2079 	nvlist_t *nv;
2080 
2081 	dmu_objset_fast_stat(os, &zc->zc_objset_stats);
2082 
2083 	if (!zc->zc_simple && zc->zc_nvlist_dst != 0 &&
2084 	    (error = dsl_prop_get_all(os, &nv)) == 0) {
2085 		dmu_objset_stats(os, nv);
2086 		/*
2087 		 * NB: zvol_get_stats() will read the objset contents,
2088 		 * which we aren't supposed to do with a
2089 		 * DS_MODE_USER hold, because it could be
2090 		 * inconsistent.  So this is a bit of a workaround...
2091 		 * XXX reading without owning
2092 		 */
2093 		if (!zc->zc_objset_stats.dds_inconsistent &&
2094 		    dmu_objset_type(os) == DMU_OST_ZVOL) {
2095 			error = zvol_get_stats(os, nv);
2096 			if (error == EIO) {
2097 				nvlist_free(nv);
2098 				return (error);
2099 			}
2100 			VERIFY0(error);
2101 		}
2102 		if (error == 0)
2103 			error = put_nvlist(zc, nv);
2104 		nvlist_free(nv);
2105 	}
2106 
2107 	return (error);
2108 }
2109 
2110 /*
2111  * inputs:
2112  * zc_name		name of filesystem
2113  * zc_nvlist_dst_size	size of buffer for property nvlist
2114  *
2115  * outputs:
2116  * zc_objset_stats	stats
2117  * zc_nvlist_dst	property nvlist
2118  * zc_nvlist_dst_size	size of property nvlist
2119  */
2120 static int
zfs_ioc_objset_stats(zfs_cmd_t * zc)2121 zfs_ioc_objset_stats(zfs_cmd_t *zc)
2122 {
2123 	objset_t *os;
2124 	int error;
2125 
2126 	error = dmu_objset_hold(zc->zc_name, FTAG, &os);
2127 	if (error == 0) {
2128 		error = zfs_ioc_objset_stats_impl(zc, os);
2129 		dmu_objset_rele(os, FTAG);
2130 	}
2131 
2132 	return (error);
2133 }
2134 
2135 /*
2136  * inputs:
2137  * zc_name		name of filesystem
2138  * zc_nvlist_dst_size	size of buffer for property nvlist
2139  *
2140  * outputs:
2141  * zc_nvlist_dst	received property nvlist
2142  * zc_nvlist_dst_size	size of received property nvlist
2143  *
2144  * Gets received properties (distinct from local properties on or after
2145  * SPA_VERSION_RECVD_PROPS) for callers who want to differentiate received from
2146  * local property values.
2147  */
2148 static int
zfs_ioc_objset_recvd_props(zfs_cmd_t * zc)2149 zfs_ioc_objset_recvd_props(zfs_cmd_t *zc)
2150 {
2151 	int error = 0;
2152 	nvlist_t *nv;
2153 
2154 	/*
2155 	 * Without this check, we would return local property values if the
2156 	 * caller has not already received properties on or after
2157 	 * SPA_VERSION_RECVD_PROPS.
2158 	 */
2159 	if (!dsl_prop_get_hasrecvd(zc->zc_name))
2160 		return (SET_ERROR(ENOTSUP));
2161 
2162 	if (zc->zc_nvlist_dst != 0 &&
2163 	    (error = dsl_prop_get_received(zc->zc_name, &nv)) == 0) {
2164 		error = put_nvlist(zc, nv);
2165 		nvlist_free(nv);
2166 	}
2167 
2168 	return (error);
2169 }
2170 
2171 static int
nvl_add_zplprop(objset_t * os,nvlist_t * props,zfs_prop_t prop)2172 nvl_add_zplprop(objset_t *os, nvlist_t *props, zfs_prop_t prop)
2173 {
2174 	uint64_t value;
2175 	int error;
2176 
2177 	/*
2178 	 * zfs_get_zplprop() will either find a value or give us
2179 	 * the default value (if there is one).
2180 	 */
2181 	if ((error = zfs_get_zplprop(os, prop, &value)) != 0)
2182 		return (error);
2183 	VERIFY(nvlist_add_uint64(props, zfs_prop_to_name(prop), value) == 0);
2184 	return (0);
2185 }
2186 
2187 /*
2188  * inputs:
2189  * zc_name		name of filesystem
2190  * zc_nvlist_dst_size	size of buffer for zpl property nvlist
2191  *
2192  * outputs:
2193  * zc_nvlist_dst	zpl property nvlist
2194  * zc_nvlist_dst_size	size of zpl property nvlist
2195  */
2196 static int
zfs_ioc_objset_zplprops(zfs_cmd_t * zc)2197 zfs_ioc_objset_zplprops(zfs_cmd_t *zc)
2198 {
2199 	objset_t *os;
2200 	int err;
2201 
2202 	/* XXX reading without owning */
2203 	if ((err = dmu_objset_hold(zc->zc_name, FTAG, &os)))
2204 		return (err);
2205 
2206 	dmu_objset_fast_stat(os, &zc->zc_objset_stats);
2207 
2208 	/*
2209 	 * NB: nvl_add_zplprop() will read the objset contents,
2210 	 * which we aren't supposed to do with a DS_MODE_USER
2211 	 * hold, because it could be inconsistent.
2212 	 */
2213 	if (zc->zc_nvlist_dst != 0 &&
2214 	    !zc->zc_objset_stats.dds_inconsistent &&
2215 	    dmu_objset_type(os) == DMU_OST_ZFS) {
2216 		nvlist_t *nv;
2217 
2218 		VERIFY(nvlist_alloc(&nv, NV_UNIQUE_NAME, KM_SLEEP) == 0);
2219 		if ((err = nvl_add_zplprop(os, nv, ZFS_PROP_VERSION)) == 0 &&
2220 		    (err = nvl_add_zplprop(os, nv, ZFS_PROP_NORMALIZE)) == 0 &&
2221 		    (err = nvl_add_zplprop(os, nv, ZFS_PROP_UTF8ONLY)) == 0 &&
2222 		    (err = nvl_add_zplprop(os, nv, ZFS_PROP_CASE)) == 0)
2223 			err = put_nvlist(zc, nv);
2224 		nvlist_free(nv);
2225 	} else {
2226 		err = SET_ERROR(ENOENT);
2227 	}
2228 	dmu_objset_rele(os, FTAG);
2229 	return (err);
2230 }
2231 
2232 /*
2233  * inputs:
2234  * zc_name		name of filesystem
2235  * zc_cookie		zap cursor
2236  * zc_nvlist_dst_size	size of buffer for property nvlist
2237  *
2238  * outputs:
2239  * zc_name		name of next filesystem
2240  * zc_cookie		zap cursor
2241  * zc_objset_stats	stats
2242  * zc_nvlist_dst	property nvlist
2243  * zc_nvlist_dst_size	size of property nvlist
2244  */
2245 static int
zfs_ioc_dataset_list_next(zfs_cmd_t * zc)2246 zfs_ioc_dataset_list_next(zfs_cmd_t *zc)
2247 {
2248 	objset_t *os;
2249 	int error;
2250 	char *p;
2251 	size_t orig_len = strlen(zc->zc_name);
2252 
2253 top:
2254 	if ((error = dmu_objset_hold(zc->zc_name, FTAG, &os))) {
2255 		if (error == ENOENT)
2256 			error = SET_ERROR(ESRCH);
2257 		return (error);
2258 	}
2259 
2260 	p = strrchr(zc->zc_name, '/');
2261 	if (p == NULL || p[1] != '\0')
2262 		(void) strlcat(zc->zc_name, "/", sizeof (zc->zc_name));
2263 	p = zc->zc_name + strlen(zc->zc_name);
2264 
2265 	do {
2266 		error = dmu_dir_list_next(os,
2267 		    sizeof (zc->zc_name) - (p - zc->zc_name), p,
2268 		    NULL, &zc->zc_cookie);
2269 		if (error == ENOENT)
2270 			error = SET_ERROR(ESRCH);
2271 	} while (error == 0 && zfs_dataset_name_hidden(zc->zc_name));
2272 	dmu_objset_rele(os, FTAG);
2273 
2274 	/*
2275 	 * If it's an internal dataset (ie. with a '$' in its name),
2276 	 * don't try to get stats for it, otherwise we'll return ENOENT.
2277 	 */
2278 	if (error == 0 && strchr(zc->zc_name, '$') == NULL) {
2279 		error = zfs_ioc_objset_stats(zc); /* fill in the stats */
2280 		if (error == ENOENT) {
2281 			/* We lost a race with destroy, get the next one. */
2282 			zc->zc_name[orig_len] = '\0';
2283 			goto top;
2284 		}
2285 	}
2286 	return (error);
2287 }
2288 
2289 /*
2290  * inputs:
2291  * zc_name		name of filesystem
2292  * zc_cookie		zap cursor
2293  * zc_nvlist_src	iteration range nvlist
2294  * zc_nvlist_src_size	size of iteration range nvlist
2295  *
2296  * outputs:
2297  * zc_name		name of next snapshot
2298  * zc_objset_stats	stats
2299  * zc_nvlist_dst	property nvlist
2300  * zc_nvlist_dst_size	size of property nvlist
2301  */
2302 static int
zfs_ioc_snapshot_list_next(zfs_cmd_t * zc)2303 zfs_ioc_snapshot_list_next(zfs_cmd_t *zc)
2304 {
2305 	int error;
2306 	objset_t *os, *ossnap;
2307 	dsl_dataset_t *ds;
2308 	uint64_t min_txg = 0, max_txg = 0;
2309 
2310 	if (zc->zc_nvlist_src_size != 0) {
2311 		nvlist_t *props = NULL;
2312 		error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
2313 		    zc->zc_iflags, &props);
2314 		if (error != 0)
2315 			return (error);
2316 		(void) nvlist_lookup_uint64(props, SNAP_ITER_MIN_TXG,
2317 		    &min_txg);
2318 		(void) nvlist_lookup_uint64(props, SNAP_ITER_MAX_TXG,
2319 		    &max_txg);
2320 		nvlist_free(props);
2321 	}
2322 
2323 	error = dmu_objset_hold(zc->zc_name, FTAG, &os);
2324 	if (error != 0) {
2325 		return (error == ENOENT ? SET_ERROR(ESRCH) : error);
2326 	}
2327 
2328 	/*
2329 	 * A dataset name of maximum length cannot have any snapshots,
2330 	 * so exit immediately.
2331 	 */
2332 	if (strlcat(zc->zc_name, "@", sizeof (zc->zc_name)) >=
2333 	    ZFS_MAX_DATASET_NAME_LEN) {
2334 		dmu_objset_rele(os, FTAG);
2335 		return (SET_ERROR(ESRCH));
2336 	}
2337 
2338 	while (error == 0) {
2339 		if (issig(JUSTLOOKING) && issig(FORREAL)) {
2340 			error = SET_ERROR(EINTR);
2341 			break;
2342 		}
2343 
2344 		error = dmu_snapshot_list_next(os,
2345 		    sizeof (zc->zc_name) - strlen(zc->zc_name),
2346 		    zc->zc_name + strlen(zc->zc_name), &zc->zc_obj,
2347 		    &zc->zc_cookie, NULL);
2348 		if (error == ENOENT) {
2349 			error = SET_ERROR(ESRCH);
2350 			break;
2351 		} else if (error != 0) {
2352 			break;
2353 		}
2354 
2355 		error = dsl_dataset_hold_obj(dmu_objset_pool(os), zc->zc_obj,
2356 		    FTAG, &ds);
2357 		if (error != 0)
2358 			break;
2359 
2360 		if ((min_txg != 0 && dsl_get_creationtxg(ds) < min_txg) ||
2361 		    (max_txg != 0 && dsl_get_creationtxg(ds) > max_txg)) {
2362 			dsl_dataset_rele(ds, FTAG);
2363 			/* undo snapshot name append */
2364 			*(strchr(zc->zc_name, '@') + 1) = '\0';
2365 			/* skip snapshot */
2366 			continue;
2367 		}
2368 
2369 		if (zc->zc_simple) {
2370 			dsl_dataset_fast_stat(ds, &zc->zc_objset_stats);
2371 			dsl_dataset_rele(ds, FTAG);
2372 			break;
2373 		}
2374 
2375 		if ((error = dmu_objset_from_ds(ds, &ossnap)) != 0) {
2376 			dsl_dataset_rele(ds, FTAG);
2377 			break;
2378 		}
2379 		if ((error = zfs_ioc_objset_stats_impl(zc, ossnap)) != 0) {
2380 			dsl_dataset_rele(ds, FTAG);
2381 			break;
2382 		}
2383 		dsl_dataset_rele(ds, FTAG);
2384 		break;
2385 	}
2386 
2387 	dmu_objset_rele(os, FTAG);
2388 	/* if we failed, undo the @ that we tacked on to zc_name */
2389 	if (error != 0)
2390 		*strchr(zc->zc_name, '@') = '\0';
2391 	return (error);
2392 }
2393 
2394 static int
zfs_prop_set_userquota(const char * dsname,nvpair_t * pair)2395 zfs_prop_set_userquota(const char *dsname, nvpair_t *pair)
2396 {
2397 	const char *propname = nvpair_name(pair);
2398 	uint64_t *valary;
2399 	unsigned int vallen;
2400 	const char *dash, *domain;
2401 	zfs_userquota_prop_t type;
2402 	uint64_t rid;
2403 	uint64_t quota;
2404 	zfsvfs_t *zfsvfs;
2405 	int err;
2406 
2407 	if (nvpair_type(pair) == DATA_TYPE_NVLIST) {
2408 		nvlist_t *attrs;
2409 		VERIFY(nvpair_value_nvlist(pair, &attrs) == 0);
2410 		if (nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
2411 		    &pair) != 0)
2412 			return (SET_ERROR(EINVAL));
2413 	}
2414 
2415 	/*
2416 	 * A correctly constructed propname is encoded as
2417 	 * userquota@<rid>-<domain>.
2418 	 */
2419 	if ((dash = strchr(propname, '-')) == NULL ||
2420 	    nvpair_value_uint64_array(pair, &valary, &vallen) != 0 ||
2421 	    vallen != 3)
2422 		return (SET_ERROR(EINVAL));
2423 
2424 	domain = dash + 1;
2425 	type = valary[0];
2426 	rid = valary[1];
2427 	quota = valary[2];
2428 
2429 	err = zfsvfs_hold(dsname, FTAG, &zfsvfs, B_FALSE);
2430 	if (err == 0) {
2431 		err = zfs_set_userquota(zfsvfs, type, domain, rid, quota);
2432 		zfsvfs_rele(zfsvfs, FTAG);
2433 	}
2434 
2435 	return (err);
2436 }
2437 
2438 /*
2439  * If the named property is one that has a special function to set its value,
2440  * return 0 on success and a positive error code on failure; otherwise if it is
2441  * not one of the special properties handled by this function, return -1.
2442  *
2443  * XXX: It would be better for callers of the property interface if we handled
2444  * these special cases in dsl_prop.c (in the dsl layer).
2445  */
2446 static int
zfs_prop_set_special(const char * dsname,zprop_source_t source,nvpair_t * pair)2447 zfs_prop_set_special(const char *dsname, zprop_source_t source,
2448     nvpair_t *pair)
2449 {
2450 	const char *propname = nvpair_name(pair);
2451 	zfs_prop_t prop = zfs_name_to_prop(propname);
2452 	uint64_t intval = 0;
2453 	const char *strval = NULL;
2454 	int err = -1;
2455 
2456 	if (prop == ZPROP_USERPROP) {
2457 		if (zfs_prop_userquota(propname))
2458 			return (zfs_prop_set_userquota(dsname, pair));
2459 		return (-1);
2460 	}
2461 
2462 	if (nvpair_type(pair) == DATA_TYPE_NVLIST) {
2463 		nvlist_t *attrs;
2464 		VERIFY(nvpair_value_nvlist(pair, &attrs) == 0);
2465 		VERIFY(nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
2466 		    &pair) == 0);
2467 	}
2468 
2469 	/* all special properties are numeric except for keylocation */
2470 	if (zfs_prop_get_type(prop) == PROP_TYPE_STRING) {
2471 		strval = fnvpair_value_string(pair);
2472 	} else {
2473 		intval = fnvpair_value_uint64(pair);
2474 	}
2475 
2476 	switch (prop) {
2477 	case ZFS_PROP_QUOTA:
2478 		err = dsl_dir_set_quota(dsname, source, intval);
2479 		break;
2480 	case ZFS_PROP_REFQUOTA:
2481 		err = dsl_dataset_set_refquota(dsname, source, intval);
2482 		break;
2483 	case ZFS_PROP_FILESYSTEM_LIMIT:
2484 	case ZFS_PROP_SNAPSHOT_LIMIT:
2485 		if (intval == UINT64_MAX) {
2486 			/* clearing the limit, just do it */
2487 			err = 0;
2488 		} else {
2489 			err = dsl_dir_activate_fs_ss_limit(dsname);
2490 		}
2491 		/*
2492 		 * Set err to -1 to force the zfs_set_prop_nvlist code down the
2493 		 * default path to set the value in the nvlist.
2494 		 */
2495 		if (err == 0)
2496 			err = -1;
2497 		break;
2498 	case ZFS_PROP_KEYLOCATION:
2499 		err = dsl_crypto_can_set_keylocation(dsname, strval);
2500 
2501 		/*
2502 		 * Set err to -1 to force the zfs_set_prop_nvlist code down the
2503 		 * default path to set the value in the nvlist.
2504 		 */
2505 		if (err == 0)
2506 			err = -1;
2507 		break;
2508 	case ZFS_PROP_RESERVATION:
2509 		err = dsl_dir_set_reservation(dsname, source, intval);
2510 		break;
2511 	case ZFS_PROP_REFRESERVATION:
2512 		err = dsl_dataset_set_refreservation(dsname, source, intval);
2513 		break;
2514 	case ZFS_PROP_COMPRESSION:
2515 		err = dsl_dataset_set_compression(dsname, source, intval);
2516 		/*
2517 		 * Set err to -1 to force the zfs_set_prop_nvlist code down the
2518 		 * default path to set the value in the nvlist.
2519 		 */
2520 		if (err == 0)
2521 			err = -1;
2522 		break;
2523 	case ZFS_PROP_VOLSIZE:
2524 		err = zvol_set_volsize(dsname, intval);
2525 		break;
2526 	case ZFS_PROP_SNAPDEV:
2527 		err = zvol_set_snapdev(dsname, source, intval);
2528 		break;
2529 	case ZFS_PROP_VOLMODE:
2530 		err = zvol_set_volmode(dsname, source, intval);
2531 		break;
2532 	case ZFS_PROP_VERSION:
2533 	{
2534 		zfsvfs_t *zfsvfs;
2535 
2536 		if ((err = zfsvfs_hold(dsname, FTAG, &zfsvfs, B_TRUE)) != 0)
2537 			break;
2538 
2539 		err = zfs_set_version(zfsvfs, intval);
2540 		zfsvfs_rele(zfsvfs, FTAG);
2541 
2542 		if (err == 0 && intval >= ZPL_VERSION_USERSPACE) {
2543 			zfs_cmd_t *zc;
2544 
2545 			zc = kmem_zalloc(sizeof (zfs_cmd_t), KM_SLEEP);
2546 			(void) strlcpy(zc->zc_name, dsname,
2547 			    sizeof (zc->zc_name));
2548 			(void) zfs_ioc_userspace_upgrade(zc);
2549 			(void) zfs_ioc_id_quota_upgrade(zc);
2550 			kmem_free(zc, sizeof (zfs_cmd_t));
2551 		}
2552 		break;
2553 	}
2554 	default:
2555 		err = -1;
2556 	}
2557 
2558 	return (err);
2559 }
2560 
2561 static boolean_t
zfs_is_namespace_prop(zfs_prop_t prop)2562 zfs_is_namespace_prop(zfs_prop_t prop)
2563 {
2564 	switch (prop) {
2565 
2566 	case ZFS_PROP_ATIME:
2567 	case ZFS_PROP_RELATIME:
2568 	case ZFS_PROP_DEVICES:
2569 	case ZFS_PROP_EXEC:
2570 	case ZFS_PROP_SETUID:
2571 	case ZFS_PROP_READONLY:
2572 	case ZFS_PROP_XATTR:
2573 	case ZFS_PROP_NBMAND:
2574 		return (B_TRUE);
2575 
2576 	default:
2577 		return (B_FALSE);
2578 	}
2579 }
2580 
2581 /*
2582  * This function is best effort. If it fails to set any of the given properties,
2583  * it continues to set as many as it can and returns the last error
2584  * encountered. If the caller provides a non-NULL errlist, it will be filled in
2585  * with the list of names of all the properties that failed along with the
2586  * corresponding error numbers.
2587  *
2588  * If every property is set successfully, zero is returned and errlist is not
2589  * modified.
2590  */
2591 int
zfs_set_prop_nvlist(const char * dsname,zprop_source_t source,nvlist_t * nvl,nvlist_t * errlist)2592 zfs_set_prop_nvlist(const char *dsname, zprop_source_t source, nvlist_t *nvl,
2593     nvlist_t *errlist)
2594 {
2595 	nvpair_t *pair;
2596 	nvpair_t *propval;
2597 	int rv = 0;
2598 	int err;
2599 	uint64_t intval;
2600 	const char *strval;
2601 	boolean_t should_update_mount_cache = B_FALSE;
2602 
2603 	nvlist_t *genericnvl = fnvlist_alloc();
2604 	nvlist_t *retrynvl = fnvlist_alloc();
2605 retry:
2606 	pair = NULL;
2607 	while ((pair = nvlist_next_nvpair(nvl, pair)) != NULL) {
2608 		const char *propname = nvpair_name(pair);
2609 		zfs_prop_t prop = zfs_name_to_prop(propname);
2610 		err = 0;
2611 
2612 		/* decode the property value */
2613 		propval = pair;
2614 		if (nvpair_type(pair) == DATA_TYPE_NVLIST) {
2615 			nvlist_t *attrs;
2616 			attrs = fnvpair_value_nvlist(pair);
2617 			if (nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
2618 			    &propval) != 0)
2619 				err = SET_ERROR(EINVAL);
2620 		}
2621 
2622 		/* Validate value type */
2623 		if (err == 0 && source == ZPROP_SRC_INHERITED) {
2624 			/* inherited properties are expected to be booleans */
2625 			if (nvpair_type(propval) != DATA_TYPE_BOOLEAN)
2626 				err = SET_ERROR(EINVAL);
2627 		} else if (err == 0 && prop == ZPROP_USERPROP) {
2628 			if (zfs_prop_user(propname)) {
2629 				if (nvpair_type(propval) != DATA_TYPE_STRING)
2630 					err = SET_ERROR(EINVAL);
2631 			} else if (zfs_prop_userquota(propname)) {
2632 				if (nvpair_type(propval) !=
2633 				    DATA_TYPE_UINT64_ARRAY)
2634 					err = SET_ERROR(EINVAL);
2635 			} else {
2636 				err = SET_ERROR(EINVAL);
2637 			}
2638 		} else if (err == 0) {
2639 			if (nvpair_type(propval) == DATA_TYPE_STRING) {
2640 				if (zfs_prop_get_type(prop) != PROP_TYPE_STRING)
2641 					err = SET_ERROR(EINVAL);
2642 			} else if (nvpair_type(propval) == DATA_TYPE_UINT64) {
2643 				const char *unused;
2644 
2645 				intval = fnvpair_value_uint64(propval);
2646 
2647 				switch (zfs_prop_get_type(prop)) {
2648 				case PROP_TYPE_NUMBER:
2649 					break;
2650 				case PROP_TYPE_STRING:
2651 					err = SET_ERROR(EINVAL);
2652 					break;
2653 				case PROP_TYPE_INDEX:
2654 					if (zfs_prop_index_to_string(prop,
2655 					    intval, &unused) != 0)
2656 						err =
2657 						    SET_ERROR(ZFS_ERR_BADPROP);
2658 					break;
2659 				default:
2660 					cmn_err(CE_PANIC,
2661 					    "unknown property type");
2662 				}
2663 			} else {
2664 				err = SET_ERROR(EINVAL);
2665 			}
2666 		}
2667 
2668 		/* Validate permissions */
2669 		if (err == 0)
2670 			err = zfs_check_settable(dsname, pair, CRED());
2671 
2672 		if (err == 0) {
2673 			if (source == ZPROP_SRC_INHERITED)
2674 				err = -1; /* does not need special handling */
2675 			else
2676 				err = zfs_prop_set_special(dsname, source,
2677 				    pair);
2678 			if (err == -1) {
2679 				/*
2680 				 * For better performance we build up a list of
2681 				 * properties to set in a single transaction.
2682 				 */
2683 				err = nvlist_add_nvpair(genericnvl, pair);
2684 			} else if (err != 0 && nvl != retrynvl) {
2685 				/*
2686 				 * This may be a spurious error caused by
2687 				 * receiving quota and reservation out of order.
2688 				 * Try again in a second pass.
2689 				 */
2690 				err = nvlist_add_nvpair(retrynvl, pair);
2691 			}
2692 		}
2693 
2694 		if (err != 0) {
2695 			if (errlist != NULL)
2696 				fnvlist_add_int32(errlist, propname, err);
2697 			rv = err;
2698 		}
2699 
2700 		if (zfs_is_namespace_prop(prop))
2701 			should_update_mount_cache = B_TRUE;
2702 	}
2703 
2704 	if (nvl != retrynvl && !nvlist_empty(retrynvl)) {
2705 		nvl = retrynvl;
2706 		goto retry;
2707 	}
2708 
2709 	if (nvlist_empty(genericnvl))
2710 		goto out;
2711 
2712 	/*
2713 	 * Try to set them all in one batch.
2714 	 */
2715 	err = dsl_props_set(dsname, source, genericnvl);
2716 	if (err == 0)
2717 		goto out;
2718 
2719 	/*
2720 	 * If batching fails, we still want to set as many properties as we
2721 	 * can, so try setting them individually.
2722 	 */
2723 	pair = NULL;
2724 	while ((pair = nvlist_next_nvpair(genericnvl, pair)) != NULL) {
2725 		const char *propname = nvpair_name(pair);
2726 
2727 		propval = pair;
2728 		if (nvpair_type(pair) == DATA_TYPE_NVLIST) {
2729 			nvlist_t *attrs;
2730 			attrs = fnvpair_value_nvlist(pair);
2731 			propval = fnvlist_lookup_nvpair(attrs, ZPROP_VALUE);
2732 		}
2733 
2734 		if (nvpair_type(propval) == DATA_TYPE_STRING) {
2735 			strval = fnvpair_value_string(propval);
2736 			err = dsl_prop_set_string(dsname, propname,
2737 			    source, strval);
2738 		} else if (nvpair_type(propval) == DATA_TYPE_BOOLEAN) {
2739 			err = dsl_prop_inherit(dsname, propname, source);
2740 		} else {
2741 			intval = fnvpair_value_uint64(propval);
2742 			err = dsl_prop_set_int(dsname, propname, source,
2743 			    intval);
2744 		}
2745 
2746 		if (err != 0) {
2747 			if (errlist != NULL) {
2748 				fnvlist_add_int32(errlist, propname, err);
2749 			}
2750 			rv = err;
2751 		}
2752 	}
2753 
2754 out:
2755 	if (should_update_mount_cache)
2756 		zfs_ioctl_update_mount_cache(dsname);
2757 
2758 	nvlist_free(genericnvl);
2759 	nvlist_free(retrynvl);
2760 
2761 	return (rv);
2762 }
2763 
2764 /*
2765  * Check that all the properties are valid user properties.
2766  */
2767 static int
zfs_check_userprops(nvlist_t * nvl)2768 zfs_check_userprops(nvlist_t *nvl)
2769 {
2770 	nvpair_t *pair = NULL;
2771 
2772 	while ((pair = nvlist_next_nvpair(nvl, pair)) != NULL) {
2773 		const char *propname = nvpair_name(pair);
2774 
2775 		if (!zfs_prop_user(propname) ||
2776 		    nvpair_type(pair) != DATA_TYPE_STRING)
2777 			return (SET_ERROR(EINVAL));
2778 
2779 		if (strlen(propname) >= ZAP_MAXNAMELEN)
2780 			return (SET_ERROR(ENAMETOOLONG));
2781 
2782 		if (strlen(fnvpair_value_string(pair)) >= ZAP_MAXVALUELEN)
2783 			return (SET_ERROR(E2BIG));
2784 	}
2785 	return (0);
2786 }
2787 
2788 static void
props_skip(nvlist_t * props,nvlist_t * skipped,nvlist_t ** newprops)2789 props_skip(nvlist_t *props, nvlist_t *skipped, nvlist_t **newprops)
2790 {
2791 	nvpair_t *pair;
2792 
2793 	VERIFY(nvlist_alloc(newprops, NV_UNIQUE_NAME, KM_SLEEP) == 0);
2794 
2795 	pair = NULL;
2796 	while ((pair = nvlist_next_nvpair(props, pair)) != NULL) {
2797 		if (nvlist_exists(skipped, nvpair_name(pair)))
2798 			continue;
2799 
2800 		VERIFY(nvlist_add_nvpair(*newprops, pair) == 0);
2801 	}
2802 }
2803 
2804 static int
clear_received_props(const char * dsname,nvlist_t * props,nvlist_t * skipped)2805 clear_received_props(const char *dsname, nvlist_t *props,
2806     nvlist_t *skipped)
2807 {
2808 	int err = 0;
2809 	nvlist_t *cleared_props = NULL;
2810 	props_skip(props, skipped, &cleared_props);
2811 	if (!nvlist_empty(cleared_props)) {
2812 		/*
2813 		 * Acts on local properties until the dataset has received
2814 		 * properties at least once on or after SPA_VERSION_RECVD_PROPS.
2815 		 */
2816 		zprop_source_t flags = (ZPROP_SRC_NONE |
2817 		    (dsl_prop_get_hasrecvd(dsname) ? ZPROP_SRC_RECEIVED : 0));
2818 		err = zfs_set_prop_nvlist(dsname, flags, cleared_props, NULL);
2819 	}
2820 	nvlist_free(cleared_props);
2821 	return (err);
2822 }
2823 
2824 /*
2825  * inputs:
2826  * zc_name		name of filesystem
2827  * zc_value		name of property to set
2828  * zc_nvlist_src{_size}	nvlist of properties to apply
2829  * zc_cookie		received properties flag
2830  *
2831  * outputs:
2832  * zc_nvlist_dst{_size} error for each unapplied received property
2833  */
2834 static int
zfs_ioc_set_prop(zfs_cmd_t * zc)2835 zfs_ioc_set_prop(zfs_cmd_t *zc)
2836 {
2837 	nvlist_t *nvl;
2838 	boolean_t received = zc->zc_cookie;
2839 	zprop_source_t source = (received ? ZPROP_SRC_RECEIVED :
2840 	    ZPROP_SRC_LOCAL);
2841 	nvlist_t *errors;
2842 	int error;
2843 
2844 	if ((error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
2845 	    zc->zc_iflags, &nvl)) != 0)
2846 		return (error);
2847 
2848 	if (received) {
2849 		nvlist_t *origprops;
2850 
2851 		if (dsl_prop_get_received(zc->zc_name, &origprops) == 0) {
2852 			(void) clear_received_props(zc->zc_name,
2853 			    origprops, nvl);
2854 			nvlist_free(origprops);
2855 		}
2856 
2857 		error = dsl_prop_set_hasrecvd(zc->zc_name);
2858 	}
2859 
2860 	errors = fnvlist_alloc();
2861 	if (error == 0)
2862 		error = zfs_set_prop_nvlist(zc->zc_name, source, nvl, errors);
2863 
2864 	if (zc->zc_nvlist_dst != 0 && errors != NULL) {
2865 		(void) put_nvlist(zc, errors);
2866 	}
2867 
2868 	nvlist_free(errors);
2869 	nvlist_free(nvl);
2870 	return (error);
2871 }
2872 
2873 /*
2874  * inputs:
2875  * zc_name		name of filesystem
2876  * zc_value		name of property to inherit
2877  * zc_cookie		revert to received value if TRUE
2878  *
2879  * outputs:		none
2880  */
2881 static int
zfs_ioc_inherit_prop(zfs_cmd_t * zc)2882 zfs_ioc_inherit_prop(zfs_cmd_t *zc)
2883 {
2884 	const char *propname = zc->zc_value;
2885 	zfs_prop_t prop = zfs_name_to_prop(propname);
2886 	boolean_t received = zc->zc_cookie;
2887 	zprop_source_t source = (received
2888 	    ? ZPROP_SRC_NONE		/* revert to received value, if any */
2889 	    : ZPROP_SRC_INHERITED);	/* explicitly inherit */
2890 	nvlist_t *dummy;
2891 	nvpair_t *pair;
2892 	zprop_type_t type;
2893 	int err;
2894 
2895 	if (!received) {
2896 		/*
2897 		 * Only check this in the non-received case. We want to allow
2898 		 * 'inherit -S' to revert non-inheritable properties like quota
2899 		 * and reservation to the received or default values even though
2900 		 * they are not considered inheritable.
2901 		 */
2902 		if (prop != ZPROP_USERPROP && !zfs_prop_inheritable(prop))
2903 			return (SET_ERROR(EINVAL));
2904 	}
2905 
2906 	if (prop == ZPROP_USERPROP) {
2907 		if (!zfs_prop_user(propname))
2908 			return (SET_ERROR(EINVAL));
2909 
2910 		type = PROP_TYPE_STRING;
2911 	} else if (prop == ZFS_PROP_VOLSIZE || prop == ZFS_PROP_VERSION) {
2912 		return (SET_ERROR(EINVAL));
2913 	} else {
2914 		type = zfs_prop_get_type(prop);
2915 	}
2916 
2917 	/*
2918 	 * zfs_prop_set_special() expects properties in the form of an
2919 	 * nvpair with type info.
2920 	 */
2921 	dummy = fnvlist_alloc();
2922 
2923 	switch (type) {
2924 	case PROP_TYPE_STRING:
2925 		VERIFY(0 == nvlist_add_string(dummy, propname, ""));
2926 		break;
2927 	case PROP_TYPE_NUMBER:
2928 	case PROP_TYPE_INDEX:
2929 		VERIFY(0 == nvlist_add_uint64(dummy, propname, 0));
2930 		break;
2931 	default:
2932 		err = SET_ERROR(EINVAL);
2933 		goto errout;
2934 	}
2935 
2936 	pair = nvlist_next_nvpair(dummy, NULL);
2937 	if (pair == NULL) {
2938 		err = SET_ERROR(EINVAL);
2939 	} else {
2940 		err = zfs_prop_set_special(zc->zc_name, source, pair);
2941 		if (err == -1) /* property is not "special", needs handling */
2942 			err = dsl_prop_inherit(zc->zc_name, zc->zc_value,
2943 			    source);
2944 	}
2945 
2946 errout:
2947 	nvlist_free(dummy);
2948 	return (err);
2949 }
2950 
2951 static int
zfs_ioc_pool_set_props(zfs_cmd_t * zc)2952 zfs_ioc_pool_set_props(zfs_cmd_t *zc)
2953 {
2954 	nvlist_t *props;
2955 	spa_t *spa;
2956 	int error;
2957 	nvpair_t *pair;
2958 
2959 	if ((error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
2960 	    zc->zc_iflags, &props)))
2961 		return (error);
2962 
2963 	/*
2964 	 * If the only property is the configfile, then just do a spa_lookup()
2965 	 * to handle the faulted case.
2966 	 */
2967 	pair = nvlist_next_nvpair(props, NULL);
2968 	if (pair != NULL && strcmp(nvpair_name(pair),
2969 	    zpool_prop_to_name(ZPOOL_PROP_CACHEFILE)) == 0 &&
2970 	    nvlist_next_nvpair(props, pair) == NULL) {
2971 		mutex_enter(&spa_namespace_lock);
2972 		if ((spa = spa_lookup(zc->zc_name)) != NULL) {
2973 			spa_configfile_set(spa, props, B_FALSE);
2974 			spa_write_cachefile(spa, B_FALSE, B_TRUE, B_FALSE);
2975 		}
2976 		mutex_exit(&spa_namespace_lock);
2977 		if (spa != NULL) {
2978 			nvlist_free(props);
2979 			return (0);
2980 		}
2981 	}
2982 
2983 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0) {
2984 		nvlist_free(props);
2985 		return (error);
2986 	}
2987 
2988 	error = spa_prop_set(spa, props);
2989 
2990 	nvlist_free(props);
2991 	spa_close(spa, FTAG);
2992 
2993 	return (error);
2994 }
2995 
2996 static int
zfs_ioc_pool_get_props(zfs_cmd_t * zc)2997 zfs_ioc_pool_get_props(zfs_cmd_t *zc)
2998 {
2999 	spa_t *spa;
3000 	int error;
3001 	nvlist_t *nvp = NULL;
3002 
3003 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0) {
3004 		/*
3005 		 * If the pool is faulted, there may be properties we can still
3006 		 * get (such as altroot and cachefile), so attempt to get them
3007 		 * anyway.
3008 		 */
3009 		mutex_enter(&spa_namespace_lock);
3010 		if ((spa = spa_lookup(zc->zc_name)) != NULL)
3011 			error = spa_prop_get(spa, &nvp);
3012 		mutex_exit(&spa_namespace_lock);
3013 	} else {
3014 		error = spa_prop_get(spa, &nvp);
3015 		spa_close(spa, FTAG);
3016 	}
3017 
3018 	if (error == 0 && zc->zc_nvlist_dst != 0)
3019 		error = put_nvlist(zc, nvp);
3020 	else
3021 		error = SET_ERROR(EFAULT);
3022 
3023 	nvlist_free(nvp);
3024 	return (error);
3025 }
3026 
3027 /*
3028  * innvl: {
3029  *     "vdevprops_set_vdev" -> guid
3030  *     "vdevprops_set_props" -> { prop -> value }
3031  * }
3032  *
3033  * outnvl: propname -> error code (int32)
3034  */
3035 static const zfs_ioc_key_t zfs_keys_vdev_set_props[] = {
3036 	{ZPOOL_VDEV_PROPS_SET_VDEV,	DATA_TYPE_UINT64,	0},
3037 	{ZPOOL_VDEV_PROPS_SET_PROPS,	DATA_TYPE_NVLIST,	0}
3038 };
3039 
3040 static int
zfs_ioc_vdev_set_props(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3041 zfs_ioc_vdev_set_props(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3042 {
3043 	spa_t *spa;
3044 	int error;
3045 	vdev_t *vd;
3046 	uint64_t vdev_guid;
3047 
3048 	/* Early validation */
3049 	if (nvlist_lookup_uint64(innvl, ZPOOL_VDEV_PROPS_SET_VDEV,
3050 	    &vdev_guid) != 0)
3051 		return (SET_ERROR(EINVAL));
3052 
3053 	if (outnvl == NULL)
3054 		return (SET_ERROR(EINVAL));
3055 
3056 	if ((error = spa_open(poolname, &spa, FTAG)) != 0)
3057 		return (error);
3058 
3059 	ASSERT(spa_writeable(spa));
3060 
3061 	if ((vd = spa_lookup_by_guid(spa, vdev_guid, B_TRUE)) == NULL) {
3062 		spa_close(spa, FTAG);
3063 		return (SET_ERROR(ENOENT));
3064 	}
3065 
3066 	error = vdev_prop_set(vd, innvl, outnvl);
3067 
3068 	spa_close(spa, FTAG);
3069 
3070 	return (error);
3071 }
3072 
3073 /*
3074  * innvl: {
3075  *     "vdevprops_get_vdev" -> guid
3076  *     (optional) "vdevprops_get_props" -> { propname -> propid }
3077  * }
3078  *
3079  * outnvl: propname -> value
3080  */
3081 static const zfs_ioc_key_t zfs_keys_vdev_get_props[] = {
3082 	{ZPOOL_VDEV_PROPS_GET_VDEV,	DATA_TYPE_UINT64,	0},
3083 	{ZPOOL_VDEV_PROPS_GET_PROPS,	DATA_TYPE_NVLIST,	ZK_OPTIONAL}
3084 };
3085 
3086 static int
zfs_ioc_vdev_get_props(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3087 zfs_ioc_vdev_get_props(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3088 {
3089 	spa_t *spa;
3090 	int error;
3091 	vdev_t *vd;
3092 	uint64_t vdev_guid;
3093 
3094 	/* Early validation */
3095 	if (nvlist_lookup_uint64(innvl, ZPOOL_VDEV_PROPS_GET_VDEV,
3096 	    &vdev_guid) != 0)
3097 		return (SET_ERROR(EINVAL));
3098 
3099 	if (outnvl == NULL)
3100 		return (SET_ERROR(EINVAL));
3101 
3102 	if ((error = spa_open(poolname, &spa, FTAG)) != 0)
3103 		return (error);
3104 
3105 	if ((vd = spa_lookup_by_guid(spa, vdev_guid, B_TRUE)) == NULL) {
3106 		spa_close(spa, FTAG);
3107 		return (SET_ERROR(ENOENT));
3108 	}
3109 
3110 	error = vdev_prop_get(vd, innvl, outnvl);
3111 
3112 	spa_close(spa, FTAG);
3113 
3114 	return (error);
3115 }
3116 
3117 /*
3118  * inputs:
3119  * zc_name		name of filesystem
3120  * zc_nvlist_src{_size}	nvlist of delegated permissions
3121  * zc_perm_action	allow/unallow flag
3122  *
3123  * outputs:		none
3124  */
3125 static int
zfs_ioc_set_fsacl(zfs_cmd_t * zc)3126 zfs_ioc_set_fsacl(zfs_cmd_t *zc)
3127 {
3128 	int error;
3129 	nvlist_t *fsaclnv = NULL;
3130 
3131 	if ((error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
3132 	    zc->zc_iflags, &fsaclnv)) != 0)
3133 		return (error);
3134 
3135 	/*
3136 	 * Verify nvlist is constructed correctly
3137 	 */
3138 	if (zfs_deleg_verify_nvlist(fsaclnv) != 0) {
3139 		nvlist_free(fsaclnv);
3140 		return (SET_ERROR(EINVAL));
3141 	}
3142 
3143 	/*
3144 	 * If we don't have PRIV_SYS_MOUNT, then validate
3145 	 * that user is allowed to hand out each permission in
3146 	 * the nvlist(s)
3147 	 */
3148 
3149 	error = secpolicy_zfs(CRED());
3150 	if (error != 0) {
3151 		if (zc->zc_perm_action == B_FALSE) {
3152 			error = dsl_deleg_can_allow(zc->zc_name,
3153 			    fsaclnv, CRED());
3154 		} else {
3155 			error = dsl_deleg_can_unallow(zc->zc_name,
3156 			    fsaclnv, CRED());
3157 		}
3158 	}
3159 
3160 	if (error == 0)
3161 		error = dsl_deleg_set(zc->zc_name, fsaclnv, zc->zc_perm_action);
3162 
3163 	nvlist_free(fsaclnv);
3164 	return (error);
3165 }
3166 
3167 /*
3168  * inputs:
3169  * zc_name		name of filesystem
3170  *
3171  * outputs:
3172  * zc_nvlist_src{_size}	nvlist of delegated permissions
3173  */
3174 static int
zfs_ioc_get_fsacl(zfs_cmd_t * zc)3175 zfs_ioc_get_fsacl(zfs_cmd_t *zc)
3176 {
3177 	nvlist_t *nvp;
3178 	int error;
3179 
3180 	if ((error = dsl_deleg_get(zc->zc_name, &nvp)) == 0) {
3181 		error = put_nvlist(zc, nvp);
3182 		nvlist_free(nvp);
3183 	}
3184 
3185 	return (error);
3186 }
3187 
3188 static void
zfs_create_cb(objset_t * os,void * arg,cred_t * cr,dmu_tx_t * tx)3189 zfs_create_cb(objset_t *os, void *arg, cred_t *cr, dmu_tx_t *tx)
3190 {
3191 	zfs_creat_t *zct = arg;
3192 
3193 	zfs_create_fs(os, cr, zct->zct_zplprops, tx);
3194 }
3195 
3196 #define	ZFS_PROP_UNDEFINED	((uint64_t)-1)
3197 
3198 /*
3199  * inputs:
3200  * os			parent objset pointer (NULL if root fs)
3201  * fuids_ok		fuids allowed in this version of the spa?
3202  * sa_ok		SAs allowed in this version of the spa?
3203  * createprops		list of properties requested by creator
3204  *
3205  * outputs:
3206  * zplprops	values for the zplprops we attach to the master node object
3207  * is_ci	true if requested file system will be purely case-insensitive
3208  *
3209  * Determine the settings for utf8only, normalization and
3210  * casesensitivity.  Specific values may have been requested by the
3211  * creator and/or we can inherit values from the parent dataset.  If
3212  * the file system is of too early a vintage, a creator can not
3213  * request settings for these properties, even if the requested
3214  * setting is the default value.  We don't actually want to create dsl
3215  * properties for these, so remove them from the source nvlist after
3216  * processing.
3217  */
3218 static int
zfs_fill_zplprops_impl(objset_t * os,uint64_t zplver,boolean_t fuids_ok,boolean_t sa_ok,nvlist_t * createprops,nvlist_t * zplprops,boolean_t * is_ci)3219 zfs_fill_zplprops_impl(objset_t *os, uint64_t zplver,
3220     boolean_t fuids_ok, boolean_t sa_ok, nvlist_t *createprops,
3221     nvlist_t *zplprops, boolean_t *is_ci)
3222 {
3223 	uint64_t sense = ZFS_PROP_UNDEFINED;
3224 	uint64_t norm = ZFS_PROP_UNDEFINED;
3225 	uint64_t u8 = ZFS_PROP_UNDEFINED;
3226 	int error;
3227 
3228 	ASSERT(zplprops != NULL);
3229 
3230 	/* parent dataset must be a filesystem */
3231 	if (os != NULL && os->os_phys->os_type != DMU_OST_ZFS)
3232 		return (SET_ERROR(ZFS_ERR_WRONG_PARENT));
3233 
3234 	/*
3235 	 * Pull out creator prop choices, if any.
3236 	 */
3237 	if (createprops) {
3238 		(void) nvlist_lookup_uint64(createprops,
3239 		    zfs_prop_to_name(ZFS_PROP_VERSION), &zplver);
3240 		(void) nvlist_lookup_uint64(createprops,
3241 		    zfs_prop_to_name(ZFS_PROP_NORMALIZE), &norm);
3242 		(void) nvlist_remove_all(createprops,
3243 		    zfs_prop_to_name(ZFS_PROP_NORMALIZE));
3244 		(void) nvlist_lookup_uint64(createprops,
3245 		    zfs_prop_to_name(ZFS_PROP_UTF8ONLY), &u8);
3246 		(void) nvlist_remove_all(createprops,
3247 		    zfs_prop_to_name(ZFS_PROP_UTF8ONLY));
3248 		(void) nvlist_lookup_uint64(createprops,
3249 		    zfs_prop_to_name(ZFS_PROP_CASE), &sense);
3250 		(void) nvlist_remove_all(createprops,
3251 		    zfs_prop_to_name(ZFS_PROP_CASE));
3252 	}
3253 
3254 	/*
3255 	 * If the zpl version requested is whacky or the file system
3256 	 * or pool is version is too "young" to support normalization
3257 	 * and the creator tried to set a value for one of the props,
3258 	 * error out.
3259 	 */
3260 	if ((zplver < ZPL_VERSION_INITIAL || zplver > ZPL_VERSION) ||
3261 	    (zplver >= ZPL_VERSION_FUID && !fuids_ok) ||
3262 	    (zplver >= ZPL_VERSION_SA && !sa_ok) ||
3263 	    (zplver < ZPL_VERSION_NORMALIZATION &&
3264 	    (norm != ZFS_PROP_UNDEFINED || u8 != ZFS_PROP_UNDEFINED ||
3265 	    sense != ZFS_PROP_UNDEFINED)))
3266 		return (SET_ERROR(ENOTSUP));
3267 
3268 	/*
3269 	 * Put the version in the zplprops
3270 	 */
3271 	VERIFY(nvlist_add_uint64(zplprops,
3272 	    zfs_prop_to_name(ZFS_PROP_VERSION), zplver) == 0);
3273 
3274 	if (norm == ZFS_PROP_UNDEFINED &&
3275 	    (error = zfs_get_zplprop(os, ZFS_PROP_NORMALIZE, &norm)) != 0)
3276 		return (error);
3277 	VERIFY(nvlist_add_uint64(zplprops,
3278 	    zfs_prop_to_name(ZFS_PROP_NORMALIZE), norm) == 0);
3279 
3280 	/*
3281 	 * If we're normalizing, names must always be valid UTF-8 strings.
3282 	 */
3283 	if (norm)
3284 		u8 = 1;
3285 	if (u8 == ZFS_PROP_UNDEFINED &&
3286 	    (error = zfs_get_zplprop(os, ZFS_PROP_UTF8ONLY, &u8)) != 0)
3287 		return (error);
3288 	VERIFY(nvlist_add_uint64(zplprops,
3289 	    zfs_prop_to_name(ZFS_PROP_UTF8ONLY), u8) == 0);
3290 
3291 	if (sense == ZFS_PROP_UNDEFINED &&
3292 	    (error = zfs_get_zplprop(os, ZFS_PROP_CASE, &sense)) != 0)
3293 		return (error);
3294 	VERIFY(nvlist_add_uint64(zplprops,
3295 	    zfs_prop_to_name(ZFS_PROP_CASE), sense) == 0);
3296 
3297 	if (is_ci)
3298 		*is_ci = (sense == ZFS_CASE_INSENSITIVE);
3299 
3300 	return (0);
3301 }
3302 
3303 static int
zfs_fill_zplprops(const char * dataset,nvlist_t * createprops,nvlist_t * zplprops,boolean_t * is_ci)3304 zfs_fill_zplprops(const char *dataset, nvlist_t *createprops,
3305     nvlist_t *zplprops, boolean_t *is_ci)
3306 {
3307 	boolean_t fuids_ok, sa_ok;
3308 	uint64_t zplver = ZPL_VERSION;
3309 	objset_t *os = NULL;
3310 	char parentname[ZFS_MAX_DATASET_NAME_LEN];
3311 	spa_t *spa;
3312 	uint64_t spa_vers;
3313 	int error;
3314 
3315 	zfs_get_parent(dataset, parentname, sizeof (parentname));
3316 
3317 	if ((error = spa_open(dataset, &spa, FTAG)) != 0)
3318 		return (error);
3319 
3320 	spa_vers = spa_version(spa);
3321 	spa_close(spa, FTAG);
3322 
3323 	zplver = zfs_zpl_version_map(spa_vers);
3324 	fuids_ok = (zplver >= ZPL_VERSION_FUID);
3325 	sa_ok = (zplver >= ZPL_VERSION_SA);
3326 
3327 	/*
3328 	 * Open parent object set so we can inherit zplprop values.
3329 	 */
3330 	if ((error = dmu_objset_hold(parentname, FTAG, &os)) != 0)
3331 		return (error);
3332 
3333 	error = zfs_fill_zplprops_impl(os, zplver, fuids_ok, sa_ok, createprops,
3334 	    zplprops, is_ci);
3335 	dmu_objset_rele(os, FTAG);
3336 	return (error);
3337 }
3338 
3339 static int
zfs_fill_zplprops_root(uint64_t spa_vers,nvlist_t * createprops,nvlist_t * zplprops,boolean_t * is_ci)3340 zfs_fill_zplprops_root(uint64_t spa_vers, nvlist_t *createprops,
3341     nvlist_t *zplprops, boolean_t *is_ci)
3342 {
3343 	boolean_t fuids_ok;
3344 	boolean_t sa_ok;
3345 	uint64_t zplver = ZPL_VERSION;
3346 	int error;
3347 
3348 	zplver = zfs_zpl_version_map(spa_vers);
3349 	fuids_ok = (zplver >= ZPL_VERSION_FUID);
3350 	sa_ok = (zplver >= ZPL_VERSION_SA);
3351 
3352 	error = zfs_fill_zplprops_impl(NULL, zplver, fuids_ok, sa_ok,
3353 	    createprops, zplprops, is_ci);
3354 	return (error);
3355 }
3356 
3357 /*
3358  * innvl: {
3359  *     "type" -> dmu_objset_type_t (int32)
3360  *     (optional) "props" -> { prop -> value }
3361  *     (optional) "hidden_args" -> { "wkeydata" -> value }
3362  *         raw uint8_t array of encryption wrapping key data (32 bytes)
3363  * }
3364  *
3365  * outnvl: propname -> error code (int32)
3366  */
3367 
3368 static const zfs_ioc_key_t zfs_keys_create[] = {
3369 	{"type",	DATA_TYPE_INT32,	0},
3370 	{"props",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
3371 	{"hidden_args",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
3372 };
3373 
3374 static int
zfs_ioc_create(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)3375 zfs_ioc_create(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
3376 {
3377 	int error = 0;
3378 	zfs_creat_t zct = { 0 };
3379 	nvlist_t *nvprops = NULL;
3380 	nvlist_t *hidden_args = NULL;
3381 	void (*cbfunc)(objset_t *os, void *arg, cred_t *cr, dmu_tx_t *tx);
3382 	dmu_objset_type_t type;
3383 	boolean_t is_insensitive = B_FALSE;
3384 	dsl_crypto_params_t *dcp = NULL;
3385 
3386 	type = (dmu_objset_type_t)fnvlist_lookup_int32(innvl, "type");
3387 	(void) nvlist_lookup_nvlist(innvl, "props", &nvprops);
3388 	(void) nvlist_lookup_nvlist(innvl, ZPOOL_HIDDEN_ARGS, &hidden_args);
3389 
3390 	switch (type) {
3391 	case DMU_OST_ZFS:
3392 		cbfunc = zfs_create_cb;
3393 		break;
3394 
3395 	case DMU_OST_ZVOL:
3396 		cbfunc = zvol_create_cb;
3397 		break;
3398 
3399 	default:
3400 		cbfunc = NULL;
3401 		break;
3402 	}
3403 	if (strchr(fsname, '@') ||
3404 	    strchr(fsname, '%'))
3405 		return (SET_ERROR(EINVAL));
3406 
3407 	zct.zct_props = nvprops;
3408 
3409 	if (cbfunc == NULL)
3410 		return (SET_ERROR(EINVAL));
3411 
3412 	if (type == DMU_OST_ZVOL) {
3413 		uint64_t volsize, volblocksize;
3414 
3415 		if (nvprops == NULL)
3416 			return (SET_ERROR(EINVAL));
3417 		if (nvlist_lookup_uint64(nvprops,
3418 		    zfs_prop_to_name(ZFS_PROP_VOLSIZE), &volsize) != 0)
3419 			return (SET_ERROR(EINVAL));
3420 
3421 		if ((error = nvlist_lookup_uint64(nvprops,
3422 		    zfs_prop_to_name(ZFS_PROP_VOLBLOCKSIZE),
3423 		    &volblocksize)) != 0 && error != ENOENT)
3424 			return (SET_ERROR(EINVAL));
3425 
3426 		if (error != 0)
3427 			volblocksize = zfs_prop_default_numeric(
3428 			    ZFS_PROP_VOLBLOCKSIZE);
3429 
3430 		if ((error = zvol_check_volblocksize(fsname,
3431 		    volblocksize)) != 0 ||
3432 		    (error = zvol_check_volsize(volsize,
3433 		    volblocksize)) != 0)
3434 			return (error);
3435 	} else if (type == DMU_OST_ZFS) {
3436 		int error;
3437 
3438 		/*
3439 		 * We have to have normalization and
3440 		 * case-folding flags correct when we do the
3441 		 * file system creation, so go figure them out
3442 		 * now.
3443 		 */
3444 		VERIFY(nvlist_alloc(&zct.zct_zplprops,
3445 		    NV_UNIQUE_NAME, KM_SLEEP) == 0);
3446 		error = zfs_fill_zplprops(fsname, nvprops,
3447 		    zct.zct_zplprops, &is_insensitive);
3448 		if (error != 0) {
3449 			nvlist_free(zct.zct_zplprops);
3450 			return (error);
3451 		}
3452 	}
3453 
3454 	error = dsl_crypto_params_create_nvlist(DCP_CMD_NONE, nvprops,
3455 	    hidden_args, &dcp);
3456 	if (error != 0) {
3457 		nvlist_free(zct.zct_zplprops);
3458 		return (error);
3459 	}
3460 
3461 	error = dmu_objset_create(fsname, type,
3462 	    is_insensitive ? DS_FLAG_CI_DATASET : 0, dcp, cbfunc, &zct);
3463 
3464 	nvlist_free(zct.zct_zplprops);
3465 	dsl_crypto_params_free(dcp, !!error);
3466 
3467 	/*
3468 	 * It would be nice to do this atomically.
3469 	 */
3470 	if (error == 0) {
3471 		error = zfs_set_prop_nvlist(fsname, ZPROP_SRC_LOCAL,
3472 		    nvprops, outnvl);
3473 		if (error != 0) {
3474 			spa_t *spa;
3475 			int error2;
3476 
3477 			/*
3478 			 * Volumes will return EBUSY and cannot be destroyed
3479 			 * until all asynchronous minor handling (e.g. from
3480 			 * setting the volmode property) has completed. Wait for
3481 			 * the spa_zvol_taskq to drain then retry.
3482 			 */
3483 			error2 = dsl_destroy_head(fsname);
3484 			while ((error2 == EBUSY) && (type == DMU_OST_ZVOL)) {
3485 				error2 = spa_open(fsname, &spa, FTAG);
3486 				if (error2 == 0) {
3487 					taskq_wait(spa->spa_zvol_taskq);
3488 					spa_close(spa, FTAG);
3489 				}
3490 				error2 = dsl_destroy_head(fsname);
3491 			}
3492 		}
3493 	}
3494 	return (error);
3495 }
3496 
3497 /*
3498  * innvl: {
3499  *     "origin" -> name of origin snapshot
3500  *     (optional) "props" -> { prop -> value }
3501  *     (optional) "hidden_args" -> { "wkeydata" -> value }
3502  *         raw uint8_t array of encryption wrapping key data (32 bytes)
3503  * }
3504  *
3505  * outputs:
3506  * outnvl: propname -> error code (int32)
3507  */
3508 static const zfs_ioc_key_t zfs_keys_clone[] = {
3509 	{"origin",	DATA_TYPE_STRING,	0},
3510 	{"props",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
3511 	{"hidden_args",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
3512 };
3513 
3514 static int
zfs_ioc_clone(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)3515 zfs_ioc_clone(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
3516 {
3517 	int error = 0;
3518 	nvlist_t *nvprops = NULL;
3519 	const char *origin_name;
3520 
3521 	origin_name = fnvlist_lookup_string(innvl, "origin");
3522 	(void) nvlist_lookup_nvlist(innvl, "props", &nvprops);
3523 
3524 	if (strchr(fsname, '@') ||
3525 	    strchr(fsname, '%'))
3526 		return (SET_ERROR(EINVAL));
3527 
3528 	if (dataset_namecheck(origin_name, NULL, NULL) != 0)
3529 		return (SET_ERROR(EINVAL));
3530 
3531 	error = dmu_objset_clone(fsname, origin_name);
3532 
3533 	/*
3534 	 * It would be nice to do this atomically.
3535 	 */
3536 	if (error == 0) {
3537 		error = zfs_set_prop_nvlist(fsname, ZPROP_SRC_LOCAL,
3538 		    nvprops, outnvl);
3539 		if (error != 0)
3540 			(void) dsl_destroy_head(fsname);
3541 	}
3542 	return (error);
3543 }
3544 
3545 static const zfs_ioc_key_t zfs_keys_remap[] = {
3546 	/* no nvl keys */
3547 };
3548 
3549 static int
zfs_ioc_remap(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)3550 zfs_ioc_remap(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
3551 {
3552 	/* This IOCTL is no longer supported. */
3553 	(void) fsname, (void) innvl, (void) outnvl;
3554 	return (0);
3555 }
3556 
3557 /*
3558  * innvl: {
3559  *     "snaps" -> { snapshot1, snapshot2 }
3560  *     (optional) "props" -> { prop -> value (string) }
3561  * }
3562  *
3563  * outnvl: snapshot -> error code (int32)
3564  */
3565 static const zfs_ioc_key_t zfs_keys_snapshot[] = {
3566 	{"snaps",	DATA_TYPE_NVLIST,	0},
3567 	{"props",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
3568 };
3569 
3570 static int
zfs_ioc_snapshot(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3571 zfs_ioc_snapshot(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3572 {
3573 	nvlist_t *snaps;
3574 	nvlist_t *props = NULL;
3575 	int error, poollen;
3576 	nvpair_t *pair;
3577 
3578 	(void) nvlist_lookup_nvlist(innvl, "props", &props);
3579 	if (!nvlist_empty(props) &&
3580 	    zfs_earlier_version(poolname, SPA_VERSION_SNAP_PROPS))
3581 		return (SET_ERROR(ENOTSUP));
3582 	if ((error = zfs_check_userprops(props)) != 0)
3583 		return (error);
3584 
3585 	snaps = fnvlist_lookup_nvlist(innvl, "snaps");
3586 	poollen = strlen(poolname);
3587 	for (pair = nvlist_next_nvpair(snaps, NULL); pair != NULL;
3588 	    pair = nvlist_next_nvpair(snaps, pair)) {
3589 		const char *name = nvpair_name(pair);
3590 		char *cp = strchr(name, '@');
3591 
3592 		/*
3593 		 * The snap name must contain an @, and the part after it must
3594 		 * contain only valid characters.
3595 		 */
3596 		if (cp == NULL ||
3597 		    zfs_component_namecheck(cp + 1, NULL, NULL) != 0)
3598 			return (SET_ERROR(EINVAL));
3599 
3600 		/*
3601 		 * The snap must be in the specified pool.
3602 		 */
3603 		if (strncmp(name, poolname, poollen) != 0 ||
3604 		    (name[poollen] != '/' && name[poollen] != '@'))
3605 			return (SET_ERROR(EXDEV));
3606 
3607 		/*
3608 		 * Check for permission to set the properties on the fs.
3609 		 */
3610 		if (!nvlist_empty(props)) {
3611 			*cp = '\0';
3612 			error = zfs_secpolicy_write_perms(name,
3613 			    ZFS_DELEG_PERM_USERPROP, CRED());
3614 			*cp = '@';
3615 			if (error != 0)
3616 				return (error);
3617 		}
3618 
3619 		/* This must be the only snap of this fs. */
3620 		for (nvpair_t *pair2 = nvlist_next_nvpair(snaps, pair);
3621 		    pair2 != NULL; pair2 = nvlist_next_nvpair(snaps, pair2)) {
3622 			if (strncmp(name, nvpair_name(pair2), cp - name + 1)
3623 			    == 0) {
3624 				return (SET_ERROR(EXDEV));
3625 			}
3626 		}
3627 	}
3628 
3629 	error = dsl_dataset_snapshot(snaps, props, outnvl);
3630 
3631 	return (error);
3632 }
3633 
3634 /*
3635  * innvl: "message" -> string
3636  */
3637 static const zfs_ioc_key_t zfs_keys_log_history[] = {
3638 	{"message",	DATA_TYPE_STRING,	0},
3639 };
3640 
3641 static int
zfs_ioc_log_history(const char * unused,nvlist_t * innvl,nvlist_t * outnvl)3642 zfs_ioc_log_history(const char *unused, nvlist_t *innvl, nvlist_t *outnvl)
3643 {
3644 	(void) unused, (void) outnvl;
3645 	const char *message;
3646 	char *poolname;
3647 	spa_t *spa;
3648 	int error;
3649 
3650 	/*
3651 	 * The poolname in the ioctl is not set, we get it from the TSD,
3652 	 * which was set at the end of the last successful ioctl that allows
3653 	 * logging.  The secpolicy func already checked that it is set.
3654 	 * Only one log ioctl is allowed after each successful ioctl, so
3655 	 * we clear the TSD here.
3656 	 */
3657 	poolname = tsd_get(zfs_allow_log_key);
3658 	if (poolname == NULL)
3659 		return (SET_ERROR(EINVAL));
3660 	(void) tsd_set(zfs_allow_log_key, NULL);
3661 	error = spa_open(poolname, &spa, FTAG);
3662 	kmem_strfree(poolname);
3663 	if (error != 0)
3664 		return (error);
3665 
3666 	message = fnvlist_lookup_string(innvl, "message");
3667 
3668 	if (spa_version(spa) < SPA_VERSION_ZPOOL_HISTORY) {
3669 		spa_close(spa, FTAG);
3670 		return (SET_ERROR(ENOTSUP));
3671 	}
3672 
3673 	error = spa_history_log(spa, message);
3674 	spa_close(spa, FTAG);
3675 	return (error);
3676 }
3677 
3678 /*
3679  * This ioctl is used to set the bootenv configuration on the current
3680  * pool. This configuration is stored in the second padding area of the label,
3681  * and it is used by the bootloader(s) to store the bootloader and/or system
3682  * specific data.
3683  * The data is stored as nvlist data stream, and is protected by
3684  * an embedded checksum.
3685  * The version can have two possible values:
3686  * VB_RAW: nvlist should have key GRUB_ENVMAP, value DATA_TYPE_STRING.
3687  * VB_NVLIST: nvlist with arbitrary <key, value> pairs.
3688  */
3689 static const zfs_ioc_key_t zfs_keys_set_bootenv[] = {
3690 	{"version",	DATA_TYPE_UINT64,	0},
3691 	{"<keys>",	DATA_TYPE_ANY, ZK_OPTIONAL | ZK_WILDCARDLIST},
3692 };
3693 
3694 static int
zfs_ioc_set_bootenv(const char * name,nvlist_t * innvl,nvlist_t * outnvl)3695 zfs_ioc_set_bootenv(const char *name, nvlist_t *innvl, nvlist_t *outnvl)
3696 {
3697 	int error;
3698 	spa_t *spa;
3699 
3700 	if ((error = spa_open(name, &spa, FTAG)) != 0)
3701 		return (error);
3702 	spa_vdev_state_enter(spa, SCL_ALL);
3703 	error = vdev_label_write_bootenv(spa->spa_root_vdev, innvl);
3704 	(void) spa_vdev_state_exit(spa, NULL, 0);
3705 	spa_close(spa, FTAG);
3706 	return (error);
3707 }
3708 
3709 static const zfs_ioc_key_t zfs_keys_get_bootenv[] = {
3710 	/* no nvl keys */
3711 };
3712 
3713 static int
zfs_ioc_get_bootenv(const char * name,nvlist_t * innvl,nvlist_t * outnvl)3714 zfs_ioc_get_bootenv(const char *name, nvlist_t *innvl, nvlist_t *outnvl)
3715 {
3716 	spa_t *spa;
3717 	int error;
3718 
3719 	if ((error = spa_open(name, &spa, FTAG)) != 0)
3720 		return (error);
3721 	spa_vdev_state_enter(spa, SCL_ALL);
3722 	error = vdev_label_read_bootenv(spa->spa_root_vdev, outnvl);
3723 	(void) spa_vdev_state_exit(spa, NULL, 0);
3724 	spa_close(spa, FTAG);
3725 	return (error);
3726 }
3727 
3728 /*
3729  * The dp_config_rwlock must not be held when calling this, because the
3730  * unmount may need to write out data.
3731  *
3732  * This function is best-effort.  Callers must deal gracefully if it
3733  * remains mounted (or is remounted after this call).
3734  *
3735  * Returns 0 if the argument is not a snapshot, or it is not currently a
3736  * filesystem, or we were able to unmount it.  Returns error code otherwise.
3737  */
3738 void
zfs_unmount_snap(const char * snapname)3739 zfs_unmount_snap(const char *snapname)
3740 {
3741 	if (strchr(snapname, '@') == NULL)
3742 		return;
3743 
3744 	(void) zfsctl_snapshot_unmount(snapname, MNT_FORCE);
3745 }
3746 
3747 static int
zfs_unmount_snap_cb(const char * snapname,void * arg)3748 zfs_unmount_snap_cb(const char *snapname, void *arg)
3749 {
3750 	(void) arg;
3751 	zfs_unmount_snap(snapname);
3752 	return (0);
3753 }
3754 
3755 /*
3756  * When a clone is destroyed, its origin may also need to be destroyed,
3757  * in which case it must be unmounted.  This routine will do that unmount
3758  * if necessary.
3759  */
3760 void
zfs_destroy_unmount_origin(const char * fsname)3761 zfs_destroy_unmount_origin(const char *fsname)
3762 {
3763 	int error;
3764 	objset_t *os;
3765 	dsl_dataset_t *ds;
3766 
3767 	error = dmu_objset_hold(fsname, FTAG, &os);
3768 	if (error != 0)
3769 		return;
3770 	ds = dmu_objset_ds(os);
3771 	if (dsl_dir_is_clone(ds->ds_dir) && DS_IS_DEFER_DESTROY(ds->ds_prev)) {
3772 		char originname[ZFS_MAX_DATASET_NAME_LEN];
3773 		dsl_dataset_name(ds->ds_prev, originname);
3774 		dmu_objset_rele(os, FTAG);
3775 		zfs_unmount_snap(originname);
3776 	} else {
3777 		dmu_objset_rele(os, FTAG);
3778 	}
3779 }
3780 
3781 /*
3782  * innvl: {
3783  *     "snaps" -> { snapshot1, snapshot2 }
3784  *     (optional boolean) "defer"
3785  * }
3786  *
3787  * outnvl: snapshot -> error code (int32)
3788  */
3789 static const zfs_ioc_key_t zfs_keys_destroy_snaps[] = {
3790 	{"snaps",	DATA_TYPE_NVLIST,	0},
3791 	{"defer",	DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
3792 };
3793 
3794 static int
zfs_ioc_destroy_snaps(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3795 zfs_ioc_destroy_snaps(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3796 {
3797 	int poollen;
3798 	nvlist_t *snaps;
3799 	nvpair_t *pair;
3800 	boolean_t defer;
3801 	spa_t *spa;
3802 
3803 	snaps = fnvlist_lookup_nvlist(innvl, "snaps");
3804 	defer = nvlist_exists(innvl, "defer");
3805 
3806 	poollen = strlen(poolname);
3807 	for (pair = nvlist_next_nvpair(snaps, NULL); pair != NULL;
3808 	    pair = nvlist_next_nvpair(snaps, pair)) {
3809 		const char *name = nvpair_name(pair);
3810 
3811 		/*
3812 		 * The snap must be in the specified pool to prevent the
3813 		 * invalid removal of zvol minors below.
3814 		 */
3815 		if (strncmp(name, poolname, poollen) != 0 ||
3816 		    (name[poollen] != '/' && name[poollen] != '@'))
3817 			return (SET_ERROR(EXDEV));
3818 
3819 		zfs_unmount_snap(nvpair_name(pair));
3820 		if (spa_open(name, &spa, FTAG) == 0) {
3821 			zvol_remove_minors(spa, name, B_TRUE);
3822 			spa_close(spa, FTAG);
3823 		}
3824 	}
3825 
3826 	return (dsl_destroy_snapshots_nvl(snaps, defer, outnvl));
3827 }
3828 
3829 /*
3830  * Create bookmarks. The bookmark names are of the form <fs>#<bmark>.
3831  * All bookmarks and snapshots must be in the same pool.
3832  * dsl_bookmark_create_nvl_validate describes the nvlist schema in more detail.
3833  *
3834  * innvl: {
3835  *     new_bookmark1 -> existing_snapshot,
3836  *     new_bookmark2 -> existing_bookmark,
3837  * }
3838  *
3839  * outnvl: bookmark -> error code (int32)
3840  *
3841  */
3842 static const zfs_ioc_key_t zfs_keys_bookmark[] = {
3843 	{"<bookmark>...",	DATA_TYPE_STRING,	ZK_WILDCARDLIST},
3844 };
3845 
3846 static int
zfs_ioc_bookmark(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3847 zfs_ioc_bookmark(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3848 {
3849 	(void) poolname;
3850 	return (dsl_bookmark_create(innvl, outnvl));
3851 }
3852 
3853 /*
3854  * innvl: {
3855  *     property 1, property 2, ...
3856  * }
3857  *
3858  * outnvl: {
3859  *     bookmark name 1 -> { property 1, property 2, ... },
3860  *     bookmark name 2 -> { property 1, property 2, ... }
3861  * }
3862  *
3863  */
3864 static const zfs_ioc_key_t zfs_keys_get_bookmarks[] = {
3865 	{"<property>...", DATA_TYPE_BOOLEAN, ZK_WILDCARDLIST | ZK_OPTIONAL},
3866 };
3867 
3868 static int
zfs_ioc_get_bookmarks(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)3869 zfs_ioc_get_bookmarks(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
3870 {
3871 	return (dsl_get_bookmarks(fsname, innvl, outnvl));
3872 }
3873 
3874 /*
3875  * innvl is not used.
3876  *
3877  * outnvl: {
3878  *     property 1, property 2, ...
3879  * }
3880  *
3881  */
3882 static const zfs_ioc_key_t zfs_keys_get_bookmark_props[] = {
3883 	/* no nvl keys */
3884 };
3885 
3886 static int
zfs_ioc_get_bookmark_props(const char * bookmark,nvlist_t * innvl,nvlist_t * outnvl)3887 zfs_ioc_get_bookmark_props(const char *bookmark, nvlist_t *innvl,
3888     nvlist_t *outnvl)
3889 {
3890 	(void) innvl;
3891 	char fsname[ZFS_MAX_DATASET_NAME_LEN];
3892 	char *bmname;
3893 
3894 	bmname = strchr(bookmark, '#');
3895 	if (bmname == NULL)
3896 		return (SET_ERROR(EINVAL));
3897 	bmname++;
3898 
3899 	(void) strlcpy(fsname, bookmark, sizeof (fsname));
3900 	*(strchr(fsname, '#')) = '\0';
3901 
3902 	return (dsl_get_bookmark_props(fsname, bmname, outnvl));
3903 }
3904 
3905 /*
3906  * innvl: {
3907  *     bookmark name 1, bookmark name 2
3908  * }
3909  *
3910  * outnvl: bookmark -> error code (int32)
3911  *
3912  */
3913 static const zfs_ioc_key_t zfs_keys_destroy_bookmarks[] = {
3914 	{"<bookmark>...",	DATA_TYPE_BOOLEAN,	ZK_WILDCARDLIST},
3915 };
3916 
3917 static int
zfs_ioc_destroy_bookmarks(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3918 zfs_ioc_destroy_bookmarks(const char *poolname, nvlist_t *innvl,
3919     nvlist_t *outnvl)
3920 {
3921 	int error, poollen;
3922 
3923 	poollen = strlen(poolname);
3924 	for (nvpair_t *pair = nvlist_next_nvpair(innvl, NULL);
3925 	    pair != NULL; pair = nvlist_next_nvpair(innvl, pair)) {
3926 		const char *name = nvpair_name(pair);
3927 		const char *cp = strchr(name, '#');
3928 
3929 		/*
3930 		 * The bookmark name must contain an #, and the part after it
3931 		 * must contain only valid characters.
3932 		 */
3933 		if (cp == NULL ||
3934 		    zfs_component_namecheck(cp + 1, NULL, NULL) != 0)
3935 			return (SET_ERROR(EINVAL));
3936 
3937 		/*
3938 		 * The bookmark must be in the specified pool.
3939 		 */
3940 		if (strncmp(name, poolname, poollen) != 0 ||
3941 		    (name[poollen] != '/' && name[poollen] != '#'))
3942 			return (SET_ERROR(EXDEV));
3943 	}
3944 
3945 	error = dsl_bookmark_destroy(innvl, outnvl);
3946 	return (error);
3947 }
3948 
3949 static const zfs_ioc_key_t zfs_keys_channel_program[] = {
3950 	{"program",	DATA_TYPE_STRING,		0},
3951 	{"arg",		DATA_TYPE_ANY,			0},
3952 	{"sync",	DATA_TYPE_BOOLEAN_VALUE,	ZK_OPTIONAL},
3953 	{"instrlimit",	DATA_TYPE_UINT64,		ZK_OPTIONAL},
3954 	{"memlimit",	DATA_TYPE_UINT64,		ZK_OPTIONAL},
3955 };
3956 
3957 static int
zfs_ioc_channel_program(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3958 zfs_ioc_channel_program(const char *poolname, nvlist_t *innvl,
3959     nvlist_t *outnvl)
3960 {
3961 	const char *program;
3962 	uint64_t instrlimit, memlimit;
3963 	boolean_t sync_flag;
3964 	nvpair_t *nvarg = NULL;
3965 
3966 	program = fnvlist_lookup_string(innvl, ZCP_ARG_PROGRAM);
3967 	if (0 != nvlist_lookup_boolean_value(innvl, ZCP_ARG_SYNC, &sync_flag)) {
3968 		sync_flag = B_TRUE;
3969 	}
3970 	if (0 != nvlist_lookup_uint64(innvl, ZCP_ARG_INSTRLIMIT, &instrlimit)) {
3971 		instrlimit = ZCP_DEFAULT_INSTRLIMIT;
3972 	}
3973 	if (0 != nvlist_lookup_uint64(innvl, ZCP_ARG_MEMLIMIT, &memlimit)) {
3974 		memlimit = ZCP_DEFAULT_MEMLIMIT;
3975 	}
3976 	nvarg = fnvlist_lookup_nvpair(innvl, ZCP_ARG_ARGLIST);
3977 
3978 	if (instrlimit == 0 || instrlimit > zfs_lua_max_instrlimit)
3979 		return (SET_ERROR(EINVAL));
3980 	if (memlimit == 0 || memlimit > zfs_lua_max_memlimit)
3981 		return (SET_ERROR(EINVAL));
3982 
3983 	return (zcp_eval(poolname, program, sync_flag, instrlimit, memlimit,
3984 	    nvarg, outnvl));
3985 }
3986 
3987 /*
3988  * innvl: unused
3989  * outnvl: empty
3990  */
3991 static const zfs_ioc_key_t zfs_keys_pool_checkpoint[] = {
3992 	/* no nvl keys */
3993 };
3994 
3995 static int
zfs_ioc_pool_checkpoint(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)3996 zfs_ioc_pool_checkpoint(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
3997 {
3998 	(void) innvl, (void) outnvl;
3999 	return (spa_checkpoint(poolname));
4000 }
4001 
4002 /*
4003  * innvl: unused
4004  * outnvl: empty
4005  */
4006 static const zfs_ioc_key_t zfs_keys_pool_discard_checkpoint[] = {
4007 	/* no nvl keys */
4008 };
4009 
4010 static int
zfs_ioc_pool_discard_checkpoint(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)4011 zfs_ioc_pool_discard_checkpoint(const char *poolname, nvlist_t *innvl,
4012     nvlist_t *outnvl)
4013 {
4014 	(void) innvl, (void) outnvl;
4015 	return (spa_checkpoint_discard(poolname));
4016 }
4017 
4018 /*
4019  * inputs:
4020  * zc_name		name of dataset to destroy
4021  * zc_defer_destroy	mark for deferred destroy
4022  *
4023  * outputs:		none
4024  */
4025 static int
zfs_ioc_destroy(zfs_cmd_t * zc)4026 zfs_ioc_destroy(zfs_cmd_t *zc)
4027 {
4028 	objset_t *os;
4029 	dmu_objset_type_t ost;
4030 	int err;
4031 
4032 	err = dmu_objset_hold(zc->zc_name, FTAG, &os);
4033 	if (err != 0)
4034 		return (err);
4035 	ost = dmu_objset_type(os);
4036 	dmu_objset_rele(os, FTAG);
4037 
4038 	if (ost == DMU_OST_ZFS)
4039 		zfs_unmount_snap(zc->zc_name);
4040 
4041 	if (strchr(zc->zc_name, '@')) {
4042 		err = dsl_destroy_snapshot(zc->zc_name, zc->zc_defer_destroy);
4043 	} else {
4044 		err = dsl_destroy_head(zc->zc_name);
4045 		if (err == EEXIST) {
4046 			/*
4047 			 * It is possible that the given DS may have
4048 			 * hidden child (%recv) datasets - "leftovers"
4049 			 * resulting from the previously interrupted
4050 			 * 'zfs receive'.
4051 			 *
4052 			 * 6 extra bytes for /%recv
4053 			 */
4054 			char namebuf[ZFS_MAX_DATASET_NAME_LEN + 6];
4055 
4056 			if (snprintf(namebuf, sizeof (namebuf), "%s/%s",
4057 			    zc->zc_name, recv_clone_name) >=
4058 			    sizeof (namebuf))
4059 				return (SET_ERROR(EINVAL));
4060 
4061 			/*
4062 			 * Try to remove the hidden child (%recv) and after
4063 			 * that try to remove the target dataset.
4064 			 * If the hidden child (%recv) does not exist
4065 			 * the original error (EEXIST) will be returned
4066 			 */
4067 			err = dsl_destroy_head(namebuf);
4068 			if (err == 0)
4069 				err = dsl_destroy_head(zc->zc_name);
4070 			else if (err == ENOENT)
4071 				err = SET_ERROR(EEXIST);
4072 		}
4073 	}
4074 
4075 	return (err);
4076 }
4077 
4078 /*
4079  * innvl: {
4080  *     "initialize_command" -> POOL_INITIALIZE_{CANCEL|START|SUSPEND} (uint64)
4081  *     "initialize_vdevs": { -> guids to initialize (nvlist)
4082  *         "vdev_path_1": vdev_guid_1, (uint64),
4083  *         "vdev_path_2": vdev_guid_2, (uint64),
4084  *         ...
4085  *     },
4086  * }
4087  *
4088  * outnvl: {
4089  *     "initialize_vdevs": { -> initialization errors (nvlist)
4090  *         "vdev_path_1": errno, see function body for possible errnos (uint64)
4091  *         "vdev_path_2": errno, ... (uint64)
4092  *         ...
4093  *     }
4094  * }
4095  *
4096  * EINVAL is returned for an unknown commands or if any of the provided vdev
4097  * guids have be specified with a type other than uint64.
4098  */
4099 static const zfs_ioc_key_t zfs_keys_pool_initialize[] = {
4100 	{ZPOOL_INITIALIZE_COMMAND,	DATA_TYPE_UINT64,	0},
4101 	{ZPOOL_INITIALIZE_VDEVS,	DATA_TYPE_NVLIST,	0}
4102 };
4103 
4104 static int
zfs_ioc_pool_initialize(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)4105 zfs_ioc_pool_initialize(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
4106 {
4107 	uint64_t cmd_type;
4108 	if (nvlist_lookup_uint64(innvl, ZPOOL_INITIALIZE_COMMAND,
4109 	    &cmd_type) != 0) {
4110 		return (SET_ERROR(EINVAL));
4111 	}
4112 
4113 	if (!(cmd_type == POOL_INITIALIZE_CANCEL ||
4114 	    cmd_type == POOL_INITIALIZE_START ||
4115 	    cmd_type == POOL_INITIALIZE_SUSPEND ||
4116 	    cmd_type == POOL_INITIALIZE_UNINIT)) {
4117 		return (SET_ERROR(EINVAL));
4118 	}
4119 
4120 	nvlist_t *vdev_guids;
4121 	if (nvlist_lookup_nvlist(innvl, ZPOOL_INITIALIZE_VDEVS,
4122 	    &vdev_guids) != 0) {
4123 		return (SET_ERROR(EINVAL));
4124 	}
4125 
4126 	for (nvpair_t *pair = nvlist_next_nvpair(vdev_guids, NULL);
4127 	    pair != NULL; pair = nvlist_next_nvpair(vdev_guids, pair)) {
4128 		uint64_t vdev_guid;
4129 		if (nvpair_value_uint64(pair, &vdev_guid) != 0) {
4130 			return (SET_ERROR(EINVAL));
4131 		}
4132 	}
4133 
4134 	spa_t *spa;
4135 	int error = spa_open(poolname, &spa, FTAG);
4136 	if (error != 0)
4137 		return (error);
4138 
4139 	nvlist_t *vdev_errlist = fnvlist_alloc();
4140 	int total_errors = spa_vdev_initialize(spa, vdev_guids, cmd_type,
4141 	    vdev_errlist);
4142 
4143 	if (fnvlist_size(vdev_errlist) > 0) {
4144 		fnvlist_add_nvlist(outnvl, ZPOOL_INITIALIZE_VDEVS,
4145 		    vdev_errlist);
4146 	}
4147 	fnvlist_free(vdev_errlist);
4148 
4149 	spa_close(spa, FTAG);
4150 	return (total_errors > 0 ? SET_ERROR(EINVAL) : 0);
4151 }
4152 
4153 /*
4154  * innvl: {
4155  *     "trim_command" -> POOL_TRIM_{CANCEL|START|SUSPEND} (uint64)
4156  *     "trim_vdevs": { -> guids to TRIM (nvlist)
4157  *         "vdev_path_1": vdev_guid_1, (uint64),
4158  *         "vdev_path_2": vdev_guid_2, (uint64),
4159  *         ...
4160  *     },
4161  *     "trim_rate" -> Target TRIM rate in bytes/sec.
4162  *     "trim_secure" -> Set to request a secure TRIM.
4163  * }
4164  *
4165  * outnvl: {
4166  *     "trim_vdevs": { -> TRIM errors (nvlist)
4167  *         "vdev_path_1": errno, see function body for possible errnos (uint64)
4168  *         "vdev_path_2": errno, ... (uint64)
4169  *         ...
4170  *     }
4171  * }
4172  *
4173  * EINVAL is returned for an unknown commands or if any of the provided vdev
4174  * guids have be specified with a type other than uint64.
4175  */
4176 static const zfs_ioc_key_t zfs_keys_pool_trim[] = {
4177 	{ZPOOL_TRIM_COMMAND,	DATA_TYPE_UINT64,		0},
4178 	{ZPOOL_TRIM_VDEVS,	DATA_TYPE_NVLIST,		0},
4179 	{ZPOOL_TRIM_RATE,	DATA_TYPE_UINT64,		ZK_OPTIONAL},
4180 	{ZPOOL_TRIM_SECURE,	DATA_TYPE_BOOLEAN_VALUE,	ZK_OPTIONAL},
4181 };
4182 
4183 static int
zfs_ioc_pool_trim(const char * poolname,nvlist_t * innvl,nvlist_t * outnvl)4184 zfs_ioc_pool_trim(const char *poolname, nvlist_t *innvl, nvlist_t *outnvl)
4185 {
4186 	uint64_t cmd_type;
4187 	if (nvlist_lookup_uint64(innvl, ZPOOL_TRIM_COMMAND, &cmd_type) != 0)
4188 		return (SET_ERROR(EINVAL));
4189 
4190 	if (!(cmd_type == POOL_TRIM_CANCEL ||
4191 	    cmd_type == POOL_TRIM_START ||
4192 	    cmd_type == POOL_TRIM_SUSPEND)) {
4193 		return (SET_ERROR(EINVAL));
4194 	}
4195 
4196 	nvlist_t *vdev_guids;
4197 	if (nvlist_lookup_nvlist(innvl, ZPOOL_TRIM_VDEVS, &vdev_guids) != 0)
4198 		return (SET_ERROR(EINVAL));
4199 
4200 	for (nvpair_t *pair = nvlist_next_nvpair(vdev_guids, NULL);
4201 	    pair != NULL; pair = nvlist_next_nvpair(vdev_guids, pair)) {
4202 		uint64_t vdev_guid;
4203 		if (nvpair_value_uint64(pair, &vdev_guid) != 0) {
4204 			return (SET_ERROR(EINVAL));
4205 		}
4206 	}
4207 
4208 	/* Optional, defaults to maximum rate when not provided */
4209 	uint64_t rate;
4210 	if (nvlist_lookup_uint64(innvl, ZPOOL_TRIM_RATE, &rate) != 0)
4211 		rate = 0;
4212 
4213 	/* Optional, defaults to standard TRIM when not provided */
4214 	boolean_t secure;
4215 	if (nvlist_lookup_boolean_value(innvl, ZPOOL_TRIM_SECURE,
4216 	    &secure) != 0) {
4217 		secure = B_FALSE;
4218 	}
4219 
4220 	spa_t *spa;
4221 	int error = spa_open(poolname, &spa, FTAG);
4222 	if (error != 0)
4223 		return (error);
4224 
4225 	nvlist_t *vdev_errlist = fnvlist_alloc();
4226 	int total_errors = spa_vdev_trim(spa, vdev_guids, cmd_type,
4227 	    rate, !!zfs_trim_metaslab_skip, secure, vdev_errlist);
4228 
4229 	if (fnvlist_size(vdev_errlist) > 0)
4230 		fnvlist_add_nvlist(outnvl, ZPOOL_TRIM_VDEVS, vdev_errlist);
4231 
4232 	fnvlist_free(vdev_errlist);
4233 
4234 	spa_close(spa, FTAG);
4235 	return (total_errors > 0 ? SET_ERROR(EINVAL) : 0);
4236 }
4237 
4238 /*
4239  * This ioctl waits for activity of a particular type to complete. If there is
4240  * no activity of that type in progress, it returns immediately, and the
4241  * returned value "waited" is false. If there is activity in progress, and no
4242  * tag is passed in, the ioctl blocks until all activity of that type is
4243  * complete, and then returns with "waited" set to true.
4244  *
4245  * If a tag is provided, it identifies a particular instance of an activity to
4246  * wait for. Currently, this is only valid for use with 'initialize', because
4247  * that is the only activity for which there can be multiple instances running
4248  * concurrently. In the case of 'initialize', the tag corresponds to the guid of
4249  * the vdev on which to wait.
4250  *
4251  * If a thread waiting in the ioctl receives a signal, the call will return
4252  * immediately, and the return value will be EINTR.
4253  *
4254  * innvl: {
4255  *     "wait_activity" -> int32_t
4256  *     (optional) "wait_tag" -> uint64_t
4257  * }
4258  *
4259  * outnvl: "waited" -> boolean_t
4260  */
4261 static const zfs_ioc_key_t zfs_keys_pool_wait[] = {
4262 	{ZPOOL_WAIT_ACTIVITY,	DATA_TYPE_INT32,		0},
4263 	{ZPOOL_WAIT_TAG,	DATA_TYPE_UINT64,		ZK_OPTIONAL},
4264 };
4265 
4266 static int
zfs_ioc_wait(const char * name,nvlist_t * innvl,nvlist_t * outnvl)4267 zfs_ioc_wait(const char *name, nvlist_t *innvl, nvlist_t *outnvl)
4268 {
4269 	int32_t activity;
4270 	uint64_t tag;
4271 	boolean_t waited;
4272 	int error;
4273 
4274 	if (nvlist_lookup_int32(innvl, ZPOOL_WAIT_ACTIVITY, &activity) != 0)
4275 		return (EINVAL);
4276 
4277 	if (nvlist_lookup_uint64(innvl, ZPOOL_WAIT_TAG, &tag) == 0)
4278 		error = spa_wait_tag(name, activity, tag, &waited);
4279 	else
4280 		error = spa_wait(name, activity, &waited);
4281 
4282 	if (error == 0)
4283 		fnvlist_add_boolean_value(outnvl, ZPOOL_WAIT_WAITED, waited);
4284 
4285 	return (error);
4286 }
4287 
4288 /*
4289  * This ioctl waits for activity of a particular type to complete. If there is
4290  * no activity of that type in progress, it returns immediately, and the
4291  * returned value "waited" is false. If there is activity in progress, and no
4292  * tag is passed in, the ioctl blocks until all activity of that type is
4293  * complete, and then returns with "waited" set to true.
4294  *
4295  * If a thread waiting in the ioctl receives a signal, the call will return
4296  * immediately, and the return value will be EINTR.
4297  *
4298  * innvl: {
4299  *     "wait_activity" -> int32_t
4300  * }
4301  *
4302  * outnvl: "waited" -> boolean_t
4303  */
4304 static const zfs_ioc_key_t zfs_keys_fs_wait[] = {
4305 	{ZFS_WAIT_ACTIVITY,	DATA_TYPE_INT32,		0},
4306 };
4307 
4308 static int
zfs_ioc_wait_fs(const char * name,nvlist_t * innvl,nvlist_t * outnvl)4309 zfs_ioc_wait_fs(const char *name, nvlist_t *innvl, nvlist_t *outnvl)
4310 {
4311 	int32_t activity;
4312 	boolean_t waited = B_FALSE;
4313 	int error;
4314 	dsl_pool_t *dp;
4315 	dsl_dir_t *dd;
4316 	dsl_dataset_t *ds;
4317 
4318 	if (nvlist_lookup_int32(innvl, ZFS_WAIT_ACTIVITY, &activity) != 0)
4319 		return (SET_ERROR(EINVAL));
4320 
4321 	if (activity >= ZFS_WAIT_NUM_ACTIVITIES || activity < 0)
4322 		return (SET_ERROR(EINVAL));
4323 
4324 	if ((error = dsl_pool_hold(name, FTAG, &dp)) != 0)
4325 		return (error);
4326 
4327 	if ((error = dsl_dataset_hold(dp, name, FTAG, &ds)) != 0) {
4328 		dsl_pool_rele(dp, FTAG);
4329 		return (error);
4330 	}
4331 
4332 	dd = ds->ds_dir;
4333 	mutex_enter(&dd->dd_activity_lock);
4334 	dd->dd_activity_waiters++;
4335 
4336 	/*
4337 	 * We get a long-hold here so that the dsl_dataset_t and dsl_dir_t
4338 	 * aren't evicted while we're waiting. Normally this is prevented by
4339 	 * holding the pool, but we can't do that while we're waiting since
4340 	 * that would prevent TXGs from syncing out. Some of the functionality
4341 	 * of long-holds (e.g. preventing deletion) is unnecessary for this
4342 	 * case, since we would cancel the waiters before proceeding with a
4343 	 * deletion. An alternative mechanism for keeping the dataset around
4344 	 * could be developed but this is simpler.
4345 	 */
4346 	dsl_dataset_long_hold(ds, FTAG);
4347 	dsl_pool_rele(dp, FTAG);
4348 
4349 	error = dsl_dir_wait(dd, ds, activity, &waited);
4350 
4351 	dsl_dataset_long_rele(ds, FTAG);
4352 	dd->dd_activity_waiters--;
4353 	if (dd->dd_activity_waiters == 0)
4354 		cv_signal(&dd->dd_activity_cv);
4355 	mutex_exit(&dd->dd_activity_lock);
4356 
4357 	dsl_dataset_rele(ds, FTAG);
4358 
4359 	if (error == 0)
4360 		fnvlist_add_boolean_value(outnvl, ZFS_WAIT_WAITED, waited);
4361 
4362 	return (error);
4363 }
4364 
4365 /*
4366  * fsname is name of dataset to rollback (to most recent snapshot)
4367  *
4368  * innvl may contain name of expected target snapshot
4369  *
4370  * outnvl: "target" -> name of most recent snapshot
4371  * }
4372  */
4373 static const zfs_ioc_key_t zfs_keys_rollback[] = {
4374 	{"target",	DATA_TYPE_STRING,	ZK_OPTIONAL},
4375 };
4376 
4377 static int
zfs_ioc_rollback(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)4378 zfs_ioc_rollback(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
4379 {
4380 	zfsvfs_t *zfsvfs;
4381 	zvol_state_handle_t *zv;
4382 	const char *target = NULL;
4383 	int error;
4384 
4385 	(void) nvlist_lookup_string(innvl, "target", &target);
4386 	if (target != NULL) {
4387 		const char *cp = strchr(target, '@');
4388 
4389 		/*
4390 		 * The snap name must contain an @, and the part after it must
4391 		 * contain only valid characters.
4392 		 */
4393 		if (cp == NULL ||
4394 		    zfs_component_namecheck(cp + 1, NULL, NULL) != 0)
4395 			return (SET_ERROR(EINVAL));
4396 	}
4397 
4398 	if (getzfsvfs(fsname, &zfsvfs) == 0) {
4399 		dsl_dataset_t *ds;
4400 
4401 		ds = dmu_objset_ds(zfsvfs->z_os);
4402 		error = zfs_suspend_fs(zfsvfs);
4403 		if (error == 0) {
4404 			int resume_err;
4405 
4406 			error = dsl_dataset_rollback(fsname, target, zfsvfs,
4407 			    outnvl);
4408 			resume_err = zfs_resume_fs(zfsvfs, ds);
4409 			error = error ? error : resume_err;
4410 		}
4411 		zfs_vfs_rele(zfsvfs);
4412 	} else if ((zv = zvol_suspend(fsname)) != NULL) {
4413 		error = dsl_dataset_rollback(fsname, target, zvol_tag(zv),
4414 		    outnvl);
4415 		zvol_resume(zv);
4416 	} else {
4417 		error = dsl_dataset_rollback(fsname, target, NULL, outnvl);
4418 	}
4419 	return (error);
4420 }
4421 
4422 static int
recursive_unmount(const char * fsname,void * arg)4423 recursive_unmount(const char *fsname, void *arg)
4424 {
4425 	const char *snapname = arg;
4426 	char *fullname;
4427 
4428 	fullname = kmem_asprintf("%s@%s", fsname, snapname);
4429 	zfs_unmount_snap(fullname);
4430 	kmem_strfree(fullname);
4431 
4432 	return (0);
4433 }
4434 
4435 /*
4436  *
4437  * snapname is the snapshot to redact.
4438  * innvl: {
4439  *     "bookname" -> (string)
4440  *         shortname of the redaction bookmark to generate
4441  *     "snapnv" -> (nvlist, values ignored)
4442  *         snapshots to redact snapname with respect to
4443  * }
4444  *
4445  * outnvl is unused
4446  */
4447 
4448 static const zfs_ioc_key_t zfs_keys_redact[] = {
4449 	{"bookname",		DATA_TYPE_STRING,	0},
4450 	{"snapnv",		DATA_TYPE_NVLIST,	0},
4451 };
4452 
4453 static int
zfs_ioc_redact(const char * snapname,nvlist_t * innvl,nvlist_t * outnvl)4454 zfs_ioc_redact(const char *snapname, nvlist_t *innvl, nvlist_t *outnvl)
4455 {
4456 	(void) outnvl;
4457 	nvlist_t *redactnvl = NULL;
4458 	const char *redactbook = NULL;
4459 
4460 	if (nvlist_lookup_nvlist(innvl, "snapnv", &redactnvl) != 0)
4461 		return (SET_ERROR(EINVAL));
4462 	if (fnvlist_num_pairs(redactnvl) == 0)
4463 		return (SET_ERROR(ENXIO));
4464 	if (nvlist_lookup_string(innvl, "bookname", &redactbook) != 0)
4465 		return (SET_ERROR(EINVAL));
4466 
4467 	return (dmu_redact_snap(snapname, redactnvl, redactbook));
4468 }
4469 
4470 /*
4471  * inputs:
4472  * zc_name	old name of dataset
4473  * zc_value	new name of dataset
4474  * zc_cookie	recursive flag (only valid for snapshots)
4475  *
4476  * outputs:	none
4477  */
4478 static int
zfs_ioc_rename(zfs_cmd_t * zc)4479 zfs_ioc_rename(zfs_cmd_t *zc)
4480 {
4481 	objset_t *os;
4482 	dmu_objset_type_t ost;
4483 	boolean_t recursive = zc->zc_cookie & 1;
4484 	boolean_t nounmount = !!(zc->zc_cookie & 2);
4485 	char *at;
4486 	int err;
4487 
4488 	/* "zfs rename" from and to ...%recv datasets should both fail */
4489 	zc->zc_name[sizeof (zc->zc_name) - 1] = '\0';
4490 	zc->zc_value[sizeof (zc->zc_value) - 1] = '\0';
4491 	if (dataset_namecheck(zc->zc_name, NULL, NULL) != 0 ||
4492 	    dataset_namecheck(zc->zc_value, NULL, NULL) != 0 ||
4493 	    strchr(zc->zc_name, '%') || strchr(zc->zc_value, '%'))
4494 		return (SET_ERROR(EINVAL));
4495 
4496 	err = dmu_objset_hold(zc->zc_name, FTAG, &os);
4497 	if (err != 0)
4498 		return (err);
4499 	ost = dmu_objset_type(os);
4500 	dmu_objset_rele(os, FTAG);
4501 
4502 	at = strchr(zc->zc_name, '@');
4503 	if (at != NULL) {
4504 		/* snaps must be in same fs */
4505 		int error;
4506 
4507 		if (strncmp(zc->zc_name, zc->zc_value, at - zc->zc_name + 1))
4508 			return (SET_ERROR(EXDEV));
4509 		*at = '\0';
4510 		if (ost == DMU_OST_ZFS && !nounmount) {
4511 			error = dmu_objset_find(zc->zc_name,
4512 			    recursive_unmount, at + 1,
4513 			    recursive ? DS_FIND_CHILDREN : 0);
4514 			if (error != 0) {
4515 				*at = '@';
4516 				return (error);
4517 			}
4518 		}
4519 		error = dsl_dataset_rename_snapshot(zc->zc_name,
4520 		    at + 1, strchr(zc->zc_value, '@') + 1, recursive);
4521 		*at = '@';
4522 
4523 		return (error);
4524 	} else {
4525 		return (dsl_dir_rename(zc->zc_name, zc->zc_value));
4526 	}
4527 }
4528 
4529 static int
zfs_check_settable(const char * dsname,nvpair_t * pair,cred_t * cr)4530 zfs_check_settable(const char *dsname, nvpair_t *pair, cred_t *cr)
4531 {
4532 	const char *propname = nvpair_name(pair);
4533 	boolean_t issnap = (strchr(dsname, '@') != NULL);
4534 	zfs_prop_t prop = zfs_name_to_prop(propname);
4535 	uint64_t intval, compval;
4536 	int err;
4537 
4538 	if (prop == ZPROP_USERPROP) {
4539 		if (zfs_prop_user(propname)) {
4540 			if ((err = zfs_secpolicy_write_perms(dsname,
4541 			    ZFS_DELEG_PERM_USERPROP, cr)))
4542 				return (err);
4543 			return (0);
4544 		}
4545 
4546 		if (!issnap && zfs_prop_userquota(propname)) {
4547 			const char *perm = NULL;
4548 			const char *uq_prefix =
4549 			    zfs_userquota_prop_prefixes[ZFS_PROP_USERQUOTA];
4550 			const char *gq_prefix =
4551 			    zfs_userquota_prop_prefixes[ZFS_PROP_GROUPQUOTA];
4552 			const char *uiq_prefix =
4553 			    zfs_userquota_prop_prefixes[ZFS_PROP_USEROBJQUOTA];
4554 			const char *giq_prefix =
4555 			    zfs_userquota_prop_prefixes[ZFS_PROP_GROUPOBJQUOTA];
4556 			const char *pq_prefix =
4557 			    zfs_userquota_prop_prefixes[ZFS_PROP_PROJECTQUOTA];
4558 			const char *piq_prefix = zfs_userquota_prop_prefixes[\
4559 			    ZFS_PROP_PROJECTOBJQUOTA];
4560 
4561 			if (strncmp(propname, uq_prefix,
4562 			    strlen(uq_prefix)) == 0) {
4563 				perm = ZFS_DELEG_PERM_USERQUOTA;
4564 			} else if (strncmp(propname, uiq_prefix,
4565 			    strlen(uiq_prefix)) == 0) {
4566 				perm = ZFS_DELEG_PERM_USEROBJQUOTA;
4567 			} else if (strncmp(propname, gq_prefix,
4568 			    strlen(gq_prefix)) == 0) {
4569 				perm = ZFS_DELEG_PERM_GROUPQUOTA;
4570 			} else if (strncmp(propname, giq_prefix,
4571 			    strlen(giq_prefix)) == 0) {
4572 				perm = ZFS_DELEG_PERM_GROUPOBJQUOTA;
4573 			} else if (strncmp(propname, pq_prefix,
4574 			    strlen(pq_prefix)) == 0) {
4575 				perm = ZFS_DELEG_PERM_PROJECTQUOTA;
4576 			} else if (strncmp(propname, piq_prefix,
4577 			    strlen(piq_prefix)) == 0) {
4578 				perm = ZFS_DELEG_PERM_PROJECTOBJQUOTA;
4579 			} else {
4580 				/* {USER|GROUP|PROJECT}USED are read-only */
4581 				return (SET_ERROR(EINVAL));
4582 			}
4583 
4584 			if ((err = zfs_secpolicy_write_perms(dsname, perm, cr)))
4585 				return (err);
4586 			return (0);
4587 		}
4588 
4589 		return (SET_ERROR(EINVAL));
4590 	}
4591 
4592 	if (issnap)
4593 		return (SET_ERROR(EINVAL));
4594 
4595 	if (nvpair_type(pair) == DATA_TYPE_NVLIST) {
4596 		/*
4597 		 * dsl_prop_get_all_impl() returns properties in this
4598 		 * format.
4599 		 */
4600 		nvlist_t *attrs;
4601 		VERIFY(nvpair_value_nvlist(pair, &attrs) == 0);
4602 		VERIFY(nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
4603 		    &pair) == 0);
4604 	}
4605 
4606 	/*
4607 	 * Check that this value is valid for this pool version
4608 	 */
4609 	switch (prop) {
4610 	case ZFS_PROP_COMPRESSION:
4611 		/*
4612 		 * If the user specified gzip compression, make sure
4613 		 * the SPA supports it. We ignore any errors here since
4614 		 * we'll catch them later.
4615 		 */
4616 		if (nvpair_value_uint64(pair, &intval) == 0) {
4617 			compval = ZIO_COMPRESS_ALGO(intval);
4618 			if (compval >= ZIO_COMPRESS_GZIP_1 &&
4619 			    compval <= ZIO_COMPRESS_GZIP_9 &&
4620 			    zfs_earlier_version(dsname,
4621 			    SPA_VERSION_GZIP_COMPRESSION)) {
4622 				return (SET_ERROR(ENOTSUP));
4623 			}
4624 
4625 			if (compval == ZIO_COMPRESS_ZLE &&
4626 			    zfs_earlier_version(dsname,
4627 			    SPA_VERSION_ZLE_COMPRESSION))
4628 				return (SET_ERROR(ENOTSUP));
4629 
4630 			if (compval == ZIO_COMPRESS_LZ4) {
4631 				spa_t *spa;
4632 
4633 				if ((err = spa_open(dsname, &spa, FTAG)) != 0)
4634 					return (err);
4635 
4636 				if (!spa_feature_is_enabled(spa,
4637 				    SPA_FEATURE_LZ4_COMPRESS)) {
4638 					spa_close(spa, FTAG);
4639 					return (SET_ERROR(ENOTSUP));
4640 				}
4641 				spa_close(spa, FTAG);
4642 			}
4643 
4644 			if (compval == ZIO_COMPRESS_ZSTD) {
4645 				spa_t *spa;
4646 
4647 				if ((err = spa_open(dsname, &spa, FTAG)) != 0)
4648 					return (err);
4649 
4650 				if (!spa_feature_is_enabled(spa,
4651 				    SPA_FEATURE_ZSTD_COMPRESS)) {
4652 					spa_close(spa, FTAG);
4653 					return (SET_ERROR(ENOTSUP));
4654 				}
4655 				spa_close(spa, FTAG);
4656 			}
4657 		}
4658 		break;
4659 
4660 	case ZFS_PROP_COPIES:
4661 		if (zfs_earlier_version(dsname, SPA_VERSION_DITTO_BLOCKS))
4662 			return (SET_ERROR(ENOTSUP));
4663 		break;
4664 
4665 	case ZFS_PROP_VOLBLOCKSIZE:
4666 	case ZFS_PROP_RECORDSIZE:
4667 		/* Record sizes above 128k need the feature to be enabled */
4668 		if (nvpair_value_uint64(pair, &intval) == 0 &&
4669 		    intval > SPA_OLD_MAXBLOCKSIZE) {
4670 			spa_t *spa;
4671 
4672 			/*
4673 			 * We don't allow setting the property above 1MB,
4674 			 * unless the tunable has been changed.
4675 			 */
4676 			if (intval > zfs_max_recordsize ||
4677 			    intval > SPA_MAXBLOCKSIZE)
4678 				return (SET_ERROR(ERANGE));
4679 
4680 			if ((err = spa_open(dsname, &spa, FTAG)) != 0)
4681 				return (err);
4682 
4683 			if (!spa_feature_is_enabled(spa,
4684 			    SPA_FEATURE_LARGE_BLOCKS)) {
4685 				spa_close(spa, FTAG);
4686 				return (SET_ERROR(ENOTSUP));
4687 			}
4688 			spa_close(spa, FTAG);
4689 		}
4690 		break;
4691 
4692 	case ZFS_PROP_DNODESIZE:
4693 		/* Dnode sizes above 512 need the feature to be enabled */
4694 		if (nvpair_value_uint64(pair, &intval) == 0 &&
4695 		    intval != ZFS_DNSIZE_LEGACY) {
4696 			spa_t *spa;
4697 
4698 			if ((err = spa_open(dsname, &spa, FTAG)) != 0)
4699 				return (err);
4700 
4701 			if (!spa_feature_is_enabled(spa,
4702 			    SPA_FEATURE_LARGE_DNODE)) {
4703 				spa_close(spa, FTAG);
4704 				return (SET_ERROR(ENOTSUP));
4705 			}
4706 			spa_close(spa, FTAG);
4707 		}
4708 		break;
4709 
4710 	case ZFS_PROP_SPECIAL_SMALL_BLOCKS:
4711 		/*
4712 		 * This property could require the allocation classes
4713 		 * feature to be active for setting, however we allow
4714 		 * it so that tests of settable properties succeed.
4715 		 * The CLI will issue a warning in this case.
4716 		 */
4717 		break;
4718 
4719 	case ZFS_PROP_SHARESMB:
4720 		if (zpl_earlier_version(dsname, ZPL_VERSION_FUID))
4721 			return (SET_ERROR(ENOTSUP));
4722 		break;
4723 
4724 	case ZFS_PROP_ACLINHERIT:
4725 		if (nvpair_type(pair) == DATA_TYPE_UINT64 &&
4726 		    nvpair_value_uint64(pair, &intval) == 0) {
4727 			if (intval == ZFS_ACL_PASSTHROUGH_X &&
4728 			    zfs_earlier_version(dsname,
4729 			    SPA_VERSION_PASSTHROUGH_X))
4730 				return (SET_ERROR(ENOTSUP));
4731 		}
4732 		break;
4733 	case ZFS_PROP_CHECKSUM:
4734 	case ZFS_PROP_DEDUP:
4735 	{
4736 		spa_feature_t feature;
4737 		spa_t *spa;
4738 		int err;
4739 
4740 		/* dedup feature version checks */
4741 		if (prop == ZFS_PROP_DEDUP &&
4742 		    zfs_earlier_version(dsname, SPA_VERSION_DEDUP))
4743 			return (SET_ERROR(ENOTSUP));
4744 
4745 		if (nvpair_type(pair) == DATA_TYPE_UINT64 &&
4746 		    nvpair_value_uint64(pair, &intval) == 0) {
4747 			/* check prop value is enabled in features */
4748 			feature = zio_checksum_to_feature(
4749 			    intval & ZIO_CHECKSUM_MASK);
4750 			if (feature == SPA_FEATURE_NONE)
4751 				break;
4752 
4753 			if ((err = spa_open(dsname, &spa, FTAG)) != 0)
4754 				return (err);
4755 
4756 			if (!spa_feature_is_enabled(spa, feature)) {
4757 				spa_close(spa, FTAG);
4758 				return (SET_ERROR(ENOTSUP));
4759 			}
4760 			spa_close(spa, FTAG);
4761 		}
4762 		break;
4763 	}
4764 
4765 	default:
4766 		break;
4767 	}
4768 
4769 	return (zfs_secpolicy_setprop(dsname, prop, pair, CRED()));
4770 }
4771 
4772 /*
4773  * Removes properties from the given props list that fail permission checks
4774  * needed to clear them and to restore them in case of a receive error. For each
4775  * property, make sure we have both set and inherit permissions.
4776  *
4777  * Returns the first error encountered if any permission checks fail. If the
4778  * caller provides a non-NULL errlist, it also gives the complete list of names
4779  * of all the properties that failed a permission check along with the
4780  * corresponding error numbers. The caller is responsible for freeing the
4781  * returned errlist.
4782  *
4783  * If every property checks out successfully, zero is returned and the list
4784  * pointed at by errlist is NULL.
4785  */
4786 static int
zfs_check_clearable(const char * dataset,nvlist_t * props,nvlist_t ** errlist)4787 zfs_check_clearable(const char *dataset, nvlist_t *props, nvlist_t **errlist)
4788 {
4789 	zfs_cmd_t *zc;
4790 	nvpair_t *pair, *next_pair;
4791 	nvlist_t *errors;
4792 	int err, rv = 0;
4793 
4794 	if (props == NULL)
4795 		return (0);
4796 
4797 	VERIFY(nvlist_alloc(&errors, NV_UNIQUE_NAME, KM_SLEEP) == 0);
4798 
4799 	zc = kmem_alloc(sizeof (zfs_cmd_t), KM_SLEEP);
4800 	(void) strlcpy(zc->zc_name, dataset, sizeof (zc->zc_name));
4801 	pair = nvlist_next_nvpair(props, NULL);
4802 	while (pair != NULL) {
4803 		next_pair = nvlist_next_nvpair(props, pair);
4804 
4805 		(void) strlcpy(zc->zc_value, nvpair_name(pair),
4806 		    sizeof (zc->zc_value));
4807 		if ((err = zfs_check_settable(dataset, pair, CRED())) != 0 ||
4808 		    (err = zfs_secpolicy_inherit_prop(zc, NULL, CRED())) != 0) {
4809 			VERIFY(nvlist_remove_nvpair(props, pair) == 0);
4810 			VERIFY(nvlist_add_int32(errors,
4811 			    zc->zc_value, err) == 0);
4812 		}
4813 		pair = next_pair;
4814 	}
4815 	kmem_free(zc, sizeof (zfs_cmd_t));
4816 
4817 	if ((pair = nvlist_next_nvpair(errors, NULL)) == NULL) {
4818 		nvlist_free(errors);
4819 		errors = NULL;
4820 	} else {
4821 		VERIFY(nvpair_value_int32(pair, &rv) == 0);
4822 	}
4823 
4824 	if (errlist == NULL)
4825 		nvlist_free(errors);
4826 	else
4827 		*errlist = errors;
4828 
4829 	return (rv);
4830 }
4831 
4832 static boolean_t
propval_equals(nvpair_t * p1,nvpair_t * p2)4833 propval_equals(nvpair_t *p1, nvpair_t *p2)
4834 {
4835 	if (nvpair_type(p1) == DATA_TYPE_NVLIST) {
4836 		/* dsl_prop_get_all_impl() format */
4837 		nvlist_t *attrs;
4838 		VERIFY(nvpair_value_nvlist(p1, &attrs) == 0);
4839 		VERIFY(nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
4840 		    &p1) == 0);
4841 	}
4842 
4843 	if (nvpair_type(p2) == DATA_TYPE_NVLIST) {
4844 		nvlist_t *attrs;
4845 		VERIFY(nvpair_value_nvlist(p2, &attrs) == 0);
4846 		VERIFY(nvlist_lookup_nvpair(attrs, ZPROP_VALUE,
4847 		    &p2) == 0);
4848 	}
4849 
4850 	if (nvpair_type(p1) != nvpair_type(p2))
4851 		return (B_FALSE);
4852 
4853 	if (nvpair_type(p1) == DATA_TYPE_STRING) {
4854 		const char *valstr1, *valstr2;
4855 
4856 		VERIFY(nvpair_value_string(p1, &valstr1) == 0);
4857 		VERIFY(nvpair_value_string(p2, &valstr2) == 0);
4858 		return (strcmp(valstr1, valstr2) == 0);
4859 	} else {
4860 		uint64_t intval1, intval2;
4861 
4862 		VERIFY(nvpair_value_uint64(p1, &intval1) == 0);
4863 		VERIFY(nvpair_value_uint64(p2, &intval2) == 0);
4864 		return (intval1 == intval2);
4865 	}
4866 }
4867 
4868 /*
4869  * Remove properties from props if they are not going to change (as determined
4870  * by comparison with origprops). Remove them from origprops as well, since we
4871  * do not need to clear or restore properties that won't change.
4872  */
4873 static void
props_reduce(nvlist_t * props,nvlist_t * origprops)4874 props_reduce(nvlist_t *props, nvlist_t *origprops)
4875 {
4876 	nvpair_t *pair, *next_pair;
4877 
4878 	if (origprops == NULL)
4879 		return; /* all props need to be received */
4880 
4881 	pair = nvlist_next_nvpair(props, NULL);
4882 	while (pair != NULL) {
4883 		const char *propname = nvpair_name(pair);
4884 		nvpair_t *match;
4885 
4886 		next_pair = nvlist_next_nvpair(props, pair);
4887 
4888 		if ((nvlist_lookup_nvpair(origprops, propname,
4889 		    &match) != 0) || !propval_equals(pair, match))
4890 			goto next; /* need to set received value */
4891 
4892 		/* don't clear the existing received value */
4893 		(void) nvlist_remove_nvpair(origprops, match);
4894 		/* don't bother receiving the property */
4895 		(void) nvlist_remove_nvpair(props, pair);
4896 next:
4897 		pair = next_pair;
4898 	}
4899 }
4900 
4901 /*
4902  * Extract properties that cannot be set PRIOR to the receipt of a dataset.
4903  * For example, refquota cannot be set until after the receipt of a dataset,
4904  * because in replication streams, an older/earlier snapshot may exceed the
4905  * refquota.  We want to receive the older/earlier snapshot, but setting
4906  * refquota pre-receipt will set the dsl's ACTUAL quota, which will prevent
4907  * the older/earlier snapshot from being received (with EDQUOT).
4908  *
4909  * The ZFS test "zfs_receive_011_pos" demonstrates such a scenario.
4910  *
4911  * libzfs will need to be judicious handling errors encountered by props
4912  * extracted by this function.
4913  */
4914 static nvlist_t *
extract_delay_props(nvlist_t * props)4915 extract_delay_props(nvlist_t *props)
4916 {
4917 	nvlist_t *delayprops;
4918 	nvpair_t *nvp, *tmp;
4919 	static const zfs_prop_t delayable[] = {
4920 		ZFS_PROP_REFQUOTA,
4921 		ZFS_PROP_KEYLOCATION,
4922 		/*
4923 		 * Setting ZFS_PROP_SHARESMB requires the objset type to be
4924 		 * known, which is not possible prior to receipt of raw sends.
4925 		 */
4926 		ZFS_PROP_SHARESMB,
4927 		0
4928 	};
4929 	int i;
4930 
4931 	VERIFY(nvlist_alloc(&delayprops, NV_UNIQUE_NAME, KM_SLEEP) == 0);
4932 
4933 	for (nvp = nvlist_next_nvpair(props, NULL); nvp != NULL;
4934 	    nvp = nvlist_next_nvpair(props, nvp)) {
4935 		/*
4936 		 * strcmp() is safe because zfs_prop_to_name() always returns
4937 		 * a bounded string.
4938 		 */
4939 		for (i = 0; delayable[i] != 0; i++) {
4940 			if (strcmp(zfs_prop_to_name(delayable[i]),
4941 			    nvpair_name(nvp)) == 0) {
4942 				break;
4943 			}
4944 		}
4945 		if (delayable[i] != 0) {
4946 			tmp = nvlist_prev_nvpair(props, nvp);
4947 			VERIFY(nvlist_add_nvpair(delayprops, nvp) == 0);
4948 			VERIFY(nvlist_remove_nvpair(props, nvp) == 0);
4949 			nvp = tmp;
4950 		}
4951 	}
4952 
4953 	if (nvlist_empty(delayprops)) {
4954 		nvlist_free(delayprops);
4955 		delayprops = NULL;
4956 	}
4957 	return (delayprops);
4958 }
4959 
4960 static void
zfs_allow_log_destroy(void * arg)4961 zfs_allow_log_destroy(void *arg)
4962 {
4963 	char *poolname = arg;
4964 
4965 	if (poolname != NULL)
4966 		kmem_strfree(poolname);
4967 }
4968 
4969 #ifdef	ZFS_DEBUG
4970 static boolean_t zfs_ioc_recv_inject_err;
4971 #endif
4972 
4973 /*
4974  * nvlist 'errors' is always allocated. It will contain descriptions of
4975  * encountered errors, if any. It's the callers responsibility to free.
4976  */
4977 static int
zfs_ioc_recv_impl(char * tofs,char * tosnap,const char * origin,nvlist_t * recvprops,nvlist_t * localprops,nvlist_t * hidden_args,boolean_t force,boolean_t heal,boolean_t resumable,int input_fd,dmu_replay_record_t * begin_record,uint64_t * read_bytes,uint64_t * errflags,nvlist_t ** errors)4978 zfs_ioc_recv_impl(char *tofs, char *tosnap, const char *origin,
4979     nvlist_t *recvprops, nvlist_t *localprops, nvlist_t *hidden_args,
4980     boolean_t force, boolean_t heal, boolean_t resumable, int input_fd,
4981     dmu_replay_record_t *begin_record, uint64_t *read_bytes,
4982     uint64_t *errflags, nvlist_t **errors)
4983 {
4984 	dmu_recv_cookie_t drc;
4985 	int error = 0;
4986 	int props_error = 0;
4987 	offset_t off, noff;
4988 	nvlist_t *local_delayprops = NULL;
4989 	nvlist_t *recv_delayprops = NULL;
4990 	nvlist_t *inherited_delayprops = NULL;
4991 	nvlist_t *origprops = NULL; /* existing properties */
4992 	nvlist_t *origrecvd = NULL; /* existing received properties */
4993 	boolean_t first_recvd_props = B_FALSE;
4994 	boolean_t tofs_was_redacted;
4995 	zfs_file_t *input_fp;
4996 
4997 	*read_bytes = 0;
4998 	*errflags = 0;
4999 	*errors = fnvlist_alloc();
5000 	off = 0;
5001 
5002 	if ((input_fp = zfs_file_get(input_fd)) == NULL)
5003 		return (SET_ERROR(EBADF));
5004 
5005 	noff = off = zfs_file_off(input_fp);
5006 	error = dmu_recv_begin(tofs, tosnap, begin_record, force, heal,
5007 	    resumable, localprops, hidden_args, origin, &drc, input_fp,
5008 	    &off);
5009 	if (error != 0)
5010 		goto out;
5011 	tofs_was_redacted = dsl_get_redacted(drc.drc_ds);
5012 
5013 	/*
5014 	 * Set properties before we receive the stream so that they are applied
5015 	 * to the new data. Note that we must call dmu_recv_stream() if
5016 	 * dmu_recv_begin() succeeds.
5017 	 */
5018 	if (recvprops != NULL && !drc.drc_newfs) {
5019 		if (spa_version(dsl_dataset_get_spa(drc.drc_ds)) >=
5020 		    SPA_VERSION_RECVD_PROPS &&
5021 		    !dsl_prop_get_hasrecvd(tofs))
5022 			first_recvd_props = B_TRUE;
5023 
5024 		/*
5025 		 * If new received properties are supplied, they are to
5026 		 * completely replace the existing received properties,
5027 		 * so stash away the existing ones.
5028 		 */
5029 		if (dsl_prop_get_received(tofs, &origrecvd) == 0) {
5030 			nvlist_t *errlist = NULL;
5031 			/*
5032 			 * Don't bother writing a property if its value won't
5033 			 * change (and avoid the unnecessary security checks).
5034 			 *
5035 			 * The first receive after SPA_VERSION_RECVD_PROPS is a
5036 			 * special case where we blow away all local properties
5037 			 * regardless.
5038 			 */
5039 			if (!first_recvd_props)
5040 				props_reduce(recvprops, origrecvd);
5041 			if (zfs_check_clearable(tofs, origrecvd, &errlist) != 0)
5042 				(void) nvlist_merge(*errors, errlist, 0);
5043 			nvlist_free(errlist);
5044 
5045 			if (clear_received_props(tofs, origrecvd,
5046 			    first_recvd_props ? NULL : recvprops) != 0)
5047 				*errflags |= ZPROP_ERR_NOCLEAR;
5048 		} else {
5049 			*errflags |= ZPROP_ERR_NOCLEAR;
5050 		}
5051 	}
5052 
5053 	/*
5054 	 * Stash away existing properties so we can restore them on error unless
5055 	 * we're doing the first receive after SPA_VERSION_RECVD_PROPS, in which
5056 	 * case "origrecvd" will take care of that.
5057 	 */
5058 	if (localprops != NULL && !drc.drc_newfs && !first_recvd_props) {
5059 		objset_t *os;
5060 		if (dmu_objset_hold(tofs, FTAG, &os) == 0) {
5061 			if (dsl_prop_get_all(os, &origprops) != 0) {
5062 				*errflags |= ZPROP_ERR_NOCLEAR;
5063 			}
5064 			dmu_objset_rele(os, FTAG);
5065 		} else {
5066 			*errflags |= ZPROP_ERR_NOCLEAR;
5067 		}
5068 	}
5069 
5070 	if (recvprops != NULL) {
5071 		props_error = dsl_prop_set_hasrecvd(tofs);
5072 
5073 		if (props_error == 0) {
5074 			recv_delayprops = extract_delay_props(recvprops);
5075 			(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_RECEIVED,
5076 			    recvprops, *errors);
5077 		}
5078 	}
5079 
5080 	if (localprops != NULL) {
5081 		nvlist_t *oprops = fnvlist_alloc();
5082 		nvlist_t *xprops = fnvlist_alloc();
5083 		nvpair_t *nvp = NULL;
5084 
5085 		while ((nvp = nvlist_next_nvpair(localprops, nvp)) != NULL) {
5086 			if (nvpair_type(nvp) == DATA_TYPE_BOOLEAN) {
5087 				/* -x property */
5088 				const char *name = nvpair_name(nvp);
5089 				zfs_prop_t prop = zfs_name_to_prop(name);
5090 				if (prop != ZPROP_USERPROP) {
5091 					if (!zfs_prop_inheritable(prop))
5092 						continue;
5093 				} else if (!zfs_prop_user(name))
5094 					continue;
5095 				fnvlist_add_boolean(xprops, name);
5096 			} else {
5097 				/* -o property=value */
5098 				fnvlist_add_nvpair(oprops, nvp);
5099 			}
5100 		}
5101 
5102 		local_delayprops = extract_delay_props(oprops);
5103 		(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_LOCAL,
5104 		    oprops, *errors);
5105 		inherited_delayprops = extract_delay_props(xprops);
5106 		(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_INHERITED,
5107 		    xprops, *errors);
5108 
5109 		nvlist_free(oprops);
5110 		nvlist_free(xprops);
5111 	}
5112 
5113 	error = dmu_recv_stream(&drc, &off);
5114 
5115 	if (error == 0) {
5116 		zfsvfs_t *zfsvfs = NULL;
5117 		zvol_state_handle_t *zv = NULL;
5118 
5119 		if (getzfsvfs(tofs, &zfsvfs) == 0) {
5120 			/* online recv */
5121 			dsl_dataset_t *ds;
5122 			int end_err;
5123 			boolean_t stream_is_redacted = DMU_GET_FEATUREFLAGS(
5124 			    begin_record->drr_u.drr_begin.
5125 			    drr_versioninfo) & DMU_BACKUP_FEATURE_REDACTED;
5126 
5127 			ds = dmu_objset_ds(zfsvfs->z_os);
5128 			error = zfs_suspend_fs(zfsvfs);
5129 			/*
5130 			 * If the suspend fails, then the recv_end will
5131 			 * likely also fail, and clean up after itself.
5132 			 */
5133 			end_err = dmu_recv_end(&drc, zfsvfs);
5134 			/*
5135 			 * If the dataset was not redacted, but we received a
5136 			 * redacted stream onto it, we need to unmount the
5137 			 * dataset.  Otherwise, resume the filesystem.
5138 			 */
5139 			if (error == 0 && !drc.drc_newfs &&
5140 			    stream_is_redacted && !tofs_was_redacted) {
5141 				error = zfs_end_fs(zfsvfs, ds);
5142 			} else if (error == 0) {
5143 				error = zfs_resume_fs(zfsvfs, ds);
5144 			}
5145 			error = error ? error : end_err;
5146 			zfs_vfs_rele(zfsvfs);
5147 		} else if ((zv = zvol_suspend(tofs)) != NULL) {
5148 			error = dmu_recv_end(&drc, zvol_tag(zv));
5149 			zvol_resume(zv);
5150 		} else {
5151 			error = dmu_recv_end(&drc, NULL);
5152 		}
5153 
5154 		/* Set delayed properties now, after we're done receiving. */
5155 		if (recv_delayprops != NULL && error == 0) {
5156 			(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_RECEIVED,
5157 			    recv_delayprops, *errors);
5158 		}
5159 		if (local_delayprops != NULL && error == 0) {
5160 			(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_LOCAL,
5161 			    local_delayprops, *errors);
5162 		}
5163 		if (inherited_delayprops != NULL && error == 0) {
5164 			(void) zfs_set_prop_nvlist(tofs, ZPROP_SRC_INHERITED,
5165 			    inherited_delayprops, *errors);
5166 		}
5167 	}
5168 
5169 	/*
5170 	 * Merge delayed props back in with initial props, in case
5171 	 * we're DEBUG and zfs_ioc_recv_inject_err is set (which means
5172 	 * we have to make sure clear_received_props() includes
5173 	 * the delayed properties).
5174 	 *
5175 	 * Since zfs_ioc_recv_inject_err is only in DEBUG kernels,
5176 	 * using ASSERT() will be just like a VERIFY.
5177 	 */
5178 	if (recv_delayprops != NULL) {
5179 		ASSERT(nvlist_merge(recvprops, recv_delayprops, 0) == 0);
5180 		nvlist_free(recv_delayprops);
5181 	}
5182 	if (local_delayprops != NULL) {
5183 		ASSERT(nvlist_merge(localprops, local_delayprops, 0) == 0);
5184 		nvlist_free(local_delayprops);
5185 	}
5186 	if (inherited_delayprops != NULL) {
5187 		ASSERT(nvlist_merge(localprops, inherited_delayprops, 0) == 0);
5188 		nvlist_free(inherited_delayprops);
5189 	}
5190 	*read_bytes = off - noff;
5191 
5192 #ifdef	ZFS_DEBUG
5193 	if (zfs_ioc_recv_inject_err) {
5194 		zfs_ioc_recv_inject_err = B_FALSE;
5195 		error = 1;
5196 	}
5197 #endif
5198 
5199 	/*
5200 	 * On error, restore the original props.
5201 	 */
5202 	if (error != 0 && recvprops != NULL && !drc.drc_newfs) {
5203 		if (clear_received_props(tofs, recvprops, NULL) != 0) {
5204 			/*
5205 			 * We failed to clear the received properties.
5206 			 * Since we may have left a $recvd value on the
5207 			 * system, we can't clear the $hasrecvd flag.
5208 			 */
5209 			*errflags |= ZPROP_ERR_NORESTORE;
5210 		} else if (first_recvd_props) {
5211 			dsl_prop_unset_hasrecvd(tofs);
5212 		}
5213 
5214 		if (origrecvd == NULL && !drc.drc_newfs) {
5215 			/* We failed to stash the original properties. */
5216 			*errflags |= ZPROP_ERR_NORESTORE;
5217 		}
5218 
5219 		/*
5220 		 * dsl_props_set() will not convert RECEIVED to LOCAL on or
5221 		 * after SPA_VERSION_RECVD_PROPS, so we need to specify LOCAL
5222 		 * explicitly if we're restoring local properties cleared in the
5223 		 * first new-style receive.
5224 		 */
5225 		if (origrecvd != NULL &&
5226 		    zfs_set_prop_nvlist(tofs, (first_recvd_props ?
5227 		    ZPROP_SRC_LOCAL : ZPROP_SRC_RECEIVED),
5228 		    origrecvd, NULL) != 0) {
5229 			/*
5230 			 * We stashed the original properties but failed to
5231 			 * restore them.
5232 			 */
5233 			*errflags |= ZPROP_ERR_NORESTORE;
5234 		}
5235 	}
5236 	if (error != 0 && localprops != NULL && !drc.drc_newfs &&
5237 	    !first_recvd_props) {
5238 		nvlist_t *setprops;
5239 		nvlist_t *inheritprops;
5240 		nvpair_t *nvp;
5241 
5242 		if (origprops == NULL) {
5243 			/* We failed to stash the original properties. */
5244 			*errflags |= ZPROP_ERR_NORESTORE;
5245 			goto out;
5246 		}
5247 
5248 		/* Restore original props */
5249 		setprops = fnvlist_alloc();
5250 		inheritprops = fnvlist_alloc();
5251 		nvp = NULL;
5252 		while ((nvp = nvlist_next_nvpair(localprops, nvp)) != NULL) {
5253 			const char *name = nvpair_name(nvp);
5254 			const char *source;
5255 			nvlist_t *attrs;
5256 
5257 			if (!nvlist_exists(origprops, name)) {
5258 				/*
5259 				 * Property was not present or was explicitly
5260 				 * inherited before the receive, restore this.
5261 				 */
5262 				fnvlist_add_boolean(inheritprops, name);
5263 				continue;
5264 			}
5265 			attrs = fnvlist_lookup_nvlist(origprops, name);
5266 			source = fnvlist_lookup_string(attrs, ZPROP_SOURCE);
5267 
5268 			/* Skip received properties */
5269 			if (strcmp(source, ZPROP_SOURCE_VAL_RECVD) == 0)
5270 				continue;
5271 
5272 			if (strcmp(source, tofs) == 0) {
5273 				/* Property was locally set */
5274 				fnvlist_add_nvlist(setprops, name, attrs);
5275 			} else {
5276 				/* Property was implicitly inherited */
5277 				fnvlist_add_boolean(inheritprops, name);
5278 			}
5279 		}
5280 
5281 		if (zfs_set_prop_nvlist(tofs, ZPROP_SRC_LOCAL, setprops,
5282 		    NULL) != 0)
5283 			*errflags |= ZPROP_ERR_NORESTORE;
5284 		if (zfs_set_prop_nvlist(tofs, ZPROP_SRC_INHERITED, inheritprops,
5285 		    NULL) != 0)
5286 			*errflags |= ZPROP_ERR_NORESTORE;
5287 
5288 		nvlist_free(setprops);
5289 		nvlist_free(inheritprops);
5290 	}
5291 out:
5292 	zfs_file_put(input_fp);
5293 	nvlist_free(origrecvd);
5294 	nvlist_free(origprops);
5295 
5296 	if (error == 0)
5297 		error = props_error;
5298 
5299 	return (error);
5300 }
5301 
5302 /*
5303  * inputs:
5304  * zc_name		name of containing filesystem (unused)
5305  * zc_nvlist_src{_size}	nvlist of properties to apply
5306  * zc_nvlist_conf{_size}	nvlist of properties to exclude
5307  *			(DATA_TYPE_BOOLEAN) and override (everything else)
5308  * zc_value		name of snapshot to create
5309  * zc_string		name of clone origin (if DRR_FLAG_CLONE)
5310  * zc_cookie		file descriptor to recv from
5311  * zc_begin_record	the BEGIN record of the stream (not byteswapped)
5312  * zc_guid		force flag
5313  *
5314  * outputs:
5315  * zc_cookie		number of bytes read
5316  * zc_obj		zprop_errflags_t
5317  * zc_nvlist_dst{_size} error for each unapplied received property
5318  */
5319 static int
zfs_ioc_recv(zfs_cmd_t * zc)5320 zfs_ioc_recv(zfs_cmd_t *zc)
5321 {
5322 	dmu_replay_record_t begin_record;
5323 	nvlist_t *errors = NULL;
5324 	nvlist_t *recvdprops = NULL;
5325 	nvlist_t *localprops = NULL;
5326 	const char *origin = NULL;
5327 	char *tosnap;
5328 	char tofs[ZFS_MAX_DATASET_NAME_LEN];
5329 	int error = 0;
5330 
5331 	if (dataset_namecheck(zc->zc_value, NULL, NULL) != 0 ||
5332 	    strchr(zc->zc_value, '@') == NULL ||
5333 	    strchr(zc->zc_value, '%'))
5334 		return (SET_ERROR(EINVAL));
5335 
5336 	(void) strlcpy(tofs, zc->zc_value, sizeof (tofs));
5337 	tosnap = strchr(tofs, '@');
5338 	*tosnap++ = '\0';
5339 
5340 	if (zc->zc_nvlist_src != 0 &&
5341 	    (error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
5342 	    zc->zc_iflags, &recvdprops)) != 0)
5343 		return (error);
5344 
5345 	if (zc->zc_nvlist_conf != 0 &&
5346 	    (error = get_nvlist(zc->zc_nvlist_conf, zc->zc_nvlist_conf_size,
5347 	    zc->zc_iflags, &localprops)) != 0)
5348 		return (error);
5349 
5350 	if (zc->zc_string[0])
5351 		origin = zc->zc_string;
5352 
5353 	begin_record.drr_type = DRR_BEGIN;
5354 	begin_record.drr_payloadlen = 0;
5355 	begin_record.drr_u.drr_begin = zc->zc_begin_record;
5356 
5357 	error = zfs_ioc_recv_impl(tofs, tosnap, origin, recvdprops, localprops,
5358 	    NULL, zc->zc_guid, B_FALSE, B_FALSE, zc->zc_cookie, &begin_record,
5359 	    &zc->zc_cookie, &zc->zc_obj, &errors);
5360 	nvlist_free(recvdprops);
5361 	nvlist_free(localprops);
5362 
5363 	/*
5364 	 * Now that all props, initial and delayed, are set, report the prop
5365 	 * errors to the caller.
5366 	 */
5367 	if (zc->zc_nvlist_dst_size != 0 && errors != NULL &&
5368 	    (nvlist_smush(errors, zc->zc_nvlist_dst_size) != 0 ||
5369 	    put_nvlist(zc, errors) != 0)) {
5370 		/*
5371 		 * Caller made zc->zc_nvlist_dst less than the minimum expected
5372 		 * size or supplied an invalid address.
5373 		 */
5374 		error = SET_ERROR(EINVAL);
5375 	}
5376 
5377 	nvlist_free(errors);
5378 
5379 	return (error);
5380 }
5381 
5382 /*
5383  * innvl: {
5384  *     "snapname" -> full name of the snapshot to create
5385  *     (optional) "props" -> received properties to set (nvlist)
5386  *     (optional) "localprops" -> override and exclude properties (nvlist)
5387  *     (optional) "origin" -> name of clone origin (DRR_FLAG_CLONE)
5388  *     "begin_record" -> non-byteswapped dmu_replay_record_t
5389  *     "input_fd" -> file descriptor to read stream from (int32)
5390  *     (optional) "force" -> force flag (value ignored)
5391  *     (optional) "heal" -> use send stream to heal data corruption
5392  *     (optional) "resumable" -> resumable flag (value ignored)
5393  *     (optional) "cleanup_fd" -> unused
5394  *     (optional) "action_handle" -> unused
5395  *     (optional) "hidden_args" -> { "wkeydata" -> value }
5396  * }
5397  *
5398  * outnvl: {
5399  *     "read_bytes" -> number of bytes read
5400  *     "error_flags" -> zprop_errflags_t
5401  *     "errors" -> error for each unapplied received property (nvlist)
5402  * }
5403  */
5404 static const zfs_ioc_key_t zfs_keys_recv_new[] = {
5405 	{"snapname",		DATA_TYPE_STRING,	0},
5406 	{"props",		DATA_TYPE_NVLIST,	ZK_OPTIONAL},
5407 	{"localprops",		DATA_TYPE_NVLIST,	ZK_OPTIONAL},
5408 	{"origin",		DATA_TYPE_STRING,	ZK_OPTIONAL},
5409 	{"begin_record",	DATA_TYPE_BYTE_ARRAY,	0},
5410 	{"input_fd",		DATA_TYPE_INT32,	0},
5411 	{"force",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
5412 	{"heal",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
5413 	{"resumable",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
5414 	{"cleanup_fd",		DATA_TYPE_INT32,	ZK_OPTIONAL},
5415 	{"action_handle",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
5416 	{"hidden_args",		DATA_TYPE_NVLIST,	ZK_OPTIONAL},
5417 };
5418 
5419 static int
zfs_ioc_recv_new(const char * fsname,nvlist_t * innvl,nvlist_t * outnvl)5420 zfs_ioc_recv_new(const char *fsname, nvlist_t *innvl, nvlist_t *outnvl)
5421 {
5422 	dmu_replay_record_t *begin_record;
5423 	uint_t begin_record_size;
5424 	nvlist_t *errors = NULL;
5425 	nvlist_t *recvprops = NULL;
5426 	nvlist_t *localprops = NULL;
5427 	nvlist_t *hidden_args = NULL;
5428 	const char *snapname;
5429 	const char *origin = NULL;
5430 	char *tosnap;
5431 	char tofs[ZFS_MAX_DATASET_NAME_LEN];
5432 	boolean_t force;
5433 	boolean_t heal;
5434 	boolean_t resumable;
5435 	uint64_t read_bytes = 0;
5436 	uint64_t errflags = 0;
5437 	int input_fd = -1;
5438 	int error;
5439 
5440 	snapname = fnvlist_lookup_string(innvl, "snapname");
5441 
5442 	if (dataset_namecheck(snapname, NULL, NULL) != 0 ||
5443 	    strchr(snapname, '@') == NULL ||
5444 	    strchr(snapname, '%'))
5445 		return (SET_ERROR(EINVAL));
5446 
5447 	(void) strlcpy(tofs, snapname, sizeof (tofs));
5448 	tosnap = strchr(tofs, '@');
5449 	*tosnap++ = '\0';
5450 
5451 	error = nvlist_lookup_string(innvl, "origin", &origin);
5452 	if (error && error != ENOENT)
5453 		return (error);
5454 
5455 	error = nvlist_lookup_byte_array(innvl, "begin_record",
5456 	    (uchar_t **)&begin_record, &begin_record_size);
5457 	if (error != 0 || begin_record_size != sizeof (*begin_record))
5458 		return (SET_ERROR(EINVAL));
5459 
5460 	input_fd = fnvlist_lookup_int32(innvl, "input_fd");
5461 
5462 	force = nvlist_exists(innvl, "force");
5463 	heal = nvlist_exists(innvl, "heal");
5464 	resumable = nvlist_exists(innvl, "resumable");
5465 
5466 	/* we still use "props" here for backwards compatibility */
5467 	error = nvlist_lookup_nvlist(innvl, "props", &recvprops);
5468 	if (error && error != ENOENT)
5469 		return (error);
5470 
5471 	error = nvlist_lookup_nvlist(innvl, "localprops", &localprops);
5472 	if (error && error != ENOENT)
5473 		return (error);
5474 
5475 	error = nvlist_lookup_nvlist(innvl, ZPOOL_HIDDEN_ARGS, &hidden_args);
5476 	if (error && error != ENOENT)
5477 		return (error);
5478 
5479 	error = zfs_ioc_recv_impl(tofs, tosnap, origin, recvprops, localprops,
5480 	    hidden_args, force, heal, resumable, input_fd, begin_record,
5481 	    &read_bytes, &errflags, &errors);
5482 
5483 	fnvlist_add_uint64(outnvl, "read_bytes", read_bytes);
5484 	fnvlist_add_uint64(outnvl, "error_flags", errflags);
5485 	fnvlist_add_nvlist(outnvl, "errors", errors);
5486 
5487 	nvlist_free(errors);
5488 	nvlist_free(recvprops);
5489 	nvlist_free(localprops);
5490 
5491 	return (error);
5492 }
5493 
5494 typedef struct dump_bytes_io {
5495 	zfs_file_t	*dbi_fp;
5496 	caddr_t		dbi_buf;
5497 	int		dbi_len;
5498 	int		dbi_err;
5499 } dump_bytes_io_t;
5500 
5501 static void
dump_bytes_cb(void * arg)5502 dump_bytes_cb(void *arg)
5503 {
5504 	dump_bytes_io_t *dbi = (dump_bytes_io_t *)arg;
5505 	zfs_file_t *fp;
5506 	caddr_t buf;
5507 
5508 	fp = dbi->dbi_fp;
5509 	buf = dbi->dbi_buf;
5510 
5511 	dbi->dbi_err = zfs_file_write(fp, buf, dbi->dbi_len, NULL);
5512 }
5513 
5514 static int
dump_bytes(objset_t * os,void * buf,int len,void * arg)5515 dump_bytes(objset_t *os, void *buf, int len, void *arg)
5516 {
5517 	dump_bytes_io_t dbi;
5518 
5519 	dbi.dbi_fp = arg;
5520 	dbi.dbi_buf = buf;
5521 	dbi.dbi_len = len;
5522 
5523 #if defined(HAVE_LARGE_STACKS)
5524 	dump_bytes_cb(&dbi);
5525 #else
5526 	/*
5527 	 * The vn_rdwr() call is performed in a taskq to ensure that there is
5528 	 * always enough stack space to write safely to the target filesystem.
5529 	 * The ZIO_TYPE_FREE threads are used because there can be a lot of
5530 	 * them and they are used in vdev_file.c for a similar purpose.
5531 	 */
5532 	spa_taskq_dispatch_sync(dmu_objset_spa(os), ZIO_TYPE_FREE,
5533 	    ZIO_TASKQ_ISSUE, dump_bytes_cb, &dbi, TQ_SLEEP);
5534 #endif /* HAVE_LARGE_STACKS */
5535 
5536 	return (dbi.dbi_err);
5537 }
5538 
5539 /*
5540  * inputs:
5541  * zc_name	name of snapshot to send
5542  * zc_cookie	file descriptor to send stream to
5543  * zc_obj	fromorigin flag (mutually exclusive with zc_fromobj)
5544  * zc_sendobj	objsetid of snapshot to send
5545  * zc_fromobj	objsetid of incremental fromsnap (may be zero)
5546  * zc_guid	if set, estimate size of stream only.  zc_cookie is ignored.
5547  *		output size in zc_objset_type.
5548  * zc_flags	lzc_send_flags
5549  *
5550  * outputs:
5551  * zc_objset_type	estimated size, if zc_guid is set
5552  *
5553  * NOTE: This is no longer the preferred interface, any new functionality
5554  *	  should be added to zfs_ioc_send_new() instead.
5555  */
5556 static int
zfs_ioc_send(zfs_cmd_t * zc)5557 zfs_ioc_send(zfs_cmd_t *zc)
5558 {
5559 	int error;
5560 	offset_t off;
5561 	boolean_t estimate = (zc->zc_guid != 0);
5562 	boolean_t embedok = (zc->zc_flags & 0x1);
5563 	boolean_t large_block_ok = (zc->zc_flags & 0x2);
5564 	boolean_t compressok = (zc->zc_flags & 0x4);
5565 	boolean_t rawok = (zc->zc_flags & 0x8);
5566 	boolean_t savedok = (zc->zc_flags & 0x10);
5567 
5568 	if (zc->zc_obj != 0) {
5569 		dsl_pool_t *dp;
5570 		dsl_dataset_t *tosnap;
5571 
5572 		error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
5573 		if (error != 0)
5574 			return (error);
5575 
5576 		error = dsl_dataset_hold_obj(dp, zc->zc_sendobj, FTAG, &tosnap);
5577 		if (error != 0) {
5578 			dsl_pool_rele(dp, FTAG);
5579 			return (error);
5580 		}
5581 
5582 		if (dsl_dir_is_clone(tosnap->ds_dir))
5583 			zc->zc_fromobj =
5584 			    dsl_dir_phys(tosnap->ds_dir)->dd_origin_obj;
5585 		dsl_dataset_rele(tosnap, FTAG);
5586 		dsl_pool_rele(dp, FTAG);
5587 	}
5588 
5589 	if (estimate) {
5590 		dsl_pool_t *dp;
5591 		dsl_dataset_t *tosnap;
5592 		dsl_dataset_t *fromsnap = NULL;
5593 
5594 		error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
5595 		if (error != 0)
5596 			return (error);
5597 
5598 		error = dsl_dataset_hold_obj(dp, zc->zc_sendobj,
5599 		    FTAG, &tosnap);
5600 		if (error != 0) {
5601 			dsl_pool_rele(dp, FTAG);
5602 			return (error);
5603 		}
5604 
5605 		if (zc->zc_fromobj != 0) {
5606 			error = dsl_dataset_hold_obj(dp, zc->zc_fromobj,
5607 			    FTAG, &fromsnap);
5608 			if (error != 0) {
5609 				dsl_dataset_rele(tosnap, FTAG);
5610 				dsl_pool_rele(dp, FTAG);
5611 				return (error);
5612 			}
5613 		}
5614 
5615 		error = dmu_send_estimate_fast(tosnap, fromsnap, NULL,
5616 		    compressok || rawok, savedok, &zc->zc_objset_type);
5617 
5618 		if (fromsnap != NULL)
5619 			dsl_dataset_rele(fromsnap, FTAG);
5620 		dsl_dataset_rele(tosnap, FTAG);
5621 		dsl_pool_rele(dp, FTAG);
5622 	} else {
5623 		zfs_file_t *fp;
5624 		dmu_send_outparams_t out = {0};
5625 
5626 		if ((fp = zfs_file_get(zc->zc_cookie)) == NULL)
5627 			return (SET_ERROR(EBADF));
5628 
5629 		off = zfs_file_off(fp);
5630 		out.dso_outfunc = dump_bytes;
5631 		out.dso_arg = fp;
5632 		out.dso_dryrun = B_FALSE;
5633 		error = dmu_send_obj(zc->zc_name, zc->zc_sendobj,
5634 		    zc->zc_fromobj, embedok, large_block_ok, compressok,
5635 		    rawok, savedok, zc->zc_cookie, &off, &out);
5636 
5637 		zfs_file_put(fp);
5638 	}
5639 	return (error);
5640 }
5641 
5642 /*
5643  * inputs:
5644  * zc_name		name of snapshot on which to report progress
5645  * zc_cookie		file descriptor of send stream
5646  *
5647  * outputs:
5648  * zc_cookie		number of bytes written in send stream thus far
5649  * zc_objset_type	logical size of data traversed by send thus far
5650  */
5651 static int
zfs_ioc_send_progress(zfs_cmd_t * zc)5652 zfs_ioc_send_progress(zfs_cmd_t *zc)
5653 {
5654 	dsl_pool_t *dp;
5655 	dsl_dataset_t *ds;
5656 	dmu_sendstatus_t *dsp = NULL;
5657 	int error;
5658 
5659 	error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
5660 	if (error != 0)
5661 		return (error);
5662 
5663 	error = dsl_dataset_hold(dp, zc->zc_name, FTAG, &ds);
5664 	if (error != 0) {
5665 		dsl_pool_rele(dp, FTAG);
5666 		return (error);
5667 	}
5668 
5669 	mutex_enter(&ds->ds_sendstream_lock);
5670 
5671 	/*
5672 	 * Iterate over all the send streams currently active on this dataset.
5673 	 * If there's one which matches the specified file descriptor _and_ the
5674 	 * stream was started by the current process, return the progress of
5675 	 * that stream.
5676 	 */
5677 
5678 	for (dsp = list_head(&ds->ds_sendstreams); dsp != NULL;
5679 	    dsp = list_next(&ds->ds_sendstreams, dsp)) {
5680 		if (dsp->dss_outfd == zc->zc_cookie &&
5681 		    zfs_proc_is_caller(dsp->dss_proc))
5682 			break;
5683 	}
5684 
5685 	if (dsp != NULL) {
5686 		zc->zc_cookie = atomic_cas_64((volatile uint64_t *)dsp->dss_off,
5687 		    0, 0);
5688 		/* This is the closest thing we have to atomic_read_64. */
5689 		zc->zc_objset_type = atomic_cas_64(&dsp->dss_blocks, 0, 0);
5690 	} else {
5691 		error = SET_ERROR(ENOENT);
5692 	}
5693 
5694 	mutex_exit(&ds->ds_sendstream_lock);
5695 	dsl_dataset_rele(ds, FTAG);
5696 	dsl_pool_rele(dp, FTAG);
5697 	return (error);
5698 }
5699 
5700 static int
zfs_ioc_inject_fault(zfs_cmd_t * zc)5701 zfs_ioc_inject_fault(zfs_cmd_t *zc)
5702 {
5703 	int id, error;
5704 
5705 	error = zio_inject_fault(zc->zc_name, (int)zc->zc_guid, &id,
5706 	    &zc->zc_inject_record);
5707 
5708 	if (error == 0)
5709 		zc->zc_guid = (uint64_t)id;
5710 
5711 	return (error);
5712 }
5713 
5714 static int
zfs_ioc_clear_fault(zfs_cmd_t * zc)5715 zfs_ioc_clear_fault(zfs_cmd_t *zc)
5716 {
5717 	return (zio_clear_fault((int)zc->zc_guid));
5718 }
5719 
5720 static int
zfs_ioc_inject_list_next(zfs_cmd_t * zc)5721 zfs_ioc_inject_list_next(zfs_cmd_t *zc)
5722 {
5723 	int id = (int)zc->zc_guid;
5724 	int error;
5725 
5726 	error = zio_inject_list_next(&id, zc->zc_name, sizeof (zc->zc_name),
5727 	    &zc->zc_inject_record);
5728 
5729 	zc->zc_guid = id;
5730 
5731 	return (error);
5732 }
5733 
5734 static int
zfs_ioc_error_log(zfs_cmd_t * zc)5735 zfs_ioc_error_log(zfs_cmd_t *zc)
5736 {
5737 	spa_t *spa;
5738 	int error;
5739 
5740 	if ((error = spa_open(zc->zc_name, &spa, FTAG)) != 0)
5741 		return (error);
5742 
5743 	error = spa_get_errlog(spa, (void *)(uintptr_t)zc->zc_nvlist_dst,
5744 	    &zc->zc_nvlist_dst_size);
5745 
5746 	spa_close(spa, FTAG);
5747 
5748 	return (error);
5749 }
5750 
5751 static int
zfs_ioc_clear(zfs_cmd_t * zc)5752 zfs_ioc_clear(zfs_cmd_t *zc)
5753 {
5754 	spa_t *spa;
5755 	vdev_t *vd;
5756 	int error;
5757 
5758 	/*
5759 	 * On zpool clear we also fix up missing slogs
5760 	 */
5761 	mutex_enter(&spa_namespace_lock);
5762 	spa = spa_lookup(zc->zc_name);
5763 	if (spa == NULL) {
5764 		mutex_exit(&spa_namespace_lock);
5765 		return (SET_ERROR(EIO));
5766 	}
5767 	if (spa_get_log_state(spa) == SPA_LOG_MISSING) {
5768 		/* we need to let spa_open/spa_load clear the chains */
5769 		spa_set_log_state(spa, SPA_LOG_CLEAR);
5770 	}
5771 	spa->spa_last_open_failed = 0;
5772 	mutex_exit(&spa_namespace_lock);
5773 
5774 	if (zc->zc_cookie & ZPOOL_NO_REWIND) {
5775 		error = spa_open(zc->zc_name, &spa, FTAG);
5776 	} else {
5777 		nvlist_t *policy;
5778 		nvlist_t *config = NULL;
5779 
5780 		if (zc->zc_nvlist_src == 0)
5781 			return (SET_ERROR(EINVAL));
5782 
5783 		if ((error = get_nvlist(zc->zc_nvlist_src,
5784 		    zc->zc_nvlist_src_size, zc->zc_iflags, &policy)) == 0) {
5785 			error = spa_open_rewind(zc->zc_name, &spa, FTAG,
5786 			    policy, &config);
5787 			if (config != NULL) {
5788 				int err;
5789 
5790 				if ((err = put_nvlist(zc, config)) != 0)
5791 					error = err;
5792 				nvlist_free(config);
5793 			}
5794 			nvlist_free(policy);
5795 		}
5796 	}
5797 
5798 	if (error != 0)
5799 		return (error);
5800 
5801 	/*
5802 	 * If multihost is enabled, resuming I/O is unsafe as another
5803 	 * host may have imported the pool. Check for remote activity.
5804 	 */
5805 	if (spa_multihost(spa) && spa_suspended(spa) &&
5806 	    spa_mmp_remote_host_activity(spa)) {
5807 		spa_close(spa, FTAG);
5808 		return (SET_ERROR(EREMOTEIO));
5809 	}
5810 
5811 	spa_vdev_state_enter(spa, SCL_NONE);
5812 
5813 	if (zc->zc_guid == 0) {
5814 		vd = NULL;
5815 	} else {
5816 		vd = spa_lookup_by_guid(spa, zc->zc_guid, B_TRUE);
5817 		if (vd == NULL) {
5818 			error = SET_ERROR(ENODEV);
5819 			(void) spa_vdev_state_exit(spa, NULL, error);
5820 			spa_close(spa, FTAG);
5821 			return (error);
5822 		}
5823 	}
5824 
5825 	vdev_clear(spa, vd);
5826 
5827 	(void) spa_vdev_state_exit(spa, spa_suspended(spa) ?
5828 	    NULL : spa->spa_root_vdev, 0);
5829 
5830 	/*
5831 	 * Resume any suspended I/Os.
5832 	 */
5833 	if (zio_resume(spa) != 0)
5834 		error = SET_ERROR(EIO);
5835 
5836 	spa_close(spa, FTAG);
5837 
5838 	return (error);
5839 }
5840 
5841 /*
5842  * Reopen all the vdevs associated with the pool.
5843  *
5844  * innvl: {
5845  *  "scrub_restart" -> when true and scrub is running, allow to restart
5846  *              scrub as the side effect of the reopen (boolean).
5847  * }
5848  *
5849  * outnvl is unused
5850  */
5851 static const zfs_ioc_key_t zfs_keys_pool_reopen[] = {
5852 	{"scrub_restart",	DATA_TYPE_BOOLEAN_VALUE,	ZK_OPTIONAL},
5853 };
5854 
5855 static int
zfs_ioc_pool_reopen(const char * pool,nvlist_t * innvl,nvlist_t * outnvl)5856 zfs_ioc_pool_reopen(const char *pool, nvlist_t *innvl, nvlist_t *outnvl)
5857 {
5858 	(void) outnvl;
5859 	spa_t *spa;
5860 	int error;
5861 	boolean_t rc, scrub_restart = B_TRUE;
5862 
5863 	if (innvl) {
5864 		error = nvlist_lookup_boolean_value(innvl,
5865 		    "scrub_restart", &rc);
5866 		if (error == 0)
5867 			scrub_restart = rc;
5868 	}
5869 
5870 	error = spa_open(pool, &spa, FTAG);
5871 	if (error != 0)
5872 		return (error);
5873 
5874 	spa_vdev_state_enter(spa, SCL_NONE);
5875 
5876 	/*
5877 	 * If the scrub_restart flag is B_FALSE and a scrub is already
5878 	 * in progress then set spa_scrub_reopen flag to B_TRUE so that
5879 	 * we don't restart the scrub as a side effect of the reopen.
5880 	 * Otherwise, let vdev_open() decided if a resilver is required.
5881 	 */
5882 
5883 	spa->spa_scrub_reopen = (!scrub_restart &&
5884 	    dsl_scan_scrubbing(spa->spa_dsl_pool));
5885 	vdev_reopen(spa->spa_root_vdev);
5886 	spa->spa_scrub_reopen = B_FALSE;
5887 
5888 	(void) spa_vdev_state_exit(spa, NULL, 0);
5889 	spa_close(spa, FTAG);
5890 	return (0);
5891 }
5892 
5893 /*
5894  * inputs:
5895  * zc_name	name of filesystem
5896  *
5897  * outputs:
5898  * zc_string	name of conflicting snapshot, if there is one
5899  */
5900 static int
zfs_ioc_promote(zfs_cmd_t * zc)5901 zfs_ioc_promote(zfs_cmd_t *zc)
5902 {
5903 	dsl_pool_t *dp;
5904 	dsl_dataset_t *ds, *ods;
5905 	char origin[ZFS_MAX_DATASET_NAME_LEN];
5906 	char *cp;
5907 	int error;
5908 
5909 	zc->zc_name[sizeof (zc->zc_name) - 1] = '\0';
5910 	if (dataset_namecheck(zc->zc_name, NULL, NULL) != 0 ||
5911 	    strchr(zc->zc_name, '%'))
5912 		return (SET_ERROR(EINVAL));
5913 
5914 	error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
5915 	if (error != 0)
5916 		return (error);
5917 
5918 	error = dsl_dataset_hold(dp, zc->zc_name, FTAG, &ds);
5919 	if (error != 0) {
5920 		dsl_pool_rele(dp, FTAG);
5921 		return (error);
5922 	}
5923 
5924 	if (!dsl_dir_is_clone(ds->ds_dir)) {
5925 		dsl_dataset_rele(ds, FTAG);
5926 		dsl_pool_rele(dp, FTAG);
5927 		return (SET_ERROR(EINVAL));
5928 	}
5929 
5930 	error = dsl_dataset_hold_obj(dp,
5931 	    dsl_dir_phys(ds->ds_dir)->dd_origin_obj, FTAG, &ods);
5932 	if (error != 0) {
5933 		dsl_dataset_rele(ds, FTAG);
5934 		dsl_pool_rele(dp, FTAG);
5935 		return (error);
5936 	}
5937 
5938 	dsl_dataset_name(ods, origin);
5939 	dsl_dataset_rele(ods, FTAG);
5940 	dsl_dataset_rele(ds, FTAG);
5941 	dsl_pool_rele(dp, FTAG);
5942 
5943 	/*
5944 	 * We don't need to unmount *all* the origin fs's snapshots, but
5945 	 * it's easier.
5946 	 */
5947 	cp = strchr(origin, '@');
5948 	if (cp)
5949 		*cp = '\0';
5950 	(void) dmu_objset_find(origin,
5951 	    zfs_unmount_snap_cb, NULL, DS_FIND_SNAPSHOTS);
5952 	return (dsl_dataset_promote(zc->zc_name, zc->zc_string));
5953 }
5954 
5955 /*
5956  * Retrieve a single {user|group|project}{used|quota}@... property.
5957  *
5958  * inputs:
5959  * zc_name	name of filesystem
5960  * zc_objset_type zfs_userquota_prop_t
5961  * zc_value	domain name (eg. "S-1-234-567-89")
5962  * zc_guid	RID/UID/GID
5963  *
5964  * outputs:
5965  * zc_cookie	property value
5966  */
5967 static int
zfs_ioc_userspace_one(zfs_cmd_t * zc)5968 zfs_ioc_userspace_one(zfs_cmd_t *zc)
5969 {
5970 	zfsvfs_t *zfsvfs;
5971 	int error;
5972 
5973 	if (zc->zc_objset_type >= ZFS_NUM_USERQUOTA_PROPS)
5974 		return (SET_ERROR(EINVAL));
5975 
5976 	error = zfsvfs_hold(zc->zc_name, FTAG, &zfsvfs, B_FALSE);
5977 	if (error != 0)
5978 		return (error);
5979 
5980 	error = zfs_userspace_one(zfsvfs,
5981 	    zc->zc_objset_type, zc->zc_value, zc->zc_guid, &zc->zc_cookie);
5982 	zfsvfs_rele(zfsvfs, FTAG);
5983 
5984 	return (error);
5985 }
5986 
5987 /*
5988  * inputs:
5989  * zc_name		name of filesystem
5990  * zc_cookie		zap cursor
5991  * zc_objset_type	zfs_userquota_prop_t
5992  * zc_nvlist_dst[_size] buffer to fill (not really an nvlist)
5993  *
5994  * outputs:
5995  * zc_nvlist_dst[_size]	data buffer (array of zfs_useracct_t)
5996  * zc_cookie	zap cursor
5997  */
5998 static int
zfs_ioc_userspace_many(zfs_cmd_t * zc)5999 zfs_ioc_userspace_many(zfs_cmd_t *zc)
6000 {
6001 	zfsvfs_t *zfsvfs;
6002 	int bufsize = zc->zc_nvlist_dst_size;
6003 
6004 	if (bufsize <= 0)
6005 		return (SET_ERROR(ENOMEM));
6006 
6007 	int error = zfsvfs_hold(zc->zc_name, FTAG, &zfsvfs, B_FALSE);
6008 	if (error != 0)
6009 		return (error);
6010 
6011 	void *buf = vmem_alloc(bufsize, KM_SLEEP);
6012 
6013 	error = zfs_userspace_many(zfsvfs, zc->zc_objset_type, &zc->zc_cookie,
6014 	    buf, &zc->zc_nvlist_dst_size);
6015 
6016 	if (error == 0) {
6017 		error = xcopyout(buf,
6018 		    (void *)(uintptr_t)zc->zc_nvlist_dst,
6019 		    zc->zc_nvlist_dst_size);
6020 	}
6021 	vmem_free(buf, bufsize);
6022 	zfsvfs_rele(zfsvfs, FTAG);
6023 
6024 	return (error);
6025 }
6026 
6027 /*
6028  * inputs:
6029  * zc_name		name of filesystem
6030  *
6031  * outputs:
6032  * none
6033  */
6034 static int
zfs_ioc_userspace_upgrade(zfs_cmd_t * zc)6035 zfs_ioc_userspace_upgrade(zfs_cmd_t *zc)
6036 {
6037 	int error = 0;
6038 	zfsvfs_t *zfsvfs;
6039 
6040 	if (getzfsvfs(zc->zc_name, &zfsvfs) == 0) {
6041 		if (!dmu_objset_userused_enabled(zfsvfs->z_os)) {
6042 			/*
6043 			 * If userused is not enabled, it may be because the
6044 			 * objset needs to be closed & reopened (to grow the
6045 			 * objset_phys_t).  Suspend/resume the fs will do that.
6046 			 */
6047 			dsl_dataset_t *ds, *newds;
6048 
6049 			ds = dmu_objset_ds(zfsvfs->z_os);
6050 			error = zfs_suspend_fs(zfsvfs);
6051 			if (error == 0) {
6052 				dmu_objset_refresh_ownership(ds, &newds,
6053 				    B_TRUE, zfsvfs);
6054 				error = zfs_resume_fs(zfsvfs, newds);
6055 			}
6056 		}
6057 		if (error == 0) {
6058 			mutex_enter(&zfsvfs->z_os->os_upgrade_lock);
6059 			if (zfsvfs->z_os->os_upgrade_id == 0) {
6060 				/* clear potential error code and retry */
6061 				zfsvfs->z_os->os_upgrade_status = 0;
6062 				mutex_exit(&zfsvfs->z_os->os_upgrade_lock);
6063 
6064 				dsl_pool_config_enter(
6065 				    dmu_objset_pool(zfsvfs->z_os), FTAG);
6066 				dmu_objset_userspace_upgrade(zfsvfs->z_os);
6067 				dsl_pool_config_exit(
6068 				    dmu_objset_pool(zfsvfs->z_os), FTAG);
6069 			} else {
6070 				mutex_exit(&zfsvfs->z_os->os_upgrade_lock);
6071 			}
6072 
6073 			taskq_wait_id(zfsvfs->z_os->os_spa->spa_upgrade_taskq,
6074 			    zfsvfs->z_os->os_upgrade_id);
6075 			error = zfsvfs->z_os->os_upgrade_status;
6076 		}
6077 		zfs_vfs_rele(zfsvfs);
6078 	} else {
6079 		objset_t *os;
6080 
6081 		/* XXX kind of reading contents without owning */
6082 		error = dmu_objset_hold_flags(zc->zc_name, B_TRUE, FTAG, &os);
6083 		if (error != 0)
6084 			return (error);
6085 
6086 		mutex_enter(&os->os_upgrade_lock);
6087 		if (os->os_upgrade_id == 0) {
6088 			/* clear potential error code and retry */
6089 			os->os_upgrade_status = 0;
6090 			mutex_exit(&os->os_upgrade_lock);
6091 
6092 			dmu_objset_userspace_upgrade(os);
6093 		} else {
6094 			mutex_exit(&os->os_upgrade_lock);
6095 		}
6096 
6097 		dsl_pool_rele(dmu_objset_pool(os), FTAG);
6098 
6099 		taskq_wait_id(os->os_spa->spa_upgrade_taskq, os->os_upgrade_id);
6100 		error = os->os_upgrade_status;
6101 
6102 		dsl_dataset_rele_flags(dmu_objset_ds(os), DS_HOLD_FLAG_DECRYPT,
6103 		    FTAG);
6104 	}
6105 	return (error);
6106 }
6107 
6108 /*
6109  * inputs:
6110  * zc_name		name of filesystem
6111  *
6112  * outputs:
6113  * none
6114  */
6115 static int
zfs_ioc_id_quota_upgrade(zfs_cmd_t * zc)6116 zfs_ioc_id_quota_upgrade(zfs_cmd_t *zc)
6117 {
6118 	objset_t *os;
6119 	int error;
6120 
6121 	error = dmu_objset_hold_flags(zc->zc_name, B_TRUE, FTAG, &os);
6122 	if (error != 0)
6123 		return (error);
6124 
6125 	if (dmu_objset_userobjspace_upgradable(os) ||
6126 	    dmu_objset_projectquota_upgradable(os)) {
6127 		mutex_enter(&os->os_upgrade_lock);
6128 		if (os->os_upgrade_id == 0) {
6129 			/* clear potential error code and retry */
6130 			os->os_upgrade_status = 0;
6131 			mutex_exit(&os->os_upgrade_lock);
6132 
6133 			dmu_objset_id_quota_upgrade(os);
6134 		} else {
6135 			mutex_exit(&os->os_upgrade_lock);
6136 		}
6137 
6138 		dsl_pool_rele(dmu_objset_pool(os), FTAG);
6139 
6140 		taskq_wait_id(os->os_spa->spa_upgrade_taskq, os->os_upgrade_id);
6141 		error = os->os_upgrade_status;
6142 	} else {
6143 		dsl_pool_rele(dmu_objset_pool(os), FTAG);
6144 	}
6145 
6146 	dsl_dataset_rele_flags(dmu_objset_ds(os), DS_HOLD_FLAG_DECRYPT, FTAG);
6147 
6148 	return (error);
6149 }
6150 
6151 static int
zfs_ioc_share(zfs_cmd_t * zc)6152 zfs_ioc_share(zfs_cmd_t *zc)
6153 {
6154 	return (SET_ERROR(ENOSYS));
6155 }
6156 
6157 /*
6158  * inputs:
6159  * zc_name		name of containing filesystem
6160  * zc_obj		object # beyond which we want next in-use object #
6161  *
6162  * outputs:
6163  * zc_obj		next in-use object #
6164  */
6165 static int
zfs_ioc_next_obj(zfs_cmd_t * zc)6166 zfs_ioc_next_obj(zfs_cmd_t *zc)
6167 {
6168 	objset_t *os = NULL;
6169 	int error;
6170 
6171 	error = dmu_objset_hold(zc->zc_name, FTAG, &os);
6172 	if (error != 0)
6173 		return (error);
6174 
6175 	error = dmu_object_next(os, &zc->zc_obj, B_FALSE, 0);
6176 
6177 	dmu_objset_rele(os, FTAG);
6178 	return (error);
6179 }
6180 
6181 /*
6182  * inputs:
6183  * zc_name		name of filesystem
6184  * zc_value		prefix name for snapshot
6185  * zc_cleanup_fd	cleanup-on-exit file descriptor for calling process
6186  *
6187  * outputs:
6188  * zc_value		short name of new snapshot
6189  */
6190 static int
zfs_ioc_tmp_snapshot(zfs_cmd_t * zc)6191 zfs_ioc_tmp_snapshot(zfs_cmd_t *zc)
6192 {
6193 	char *snap_name;
6194 	char *hold_name;
6195 	minor_t minor;
6196 
6197 	zfs_file_t *fp = zfs_onexit_fd_hold(zc->zc_cleanup_fd, &minor);
6198 	if (fp == NULL)
6199 		return (SET_ERROR(EBADF));
6200 
6201 	snap_name = kmem_asprintf("%s-%016llx", zc->zc_value,
6202 	    (u_longlong_t)ddi_get_lbolt64());
6203 	hold_name = kmem_asprintf("%%%s", zc->zc_value);
6204 
6205 	int error = dsl_dataset_snapshot_tmp(zc->zc_name, snap_name, minor,
6206 	    hold_name);
6207 	if (error == 0)
6208 		(void) strlcpy(zc->zc_value, snap_name,
6209 		    sizeof (zc->zc_value));
6210 	kmem_strfree(snap_name);
6211 	kmem_strfree(hold_name);
6212 	zfs_onexit_fd_rele(fp);
6213 	return (error);
6214 }
6215 
6216 /*
6217  * inputs:
6218  * zc_name		name of "to" snapshot
6219  * zc_value		name of "from" snapshot
6220  * zc_cookie		file descriptor to write diff data on
6221  *
6222  * outputs:
6223  * dmu_diff_record_t's to the file descriptor
6224  */
6225 static int
zfs_ioc_diff(zfs_cmd_t * zc)6226 zfs_ioc_diff(zfs_cmd_t *zc)
6227 {
6228 	zfs_file_t *fp;
6229 	offset_t off;
6230 	int error;
6231 
6232 	if ((fp = zfs_file_get(zc->zc_cookie)) == NULL)
6233 		return (SET_ERROR(EBADF));
6234 
6235 	off = zfs_file_off(fp);
6236 	error = dmu_diff(zc->zc_name, zc->zc_value, fp, &off);
6237 
6238 	zfs_file_put(fp);
6239 
6240 	return (error);
6241 }
6242 
6243 static int
zfs_ioc_smb_acl(zfs_cmd_t * zc)6244 zfs_ioc_smb_acl(zfs_cmd_t *zc)
6245 {
6246 	return (SET_ERROR(ENOTSUP));
6247 }
6248 
6249 /*
6250  * innvl: {
6251  *     "holds" -> { snapname -> holdname (string), ... }
6252  *     (optional) "cleanup_fd" -> fd (int32)
6253  * }
6254  *
6255  * outnvl: {
6256  *     snapname -> error value (int32)
6257  *     ...
6258  * }
6259  */
6260 static const zfs_ioc_key_t zfs_keys_hold[] = {
6261 	{"holds",		DATA_TYPE_NVLIST,	0},
6262 	{"cleanup_fd",		DATA_TYPE_INT32,	ZK_OPTIONAL},
6263 };
6264 
6265 static int
zfs_ioc_hold(const char * pool,nvlist_t * args,nvlist_t * errlist)6266 zfs_ioc_hold(const char *pool, nvlist_t *args, nvlist_t *errlist)
6267 {
6268 	(void) pool;
6269 	nvpair_t *pair;
6270 	nvlist_t *holds;
6271 	int cleanup_fd = -1;
6272 	int error;
6273 	minor_t minor = 0;
6274 	zfs_file_t *fp = NULL;
6275 
6276 	holds = fnvlist_lookup_nvlist(args, "holds");
6277 
6278 	/* make sure the user didn't pass us any invalid (empty) tags */
6279 	for (pair = nvlist_next_nvpair(holds, NULL); pair != NULL;
6280 	    pair = nvlist_next_nvpair(holds, pair)) {
6281 		const char *htag;
6282 
6283 		error = nvpair_value_string(pair, &htag);
6284 		if (error != 0)
6285 			return (SET_ERROR(error));
6286 
6287 		if (strlen(htag) == 0)
6288 			return (SET_ERROR(EINVAL));
6289 	}
6290 
6291 	if (nvlist_lookup_int32(args, "cleanup_fd", &cleanup_fd) == 0) {
6292 		fp = zfs_onexit_fd_hold(cleanup_fd, &minor);
6293 		if (fp == NULL)
6294 			return (SET_ERROR(EBADF));
6295 	}
6296 
6297 	error = dsl_dataset_user_hold(holds, minor, errlist);
6298 	if (fp != NULL) {
6299 		ASSERT3U(minor, !=, 0);
6300 		zfs_onexit_fd_rele(fp);
6301 	}
6302 	return (SET_ERROR(error));
6303 }
6304 
6305 /*
6306  * innvl is not used.
6307  *
6308  * outnvl: {
6309  *    holdname -> time added (uint64 seconds since epoch)
6310  *    ...
6311  * }
6312  */
6313 static const zfs_ioc_key_t zfs_keys_get_holds[] = {
6314 	/* no nvl keys */
6315 };
6316 
6317 static int
zfs_ioc_get_holds(const char * snapname,nvlist_t * args,nvlist_t * outnvl)6318 zfs_ioc_get_holds(const char *snapname, nvlist_t *args, nvlist_t *outnvl)
6319 {
6320 	(void) args;
6321 	return (dsl_dataset_get_holds(snapname, outnvl));
6322 }
6323 
6324 /*
6325  * innvl: {
6326  *     snapname -> { holdname, ... }
6327  *     ...
6328  * }
6329  *
6330  * outnvl: {
6331  *     snapname -> error value (int32)
6332  *     ...
6333  * }
6334  */
6335 static const zfs_ioc_key_t zfs_keys_release[] = {
6336 	{"<snapname>...",	DATA_TYPE_NVLIST,	ZK_WILDCARDLIST},
6337 };
6338 
6339 static int
zfs_ioc_release(const char * pool,nvlist_t * holds,nvlist_t * errlist)6340 zfs_ioc_release(const char *pool, nvlist_t *holds, nvlist_t *errlist)
6341 {
6342 	(void) pool;
6343 	return (dsl_dataset_user_release(holds, errlist));
6344 }
6345 
6346 /*
6347  * inputs:
6348  * zc_guid		flags (ZEVENT_NONBLOCK)
6349  * zc_cleanup_fd	zevent file descriptor
6350  *
6351  * outputs:
6352  * zc_nvlist_dst	next nvlist event
6353  * zc_cookie		dropped events since last get
6354  */
6355 static int
zfs_ioc_events_next(zfs_cmd_t * zc)6356 zfs_ioc_events_next(zfs_cmd_t *zc)
6357 {
6358 	zfs_zevent_t *ze;
6359 	nvlist_t *event = NULL;
6360 	minor_t minor;
6361 	uint64_t dropped = 0;
6362 	int error;
6363 
6364 	zfs_file_t *fp = zfs_zevent_fd_hold(zc->zc_cleanup_fd, &minor, &ze);
6365 	if (fp == NULL)
6366 		return (SET_ERROR(EBADF));
6367 
6368 	do {
6369 		error = zfs_zevent_next(ze, &event,
6370 		    &zc->zc_nvlist_dst_size, &dropped);
6371 		if (event != NULL) {
6372 			zc->zc_cookie = dropped;
6373 			error = put_nvlist(zc, event);
6374 			nvlist_free(event);
6375 		}
6376 
6377 		if (zc->zc_guid & ZEVENT_NONBLOCK)
6378 			break;
6379 
6380 		if ((error == 0) || (error != ENOENT))
6381 			break;
6382 
6383 		error = zfs_zevent_wait(ze);
6384 		if (error != 0)
6385 			break;
6386 	} while (1);
6387 
6388 	zfs_zevent_fd_rele(fp);
6389 
6390 	return (error);
6391 }
6392 
6393 /*
6394  * outputs:
6395  * zc_cookie		cleared events count
6396  */
6397 static int
zfs_ioc_events_clear(zfs_cmd_t * zc)6398 zfs_ioc_events_clear(zfs_cmd_t *zc)
6399 {
6400 	uint_t count;
6401 
6402 	zfs_zevent_drain_all(&count);
6403 	zc->zc_cookie = count;
6404 
6405 	return (0);
6406 }
6407 
6408 /*
6409  * inputs:
6410  * zc_guid		eid | ZEVENT_SEEK_START | ZEVENT_SEEK_END
6411  * zc_cleanup		zevent file descriptor
6412  */
6413 static int
zfs_ioc_events_seek(zfs_cmd_t * zc)6414 zfs_ioc_events_seek(zfs_cmd_t *zc)
6415 {
6416 	zfs_zevent_t *ze;
6417 	minor_t minor;
6418 	int error;
6419 
6420 	zfs_file_t *fp = zfs_zevent_fd_hold(zc->zc_cleanup_fd, &minor, &ze);
6421 	if (fp == NULL)
6422 		return (SET_ERROR(EBADF));
6423 
6424 	error = zfs_zevent_seek(ze, zc->zc_guid);
6425 	zfs_zevent_fd_rele(fp);
6426 
6427 	return (error);
6428 }
6429 
6430 /*
6431  * inputs:
6432  * zc_name		name of later filesystem or snapshot
6433  * zc_value		full name of old snapshot or bookmark
6434  *
6435  * outputs:
6436  * zc_cookie		space in bytes
6437  * zc_objset_type	compressed space in bytes
6438  * zc_perm_action	uncompressed space in bytes
6439  */
6440 static int
zfs_ioc_space_written(zfs_cmd_t * zc)6441 zfs_ioc_space_written(zfs_cmd_t *zc)
6442 {
6443 	int error;
6444 	dsl_pool_t *dp;
6445 	dsl_dataset_t *new;
6446 
6447 	error = dsl_pool_hold(zc->zc_name, FTAG, &dp);
6448 	if (error != 0)
6449 		return (error);
6450 	error = dsl_dataset_hold(dp, zc->zc_name, FTAG, &new);
6451 	if (error != 0) {
6452 		dsl_pool_rele(dp, FTAG);
6453 		return (error);
6454 	}
6455 	if (strchr(zc->zc_value, '#') != NULL) {
6456 		zfs_bookmark_phys_t bmp;
6457 		error = dsl_bookmark_lookup(dp, zc->zc_value,
6458 		    new, &bmp);
6459 		if (error == 0) {
6460 			error = dsl_dataset_space_written_bookmark(&bmp, new,
6461 			    &zc->zc_cookie,
6462 			    &zc->zc_objset_type, &zc->zc_perm_action);
6463 		}
6464 	} else {
6465 		dsl_dataset_t *old;
6466 		error = dsl_dataset_hold(dp, zc->zc_value, FTAG, &old);
6467 
6468 		if (error == 0) {
6469 			error = dsl_dataset_space_written(old, new,
6470 			    &zc->zc_cookie,
6471 			    &zc->zc_objset_type, &zc->zc_perm_action);
6472 			dsl_dataset_rele(old, FTAG);
6473 		}
6474 	}
6475 	dsl_dataset_rele(new, FTAG);
6476 	dsl_pool_rele(dp, FTAG);
6477 	return (error);
6478 }
6479 
6480 /*
6481  * innvl: {
6482  *     "firstsnap" -> snapshot name
6483  * }
6484  *
6485  * outnvl: {
6486  *     "used" -> space in bytes
6487  *     "compressed" -> compressed space in bytes
6488  *     "uncompressed" -> uncompressed space in bytes
6489  * }
6490  */
6491 static const zfs_ioc_key_t zfs_keys_space_snaps[] = {
6492 	{"firstsnap",	DATA_TYPE_STRING,	0},
6493 };
6494 
6495 static int
zfs_ioc_space_snaps(const char * lastsnap,nvlist_t * innvl,nvlist_t * outnvl)6496 zfs_ioc_space_snaps(const char *lastsnap, nvlist_t *innvl, nvlist_t *outnvl)
6497 {
6498 	int error;
6499 	dsl_pool_t *dp;
6500 	dsl_dataset_t *new, *old;
6501 	const char *firstsnap;
6502 	uint64_t used, comp, uncomp;
6503 
6504 	firstsnap = fnvlist_lookup_string(innvl, "firstsnap");
6505 
6506 	error = dsl_pool_hold(lastsnap, FTAG, &dp);
6507 	if (error != 0)
6508 		return (error);
6509 
6510 	error = dsl_dataset_hold(dp, lastsnap, FTAG, &new);
6511 	if (error == 0 && !new->ds_is_snapshot) {
6512 		dsl_dataset_rele(new, FTAG);
6513 		error = SET_ERROR(EINVAL);
6514 	}
6515 	if (error != 0) {
6516 		dsl_pool_rele(dp, FTAG);
6517 		return (error);
6518 	}
6519 	error = dsl_dataset_hold(dp, firstsnap, FTAG, &old);
6520 	if (error == 0 && !old->ds_is_snapshot) {
6521 		dsl_dataset_rele(old, FTAG);
6522 		error = SET_ERROR(EINVAL);
6523 	}
6524 	if (error != 0) {
6525 		dsl_dataset_rele(new, FTAG);
6526 		dsl_pool_rele(dp, FTAG);
6527 		return (error);
6528 	}
6529 
6530 	error = dsl_dataset_space_wouldfree(old, new, &used, &comp, &uncomp);
6531 	dsl_dataset_rele(old, FTAG);
6532 	dsl_dataset_rele(new, FTAG);
6533 	dsl_pool_rele(dp, FTAG);
6534 	fnvlist_add_uint64(outnvl, "used", used);
6535 	fnvlist_add_uint64(outnvl, "compressed", comp);
6536 	fnvlist_add_uint64(outnvl, "uncompressed", uncomp);
6537 	return (error);
6538 }
6539 
6540 /*
6541  * innvl: {
6542  *     "fd" -> file descriptor to write stream to (int32)
6543  *     (optional) "fromsnap" -> full snap name to send an incremental from
6544  *     (optional) "largeblockok" -> (value ignored)
6545  *         indicates that blocks > 128KB are permitted
6546  *     (optional) "embedok" -> (value ignored)
6547  *         presence indicates DRR_WRITE_EMBEDDED records are permitted
6548  *     (optional) "compressok" -> (value ignored)
6549  *         presence indicates compressed DRR_WRITE records are permitted
6550  *     (optional) "rawok" -> (value ignored)
6551  *         presence indicates raw encrypted records should be used.
6552  *     (optional) "savedok" -> (value ignored)
6553  *         presence indicates we should send a partially received snapshot
6554  *     (optional) "resume_object" and "resume_offset" -> (uint64)
6555  *         if present, resume send stream from specified object and offset.
6556  *     (optional) "redactbook" -> (string)
6557  *         if present, use this bookmark's redaction list to generate a redacted
6558  *         send stream
6559  * }
6560  *
6561  * outnvl is unused
6562  */
6563 static const zfs_ioc_key_t zfs_keys_send_new[] = {
6564 	{"fd",			DATA_TYPE_INT32,	0},
6565 	{"fromsnap",		DATA_TYPE_STRING,	ZK_OPTIONAL},
6566 	{"largeblockok",	DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6567 	{"embedok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6568 	{"compressok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6569 	{"rawok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6570 	{"savedok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6571 	{"resume_object",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
6572 	{"resume_offset",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
6573 	{"redactbook",		DATA_TYPE_STRING,	ZK_OPTIONAL},
6574 };
6575 
6576 static int
zfs_ioc_send_new(const char * snapname,nvlist_t * innvl,nvlist_t * outnvl)6577 zfs_ioc_send_new(const char *snapname, nvlist_t *innvl, nvlist_t *outnvl)
6578 {
6579 	(void) outnvl;
6580 	int error;
6581 	offset_t off;
6582 	const char *fromname = NULL;
6583 	int fd;
6584 	zfs_file_t *fp;
6585 	boolean_t largeblockok;
6586 	boolean_t embedok;
6587 	boolean_t compressok;
6588 	boolean_t rawok;
6589 	boolean_t savedok;
6590 	uint64_t resumeobj = 0;
6591 	uint64_t resumeoff = 0;
6592 	const char *redactbook = NULL;
6593 
6594 	fd = fnvlist_lookup_int32(innvl, "fd");
6595 
6596 	(void) nvlist_lookup_string(innvl, "fromsnap", &fromname);
6597 
6598 	largeblockok = nvlist_exists(innvl, "largeblockok");
6599 	embedok = nvlist_exists(innvl, "embedok");
6600 	compressok = nvlist_exists(innvl, "compressok");
6601 	rawok = nvlist_exists(innvl, "rawok");
6602 	savedok = nvlist_exists(innvl, "savedok");
6603 
6604 	(void) nvlist_lookup_uint64(innvl, "resume_object", &resumeobj);
6605 	(void) nvlist_lookup_uint64(innvl, "resume_offset", &resumeoff);
6606 
6607 	(void) nvlist_lookup_string(innvl, "redactbook", &redactbook);
6608 
6609 	if ((fp = zfs_file_get(fd)) == NULL)
6610 		return (SET_ERROR(EBADF));
6611 
6612 	off = zfs_file_off(fp);
6613 
6614 	dmu_send_outparams_t out = {0};
6615 	out.dso_outfunc = dump_bytes;
6616 	out.dso_arg = fp;
6617 	out.dso_dryrun = B_FALSE;
6618 	error = dmu_send(snapname, fromname, embedok, largeblockok,
6619 	    compressok, rawok, savedok, resumeobj, resumeoff,
6620 	    redactbook, fd, &off, &out);
6621 
6622 	zfs_file_put(fp);
6623 	return (error);
6624 }
6625 
6626 static int
send_space_sum(objset_t * os,void * buf,int len,void * arg)6627 send_space_sum(objset_t *os, void *buf, int len, void *arg)
6628 {
6629 	(void) os, (void) buf;
6630 	uint64_t *size = arg;
6631 
6632 	*size += len;
6633 	return (0);
6634 }
6635 
6636 /*
6637  * Determine approximately how large a zfs send stream will be -- the number
6638  * of bytes that will be written to the fd supplied to zfs_ioc_send_new().
6639  *
6640  * innvl: {
6641  *     (optional) "from" -> full snap or bookmark name to send an incremental
6642  *                          from
6643  *     (optional) "largeblockok" -> (value ignored)
6644  *         indicates that blocks > 128KB are permitted
6645  *     (optional) "embedok" -> (value ignored)
6646  *         presence indicates DRR_WRITE_EMBEDDED records are permitted
6647  *     (optional) "compressok" -> (value ignored)
6648  *         presence indicates compressed DRR_WRITE records are permitted
6649  *     (optional) "rawok" -> (value ignored)
6650  *         presence indicates raw encrypted records should be used.
6651  *     (optional) "resume_object" and "resume_offset" -> (uint64)
6652  *         if present, resume send stream from specified object and offset.
6653  *     (optional) "fd" -> file descriptor to use as a cookie for progress
6654  *         tracking (int32)
6655  * }
6656  *
6657  * outnvl: {
6658  *     "space" -> bytes of space (uint64)
6659  * }
6660  */
6661 static const zfs_ioc_key_t zfs_keys_send_space[] = {
6662 	{"from",		DATA_TYPE_STRING,	ZK_OPTIONAL},
6663 	{"fromsnap",		DATA_TYPE_STRING,	ZK_OPTIONAL},
6664 	{"largeblockok",	DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6665 	{"embedok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6666 	{"compressok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6667 	{"rawok",		DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6668 	{"fd",			DATA_TYPE_INT32,	ZK_OPTIONAL},
6669 	{"redactbook",		DATA_TYPE_STRING,	ZK_OPTIONAL},
6670 	{"resume_object",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
6671 	{"resume_offset",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
6672 	{"bytes",		DATA_TYPE_UINT64,	ZK_OPTIONAL},
6673 };
6674 
6675 static int
zfs_ioc_send_space(const char * snapname,nvlist_t * innvl,nvlist_t * outnvl)6676 zfs_ioc_send_space(const char *snapname, nvlist_t *innvl, nvlist_t *outnvl)
6677 {
6678 	dsl_pool_t *dp;
6679 	dsl_dataset_t *tosnap;
6680 	dsl_dataset_t *fromsnap = NULL;
6681 	int error;
6682 	const char *fromname = NULL;
6683 	const char *redactlist_book = NULL;
6684 	boolean_t largeblockok;
6685 	boolean_t embedok;
6686 	boolean_t compressok;
6687 	boolean_t rawok;
6688 	boolean_t savedok;
6689 	uint64_t space = 0;
6690 	boolean_t full_estimate = B_FALSE;
6691 	uint64_t resumeobj = 0;
6692 	uint64_t resumeoff = 0;
6693 	uint64_t resume_bytes = 0;
6694 	int32_t fd = -1;
6695 	zfs_bookmark_phys_t zbm = {0};
6696 
6697 	error = dsl_pool_hold(snapname, FTAG, &dp);
6698 	if (error != 0)
6699 		return (error);
6700 
6701 	error = dsl_dataset_hold(dp, snapname, FTAG, &tosnap);
6702 	if (error != 0) {
6703 		dsl_pool_rele(dp, FTAG);
6704 		return (error);
6705 	}
6706 	(void) nvlist_lookup_int32(innvl, "fd", &fd);
6707 
6708 	largeblockok = nvlist_exists(innvl, "largeblockok");
6709 	embedok = nvlist_exists(innvl, "embedok");
6710 	compressok = nvlist_exists(innvl, "compressok");
6711 	rawok = nvlist_exists(innvl, "rawok");
6712 	savedok = nvlist_exists(innvl, "savedok");
6713 	boolean_t from = (nvlist_lookup_string(innvl, "from", &fromname) == 0);
6714 	boolean_t altbook = (nvlist_lookup_string(innvl, "redactbook",
6715 	    &redactlist_book) == 0);
6716 
6717 	(void) nvlist_lookup_uint64(innvl, "resume_object", &resumeobj);
6718 	(void) nvlist_lookup_uint64(innvl, "resume_offset", &resumeoff);
6719 	(void) nvlist_lookup_uint64(innvl, "bytes", &resume_bytes);
6720 
6721 	if (altbook) {
6722 		full_estimate = B_TRUE;
6723 	} else if (from) {
6724 		if (strchr(fromname, '#')) {
6725 			error = dsl_bookmark_lookup(dp, fromname, tosnap, &zbm);
6726 
6727 			/*
6728 			 * dsl_bookmark_lookup() will fail with EXDEV if
6729 			 * the from-bookmark and tosnap are at the same txg.
6730 			 * However, it's valid to do a send (and therefore,
6731 			 * a send estimate) from and to the same time point,
6732 			 * if the bookmark is redacted (the incremental send
6733 			 * can change what's redacted on the target).  In
6734 			 * this case, dsl_bookmark_lookup() fills in zbm
6735 			 * but returns EXDEV.  Ignore this error.
6736 			 */
6737 			if (error == EXDEV && zbm.zbm_redaction_obj != 0 &&
6738 			    zbm.zbm_guid ==
6739 			    dsl_dataset_phys(tosnap)->ds_guid)
6740 				error = 0;
6741 
6742 			if (error != 0) {
6743 				dsl_dataset_rele(tosnap, FTAG);
6744 				dsl_pool_rele(dp, FTAG);
6745 				return (error);
6746 			}
6747 			if (zbm.zbm_redaction_obj != 0 || !(zbm.zbm_flags &
6748 			    ZBM_FLAG_HAS_FBN)) {
6749 				full_estimate = B_TRUE;
6750 			}
6751 		} else if (strchr(fromname, '@')) {
6752 			error = dsl_dataset_hold(dp, fromname, FTAG, &fromsnap);
6753 			if (error != 0) {
6754 				dsl_dataset_rele(tosnap, FTAG);
6755 				dsl_pool_rele(dp, FTAG);
6756 				return (error);
6757 			}
6758 
6759 			if (!dsl_dataset_is_before(tosnap, fromsnap, 0)) {
6760 				full_estimate = B_TRUE;
6761 				dsl_dataset_rele(fromsnap, FTAG);
6762 			}
6763 		} else {
6764 			/*
6765 			 * from is not properly formatted as a snapshot or
6766 			 * bookmark
6767 			 */
6768 			dsl_dataset_rele(tosnap, FTAG);
6769 			dsl_pool_rele(dp, FTAG);
6770 			return (SET_ERROR(EINVAL));
6771 		}
6772 	}
6773 
6774 	if (full_estimate) {
6775 		dmu_send_outparams_t out = {0};
6776 		offset_t off = 0;
6777 		out.dso_outfunc = send_space_sum;
6778 		out.dso_arg = &space;
6779 		out.dso_dryrun = B_TRUE;
6780 		/*
6781 		 * We have to release these holds so dmu_send can take them.  It
6782 		 * will do all the error checking we need.
6783 		 */
6784 		dsl_dataset_rele(tosnap, FTAG);
6785 		dsl_pool_rele(dp, FTAG);
6786 		error = dmu_send(snapname, fromname, embedok, largeblockok,
6787 		    compressok, rawok, savedok, resumeobj, resumeoff,
6788 		    redactlist_book, fd, &off, &out);
6789 	} else {
6790 		error = dmu_send_estimate_fast(tosnap, fromsnap,
6791 		    (from && strchr(fromname, '#') != NULL ? &zbm : NULL),
6792 		    compressok || rawok, savedok, &space);
6793 		space -= resume_bytes;
6794 		if (fromsnap != NULL)
6795 			dsl_dataset_rele(fromsnap, FTAG);
6796 		dsl_dataset_rele(tosnap, FTAG);
6797 		dsl_pool_rele(dp, FTAG);
6798 	}
6799 
6800 	fnvlist_add_uint64(outnvl, "space", space);
6801 
6802 	return (error);
6803 }
6804 
6805 /*
6806  * Sync the currently open TXG to disk for the specified pool.
6807  * This is somewhat similar to 'zfs_sync()'.
6808  * For cases that do not result in error this ioctl will wait for
6809  * the currently open TXG to commit before returning back to the caller.
6810  *
6811  * innvl: {
6812  *  "force" -> when true, force uberblock update even if there is no dirty data.
6813  *             In addition this will cause the vdev configuration to be written
6814  *             out including updating the zpool cache file. (boolean_t)
6815  * }
6816  *
6817  * onvl is unused
6818  */
6819 static const zfs_ioc_key_t zfs_keys_pool_sync[] = {
6820 	{"force",	DATA_TYPE_BOOLEAN_VALUE,	0},
6821 };
6822 
6823 static int
zfs_ioc_pool_sync(const char * pool,nvlist_t * innvl,nvlist_t * onvl)6824 zfs_ioc_pool_sync(const char *pool, nvlist_t *innvl, nvlist_t *onvl)
6825 {
6826 	(void) onvl;
6827 	int err;
6828 	boolean_t rc, force = B_FALSE;
6829 	spa_t *spa;
6830 
6831 	if ((err = spa_open(pool, &spa, FTAG)) != 0)
6832 		return (err);
6833 
6834 	if (innvl) {
6835 		err = nvlist_lookup_boolean_value(innvl, "force", &rc);
6836 		if (err == 0)
6837 			force = rc;
6838 	}
6839 
6840 	if (force) {
6841 		spa_config_enter(spa, SCL_CONFIG, FTAG, RW_WRITER);
6842 		vdev_config_dirty(spa->spa_root_vdev);
6843 		spa_config_exit(spa, SCL_CONFIG, FTAG);
6844 	}
6845 	txg_wait_synced(spa_get_dsl(spa), 0);
6846 
6847 	spa_close(spa, FTAG);
6848 
6849 	return (0);
6850 }
6851 
6852 /*
6853  * Load a user's wrapping key into the kernel.
6854  * innvl: {
6855  *     "hidden_args" -> { "wkeydata" -> value }
6856  *         raw uint8_t array of encryption wrapping key data (32 bytes)
6857  *     (optional) "noop" -> (value ignored)
6858  *         presence indicated key should only be verified, not loaded
6859  * }
6860  */
6861 static const zfs_ioc_key_t zfs_keys_load_key[] = {
6862 	{"hidden_args",	DATA_TYPE_NVLIST,	0},
6863 	{"noop",	DATA_TYPE_BOOLEAN,	ZK_OPTIONAL},
6864 };
6865 
6866 static int
zfs_ioc_load_key(const char * dsname,nvlist_t * innvl,nvlist_t * outnvl)6867 zfs_ioc_load_key(const char *dsname, nvlist_t *innvl, nvlist_t *outnvl)
6868 {
6869 	(void) outnvl;
6870 	int ret;
6871 	dsl_crypto_params_t *dcp = NULL;
6872 	nvlist_t *hidden_args;
6873 	boolean_t noop = nvlist_exists(innvl, "noop");
6874 
6875 	if (strchr(dsname, '@') != NULL || strchr(dsname, '%') != NULL) {
6876 		ret = SET_ERROR(EINVAL);
6877 		goto error;
6878 	}
6879 
6880 	hidden_args = fnvlist_lookup_nvlist(innvl, ZPOOL_HIDDEN_ARGS);
6881 
6882 	ret = dsl_crypto_params_create_nvlist(DCP_CMD_NONE, NULL,
6883 	    hidden_args, &dcp);
6884 	if (ret != 0)
6885 		goto error;
6886 
6887 	ret = spa_keystore_load_wkey(dsname, dcp, noop);
6888 	if (ret != 0)
6889 		goto error;
6890 
6891 	dsl_crypto_params_free(dcp, noop);
6892 
6893 	return (0);
6894 
6895 error:
6896 	dsl_crypto_params_free(dcp, B_TRUE);
6897 	return (ret);
6898 }
6899 
6900 /*
6901  * Unload a user's wrapping key from the kernel.
6902  * Both innvl and outnvl are unused.
6903  */
6904 static const zfs_ioc_key_t zfs_keys_unload_key[] = {
6905 	/* no nvl keys */
6906 };
6907 
6908 static int
zfs_ioc_unload_key(const char * dsname,nvlist_t * innvl,nvlist_t * outnvl)6909 zfs_ioc_unload_key(const char *dsname, nvlist_t *innvl, nvlist_t *outnvl)
6910 {
6911 	(void) innvl, (void) outnvl;
6912 	int ret = 0;
6913 
6914 	if (strchr(dsname, '@') != NULL || strchr(dsname, '%') != NULL) {
6915 		ret = (SET_ERROR(EINVAL));
6916 		goto out;
6917 	}
6918 
6919 	ret = spa_keystore_unload_wkey(dsname);
6920 	if (ret != 0)
6921 		goto out;
6922 
6923 out:
6924 	return (ret);
6925 }
6926 
6927 /*
6928  * Changes a user's wrapping key used to decrypt a dataset. The keyformat,
6929  * keylocation, pbkdf2salt, and pbkdf2iters properties can also be specified
6930  * here to change how the key is derived in userspace.
6931  *
6932  * innvl: {
6933  *    "hidden_args" (optional) -> { "wkeydata" -> value }
6934  *         raw uint8_t array of new encryption wrapping key data (32 bytes)
6935  *    "props" (optional) -> { prop -> value }
6936  * }
6937  *
6938  * outnvl is unused
6939  */
6940 static const zfs_ioc_key_t zfs_keys_change_key[] = {
6941 	{"crypt_cmd",	DATA_TYPE_UINT64,	ZK_OPTIONAL},
6942 	{"hidden_args",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
6943 	{"props",	DATA_TYPE_NVLIST,	ZK_OPTIONAL},
6944 };
6945 
6946 static int
zfs_ioc_change_key(const char * dsname,nvlist_t * innvl,nvlist_t * outnvl)6947 zfs_ioc_change_key(const char *dsname, nvlist_t *innvl, nvlist_t *outnvl)
6948 {
6949 	(void) outnvl;
6950 	int ret;
6951 	uint64_t cmd = DCP_CMD_NONE;
6952 	dsl_crypto_params_t *dcp = NULL;
6953 	nvlist_t *args = NULL, *hidden_args = NULL;
6954 
6955 	if (strchr(dsname, '@') != NULL || strchr(dsname, '%') != NULL) {
6956 		ret = (SET_ERROR(EINVAL));
6957 		goto error;
6958 	}
6959 
6960 	(void) nvlist_lookup_uint64(innvl, "crypt_cmd", &cmd);
6961 	(void) nvlist_lookup_nvlist(innvl, "props", &args);
6962 	(void) nvlist_lookup_nvlist(innvl, ZPOOL_HIDDEN_ARGS, &hidden_args);
6963 
6964 	ret = dsl_crypto_params_create_nvlist(cmd, args, hidden_args, &dcp);
6965 	if (ret != 0)
6966 		goto error;
6967 
6968 	ret = spa_keystore_change_key(dsname, dcp);
6969 	if (ret != 0)
6970 		goto error;
6971 
6972 	dsl_crypto_params_free(dcp, B_FALSE);
6973 
6974 	return (0);
6975 
6976 error:
6977 	dsl_crypto_params_free(dcp, B_TRUE);
6978 	return (ret);
6979 }
6980 
6981 static zfs_ioc_vec_t zfs_ioc_vec[ZFS_IOC_LAST - ZFS_IOC_FIRST];
6982 
6983 static void
zfs_ioctl_register_legacy(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy,zfs_ioc_namecheck_t namecheck,boolean_t log_history,zfs_ioc_poolcheck_t pool_check)6984 zfs_ioctl_register_legacy(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func,
6985     zfs_secpolicy_func_t *secpolicy, zfs_ioc_namecheck_t namecheck,
6986     boolean_t log_history, zfs_ioc_poolcheck_t pool_check)
6987 {
6988 	zfs_ioc_vec_t *vec = &zfs_ioc_vec[ioc - ZFS_IOC_FIRST];
6989 
6990 	ASSERT3U(ioc, >=, ZFS_IOC_FIRST);
6991 	ASSERT3U(ioc, <, ZFS_IOC_LAST);
6992 	ASSERT3P(vec->zvec_legacy_func, ==, NULL);
6993 	ASSERT3P(vec->zvec_func, ==, NULL);
6994 
6995 	vec->zvec_legacy_func = func;
6996 	vec->zvec_secpolicy = secpolicy;
6997 	vec->zvec_namecheck = namecheck;
6998 	vec->zvec_allow_log = log_history;
6999 	vec->zvec_pool_check = pool_check;
7000 }
7001 
7002 /*
7003  * See the block comment at the beginning of this file for details on
7004  * each argument to this function.
7005  */
7006 void
zfs_ioctl_register(const char * name,zfs_ioc_t ioc,zfs_ioc_func_t * func,zfs_secpolicy_func_t * secpolicy,zfs_ioc_namecheck_t namecheck,zfs_ioc_poolcheck_t pool_check,boolean_t smush_outnvlist,boolean_t allow_log,const zfs_ioc_key_t * nvl_keys,size_t num_keys)7007 zfs_ioctl_register(const char *name, zfs_ioc_t ioc, zfs_ioc_func_t *func,
7008     zfs_secpolicy_func_t *secpolicy, zfs_ioc_namecheck_t namecheck,
7009     zfs_ioc_poolcheck_t pool_check, boolean_t smush_outnvlist,
7010     boolean_t allow_log, const zfs_ioc_key_t *nvl_keys, size_t num_keys)
7011 {
7012 	zfs_ioc_vec_t *vec = &zfs_ioc_vec[ioc - ZFS_IOC_FIRST];
7013 
7014 	ASSERT3U(ioc, >=, ZFS_IOC_FIRST);
7015 	ASSERT3U(ioc, <, ZFS_IOC_LAST);
7016 	ASSERT3P(vec->zvec_legacy_func, ==, NULL);
7017 	ASSERT3P(vec->zvec_func, ==, NULL);
7018 
7019 	/* if we are logging, the name must be valid */
7020 	ASSERT(!allow_log || namecheck != NO_NAME);
7021 
7022 	vec->zvec_name = name;
7023 	vec->zvec_func = func;
7024 	vec->zvec_secpolicy = secpolicy;
7025 	vec->zvec_namecheck = namecheck;
7026 	vec->zvec_pool_check = pool_check;
7027 	vec->zvec_smush_outnvlist = smush_outnvlist;
7028 	vec->zvec_allow_log = allow_log;
7029 	vec->zvec_nvl_keys = nvl_keys;
7030 	vec->zvec_nvl_key_count = num_keys;
7031 }
7032 
7033 static void
zfs_ioctl_register_pool(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy,boolean_t log_history,zfs_ioc_poolcheck_t pool_check)7034 zfs_ioctl_register_pool(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func,
7035     zfs_secpolicy_func_t *secpolicy, boolean_t log_history,
7036     zfs_ioc_poolcheck_t pool_check)
7037 {
7038 	zfs_ioctl_register_legacy(ioc, func, secpolicy,
7039 	    POOL_NAME, log_history, pool_check);
7040 }
7041 
7042 void
zfs_ioctl_register_dataset_nolog(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy,zfs_ioc_poolcheck_t pool_check)7043 zfs_ioctl_register_dataset_nolog(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func,
7044     zfs_secpolicy_func_t *secpolicy, zfs_ioc_poolcheck_t pool_check)
7045 {
7046 	zfs_ioctl_register_legacy(ioc, func, secpolicy,
7047 	    DATASET_NAME, B_FALSE, pool_check);
7048 }
7049 
7050 static void
zfs_ioctl_register_pool_modify(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func)7051 zfs_ioctl_register_pool_modify(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func)
7052 {
7053 	zfs_ioctl_register_legacy(ioc, func, zfs_secpolicy_config,
7054 	    POOL_NAME, B_TRUE, POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY);
7055 }
7056 
7057 static void
zfs_ioctl_register_pool_meta(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy)7058 zfs_ioctl_register_pool_meta(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func,
7059     zfs_secpolicy_func_t *secpolicy)
7060 {
7061 	zfs_ioctl_register_legacy(ioc, func, secpolicy,
7062 	    NO_NAME, B_FALSE, POOL_CHECK_NONE);
7063 }
7064 
7065 static void
zfs_ioctl_register_dataset_read_secpolicy(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy)7066 zfs_ioctl_register_dataset_read_secpolicy(zfs_ioc_t ioc,
7067     zfs_ioc_legacy_func_t *func, zfs_secpolicy_func_t *secpolicy)
7068 {
7069 	zfs_ioctl_register_legacy(ioc, func, secpolicy,
7070 	    DATASET_NAME, B_FALSE, POOL_CHECK_SUSPENDED);
7071 }
7072 
7073 static void
zfs_ioctl_register_dataset_read(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func)7074 zfs_ioctl_register_dataset_read(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func)
7075 {
7076 	zfs_ioctl_register_dataset_read_secpolicy(ioc, func,
7077 	    zfs_secpolicy_read);
7078 }
7079 
7080 static void
zfs_ioctl_register_dataset_modify(zfs_ioc_t ioc,zfs_ioc_legacy_func_t * func,zfs_secpolicy_func_t * secpolicy)7081 zfs_ioctl_register_dataset_modify(zfs_ioc_t ioc, zfs_ioc_legacy_func_t *func,
7082     zfs_secpolicy_func_t *secpolicy)
7083 {
7084 	zfs_ioctl_register_legacy(ioc, func, secpolicy,
7085 	    DATASET_NAME, B_TRUE, POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY);
7086 }
7087 
7088 static void
zfs_ioctl_init(void)7089 zfs_ioctl_init(void)
7090 {
7091 	zfs_ioctl_register("snapshot", ZFS_IOC_SNAPSHOT,
7092 	    zfs_ioc_snapshot, zfs_secpolicy_snapshot, POOL_NAME,
7093 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7094 	    zfs_keys_snapshot, ARRAY_SIZE(zfs_keys_snapshot));
7095 
7096 	zfs_ioctl_register("log_history", ZFS_IOC_LOG_HISTORY,
7097 	    zfs_ioc_log_history, zfs_secpolicy_log_history, NO_NAME,
7098 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_FALSE,
7099 	    zfs_keys_log_history, ARRAY_SIZE(zfs_keys_log_history));
7100 
7101 	zfs_ioctl_register("space_snaps", ZFS_IOC_SPACE_SNAPS,
7102 	    zfs_ioc_space_snaps, zfs_secpolicy_read, DATASET_NAME,
7103 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE,
7104 	    zfs_keys_space_snaps, ARRAY_SIZE(zfs_keys_space_snaps));
7105 
7106 	zfs_ioctl_register("send", ZFS_IOC_SEND_NEW,
7107 	    zfs_ioc_send_new, zfs_secpolicy_send_new, DATASET_NAME,
7108 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE,
7109 	    zfs_keys_send_new, ARRAY_SIZE(zfs_keys_send_new));
7110 
7111 	zfs_ioctl_register("send_space", ZFS_IOC_SEND_SPACE,
7112 	    zfs_ioc_send_space, zfs_secpolicy_read, DATASET_NAME,
7113 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE,
7114 	    zfs_keys_send_space, ARRAY_SIZE(zfs_keys_send_space));
7115 
7116 	zfs_ioctl_register("create", ZFS_IOC_CREATE,
7117 	    zfs_ioc_create, zfs_secpolicy_create_clone, DATASET_NAME,
7118 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7119 	    zfs_keys_create, ARRAY_SIZE(zfs_keys_create));
7120 
7121 	zfs_ioctl_register("clone", ZFS_IOC_CLONE,
7122 	    zfs_ioc_clone, zfs_secpolicy_create_clone, DATASET_NAME,
7123 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7124 	    zfs_keys_clone, ARRAY_SIZE(zfs_keys_clone));
7125 
7126 	zfs_ioctl_register("remap", ZFS_IOC_REMAP,
7127 	    zfs_ioc_remap, zfs_secpolicy_none, DATASET_NAME,
7128 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_TRUE,
7129 	    zfs_keys_remap, ARRAY_SIZE(zfs_keys_remap));
7130 
7131 	zfs_ioctl_register("destroy_snaps", ZFS_IOC_DESTROY_SNAPS,
7132 	    zfs_ioc_destroy_snaps, zfs_secpolicy_destroy_snaps, POOL_NAME,
7133 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7134 	    zfs_keys_destroy_snaps, ARRAY_SIZE(zfs_keys_destroy_snaps));
7135 
7136 	zfs_ioctl_register("hold", ZFS_IOC_HOLD,
7137 	    zfs_ioc_hold, zfs_secpolicy_hold, POOL_NAME,
7138 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7139 	    zfs_keys_hold, ARRAY_SIZE(zfs_keys_hold));
7140 	zfs_ioctl_register("release", ZFS_IOC_RELEASE,
7141 	    zfs_ioc_release, zfs_secpolicy_release, POOL_NAME,
7142 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7143 	    zfs_keys_release, ARRAY_SIZE(zfs_keys_release));
7144 
7145 	zfs_ioctl_register("get_holds", ZFS_IOC_GET_HOLDS,
7146 	    zfs_ioc_get_holds, zfs_secpolicy_read, DATASET_NAME,
7147 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE,
7148 	    zfs_keys_get_holds, ARRAY_SIZE(zfs_keys_get_holds));
7149 
7150 	zfs_ioctl_register("rollback", ZFS_IOC_ROLLBACK,
7151 	    zfs_ioc_rollback, zfs_secpolicy_rollback, DATASET_NAME,
7152 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_TRUE,
7153 	    zfs_keys_rollback, ARRAY_SIZE(zfs_keys_rollback));
7154 
7155 	zfs_ioctl_register("bookmark", ZFS_IOC_BOOKMARK,
7156 	    zfs_ioc_bookmark, zfs_secpolicy_bookmark, POOL_NAME,
7157 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7158 	    zfs_keys_bookmark, ARRAY_SIZE(zfs_keys_bookmark));
7159 
7160 	zfs_ioctl_register("get_bookmarks", ZFS_IOC_GET_BOOKMARKS,
7161 	    zfs_ioc_get_bookmarks, zfs_secpolicy_read, DATASET_NAME,
7162 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE,
7163 	    zfs_keys_get_bookmarks, ARRAY_SIZE(zfs_keys_get_bookmarks));
7164 
7165 	zfs_ioctl_register("get_bookmark_props", ZFS_IOC_GET_BOOKMARK_PROPS,
7166 	    zfs_ioc_get_bookmark_props, zfs_secpolicy_read, ENTITY_NAME,
7167 	    POOL_CHECK_SUSPENDED, B_FALSE, B_FALSE, zfs_keys_get_bookmark_props,
7168 	    ARRAY_SIZE(zfs_keys_get_bookmark_props));
7169 
7170 	zfs_ioctl_register("destroy_bookmarks", ZFS_IOC_DESTROY_BOOKMARKS,
7171 	    zfs_ioc_destroy_bookmarks, zfs_secpolicy_destroy_bookmarks,
7172 	    POOL_NAME,
7173 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7174 	    zfs_keys_destroy_bookmarks,
7175 	    ARRAY_SIZE(zfs_keys_destroy_bookmarks));
7176 
7177 	zfs_ioctl_register("receive", ZFS_IOC_RECV_NEW,
7178 	    zfs_ioc_recv_new, zfs_secpolicy_recv, DATASET_NAME,
7179 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7180 	    zfs_keys_recv_new, ARRAY_SIZE(zfs_keys_recv_new));
7181 	zfs_ioctl_register("load-key", ZFS_IOC_LOAD_KEY,
7182 	    zfs_ioc_load_key, zfs_secpolicy_load_key,
7183 	    DATASET_NAME, POOL_CHECK_SUSPENDED, B_TRUE, B_TRUE,
7184 	    zfs_keys_load_key, ARRAY_SIZE(zfs_keys_load_key));
7185 	zfs_ioctl_register("unload-key", ZFS_IOC_UNLOAD_KEY,
7186 	    zfs_ioc_unload_key, zfs_secpolicy_load_key,
7187 	    DATASET_NAME, POOL_CHECK_SUSPENDED, B_TRUE, B_TRUE,
7188 	    zfs_keys_unload_key, ARRAY_SIZE(zfs_keys_unload_key));
7189 	zfs_ioctl_register("change-key", ZFS_IOC_CHANGE_KEY,
7190 	    zfs_ioc_change_key, zfs_secpolicy_change_key,
7191 	    DATASET_NAME, POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY,
7192 	    B_TRUE, B_TRUE, zfs_keys_change_key,
7193 	    ARRAY_SIZE(zfs_keys_change_key));
7194 
7195 	zfs_ioctl_register("sync", ZFS_IOC_POOL_SYNC,
7196 	    zfs_ioc_pool_sync, zfs_secpolicy_none, POOL_NAME,
7197 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_FALSE,
7198 	    zfs_keys_pool_sync, ARRAY_SIZE(zfs_keys_pool_sync));
7199 	zfs_ioctl_register("reopen", ZFS_IOC_POOL_REOPEN, zfs_ioc_pool_reopen,
7200 	    zfs_secpolicy_config, POOL_NAME, POOL_CHECK_SUSPENDED, B_TRUE,
7201 	    B_TRUE, zfs_keys_pool_reopen, ARRAY_SIZE(zfs_keys_pool_reopen));
7202 
7203 	zfs_ioctl_register("channel_program", ZFS_IOC_CHANNEL_PROGRAM,
7204 	    zfs_ioc_channel_program, zfs_secpolicy_config,
7205 	    POOL_NAME, POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE,
7206 	    B_TRUE, zfs_keys_channel_program,
7207 	    ARRAY_SIZE(zfs_keys_channel_program));
7208 
7209 	zfs_ioctl_register("redact", ZFS_IOC_REDACT,
7210 	    zfs_ioc_redact, zfs_secpolicy_config, DATASET_NAME,
7211 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7212 	    zfs_keys_redact, ARRAY_SIZE(zfs_keys_redact));
7213 
7214 	zfs_ioctl_register("zpool_checkpoint", ZFS_IOC_POOL_CHECKPOINT,
7215 	    zfs_ioc_pool_checkpoint, zfs_secpolicy_config, POOL_NAME,
7216 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7217 	    zfs_keys_pool_checkpoint, ARRAY_SIZE(zfs_keys_pool_checkpoint));
7218 
7219 	zfs_ioctl_register("zpool_discard_checkpoint",
7220 	    ZFS_IOC_POOL_DISCARD_CHECKPOINT, zfs_ioc_pool_discard_checkpoint,
7221 	    zfs_secpolicy_config, POOL_NAME,
7222 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7223 	    zfs_keys_pool_discard_checkpoint,
7224 	    ARRAY_SIZE(zfs_keys_pool_discard_checkpoint));
7225 
7226 	zfs_ioctl_register("initialize", ZFS_IOC_POOL_INITIALIZE,
7227 	    zfs_ioc_pool_initialize, zfs_secpolicy_config, POOL_NAME,
7228 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7229 	    zfs_keys_pool_initialize, ARRAY_SIZE(zfs_keys_pool_initialize));
7230 
7231 	zfs_ioctl_register("trim", ZFS_IOC_POOL_TRIM,
7232 	    zfs_ioc_pool_trim, zfs_secpolicy_config, POOL_NAME,
7233 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_TRUE, B_TRUE,
7234 	    zfs_keys_pool_trim, ARRAY_SIZE(zfs_keys_pool_trim));
7235 
7236 	zfs_ioctl_register("wait", ZFS_IOC_WAIT,
7237 	    zfs_ioc_wait, zfs_secpolicy_none, POOL_NAME,
7238 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_FALSE,
7239 	    zfs_keys_pool_wait, ARRAY_SIZE(zfs_keys_pool_wait));
7240 
7241 	zfs_ioctl_register("wait_fs", ZFS_IOC_WAIT_FS,
7242 	    zfs_ioc_wait_fs, zfs_secpolicy_none, DATASET_NAME,
7243 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_FALSE,
7244 	    zfs_keys_fs_wait, ARRAY_SIZE(zfs_keys_fs_wait));
7245 
7246 	zfs_ioctl_register("set_bootenv", ZFS_IOC_SET_BOOTENV,
7247 	    zfs_ioc_set_bootenv, zfs_secpolicy_config, POOL_NAME,
7248 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_TRUE,
7249 	    zfs_keys_set_bootenv, ARRAY_SIZE(zfs_keys_set_bootenv));
7250 
7251 	zfs_ioctl_register("get_bootenv", ZFS_IOC_GET_BOOTENV,
7252 	    zfs_ioc_get_bootenv, zfs_secpolicy_none, POOL_NAME,
7253 	    POOL_CHECK_SUSPENDED, B_FALSE, B_TRUE,
7254 	    zfs_keys_get_bootenv, ARRAY_SIZE(zfs_keys_get_bootenv));
7255 
7256 	zfs_ioctl_register("zpool_vdev_get_props", ZFS_IOC_VDEV_GET_PROPS,
7257 	    zfs_ioc_vdev_get_props, zfs_secpolicy_read, POOL_NAME,
7258 	    POOL_CHECK_NONE, B_FALSE, B_FALSE, zfs_keys_vdev_get_props,
7259 	    ARRAY_SIZE(zfs_keys_vdev_get_props));
7260 
7261 	zfs_ioctl_register("zpool_vdev_set_props", ZFS_IOC_VDEV_SET_PROPS,
7262 	    zfs_ioc_vdev_set_props, zfs_secpolicy_config, POOL_NAME,
7263 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY, B_FALSE, B_FALSE,
7264 	    zfs_keys_vdev_set_props, ARRAY_SIZE(zfs_keys_vdev_set_props));
7265 
7266 	zfs_ioctl_register("scrub", ZFS_IOC_POOL_SCRUB,
7267 	    zfs_ioc_pool_scrub, zfs_secpolicy_config, POOL_NAME,
7268 	    POOL_CHECK_NONE, B_TRUE, B_TRUE,
7269 	    zfs_keys_pool_scrub, ARRAY_SIZE(zfs_keys_pool_scrub));
7270 
7271 	/* IOCTLS that use the legacy function signature */
7272 
7273 	zfs_ioctl_register_legacy(ZFS_IOC_POOL_FREEZE, zfs_ioc_pool_freeze,
7274 	    zfs_secpolicy_config, NO_NAME, B_FALSE, POOL_CHECK_READONLY);
7275 
7276 	zfs_ioctl_register_pool(ZFS_IOC_POOL_CREATE, zfs_ioc_pool_create,
7277 	    zfs_secpolicy_config, B_TRUE, POOL_CHECK_NONE);
7278 	zfs_ioctl_register_pool_modify(ZFS_IOC_POOL_SCAN,
7279 	    zfs_ioc_pool_scan);
7280 	zfs_ioctl_register_pool_modify(ZFS_IOC_POOL_UPGRADE,
7281 	    zfs_ioc_pool_upgrade);
7282 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_ADD,
7283 	    zfs_ioc_vdev_add);
7284 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_REMOVE,
7285 	    zfs_ioc_vdev_remove);
7286 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_SET_STATE,
7287 	    zfs_ioc_vdev_set_state);
7288 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_ATTACH,
7289 	    zfs_ioc_vdev_attach);
7290 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_DETACH,
7291 	    zfs_ioc_vdev_detach);
7292 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_SETPATH,
7293 	    zfs_ioc_vdev_setpath);
7294 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_SETFRU,
7295 	    zfs_ioc_vdev_setfru);
7296 	zfs_ioctl_register_pool_modify(ZFS_IOC_POOL_SET_PROPS,
7297 	    zfs_ioc_pool_set_props);
7298 	zfs_ioctl_register_pool_modify(ZFS_IOC_VDEV_SPLIT,
7299 	    zfs_ioc_vdev_split);
7300 	zfs_ioctl_register_pool_modify(ZFS_IOC_POOL_REGUID,
7301 	    zfs_ioc_pool_reguid);
7302 
7303 	zfs_ioctl_register_pool_meta(ZFS_IOC_POOL_CONFIGS,
7304 	    zfs_ioc_pool_configs, zfs_secpolicy_none);
7305 	zfs_ioctl_register_pool_meta(ZFS_IOC_POOL_TRYIMPORT,
7306 	    zfs_ioc_pool_tryimport, zfs_secpolicy_config);
7307 	zfs_ioctl_register_pool_meta(ZFS_IOC_INJECT_FAULT,
7308 	    zfs_ioc_inject_fault, zfs_secpolicy_inject);
7309 	zfs_ioctl_register_pool_meta(ZFS_IOC_CLEAR_FAULT,
7310 	    zfs_ioc_clear_fault, zfs_secpolicy_inject);
7311 	zfs_ioctl_register_pool_meta(ZFS_IOC_INJECT_LIST_NEXT,
7312 	    zfs_ioc_inject_list_next, zfs_secpolicy_inject);
7313 
7314 	/*
7315 	 * pool destroy, and export don't log the history as part of
7316 	 * zfsdev_ioctl, but rather zfs_ioc_pool_export
7317 	 * does the logging of those commands.
7318 	 */
7319 	zfs_ioctl_register_pool(ZFS_IOC_POOL_DESTROY, zfs_ioc_pool_destroy,
7320 	    zfs_secpolicy_config, B_FALSE, POOL_CHECK_SUSPENDED);
7321 	zfs_ioctl_register_pool(ZFS_IOC_POOL_EXPORT, zfs_ioc_pool_export,
7322 	    zfs_secpolicy_config, B_FALSE, POOL_CHECK_SUSPENDED);
7323 
7324 	zfs_ioctl_register_pool(ZFS_IOC_POOL_STATS, zfs_ioc_pool_stats,
7325 	    zfs_secpolicy_read, B_FALSE, POOL_CHECK_NONE);
7326 	zfs_ioctl_register_pool(ZFS_IOC_POOL_GET_PROPS, zfs_ioc_pool_get_props,
7327 	    zfs_secpolicy_read, B_FALSE, POOL_CHECK_NONE);
7328 
7329 	zfs_ioctl_register_pool(ZFS_IOC_ERROR_LOG, zfs_ioc_error_log,
7330 	    zfs_secpolicy_inject, B_FALSE, POOL_CHECK_SUSPENDED);
7331 	zfs_ioctl_register_pool(ZFS_IOC_DSOBJ_TO_DSNAME,
7332 	    zfs_ioc_dsobj_to_dsname,
7333 	    zfs_secpolicy_diff, B_FALSE, POOL_CHECK_SUSPENDED);
7334 	zfs_ioctl_register_pool(ZFS_IOC_POOL_GET_HISTORY,
7335 	    zfs_ioc_pool_get_history,
7336 	    zfs_secpolicy_config, B_FALSE, POOL_CHECK_SUSPENDED);
7337 
7338 	zfs_ioctl_register_pool(ZFS_IOC_POOL_IMPORT, zfs_ioc_pool_import,
7339 	    zfs_secpolicy_config, B_TRUE, POOL_CHECK_NONE);
7340 
7341 	zfs_ioctl_register_pool(ZFS_IOC_CLEAR, zfs_ioc_clear,
7342 	    zfs_secpolicy_config, B_TRUE, POOL_CHECK_READONLY);
7343 
7344 	zfs_ioctl_register_dataset_read(ZFS_IOC_SPACE_WRITTEN,
7345 	    zfs_ioc_space_written);
7346 	zfs_ioctl_register_dataset_read(ZFS_IOC_OBJSET_RECVD_PROPS,
7347 	    zfs_ioc_objset_recvd_props);
7348 	zfs_ioctl_register_dataset_read(ZFS_IOC_NEXT_OBJ,
7349 	    zfs_ioc_next_obj);
7350 	zfs_ioctl_register_dataset_read(ZFS_IOC_GET_FSACL,
7351 	    zfs_ioc_get_fsacl);
7352 	zfs_ioctl_register_dataset_read(ZFS_IOC_OBJSET_STATS,
7353 	    zfs_ioc_objset_stats);
7354 	zfs_ioctl_register_dataset_read(ZFS_IOC_OBJSET_ZPLPROPS,
7355 	    zfs_ioc_objset_zplprops);
7356 	zfs_ioctl_register_dataset_read(ZFS_IOC_DATASET_LIST_NEXT,
7357 	    zfs_ioc_dataset_list_next);
7358 	zfs_ioctl_register_dataset_read(ZFS_IOC_SNAPSHOT_LIST_NEXT,
7359 	    zfs_ioc_snapshot_list_next);
7360 	zfs_ioctl_register_dataset_read(ZFS_IOC_SEND_PROGRESS,
7361 	    zfs_ioc_send_progress);
7362 
7363 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_DIFF,
7364 	    zfs_ioc_diff, zfs_secpolicy_diff);
7365 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_OBJ_TO_STATS,
7366 	    zfs_ioc_obj_to_stats, zfs_secpolicy_diff);
7367 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_OBJ_TO_PATH,
7368 	    zfs_ioc_obj_to_path, zfs_secpolicy_diff);
7369 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_USERSPACE_ONE,
7370 	    zfs_ioc_userspace_one, zfs_secpolicy_userspace_one);
7371 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_USERSPACE_MANY,
7372 	    zfs_ioc_userspace_many, zfs_secpolicy_userspace_many);
7373 	zfs_ioctl_register_dataset_read_secpolicy(ZFS_IOC_SEND,
7374 	    zfs_ioc_send, zfs_secpolicy_send);
7375 
7376 	zfs_ioctl_register_dataset_modify(ZFS_IOC_SET_PROP, zfs_ioc_set_prop,
7377 	    zfs_secpolicy_none);
7378 	zfs_ioctl_register_dataset_modify(ZFS_IOC_DESTROY, zfs_ioc_destroy,
7379 	    zfs_secpolicy_destroy);
7380 	zfs_ioctl_register_dataset_modify(ZFS_IOC_RENAME, zfs_ioc_rename,
7381 	    zfs_secpolicy_rename);
7382 	zfs_ioctl_register_dataset_modify(ZFS_IOC_RECV, zfs_ioc_recv,
7383 	    zfs_secpolicy_recv);
7384 	zfs_ioctl_register_dataset_modify(ZFS_IOC_PROMOTE, zfs_ioc_promote,
7385 	    zfs_secpolicy_promote);
7386 	zfs_ioctl_register_dataset_modify(ZFS_IOC_INHERIT_PROP,
7387 	    zfs_ioc_inherit_prop, zfs_secpolicy_inherit_prop);
7388 	zfs_ioctl_register_dataset_modify(ZFS_IOC_SET_FSACL, zfs_ioc_set_fsacl,
7389 	    zfs_secpolicy_set_fsacl);
7390 
7391 	zfs_ioctl_register_dataset_nolog(ZFS_IOC_SHARE, zfs_ioc_share,
7392 	    zfs_secpolicy_share, POOL_CHECK_NONE);
7393 	zfs_ioctl_register_dataset_nolog(ZFS_IOC_SMB_ACL, zfs_ioc_smb_acl,
7394 	    zfs_secpolicy_smb_acl, POOL_CHECK_NONE);
7395 	zfs_ioctl_register_dataset_nolog(ZFS_IOC_USERSPACE_UPGRADE,
7396 	    zfs_ioc_userspace_upgrade, zfs_secpolicy_userspace_upgrade,
7397 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY);
7398 	zfs_ioctl_register_dataset_nolog(ZFS_IOC_TMP_SNAPSHOT,
7399 	    zfs_ioc_tmp_snapshot, zfs_secpolicy_tmp_snapshot,
7400 	    POOL_CHECK_SUSPENDED | POOL_CHECK_READONLY);
7401 
7402 	zfs_ioctl_register_legacy(ZFS_IOC_EVENTS_NEXT, zfs_ioc_events_next,
7403 	    zfs_secpolicy_config, NO_NAME, B_FALSE, POOL_CHECK_NONE);
7404 	zfs_ioctl_register_legacy(ZFS_IOC_EVENTS_CLEAR, zfs_ioc_events_clear,
7405 	    zfs_secpolicy_config, NO_NAME, B_FALSE, POOL_CHECK_NONE);
7406 	zfs_ioctl_register_legacy(ZFS_IOC_EVENTS_SEEK, zfs_ioc_events_seek,
7407 	    zfs_secpolicy_config, NO_NAME, B_FALSE, POOL_CHECK_NONE);
7408 
7409 	zfs_ioctl_init_os();
7410 }
7411 
7412 /*
7413  * Verify that for non-legacy ioctls the input nvlist
7414  * pairs match against the expected input.
7415  *
7416  * Possible errors are:
7417  * ZFS_ERR_IOC_ARG_UNAVAIL	An unrecognized nvpair was encountered
7418  * ZFS_ERR_IOC_ARG_REQUIRED	A required nvpair is missing
7419  * ZFS_ERR_IOC_ARG_BADTYPE	Invalid type for nvpair
7420  */
7421 static int
zfs_check_input_nvpairs(nvlist_t * innvl,const zfs_ioc_vec_t * vec)7422 zfs_check_input_nvpairs(nvlist_t *innvl, const zfs_ioc_vec_t *vec)
7423 {
7424 	const zfs_ioc_key_t *nvl_keys = vec->zvec_nvl_keys;
7425 	boolean_t required_keys_found = B_FALSE;
7426 
7427 	/*
7428 	 * examine each input pair
7429 	 */
7430 	for (nvpair_t *pair = nvlist_next_nvpair(innvl, NULL);
7431 	    pair != NULL; pair = nvlist_next_nvpair(innvl, pair)) {
7432 		const char *name = nvpair_name(pair);
7433 		data_type_t type = nvpair_type(pair);
7434 		boolean_t identified = B_FALSE;
7435 
7436 		/*
7437 		 * check pair against the documented names and type
7438 		 */
7439 		for (int k = 0; k < vec->zvec_nvl_key_count; k++) {
7440 			/* if not a wild card name, check for an exact match */
7441 			if ((nvl_keys[k].zkey_flags & ZK_WILDCARDLIST) == 0 &&
7442 			    strcmp(nvl_keys[k].zkey_name, name) != 0)
7443 				continue;
7444 
7445 			identified = B_TRUE;
7446 
7447 			if (nvl_keys[k].zkey_type != DATA_TYPE_ANY &&
7448 			    nvl_keys[k].zkey_type != type) {
7449 				return (SET_ERROR(ZFS_ERR_IOC_ARG_BADTYPE));
7450 			}
7451 
7452 			if (nvl_keys[k].zkey_flags & ZK_OPTIONAL)
7453 				continue;
7454 
7455 			required_keys_found = B_TRUE;
7456 			break;
7457 		}
7458 
7459 		/* allow an 'optional' key, everything else is invalid */
7460 		if (!identified &&
7461 		    (strcmp(name, "optional") != 0 ||
7462 		    type != DATA_TYPE_NVLIST)) {
7463 			return (SET_ERROR(ZFS_ERR_IOC_ARG_UNAVAIL));
7464 		}
7465 	}
7466 
7467 	/* verify that all required keys were found */
7468 	for (int k = 0; k < vec->zvec_nvl_key_count; k++) {
7469 		if (nvl_keys[k].zkey_flags & ZK_OPTIONAL)
7470 			continue;
7471 
7472 		if (nvl_keys[k].zkey_flags & ZK_WILDCARDLIST) {
7473 			/* at least one non-optional key is expected here */
7474 			if (!required_keys_found)
7475 				return (SET_ERROR(ZFS_ERR_IOC_ARG_REQUIRED));
7476 			continue;
7477 		}
7478 
7479 		if (!nvlist_exists(innvl, nvl_keys[k].zkey_name))
7480 			return (SET_ERROR(ZFS_ERR_IOC_ARG_REQUIRED));
7481 	}
7482 
7483 	return (0);
7484 }
7485 
7486 static int
pool_status_check(const char * name,zfs_ioc_namecheck_t type,zfs_ioc_poolcheck_t check)7487 pool_status_check(const char *name, zfs_ioc_namecheck_t type,
7488     zfs_ioc_poolcheck_t check)
7489 {
7490 	spa_t *spa;
7491 	int error;
7492 
7493 	ASSERT(type == POOL_NAME || type == DATASET_NAME ||
7494 	    type == ENTITY_NAME);
7495 
7496 	if (check & POOL_CHECK_NONE)
7497 		return (0);
7498 
7499 	error = spa_open(name, &spa, FTAG);
7500 	if (error == 0) {
7501 		if ((check & POOL_CHECK_SUSPENDED) && spa_suspended(spa))
7502 			error = SET_ERROR(EAGAIN);
7503 		else if ((check & POOL_CHECK_READONLY) && !spa_writeable(spa))
7504 			error = SET_ERROR(EROFS);
7505 		spa_close(spa, FTAG);
7506 	}
7507 	return (error);
7508 }
7509 
7510 int
zfsdev_getminor(zfs_file_t * fp,minor_t * minorp)7511 zfsdev_getminor(zfs_file_t *fp, minor_t *minorp)
7512 {
7513 	zfsdev_state_t *zs, *fpd;
7514 
7515 	ASSERT(!MUTEX_HELD(&zfsdev_state_lock));
7516 
7517 	fpd = zfs_file_private(fp);
7518 	if (fpd == NULL)
7519 		return (SET_ERROR(EBADF));
7520 
7521 	mutex_enter(&zfsdev_state_lock);
7522 
7523 	for (zs = &zfsdev_state_listhead; zs != NULL; zs = zs->zs_next) {
7524 
7525 		if (zs->zs_minor == -1)
7526 			continue;
7527 
7528 		if (fpd == zs) {
7529 			*minorp = fpd->zs_minor;
7530 			mutex_exit(&zfsdev_state_lock);
7531 			return (0);
7532 		}
7533 	}
7534 
7535 	mutex_exit(&zfsdev_state_lock);
7536 
7537 	return (SET_ERROR(EBADF));
7538 }
7539 
7540 void *
zfsdev_get_state(minor_t minor,enum zfsdev_state_type which)7541 zfsdev_get_state(minor_t minor, enum zfsdev_state_type which)
7542 {
7543 	zfsdev_state_t *zs;
7544 
7545 	for (zs = &zfsdev_state_listhead; zs != NULL; zs = zs->zs_next) {
7546 		if (zs->zs_minor == minor) {
7547 			membar_consumer();
7548 			switch (which) {
7549 			case ZST_ONEXIT:
7550 				return (zs->zs_onexit);
7551 			case ZST_ZEVENT:
7552 				return (zs->zs_zevent);
7553 			case ZST_ALL:
7554 				return (zs);
7555 			}
7556 		}
7557 	}
7558 
7559 	return (NULL);
7560 }
7561 
7562 /*
7563  * Find a free minor number.  The zfsdev_state_list is expected to
7564  * be short since it is only a list of currently open file handles.
7565  */
7566 static minor_t
zfsdev_minor_alloc(void)7567 zfsdev_minor_alloc(void)
7568 {
7569 	static minor_t last_minor = 0;
7570 	minor_t m;
7571 
7572 	ASSERT(MUTEX_HELD(&zfsdev_state_lock));
7573 
7574 	for (m = last_minor + 1; m != last_minor; m++) {
7575 		if (m > ZFSDEV_MAX_MINOR)
7576 			m = 1;
7577 		if (zfsdev_get_state(m, ZST_ALL) == NULL) {
7578 			last_minor = m;
7579 			return (m);
7580 		}
7581 	}
7582 
7583 	return (0);
7584 }
7585 
7586 int
zfsdev_state_init(void * priv)7587 zfsdev_state_init(void *priv)
7588 {
7589 	zfsdev_state_t *zs, *zsprev = NULL;
7590 	minor_t minor;
7591 	boolean_t newzs = B_FALSE;
7592 
7593 	ASSERT(MUTEX_HELD(&zfsdev_state_lock));
7594 
7595 	minor = zfsdev_minor_alloc();
7596 	if (minor == 0)
7597 		return (SET_ERROR(ENXIO));
7598 
7599 	for (zs = &zfsdev_state_listhead; zs != NULL; zs = zs->zs_next) {
7600 		if (zs->zs_minor == -1)
7601 			break;
7602 		zsprev = zs;
7603 	}
7604 
7605 	if (!zs) {
7606 		zs = kmem_zalloc(sizeof (zfsdev_state_t), KM_SLEEP);
7607 		newzs = B_TRUE;
7608 	}
7609 
7610 	zfsdev_private_set_state(priv, zs);
7611 
7612 	zfs_onexit_init((zfs_onexit_t **)&zs->zs_onexit);
7613 	zfs_zevent_init((zfs_zevent_t **)&zs->zs_zevent);
7614 
7615 	/*
7616 	 * In order to provide for lock-free concurrent read access
7617 	 * to the minor list in zfsdev_get_state(), new entries
7618 	 * must be completely written before linking them into the
7619 	 * list whereas existing entries are already linked; the last
7620 	 * operation must be updating zs_minor (from -1 to the new
7621 	 * value).
7622 	 */
7623 	if (newzs) {
7624 		zs->zs_minor = minor;
7625 		membar_producer();
7626 		zsprev->zs_next = zs;
7627 	} else {
7628 		membar_producer();
7629 		zs->zs_minor = minor;
7630 	}
7631 
7632 	return (0);
7633 }
7634 
7635 void
zfsdev_state_destroy(void * priv)7636 zfsdev_state_destroy(void *priv)
7637 {
7638 	zfsdev_state_t *zs = zfsdev_private_get_state(priv);
7639 
7640 	ASSERT(zs != NULL);
7641 	ASSERT3S(zs->zs_minor, >, 0);
7642 
7643 	/*
7644 	 * The last reference to this zfsdev file descriptor is being dropped.
7645 	 * We don't have to worry about lookup grabbing this state object, and
7646 	 * zfsdev_state_init() will not try to reuse this object until it is
7647 	 * invalidated by setting zs_minor to -1.  Invalidation must be done
7648 	 * last, with a memory barrier to ensure ordering.  This lets us avoid
7649 	 * taking the global zfsdev state lock around destruction.
7650 	 */
7651 	zfs_onexit_destroy(zs->zs_onexit);
7652 	zfs_zevent_destroy(zs->zs_zevent);
7653 	zs->zs_onexit = NULL;
7654 	zs->zs_zevent = NULL;
7655 	membar_producer();
7656 	zs->zs_minor = -1;
7657 }
7658 
7659 long
zfsdev_ioctl_common(uint_t vecnum,zfs_cmd_t * zc,int flag)7660 zfsdev_ioctl_common(uint_t vecnum, zfs_cmd_t *zc, int flag)
7661 {
7662 	int error, cmd;
7663 	const zfs_ioc_vec_t *vec;
7664 	char *saved_poolname = NULL;
7665 	uint64_t max_nvlist_src_size;
7666 	size_t saved_poolname_len = 0;
7667 	nvlist_t *innvl = NULL;
7668 	fstrans_cookie_t cookie;
7669 	hrtime_t start_time = gethrtime();
7670 
7671 	cmd = vecnum;
7672 	error = 0;
7673 	if (vecnum >= sizeof (zfs_ioc_vec) / sizeof (zfs_ioc_vec[0]))
7674 		return (SET_ERROR(ZFS_ERR_IOC_CMD_UNAVAIL));
7675 
7676 	vec = &zfs_ioc_vec[vecnum];
7677 
7678 	/*
7679 	 * The registered ioctl list may be sparse, verify that either
7680 	 * a normal or legacy handler are registered.
7681 	 */
7682 	if (vec->zvec_func == NULL && vec->zvec_legacy_func == NULL)
7683 		return (SET_ERROR(ZFS_ERR_IOC_CMD_UNAVAIL));
7684 
7685 	zc->zc_iflags = flag & FKIOCTL;
7686 	max_nvlist_src_size = zfs_max_nvlist_src_size_os();
7687 	if (zc->zc_nvlist_src_size > max_nvlist_src_size) {
7688 		/*
7689 		 * Make sure the user doesn't pass in an insane value for
7690 		 * zc_nvlist_src_size.  We have to check, since we will end
7691 		 * up allocating that much memory inside of get_nvlist().  This
7692 		 * prevents a nefarious user from allocating tons of kernel
7693 		 * memory.
7694 		 *
7695 		 * Also, we return EINVAL instead of ENOMEM here.  The reason
7696 		 * being that returning ENOMEM from an ioctl() has a special
7697 		 * connotation; that the user's size value is too small and
7698 		 * needs to be expanded to hold the nvlist.  See
7699 		 * zcmd_expand_dst_nvlist() for details.
7700 		 */
7701 		error = SET_ERROR(EINVAL);	/* User's size too big */
7702 
7703 	} else if (zc->zc_nvlist_src_size != 0) {
7704 		error = get_nvlist(zc->zc_nvlist_src, zc->zc_nvlist_src_size,
7705 		    zc->zc_iflags, &innvl);
7706 		if (error != 0)
7707 			goto out;
7708 	}
7709 
7710 	/*
7711 	 * Ensure that all pool/dataset names are valid before we pass down to
7712 	 * the lower layers.
7713 	 */
7714 	zc->zc_name[sizeof (zc->zc_name) - 1] = '\0';
7715 	switch (vec->zvec_namecheck) {
7716 	case POOL_NAME:
7717 		if (pool_namecheck(zc->zc_name, NULL, NULL) != 0)
7718 			error = SET_ERROR(EINVAL);
7719 		else
7720 			error = pool_status_check(zc->zc_name,
7721 			    vec->zvec_namecheck, vec->zvec_pool_check);
7722 		break;
7723 
7724 	case DATASET_NAME:
7725 		if (dataset_namecheck(zc->zc_name, NULL, NULL) != 0)
7726 			error = SET_ERROR(EINVAL);
7727 		else
7728 			error = pool_status_check(zc->zc_name,
7729 			    vec->zvec_namecheck, vec->zvec_pool_check);
7730 		break;
7731 
7732 	case ENTITY_NAME:
7733 		if (entity_namecheck(zc->zc_name, NULL, NULL) != 0) {
7734 			error = SET_ERROR(EINVAL);
7735 		} else {
7736 			error = pool_status_check(zc->zc_name,
7737 			    vec->zvec_namecheck, vec->zvec_pool_check);
7738 		}
7739 		break;
7740 
7741 	case NO_NAME:
7742 		break;
7743 	}
7744 	/*
7745 	 * Ensure that all input pairs are valid before we pass them down
7746 	 * to the lower layers.
7747 	 *
7748 	 * The vectored functions can use fnvlist_lookup_{type} for any
7749 	 * required pairs since zfs_check_input_nvpairs() confirmed that
7750 	 * they exist and are of the correct type.
7751 	 */
7752 	if (error == 0 && vec->zvec_func != NULL) {
7753 		error = zfs_check_input_nvpairs(innvl, vec);
7754 		if (error != 0)
7755 			goto out;
7756 	}
7757 
7758 	if (error == 0) {
7759 		cookie = spl_fstrans_mark();
7760 		error = vec->zvec_secpolicy(zc, innvl, CRED());
7761 		spl_fstrans_unmark(cookie);
7762 	}
7763 
7764 	if (error != 0)
7765 		goto out;
7766 
7767 	/* legacy ioctls can modify zc_name */
7768 	/*
7769 	 * Can't use kmem_strdup() as we might truncate the string and
7770 	 * kmem_strfree() would then free with incorrect size.
7771 	 */
7772 	saved_poolname_len = strlen(zc->zc_name) + 1;
7773 	saved_poolname = kmem_alloc(saved_poolname_len, KM_SLEEP);
7774 
7775 	strlcpy(saved_poolname, zc->zc_name, saved_poolname_len);
7776 	saved_poolname[strcspn(saved_poolname, "/@#")] = '\0';
7777 
7778 	if (vec->zvec_func != NULL) {
7779 		nvlist_t *outnvl;
7780 		int puterror = 0;
7781 		spa_t *spa;
7782 		nvlist_t *lognv = NULL;
7783 
7784 		ASSERT(vec->zvec_legacy_func == NULL);
7785 
7786 		/*
7787 		 * Add the innvl to the lognv before calling the func,
7788 		 * in case the func changes the innvl.
7789 		 */
7790 		if (vec->zvec_allow_log) {
7791 			lognv = fnvlist_alloc();
7792 			fnvlist_add_string(lognv, ZPOOL_HIST_IOCTL,
7793 			    vec->zvec_name);
7794 			if (!nvlist_empty(innvl)) {
7795 				fnvlist_add_nvlist(lognv, ZPOOL_HIST_INPUT_NVL,
7796 				    innvl);
7797 			}
7798 		}
7799 
7800 		outnvl = fnvlist_alloc();
7801 		cookie = spl_fstrans_mark();
7802 		error = vec->zvec_func(zc->zc_name, innvl, outnvl);
7803 		spl_fstrans_unmark(cookie);
7804 
7805 		/*
7806 		 * Some commands can partially execute, modify state, and still
7807 		 * return an error.  In these cases, attempt to record what
7808 		 * was modified.
7809 		 */
7810 		if ((error == 0 ||
7811 		    (cmd == ZFS_IOC_CHANNEL_PROGRAM && error != EINVAL)) &&
7812 		    vec->zvec_allow_log &&
7813 		    spa_open(zc->zc_name, &spa, FTAG) == 0) {
7814 			if (!nvlist_empty(outnvl)) {
7815 				size_t out_size = fnvlist_size(outnvl);
7816 				if (out_size > zfs_history_output_max) {
7817 					fnvlist_add_int64(lognv,
7818 					    ZPOOL_HIST_OUTPUT_SIZE, out_size);
7819 				} else {
7820 					fnvlist_add_nvlist(lognv,
7821 					    ZPOOL_HIST_OUTPUT_NVL, outnvl);
7822 				}
7823 			}
7824 			if (error != 0) {
7825 				fnvlist_add_int64(lognv, ZPOOL_HIST_ERRNO,
7826 				    error);
7827 			}
7828 			fnvlist_add_int64(lognv, ZPOOL_HIST_ELAPSED_NS,
7829 			    gethrtime() - start_time);
7830 			(void) spa_history_log_nvl(spa, lognv);
7831 			spa_close(spa, FTAG);
7832 		}
7833 		fnvlist_free(lognv);
7834 
7835 		if (!nvlist_empty(outnvl) || zc->zc_nvlist_dst_size != 0) {
7836 			int smusherror = 0;
7837 			if (vec->zvec_smush_outnvlist) {
7838 				smusherror = nvlist_smush(outnvl,
7839 				    zc->zc_nvlist_dst_size);
7840 			}
7841 			if (smusherror == 0)
7842 				puterror = put_nvlist(zc, outnvl);
7843 		}
7844 
7845 		if (puterror != 0)
7846 			error = puterror;
7847 
7848 		nvlist_free(outnvl);
7849 	} else {
7850 		cookie = spl_fstrans_mark();
7851 		error = vec->zvec_legacy_func(zc);
7852 		spl_fstrans_unmark(cookie);
7853 	}
7854 
7855 out:
7856 	nvlist_free(innvl);
7857 	if (error == 0 && vec->zvec_allow_log) {
7858 		char *s = tsd_get(zfs_allow_log_key);
7859 		if (s != NULL)
7860 			kmem_strfree(s);
7861 		(void) tsd_set(zfs_allow_log_key, kmem_strdup(saved_poolname));
7862 	}
7863 	if (saved_poolname != NULL)
7864 		kmem_free(saved_poolname, saved_poolname_len);
7865 
7866 	return (error);
7867 }
7868 
7869 int
zfs_kmod_init(void)7870 zfs_kmod_init(void)
7871 {
7872 	int error;
7873 
7874 	if ((error = zvol_init()) != 0)
7875 		return (error);
7876 
7877 	spa_init(SPA_MODE_READ | SPA_MODE_WRITE);
7878 	zfs_init();
7879 
7880 	zfs_ioctl_init();
7881 
7882 	mutex_init(&zfsdev_state_lock, NULL, MUTEX_DEFAULT, NULL);
7883 	zfsdev_state_listhead.zs_minor = -1;
7884 
7885 	if ((error = zfsdev_attach()) != 0)
7886 		goto out;
7887 
7888 	tsd_create(&zfs_fsyncer_key, NULL);
7889 	tsd_create(&rrw_tsd_key, rrw_tsd_destroy);
7890 	tsd_create(&zfs_allow_log_key, zfs_allow_log_destroy);
7891 
7892 	return (0);
7893 out:
7894 	zfs_fini();
7895 	spa_fini();
7896 	zvol_fini();
7897 
7898 	return (error);
7899 }
7900 
7901 void
zfs_kmod_fini(void)7902 zfs_kmod_fini(void)
7903 {
7904 	zfsdev_state_t *zs, *zsnext = NULL;
7905 
7906 	zfsdev_detach();
7907 
7908 	mutex_destroy(&zfsdev_state_lock);
7909 
7910 	for (zs = &zfsdev_state_listhead; zs != NULL; zs = zsnext) {
7911 		zsnext = zs->zs_next;
7912 		if (zs->zs_onexit)
7913 			zfs_onexit_destroy(zs->zs_onexit);
7914 		if (zs->zs_zevent)
7915 			zfs_zevent_destroy(zs->zs_zevent);
7916 		if (zs != &zfsdev_state_listhead)
7917 			kmem_free(zs, sizeof (zfsdev_state_t));
7918 	}
7919 
7920 	zfs_ereport_taskq_fini();	/* run before zfs_fini() on Linux */
7921 	zfs_fini();
7922 	spa_fini();
7923 	zvol_fini();
7924 
7925 	tsd_destroy(&zfs_fsyncer_key);
7926 	tsd_destroy(&rrw_tsd_key);
7927 	tsd_destroy(&zfs_allow_log_key);
7928 }
7929 
7930 ZFS_MODULE_PARAM(zfs, zfs_, max_nvlist_src_size, U64, ZMOD_RW,
7931 	"Maximum size in bytes allowed for src nvlist passed with ZFS ioctls");
7932 
7933 ZFS_MODULE_PARAM(zfs, zfs_, history_output_max, U64, ZMOD_RW,
7934 	"Maximum size in bytes of ZFS ioctl output that will be logged");
7935