sys/cddl/contrib/opensolaris/uts/common/fs/zfs/dmu_send.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 /*
  22  * Copyright (c) 2005, 2010, Oracle and/or its affiliates. All rights reserved.
  23  * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
  24  * Copyright (c) 2013 by Delphix. All rights reserved.
  25  * Copyright (c) 2012, Joyent, Inc. All rights reserved.
  26  * Copyright (c) 2012, Martin Matuska <mm@FreeBSD.org>. All rights reserved.
  27  */
  28
  29 #include <sys/dmu.h>
  30 #include <sys/dmu_impl.h>
  31 #include <sys/dmu_tx.h>
  32 #include <sys/dbuf.h>
  33 #include <sys/dnode.h>
  34 #include <sys/zfs_context.h>
  35 #include <sys/dmu_objset.h>
  36 #include <sys/dmu_traverse.h>
  37 #include <sys/dsl_dataset.h>
  38 #include <sys/dsl_dir.h>
  39 #include <sys/dsl_prop.h>
  40 #include <sys/dsl_pool.h>
  41 #include <sys/dsl_synctask.h>
  42 #include <sys/zfs_ioctl.h>
  43 #include <sys/zap.h>
  44 #include <sys/zio_checksum.h>
  45 #include <sys/zfs_znode.h>
  46 #include <zfs_fletcher.h>
  47 #include <sys/avl.h>
  48 #include <sys/ddt.h>
  49 #include <sys/zfs_onexit.h>
  50 #include <sys/dmu_send.h>
  51 #include <sys/dsl_destroy.h>
  52
  53 /* Set this tunable to TRUE to replace corrupt data with 0x2f5baddb10c */
  54 int zfs_send_corrupt_data = B_FALSE;
  55
  56 static char *dmu_recv_tag = "dmu_recv_tag";
  57 static const char *recv_clone_name = "%recv";
  58
  59 static int
  60 dump_bytes(dmu_sendarg_t *dsp, void *buf, int len)
  61 {
  62         dsl_dataset_t *ds = dsp->dsa_os->os_dsl_dataset;
  63         struct uio auio;
  64         struct iovec aiov;
  65         ASSERT0(len % 8);
  66
  67         fletcher_4_incremental_native(buf, len, &dsp->dsa_zc);
  68         aiov.iov_base = buf;
  69         aiov.iov_len = len;
  70         auio.uio_iov = &aiov;
  71         auio.uio_iovcnt = 1;
  72         auio.uio_resid = len;
  73         auio.uio_segflg = UIO_SYSSPACE;
  74         auio.uio_rw = UIO_WRITE;
  75         auio.uio_offset = (off_t)-1;
  76         auio.uio_td = dsp->dsa_td;
  77 #ifdef _KERNEL
  78         if (dsp->dsa_fp->f_type == DTYPE_VNODE)
  79                 bwillwrite();
  80         dsp->dsa_err = fo_write(dsp->dsa_fp, &auio, dsp->dsa_td->td_ucred, 0,
  81             dsp->dsa_td);
  82 #else
  83         fprintf(stderr, "%s: returning EOPNOTSUPP\n", __func__);
  84         dsp->dsa_err = EOPNOTSUPP;
  85 #endif
  86         mutex_enter(&ds->ds_sendstream_lock);
  87         *dsp->dsa_off += len;
  88         mutex_exit(&ds->ds_sendstream_lock);
  89
  90         return (dsp->dsa_err);
  91 }
  92
  93 static int
  94 dump_free(dmu_sendarg_t *dsp, uint64_t object, uint64_t offset,
  95     uint64_t length)
  96 {
  97         struct drr_free *drrf = &(dsp->dsa_drr->drr_u.drr_free);
  98
  99         /*
 100          * When we receive a free record, dbuf_free_range() assumes
 101          * that the receiving system doesn't have any dbufs in the range
 102          * being freed.  This is always true because there is a one-record
 103          * constraint: we only send one WRITE record for any given
 104          * object+offset.  We know that the one-record constraint is
 105          * true because we always send data in increasing order by
 106          * object,offset.
 107          *
 108          * If the increasing-order constraint ever changes, we should find
 109          * another way to assert that the one-record constraint is still
 110          * satisfied.
 111          */
 112         ASSERT(object > dsp->dsa_last_data_object ||
 113             (object == dsp->dsa_last_data_object &&
 114             offset > dsp->dsa_last_data_offset));
 115
 116         /*
 117          * If we are doing a non-incremental send, then there can't
 118          * be any data in the dataset we're receiving into.  Therefore
 119          * a free record would simply be a no-op.  Save space by not
 120          * sending it to begin with.
 121          */
 122         if (!dsp->dsa_incremental)
 123                 return (0);
 124
 125         if (length != -1ULL && offset + length < offset)
 126                 length = -1ULL;
 127
 128         /*
 129          * If there is a pending op, but it's not PENDING_FREE, push it out,
 130          * since free block aggregation can only be done for blocks of the
 131          * same type (i.e., DRR_FREE records can only be aggregated with
 132          * other DRR_FREE records.  DRR_FREEOBJECTS records can only be
 133          * aggregated with other DRR_FREEOBJECTS records.
 134          */
 135         if (dsp->dsa_pending_op != PENDING_NONE &&
 136             dsp->dsa_pending_op != PENDING_FREE) {
 137                 if (dump_bytes(dsp, dsp->dsa_drr,
 138                     sizeof (dmu_replay_record_t)) != 0)
 139                         return (SET_ERROR(EINTR));
 140                 dsp->dsa_pending_op = PENDING_NONE;
 141         }
 142
 143         if (dsp->dsa_pending_op == PENDING_FREE) {
 144                 /*
 145                  * There should never be a PENDING_FREE if length is -1
 146                  * (because dump_dnode is the only place where this
 147                  * function is called with a -1, and only after flushing
 148                  * any pending record).
 149                  */
 150                 ASSERT(length != -1ULL);
 151                 /*
 152                  * Check to see whether this free block can be aggregated
 153                  * with pending one.
 154                  */
 155                 if (drrf->drr_object == object && drrf->drr_offset +
 156                     drrf->drr_length == offset) {
 157                         drrf->drr_length += length;
 158                         return (0);
 159                 } else {
 160                         /* not a continuation.  Push out pending record */
 161                         if (dump_bytes(dsp, dsp->dsa_drr,
 162                             sizeof (dmu_replay_record_t)) != 0)
 163                                 return (SET_ERROR(EINTR));
 164                         dsp->dsa_pending_op = PENDING_NONE;
 165                 }
 166         }
 167         /* create a FREE record and make it pending */
 168         bzero(dsp->dsa_drr, sizeof (dmu_replay_record_t));
 169         dsp->dsa_drr->drr_type = DRR_FREE;
 170         drrf->drr_object = object;
 171         drrf->drr_offset = offset;
 172         drrf->drr_length = length;
 173         drrf->drr_toguid = dsp->dsa_toguid;
 174         if (length == -1ULL) {
 175                 if (dump_bytes(dsp, dsp->dsa_drr,
 176                     sizeof (dmu_replay_record_t)) != 0)
 177                         return (SET_ERROR(EINTR));
 178         } else {
 179                 dsp->dsa_pending_op = PENDING_FREE;
 180         }
 181
 182         return (0);
 183 }
 184
 185 static int
 186 dump_data(dmu_sendarg_t *dsp, dmu_object_type_t type,
 187     uint64_t object, uint64_t offset, int blksz, const blkptr_t *bp, void *data)
 188 {
 189         struct drr_write *drrw = &(dsp->dsa_drr->drr_u.drr_write);
 190
 191         /*
 192          * We send data in increasing object, offset order.
 193          * See comment in dump_free() for details.
 194          */
 195         ASSERT(object > dsp->dsa_last_data_object ||
 196             (object == dsp->dsa_last_data_object &&
 197             offset > dsp->dsa_last_data_offset));
 198         dsp->dsa_last_data_object = object;
 199         dsp->dsa_last_data_offset = offset + blksz - 1;
 200
 201         /*
 202          * If there is any kind of pending aggregation (currently either
 203          * a grouping of free objects or free blocks), push it out to
 204          * the stream, since aggregation can't be done across operations
 205          * of different types.
 206          */
 207         if (dsp->dsa_pending_op != PENDING_NONE) {
 208                 if (dump_bytes(dsp, dsp->dsa_drr,
 209                     sizeof (dmu_replay_record_t)) != 0)
 210                         return (SET_ERROR(EINTR));
 211                 dsp->dsa_pending_op = PENDING_NONE;
 212         }
 213         /* write a DATA record */
 214         bzero(dsp->dsa_drr, sizeof (dmu_replay_record_t));
 215         dsp->dsa_drr->drr_type = DRR_WRITE;
 216         drrw->drr_object = object;
 217         drrw->drr_type = type;
 218         drrw->drr_offset = offset;
 219         drrw->drr_length = blksz;
 220         drrw->drr_toguid = dsp->dsa_toguid;
 221         drrw->drr_checksumtype = BP_GET_CHECKSUM(bp);
 222         if (zio_checksum_table[drrw->drr_checksumtype].ci_dedup)
 223                 drrw->drr_checksumflags |= DRR_CHECKSUM_DEDUP;
 224         DDK_SET_LSIZE(&drrw->drr_key, BP_GET_LSIZE(bp));
 225         DDK_SET_PSIZE(&drrw->drr_key, BP_GET_PSIZE(bp));
 226         DDK_SET_COMPRESS(&drrw->drr_key, BP_GET_COMPRESS(bp));
 227         drrw->drr_key.ddk_cksum = bp->blk_cksum;
 228
 229         if (dump_bytes(dsp, dsp->dsa_drr, sizeof (dmu_replay_record_t)) != 0)
 230                 return (SET_ERROR(EINTR));
 231         if (dump_bytes(dsp, data, blksz) != 0)
 232                 return (SET_ERROR(EINTR));
 233         return (0);
 234 }
 235
 236 static int
 237 dump_spill(dmu_sendarg_t *dsp, uint64_t object, int blksz, void *data)
 238 {
 239         struct drr_spill *drrs = &(dsp->dsa_drr->drr_u.drr_spill);
 240
 241         if (dsp->dsa_pending_op != PENDING_NONE) {
 242                 if (dump_bytes(dsp, dsp->dsa_drr,
 243                     sizeof (dmu_replay_record_t)) != 0)
 244                         return (SET_ERROR(EINTR));
 245                 dsp->dsa_pending_op = PENDING_NONE;
 246         }
 247
 248         /* write a SPILL record */
 249         bzero(dsp->dsa_drr, sizeof (dmu_replay_record_t));
 250         dsp->dsa_drr->drr_type = DRR_SPILL;
 251         drrs->drr_object = object;
 252         drrs->drr_length = blksz;
 253         drrs->drr_toguid = dsp->dsa_toguid;
 254
 255         if (dump_bytes(dsp, dsp->dsa_drr, sizeof (dmu_replay_record_t)))
 256                 return (SET_ERROR(EINTR));
 257         if (dump_bytes(dsp, data, blksz))
 258                 return (SET_ERROR(EINTR));
 259         return (0);
 260 }
 261
 262 static int
 263 dump_freeobjects(dmu_sendarg_t *dsp, uint64_t firstobj, uint64_t numobjs)
 264 {
 265         struct drr_freeobjects *drrfo = &(dsp->dsa_drr->drr_u.drr_freeobjects);
 266
 267         /* See comment in dump_free(). */
 268         if (!dsp->dsa_incremental)
 269                 return (0);
 270
 271         /*
 272          * If there is a pending op, but it's not PENDING_FREEOBJECTS,
 273          * push it out, since free block aggregation can only be done for
 274          * blocks of the same type (i.e., DRR_FREE records can only be
 275          * aggregated with other DRR_FREE records.  DRR_FREEOBJECTS records
 276          * can only be aggregated with other DRR_FREEOBJECTS records.
 277          */
 278         if (dsp->dsa_pending_op != PENDING_NONE &&
 279             dsp->dsa_pending_op != PENDING_FREEOBJECTS) {
 280                 if (dump_bytes(dsp, dsp->dsa_drr,
 281                     sizeof (dmu_replay_record_t)) != 0)
 282                         return (SET_ERROR(EINTR));
 283                 dsp->dsa_pending_op = PENDING_NONE;
 284         }
 285         if (dsp->dsa_pending_op == PENDING_FREEOBJECTS) {
 286                 /*
 287                  * See whether this free object array can be aggregated
 288                  * with pending one
 289                  */
 290                 if (drrfo->drr_firstobj + drrfo->drr_numobjs == firstobj) {
 291                         drrfo->drr_numobjs += numobjs;
 292                         return (0);
 293                 } else {
 294                         /* can't be aggregated.  Push out pending record */
 295                         if (dump_bytes(dsp, dsp->dsa_drr,
 296                             sizeof (dmu_replay_record_t)) != 0)
 297                                 return (SET_ERROR(EINTR));
 298                         dsp->dsa_pending_op = PENDING_NONE;
 299                 }
 300         }
 301
 302         /* write a FREEOBJECTS record */
 303         bzero(dsp->dsa_drr, sizeof (dmu_replay_record_t));
 304         dsp->dsa_drr->drr_type = DRR_FREEOBJECTS;
 305         drrfo->drr_firstobj = firstobj;
 306         drrfo->drr_numobjs = numobjs;
 307         drrfo->drr_toguid = dsp->dsa_toguid;
 308
 309         dsp->dsa_pending_op = PENDING_FREEOBJECTS;
 310
 311         return (0);
 312 }
 313
 314 static int
 315 dump_dnode(dmu_sendarg_t *dsp, uint64_t object, dnode_phys_t *dnp)
 316 {
 317         struct drr_object *drro = &(dsp->dsa_drr->drr_u.drr_object);
 318
 319         if (dnp == NULL || dnp->dn_type == DMU_OT_NONE)
 320                 return (dump_freeobjects(dsp, object, 1));
 321
 322         if (dsp->dsa_pending_op != PENDING_NONE) {
 323                 if (dump_bytes(dsp, dsp->dsa_drr,
 324                     sizeof (dmu_replay_record_t)) != 0)
 325                         return (SET_ERROR(EINTR));
 326                 dsp->dsa_pending_op = PENDING_NONE;
 327         }
 328
 329         /* write an OBJECT record */
 330         bzero(dsp->dsa_drr, sizeof (dmu_replay_record_t));
 331         dsp->dsa_drr->drr_type = DRR_OBJECT;
 332         drro->drr_object = object;
 333         drro->drr_type = dnp->dn_type;
 334         drro->drr_bonustype = dnp->dn_bonustype;
 335         drro->drr_blksz = dnp->dn_datablkszsec << SPA_MINBLOCKSHIFT;
 336         drro->drr_bonuslen = dnp->dn_bonuslen;
 337         drro->drr_checksumtype = dnp->dn_checksum;
 338         drro->drr_compress = dnp->dn_compress;
 339         drro->drr_toguid = dsp->dsa_toguid;
 340
 341         if (dump_bytes(dsp, dsp->dsa_drr, sizeof (dmu_replay_record_t)) != 0)
 342                 return (SET_ERROR(EINTR));
 343
 344         if (dump_bytes(dsp, DN_BONUS(dnp), P2ROUNDUP(dnp->dn_bonuslen, 8)) != 0)
 345                 return (SET_ERROR(EINTR));
 346
 347         /* Free anything past the end of the file. */
 348         if (dump_free(dsp, object, (dnp->dn_maxblkid + 1) *
 349             (dnp->dn_datablkszsec << SPA_MINBLOCKSHIFT), -1ULL) != 0)
 350                 return (SET_ERROR(EINTR));
 351         if (dsp->dsa_err != 0)
 352                 return (SET_ERROR(EINTR));
 353         return (0);
 354 }
 355
 356 #define BP_SPAN(dnp, level) \
 357         (((uint64_t)dnp->dn_datablkszsec) << (SPA_MINBLOCKSHIFT + \
 358         (level) * (dnp->dn_indblkshift - SPA_BLKPTRSHIFT)))
 359
 360 /* ARGSUSED */
 361 static int
 362 backup_cb(spa_t *spa, zilog_t *zilog, const blkptr_t *bp,
 363     const zbookmark_t *zb, const dnode_phys_t *dnp, void *arg)
 364 {
 365         dmu_sendarg_t *dsp = arg;
 366         dmu_object_type_t type = bp ? BP_GET_TYPE(bp) : DMU_OT_NONE;
 367         int err = 0;
 368
 369         if (issig(JUSTLOOKING) && issig(FORREAL))
 370                 return (SET_ERROR(EINTR));
 371
 372         if (zb->zb_object != DMU_META_DNODE_OBJECT &&
 373             DMU_OBJECT_IS_SPECIAL(zb->zb_object)) {
 374                 return (0);
 375         } else if (bp == NULL && zb->zb_object == DMU_META_DNODE_OBJECT) {
 376                 uint64_t span = BP_SPAN(dnp, zb->zb_level);
 377                 uint64_t dnobj = (zb->zb_blkid * span) >> DNODE_SHIFT;
 378                 err = dump_freeobjects(dsp, dnobj, span >> DNODE_SHIFT);
 379         } else if (bp == NULL) {
 380                 uint64_t span = BP_SPAN(dnp, zb->zb_level);
 381                 err = dump_free(dsp, zb->zb_object, zb->zb_blkid * span, span);
 382         } else if (zb->zb_level > 0 || type == DMU_OT_OBJSET) {
 383                 return (0);
 384         } else if (type == DMU_OT_DNODE) {
 385                 dnode_phys_t *blk;
 386                 int i;
 387                 int blksz = BP_GET_LSIZE(bp);
 388                 uint32_t aflags = ARC_WAIT;
 389                 arc_buf_t *abuf;
 390
 391                 if (arc_read(NULL, spa, bp, arc_getbuf_func, &abuf,
 392                     ZIO_PRIORITY_ASYNC_READ, ZIO_FLAG_CANFAIL,
 393                     &aflags, zb) != 0)
 394                         return (SET_ERROR(EIO));
 395
 396                 blk = abuf->b_data;
 397                 for (i = 0; i < blksz >> DNODE_SHIFT; i++) {
 398                         uint64_t dnobj = (zb->zb_blkid <<
 399                             (DNODE_BLOCK_SHIFT - DNODE_SHIFT)) + i;
 400                         err = dump_dnode(dsp, dnobj, blk+i);
 401                         if (err != 0)
 402                                 break;
 403                 }
 404                 (void) arc_buf_remove_ref(abuf, &abuf);
 405         } else if (type == DMU_OT_SA) {
 406                 uint32_t aflags = ARC_WAIT;
 407                 arc_buf_t *abuf;
 408                 int blksz = BP_GET_LSIZE(bp);
 409
 410                 if (arc_read(NULL, spa, bp, arc_getbuf_func, &abuf,
 411                     ZIO_PRIORITY_ASYNC_READ, ZIO_FLAG_CANFAIL,
 412                     &aflags, zb) != 0)
 413                         return (SET_ERROR(EIO));
 414
 415                 err = dump_spill(dsp, zb->zb_object, blksz, abuf->b_data);
 416                 (void) arc_buf_remove_ref(abuf, &abuf);
 417         } else { /* it's a level-0 block of a regular object */
 418                 uint32_t aflags = ARC_WAIT;
 419                 arc_buf_t *abuf;
 420                 int blksz = BP_GET_LSIZE(bp);
 421
 422                 if (arc_read(NULL, spa, bp, arc_getbuf_func, &abuf,
 423                     ZIO_PRIORITY_ASYNC_READ, ZIO_FLAG_CANFAIL,
 424                     &aflags, zb) != 0) {
 425                         if (zfs_send_corrupt_data) {
 426                                 /* Send a block filled with 0x"zfs badd bloc" */
 427                                 abuf = arc_buf_alloc(spa, blksz, &abuf,
 428                                     ARC_BUFC_DATA);
 429                                 uint64_t *ptr;
 430                                 for (ptr = abuf->b_data;
 431                                     (char *)ptr < (char *)abuf->b_data + blksz;
 432                                     ptr++)
 433                                         *ptr = 0x2f5baddb10c;
 434                         } else {
 435                                 return (SET_ERROR(EIO));
 436                         }
 437                 }
 438
 439                 err = dump_data(dsp, type, zb->zb_object, zb->zb_blkid * blksz,
 440                     blksz, bp, abuf->b_data);
 441                 (void) arc_buf_remove_ref(abuf, &abuf);
 442         }
 443
 444         ASSERT(err == 0 || err == EINTR);
 445         return (err);
 446 }
 447
 448 /*
 449  * Releases dp, ds, and fromds, using the specified tag.
 450  */
 451 static int
 452 dmu_send_impl(void *tag, dsl_pool_t *dp, dsl_dataset_t *ds,
 453 #ifdef illumos
 454     dsl_dataset_t *fromds, int outfd, vnode_t *vp, offset_t *off)
 455 #else
 456     dsl_dataset_t *fromds, int outfd, struct file *fp, offset_t *off)
 457 #endif
 458 {
 459         objset_t *os;
 460         dmu_replay_record_t *drr;
 461         dmu_sendarg_t *dsp;
 462         int err;
 463         uint64_t fromtxg = 0;
 464
 465         if (fromds != NULL && !dsl_dataset_is_before(ds, fromds)) {
 466                 dsl_dataset_rele(fromds, tag);
 467                 dsl_dataset_rele(ds, tag);
 468                 dsl_pool_rele(dp, tag);
 469                 return (SET_ERROR(EXDEV));
 470         }
 471
 472         err = dmu_objset_from_ds(ds, &os);
 473         if (err != 0) {
 474                 if (fromds != NULL)
 475                         dsl_dataset_rele(fromds, tag);
 476                 dsl_dataset_rele(ds, tag);
 477                 dsl_pool_rele(dp, tag);
 478                 return (err);
 479         }
 480
 481         drr = kmem_zalloc(sizeof (dmu_replay_record_t), KM_SLEEP);
 482         drr->drr_type = DRR_BEGIN;
 483         drr->drr_u.drr_begin.drr_magic = DMU_BACKUP_MAGIC;
 484         DMU_SET_STREAM_HDRTYPE(drr->drr_u.drr_begin.drr_versioninfo,
 485             DMU_SUBSTREAM);
 486
 487 #ifdef _KERNEL
 488         if (dmu_objset_type(os) == DMU_OST_ZFS) {
 489                 uint64_t version;
 490                 if (zfs_get_zplprop(os, ZFS_PROP_VERSION, &version) != 0) {
 491                         kmem_free(drr, sizeof (dmu_replay_record_t));
 492                         if (fromds != NULL)
 493                                 dsl_dataset_rele(fromds, tag);
 494                         dsl_dataset_rele(ds, tag);
 495                         dsl_pool_rele(dp, tag);
 496                         return (SET_ERROR(EINVAL));
 497                 }
 498                 if (version >= ZPL_VERSION_SA) {
 499                         DMU_SET_FEATUREFLAGS(
 500                             drr->drr_u.drr_begin.drr_versioninfo,
 501                             DMU_BACKUP_FEATURE_SA_SPILL);
 502                 }
 503         }
 504 #endif
 505
 506         drr->drr_u.drr_begin.drr_creation_time =
 507             ds->ds_phys->ds_creation_time;
 508         drr->drr_u.drr_begin.drr_type = dmu_objset_type(os);
 509         if (fromds != NULL && ds->ds_dir != fromds->ds_dir)
 510                 drr->drr_u.drr_begin.drr_flags |= DRR_FLAG_CLONE;
 511         drr->drr_u.drr_begin.drr_toguid = ds->ds_phys->ds_guid;
 512         if (ds->ds_phys->ds_flags & DS_FLAG_CI_DATASET)
 513                 drr->drr_u.drr_begin.drr_flags |= DRR_FLAG_CI_DATA;
 514
 515         if (fromds != NULL)
 516                 drr->drr_u.drr_begin.drr_fromguid = fromds->ds_phys->ds_guid;
 517         dsl_dataset_name(ds, drr->drr_u.drr_begin.drr_toname);
 518
 519         if (fromds != NULL) {
 520                 fromtxg = fromds->ds_phys->ds_creation_txg;
 521                 dsl_dataset_rele(fromds, tag);
 522                 fromds = NULL;
 523         }
 524
 525         dsp = kmem_zalloc(sizeof (dmu_sendarg_t), KM_SLEEP);
 526
 527         dsp->dsa_drr = drr;
 528         dsp->dsa_outfd = outfd;
 529         dsp->dsa_proc = curproc;
 530         dsp->dsa_td = curthread;
 531         dsp->dsa_fp = fp;
 532         dsp->dsa_os = os;
 533         dsp->dsa_off = off;
 534         dsp->dsa_toguid = ds->ds_phys->ds_guid;
 535         ZIO_SET_CHECKSUM(&dsp->dsa_zc, 0, 0, 0, 0);
 536         dsp->dsa_pending_op = PENDING_NONE;
 537         dsp->dsa_incremental = (fromtxg != 0);
 538
 539         mutex_enter(&ds->ds_sendstream_lock);
 540         list_insert_head(&ds->ds_sendstreams, dsp);
 541         mutex_exit(&ds->ds_sendstream_lock);
 542
 543         dsl_dataset_long_hold(ds, FTAG);
 544         dsl_pool_rele(dp, tag);
 545
 546         if (dump_bytes(dsp, drr, sizeof (dmu_replay_record_t)) != 0) {
 547                 err = dsp->dsa_err;
 548                 goto out;
 549         }
 550
 551         err = traverse_dataset(ds, fromtxg, TRAVERSE_PRE | TRAVERSE_PREFETCH,
 552             backup_cb, dsp);
 553
 554         if (dsp->dsa_pending_op != PENDING_NONE)
 555                 if (dump_bytes(dsp, drr, sizeof (dmu_replay_record_t)) != 0)
 556                         err = SET_ERROR(EINTR);
 557
 558         if (err != 0) {
 559                 if (err == EINTR && dsp->dsa_err != 0)
 560                         err = dsp->dsa_err;
 561                 goto out;
 562         }
 563
 564         bzero(drr, sizeof (dmu_replay_record_t));
 565         drr->drr_type = DRR_END;
 566         drr->drr_u.drr_end.drr_checksum = dsp->dsa_zc;
 567         drr->drr_u.drr_end.drr_toguid = dsp->dsa_toguid;
 568
 569         if (dump_bytes(dsp, drr, sizeof (dmu_replay_record_t)) != 0) {
 570                 err = dsp->dsa_err;
 571                 goto out;
 572         }
 573
 574 out:
 575         mutex_enter(&ds->ds_sendstream_lock);
 576         list_remove(&ds->ds_sendstreams, dsp);
 577         mutex_exit(&ds->ds_sendstream_lock);
 578
 579         kmem_free(drr, sizeof (dmu_replay_record_t));
 580         kmem_free(dsp, sizeof (dmu_sendarg_t));
 581
 582         dsl_dataset_long_rele(ds, FTAG);
 583         dsl_dataset_rele(ds, tag);
 584
 585         return (err);
 586 }
 587
 588 int
 589 dmu_send_obj(const char *pool, uint64_t tosnap, uint64_t fromsnap,
 590 #ifdef illumos
 591     int outfd, vnode_t *vp, offset_t *off)
 592 #else
 593     int outfd, struct file *fp, offset_t *off)
 594 #endif
 595 {
 596         dsl_pool_t *dp;
 597         dsl_dataset_t *ds;
 598         dsl_dataset_t *fromds = NULL;
 599         int err;
 600
 601         err = dsl_pool_hold(pool, FTAG, &dp);
 602         if (err != 0)
 603                 return (err);
 604
 605         err = dsl_dataset_hold_obj(dp, tosnap, FTAG, &ds);
 606         if (err != 0) {
 607                 dsl_pool_rele(dp, FTAG);
 608                 return (err);
 609         }
 610
 611         if (fromsnap != 0) {
 612                 err = dsl_dataset_hold_obj(dp, fromsnap, FTAG, &fromds);
 613                 if (err != 0) {
 614                         dsl_dataset_rele(ds, FTAG);
 615                         dsl_pool_rele(dp, FTAG);
 616                         return (err);
 617                 }
 618         }
 619
 620         return (dmu_send_impl(FTAG, dp, ds, fromds, outfd, fp, off));
 621 }
 622
 623 int
 624 dmu_send(const char *tosnap, const char *fromsnap,
 625 #ifdef illumos
 626     int outfd, vnode_t *vp, offset_t *off)
 627 #else
 628     int outfd, struct file *fp, offset_t *off)
 629 #endif
 630 {
 631         dsl_pool_t *dp;
 632         dsl_dataset_t *ds;
 633         dsl_dataset_t *fromds = NULL;
 634         int err;
 635
 636         if (strchr(tosnap, '@') == NULL)
 637                 return (SET_ERROR(EINVAL));
 638         if (fromsnap != NULL && strchr(fromsnap, '@') == NULL)
 639                 return (SET_ERROR(EINVAL));
 640
 641         err = dsl_pool_hold(tosnap, FTAG, &dp);
 642         if (err != 0)
 643                 return (err);
 644
 645         err = dsl_dataset_hold(dp, tosnap, FTAG, &ds);
 646         if (err != 0) {
 647                 dsl_pool_rele(dp, FTAG);
 648                 return (err);
 649         }
 650
 651         if (fromsnap != NULL) {
 652                 err = dsl_dataset_hold(dp, fromsnap, FTAG, &fromds);
 653                 if (err != 0) {
 654                         dsl_dataset_rele(ds, FTAG);
 655                         dsl_pool_rele(dp, FTAG);
 656                         return (err);
 657                 }
 658         }
 659         return (dmu_send_impl(FTAG, dp, ds, fromds, outfd, fp, off));
 660 }
 661
 662 int
 663 dmu_send_estimate(dsl_dataset_t *ds, dsl_dataset_t *fromds, uint64_t *sizep)
 664 {
 665         dsl_pool_t *dp = ds->ds_dir->dd_pool;
 666         int err;
 667         uint64_t size;
 668
 669         ASSERT(dsl_pool_config_held(dp));
 670
 671         /* tosnap must be a snapshot */
 672         if (!dsl_dataset_is_snapshot(ds))
 673                 return (SET_ERROR(EINVAL));
 674
 675         /*
 676          * fromsnap must be an earlier snapshot from the same fs as tosnap,
 677          * or the origin's fs.
 678          */
 679         if (fromds != NULL && !dsl_dataset_is_before(ds, fromds))
 680                 return (SET_ERROR(EXDEV));
 681
 682         /* Get uncompressed size estimate of changed data. */
 683         if (fromds == NULL) {
 684                 size = ds->ds_phys->ds_uncompressed_bytes;
 685         } else {
 686                 uint64_t used, comp;
 687                 err = dsl_dataset_space_written(fromds, ds,
 688                     &used, &comp, &size);
 689                 if (err != 0)
 690                         return (err);
 691         }
 692
 693         /*
 694          * Assume that space (both on-disk and in-stream) is dominated by
 695          * data.  We will adjust for indirect blocks and the copies property,
 696          * but ignore per-object space used (eg, dnodes and DRR_OBJECT records).
 697          */
 698
 699         /*
 700          * Subtract out approximate space used by indirect blocks.
 701          * Assume most space is used by data blocks (non-indirect, non-dnode).
 702          * Assume all blocks are recordsize.  Assume ditto blocks and
 703          * internal fragmentation counter out compression.
 704          *
 705          * Therefore, space used by indirect blocks is sizeof(blkptr_t) per
 706          * block, which we observe in practice.
 707          */
 708         uint64_t recordsize;
 709         err = dsl_prop_get_int_ds(ds, "recordsize", &recordsize);
 710         if (err != 0)
 711                 return (err);
 712         size -= size / recordsize * sizeof (blkptr_t);
 713
 714         /* Add in the space for the record associated with each block. */
 715         size += size / recordsize * sizeof (dmu_replay_record_t);
 716
 717         *sizep = size;
 718
 719         return (0);
 720 }
 721
 722 typedef struct dmu_recv_begin_arg {
 723         const char *drba_origin;
 724         dmu_recv_cookie_t *drba_cookie;
 725         cred_t *drba_cred;
 726 } dmu_recv_begin_arg_t;
 727
 728 static int
 729 recv_begin_check_existing_impl(dmu_recv_begin_arg_t *drba, dsl_dataset_t *ds,
 730     uint64_t fromguid)
 731 {
 732         uint64_t val;
 733         int error;
 734         dsl_pool_t *dp = ds->ds_dir->dd_pool;
 735
 736         /* must not have any changes since most recent snapshot */
 737         if (!drba->drba_cookie->drc_force &&
 738             dsl_dataset_modified_since_lastsnap(ds))
 739                 return (SET_ERROR(ETXTBSY));
 740
 741         /* temporary clone name must not exist */
 742         error = zap_lookup(dp->dp_meta_objset,
 743             ds->ds_dir->dd_phys->dd_child_dir_zapobj, recv_clone_name,
 744             8, 1, &val);
 745         if (error != ENOENT)
 746                 return (error == 0 ? EBUSY : error);
 747
 748         /* new snapshot name must not exist */
 749         error = zap_lookup(dp->dp_meta_objset,
 750             ds->ds_phys->ds_snapnames_zapobj, drba->drba_cookie->drc_tosnap,
 751             8, 1, &val);
 752         if (error != ENOENT)
 753                 return (error == 0 ? EEXIST : error);
 754
 755         if (fromguid != 0) {
 756                 /* if incremental, most recent snapshot must match fromguid */
 757                 if (ds->ds_prev == NULL)
 758                         return (SET_ERROR(ENODEV));
 759
 760                 /*
 761                  * most recent snapshot must match fromguid, or there are no
 762                  * changes since the fromguid one
 763                  */
 764                 if (ds->ds_prev->ds_phys->ds_guid != fromguid) {
 765                         uint64_t birth = ds->ds_prev->ds_phys->ds_bp.blk_birth;
 766                         uint64_t obj = ds->ds_prev->ds_phys->ds_prev_snap_obj;
 767                         while (obj != 0) {
 768                                 dsl_dataset_t *snap;
 769                                 error = dsl_dataset_hold_obj(dp, obj, FTAG,
 770                                     &snap);
 771                                 if (error != 0)
 772                                         return (SET_ERROR(ENODEV));
 773                                 if (snap->ds_phys->ds_creation_txg < birth) {
 774                                         dsl_dataset_rele(snap, FTAG);
 775                                         return (SET_ERROR(ENODEV));
 776                                 }
 777                                 if (snap->ds_phys->ds_guid == fromguid) {
 778                                         dsl_dataset_rele(snap, FTAG);
 779                                         break; /* it's ok */
 780                                 }
 781                                 obj = snap->ds_phys->ds_prev_snap_obj;
 782                                 dsl_dataset_rele(snap, FTAG);
 783                         }
 784                         if (obj == 0)
 785                                 return (SET_ERROR(ENODEV));
 786                 }
 787         } else {
 788                 /* if full, most recent snapshot must be $ORIGIN */
 789                 if (ds->ds_phys->ds_prev_snap_txg >= TXG_INITIAL)
 790                         return (SET_ERROR(ENODEV));
 791         }
 792
 793         return (0);
 794
 795 }
 796
 797 static int
 798 dmu_recv_begin_check(void *arg, dmu_tx_t *tx)
 799 {
 800         dmu_recv_begin_arg_t *drba = arg;
 801         dsl_pool_t *dp = dmu_tx_pool(tx);
 802         struct drr_begin *drrb = drba->drba_cookie->drc_drrb;
 803         uint64_t fromguid = drrb->drr_fromguid;
 804         int flags = drrb->drr_flags;
 805         int error;
 806         dsl_dataset_t *ds;
 807         const char *tofs = drba->drba_cookie->drc_tofs;
 808
 809         /* already checked */
 810         ASSERT3U(drrb->drr_magic, ==, DMU_BACKUP_MAGIC);
 811
 812         if (DMU_GET_STREAM_HDRTYPE(drrb->drr_versioninfo) ==
 813             DMU_COMPOUNDSTREAM ||
 814             drrb->drr_type >= DMU_OST_NUMTYPES ||
 815             ((flags & DRR_FLAG_CLONE) && drba->drba_origin == NULL))
 816                 return (SET_ERROR(EINVAL));
 817
 818         /* Verify pool version supports SA if SA_SPILL feature set */
 819         if ((DMU_GET_FEATUREFLAGS(drrb->drr_versioninfo) &
 820             DMU_BACKUP_FEATURE_SA_SPILL) &&
 821             spa_version(dp->dp_spa) < SPA_VERSION_SA) {
 822                 return (SET_ERROR(ENOTSUP));
 823         }
 824
 825         error = dsl_dataset_hold(dp, tofs, FTAG, &ds);
 826         if (error == 0) {
 827                 /* target fs already exists; recv into temp clone */
 828
 829                 /* Can't recv a clone into an existing fs */
 830                 if (flags & DRR_FLAG_CLONE) {
 831                         dsl_dataset_rele(ds, FTAG);
 832                         return (SET_ERROR(EINVAL));
 833                 }
 834
 835                 error = recv_begin_check_existing_impl(drba, ds, fromguid);
 836                 dsl_dataset_rele(ds, FTAG);
 837         } else if (error == ENOENT) {
 838                 /* target fs does not exist; must be a full backup or clone */
 839                 char buf[MAXNAMELEN];
 840
 841                 /*
 842                  * If it's a non-clone incremental, we are missing the
 843                  * target fs, so fail the recv.
 844                  */
 845                 if (fromguid != 0 && !(flags & DRR_FLAG_CLONE))
 846                         return (SET_ERROR(ENOENT));
 847
 848                 /* Open the parent of tofs */
 849                 ASSERT3U(strlen(tofs), <, MAXNAMELEN);
 850                 (void) strlcpy(buf, tofs, strrchr(tofs, '/') - tofs + 1);
 851                 error = dsl_dataset_hold(dp, buf, FTAG, &ds);
 852                 if (error != 0)
 853                         return (error);
 854
 855                 if (drba->drba_origin != NULL) {
 856                         dsl_dataset_t *origin;
 857                         error = dsl_dataset_hold(dp, drba->drba_origin,
 858                             FTAG, &origin);
 859                         if (error != 0) {
 860                                 dsl_dataset_rele(ds, FTAG);
 861                                 return (error);
 862                         }
 863                         if (!dsl_dataset_is_snapshot(origin)) {
 864                                 dsl_dataset_rele(origin, FTAG);
 865                                 dsl_dataset_rele(ds, FTAG);
 866                                 return (SET_ERROR(EINVAL));
 867                         }
 868                         if (origin->ds_phys->ds_guid != fromguid) {
 869                                 dsl_dataset_rele(origin, FTAG);
 870                                 dsl_dataset_rele(ds, FTAG);
 871                                 return (SET_ERROR(ENODEV));
 872                         }
 873                         dsl_dataset_rele(origin, FTAG);
 874                 }
 875                 dsl_dataset_rele(ds, FTAG);
 876                 error = 0;
 877         }
 878         return (error);
 879 }
 880
 881 static void
 882 dmu_recv_begin_sync(void *arg, dmu_tx_t *tx)
 883 {
 884         dmu_recv_begin_arg_t *drba = arg;
 885         dsl_pool_t *dp = dmu_tx_pool(tx);
 886         struct drr_begin *drrb = drba->drba_cookie->drc_drrb;
 887         const char *tofs = drba->drba_cookie->drc_tofs;
 888         dsl_dataset_t *ds, *newds;
 889         uint64_t dsobj;
 890         int error;
 891         uint64_t crflags;
 892
 893         crflags = (drrb->drr_flags & DRR_FLAG_CI_DATA) ?
 894             DS_FLAG_CI_DATASET : 0;
 895
 896         error = dsl_dataset_hold(dp, tofs, FTAG, &ds);
 897         if (error == 0) {
 898                 /* create temporary clone */
 899                 dsobj = dsl_dataset_create_sync(ds->ds_dir, recv_clone_name,
 900                     ds->ds_prev, crflags, drba->drba_cred, tx);
 901                 dsl_dataset_rele(ds, FTAG);
 902         } else {
 903                 dsl_dir_t *dd;
 904                 const char *tail;
 905                 dsl_dataset_t *origin = NULL;
 906
 907                 VERIFY0(dsl_dir_hold(dp, tofs, FTAG, &dd, &tail));
 908
 909                 if (drba->drba_origin != NULL) {
 910                         VERIFY0(dsl_dataset_hold(dp, drba->drba_origin,
 911                             FTAG, &origin));
 912                 }
 913
 914                 /* Create new dataset. */
 915                 dsobj = dsl_dataset_create_sync(dd,
 916                     strrchr(tofs, '/') + 1,
 917                     origin, crflags, drba->drba_cred, tx);
 918                 if (origin != NULL)
 919                         dsl_dataset_rele(origin, FTAG);
 920                 dsl_dir_rele(dd, FTAG);
 921                 drba->drba_cookie->drc_newfs = B_TRUE;
 922         }
 923         VERIFY0(dsl_dataset_own_obj(dp, dsobj, dmu_recv_tag, &newds));
 924
 925         dmu_buf_will_dirty(newds->ds_dbuf, tx);
 926         newds->ds_phys->ds_flags |= DS_FLAG_INCONSISTENT;
 927
 928         /*
 929          * If we actually created a non-clone, we need to create the
 930          * objset in our new dataset.
 931          */
 932         if (BP_IS_HOLE(dsl_dataset_get_blkptr(newds))) {
 933                 (void) dmu_objset_create_impl(dp->dp_spa,
 934                     newds, dsl_dataset_get_blkptr(newds), drrb->drr_type, tx);
 935         }
 936
 937         drba->drba_cookie->drc_ds = newds;
 938
 939         spa_history_log_internal_ds(newds, "receive", tx, "");
 940 }
 941
 942 /*
 943  * NB: callers *MUST* call dmu_recv_stream() if dmu_recv_begin()
 944  * succeeds; otherwise we will leak the holds on the datasets.
 945  */
 946 int
 947 dmu_recv_begin(char *tofs, char *tosnap, struct drr_begin *drrb,
 948     boolean_t force, char *origin, dmu_recv_cookie_t *drc)
 949 {
 950         dmu_recv_begin_arg_t drba = { 0 };
 951         dmu_replay_record_t *drr;
 952
 953         bzero(drc, sizeof (dmu_recv_cookie_t));
 954         drc->drc_drrb = drrb;
 955         drc->drc_tosnap = tosnap;
 956         drc->drc_tofs = tofs;
 957         drc->drc_force = force;
 958
 959         if (drrb->drr_magic == BSWAP_64(DMU_BACKUP_MAGIC))
 960                 drc->drc_byteswap = B_TRUE;
 961         else if (drrb->drr_magic != DMU_BACKUP_MAGIC)
 962                 return (SET_ERROR(EINVAL));
 963
 964         drr = kmem_zalloc(sizeof (dmu_replay_record_t), KM_SLEEP);
 965         drr->drr_type = DRR_BEGIN;
 966         drr->drr_u.drr_begin = *drc->drc_drrb;
 967         if (drc->drc_byteswap) {
 968                 fletcher_4_incremental_byteswap(drr,
 969                     sizeof (dmu_replay_record_t), &drc->drc_cksum);
 970         } else {
 971                 fletcher_4_incremental_native(drr,
 972                     sizeof (dmu_replay_record_t), &drc->drc_cksum);
 973         }
 974         kmem_free(drr, sizeof (dmu_replay_record_t));
 975
 976         if (drc->drc_byteswap) {
 977                 drrb->drr_magic = BSWAP_64(drrb->drr_magic);
 978                 drrb->drr_versioninfo = BSWAP_64(drrb->drr_versioninfo);
 979                 drrb->drr_creation_time = BSWAP_64(drrb->drr_creation_time);
 980                 drrb->drr_type = BSWAP_32(drrb->drr_type);
 981                 drrb->drr_toguid = BSWAP_64(drrb->drr_toguid);
 982                 drrb->drr_fromguid = BSWAP_64(drrb->drr_fromguid);
 983         }
 984
 985         drba.drba_origin = origin;
 986         drba.drba_cookie = drc;
 987         drba.drba_cred = CRED();
 988
 989         return (dsl_sync_task(tofs, dmu_recv_begin_check, dmu_recv_begin_sync,
 990             &drba, 5));
 991 }
 992
 993 struct restorearg {
 994         int err;
 995         boolean_t byteswap;
 996         kthread_t *td;
 997         struct file *fp;
 998         char *buf;
 999         uint64_t voff;
1000         int bufsize; /* amount of memory allocated for buf */
1001         zio_cksum_t cksum;
1002         avl_tree_t *guid_to_ds_map;
1003 };
1004
1005 typedef struct guid_map_entry {
1006         uint64_t        guid;
1007         dsl_dataset_t   *gme_ds;
1008         avl_node_t      avlnode;
1009 } guid_map_entry_t;
1010
1011 static int
1012 guid_compare(const void *arg1, const void *arg2)
1013 {
1014         const guid_map_entry_t *gmep1 = arg1;
1015         const guid_map_entry_t *gmep2 = arg2;
1016
1017         if (gmep1->guid < gmep2->guid)
1018                 return (-1);
1019         else if (gmep1->guid > gmep2->guid)
1020                 return (1);
1021         return (0);
1022 }
1023
1024 static void
1025 free_guid_map_onexit(void *arg)
1026 {
1027         avl_tree_t *ca = arg;
1028         void *cookie = NULL;
1029         guid_map_entry_t *gmep;
1030
1031         while ((gmep = avl_destroy_nodes(ca, &cookie)) != NULL) {
1032                 dsl_dataset_long_rele(gmep->gme_ds, gmep);
1033                 dsl_dataset_rele(gmep->gme_ds, gmep);
1034                 kmem_free(gmep, sizeof (guid_map_entry_t));
1035         }
1036         avl_destroy(ca);
1037         kmem_free(ca, sizeof (avl_tree_t));
1038 }
1039
1040 static int
1041 restore_bytes(struct restorearg *ra, void *buf, int len, off_t off, ssize_t *resid)
1042 {
1043         struct uio auio;
1044         struct iovec aiov;
1045         int error;
1046
1047         aiov.iov_base = buf;
1048         aiov.iov_len = len;
1049         auio.uio_iov = &aiov;
1050         auio.uio_iovcnt = 1;
1051         auio.uio_resid = len;
1052         auio.uio_segflg = UIO_SYSSPACE;
1053         auio.uio_rw = UIO_READ;
1054         auio.uio_offset = off;
1055         auio.uio_td = ra->td;
1056 #ifdef _KERNEL
1057         error = fo_read(ra->fp, &auio, ra->td->td_ucred, FOF_OFFSET, ra->td);
1058 #else
1059         fprintf(stderr, "%s: returning EOPNOTSUPP\n", __func__);
1060         error = EOPNOTSUPP;
1061 #endif
1062         *resid = auio.uio_resid;
1063         return (error);
1064 }
1065
1066 static void *
1067 restore_read(struct restorearg *ra, int len)
1068 {
1069         void *rv;
1070         int done = 0;
1071
1072         /* some things will require 8-byte alignment, so everything must */
1073         ASSERT0(len % 8);
1074
1075         while (done < len) {
1076                 ssize_t resid;
1077
1078                 ra->err = restore_bytes(ra, (caddr_t)ra->buf + done,
1079                     len - done, ra->voff, &resid);
1080
1081                 if (resid == len - done)
1082                         ra->err = SET_ERROR(EINVAL);
1083                 ra->voff += len - done - resid;
1084                 done = len - resid;
1085                 if (ra->err != 0)
1086                         return (NULL);
1087         }
1088
1089         ASSERT3U(done, ==, len);
1090         rv = ra->buf;
1091         if (ra->byteswap)
1092                 fletcher_4_incremental_byteswap(rv, len, &ra->cksum);
1093         else
1094                 fletcher_4_incremental_native(rv, len, &ra->cksum);
1095         return (rv);
1096 }
1097
1098 static void
1099 backup_byteswap(dmu_replay_record_t *drr)
1100 {
1101 #define DO64(X) (drr->drr_u.X = BSWAP_64(drr->drr_u.X))
1102 #define DO32(X) (drr->drr_u.X = BSWAP_32(drr->drr_u.X))
1103         drr->drr_type = BSWAP_32(drr->drr_type);
1104         drr->drr_payloadlen = BSWAP_32(drr->drr_payloadlen);
1105         switch (drr->drr_type) {
1106         case DRR_BEGIN:
1107                 DO64(drr_begin.drr_magic);
1108                 DO64(drr_begin.drr_versioninfo);
1109                 DO64(drr_begin.drr_creation_time);
1110                 DO32(drr_begin.drr_type);
1111                 DO32(drr_begin.drr_flags);
1112                 DO64(drr_begin.drr_toguid);
1113                 DO64(drr_begin.drr_fromguid);
1114                 break;
1115         case DRR_OBJECT:
1116                 DO64(drr_object.drr_object);
1117                 /* DO64(drr_object.drr_allocation_txg); */
1118                 DO32(drr_object.drr_type);
1119                 DO32(drr_object.drr_bonustype);
1120                 DO32(drr_object.drr_blksz);
1121                 DO32(drr_object.drr_bonuslen);
1122                 DO64(drr_object.drr_toguid);
1123                 break;
1124         case DRR_FREEOBJECTS:
1125                 DO64(drr_freeobjects.drr_firstobj);
1126                 DO64(drr_freeobjects.drr_numobjs);
1127                 DO64(drr_freeobjects.drr_toguid);
1128                 break;
1129         case DRR_WRITE:
1130                 DO64(drr_write.drr_object);
1131                 DO32(drr_write.drr_type);
1132                 DO64(drr_write.drr_offset);
1133                 DO64(drr_write.drr_length);
1134                 DO64(drr_write.drr_toguid);
1135                 DO64(drr_write.drr_key.ddk_cksum.zc_word[0]);
1136                 DO64(drr_write.drr_key.ddk_cksum.zc_word[1]);
1137                 DO64(drr_write.drr_key.ddk_cksum.zc_word[2]);
1138                 DO64(drr_write.drr_key.ddk_cksum.zc_word[3]);
1139                 DO64(drr_write.drr_key.ddk_prop);
1140                 break;
1141         case DRR_WRITE_BYREF:
1142                 DO64(drr_write_byref.drr_object);
1143                 DO64(drr_write_byref.drr_offset);
1144                 DO64(drr_write_byref.drr_length);
1145                 DO64(drr_write_byref.drr_toguid);
1146                 DO64(drr_write_byref.drr_refguid);
1147                 DO64(drr_write_byref.drr_refobject);
1148                 DO64(drr_write_byref.drr_refoffset);
1149                 DO64(drr_write_byref.drr_key.ddk_cksum.zc_word[0]);
1150                 DO64(drr_write_byref.drr_key.ddk_cksum.zc_word[1]);
1151                 DO64(drr_write_byref.drr_key.ddk_cksum.zc_word[2]);
1152                 DO64(drr_write_byref.drr_key.ddk_cksum.zc_word[3]);
1153                 DO64(drr_write_byref.drr_key.ddk_prop);
1154                 break;
1155         case DRR_FREE:
1156                 DO64(drr_free.drr_object);
1157                 DO64(drr_free.drr_offset);
1158                 DO64(drr_free.drr_length);
1159                 DO64(drr_free.drr_toguid);
1160                 break;
1161         case DRR_SPILL:
1162                 DO64(drr_spill.drr_object);
1163                 DO64(drr_spill.drr_length);
1164                 DO64(drr_spill.drr_toguid);
1165                 break;
1166         case DRR_END:
1167                 DO64(drr_end.drr_checksum.zc_word[0]);
1168                 DO64(drr_end.drr_checksum.zc_word[1]);
1169                 DO64(drr_end.drr_checksum.zc_word[2]);
1170                 DO64(drr_end.drr_checksum.zc_word[3]);
1171                 DO64(drr_end.drr_toguid);
1172                 break;
1173         }
1174 #undef DO64
1175 #undef DO32
1176 }
1177
1178 static int
1179 restore_object(struct restorearg *ra, objset_t *os, struct drr_object *drro)
1180 {
1181         int err;
1182         dmu_tx_t *tx;
1183         void *data = NULL;
1184
1185         if (drro->drr_type == DMU_OT_NONE ||
1186             !DMU_OT_IS_VALID(drro->drr_type) ||
1187             !DMU_OT_IS_VALID(drro->drr_bonustype) ||
1188             drro->drr_checksumtype >= ZIO_CHECKSUM_FUNCTIONS ||
1189             drro->drr_compress >= ZIO_COMPRESS_FUNCTIONS ||
1190             P2PHASE(drro->drr_blksz, SPA_MINBLOCKSIZE) ||
1191             drro->drr_blksz < SPA_MINBLOCKSIZE ||
1192             drro->drr_blksz > SPA_MAXBLOCKSIZE ||
1193             drro->drr_bonuslen > DN_MAX_BONUSLEN) {
1194                 return (SET_ERROR(EINVAL));
1195         }
1196
1197         err = dmu_object_info(os, drro->drr_object, NULL);
1198
1199         if (err != 0 && err != ENOENT)
1200                 return (SET_ERROR(EINVAL));
1201
1202         if (drro->drr_bonuslen) {
1203                 data = restore_read(ra, P2ROUNDUP(drro->drr_bonuslen, 8));
1204                 if (ra->err != 0)
1205                         return (ra->err);
1206         }
1207
1208         if (err == ENOENT) {
1209                 /* currently free, want to be allocated */
1210                 tx = dmu_tx_create(os);
1211                 dmu_tx_hold_bonus(tx, DMU_NEW_OBJECT);
1212                 err = dmu_tx_assign(tx, TXG_WAIT);
1213                 if (err != 0) {
1214                         dmu_tx_abort(tx);
1215                         return (err);
1216                 }
1217                 err = dmu_object_claim(os, drro->drr_object,
1218                     drro->drr_type, drro->drr_blksz,
1219                     drro->drr_bonustype, drro->drr_bonuslen, tx);
1220                 dmu_tx_commit(tx);
1221         } else {
1222                 /* currently allocated, want to be allocated */
1223                 err = dmu_object_reclaim(os, drro->drr_object,
1224                     drro->drr_type, drro->drr_blksz,
1225                     drro->drr_bonustype, drro->drr_bonuslen);
1226         }
1227         if (err != 0) {
1228                 return (SET_ERROR(EINVAL));
1229         }
1230
1231         tx = dmu_tx_create(os);
1232         dmu_tx_hold_bonus(tx, drro->drr_object);
1233         err = dmu_tx_assign(tx, TXG_WAIT);
1234         if (err != 0) {
1235                 dmu_tx_abort(tx);
1236                 return (err);
1237         }
1238
1239         dmu_object_set_checksum(os, drro->drr_object, drro->drr_checksumtype,
1240             tx);
1241         dmu_object_set_compress(os, drro->drr_object, drro->drr_compress, tx);
1242
1243         if (data != NULL) {
1244                 dmu_buf_t *db;
1245
1246                 VERIFY(0 == dmu_bonus_hold(os, drro->drr_object, FTAG, &db));
1247                 dmu_buf_will_dirty(db, tx);
1248
1249                 ASSERT3U(db->db_size, >=, drro->drr_bonuslen);
1250                 bcopy(data, db->db_data, drro->drr_bonuslen);
1251                 if (ra->byteswap) {
1252                         dmu_object_byteswap_t byteswap =
1253                             DMU_OT_BYTESWAP(drro->drr_bonustype);
1254                         dmu_ot_byteswap[byteswap].ob_func(db->db_data,
1255                             drro->drr_bonuslen);
1256                 }
1257                 dmu_buf_rele(db, FTAG);
1258         }
1259         dmu_tx_commit(tx);
1260         return (0);
1261 }
1262
1263 /* ARGSUSED */
1264 static int
1265 restore_freeobjects(struct restorearg *ra, objset_t *os,
1266     struct drr_freeobjects *drrfo)
1267 {
1268         uint64_t obj;
1269
1270         if (drrfo->drr_firstobj + drrfo->drr_numobjs < drrfo->drr_firstobj)
1271                 return (SET_ERROR(EINVAL));
1272
1273         for (obj = drrfo->drr_firstobj;
1274             obj < drrfo->drr_firstobj + drrfo->drr_numobjs;
1275             (void) dmu_object_next(os, &obj, FALSE, 0)) {
1276                 int err;
1277
1278                 if (dmu_object_info(os, obj, NULL) != 0)
1279                         continue;
1280
1281                 err = dmu_free_long_object(os, obj);
1282                 if (err != 0)
1283                         return (err);
1284         }
1285         return (0);
1286 }
1287
1288 static int
1289 restore_write(struct restorearg *ra, objset_t *os,
1290     struct drr_write *drrw)
1291 {
1292         dmu_tx_t *tx;
1293         void *data;
1294         int err;
1295
1296         if (drrw->drr_offset + drrw->drr_length < drrw->drr_offset ||
1297             !DMU_OT_IS_VALID(drrw->drr_type))
1298                 return (SET_ERROR(EINVAL));
1299
1300         data = restore_read(ra, drrw->drr_length);
1301         if (data == NULL)
1302                 return (ra->err);
1303
1304         if (dmu_object_info(os, drrw->drr_object, NULL) != 0)
1305                 return (SET_ERROR(EINVAL));
1306
1307         tx = dmu_tx_create(os);
1308
1309         dmu_tx_hold_write(tx, drrw->drr_object,
1310             drrw->drr_offset, drrw->drr_length);
1311         err = dmu_tx_assign(tx, TXG_WAIT);
1312         if (err != 0) {
1313                 dmu_tx_abort(tx);
1314                 return (err);
1315         }
1316         if (ra->byteswap) {
1317                 dmu_object_byteswap_t byteswap =
1318                     DMU_OT_BYTESWAP(drrw->drr_type);
1319                 dmu_ot_byteswap[byteswap].ob_func(data, drrw->drr_length);
1320         }
1321         dmu_write(os, drrw->drr_object,
1322             drrw->drr_offset, drrw->drr_length, data, tx);
1323         dmu_tx_commit(tx);
1324         return (0);
1325 }
1326
1327 /*
1328  * Handle a DRR_WRITE_BYREF record.  This record is used in dedup'ed
1329  * streams to refer to a copy of the data that is already on the
1330  * system because it came in earlier in the stream.  This function
1331  * finds the earlier copy of the data, and uses that copy instead of
1332  * data from the stream to fulfill this write.
1333  */
1334 static int
1335 restore_write_byref(struct restorearg *ra, objset_t *os,
1336     struct drr_write_byref *drrwbr)
1337 {
1338         dmu_tx_t *tx;
1339         int err;
1340         guid_map_entry_t gmesrch;
1341         guid_map_entry_t *gmep;
1342         avl_index_t     where;
1343         objset_t *ref_os = NULL;
1344         dmu_buf_t *dbp;
1345
1346         if (drrwbr->drr_offset + drrwbr->drr_length < drrwbr->drr_offset)
1347                 return (SET_ERROR(EINVAL));
1348
1349         /*
1350          * If the GUID of the referenced dataset is different from the
1351          * GUID of the target dataset, find the referenced dataset.
1352          */
1353         if (drrwbr->drr_toguid != drrwbr->drr_refguid) {
1354                 gmesrch.guid = drrwbr->drr_refguid;
1355                 if ((gmep = avl_find(ra->guid_to_ds_map, &gmesrch,
1356                     &where)) == NULL) {
1357                         return (SET_ERROR(EINVAL));
1358                 }
1359                 if (dmu_objset_from_ds(gmep->gme_ds, &ref_os))
1360                         return (SET_ERROR(EINVAL));
1361         } else {
1362                 ref_os = os;
1363         }
1364
1365         if (err = dmu_buf_hold(ref_os, drrwbr->drr_refobject,
1366             drrwbr->drr_refoffset, FTAG, &dbp, DMU_READ_PREFETCH))
1367                 return (err);
1368
1369         tx = dmu_tx_create(os);
1370
1371         dmu_tx_hold_write(tx, drrwbr->drr_object,
1372             drrwbr->drr_offset, drrwbr->drr_length);
1373         err = dmu_tx_assign(tx, TXG_WAIT);
1374         if (err != 0) {
1375                 dmu_tx_abort(tx);
1376                 return (err);
1377         }
1378         dmu_write(os, drrwbr->drr_object,
1379             drrwbr->drr_offset, drrwbr->drr_length, dbp->db_data, tx);
1380         dmu_buf_rele(dbp, FTAG);
1381         dmu_tx_commit(tx);
1382         return (0);
1383 }
1384
1385 static int
1386 restore_spill(struct restorearg *ra, objset_t *os, struct drr_spill *drrs)
1387 {
1388         dmu_tx_t *tx;
1389         void *data;
1390         dmu_buf_t *db, *db_spill;
1391         int err;
1392
1393         if (drrs->drr_length < SPA_MINBLOCKSIZE ||
1394             drrs->drr_length > SPA_MAXBLOCKSIZE)
1395                 return (SET_ERROR(EINVAL));
1396
1397         data = restore_read(ra, drrs->drr_length);
1398         if (data == NULL)
1399                 return (ra->err);
1400
1401         if (dmu_object_info(os, drrs->drr_object, NULL) != 0)
1402                 return (SET_ERROR(EINVAL));
1403
1404         VERIFY(0 == dmu_bonus_hold(os, drrs->drr_object, FTAG, &db));
1405         if ((err = dmu_spill_hold_by_bonus(db, FTAG, &db_spill)) != 0) {
1406                 dmu_buf_rele(db, FTAG);
1407                 return (err);
1408         }
1409
1410         tx = dmu_tx_create(os);
1411
1412         dmu_tx_hold_spill(tx, db->db_object);
1413
1414         err = dmu_tx_assign(tx, TXG_WAIT);
1415         if (err != 0) {
1416                 dmu_buf_rele(db, FTAG);
1417                 dmu_buf_rele(db_spill, FTAG);
1418                 dmu_tx_abort(tx);
1419                 return (err);
1420         }
1421         dmu_buf_will_dirty(db_spill, tx);
1422
1423         if (db_spill->db_size < drrs->drr_length)
1424                 VERIFY(0 == dbuf_spill_set_blksz(db_spill,
1425                     drrs->drr_length, tx));
1426         bcopy(data, db_spill->db_data, drrs->drr_length);
1427
1428         dmu_buf_rele(db, FTAG);
1429         dmu_buf_rele(db_spill, FTAG);
1430
1431         dmu_tx_commit(tx);
1432         return (0);
1433 }
1434
1435 /* ARGSUSED */
1436 static int
1437 restore_free(struct restorearg *ra, objset_t *os,
1438     struct drr_free *drrf)
1439 {
1440         int err;
1441
1442         if (drrf->drr_length != -1ULL &&
1443             drrf->drr_offset + drrf->drr_length < drrf->drr_offset)
1444                 return (SET_ERROR(EINVAL));
1445
1446         if (dmu_object_info(os, drrf->drr_object, NULL) != 0)
1447                 return (SET_ERROR(EINVAL));
1448
1449         err = dmu_free_long_range(os, drrf->drr_object,
1450             drrf->drr_offset, drrf->drr_length);
1451         return (err);
1452 }
1453
1454 /* used to destroy the drc_ds on error */
1455 static void
1456 dmu_recv_cleanup_ds(dmu_recv_cookie_t *drc)
1457 {
1458         char name[MAXNAMELEN];
1459         dsl_dataset_name(drc->drc_ds, name);
1460         dsl_dataset_disown(drc->drc_ds, dmu_recv_tag);
1461         (void) dsl_destroy_head(name);
1462 }
1463
1464 /*
1465  * NB: callers *must* call dmu_recv_end() if this succeeds.
1466  */
1467 int
1468 dmu_recv_stream(dmu_recv_cookie_t *drc, struct file *fp, offset_t *voffp,
1469     int cleanup_fd, uint64_t *action_handlep)
1470 {
1471         struct restorearg ra = { 0 };
1472         dmu_replay_record_t *drr;
1473         objset_t *os;
1474         zio_cksum_t pcksum;
1475         int featureflags;
1476
1477         ra.byteswap = drc->drc_byteswap;
1478         ra.cksum = drc->drc_cksum;
1479         ra.td = curthread;
1480         ra.fp = fp;
1481         ra.voff = *voffp;
1482         ra.bufsize = 1<<20;
1483         ra.buf = kmem_alloc(ra.bufsize, KM_SLEEP);
1484
1485         /* these were verified in dmu_recv_begin */
1486         ASSERT3U(DMU_GET_STREAM_HDRTYPE(drc->drc_drrb->drr_versioninfo), ==,
1487             DMU_SUBSTREAM);
1488         ASSERT3U(drc->drc_drrb->drr_type, <, DMU_OST_NUMTYPES);
1489
1490         /*
1491          * Open the objset we are modifying.
1492          */
1493         VERIFY0(dmu_objset_from_ds(drc->drc_ds, &os));
1494
1495         ASSERT(drc->drc_ds->ds_phys->ds_flags & DS_FLAG_INCONSISTENT);
1496
1497         featureflags = DMU_GET_FEATUREFLAGS(drc->drc_drrb->drr_versioninfo);
1498
1499         /* if this stream is dedup'ed, set up the avl tree for guid mapping */
1500         if (featureflags & DMU_BACKUP_FEATURE_DEDUP) {
1501                 minor_t minor;
1502
1503                 if (cleanup_fd == -1) {
1504                         ra.err = SET_ERROR(EBADF);
1505                         goto out;
1506                 }
1507                 ra.err = zfs_onexit_fd_hold(cleanup_fd, &minor);
1508                 if (ra.err != 0) {
1509                         cleanup_fd = -1;
1510                         goto out;
1511                 }
1512
1513                 if (*action_handlep == 0) {
1514                         ra.guid_to_ds_map =
1515                             kmem_alloc(sizeof (avl_tree_t), KM_SLEEP);
1516                         avl_create(ra.guid_to_ds_map, guid_compare,
1517                             sizeof (guid_map_entry_t),
1518                             offsetof(guid_map_entry_t, avlnode));
1519                         ra.err = zfs_onexit_add_cb(minor,
1520                             free_guid_map_onexit, ra.guid_to_ds_map,
1521                             action_handlep);
1522                         if (ra.err != 0)
1523                                 goto out;
1524                 } else {
1525                         ra.err = zfs_onexit_cb_data(minor, *action_handlep,
1526                             (void **)&ra.guid_to_ds_map);
1527                         if (ra.err != 0)
1528                                 goto out;
1529                 }
1530
1531                 drc->drc_guid_to_ds_map = ra.guid_to_ds_map;
1532         }
1533
1534         /*
1535          * Read records and process them.
1536          */
1537         pcksum = ra.cksum;
1538         while (ra.err == 0 &&
1539             NULL != (drr = restore_read(&ra, sizeof (*drr)))) {
1540                 if (issig(JUSTLOOKING) && issig(FORREAL)) {
1541                         ra.err = SET_ERROR(EINTR);
1542                         goto out;
1543                 }
1544
1545                 if (ra.byteswap)
1546                         backup_byteswap(drr);
1547
1548                 switch (drr->drr_type) {
1549                 case DRR_OBJECT:
1550                 {
1551                         /*
1552                          * We need to make a copy of the record header,
1553                          * because restore_{object,write} may need to
1554                          * restore_read(), which will invalidate drr.
1555                          */
1556                         struct drr_object drro = drr->drr_u.drr_object;
1557                         ra.err = restore_object(&ra, os, &drro);
1558                         break;
1559                 }
1560                 case DRR_FREEOBJECTS:
1561                 {
1562                         struct drr_freeobjects drrfo =
1563                             drr->drr_u.drr_freeobjects;
1564                         ra.err = restore_freeobjects(&ra, os, &drrfo);
1565                         break;
1566                 }
1567                 case DRR_WRITE:
1568                 {
1569                         struct drr_write drrw = drr->drr_u.drr_write;
1570                         ra.err = restore_write(&ra, os, &drrw);
1571                         break;
1572                 }
1573                 case DRR_WRITE_BYREF:
1574                 {
1575                         struct drr_write_byref drrwbr =
1576                             drr->drr_u.drr_write_byref;
1577                         ra.err = restore_write_byref(&ra, os, &drrwbr);
1578                         break;
1579                 }
1580                 case DRR_FREE:
1581                 {
1582                         struct drr_free drrf = drr->drr_u.drr_free;
1583                         ra.err = restore_free(&ra, os, &drrf);
1584                         break;
1585                 }
1586                 case DRR_END:
1587                 {
1588                         struct drr_end drre = drr->drr_u.drr_end;
1589                         /*
1590                          * We compare against the *previous* checksum
1591                          * value, because the stored checksum is of
1592                          * everything before the DRR_END record.
1593                          */
1594                         if (!ZIO_CHECKSUM_EQUAL(drre.drr_checksum, pcksum))
1595                                 ra.err = SET_ERROR(ECKSUM);
1596                         goto out;
1597                 }
1598                 case DRR_SPILL:
1599                 {
1600                         struct drr_spill drrs = drr->drr_u.drr_spill;
1601                         ra.err = restore_spill(&ra, os, &drrs);
1602                         break;
1603                 }
1604                 default:
1605                         ra.err = SET_ERROR(EINVAL);
1606                         goto out;
1607                 }
1608                 pcksum = ra.cksum;
1609         }
1610         ASSERT(ra.err != 0);
1611
1612 out:
1613         if ((featureflags & DMU_BACKUP_FEATURE_DEDUP) && (cleanup_fd != -1))
1614                 zfs_onexit_fd_rele(cleanup_fd);
1615
1616         if (ra.err != 0) {
1617                 /*
1618                  * destroy what we created, so we don't leave it in the
1619                  * inconsistent restoring state.
1620                  */
1621                 dmu_recv_cleanup_ds(drc);
1622         }
1623
1624         kmem_free(ra.buf, ra.bufsize);
1625         *voffp = ra.voff;
1626         return (ra.err);
1627 }
1628
1629 static int
1630 dmu_recv_end_check(void *arg, dmu_tx_t *tx)
1631 {
1632         dmu_recv_cookie_t *drc = arg;
1633         dsl_pool_t *dp = dmu_tx_pool(tx);
1634         int error;
1635
1636         ASSERT3P(drc->drc_ds->ds_owner, ==, dmu_recv_tag);
1637
1638         if (!drc->drc_newfs) {
1639                 dsl_dataset_t *origin_head;
1640
1641                 error = dsl_dataset_hold(dp, drc->drc_tofs, FTAG, &origin_head);
1642                 if (error != 0)
1643                         return (error);
1644                 error = dsl_dataset_clone_swap_check_impl(drc->drc_ds,
1645                     origin_head, drc->drc_force, drc->drc_owner, tx);
1646                 if (error != 0) {
1647                         dsl_dataset_rele(origin_head, FTAG);
1648                         return (error);
1649                 }
1650                 error = dsl_dataset_snapshot_check_impl(origin_head,
1651                     drc->drc_tosnap, tx, B_TRUE);
1652                 dsl_dataset_rele(origin_head, FTAG);
1653                 if (error != 0)
1654                         return (error);
1655
1656                 error = dsl_destroy_head_check_impl(drc->drc_ds, 1);
1657         } else {
1658                 error = dsl_dataset_snapshot_check_impl(drc->drc_ds,
1659                     drc->drc_tosnap, tx, B_TRUE);
1660         }
1661         return (error);
1662 }
1663
1664 static void
1665 dmu_recv_end_sync(void *arg, dmu_tx_t *tx)
1666 {
1667         dmu_recv_cookie_t *drc = arg;
1668         dsl_pool_t *dp = dmu_tx_pool(tx);
1669
1670         spa_history_log_internal_ds(drc->drc_ds, "finish receiving",
1671             tx, "snap=%s", drc->drc_tosnap);
1672
1673         if (!drc->drc_newfs) {
1674                 dsl_dataset_t *origin_head;
1675
1676                 VERIFY0(dsl_dataset_hold(dp, drc->drc_tofs, FTAG,
1677                     &origin_head));
1678                 dsl_dataset_clone_swap_sync_impl(drc->drc_ds,
1679                     origin_head, tx);
1680                 dsl_dataset_snapshot_sync_impl(origin_head,
1681                     drc->drc_tosnap, tx);
1682
1683                 /* set snapshot's creation time and guid */
1684                 dmu_buf_will_dirty(origin_head->ds_prev->ds_dbuf, tx);
1685                 origin_head->ds_prev->ds_phys->ds_creation_time =
1686                     drc->drc_drrb->drr_creation_time;
1687                 origin_head->ds_prev->ds_phys->ds_guid =
1688                     drc->drc_drrb->drr_toguid;
1689                 origin_head->ds_prev->ds_phys->ds_flags &=
1690                     ~DS_FLAG_INCONSISTENT;
1691
1692                 dmu_buf_will_dirty(origin_head->ds_dbuf, tx);
1693                 origin_head->ds_phys->ds_flags &= ~DS_FLAG_INCONSISTENT;
1694
1695                 dsl_dataset_rele(origin_head, FTAG);
1696                 dsl_destroy_head_sync_impl(drc->drc_ds, tx);
1697
1698                 if (drc->drc_owner != NULL)
1699                         VERIFY3P(origin_head->ds_owner, ==, drc->drc_owner);
1700         } else {
1701                 dsl_dataset_t *ds = drc->drc_ds;
1702
1703                 dsl_dataset_snapshot_sync_impl(ds, drc->drc_tosnap, tx);
1704
1705                 /* set snapshot's creation time and guid */
1706                 dmu_buf_will_dirty(ds->ds_prev->ds_dbuf, tx);
1707                 ds->ds_prev->ds_phys->ds_creation_time =
1708                     drc->drc_drrb->drr_creation_time;
1709                 ds->ds_prev->ds_phys->ds_guid = drc->drc_drrb->drr_toguid;
1710                 ds->ds_prev->ds_phys->ds_flags &= ~DS_FLAG_INCONSISTENT;
1711
1712                 dmu_buf_will_dirty(ds->ds_dbuf, tx);
1713                 ds->ds_phys->ds_flags &= ~DS_FLAG_INCONSISTENT;
1714         }
1715         drc->drc_newsnapobj = drc->drc_ds->ds_phys->ds_prev_snap_obj;
1716         /*
1717          * Release the hold from dmu_recv_begin.  This must be done before
1718          * we return to open context, so that when we free the dataset's dnode,
1719          * we can evict its bonus buffer.
1720          */
1721         dsl_dataset_disown(drc->drc_ds, dmu_recv_tag);
1722         drc->drc_ds = NULL;
1723 }
1724
1725 static int
1726 add_ds_to_guidmap(const char *name, avl_tree_t *guid_map, uint64_t snapobj)
1727 {
1728         dsl_pool_t *dp;
1729         dsl_dataset_t *snapds;
1730         guid_map_entry_t *gmep;
1731         int err;
1732
1733         ASSERT(guid_map != NULL);
1734
1735         err = dsl_pool_hold(name, FTAG, &dp);
1736         if (err != 0)
1737                 return (err);
1738         gmep = kmem_alloc(sizeof (*gmep), KM_SLEEP);
1739         err = dsl_dataset_hold_obj(dp, snapobj, gmep, &snapds);
1740         if (err == 0) {
1741                 gmep->guid = snapds->ds_phys->ds_guid;
1742                 gmep->gme_ds = snapds;
1743                 avl_add(guid_map, gmep);
1744                 dsl_dataset_long_hold(snapds, gmep);
1745         } else
1746                 kmem_free(gmep, sizeof (*gmep));
1747
1748         dsl_pool_rele(dp, FTAG);
1749         return (err);
1750 }
1751
1752 static int dmu_recv_end_modified_blocks = 3;
1753
1754 static int
1755 dmu_recv_existing_end(dmu_recv_cookie_t *drc)
1756 {
1757         int error;
1758         char name[MAXNAMELEN];
1759
1760 #ifdef _KERNEL
1761         /*
1762          * We will be destroying the ds; make sure its origin is unmounted if
1763          * necessary.
1764          */
1765         dsl_dataset_name(drc->drc_ds, name);
1766         zfs_destroy_unmount_origin(name);
1767 #endif
1768
1769         error = dsl_sync_task(drc->drc_tofs,
1770             dmu_recv_end_check, dmu_recv_end_sync, drc,
1771             dmu_recv_end_modified_blocks);
1772
1773         if (error != 0)
1774                 dmu_recv_cleanup_ds(drc);
1775         return (error);
1776 }
1777
1778 static int
1779 dmu_recv_new_end(dmu_recv_cookie_t *drc)
1780 {
1781         int error;
1782
1783         error = dsl_sync_task(drc->drc_tofs,
1784             dmu_recv_end_check, dmu_recv_end_sync, drc,
1785             dmu_recv_end_modified_blocks);
1786
1787         if (error != 0) {
1788                 dmu_recv_cleanup_ds(drc);
1789         } else if (drc->drc_guid_to_ds_map != NULL) {
1790                 (void) add_ds_to_guidmap(drc->drc_tofs,
1791                     drc->drc_guid_to_ds_map,
1792                     drc->drc_newsnapobj);
1793         }
1794         return (error);
1795 }
1796
1797 int
1798 dmu_recv_end(dmu_recv_cookie_t *drc, void *owner)
1799 {
1800         drc->drc_owner = owner;
1801
1802         if (drc->drc_newfs)
1803                 return (dmu_recv_new_end(drc));
1804         else
1805                 return (dmu_recv_existing_end(drc));
1806 }
1807
1808 /*
1809  * Return TRUE if this objset is currently being received into.
1810  */
1811 boolean_t
1812 dmu_objset_is_receiving(objset_t *os)
1813 {
1814         return (os->os_dsl_dataset != NULL &&
1815             os->os_dsl_dataset->ds_owner == dmu_recv_tag);
1816 }