sys/contrib/openzfs/lib/libzfs/libzfs_diff.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 /*
  23  * Copyright (c) 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Copyright 2015 Nexenta Systems, Inc. All rights reserved.
  25  * Copyright (c) 2015, 2018 by Delphix. All rights reserved.
  26  * Copyright 2016 Joyent, Inc.
  27  * Copyright 2016 Igor Kozhukhov <ikozhukhov@gmail.com>
  28  */
  29
  30 /*
  31  * zfs diff support
  32  */
  33 #include <ctype.h>
  34 #include <errno.h>
  35 #include <libintl.h>
  36 #include <string.h>
  37 #include <sys/types.h>
  38 #include <sys/stat.h>
  39 #include <fcntl.h>
  40 #include <stddef.h>
  41 #include <unistd.h>
  42 #include <stdio.h>
  43 #include <stdlib.h>
  44 #include <stropts.h>
  45 #include <pthread.h>
  46 #include <sys/zfs_ioctl.h>
  47 #include <libzfs.h>
  48 #include "libzfs_impl.h"
  49
  50 #define ZDIFF_SNAPDIR           "/.zfs/snapshot/"
  51 #define ZDIFF_PREFIX            "zfs-diff-%d"
  52
  53 #define ZDIFF_ADDED     '+'
  54 #define ZDIFF_MODIFIED  "M"
  55 #define ZDIFF_REMOVED   '-'
  56 #define ZDIFF_RENAMED   "R"
  57
  58
  59 /*
  60  * Given a {dsname, object id}, get the object path
  61  */
  62 static int
  63 get_stats_for_obj(differ_info_t *di, const char *dsname, uint64_t obj,
  64     char *pn, int maxlen, zfs_stat_t *sb)
  65 {
  66         zfs_cmd_t zc = {"\0"};
  67         int error;
  68
  69         (void) strlcpy(zc.zc_name, dsname, sizeof (zc.zc_name));
  70         zc.zc_obj = obj;
  71
  72         errno = 0;
  73         error = zfs_ioctl(di->zhp->zfs_hdl, ZFS_IOC_OBJ_TO_STATS, &zc);
  74         di->zerr = errno;
  75
  76         /* we can get stats even if we failed to get a path */
  77         (void) memcpy(sb, &zc.zc_stat, sizeof (zfs_stat_t));
  78         if (error == 0) {
  79                 ASSERT(di->zerr == 0);
  80                 (void) strlcpy(pn, zc.zc_value, maxlen);
  81                 return (0);
  82         }
  83
  84         if (di->zerr == ESTALE) {
  85                 (void) snprintf(pn, maxlen, "(on_delete_queue)");
  86                 return (0);
  87         } else if (di->zerr == EPERM) {
  88                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
  89                     dgettext(TEXT_DOMAIN,
  90                     "The sys_config privilege or diff delegated permission "
  91                     "is needed\nto discover path names"));
  92                 return (-1);
  93         } else if (di->zerr == EACCES) {
  94                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
  95                     dgettext(TEXT_DOMAIN,
  96                     "Key must be loaded to discover path names"));
  97                 return (-1);
  98         } else {
  99                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
 100                     dgettext(TEXT_DOMAIN,
 101                     "Unable to determine path or stats for "
 102                     "object %lld in %s"), (longlong_t)obj, dsname);
 103                 return (-1);
 104         }
 105 }
 106
 107 /*
 108  * stream_bytes
 109  *
 110  * Prints a file name out a character at a time.  If the character is
 111  * not in the range of what we consider "printable" ASCII, display it
 112  * as an escaped 4-digit octal value.  ASCII values less than a space
 113  * are all control characters and we declare the upper end as the
 114  * DELete character.  This also is the last 7-bit ASCII character.
 115  * We choose to treat all 8-bit ASCII as not printable for this
 116  * application.
 117  */
 118 static void
 119 stream_bytes(FILE *fp, const char *string)
 120 {
 121         char c;
 122
 123         while ((c = *string++) != '\0') {
 124                 if (c > ' ' && c != '\\' && c < '\177') {
 125                         (void) fputc(c, fp);
 126                 } else {
 127                         (void) fprintf(fp, "\\%04hho", (uint8_t)c);
 128                 }
 129         }
 130 }
 131
 132 static char
 133 get_what(mode_t what)
 134 {
 135         switch (what & S_IFMT) {
 136         case S_IFBLK:
 137                 return ('B');
 138         case S_IFCHR:
 139                 return ('C');
 140         case S_IFDIR:
 141                 return ('/');
 142 #ifdef S_IFDOOR
 143         case S_IFDOOR:
 144                 return ('>');
 145 #endif
 146         case S_IFIFO:
 147                 return ('|');
 148         case S_IFLNK:
 149                 return ('@');
 150 #ifdef S_IFPORT
 151         case S_IFPORT:
 152                 return ('P');
 153 #endif
 154         case S_IFSOCK:
 155                 return ('=');
 156         case S_IFREG:
 157                 return ('F');
 158         default:
 159                 return ('?');
 160         }
 161 }
 162
 163 static void
 164 print_cmn(FILE *fp, differ_info_t *di, const char *file)
 165 {
 166         if (!di->no_mangle) {
 167                 stream_bytes(fp, di->dsmnt);
 168                 stream_bytes(fp, file);
 169         } else {
 170                 (void) fputs(di->dsmnt, fp);
 171                 (void) fputs(file, fp);
 172         }
 173 }
 174
 175 static void
 176 print_rename(FILE *fp, differ_info_t *di, const char *old, const char *new,
 177     zfs_stat_t *isb)
 178 {
 179         if (di->timestamped)
 180                 (void) fprintf(fp, "%10lld.%09lld\t",
 181                     (longlong_t)isb->zs_ctime[0],
 182                     (longlong_t)isb->zs_ctime[1]);
 183         (void) fputs(ZDIFF_RENAMED "\t", fp);
 184         if (di->classify)
 185                 (void) fprintf(fp, "%c\t", get_what(isb->zs_mode));
 186         print_cmn(fp, di, old);
 187         (void) fputs(di->scripted ? "\t" : " -> ", fp);
 188         print_cmn(fp, di, new);
 189         (void) fputc('\n', fp);
 190 }
 191
 192 static void
 193 print_link_change(FILE *fp, differ_info_t *di, int delta, const char *file,
 194     zfs_stat_t *isb)
 195 {
 196         if (di->timestamped)
 197                 (void) fprintf(fp, "%10lld.%09lld\t",
 198                     (longlong_t)isb->zs_ctime[0],
 199                     (longlong_t)isb->zs_ctime[1]);
 200         (void) fputs(ZDIFF_MODIFIED "\t", fp);
 201         if (di->classify)
 202                 (void) fprintf(fp, "%c\t", get_what(isb->zs_mode));
 203         print_cmn(fp, di, file);
 204         (void) fprintf(fp, "\t(%+d)\n", delta);
 205 }
 206
 207 static void
 208 print_file(FILE *fp, differ_info_t *di, char type, const char *file,
 209     zfs_stat_t *isb)
 210 {
 211         if (di->timestamped)
 212                 (void) fprintf(fp, "%10lld.%09lld\t",
 213                     (longlong_t)isb->zs_ctime[0],
 214                     (longlong_t)isb->zs_ctime[1]);
 215         (void) fprintf(fp, "%c\t", type);
 216         if (di->classify)
 217                 (void) fprintf(fp, "%c\t", get_what(isb->zs_mode));
 218         print_cmn(fp, di, file);
 219         (void) fputc('\n', fp);
 220 }
 221
 222 static int
 223 write_inuse_diffs_one(FILE *fp, differ_info_t *di, uint64_t dobj)
 224 {
 225         struct zfs_stat fsb, tsb;
 226         mode_t fmode, tmode;
 227         char fobjname[MAXPATHLEN], tobjname[MAXPATHLEN];
 228         boolean_t already_logged = B_FALSE;
 229         int fobjerr, tobjerr;
 230         int change;
 231
 232         if (dobj == di->shares)
 233                 return (0);
 234
 235         /*
 236          * Check the from and to snapshots for info on the object. If
 237          * we get ENOENT, then the object just didn't exist in that
 238          * snapshot.  If we get ENOTSUP, then we tried to get
 239          * info on a non-ZPL object, which we don't care about anyway.
 240          * For any other error we print a warning which includes the
 241          * errno and continue.
 242          */
 243
 244         fobjerr = get_stats_for_obj(di, di->fromsnap, dobj, fobjname,
 245             MAXPATHLEN, &fsb);
 246         if (fobjerr && di->zerr != ENOTSUP && di->zerr != ENOENT) {
 247                 zfs_error_aux(di->zhp->zfs_hdl, "%s", strerror(di->zerr));
 248                 zfs_error(di->zhp->zfs_hdl, di->zerr, di->errbuf);
 249                 /*
 250                  * Let's not print an error for the same object more than
 251                  * once if it happens in both snapshots
 252                  */
 253                 already_logged = B_TRUE;
 254         }
 255
 256         tobjerr = get_stats_for_obj(di, di->tosnap, dobj, tobjname,
 257             MAXPATHLEN, &tsb);
 258
 259         if (tobjerr && di->zerr != ENOTSUP && di->zerr != ENOENT) {
 260                 if (!already_logged) {
 261                         zfs_error_aux(di->zhp->zfs_hdl,
 262                             "%s", strerror(di->zerr));
 263                         zfs_error(di->zhp->zfs_hdl, di->zerr, di->errbuf);
 264                 }
 265         }
 266         /*
 267          * Unallocated object sharing the same meta dnode block
 268          */
 269         if (fobjerr && tobjerr) {
 270                 di->zerr = 0;
 271                 return (0);
 272         }
 273
 274         di->zerr = 0; /* negate get_stats_for_obj() from side that failed */
 275         fmode = fsb.zs_mode & S_IFMT;
 276         tmode = tsb.zs_mode & S_IFMT;
 277         if (fmode == S_IFDIR || tmode == S_IFDIR || fsb.zs_links == 0 ||
 278             tsb.zs_links == 0)
 279                 change = 0;
 280         else
 281                 change = tsb.zs_links - fsb.zs_links;
 282
 283         if (fobjerr) {
 284                 if (change) {
 285                         print_link_change(fp, di, change, tobjname, &tsb);
 286                         return (0);
 287                 }
 288                 print_file(fp, di, ZDIFF_ADDED, tobjname, &tsb);
 289                 return (0);
 290         } else if (tobjerr) {
 291                 if (change) {
 292                         print_link_change(fp, di, change, fobjname, &fsb);
 293                         return (0);
 294                 }
 295                 print_file(fp, di, ZDIFF_REMOVED, fobjname, &fsb);
 296                 return (0);
 297         }
 298
 299         if (fmode != tmode && fsb.zs_gen == tsb.zs_gen)
 300                 tsb.zs_gen++;   /* Force a generational difference */
 301
 302         /* Simple modification or no change */
 303         if (fsb.zs_gen == tsb.zs_gen) {
 304                 /* No apparent changes.  Could we assert !this?  */
 305                 if (fsb.zs_ctime[0] == tsb.zs_ctime[0] &&
 306                     fsb.zs_ctime[1] == tsb.zs_ctime[1])
 307                         return (0);
 308                 if (change) {
 309                         print_link_change(fp, di, change,
 310                             change > 0 ? fobjname : tobjname, &tsb);
 311                 } else if (strcmp(fobjname, tobjname) == 0) {
 312                         print_file(fp, di, *ZDIFF_MODIFIED, fobjname, &tsb);
 313                 } else {
 314                         print_rename(fp, di, fobjname, tobjname, &tsb);
 315                 }
 316                 return (0);
 317         } else {
 318                 /* file re-created or object re-used */
 319                 print_file(fp, di, ZDIFF_REMOVED, fobjname, &fsb);
 320                 print_file(fp, di, ZDIFF_ADDED, tobjname, &tsb);
 321                 return (0);
 322         }
 323 }
 324
 325 static int
 326 write_inuse_diffs(FILE *fp, differ_info_t *di, dmu_diff_record_t *dr)
 327 {
 328         uint64_t o;
 329         int err;
 330
 331         for (o = dr->ddr_first; o <= dr->ddr_last; o++) {
 332                 if ((err = write_inuse_diffs_one(fp, di, o)) != 0)
 333                         return (err);
 334         }
 335         return (0);
 336 }
 337
 338 static int
 339 describe_free(FILE *fp, differ_info_t *di, uint64_t object, char *namebuf,
 340     int maxlen)
 341 {
 342         struct zfs_stat sb;
 343
 344         (void) get_stats_for_obj(di, di->fromsnap, object, namebuf,
 345             maxlen, &sb);
 346
 347         /* Don't print if in the delete queue on from side */
 348         if (di->zerr == ESTALE || di->zerr == ENOENT) {
 349                 di->zerr = 0;
 350                 return (0);
 351         }
 352
 353         print_file(fp, di, ZDIFF_REMOVED, namebuf, &sb);
 354         return (0);
 355 }
 356
 357 static int
 358 write_free_diffs(FILE *fp, differ_info_t *di, dmu_diff_record_t *dr)
 359 {
 360         zfs_cmd_t zc = {"\0"};
 361         libzfs_handle_t *lhdl = di->zhp->zfs_hdl;
 362         char fobjname[MAXPATHLEN];
 363
 364         (void) strlcpy(zc.zc_name, di->fromsnap, sizeof (zc.zc_name));
 365         zc.zc_obj = dr->ddr_first - 1;
 366
 367         ASSERT(di->zerr == 0);
 368
 369         while (zc.zc_obj < dr->ddr_last) {
 370                 int err;
 371
 372                 err = zfs_ioctl(lhdl, ZFS_IOC_NEXT_OBJ, &zc);
 373                 if (err == 0) {
 374                         if (zc.zc_obj == di->shares) {
 375                                 zc.zc_obj++;
 376                                 continue;
 377                         }
 378                         if (zc.zc_obj > dr->ddr_last) {
 379                                 break;
 380                         }
 381                         err = describe_free(fp, di, zc.zc_obj, fobjname,
 382                             MAXPATHLEN);
 383                 } else if (errno == ESRCH) {
 384                         break;
 385                 } else {
 386                         (void) snprintf(di->errbuf, sizeof (di->errbuf),
 387                             dgettext(TEXT_DOMAIN,
 388                             "next allocated object (> %lld) find failure"),
 389                             (longlong_t)zc.zc_obj);
 390                         di->zerr = errno;
 391                         break;
 392                 }
 393         }
 394         if (di->zerr)
 395                 return (-1);
 396         return (0);
 397 }
 398
 399 static void *
 400 differ(void *arg)
 401 {
 402         differ_info_t *di = arg;
 403         dmu_diff_record_t dr;
 404         FILE *ofp;
 405         int err = 0;
 406
 407         if ((ofp = fdopen(di->outputfd, "w")) == NULL) {
 408                 di->zerr = errno;
 409                 strlcpy(di->errbuf, strerror(errno), sizeof (di->errbuf));
 410                 (void) close(di->datafd);
 411                 return ((void *)-1);
 412         }
 413
 414         for (;;) {
 415                 char *cp = (char *)&dr;
 416                 int len = sizeof (dr);
 417                 int rv;
 418
 419                 do {
 420                         rv = read(di->datafd, cp, len);
 421                         cp += rv;
 422                         len -= rv;
 423                 } while (len > 0 && rv > 0);
 424
 425                 if (rv < 0 || (rv == 0 && len != sizeof (dr))) {
 426                         di->zerr = EPIPE;
 427                         break;
 428                 } else if (rv == 0) {
 429                         /* end of file at a natural breaking point */
 430                         break;
 431                 }
 432
 433                 switch (dr.ddr_type) {
 434                 case DDR_FREE:
 435                         err = write_free_diffs(ofp, di, &dr);
 436                         break;
 437                 case DDR_INUSE:
 438                         err = write_inuse_diffs(ofp, di, &dr);
 439                         break;
 440                 default:
 441                         di->zerr = EPIPE;
 442                         break;
 443                 }
 444
 445                 if (err || di->zerr)
 446                         break;
 447         }
 448
 449         (void) fclose(ofp);
 450         (void) close(di->datafd);
 451         if (err)
 452                 return ((void *)-1);
 453         if (di->zerr) {
 454                 ASSERT(di->zerr == EPIPE);
 455                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
 456                     dgettext(TEXT_DOMAIN,
 457                     "Internal error: bad data from diff IOCTL"));
 458                 return ((void *)-1);
 459         }
 460         return ((void *)0);
 461 }
 462
 463 static int
 464 make_temp_snapshot(differ_info_t *di)
 465 {
 466         libzfs_handle_t *hdl = di->zhp->zfs_hdl;
 467         zfs_cmd_t zc = {"\0"};
 468
 469         (void) snprintf(zc.zc_value, sizeof (zc.zc_value),
 470             ZDIFF_PREFIX, getpid());
 471         (void) strlcpy(zc.zc_name, di->ds, sizeof (zc.zc_name));
 472         zc.zc_cleanup_fd = di->cleanupfd;
 473
 474         if (zfs_ioctl(hdl, ZFS_IOC_TMP_SNAPSHOT, &zc) != 0) {
 475                 int err = errno;
 476                 if (err == EPERM) {
 477                         (void) snprintf(di->errbuf, sizeof (di->errbuf),
 478                             dgettext(TEXT_DOMAIN, "The diff delegated "
 479                             "permission is needed in order\nto create a "
 480                             "just-in-time snapshot for diffing\n"));
 481                         return (zfs_error(hdl, EZFS_DIFF, di->errbuf));
 482                 } else {
 483                         (void) snprintf(di->errbuf, sizeof (di->errbuf),
 484                             dgettext(TEXT_DOMAIN, "Cannot create just-in-time "
 485                             "snapshot of '%s'"), zc.zc_name);
 486                         return (zfs_standard_error(hdl, err, di->errbuf));
 487                 }
 488         }
 489
 490         di->tmpsnap = zfs_strdup(hdl, zc.zc_value);
 491         di->tosnap = zfs_asprintf(hdl, "%s@%s", di->ds, di->tmpsnap);
 492         return (0);
 493 }
 494
 495 static void
 496 teardown_differ_info(differ_info_t *di)
 497 {
 498         free(di->ds);
 499         free(di->dsmnt);
 500         free(di->fromsnap);
 501         free(di->frommnt);
 502         free(di->tosnap);
 503         free(di->tmpsnap);
 504         free(di->tomnt);
 505         (void) close(di->cleanupfd);
 506 }
 507
 508 static int
 509 get_snapshot_names(differ_info_t *di, const char *fromsnap,
 510     const char *tosnap)
 511 {
 512         libzfs_handle_t *hdl = di->zhp->zfs_hdl;
 513         char *atptrf = NULL;
 514         char *atptrt = NULL;
 515         int fdslen, fsnlen;
 516         int tdslen, tsnlen;
 517
 518         /*
 519          * Can accept
 520          *                                      fdslen fsnlen tdslen tsnlen
 521          *       dataset@snap1
 522          *    0. dataset@snap1 dataset@snap2      >0     >1     >0     >1
 523          *    1. dataset@snap1 @snap2             >0     >1    ==0     >1
 524          *    2. dataset@snap1 dataset            >0     >1     >0    ==0
 525          *    3. @snap1 dataset@snap2            ==0     >1     >0     >1
 526          *    4. @snap1 dataset                  ==0     >1     >0    ==0
 527          */
 528         if (tosnap == NULL) {
 529                 /* only a from snapshot given, must be valid */
 530                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
 531                     dgettext(TEXT_DOMAIN,
 532                     "Badly formed snapshot name %s"), fromsnap);
 533
 534                 if (!zfs_validate_name(hdl, fromsnap, ZFS_TYPE_SNAPSHOT,
 535                     B_FALSE)) {
 536                         return (zfs_error(hdl, EZFS_INVALIDNAME,
 537                             di->errbuf));
 538                 }
 539
 540                 atptrf = strchr(fromsnap, '@');
 541                 ASSERT(atptrf != NULL);
 542                 fdslen = atptrf - fromsnap;
 543
 544                 di->fromsnap = zfs_strdup(hdl, fromsnap);
 545                 di->ds = zfs_strdup(hdl, fromsnap);
 546                 di->ds[fdslen] = '\0';
 547
 548                 /* the to snap will be a just-in-time snap of the head */
 549                 return (make_temp_snapshot(di));
 550         }
 551
 552         (void) snprintf(di->errbuf, sizeof (di->errbuf),
 553             dgettext(TEXT_DOMAIN,
 554             "Unable to determine which snapshots to compare"));
 555
 556         atptrf = strchr(fromsnap, '@');
 557         atptrt = strchr(tosnap, '@');
 558         fdslen = atptrf ? atptrf - fromsnap : strlen(fromsnap);
 559         tdslen = atptrt ? atptrt - tosnap : strlen(tosnap);
 560         fsnlen = strlen(fromsnap) - fdslen;     /* includes @ sign */
 561         tsnlen = strlen(tosnap) - tdslen;       /* includes @ sign */
 562
 563         if (fsnlen <= 1 || tsnlen == 1 || (fdslen == 0 && tdslen == 0)) {
 564                 return (zfs_error(hdl, EZFS_INVALIDNAME, di->errbuf));
 565         } else if ((fdslen > 0 && tdslen > 0) &&
 566             ((tdslen != fdslen || strncmp(fromsnap, tosnap, fdslen) != 0))) {
 567                 /*
 568                  * not the same dataset name, might be okay if
 569                  * tosnap is a clone of a fromsnap descendant.
 570                  */
 571                 char origin[ZFS_MAX_DATASET_NAME_LEN];
 572                 zprop_source_t src;
 573                 zfs_handle_t *zhp;
 574
 575                 di->ds = zfs_alloc(di->zhp->zfs_hdl, tdslen + 1);
 576                 (void) strncpy(di->ds, tosnap, tdslen);
 577                 di->ds[tdslen] = '\0';
 578
 579                 zhp = zfs_open(hdl, di->ds, ZFS_TYPE_FILESYSTEM);
 580                 while (zhp != NULL) {
 581                         if (zfs_prop_get(zhp, ZFS_PROP_ORIGIN, origin,
 582                             sizeof (origin), &src, NULL, 0, B_FALSE) != 0) {
 583                                 (void) zfs_close(zhp);
 584                                 zhp = NULL;
 585                                 break;
 586                         }
 587                         if (strncmp(origin, fromsnap, fsnlen) == 0)
 588                                 break;
 589
 590                         (void) zfs_close(zhp);
 591                         zhp = zfs_open(hdl, origin, ZFS_TYPE_FILESYSTEM);
 592                 }
 593
 594                 if (zhp == NULL) {
 595                         (void) snprintf(di->errbuf, sizeof (di->errbuf),
 596                             dgettext(TEXT_DOMAIN,
 597                             "Not an earlier snapshot from the same fs"));
 598                         return (zfs_error(hdl, EZFS_INVALIDNAME, di->errbuf));
 599                 } else {
 600                         (void) zfs_close(zhp);
 601                 }
 602
 603                 di->isclone = B_TRUE;
 604                 di->fromsnap = zfs_strdup(hdl, fromsnap);
 605                 if (tsnlen) {
 606                         di->tosnap = zfs_strdup(hdl, tosnap);
 607                 } else {
 608                         return (make_temp_snapshot(di));
 609                 }
 610         } else {
 611                 int dslen = fdslen ? fdslen : tdslen;
 612
 613                 di->ds = zfs_alloc(hdl, dslen + 1);
 614                 (void) strncpy(di->ds, fdslen ? fromsnap : tosnap, dslen);
 615                 di->ds[dslen] = '\0';
 616
 617                 di->fromsnap = zfs_asprintf(hdl, "%s%s", di->ds, atptrf);
 618                 if (tsnlen) {
 619                         di->tosnap = zfs_asprintf(hdl, "%s%s", di->ds, atptrt);
 620                 } else {
 621                         return (make_temp_snapshot(di));
 622                 }
 623         }
 624         return (0);
 625 }
 626
 627 static int
 628 get_mountpoint(differ_info_t *di, char *dsnm, char **mntpt)
 629 {
 630         boolean_t mounted;
 631
 632         mounted = is_mounted(di->zhp->zfs_hdl, dsnm, mntpt);
 633         if (mounted == B_FALSE) {
 634                 (void) snprintf(di->errbuf, sizeof (di->errbuf),
 635                     dgettext(TEXT_DOMAIN,
 636                     "Cannot diff an unmounted snapshot"));
 637                 return (zfs_error(di->zhp->zfs_hdl, EZFS_BADTYPE, di->errbuf));
 638         }
 639
 640         /* Avoid a double slash at the beginning of root-mounted datasets */
 641         if (**mntpt == '/' && *(*mntpt + 1) == '\0')
 642                 **mntpt = '\0';
 643         return (0);
 644 }
 645
 646 static int
 647 get_mountpoints(differ_info_t *di)
 648 {
 649         char *strptr;
 650         char *frommntpt;
 651
 652         /*
 653          * first get the mountpoint for the parent dataset
 654          */
 655         if (get_mountpoint(di, di->ds, &di->dsmnt) != 0)
 656                 return (-1);
 657
 658         strptr = strchr(di->tosnap, '@');
 659         ASSERT3P(strptr, !=, NULL);
 660         di->tomnt = zfs_asprintf(di->zhp->zfs_hdl, "%s%s%s", di->dsmnt,
 661             ZDIFF_SNAPDIR, ++strptr);
 662
 663         strptr = strchr(di->fromsnap, '@');
 664         ASSERT3P(strptr, !=, NULL);
 665
 666         frommntpt = di->dsmnt;
 667         if (di->isclone) {
 668                 char *mntpt;
 669                 int err;
 670
 671                 *strptr = '\0';
 672                 err = get_mountpoint(di, di->fromsnap, &mntpt);
 673                 *strptr = '@';
 674                 if (err != 0)
 675                         return (-1);
 676                 frommntpt = mntpt;
 677         }
 678
 679         di->frommnt = zfs_asprintf(di->zhp->zfs_hdl, "%s%s%s", frommntpt,
 680             ZDIFF_SNAPDIR, ++strptr);
 681
 682         if (di->isclone)
 683                 free(frommntpt);
 684
 685         return (0);
 686 }
 687
 688 static int
 689 setup_differ_info(zfs_handle_t *zhp, const char *fromsnap,
 690     const char *tosnap, differ_info_t *di)
 691 {
 692         di->zhp = zhp;
 693
 694         di->cleanupfd = open(ZFS_DEV, O_RDWR | O_CLOEXEC);
 695         VERIFY(di->cleanupfd >= 0);
 696
 697         if (get_snapshot_names(di, fromsnap, tosnap) != 0)
 698                 return (-1);
 699
 700         if (get_mountpoints(di) != 0)
 701                 return (-1);
 702
 703         if (find_shares_object(di) != 0)
 704                 return (-1);
 705
 706         return (0);
 707 }
 708
 709 int
 710 zfs_show_diffs(zfs_handle_t *zhp, int outfd, const char *fromsnap,
 711     const char *tosnap, int flags)
 712 {
 713         zfs_cmd_t zc = {"\0"};
 714         char errbuf[1024];
 715         differ_info_t di = { 0 };
 716         pthread_t tid;
 717         int pipefd[2];
 718         int iocerr;
 719
 720         (void) snprintf(errbuf, sizeof (errbuf),
 721             dgettext(TEXT_DOMAIN, "zfs diff failed"));
 722
 723         if (setup_differ_info(zhp, fromsnap, tosnap, &di)) {
 724                 teardown_differ_info(&di);
 725                 return (-1);
 726         }
 727
 728         if (pipe2(pipefd, O_CLOEXEC)) {
 729                 zfs_error_aux(zhp->zfs_hdl, "%s", strerror(errno));
 730                 teardown_differ_info(&di);
 731                 return (zfs_error(zhp->zfs_hdl, EZFS_PIPEFAILED, errbuf));
 732         }
 733
 734         di.scripted = (flags & ZFS_DIFF_PARSEABLE);
 735         di.classify = (flags & ZFS_DIFF_CLASSIFY);
 736         di.timestamped = (flags & ZFS_DIFF_TIMESTAMP);
 737         di.no_mangle = (flags & ZFS_DIFF_NO_MANGLE);
 738
 739         di.outputfd = outfd;
 740         di.datafd = pipefd[0];
 741
 742         if (pthread_create(&tid, NULL, differ, &di)) {
 743                 zfs_error_aux(zhp->zfs_hdl, "%s", strerror(errno));
 744                 (void) close(pipefd[0]);
 745                 (void) close(pipefd[1]);
 746                 teardown_differ_info(&di);
 747                 return (zfs_error(zhp->zfs_hdl,
 748                     EZFS_THREADCREATEFAILED, errbuf));
 749         }
 750
 751         /* do the ioctl() */
 752         (void) strlcpy(zc.zc_value, di.fromsnap, strlen(di.fromsnap) + 1);
 753         (void) strlcpy(zc.zc_name, di.tosnap, strlen(di.tosnap) + 1);
 754         zc.zc_cookie = pipefd[1];
 755
 756         iocerr = zfs_ioctl(zhp->zfs_hdl, ZFS_IOC_DIFF, &zc);
 757         if (iocerr != 0) {
 758                 (void) snprintf(errbuf, sizeof (errbuf),
 759                     dgettext(TEXT_DOMAIN, "Unable to obtain diffs"));
 760                 if (errno == EPERM) {
 761                         zfs_error_aux(zhp->zfs_hdl, dgettext(TEXT_DOMAIN,
 762                             "\n   The sys_mount privilege or diff delegated "
 763                             "permission is needed\n   to execute the "
 764                             "diff ioctl"));
 765                 } else if (errno == EXDEV) {
 766                         zfs_error_aux(zhp->zfs_hdl, dgettext(TEXT_DOMAIN,
 767                             "\n   Not an earlier snapshot from the same fs"));
 768                 } else if (errno != EPIPE || di.zerr == 0) {
 769                         zfs_error_aux(zhp->zfs_hdl, "%s", strerror(errno));
 770                 }
 771                 (void) close(pipefd[1]);
 772                 (void) pthread_cancel(tid);
 773                 (void) pthread_join(tid, NULL);
 774                 teardown_differ_info(&di);
 775                 if (di.zerr != 0 && di.zerr != EPIPE) {
 776                         zfs_error_aux(zhp->zfs_hdl, "%s", strerror(di.zerr));
 777                         return (zfs_error(zhp->zfs_hdl, EZFS_DIFF, di.errbuf));
 778                 } else {
 779                         return (zfs_error(zhp->zfs_hdl, EZFS_DIFFDATA, errbuf));
 780                 }
 781         }
 782
 783         (void) close(pipefd[1]);
 784         (void) pthread_join(tid, NULL);
 785
 786         if (di.zerr != 0) {
 787                 zfs_error_aux(zhp->zfs_hdl, "%s", strerror(di.zerr));
 788                 return (zfs_error(zhp->zfs_hdl, EZFS_DIFF, di.errbuf));
 789         }
 790         teardown_differ_info(&di);
 791         return (0);
 792 }