lustre/utils/lsnapshot.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License version 2 for more details.  A copy is
  14  * included in the COPYING file that accompanied this code.
  15
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2017, Intel Corporation.
  24  *
  25  * lustre/utils/lsnapshot.c
  26  *
  27  * Author: Fan, Yong <fan.yong@intel.com>
  28  */
  29
  30 #include <stdio.h>
  31 #include <string.h>
  32 #include <getopt.h>
  33 #include <unistd.h>
  34 #include <stdlib.h>
  35 #include <errno.h>
  36 #include <string.h>
  37 #include <sys/types.h>
  38 #include <sys/wait.h>
  39 #include <sys/time.h>
  40 #include <sys/file.h>
  41 #include <time.h>
  42 #include <limits.h>
  43 #include <ctype.h>
  44
  45 #include <libcfs/util/list.h>
  46 #include <libcfs/util/ioctl.h>
  47 #include <linux/lustre/lustre_ioctl.h>
  48 #include <linux/lustre/lustre_barrier_user.h>
  49
  50 #include "obdctl.h"
  51
  52 #define SNAPSHOT_CONF_DIR       "/etc/lsnapshot"
  53 #define LDEV_CONF               "/etc/ldev.conf"
  54 #define SNAPSHOT_LOG            "/var/log/lsnapshot.log"
  55 #define SNAPSHOT_MAGIC          "0x14F711B9"
  56 #define MAX_BUF_SIZE            4096
  57
  58 enum snapshot_role {
  59         SR_MGS  = 0x0001,
  60         SR_MDT  = 0x0002,
  61         SR_OST  = 0x0004,
  62 };
  63
  64 struct snapshot_target {
  65         struct list_head         st_list;
  66         /* Target node name. */
  67         char                    *st_host;
  68         /* Where the pool is */
  69         char                    *st_dir;
  70         /* The target pool name on the target node. */
  71         char                    *st_pool;
  72         /* The backend filesystem name against the target pool. */
  73         char                    *st_filesystem;
  74         int                      st_role;
  75         unsigned int             st_index;
  76         unsigned int             st_gen;
  77         int                      st_line;
  78         int                      st_status;
  79         pid_t                    st_pid;
  80         bool                     st_ignored;
  81 };
  82
  83 struct snapshot_instance {
  84         struct list_head         si_mdts_list;
  85         struct list_head         si_osts_list;
  86         struct snapshot_target  *si_mgs;
  87         struct snapshot_target  *si_mdt0;
  88         FILE                    *si_log_fp;
  89         char                    *si_rsh;
  90         char                    *si_fsname;
  91         char                    *si_ssname;
  92         char                    *si_new_ssname;
  93         char                    *si_comment;
  94         int                      si_conf_fd;
  95         int                      si_timeout;
  96         bool                     si_barrier;
  97         bool                     si_detail;
  98         bool                     si_force;
  99 };
 100
 101 static const char snapshot_rsh_default[] = "ssh";
 102 static char snapshot_path[MAX_BUF_SIZE];
 103
 104 static char *snapshot_role2name(char *name, enum snapshot_role role,
 105                                 __u32 index)
 106 {
 107         if (role & SR_MDT)
 108                 snprintf(name, 8, "MDT%04x", index);
 109         else if (role & SR_MGS)
 110                 snprintf(name, 4, "MGS");
 111         else
 112                 snprintf(name, 8, "OST%04x", index);
 113
 114         return name;
 115 }
 116
 117 #define SNAPSHOT_ADD_LOG(si, format, ...)                               \
 118 do {                                                                    \
 119         char buf[MAX_BUF_SIZE];                                         \
 120         char *ptr;                                                      \
 121         time_t tt;                                                      \
 122                                                                         \
 123         memset(buf, 0, sizeof(buf));                                    \
 124         time(&tt);                                                      \
 125         snprintf(buf, sizeof(buf) - 1, "%s", ctime(&tt));               \
 126         ptr = strrchr(buf, '\n');                                       \
 127         if (ptr)                                                        \
 128                 *ptr = '\0';                                            \
 129                                                                         \
 130         fprintf(si->si_log_fp, "%s (%d:%s:%d:%s:%s): "format, buf,      \
 131                 getpid(), __func__, __LINE__, si->si_fsname,            \
 132                 si->si_rsh, ## __VA_ARGS__);                            \
 133 } while (0)
 134
 135 #define DRSH "%s %s"
 136 #define DFSNAME "%s/%s"
 137 #define DSSNAME "%s/%s@%s"
 138 #define DZFS "%s zfs"
 139 #define DIMPORT "%s zpool import -d %s %s > /dev/null 2>&1"
 140
 141 #define PRSH(si, st) (si)->si_rsh, (st)->st_host
 142 #define PFSNAME(st) (st)->st_pool, (st)->st_filesystem
 143 #define PSSNAME(si, st) PFSNAME(st), (si)->si_ssname
 144 #define PSS_NEW(si, st) PFSNAME(st), (si)->si_new_ssname
 145 #define PZFS(st) snapshot_path
 146 #define PIMPORT(st) snapshot_path, \
 147                 (st)->st_dir ? (st)->st_dir : "/dev -d /tmp", (st)->st_pool
 148
 149 char *snapshot_fgets(FILE *fp, char *buf, int buflen)
 150 {
 151         char *ptr;
 152
 153         memset(buf, 0, buflen);
 154         if (fgets(buf, buflen, fp) == NULL)
 155                 return NULL;
 156
 157         ptr = strchr(buf, '\n');
 158         if (ptr)
 159                 *ptr = '\0';
 160
 161         return buf;
 162 }
 163
 164 static int snapshot_exec(const char *cmd)
 165 {
 166         int rc;
 167
 168         errno = 0;
 169
 170         /* system() return value depends on both the system() general framework,
 171          * such as whether fork()/exec() success or fail, and the real @cmd exec
 172          * result. Especially, if the @cmd is remote command, we may cannot know
 173          * the real failure. */
 174         rc = system(cmd);
 175         /* fork()/exec() error */
 176         if (rc == -1)
 177                 return errno != 0 ? -errno : -1;
 178
 179         if (WIFEXITED(rc)) {
 180                 rc = WEXITSTATUS(rc);
 181                 if (rc > 0)
 182                         rc = -rc;
 183         } else if (WIFSIGNALED(rc)) {
 184                 rc = -EINTR;
 185         } else {
 186                 /* all other known or unknown cases. */
 187                 rc = -EFAULT;
 188         }
 189
 190         return rc;
 191 }
 192
 193 static int snapshot_load_conf_ldev(struct snapshot_instance *si, char *buf,
 194                                    struct snapshot_target *st, char **role)
 195 {
 196         char *label = NULL;
 197         char *device = NULL;
 198         char *ignore = NULL;
 199         char *ptr;
 200         char *ptr1;
 201         int len;
 202         int rc;
 203
 204         rc = sscanf(buf, "%ms %ms %ms %ms",
 205                     &st->st_host, &ignore, &label, &device);
 206         if (rc < 4) {
 207                 rc = -EINVAL;
 208                 goto out;
 209         }
 210
 211         free(ignore);
 212
 213         /* Format of device:
 214          * [md|zfs:][pool_dir/]<pool>/<filesystem> */
 215         ptr = strchr(device, ':');
 216         if (ptr) {
 217                 ptr++;
 218                 if (strncmp(device, "zfs:", strlen("zfs:")) != 0) {
 219                         rc = -EINVAL;
 220                         goto out;
 221                 }
 222         } else {
 223                         ptr = device;
 224         }
 225
 226         ptr1 = strrchr(ptr, '/');
 227         /* "ptr1 - ptr + 1 == strlen(ptr)" means '/' is at the tail. */
 228         if (!ptr1 || ptr1 == ptr || ptr1 - ptr + 1 == strlen(ptr)) {
 229                 rc = -EINVAL;
 230                 goto out;
 231         }
 232
 233         len = strlen(ptr1);
 234         st->st_filesystem = malloc(len);
 235         if (!st->st_filesystem) {
 236                 rc = -ENOMEM;
 237                 goto out;
 238         }
 239
 240         *ptr1 = '\0';
 241         strncpy(st->st_filesystem, ptr1 + 1, len - 1);
 242         st->st_filesystem[len - 1] = '\0';
 243
 244         if (*ptr == '/') {
 245                 ptr1 = strrchr(ptr, '/');
 246                 *ptr1 = '\0';
 247                 st->st_dir = strdup(ptr);
 248                 if (!st->st_dir) {
 249                         rc = -ENOMEM;
 250                         goto out;
 251                 }
 252                 ptr = ptr1 + 1;
 253         }
 254
 255         st->st_pool = strdup(ptr);
 256         if (!st->st_pool) {
 257                 rc = -ENOMEM;
 258                 goto out;
 259         }
 260
 261         /* Format of label:
 262          * fsname-<role><index> or <role><index> */
 263         ptr = strrchr(label, '-');
 264         if (ptr) {
 265                 if (strncmp(si->si_fsname, label, ptr - label) != 0) {
 266                         /* This line is NOT for current filesystem .*/
 267                         rc = -EAGAIN;
 268                         goto out;
 269                 }
 270
 271                 ptr++;
 272         } else {
 273                 ptr = label;
 274         }
 275
 276         if (strlen(ptr) < 3 || strlen(ptr) > 7) {
 277                 rc = -EINVAL;
 278                 goto out;
 279         }
 280
 281         *role = malloc(4);
 282         if (!*role) {
 283                 rc = -ENOMEM;
 284                 goto out;
 285         }
 286
 287         strncpy(*role, ptr, 3);
 288         (*role)[3] = 0;
 289         ptr += 3;
 290         len = 0;
 291         while (isxdigit(ptr[len])) {
 292                 if (isdigit(ptr[len]))
 293                         st->st_index =
 294                                 st->st_index * 16 + ptr[len] - '0';
 295                 else if (isupper(ptr[len]))
 296                         st->st_index =
 297                                 st->st_index * 16 + ptr[len] - 'A' + 10;
 298                 else
 299                         st->st_index =
 300                                 st->st_index * 16 + ptr[len] - 'a' + 10;
 301                 len++;
 302         }
 303
 304         if (len == 0) {
 305                 if (strncasecmp(*role, "MGS", 3) != 0)
 306                         rc = -EINVAL;
 307                 else
 308                         rc = 0;
 309
 310                 goto out;
 311         }
 312
 313         if (!isxdigit(ptr[len]) && ptr[len] != '\0') {
 314                 rc = -EINVAL;
 315                 goto out;
 316         }
 317
 318 out:
 319         if (label)
 320                 free(label);
 321         if (device)
 322                 free(device);
 323
 324         return rc;
 325 }
 326
 327 /**
 328  * For old snasphot tools, the configration is in /etc/lsnapshot/${fsname}.conf,
 329  * the format is:
 330  * <host> <pool_dir> <pool> <local_fsname> <role(,s)> <index>
 331  *
 332  * For example:
 333  *
 334  * host-mdt1 /tmp myfs-mdt1 mdt1 MGS,MDT 0
 335  * host-mdt2 /tmp myfs-mdt2 mdt2 MDT 1
 336  * host-ost1 /tmp myfs-ost1 ost1 OST 0
 337  * host-ost2 /tmp myfs-ost2 ost2 OST 1
 338  *
 339  *
 340  * For new snasphot tools, the configration is in /etc/ldev.conf, which is not
 341  * only for snapshot, but also for other purpose. The format is:
 342  * <host> foreign/- <label> <device> [journal-path]/- [raidtab]
 343  *
 344  * The format of <label> is:
 345  * fsname-<role><index> or <role><index>
 346  *
 347  * The format of <device> is:
 348  * [md|zfs:][pool_dir/]<pool>/<filesystem>
 349  *
 350  * Snapshot only uses the fields <host>, <label> and <device>.
 351  *
 352  * For example:
 353  *
 354  * host-mdt1 - myfs-MDT0000 zfs:/tmp/myfs-mdt1/mdt1
 355  *
 356  *
 357  * \retval       0      for success
 358  * \retval      +ve     the line# with which the current line is conflict
 359  * \retval      -EAGAIN skip current line
 360  * \retval      -ve     other failures
 361  */
 362 static int snapshot_load_conf_one(struct snapshot_instance *si,
 363                                   char *buf, int line_num, bool is_ldev)
 364 {
 365         struct snapshot_target *st;
 366         char *role = NULL;
 367         char *path;
 368         int rc = 0;
 369
 370         path = getenv("PATH");
 371         if (!path)
 372                 return -EINVAL;
 373
 374         memset(snapshot_path, 0, sizeof(snapshot_path));
 375         snprintf(snapshot_path, sizeof(snapshot_path) - 1, "PATH='%s'", path);
 376
 377         /* filter out space */
 378         while (isspace(*buf))
 379                 buf++;
 380
 381         /* skip empty line */
 382         if (*buf == '\0')
 383                 return 0;
 384
 385         /* skip comment line */
 386         if (*buf == '#')
 387                 return 0;
 388
 389         st = malloc(sizeof(*st));
 390         if (!st)
 391                 return -ENOMEM;
 392
 393         memset(st, 0, sizeof(*st));
 394         INIT_LIST_HEAD(&st->st_list);
 395
 396         if (is_ldev) {
 397                 rc = snapshot_load_conf_ldev(si, buf, st, &role);
 398         } else {
 399                 rc = sscanf(buf, "%ms %ms %ms %ms %ms %d",
 400                             &st->st_host, &st->st_dir, &st->st_pool,
 401                             &st->st_filesystem, &role, &st->st_index);
 402                 if (rc < 6)
 403                         rc = -EINVAL;
 404         }
 405
 406         if (rc < 0)
 407                 goto out;
 408         rc = 0;
 409
 410         if (strncasecmp(role, "MGS", 3) == 0) {
 411                 st->st_role = SR_MGS;
 412                 if (role[3] == ',') {
 413                         /* MGS,MDT */
 414                         if (strncasecmp(&role[4], "MDT", 3) != 0) {
 415                                 rc = -EINVAL;
 416                                 goto out;
 417                         }
 418
 419                         st->st_role |= SR_MDT;
 420                 }
 421         } else if (strncasecmp(role, "MDT", 3) == 0) {
 422                 st->st_role = SR_MDT;
 423                 if (role[3] == ',') {
 424                         /* MDT,MGS */
 425                         if (strncasecmp(&role[4], "MGS", 3) != 0) {
 426                                 rc = -EINVAL;
 427                                 goto out;
 428                         }
 429
 430                         st->st_role |= SR_MGS;
 431                 }
 432         } else if (strncasecmp(role, "OST", 3) == 0) {
 433                 st->st_role = SR_OST;
 434         } else {
 435                 rc = -EINVAL;
 436                 goto out;
 437         }
 438
 439         st->st_line = line_num;
 440         if (st->st_role & SR_MDT) {
 441                 /* MGS is the first, MDT0 is just after the MGS
 442                  * if they are not combined together. */
 443                 if (st->st_role & SR_MGS) {
 444                         if (si->si_mgs) {
 445                                 rc = si->si_mgs->st_line;
 446                                 goto out;
 447                         }
 448
 449                         si->si_mgs = st;
 450                         list_add(&st->st_list, &si->si_mdts_list);
 451                 }
 452
 453                 if (st->st_index == 0) {
 454                         if (si->si_mdt0) {
 455                                 rc = si->si_mdt0->st_line;
 456                                 goto out;
 457                         }
 458
 459                         si->si_mdt0 = st;
 460                         if (list_empty(&st->st_list)) {
 461                                 if (list_empty(&si->si_mdts_list) ||
 462                                     !si->si_mgs)
 463                                         list_add(&st->st_list,
 464                                                  &si->si_mdts_list);
 465                                 else
 466                                         list_add(&st->st_list,
 467                                                  &si->si_mgs->st_list);
 468                         }
 469                 } else if (list_empty(&st->st_list)) {
 470                         list_add_tail(&st->st_list, &si->si_mdts_list);
 471                 }
 472         } else if (st->st_role & SR_MGS) {
 473                 if (si->si_mgs) {
 474                         rc = si->si_mgs->st_line;
 475                         goto out;
 476                 }
 477
 478                 si->si_mgs = st;
 479                 list_add(&st->st_list, &si->si_mdts_list);
 480         } else {
 481                 list_add_tail(&st->st_list, &si->si_osts_list);
 482         }
 483
 484 out:
 485         if (role)
 486                 free(role);
 487
 488         if (rc) {
 489                 if (st->st_host)
 490                         free(st->st_host);
 491                 if (st->st_dir)
 492                         free(st->st_dir);
 493                 if (st->st_pool)
 494                         free(st->st_pool);
 495                 if (st->st_filesystem)
 496                         free(st->st_filesystem);
 497                 free(st);
 498         }
 499
 500         return rc;
 501 }
 502
 503 static int snapshot_load_conf(struct snapshot_instance *si, int lock_mode)
 504 {
 505         FILE *fp;
 506         char buf[MAX_BUF_SIZE];
 507         char conf_name[32];
 508         int line_num = 1;
 509         int fd = -1;
 510         int rc = 0;
 511         bool is_ldev = true;
 512
 513         memset(conf_name, 0, sizeof(conf_name));
 514         strncpy(conf_name, LDEV_CONF, sizeof(conf_name) - 1);
 515         fd = open(conf_name, O_RDONLY);
 516         if (fd < 0) {
 517                 if (errno != ENOENT) {
 518                         fprintf(stderr,
 519                                 "Can't open the snapshot config file %s: %s\n",
 520                                 conf_name, strerror(errno));
 521
 522                         return fd;
 523                 }
 524
 525                 snprintf(conf_name, sizeof(conf_name) - 1, "%s/%s.conf",
 526                          SNAPSHOT_CONF_DIR, si->si_fsname);
 527                 fd = open(conf_name, O_RDONLY);
 528                 if (fd < 0) {
 529                         fprintf(stderr,
 530                                 "Can't open the snapshot config file %s: %s\n",
 531                                 conf_name, strerror(errno));
 532
 533                         return fd;
 534                 }
 535
 536                 is_ldev = false;
 537         }
 538
 539         rc = flock(fd, lock_mode | LOCK_NB);
 540         if (rc < 0) {
 541                 fprintf(stderr,
 542                         "Can't lock the snapshot config file %s (%d): %s\n",
 543                         conf_name, lock_mode, strerror(errno));
 544                 close(fd);
 545                 return rc;
 546         }
 547
 548         fp = fdopen(fd, "r");
 549         if (!fp) {
 550                 fprintf(stderr,
 551                         "Can't fdopen the snapshot config file %s: %s\n",
 552                         conf_name, strerror(errno));
 553                 rc = -1;
 554                 goto out;
 555         }
 556
 557         while (snapshot_fgets(fp, buf, MAX_BUF_SIZE) != NULL) {
 558                 rc = snapshot_load_conf_one(si, buf, line_num, is_ldev);
 559                 if (rc == -EINVAL) {
 560                         fprintf(stderr,
 561                                 "Invalid snapshot config file %s at the line "
 562                                 "%d '%s'\n", conf_name, line_num, buf);
 563                 } else if (rc == -EAGAIN) {
 564                         rc = 0;
 565                 } else if (rc > 0) {
 566                         fprintf(stderr,
 567                                 "The config role has been specified repeatedly "
 568                                 "at the lines %d/%d in %s\n",
 569                                 rc, line_num, conf_name);
 570                         rc = -EINVAL;
 571                 }
 572
 573                 if (rc)
 574                         goto out;
 575
 576                 line_num++;
 577         }
 578
 579         if (!si->si_mdt0) {
 580                 fprintf(stderr,
 581                         "Miss MDT0 in the config file %s\n",
 582                         conf_name);
 583                 rc = -1;
 584                 goto out;
 585         }
 586
 587         /* By default, the MGS is on the MDT0 if it is not specified. */
 588         if (!si->si_mgs) {
 589                 si->si_mgs = si->si_mdt0;
 590                 si->si_mgs->st_role |= SR_MGS;
 591         }
 592
 593         if (list_empty(&si->si_osts_list)) {
 594                 fprintf(stderr,
 595                         "Miss OST(s) in the config file %s\n",
 596                         conf_name);
 597                 rc = -1;
 598                 goto out;
 599         }
 600
 601 out:
 602         if (fd >= 0) {
 603                 if (rc < 0) {
 604                         flock(fd, LOCK_UN);
 605                         close(fd);
 606                 } else {
 607                         si->si_conf_fd = fd;
 608                 }
 609         }
 610
 611         return rc;
 612 }
 613
 614 static void snapshot_unload_conf(struct snapshot_instance *si)
 615 {
 616         struct snapshot_target *st;
 617
 618         while (!list_empty(&si->si_mdts_list)) {
 619                 st = list_entry(si->si_mdts_list.next,
 620                                 struct snapshot_target, st_list);
 621                 list_del(&st->st_list);
 622                 free(st->st_host);
 623                 free(st->st_dir);
 624                 free(st->st_pool);
 625                 free(st->st_filesystem);
 626                 free(st);
 627         }
 628
 629         while (!list_empty(&si->si_osts_list)) {
 630                 st = list_entry(si->si_osts_list.next,
 631                                 struct snapshot_target, st_list);
 632                 list_del(&st->st_list);
 633                 free(st->st_host);
 634                 free(st->st_dir);
 635                 free(st->st_pool);
 636                 free(st->st_filesystem);
 637                 free(st);
 638         }
 639
 640         si->si_mgs = NULL;
 641         si->si_mdt0 = NULL;
 642
 643         if (si->si_conf_fd >= 0) {
 644                 flock(si->si_conf_fd, LOCK_UN);
 645                 close(si->si_conf_fd);
 646                 si->si_conf_fd = -1;
 647         }
 648 }
 649
 650 static int snapshot_handle_string_option(char **dst, const char *option,
 651                                          const char *opt_name)
 652 {
 653         if (*dst && *dst != snapshot_rsh_default) {
 654                 fprintf(stderr,
 655                         "%s option has been specified repeatedly.\n", opt_name);
 656                 return -EINVAL;
 657         }
 658
 659         *dst = strdup(option);
 660         if (!*dst)
 661                 return -ENOMEM;
 662         return 0;
 663 }
 664
 665 static void snapshot_fini(struct snapshot_instance *si)
 666 {
 667         snapshot_unload_conf(si);
 668
 669         if (si->si_log_fp)
 670                 fclose(si->si_log_fp);
 671
 672         if (si->si_rsh && si->si_rsh != snapshot_rsh_default)
 673                 free(si->si_rsh);
 674         if (si->si_fsname)
 675                 free(si->si_fsname);
 676         if (si->si_ssname)
 677                 free(si->si_ssname);
 678         if (si->si_new_ssname)
 679                 free(si->si_new_ssname);
 680         if (si->si_comment)
 681                 free(si->si_comment);
 682
 683         free(si);
 684 }
 685
 686 static struct snapshot_instance *
 687 snapshot_init(int argc, char * const argv[], const struct option *longopts,
 688               const char *optstring, void (*usage)(void),
 689               int lock_mode, int *err)
 690 {
 691         struct snapshot_instance *si;
 692         int idx;
 693         int opt;
 694
 695         *err = 0;
 696         si = malloc(sizeof(*si));
 697         if (!si) {
 698                 fprintf(stderr,
 699                         "No enough memory to initialize snapshot instance.\n");
 700                 *err = -ENOMEM;
 701                 return NULL;
 702         }
 703
 704         memset(si, 0, sizeof(*si));
 705         INIT_LIST_HEAD(&si->si_mdts_list);
 706         INIT_LIST_HEAD(&si->si_osts_list);
 707         si->si_rsh = (char *)snapshot_rsh_default;
 708         si->si_conf_fd = -1;
 709         si->si_timeout = BARRIER_TIMEOUT_DEFAULT;
 710         si->si_barrier = true;
 711         si->si_detail = false;
 712         si->si_force = false;
 713
 714         while ((opt = getopt_long(argc, argv, optstring,
 715                                   longopts, &idx)) != EOF) {
 716                 switch (opt) {
 717                 case 'b':
 718                         if (!optarg || strcmp(optarg, "on") == 0) {
 719                                 si->si_barrier = true;
 720                         } else if (strcmp(optarg, "off") == 0) {
 721                                 si->si_barrier = false;
 722                         } else {
 723                                 usage();
 724                                 *err = -EINVAL;
 725                                 goto out;
 726                         }
 727                         break;
 728                 case 'c':
 729                         *err = snapshot_handle_string_option(&si->si_comment,
 730                                                              optarg, "comment");
 731                         if (*err != 0)
 732                                 goto out;
 733                         break;
 734                 case 'd':
 735                         si->si_detail = true;
 736                         break;
 737                 case 'f':
 738                         si->si_force = true;
 739                         break;
 740                 case 'F':
 741                         *err = snapshot_handle_string_option(&si->si_fsname,
 742                                                              optarg, "fsname");
 743                         if (*err != 0)
 744                                 goto out;
 745                         break;
 746                 case 'n':
 747                         *err = snapshot_handle_string_option(&si->si_ssname,
 748                                                              optarg, "ssname");
 749                         if (*err != 0)
 750                                 goto out;
 751                         break;
 752                 case 'N':
 753                         *err = snapshot_handle_string_option(&si->si_new_ssname,
 754                                                              optarg,
 755                                                              "new ssname");
 756                         if (*err != 0)
 757                                 goto out;
 758                         break;
 759                 case 'r':
 760                         *err = snapshot_handle_string_option(&si->si_rsh,
 761                                                              optarg,
 762                                                              "remote shell");
 763                         if (*err != 0)
 764                                 goto out;
 765                         break;
 766                 case 't':
 767                         si->si_timeout = atoi(optarg);
 768                         break;
 769                 default:
 770                         *err = -EINVAL;
 771                         usage();
 772                         goto out;
 773                 case 'h':
 774                         usage();
 775                         snapshot_fini(si);
 776                         *err = 0;
 777                         return NULL;
 778                 }
 779         }
 780
 781         if (!si->si_fsname) {
 782                 fprintf(stderr, "The fsname must be specified\n");
 783                 usage();
 784                 *err = -EINVAL;
 785                 goto out;
 786         }
 787
 788         if (strlen(si->si_fsname) > 8) {
 789                 fprintf(stderr, "Invalid fsname %s\n", si->si_fsname);
 790                 *err = -EINVAL;
 791                 goto out;
 792         }
 793
 794         si->si_log_fp = fopen(SNAPSHOT_LOG, "a");
 795         if (!si->si_log_fp) {
 796                 *err = -errno;
 797                 fprintf(stderr,
 798                         "Can't open the snapshot log file %s: %s\n",
 799                         SNAPSHOT_LOG, strerror(errno));
 800                 goto out;
 801         }
 802
 803         *err = snapshot_load_conf(si, lock_mode);
 804
 805 out:
 806         if (*err != 0 && si) {
 807                 snapshot_fini(si);
 808                 si = NULL;
 809         }
 810
 811         return si;
 812 }
 813
 814 static int __snapshot_wait(struct snapshot_instance *si,
 815                            struct list_head *head, int *err)
 816 {
 817         struct snapshot_target *st;
 818         int count = 0;
 819         int rc = 0;
 820
 821         list_for_each_entry(st, head, st_list) {
 822                 if (st->st_pid == 0)
 823                         continue;
 824
 825                 rc = waitpid(st->st_pid, &st->st_status, 0);
 826                 if (rc < 0) {
 827                         SNAPSHOT_ADD_LOG(si, "Can't wait child (%d) operation "
 828                                          "on the target <%s:%x:%d>: %s\n",
 829                                          st->st_pid, st->st_host, st->st_role,
 830                                          st->st_index, strerror(errno));
 831                         count++;
 832                         if (*err == 0)
 833                                 *err = rc;
 834
 835                         st->st_pid = 0;
 836                         /* continue to wait for next */
 837                         continue;
 838                 }
 839
 840                 if (WIFEXITED(st->st_status)) {
 841                         rc = WEXITSTATUS(st->st_status);
 842                         if (rc > 0)
 843                                 rc -= 256;
 844
 845                         if (rc == -ESRCH) {
 846                                 st->st_ignored = true;
 847                         } else if (rc) {
 848                                 count++;
 849                                 if (*err == 0)
 850                                         *err = rc;
 851                         }
 852                 } else if (WIFSIGNALED(st->st_status)) {
 853                         SNAPSHOT_ADD_LOG(si, "The child (%d) operation on the "
 854                                          "target <%s:%x:%d> was killed by "
 855                                          "signal %d\n",
 856                                          st->st_pid, st->st_host, st->st_role,
 857                                          st->st_index, WTERMSIG(st->st_status));
 858                         count++;
 859                         if (*err == 0)
 860                                 *err = -EINTR;
 861                 } else {
 862                         SNAPSHOT_ADD_LOG(si, "The child (%d) operation on the "
 863                                          "target <%s:%x:%d> failed for "
 864                                          "unknown reason\n",
 865                                          st->st_pid, st->st_host, st->st_role,
 866                                          st->st_index);
 867                         count++;
 868                         if (*err == 0)
 869                                 *err = -EFAULT;
 870                 }
 871
 872                 st->st_pid = 0;
 873         }
 874
 875         return count;
 876 }
 877
 878 static int snapshot_wait(struct snapshot_instance *si, int *err)
 879 {
 880         int count;
 881
 882         count = __snapshot_wait(si, &si->si_mdts_list, err);
 883         count += __snapshot_wait(si, &si->si_osts_list, err);
 884
 885         return count;
 886 }
 887
 888 static char *snapshot_first_skip_blank(char *buf)
 889 {
 890         char *ptr;
 891
 892         ptr = strchr(buf, ' ');
 893         if (!ptr) {
 894                 ptr = strchr(buf, '\t');
 895                 if (!ptr)
 896                         return NULL;
 897         }
 898
 899         while (*ptr == ' ' || *ptr == '\t')
 900                 ptr++;
 901
 902         if (*ptr == '\0')
 903                 ptr = NULL;
 904
 905         return ptr;
 906 }
 907
 908 static int mdt0_is_lustre_snapshot(struct snapshot_instance *si)
 909 {
 910         struct snapshot_target *st = si->si_mdt0;
 911         char buf[MAX_BUF_SIZE * 3];
 912         FILE *fp;
 913         int rc;
 914
 915         memset(buf, 0, sizeof(buf));
 916         snprintf(buf, sizeof(buf) - 1,
 917                  DRSH" '"DIMPORT"; "DZFS
 918                  " get -H -o value lustre:magic "DSSNAME"'",
 919                  PRSH(si, st), PIMPORT(st), PZFS(st), PSSNAME(si, st));
 920         fp = popen(buf, "r");
 921         if (!fp) {
 922                 SNAPSHOT_ADD_LOG(si, "Popen fail to check snapshot "
 923                                  "on mdt0: %s\n", strerror(errno));
 924                 return -errno;
 925         }
 926
 927         if (snapshot_fgets(fp, buf, strlen(SNAPSHOT_MAGIC) + 1) == NULL) {
 928                 rc = -EINVAL;
 929         } else if (strcmp(buf, SNAPSHOT_MAGIC) == 0) {
 930                 rc = 0;
 931         } else {
 932                 fprintf(stderr,
 933                         "The target %s is not Lustre snapshot "
 934                         "or it does not exists\n", si->si_ssname);
 935                 rc = -EPERM;
 936         }
 937
 938         pclose(fp);
 939         return rc;
 940 }
 941
 942 static int target_is_mounted(struct snapshot_instance *si,
 943                              struct snapshot_target *st, const char *ssname)
 944 {
 945         char buf[MAX_BUF_SIZE];
 946         char fullname[MAX_BUF_SIZE];
 947         FILE *fp;
 948         char *ptr;
 949         int rc = 0;
 950
 951         memset(buf, 0, sizeof(buf));
 952         snprintf(buf, sizeof(buf) - 1,
 953                  DRSH" 'mount'",
 954                  PRSH(si, st));
 955         fp = popen(buf, "r");
 956         if (!fp) {
 957                 SNAPSHOT_ADD_LOG(si, "Popen fail to check target mount: %s\n",
 958                                  strerror(errno));
 959                 return -errno;
 960         }
 961
 962         memset(fullname, 0, sizeof(fullname));
 963         if (ssname)
 964                 snprintf(fullname, sizeof(fullname) - 1,
 965                          DFSNAME"@%s on ",
 966                          PFSNAME(st), ssname);
 967         else
 968                 snprintf(fullname, sizeof(fullname) - 1,
 969                          DFSNAME" on ",
 970                          PFSNAME(st));
 971
 972         while (snapshot_fgets(fp, buf, sizeof(buf)) != NULL) {
 973                 ptr = strstr(buf, fullname);
 974                 if (!ptr)
 975                         continue;
 976
 977                 ptr += strlen(fullname) + 1; /* mount point */
 978                 if (ptr >= buf + strlen(buf))
 979                         continue;
 980
 981                 ptr = strstr(ptr, "type lustre");
 982                 if (ptr) {
 983                         rc = 1;
 984                         break;
 985                 }
 986         }
 987
 988         pclose(fp);
 989         return rc;
 990 }
 991
 992 static int snapshot_get_fsname(struct snapshot_instance *si,
 993                                char *fsname, int fslen)
 994 {
 995         struct snapshot_target *st = si->si_mdt0;
 996         char buf[MAX_BUF_SIZE * 3];
 997         FILE *fp;
 998         int rc = 0;
 999
1000         memset(buf, 0, sizeof(buf));
1001         snprintf(buf, sizeof(buf) - 1,
1002                  DRSH" '"DIMPORT"; "DZFS
1003                  " get -H -o value lustre:fsname "DSSNAME"'",
1004                  PRSH(si, st), PIMPORT(st), PZFS(st), PSSNAME(si, st));
1005         fp = popen(buf, "r");
1006         if (!fp) {
1007                 SNAPSHOT_ADD_LOG(si, "Popen fail to get fsname: %s\n",
1008                                  strerror(errno));
1009                 return -errno;
1010         }
1011
1012         if (snapshot_fgets(fp, fsname, fslen) == NULL)
1013                 rc = -EINVAL;
1014
1015         pclose(fp);
1016         return rc;
1017 }
1018
1019 static int snapshot_get_mgsnode(struct snapshot_instance *si,
1020                                 char *node, int size)
1021 {
1022         char buf[MAX_BUF_SIZE * 2];
1023         struct snapshot_target *st;
1024         FILE *fp;
1025         int rc = 0;
1026
1027         st = list_entry(si->si_osts_list.next, struct snapshot_target,
1028                         st_list);
1029         memset(buf, 0, sizeof(buf));
1030         snprintf(buf, sizeof(buf) - 1,
1031                  DRSH" '"DZFS" get -H -o value lustre:mgsnode "DFSNAME"'",
1032                  PRSH(si, st), PZFS(st), PFSNAME(st));
1033         fp = popen(buf, "r");
1034         if (!fp) {
1035                 SNAPSHOT_ADD_LOG(si, "Popen fail to get mgsnode: %s\n",
1036                                  strerror(errno));
1037                 return -errno;
1038         }
1039
1040         if (snapshot_fgets(fp, node, size) == NULL)
1041                 rc = -EINVAL;
1042
1043         pclose(fp);
1044         return rc;
1045 }
1046
1047 static int snapshot_exists_check(struct snapshot_instance *si,
1048                                  struct snapshot_target *st)
1049 {
1050         char buf[MAX_BUF_SIZE * 2];
1051         FILE *fp;
1052         int rc = 0;
1053
1054         memset(buf, 0, sizeof(buf));
1055         snprintf(buf, sizeof(buf) - 1,
1056                  DRSH" '"DZFS" list "DSSNAME" 2>/dev/null'",
1057                  PRSH(si, st), PZFS(st), PSSNAME(si, st));
1058         fp = popen(buf, "r");
1059         if (!fp) {
1060                 SNAPSHOT_ADD_LOG(si, "Popen fail to create check: %s\n",
1061                                  strerror(errno));
1062                 return -errno;
1063         }
1064
1065         if (snapshot_fgets(fp, buf, sizeof(buf)) != NULL)
1066                 rc = -EEXIST;
1067
1068         pclose(fp);
1069         return rc;
1070 }
1071
1072 static int snapshot_general_check(struct snapshot_instance *si)
1073 {
1074         return mdt0_is_lustre_snapshot(si);
1075 }
1076
1077 static void snapshot_create_usage(void)
1078 {
1079         fprintf(stderr,
1080                 "Create snapshot for the given filesystem.\n"
1081                 "Usage:\n"
1082                 "snapshot_create [-b | --barrier [on | off]] "
1083                                 "[-c | --comment comment] "
1084                                 "<-F | --fsname fsname> "
1085                                 "[-h | --help] <-n | --name ssname> "
1086                                 "[-r | --rsh remote_shell]"
1087                                 "[-t | --timeout timeout]\n"
1088                 "Options:\n"
1089                 "-b: set write barrier before creating snapshot, "
1090                         "the default value is 'on'.\n"
1091                 "-c: describe what the snapshot is for, and so on.\n"
1092                 "-F: the filesystem name.\n"
1093                 "-h: for help information.\n"
1094                 "-n: the snapshot's name.\n"
1095                 "-r: the remote shell used for communication with remote "
1096                         "target, the default value is 'ssh'.\n"
1097                 "-t: the life cycle (seconds) for write barrier, "
1098                         "the default value is %d seconds.\n",
1099                 BARRIER_TIMEOUT_DEFAULT);
1100 }
1101
1102 static int snapshot_create_check(struct snapshot_instance *si)
1103 {
1104         int rc;
1105
1106         rc = snapshot_exists_check(si, si->si_mdt0);
1107         if (rc == -EEXIST)
1108                 fprintf(stderr, "The snapshot %s exists\n", si->si_ssname);
1109
1110         return rc;
1111 }
1112
1113 static int snapshot_inherit_prop(struct snapshot_instance *si,
1114                                  struct snapshot_target *st,
1115                                  char *cmd, int size)
1116 {
1117         char buf[MAX_BUF_SIZE * 3];
1118         FILE *fp;
1119         int len = 0;
1120         int rc = 0;
1121
1122         memset(buf, 0, sizeof(buf));
1123         snprintf(buf, sizeof(buf) - 1,
1124                  DRSH" \""DIMPORT"; "DZFS
1125                  " get all "DFSNAME" | grep lustre: | grep local$ | "
1126                  "awk '{ \\$1=\\\"\\\"; \\$NF=\\\"\\\"; print \\$0 }' | "
1127                  "sed -e 's/^ //'\"",
1128                  PRSH(si, st), PIMPORT(st), PZFS(st), PFSNAME(st));
1129         fp = popen(buf, "r");
1130         if (!fp) {
1131                 SNAPSHOT_ADD_LOG(si, "Popen fail to list one: %s\n",
1132                                  strerror(errno));
1133                 return -errno;
1134         }
1135
1136         while (snapshot_fgets(fp, buf, MAX_BUF_SIZE) != NULL) {
1137                 char *ptr;
1138                 char *end;
1139
1140                 if (strncmp(buf, "lustre:fsname",
1141                             strlen("lustre:fsname")) == 0)
1142                         continue;
1143
1144                 if (strncmp(buf, "lustre:magic",
1145                             strlen("lustre:magic")) == 0)
1146                         continue;
1147
1148                 if (strncmp(buf, "lustre:ctime",
1149                             strlen("lustre:ctime")) == 0)
1150                         continue;
1151
1152                 if (strncmp(buf, "lustre:mtime",
1153                             strlen("lustre:mtime")) == 0)
1154                         continue;
1155
1156                 if (strncmp(buf, "lustre:comment",
1157                             strlen("lustre:comment")) == 0)
1158                         continue;
1159
1160                 if (strncmp(buf, "lustre:svname",
1161                             strlen("lustre:svname")) == 0)
1162                         continue;
1163
1164                 if (strncmp(buf, "lustre:mgsnode",
1165                             strlen("lustre:mgsnode")) == 0)
1166                         continue;
1167
1168                 ptr = strchr(buf, ' ');
1169                 if (!ptr) {
1170                         ptr = strchr(buf, '\t');
1171                         if (!ptr)
1172                                 continue;
1173                 }
1174
1175                 *ptr = '\0';
1176                 ptr++;
1177                 while (*ptr == ' ' || *ptr == '\t')
1178                         ptr++;
1179
1180                 if (*ptr == '\0')
1181                         continue;
1182
1183                 end = strchr(ptr, ' ');
1184                 if (!end)
1185                         end = strchr(buf, '\t');
1186                 if (end)
1187                         *end = '\0';
1188
1189                 rc = snprintf(cmd + len, size - len - 1,
1190                               "-o %s=\"%s\" ", buf, ptr);
1191                 if (rc <= 0)
1192                         return -EOVERFLOW;
1193
1194                 len += rc;
1195         }
1196
1197         pclose(fp);
1198         return len;
1199 }
1200
1201 static int __snapshot_create(struct snapshot_instance *si,
1202                              struct list_head *head, const char *fsname,
1203                              const char *mgsnode, __u64 xtime)
1204 {
1205         struct snapshot_target *st;
1206         pid_t pid;
1207         int rc;
1208
1209         list_for_each_entry(st, head, st_list) {
1210                 st->st_status = 0;
1211                 st->st_ignored = 0;
1212                 st->st_pid = 0;
1213
1214                 pid = fork();
1215                 if (pid < 0) {
1216                         SNAPSHOT_ADD_LOG(si, "Can't fork for create snapshot "
1217                                          "(%s@%s <%s>) on the target "
1218                                          "(%s:%x:%d): %s\n",
1219                                          fsname, si->si_ssname,
1220                                          si->si_comment, st->st_host,
1221                                          st->st_role, st->st_index,
1222                                          strerror(errno));
1223                         return pid;
1224                 }
1225
1226                 /* child */
1227                 if (pid == 0) {
1228                         char cmd[MAX_BUF_SIZE];
1229                         int len;
1230
1231                         memset(cmd, 0, sizeof(cmd));
1232                         len = snprintf(cmd, sizeof(cmd) - 1,
1233                                        DRSH" '"DZFS" snapshot "
1234                                        "-o lustre:fsname=%s "
1235                                        "-o lustre:magic=%s "
1236                                        "-o lustre:ctime=%llu "
1237                                        "-o lustre:mtime=%llu ",
1238                                        PRSH(si, st), PZFS(st), fsname,
1239                                        SNAPSHOT_MAGIC, xtime, xtime);
1240                         if (len <= 0)
1241                                 exit(-EOVERFLOW);
1242
1243                         if (si->si_comment) {
1244                                 rc = snprintf(cmd + len, sizeof(cmd) - len - 1,
1245                                               "-o lustre:comment=\"%s\" ",
1246                                               si->si_comment);
1247                                 if (rc <= 0)
1248                                         exit(-EOVERFLOW);
1249
1250                                 len += rc;
1251                         }
1252
1253                         /* Make the inherited properties as local ones,
1254                          * then even if others changed (or removed) the
1255                          * property of the parent dataset, the snapshot
1256                          * will not be affected. */
1257                         rc = snapshot_inherit_prop(si, st, cmd + len,
1258                                                    MAX_BUF_SIZE - len - 1);
1259                         if (rc < 0) {
1260                                 SNAPSHOT_ADD_LOG(si, "Can't filter property on "
1261                                                  "target (%s:%x:%d): rc = %d\n",
1262                                                  st->st_host, st->st_role,
1263                                                  st->st_index, rc);
1264
1265                                 exit(rc);
1266                         }
1267
1268                         len += rc;
1269                         if (st->st_role & SR_OST)
1270                                 rc = snprintf(cmd + len, sizeof(cmd) - len - 1,
1271                                               "-o lustre:svname=%s-OST%04x "
1272                                               "-o lustre:mgsnode=%s "DSSNAME"'",
1273                                               fsname, st->st_index, mgsnode,
1274                                               PSSNAME(si, st));
1275                         else if (!(st->st_role & SR_MGS) ||
1276                                 /* MGS is on MDT0 */
1277                                  si->si_mdt0 == si->si_mgs)
1278                                 rc = snprintf(cmd + len, sizeof(cmd) - len - 1,
1279                                               "-o lustre:svname=%s-MDT%04x "
1280                                               "-o lustre:mgsnode=%s "DSSNAME"'",
1281                                               fsname, st->st_index, mgsnode,
1282                                               PSSNAME(si, st));
1283                         else
1284                                 /* separated MGS */
1285                                 rc = snprintf(cmd + len, sizeof(cmd) - len - 1,
1286                                               DSSNAME"'", PSSNAME(si, st));
1287                         if (rc <= 0)
1288                                 exit(-EOVERFLOW);
1289
1290                         rc = snapshot_exec(cmd);
1291                         if (rc)
1292                                 SNAPSHOT_ADD_LOG(si, "Can't execute \"%s\" on "
1293                                                  "target (%s:%x:%d): rc = %d\n",
1294                                                  cmd, st->st_host, st->st_role,
1295                                                  st->st_index, rc);
1296
1297                         exit(rc);
1298                 } /* end of child */
1299
1300                 /* parent continue to run more snapshot commands in parallel. */
1301                 st->st_pid = pid;
1302         }
1303
1304         return 0;
1305 }
1306
1307 static int __snapshot_destroy(struct snapshot_instance *si,
1308                               struct list_head *head);
1309
1310 static int snapshot_create(struct snapshot_instance *si)
1311 {
1312         char *__argv[3];
1313         char buf[MAX_BUF_SIZE];
1314         struct timeval tv;
1315         char new_fsname[9];
1316         int rc = 0;
1317         int rc1 = 0;
1318         int rc2 = 0;
1319
1320         rc = snapshot_create_check(si);
1321         if (rc)
1322                 return rc;
1323
1324         rc = gettimeofday(&tv, NULL);
1325         if (rc)
1326                 return rc;
1327
1328         srandom(tv.tv_usec);
1329         snprintf(new_fsname, sizeof(new_fsname), "%08x", (__u32)random());
1330
1331         rc = snapshot_get_mgsnode(si, buf, sizeof(buf));
1332         if (rc)
1333                 return rc;
1334
1335         __argv[1] = si->si_fsname;
1336         /* 1. Get barrier */
1337         if (si->si_barrier) {
1338                 char tbuf[8];
1339
1340                 memset(tbuf, 0, sizeof(tbuf));
1341                 snprintf(tbuf, 7, "%u", si->si_timeout);
1342                 __argv[0] = "barrier_freeze";
1343                 __argv[2] = tbuf;
1344                 rc = jt_barrier_freeze(3, __argv);
1345                 if (rc) {
1346                         SNAPSHOT_ADD_LOG(si, "Can't set barrier within %u "
1347                                          "seconds on %s: rc = %d\n",
1348                                          si->si_timeout, si->si_fsname, rc);
1349
1350                         return rc;
1351                 }
1352         }
1353
1354         /* 2. Fork config llog on MGS */
1355         __argv[0] = "fork_lcfg";
1356         __argv[2] = new_fsname;
1357         rc = jt_lcfg_fork(3, __argv);
1358         if (rc) {
1359                 SNAPSHOT_ADD_LOG(si, "Can't fork config log for create "
1360                                  "snapshot %s from %s to %s: rc = %d\n",
1361                                  si->si_ssname, si->si_fsname, new_fsname, rc);
1362                 goto out;
1363         }
1364
1365         /* 3.1 Create snapshot on every MDT */
1366         rc = __snapshot_create(si, &si->si_mdts_list, new_fsname, buf,
1367                                tv.tv_sec);
1368         if (!rc)
1369                 /* 3.2 Create snapshot on every OST */
1370                 rc = __snapshot_create(si, &si->si_osts_list, new_fsname, buf,
1371                                        tv.tv_sec);
1372
1373         /* 4. Wait for all children, even though part of them maybe failed */
1374         snapshot_wait(si, &rc1);
1375
1376 out:
1377         /* 5. Put barrier */
1378         if (si->si_barrier) {
1379                 if (!rc && !rc1) {
1380                         struct barrier_ctl bc;
1381
1382                         rc = __jt_barrier_stat(__argv[1], &bc);
1383                         if (rc) {
1384                                 SNAPSHOT_ADD_LOG(si, "Can't get barrier status "
1385                                                  "on %s: rc = %d\n",
1386                                                  si->si_fsname, rc);
1387                         } else if (bc.bc_status != BS_FROZEN ||
1388                                    bc.bc_timeout <= 0) {
1389                                 SNAPSHOT_ADD_LOG(si, "The barrier expired "
1390                                                  "on %s\n", si->si_fsname);
1391                                 rc = -ETIMEDOUT;
1392                         }
1393                 }
1394
1395                 __argv[0] = "barrier_thaw";
1396                 rc2 = jt_barrier_thaw(2, __argv);
1397                 if (rc2)
1398                         SNAPSHOT_ADD_LOG(si, "Can't release barrier on %s: "
1399                                          "rc = %d\n", si->si_fsname, rc2);
1400         }
1401
1402         /* cleanup */
1403         if (rc || rc1) {
1404                 si->si_force = true;
1405                 __snapshot_destroy(si, &si->si_osts_list);
1406                 __snapshot_destroy(si, &si->si_mdts_list);
1407                 snapshot_wait(si, &rc2);
1408
1409                 __argv[0] = "erase_lcfg";
1410                 __argv[1] = new_fsname;
1411                 __argv[2] = "-q";
1412                 jt_lcfg_erase(3, __argv);
1413         }
1414
1415         return rc ? rc : (rc1 ? rc1 : rc2);
1416 }
1417
1418 int jt_snapshot_create(int argc, char **argv)
1419 {
1420         struct snapshot_instance *si;
1421         struct option long_opts[] = {
1422         { .val = 'b',   .name = "barrier",      .has_arg = optional_argument },
1423         { .val = 'c',   .name = "comment",      .has_arg = required_argument },
1424         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
1425         { .val = 'h',   .name = "help",         .has_arg = no_argument },
1426         { .val = 'n',   .name = "name",         .has_arg = required_argument },
1427         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
1428         { .val = 't',   .name = "timeout",      .has_arg = required_argument },
1429         { .name = NULL } };
1430         int rc = 0;
1431
1432         si = snapshot_init(argc, argv, long_opts, "b::c:F:hn:r:t:",
1433                            snapshot_create_usage, LOCK_EX, &rc);
1434         if (!si)
1435                 return rc;
1436
1437         if (!si->si_ssname) {
1438                 fprintf(stderr,
1439                         "Miss the snapshot name to be created\n");
1440                 snapshot_create_usage();
1441                 snapshot_fini(si);
1442                 return -EINVAL;
1443         }
1444
1445         rc = snapshot_create(si);
1446         if (rc) {
1447                 fprintf(stderr,
1448                         "Can't create the snapshot %s\n", si->si_ssname);
1449                 SNAPSHOT_ADD_LOG(si, "Can't create snapshot %s with "
1450                                  "comment <%s> barrier <%s>, timeout "
1451                                  "<%d>: %d\n",
1452                                  si->si_ssname, si->si_comment,
1453                                  si->si_barrier ? "enable" : "disable",
1454                                  si->si_barrier ? si->si_timeout : -1, rc);
1455         } else {
1456                 SNAPSHOT_ADD_LOG(si, "Create snapshot %s successfully "
1457                                  "with comment <%s>, barrier <%s>, "
1458                                  "timeout <%d>\n",
1459                                  si->si_ssname, si->si_comment,
1460                                  si->si_barrier ? "enable" : "disable",
1461                                  si->si_barrier ? si->si_timeout : -1);
1462         }
1463
1464         snapshot_fini(si);
1465         return rc;
1466 }
1467
1468 static void snapshot_destroy_usage(void)
1469 {
1470         fprintf(stderr,
1471                 "Destroy the specified snapshot.\n"
1472                 "Usage:\n"
1473                 "snapshot_destroy [-f | --force] "
1474                                  "<-F | --fsname fsname> [-h | --help] "
1475                                  "<-n | --name ssname> "
1476                                  "[-r | --rsh remote_shell]\n"
1477                 "Options:\n"
1478                 "-f: destroy the snapshot by force.\n"
1479                 "-F: the filesystem name.\n"
1480                 "-h: for help information.\n"
1481                 "-n: the snapshot's name.\n"
1482                 "-r: the remote shell used for communication with remote "
1483                         "target, the default value is 'ssh'.\n");
1484 }
1485
1486 static int snapshot_destroy_check(struct snapshot_instance *si)
1487 {
1488         struct list_head *head = &si->si_osts_list;
1489         struct snapshot_target *st;
1490         pid_t pid;
1491         int rc = 0;
1492
1493 again1:
1494         list_for_each_entry(st, head, st_list) {
1495                 st->st_status = 0;
1496                 st->st_ignored = 0;
1497                 st->st_pid = 0;
1498
1499                 pid = fork();
1500                 if (pid < 0) {
1501                         SNAPSHOT_ADD_LOG(si, "Can't fork for check snapshot "
1502                                          "%s on the target (%s:%x:%d): %s\n",
1503                                          si->si_ssname, st->st_host,
1504                                          st->st_role, st->st_index,
1505                                          strerror(errno));
1506                         return pid;
1507                 }
1508
1509                 /* child */
1510                 if (pid == 0) {
1511                         rc = snapshot_exists_check(si, st);
1512                         if (!rc)
1513                                 /* The snapshot piece does not exist */
1514                                 exit(-ESRCH);
1515
1516                         exit(rc == -EEXIST ? 0: rc);
1517                 } /* end of child */
1518
1519                 /* parent continue to run more snapshot commands in parallel. */
1520                 st->st_pid = pid;
1521         }
1522
1523         if (head == &si->si_osts_list) {
1524                 head = &si->si_mdts_list;
1525                 goto again1;
1526         }
1527
1528         snapshot_wait(si, &rc);
1529         if (rc)
1530                 return rc;
1531
1532         head = &si->si_osts_list;
1533
1534 again2:
1535         list_for_each_entry(st, head, st_list) {
1536                 if (st->st_ignored && !si->si_force) {
1537                         char name[8];
1538
1539                         snapshot_role2name(name, st->st_role, st->st_index);
1540                         fprintf(stderr,
1541                                 "Miss snapshot piece on the %s. Use '-f' "
1542                                 "option if want to destroy it by force.\n",
1543                                 name);
1544
1545                         return -ENOENT;
1546                 }
1547         }
1548
1549         if (head == &si->si_osts_list) {
1550                 head = &si->si_mdts_list;
1551                 goto again2;
1552         }
1553
1554         if (!si->si_force)
1555                 rc = snapshot_general_check(si);
1556
1557         return rc;
1558 }
1559
1560 static int __snapshot_destroy(struct snapshot_instance *si,
1561                               struct list_head *head)
1562 {
1563         struct snapshot_target *st;
1564         pid_t pid;
1565         int rc;
1566
1567         list_for_each_entry(st, head, st_list) {
1568                 if (st->st_ignored)
1569                         continue;
1570
1571                 st->st_status = 0;
1572                 st->st_pid = 0;
1573
1574                 pid = fork();
1575                 if (pid < 0) {
1576                         SNAPSHOT_ADD_LOG(si, "Can't fork for destroy snapshot "
1577                                          "%s on the target (%s:%x:%d): %s\n",
1578                                          si->si_ssname, st->st_host,
1579                                          st->st_role, st->st_index,
1580                                          strerror(errno));
1581                         return pid;
1582                 }
1583
1584                 /* child */
1585                 if (pid == 0) {
1586                         char cmd[MAX_BUF_SIZE * 2];
1587
1588                         memset(cmd, 0, sizeof(cmd));
1589                         if (si->si_force)
1590                                 snprintf(cmd, sizeof(cmd) - 1,
1591                                          DRSH" 'umount -f "DSSNAME
1592                                          " > /dev/null 2>&1; "DZFS
1593                                          " destroy -f "DSSNAME"'",
1594                                          PRSH(si, st), PSSNAME(si, st),
1595                                          PZFS(st), PSSNAME(si, st));
1596                         else
1597                                 snprintf(cmd, sizeof(cmd) - 1,
1598                                          DRSH" '"DZFS" destroy "DSSNAME"'",
1599                                          PRSH(si, st), PZFS(st),
1600                                          PSSNAME(si, st));
1601                         rc = snapshot_exec(cmd);
1602                         if (rc)
1603                                 SNAPSHOT_ADD_LOG(si, "Can't execute \"%s\" on "
1604                                                  "target (%s:%x:%d): rc = %d\n",
1605                                                  cmd, st->st_host, st->st_role,
1606                                                  st->st_index, rc);
1607
1608                         exit(rc);
1609                 } /* end of child */
1610
1611                 /* parent continue to run more snapshot commands in parallel. */
1612                 st->st_pid = pid;
1613         }
1614
1615         return 0;
1616 }
1617
1618 static int snapshot_destroy(struct snapshot_instance *si)
1619 {
1620         char fsname[9];
1621         int rc = 0;
1622         int rc1 = 0;
1623         int rc2 = 0;
1624         int rc3 = 0;
1625
1626         rc = snapshot_destroy_check(si);
1627         if (rc)
1628                 return rc;
1629
1630         rc = snapshot_get_fsname(si, fsname, sizeof(fsname));
1631         if (rc)
1632                 return rc;
1633
1634         /* 1.1 Destroy snapshot on every OST */
1635         rc = __snapshot_destroy(si, &si->si_osts_list);
1636         if (!si->si_force) {
1637                 if (rc)
1638                         return rc;
1639
1640                 __snapshot_wait(si, &si->si_osts_list, &rc);
1641                 if (rc)
1642                         return rc;
1643         }
1644
1645         /* 1.2 Destroy snapshot on every MDT */
1646         rc1 = __snapshot_destroy(si, &si->si_mdts_list);
1647
1648         /* 2 Wait for all children, even though part of them maybe failed */
1649         snapshot_wait(si, &rc2);
1650         if (rc2 == -ENOENT && si->si_force)
1651                 rc2 = 0;
1652
1653         /* 3. Erase config llog from MGS */
1654         if ((!rc && !rc1 && !rc2) || si->si_force) {
1655                 char *__argv[3];
1656
1657                 __argv[0] = "erase_lcfg";
1658                 __argv[1] = fsname;
1659                 __argv[2] = "-q";
1660                 rc3 = jt_lcfg_erase(3, __argv);
1661                 if (rc3 && errno == ENOENT)
1662                         rc3 = 0;
1663                 if (rc3)
1664                         SNAPSHOT_ADD_LOG(si, "Can't erase config for destroy "
1665                                          "snapshot %s, fsname %s: rc = %d\n",
1666                                          si->si_ssname, fsname, rc3);
1667         }
1668
1669         return rc ? rc : (rc1 ? rc1 : (rc2 ? rc2 : rc3));
1670 }
1671
1672 int jt_snapshot_destroy(int argc, char **argv)
1673 {
1674         struct snapshot_instance *si;
1675         struct option long_opts[] = {
1676         { .val = 'f',   .name = "force",        .has_arg = no_argument },
1677         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
1678         { .val = 'h',   .name = "help",         .has_arg = no_argument },
1679         { .val = 'n',   .name = "name",         .has_arg = required_argument },
1680         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
1681         { .name = NULL } };
1682         int rc = 0;
1683
1684         si = snapshot_init(argc, argv, long_opts, "fF:hn:r:",
1685                            snapshot_destroy_usage, LOCK_EX, &rc);
1686         if (!si)
1687                 return rc;
1688
1689         if (!si->si_ssname) {
1690                 fprintf(stderr,
1691                         "Miss the snapshot name to be destroyed\n");
1692                 snapshot_destroy_usage();
1693                 snapshot_fini(si);
1694                 return -EINVAL;
1695         }
1696
1697         rc = snapshot_destroy(si);
1698         if (rc) {
1699                 fprintf(stderr,
1700                         "Can't destroy the snapshot %s\n", si->si_ssname);
1701                 SNAPSHOT_ADD_LOG(si, "Can't destroy snapshot %s with "
1702                                  "force <%s>: %d\n", si->si_ssname,
1703                                  si->si_force ? "enable" : "disable", rc);
1704         } else {
1705                 SNAPSHOT_ADD_LOG(si, "Destroy snapshot %s successfully "
1706                                  "with force <%s>\n", si->si_ssname,
1707                                  si->si_force ? "enable" : "disable");
1708         }
1709
1710         snapshot_fini(si);
1711         return rc;
1712 }
1713
1714 static void snapshot_modify_usage(void)
1715 {
1716         fprintf(stderr,
1717                 "Change the specified snapshot's name and/or comment.\n"
1718                 "Usage:\n"
1719                 "snapshot_modify [-c | --comment comment] "
1720                                 "<-F | --fsname fsname> [-h | --help] "
1721                                 "<-n | --name ssname> [-N | --new new_ssname] "
1722                                 "[-r | --rsh remote_shell]\n"
1723                 "Options:\n"
1724                 "-c: update the snapshot's comment.\n"
1725                 "-F: the filesystem name.\n"
1726                 "-h: for help information.\n"
1727                 "-n: the snapshot's name.\n"
1728                 "-N: rename the snapshot's name as the new_ssname.\n"
1729                 "-r: the remote shell used for communication with remote "
1730                         "target, the default value is 'ssh'.\n");
1731 }
1732
1733 static int snapshot_modify_check(struct snapshot_instance *si)
1734 {
1735         int rc;
1736
1737         if (si->si_new_ssname &&
1738             strcmp(si->si_ssname, si->si_new_ssname) == 0) {
1739                 fprintf(stderr, "The new snapshot's name is the same as "
1740                         "the old one %s %s.\n",
1741                         si->si_ssname, si->si_new_ssname);
1742                 return -EPERM;
1743         }
1744
1745         if (!si->si_new_ssname && !si->si_comment) {
1746                 fprintf(stderr, "Miss options, nothing to be changed.\n");
1747                 return -EINVAL;
1748         }
1749
1750         rc = mdt0_is_lustre_snapshot(si);
1751         if (!rc && si->si_new_ssname) {
1752                 rc = target_is_mounted(si, si->si_mdt0, si->si_ssname);
1753                 if (rc > 0) {
1754                         fprintf(stderr,
1755                                 "snapshot %s is mounted, can't be renamed.\n",
1756                                 si->si_ssname);
1757                         rc = -EBUSY;
1758                 }
1759         }
1760
1761         return rc;
1762 }
1763
1764 static int __snapshot_modify(struct snapshot_instance *si,
1765                              struct list_head *head, __u64 xtime)
1766 {
1767         struct snapshot_target *st;
1768         pid_t pid;
1769         int rc;
1770
1771         list_for_each_entry(st, head, st_list) {
1772                 st->st_status = 0;
1773                 st->st_ignored = 0;
1774                 st->st_pid = 0;
1775
1776                 pid = fork();
1777                 if (pid < 0) {
1778                         SNAPSHOT_ADD_LOG(si, "Can't fork for modify snapshot "
1779                                          "(%s|%s, <%s>) on the target "
1780                                          "(%s:%x:%d): %s\n",
1781                                          si->si_ssname, si->si_new_ssname,
1782                                          si->si_comment, st->st_host,
1783                                          st->st_role, st->st_index,
1784                                          strerror(errno));
1785                         return pid;
1786                 }
1787
1788                 /* child */
1789                 if (pid == 0) {
1790                         char cmd[MAX_BUF_SIZE * 5];
1791
1792                         memset(cmd, 0, sizeof(cmd));
1793                         if (si->si_new_ssname && si->si_comment)
1794                                 snprintf(cmd, sizeof(cmd) - 1,
1795                                          DRSH" '"DIMPORT"; "DZFS" rename "
1796                                          DSSNAME" "DSSNAME" && "DZFS
1797                                          " set lustre:comment=\"%s\" "DSSNAME
1798                                          " && "DZFS
1799                                          " set lustre:mtime=%llu "DSSNAME"'",
1800                                          PRSH(si, st), PIMPORT(st), PZFS(st),
1801                                          PSSNAME(si, st), PSS_NEW(si, st),
1802                                          PZFS(st), si->si_comment,
1803                                          PSS_NEW(si, st), PZFS(st), xtime,
1804                                          PSS_NEW(si, st));
1805                         else if (si->si_new_ssname)
1806                                 snprintf(cmd, sizeof(cmd) - 1,
1807                                          DRSH" '"DIMPORT"; "DZFS
1808                                          " rename "DSSNAME" "DSSNAME" && "DZFS
1809                                          " set lustre:mtime=%llu "DSSNAME"'",
1810                                          PRSH(si, st), PIMPORT(st), PZFS(st),
1811                                          PSSNAME(si, st), PSS_NEW(si, st),
1812                                          PZFS(st), xtime, PSS_NEW(si, st));
1813                         else if (si->si_comment)
1814                                 snprintf(cmd, sizeof(cmd) - 1,
1815                                          DRSH" '"DIMPORT"; "DZFS
1816                                          " set lustre:comment=\"%s\" "DSSNAME
1817                                          " && "DZFS
1818                                          " set lustre:mtime=%llu "DSSNAME"'",
1819                                          PRSH(si, st), PIMPORT(st), PZFS(st),
1820                                          si->si_comment, PSSNAME(si, st),
1821                                          PZFS(st), xtime, PSSNAME(si, st));
1822                         else
1823                                 exit(-EINVAL);
1824
1825                         rc = snapshot_exec(cmd);
1826                         if (rc)
1827                                 SNAPSHOT_ADD_LOG(si, "Can't execute \"%s\" on "
1828                                                  "target (%s:%x:%d): rc = %d\n",
1829                                                  cmd, st->st_host, st->st_role,
1830                                                  st->st_index, rc);
1831
1832                         exit(rc);
1833                 } /* end of child */
1834
1835                 /* parent continue to run more snapshot commands in parallel. */
1836                 st->st_pid = pid;
1837         }
1838
1839         return 0;
1840 }
1841
1842 static int snapshot_modify(struct snapshot_instance *si)
1843 {
1844         time_t tt;
1845         int rc = 0;
1846         int rc1 = 0;
1847
1848         rc = snapshot_modify_check(si);
1849         if (rc)
1850                 return rc;
1851
1852         time(&tt);
1853
1854         /* Modify snapshot on every MDT */
1855         rc = __snapshot_modify(si, &si->si_mdts_list, (__u64)tt);
1856         if (!rc)
1857                 /* Modify snapshot on every OST */
1858                 rc = __snapshot_modify(si, &si->si_osts_list, (__u64)tt);
1859
1860         /* Wait for all children, even though part of them maybe failed */
1861         snapshot_wait(si, &rc1);
1862
1863         return rc ? rc : rc1;
1864 }
1865
1866 int jt_snapshot_modify(int argc, char **argv)
1867 {
1868         struct snapshot_instance *si;
1869         struct option long_opts[] = {
1870         { .val = 'c',   .name = "comment",      .has_arg = required_argument },
1871         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
1872         { .val = 'h',   .name = "help",         .has_arg = no_argument },
1873         { .val = 'n',   .name = "name",         .has_arg = required_argument },
1874         { .val = 'N',   .name = "new",          .has_arg = required_argument },
1875         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
1876         { .name = NULL } };
1877         int rc = 0;
1878
1879         si = snapshot_init(argc, argv, long_opts, "c:F:hn:N:r:",
1880                            snapshot_modify_usage, LOCK_EX, &rc);
1881         if (!si)
1882                 return rc;
1883
1884         if (!si->si_ssname) {
1885                 fprintf(stderr,
1886                         "Miss the snapshot name to be modified\n");
1887                 snapshot_modify_usage();
1888                 snapshot_fini(si);
1889                 return -EINVAL;
1890         }
1891
1892         rc = snapshot_modify(si);
1893         if (rc) {
1894                 fprintf(stderr,
1895                         "Can't modify the snapshot %s\n", si->si_ssname);
1896                 SNAPSHOT_ADD_LOG(si, "Can't modify snapshot %s with "
1897                                  "name <%s>, comment <%s>: %d\n",
1898                                  si->si_ssname, si->si_new_ssname,
1899                                  si->si_comment, rc);
1900         } else {
1901                 SNAPSHOT_ADD_LOG(si, "Modify snapshot %s successfully "
1902                                  "with name <%s>, comment <%s>\n",
1903                                  si->si_ssname, si->si_new_ssname,
1904                                  si->si_comment);
1905         }
1906
1907         snapshot_fini(si);
1908         return rc;
1909 }
1910
1911 static void snapshot_list_usage(void)
1912 {
1913         fprintf(stderr,
1914                 "List the specified snapshot or all snapshots.\n"
1915                 "Usage:\n"
1916                 "snapshot_list [-d | --detail] "
1917                               "<-F | --fsname fsname> [-h | --help] "
1918                               "[-n | --name ssname] [-r | --rsh remote_shell]\n"
1919                 "Options:\n"
1920                 "-d: list every piece for the specified snapshot.\n"
1921                 "-F: the filesystem name.\n"
1922                 "-h: for help information.\n"
1923                 "-n: the snapshot's name.\n"
1924                 "-r: the remote shell used for communication with remote "
1925                         "target, the default value is 'ssh'.\n");
1926 }
1927
1928 static int snapshot_list_one(struct snapshot_instance *si,
1929                              struct snapshot_target *st)
1930 {
1931         char buf[MAX_BUF_SIZE * 3];
1932         FILE *fp;
1933         int rc;
1934
1935         memset(buf, 0, sizeof(buf));
1936         snprintf(buf, sizeof(buf) - 1,
1937                  DRSH" \""DIMPORT"; "DZFS
1938                  " get all "DSSNAME" | grep lustre: | grep local$ | "
1939                  "awk '{ \\$1=\\\"\\\"; \\$NF=\\\"\\\"; print \\$0 }' | "
1940                  "sed -e 's/^ //'\"",
1941                  PRSH(si, st), PIMPORT(st), PZFS(st), PSSNAME(si, st));
1942         fp = popen(buf, "r");
1943         if (!fp) {
1944                 SNAPSHOT_ADD_LOG(si, "Popen fail to list one: %s\n",
1945                                  strerror(errno));
1946                 return -errno;
1947         }
1948
1949         if (si->si_detail) {
1950                 char name[8];
1951
1952                 snapshot_role2name(name, st->st_role, st->st_index);
1953                 printf("\nsnapshot_role: %s\n", name);
1954         }
1955
1956         while (snapshot_fgets(fp, buf, MAX_BUF_SIZE) != NULL) {
1957                 __u64 xtime;
1958                 char *ptr;
1959
1960                 if (strncmp(buf, "lustre:fsname",
1961                             strlen("lustre:fsname")) == 0) {
1962                         ptr = snapshot_first_skip_blank(buf);
1963                         if (ptr)
1964                                 printf("snapshot_fsname: %s\n", ptr);
1965                         continue;
1966                 }
1967
1968                 if (strncmp(buf, "lustre:comment",
1969                             strlen("lustre:comment")) == 0) {
1970                         ptr = snapshot_first_skip_blank(buf);
1971                         if (ptr)
1972                                 printf("comment: %s\n", ptr);
1973                         continue;
1974                 }
1975
1976                 if (strncmp(buf, "lustre:ctime",
1977                             strlen("lustre:ctime")) == 0) {
1978                         ptr = snapshot_first_skip_blank(buf);
1979                         if (ptr) {
1980                                 sscanf(ptr, "%llu", &xtime);
1981                                 printf("create_time: %s",
1982                                        ctime((time_t *)&xtime));
1983                         }
1984                         continue;
1985                 }
1986
1987                 if (strncmp(buf, "lustre:mtime",
1988                             strlen("lustre:mtime")) == 0) {
1989                         ptr = snapshot_first_skip_blank(buf);
1990                         if (ptr) {
1991                                 sscanf(ptr, "%llu", &xtime);
1992                                 printf("modify_time: %s",
1993                                        ctime((time_t *)&xtime));
1994                         }
1995                         continue;
1996                 }
1997         }
1998
1999         pclose(fp);
2000         rc = target_is_mounted(si, st, si->si_ssname);
2001         if (rc < 0)
2002                 printf("status: unknown\n");
2003         else if (!rc)
2004                 printf("status: not mount\n");
2005         else
2006                 printf("status: mounted\n");
2007
2008         return rc;
2009 }
2010
2011 static int __snapshot_list(struct snapshot_instance *si,
2012                            struct list_head *head)
2013 {
2014         struct snapshot_target *st;
2015         int rc = 0;
2016
2017         list_for_each_entry(st, head, st_list) {
2018                 int rc1;
2019
2020                 rc1 = snapshot_list_one(si, st);
2021                 if (rc1 < 0 || rc >= 0)
2022                         rc = rc1;
2023         }
2024
2025         return rc;
2026 }
2027
2028 static int snapshot_list(struct snapshot_instance *si)
2029 {
2030         int rc = 0;
2031
2032         rc = snapshot_general_check(si);
2033         if (rc)
2034                 return rc;
2035
2036         printf("\nfilesystem_name: %s\nsnapshot_name: %s\n",
2037                si->si_fsname, si->si_ssname);
2038
2039         if (!si->si_detail) {
2040                 rc = snapshot_list_one(si, si->si_mdt0);
2041         } else {
2042                 int rc1;
2043
2044                 rc = __snapshot_list(si, &si->si_mdts_list);
2045                 rc1 = __snapshot_list(si, &si->si_osts_list);
2046                 if (rc >= 0)
2047                         rc = rc1;
2048         }
2049
2050         return rc < 0 ? rc : 0;
2051 }
2052
2053 static int snapshot_list_all(struct snapshot_instance *si)
2054 {
2055         struct snapshot_target *st = si->si_mdt0;
2056         struct list_sub_item {
2057                 struct list_head lsi_list;
2058                 char lsi_ssname[0];
2059         };
2060
2061         struct list_head list_sub_items;
2062         struct list_sub_item *lsi;
2063         char buf[MAX_BUF_SIZE * 2];
2064         FILE *fp;
2065         int rc = 0;
2066
2067         INIT_LIST_HEAD(&list_sub_items);
2068         memset(buf, 0, sizeof(buf));
2069         snprintf(buf, sizeof(buf) - 1,
2070                  DRSH" \""DZFS" get -H -r lustre:magic "DFSNAME
2071                  " | grep %s | awk '{ print \\$1 }' | cut -d@ -f2\"",
2072                  PRSH(si, st), PZFS(st), PFSNAME(st), SNAPSHOT_MAGIC);
2073         fp = popen(buf, "r");
2074         if (!fp) {
2075                 SNAPSHOT_ADD_LOG(si, "Popen fail to list ssnames: %s\n",
2076                                  strerror(errno));
2077                 return -errno;
2078         }
2079
2080         while (snapshot_fgets(fp, buf, MAX_BUF_SIZE) != NULL) {
2081                 int len = strlen(buf);
2082
2083                 lsi = malloc(len + 1 + sizeof(struct list_sub_item));
2084                 if (!lsi) {
2085                         SNAPSHOT_ADD_LOG(si, "NOT enough memory\n");
2086                         rc = -ENOMEM;
2087                         break;
2088                 }
2089
2090                 memcpy(lsi->lsi_ssname, buf, len + 1);
2091                 list_add(&lsi->lsi_list, &list_sub_items);
2092         }
2093
2094         pclose(fp);
2095         while (!list_empty(&list_sub_items)) {
2096                 lsi = list_entry(list_sub_items.next,
2097                                  struct list_sub_item, lsi_list);
2098                 list_del(&lsi->lsi_list);
2099                 if (!rc) {
2100                         si->si_ssname = lsi->lsi_ssname;
2101                         rc = snapshot_list(si);
2102                         si->si_ssname = NULL;
2103                 }
2104
2105                 free(lsi);
2106         }
2107
2108         return rc;
2109 }
2110
2111 int jt_snapshot_list(int argc, char **argv)
2112 {
2113         struct snapshot_instance *si;
2114         struct option long_opts[] = {
2115         { .val = 'd',   .name = "detail",       .has_arg = no_argument },
2116         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
2117         { .val = 'h',   .name = "help",         .has_arg = no_argument },
2118         { .val = 'n',   .name = "name",         .has_arg = required_argument },
2119         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
2120         { .name = NULL } };
2121         int rc = 0;
2122
2123         si = snapshot_init(argc, argv, long_opts, "dF:hn:r:",
2124                            snapshot_list_usage, LOCK_SH, &rc);
2125         if (!si)
2126                 return rc;
2127
2128         if (si->si_ssname)
2129                 rc = snapshot_list(si);
2130         else
2131                 rc = snapshot_list_all(si);
2132
2133         if (rc) {
2134                 fprintf(stderr,
2135                         "Can't list the snapshot %s\n", si->si_ssname);
2136                 SNAPSHOT_ADD_LOG(si, "Can't list snapshot %s with detail "
2137                                  "<%s>: %d\n", si->si_ssname,
2138                                  si->si_detail ? "yes" : "no", rc);
2139         }
2140
2141         snapshot_fini(si);
2142         return rc;
2143 }
2144
2145 static void snapshot_mount_usage(void)
2146 {
2147         fprintf(stderr,
2148                 "Mount the specified snapshot.\n"
2149                 "Usage:\n"
2150                 "snapshot_mount <-F | --fsname fsname> [-h | --help] "
2151                                "<-n | --name ssname> "
2152                                "[-r | --rsh remote_shell]\n"
2153                 "Options:\n"
2154                 "-F: the filesystem name.\n"
2155                 "-h: for help information.\n"
2156                 "-n: the snapshot's name.\n"
2157                 "-r: the remote shell used for communication with remote "
2158                         "target, the default value is 'ssh'.\n");
2159 }
2160
2161 static int snapshot_mount_check(struct snapshot_instance *si, char *fsname,
2162                                 int fslen, bool *mgs_running)
2163 {
2164         int rc;
2165
2166         rc = mdt0_is_lustre_snapshot(si);
2167         if (rc)
2168                 return rc;
2169
2170         rc = snapshot_get_fsname(si, fsname, fslen);
2171         if (rc < 0)
2172                 return rc;
2173
2174         rc = target_is_mounted(si, si->si_mgs, NULL);
2175         if (rc > 0) {
2176                 *mgs_running = true;
2177                 rc = 0;
2178         }
2179
2180         return rc;
2181 }
2182
2183 static int snapshot_mount_target(struct snapshot_instance *si,
2184                                  struct snapshot_target *st, const char *optstr)
2185 {
2186         char cmd[MAX_BUF_SIZE * 2];
2187         char name[8];
2188         int rc;
2189
2190         rc = target_is_mounted(si, st, si->si_ssname);
2191         if (rc < 0)
2192                 return rc;
2193
2194         if (rc > 0)
2195                 return -ESRCH;
2196
2197         memset(cmd, 0, sizeof(cmd));
2198         memset(name, 0, sizeof(name));
2199         snapshot_role2name(name, st->st_role, st->st_index);
2200         snprintf(cmd, sizeof(cmd) - 1,
2201                  DRSH" '"DIMPORT"; mkdir -p /mnt/%s_%s && mount -t lustre "
2202                  "-o rdonly_dev%s "DSSNAME" /mnt/%s_%s'",
2203                  PRSH(si, st), PIMPORT(st), si->si_ssname, name,
2204                  st != si->si_mdt0 ? "" : optstr, PSSNAME(si, st),
2205                  si->si_ssname, name);
2206         rc = snapshot_exec(cmd);
2207         if (rc)
2208                 SNAPSHOT_ADD_LOG(si, "Can't execute \"%s\" on the target "
2209                                  "(%s:%x:%d): rc = %d\n", cmd, st->st_host,
2210                                  st->st_role, st->st_index, rc);
2211
2212         return rc;
2213 }
2214
2215 static int __snapshot_mount(struct snapshot_instance *si,
2216                             struct list_head *head)
2217 {
2218         struct snapshot_target *st;
2219         pid_t pid;
2220         int rc;
2221
2222         list_for_each_entry(st, head, st_list) {
2223                 if (st == si->si_mgs || st == si->si_mdt0)
2224                         continue;
2225
2226                 st->st_status = 0;
2227                 st->st_ignored = 0;
2228                 st->st_pid = 0;
2229
2230                 pid = fork();
2231                 if (pid < 0) {
2232                         SNAPSHOT_ADD_LOG(si, "Can't fork for mount snapshot "
2233                                          "%s on target (%s:%x:%d): %s\n",
2234                                          si->si_ssname, st->st_host,
2235                                          st->st_role, st->st_index,
2236                                          strerror(errno));
2237                         return pid;
2238                 }
2239
2240                 /* child */
2241                 if (pid == 0) {
2242                         rc = snapshot_mount_target(si, st, "");
2243                         exit(rc);
2244                 }
2245
2246                 /* parent continue to run more snapshot commands in parallel. */
2247                 st->st_pid = pid;
2248         }
2249
2250         return 0;
2251 }
2252
2253 static int __snapshot_umount(struct snapshot_instance *si,
2254                              struct list_head *head);
2255
2256 static int snapshot_mount(struct snapshot_instance *si)
2257 {
2258         struct snapshot_target *st;
2259         int needed = 0;
2260         int failed = 0;
2261         int rc = 0;
2262         int rc1 = 0;
2263         char fsname[9];
2264         bool mdt0_mounted = false;
2265         bool mgs_running = false;
2266
2267         rc = snapshot_mount_check(si, fsname, sizeof(fsname), &mgs_running);
2268         if (rc < 0) {
2269                 fprintf(stderr,
2270                         "Can't mount the snapshot %s: %s\n",
2271                         si->si_ssname, strerror(-rc));
2272                 return rc;
2273         }
2274
2275         /* 1. MGS is not mounted yet, mount the MGS firstly */
2276         si->si_mgs->st_ignored = 0;
2277         si->si_mgs->st_pid = 0;
2278         if (!mgs_running) {
2279                 rc = snapshot_mount_target(si, si->si_mgs, "");
2280                 if (rc == -ESRCH) {
2281                         si->si_mgs->st_ignored = 1;
2282                         rc = 0;
2283                 }
2284
2285                 if (rc < 0) {
2286                         fprintf(stderr,
2287                                 "Can't mount the snapshot %s: %s\n",
2288                                 si->si_ssname, strerror(-rc));
2289                         return rc;
2290                 }
2291
2292                 if (si->si_mgs == si->si_mdt0)
2293                         mdt0_mounted = true;
2294         }
2295
2296         /* 2. Mount MDT0 if it is not combined with the MGS. */
2297         if (!mdt0_mounted) {
2298                 si->si_mdt0->st_ignored = 0;
2299                 si->si_mdt0->st_pid = 0;
2300                 rc = snapshot_mount_target(si, si->si_mdt0, ",nomgs");
2301                 if (rc)
2302                         goto cleanup;
2303         }
2304
2305         /* 3.1 Mount other MDTs in parallel */
2306         rc = __snapshot_mount(si, &si->si_mdts_list);
2307         if (!rc)
2308                 /* 3.2 Mount OSTs in parallel */
2309                 rc = __snapshot_mount(si, &si->si_osts_list);
2310
2311         /* Wait for all children, even though part of them maybe failed */
2312         failed = snapshot_wait(si, &rc1);
2313
2314         list_for_each_entry(st, &si->si_mdts_list, st_list) {
2315                 if (!st->st_ignored)
2316                         needed++;
2317         }
2318
2319         list_for_each_entry(st, &si->si_osts_list, st_list) {
2320                 if (!st->st_ignored)
2321                         needed++;
2322         }
2323
2324 cleanup:
2325         if (rc || rc1) {
2326                 int rc2 = 0;
2327
2328                 __snapshot_umount(si, &si->si_mdts_list);
2329                 __snapshot_umount(si, &si->si_osts_list);
2330                 snapshot_wait(si, &rc2);
2331
2332                 if (rc)
2333                         fprintf(stderr,
2334                                 "Can't mount the snapshot %s: %s\n",
2335                                 si->si_ssname, strerror(-rc));
2336                 else
2337                         fprintf(stderr,
2338                                 "%d of %d pieces of the snapshot %s "
2339                                 "can't be mounted: %s\n",
2340                                 failed, needed, si->si_ssname, strerror(-rc1));
2341
2342                 return rc ? rc : rc1;
2343         }
2344
2345         if (needed == 0) {
2346                 fprintf(stderr,
2347                         "The snapshot %s has already been mounted by other\n",
2348                         si->si_ssname);
2349                 return -EALREADY;
2350         }
2351
2352         fprintf(stdout, "mounted the snapshot %s with fsname %s\n",
2353                 si->si_ssname, fsname);
2354
2355         return 0;
2356 }
2357
2358 int jt_snapshot_mount(int argc, char **argv)
2359 {
2360         struct snapshot_instance *si;
2361         struct option long_opts[] = {
2362         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
2363         { .val = 'h',   .name = "help",         .has_arg = no_argument },
2364         { .val = 'n',   .name = "name",         .has_arg = required_argument },
2365         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
2366         { .name = NULL } };
2367         int rc = 0;
2368
2369         si = snapshot_init(argc, argv, long_opts, "F:hn:r:",
2370                            snapshot_mount_usage, LOCK_EX, &rc);
2371         if (!si)
2372                 return rc;
2373
2374         if (!si->si_ssname) {
2375                 fprintf(stderr,
2376                         "Miss the snapshot name to be mounted\n");
2377                 snapshot_mount_usage();
2378                 snapshot_fini(si);
2379                 return -EINVAL;
2380         }
2381
2382         rc = snapshot_mount(si);
2383         if (rc)
2384                 SNAPSHOT_ADD_LOG(si, "Can't mount snapshot %s: %d\n",
2385                                  si->si_ssname, rc);
2386         else
2387                 SNAPSHOT_ADD_LOG(si, "The snapshot %s is mounted\n",
2388                                  si->si_ssname);
2389
2390         snapshot_fini(si);
2391         return rc;
2392
2393 }
2394
2395 static void snapshot_umount_usage(void)
2396 {
2397         fprintf(stderr,
2398                 "Umount the specified snapshot.\n"
2399                 "Usage:\n"
2400                 "snapshot_umount <-F | --fsname fsname> [-h | --help] "
2401                                 "<-n | --name ssname> "
2402                                 "[-r | --rsh remote_shell]\n"
2403                 "Options:\n"
2404                 "-F: the filesystem name.\n"
2405                 "-h: for help information.\n"
2406                 "-n: the snapshot's name.\n"
2407                 "-r: the remote shell used for communication with remote "
2408                         "target, the default value is 'ssh'.\n");
2409 }
2410
2411 static int __snapshot_umount(struct snapshot_instance *si,
2412                              struct list_head *head)
2413 {
2414         struct snapshot_target *st;
2415         pid_t pid;
2416         int rc;
2417
2418         list_for_each_entry(st, head, st_list) {
2419                 st->st_status = 0;
2420                 st->st_ignored = 0;
2421                 st->st_pid = 0;
2422
2423                 pid = fork();
2424                 if (pid < 0) {
2425                         SNAPSHOT_ADD_LOG(si, "Can't fork for umount snapshot "
2426                                          "%s on target (%s:%x:%d): %s\n",
2427                                          si->si_ssname, st->st_host,
2428                                          st->st_role, st->st_index,
2429                                          strerror(errno));
2430                         return pid;
2431                 }
2432
2433                 /* child */
2434                 if (pid == 0) {
2435                         char cmd[MAX_BUF_SIZE];
2436
2437                         rc = target_is_mounted(si, st, si->si_ssname);
2438                         if (rc < 0)
2439                                 exit(rc);
2440
2441                         if (!rc)
2442                                 exit(-ESRCH);
2443
2444                         memset(cmd, 0, sizeof(cmd));
2445                         snprintf(cmd, sizeof(cmd) - 1,
2446                                  DRSH" 'umount "DSSNAME"'",
2447                                  PRSH(si, st), PSSNAME(si, st));
2448                         rc = snapshot_exec(cmd);
2449
2450                         exit(rc);
2451                 }
2452
2453                 /* parent continue to run more snapshot commands in parallel. */
2454                 st->st_pid = pid;
2455         }
2456
2457         return 0;
2458 }
2459
2460 static int snapshot_umount(struct snapshot_instance *si)
2461 {
2462         struct snapshot_target *st;
2463         int needed = 0;
2464         int failed;
2465         int rc = 0;
2466         int rc1 = 0;
2467         int rc2 = 0;
2468
2469         rc = snapshot_general_check(si);
2470         if (rc < 0) {
2471                 fprintf(stderr,
2472                         "Can't umount the snapshot %s: %s\n",
2473                         si->si_ssname, strerror(-rc));
2474                 return rc;
2475         }
2476
2477         rc = __snapshot_umount(si, &si->si_mdts_list);
2478         rc1 = __snapshot_umount(si, &si->si_osts_list);
2479         failed = snapshot_wait(si, &rc2);
2480
2481         list_for_each_entry(st, &si->si_mdts_list, st_list) {
2482                 if (!st->st_ignored)
2483                         needed++;
2484         }
2485
2486         list_for_each_entry(st, &si->si_osts_list, st_list) {
2487                 if (!st->st_ignored)
2488                         needed++;
2489         }
2490
2491         if (needed == 0) {
2492                 fprintf(stderr,
2493                         "The snapshot %s has not been mounted\n",
2494                         si->si_ssname);
2495                 return -EALREADY;
2496         }
2497
2498         if (failed != 0)
2499                 fprintf(stderr,
2500                         "%d of %d pieces of the snapshot %s "
2501                         "can't be umounted: %s\n",
2502                         failed, needed, si->si_ssname, strerror(-rc2));
2503
2504         return rc ? rc : (rc1 ? rc1 : rc2);
2505 }
2506
2507 int jt_snapshot_umount(int argc, char **argv)
2508 {
2509         struct snapshot_instance *si;
2510         struct option long_opts[] = {
2511         { .val = 'F',   .name = "fsname",       .has_arg = required_argument },
2512         { .val = 'h',   .name = "help",         .has_arg = no_argument },
2513         { .val = 'n',   .name = "name",         .has_arg = required_argument },
2514         { .val = 'r',   .name = "rsh",          .has_arg = required_argument },
2515         { .name = NULL } };
2516         int rc = 0;
2517
2518         si = snapshot_init(argc, argv, long_opts, "F:hn:r:",
2519                            snapshot_umount_usage, LOCK_EX, &rc);
2520         if (!si)
2521                 return rc;
2522
2523         if (!si->si_ssname) {
2524                 fprintf(stderr,
2525                         "Miss the snapshot name to be umounted\n");
2526                 snapshot_umount_usage();
2527                 snapshot_fini(si);
2528                 return -EINVAL;
2529         }
2530
2531         rc = snapshot_umount(si);
2532         if (rc < 0)
2533                 SNAPSHOT_ADD_LOG(si, "Can't umount snapshot %s: %d\n",
2534                                  si->si_ssname, rc);
2535         else
2536                 SNAPSHOT_ADD_LOG(si, "the snapshot %s have been umounted\n",
2537                                  si->si_ssname);
2538
2539         snapshot_fini(si);
2540         return rc;
2541 }