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