lustre/utils/libmount_utils_ldiskfs.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, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2012, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/utils/mount_utils_ldiskfs.c
  33  *
  34  * Author: Nathan Rutman <nathan@clusterfs.com>
  35 */
  36
  37 /* This source file is compiled into both mkfs.lustre and tunefs.lustre */
  38
  39 #if HAVE_CONFIG_H
  40 #  include "config.h"
  41 #endif /* HAVE_CONFIG_H */
  42
  43 #ifndef _GNU_SOURCE
  44 #define _GNU_SOURCE
  45 #endif
  46 #include <stdarg.h>
  47 #include <stdio.h>
  48 #include <stdlib.h>
  49 #include <string.h>
  50 #include <inttypes.h>
  51 #include <unistd.h>
  52 #include <dirent.h>
  53 #include <fcntl.h>
  54 #include <mntent.h>
  55
  56 #include <sys/types.h>
  57 #include <sys/stat.h>
  58 #include <sys/mount.h>
  59 #include <sys/utsname.h>
  60 #include <sys/sysmacros.h>
  61
  62 #include <string.h>
  63 #include <getopt.h>
  64 #include <limits.h>
  65 #include <ctype.h>
  66
  67 #ifndef BLKGETSIZE64
  68 #include <linux/fs.h> /* for BLKGETSIZE64 */
  69 #endif
  70 #include <linux/major.h>
  71 #include <linux/types.h>
  72 #include <linux/version.h>
  73 #include <linux/lnet/lnetctl.h>
  74 #include <linux/lustre/lustre_ver.h>
  75 #include <libcfs/util/string.h>
  76
  77 #ifdef HAVE_SELINUX
  78 #include <selinux/selinux.h>
  79 #endif
  80
  81 #include "mount_utils.h"
  82
  83 #define MAX_HW_SECTORS_KB_PATH  "queue/max_hw_sectors_kb"
  84 #define MAX_SECTORS_KB_PATH     "queue/max_sectors_kb"
  85 #define SCHEDULER_PATH          "queue/scheduler"
  86 #define STRIPE_CACHE_SIZE       "md/stripe_cache_size"
  87
  88 #define DEFAULT_SCHEDULER       "deadline"
  89
  90 extern char *progname;
  91
  92 /* keep it less than LL_FID_NAMELEN */
  93 #define DUMMY_FILE_NAME_LEN             25
  94 #define EXT3_DIRENT_SIZE                DUMMY_FILE_NAME_LEN
  95
  96 static void append_unique(char *buf, char *prefix, char *key, char *val,
  97                           size_t maxbuflen);
  98 static bool is_e2fsprogs_feature_supp(const char *feature);
  99 static void disp_old_e2fsprogs_msg(const char *feature, int make_backfs);
 100
 101 /*
 102  * Concatenate context of the temporary mount point if selinux is enabled
 103  */
 104 #ifdef HAVE_SELINUX
 105 static void append_context_for_mount(char *mntpt, struct mkfs_opts *mop)
 106 {
 107         security_context_t fcontext;
 108
 109         if (getfilecon(mntpt, &fcontext) < 0) {
 110                 /* Continuing with default behaviour */
 111                 fprintf(stderr, "%s: Get file context failed : %s\n",
 112                         progname, strerror(errno));
 113                 return;
 114         }
 115
 116         if (fcontext != NULL) {
 117                 append_unique(mop->mo_ldd.ldd_mount_opts,
 118                               ",", "context", fcontext,
 119                               sizeof(mop->mo_ldd.ldd_mount_opts));
 120                 freecon(fcontext);
 121         }
 122 }
 123 #endif
 124
 125 /* Determine if a device is a block device (as opposed to a file) */
 126 static int is_block(char *devname)
 127 {
 128         struct stat st;
 129         int     ret = 0;
 130         char    *devpath;
 131
 132         ret = cfs_abs_path(devname, &devpath);
 133         if (ret != 0) {
 134                 fprintf(stderr, "%s: failed to resolve path '%s': %s\n",
 135                         progname, devname, strerror(-ret));
 136                 return -1;
 137         }
 138
 139         ret = access(devname, F_OK);
 140         if (ret != 0) {
 141                 if (strncmp(devpath, "/dev/", 5) == 0) {
 142                         /* nobody sane wants to create a loopback file under
 143                          * /dev. Let's just report the device doesn't exist */
 144                         fprintf(stderr, "%s: %s apparently does not exist\n",
 145                                 progname, devpath);
 146                         ret = -1;
 147                         goto out;
 148                 }
 149                 ret = 0;
 150                 goto out;
 151         }
 152         ret = stat(devpath, &st);
 153         if (ret != 0) {
 154                 fprintf(stderr, "%s: cannot stat %s\n", progname, devpath);
 155                 goto out;
 156         }
 157         ret = S_ISBLK(st.st_mode);
 158 out:
 159         free(devpath);
 160         return ret;
 161 }
 162
 163 static int is_feature_enabled(const char *feature, const char *devpath)
 164 {
 165         char cmd[PATH_MAX];
 166         FILE *fp;
 167         char enabled_features[4096] = "";
 168         int ret = 1;
 169
 170         snprintf(cmd, sizeof(cmd), "%s -c -R features %s 2>&1",
 171                  DEBUGFS, devpath);
 172
 173         /* Using popen() instead of run_command() since debugfs does
 174          * not return proper error code if command is not supported */
 175         fp = popen(cmd, "r");
 176         if (!fp) {
 177                 fprintf(stderr, "%s: %s\n", progname, strerror(errno));
 178                 return 0;
 179         }
 180
 181         ret = fread(enabled_features, 1, sizeof(enabled_features) - 1, fp);
 182         enabled_features[ret] = '\0';
 183         pclose(fp);
 184
 185         if (strstr(enabled_features, feature))
 186                 return 1;
 187         return 0;
 188 }
 189
 190 /* Write the server config files */
 191 int ldiskfs_write_ldd(struct mkfs_opts *mop)
 192 {
 193         char mntpt[] = "/tmp/mntXXXXXX";
 194         char filepnm[192];
 195         char *dev;
 196         FILE *filep;
 197         int ret = 0;
 198         size_t num;
 199
 200         /* Mount this device temporarily in order to write these files */
 201         if (!mkdtemp(mntpt)) {
 202                 fprintf(stderr, "%s: Can't create temp mount point %s: %s\n",
 203                         progname, mntpt, strerror(errno));
 204                 return errno;
 205         }
 206
 207         /*
 208          * Append file context to mount options if SE Linux is enabled
 209          */
 210         #ifdef HAVE_SELINUX
 211         if (is_selinux_enabled() > 0)
 212                 append_context_for_mount(mntpt, mop);
 213         #endif
 214
 215         dev = mop->mo_device;
 216         if (mop->mo_flags & MO_IS_LOOP)
 217                 dev = mop->mo_loopdev;
 218
 219         /* Multiple mount protection enabled if failover node specified */
 220         if (mop->mo_flags & MO_FAILOVER &&
 221             !is_feature_enabled("mmp", dev)) {
 222                 if (is_e2fsprogs_feature_supp("-O mmp")) {
 223                         char *command = filepnm;
 224
 225                         snprintf(command, sizeof(filepnm),
 226                                  TUNE2FS" -O mmp '%s' >/dev/null 2>&1", dev);
 227                         ret = run_command(command, sizeof(filepnm));
 228                         if (ret)
 229                                 fprintf(stderr,
 230                                         "%s: Unable to set 'mmp' on %s: %d\n",
 231                                         progname, dev, ret);
 232                 } else {
 233                         disp_old_e2fsprogs_msg("mmp", 1);
 234                 }
 235         }
 236
 237         ret = mount(dev, mntpt, MT_STR(&mop->mo_ldd), 0,
 238                 (mop->mo_mountopts == NULL) ?
 239                 "errors=remount-ro" : mop->mo_mountopts);
 240         if (ret) {
 241                 fprintf(stderr, "%s: Unable to mount %s: %s\n",
 242                         progname, dev, strerror(errno));
 243                 ret = errno;
 244                 if (errno == ENODEV) {
 245                         fprintf(stderr, "Is the %s module available?\n",
 246                                 MT_STR(&mop->mo_ldd));
 247                 }
 248                 goto out_rmdir;
 249         }
 250
 251         /* Set up initial directories */
 252         sprintf(filepnm, "%s/%s", mntpt, MOUNT_CONFIGS_DIR);
 253         ret = mkdir(filepnm, 0777);
 254         if ((ret != 0) && (errno != EEXIST)) {
 255                 fprintf(stderr, "%s: Can't make configs dir %s (%s)\n",
 256                         progname, filepnm, strerror(errno));
 257                 goto out_umnt;
 258         } else if (errno == EEXIST) {
 259                 ret = 0;
 260         }
 261
 262         /* Save the persistent mount data into a file. Lustre must pre-read
 263            this file to get the real mount options. */
 264         vprint("Writing %s\n", MOUNT_DATA_FILE);
 265         sprintf(filepnm, "%s/%s", mntpt, MOUNT_DATA_FILE);
 266         filep = fopen(filepnm, "w");
 267         if (!filep) {
 268                 fprintf(stderr, "%s: Unable to create %s file: %s\n",
 269                         progname, filepnm, strerror(errno));
 270                 goto out_umnt;
 271         }
 272         num = fwrite(&mop->mo_ldd, sizeof(mop->mo_ldd), 1, filep);
 273         if (num < 1 && ferror(filep)) {
 274                 fprintf(stderr, "%s: Unable to write to file (%s): %s\n",
 275                         progname, filepnm, strerror(errno));
 276                 fclose(filep);
 277                 goto out_umnt;
 278         }
 279         fsync(filep->_fileno);
 280         fclose(filep);
 281
 282 out_umnt:
 283         umount(mntpt);
 284 out_rmdir:
 285         rmdir(mntpt);
 286         return ret;
 287 }
 288
 289 static int readcmd(char *cmd, char *buf, int len)
 290 {
 291         FILE *fp;
 292         int red;
 293
 294         fp = popen(cmd, "r");
 295         if (!fp)
 296                 return errno;
 297
 298         red = fread(buf, 1, len, fp);
 299         pclose(fp);
 300
 301         /* strip trailing newline */
 302         if (buf[red - 1] == '\n')
 303                 buf[red - 1] = '\0';
 304
 305         return (red == 0) ? -ENOENT : 0;
 306 }
 307
 308 int ldiskfs_read_ldd(char *dev, struct lustre_disk_data *mo_ldd)
 309 {
 310         char tmpdir[] = "/tmp/dirXXXXXX";
 311         char cmd[PATH_MAX];
 312         char filepnm[128];
 313         FILE *filep;
 314         int ret = 0;
 315         int cmdsz = sizeof(cmd);
 316
 317         /* Make a temporary directory to hold Lustre data files. */
 318         if (!mkdtemp(tmpdir)) {
 319                 fprintf(stderr, "%s: Can't create temporary directory %s: %s\n",
 320                         progname, tmpdir, strerror(errno));
 321                 return errno;
 322         }
 323
 324         /* TODO: it's worth observing the get_mountdata() function that is
 325            in mount_utils.c for getting the mountdata out of the
 326            filesystem */
 327
 328         /* Construct debugfs command line. */
 329         snprintf(cmd, cmdsz, "%s -c -R 'dump /%s %s/mountdata' '%s'",
 330                  DEBUGFS, MOUNT_DATA_FILE, tmpdir, dev);
 331
 332         ret = run_command(cmd, cmdsz);
 333         if (ret)
 334                 verrprint("%s: Unable to dump %s dir (%d)\n",
 335                           progname, MOUNT_CONFIGS_DIR, ret);
 336
 337         sprintf(filepnm, "%s/mountdata", tmpdir);
 338         filep = fopen(filepnm, "r");
 339         if (filep) {
 340                 size_t num_read;
 341                 vprint("Reading %s\n", MOUNT_DATA_FILE);
 342                 num_read = fread(mo_ldd, sizeof(*mo_ldd), 1, filep);
 343                 if (num_read < 1 && ferror(filep)) {
 344                         fprintf(stderr, "%s: Unable to read from file %s: %s\n",
 345                                 progname, filepnm, strerror(errno));
 346                 }
 347                 fclose(filep);
 348         }
 349
 350         snprintf(cmd, cmdsz, "rm -rf %s", tmpdir);
 351         run_command(cmd, cmdsz);
 352         if (ret)
 353                 verrprint("Failed to read old data (%d)\n", ret);
 354
 355         /* As long as we at least have the label, we're good to go */
 356         snprintf(cmd, sizeof(cmd), E2LABEL" %s", dev);
 357         ret = readcmd(cmd, mo_ldd->ldd_svname, sizeof(mo_ldd->ldd_svname) - 1);
 358
 359         return ret;
 360 }
 361
 362 int ldiskfs_erase_ldd(struct mkfs_opts *mop, char *param)
 363 {
 364         return 0;
 365 }
 366
 367 void ldiskfs_print_ldd_params(struct mkfs_opts *mop)
 368 {
 369         printf("Parameters:%s\n", mop->mo_ldd.ldd_params);
 370 }
 371
 372 /* Display the need for the latest e2fsprogs to be installed. make_backfs
 373  * indicates if the caller is make_lustre_backfs() or not. */
 374 static void disp_old_e2fsprogs_msg(const char *feature, int make_backfs)
 375 {
 376         static int msg_displayed;
 377
 378         if (msg_displayed) {
 379                 fprintf(stderr, "WARNING: %s does not support %s "
 380                         "feature.\n\n", E2FSPROGS, feature);
 381                 return;
 382         }
 383
 384         msg_displayed++;
 385
 386         fprintf(stderr, "WARNING: The %s package currently installed on "
 387                 "your system does not support \"%s\" feature.\n",
 388                 E2FSPROGS, feature);
 389 #if !(HAVE_LDISKFSPROGS)
 390         fprintf(stderr, "Please install the latest version of e2fsprogs from\n"
 391                 "https://downloads.whamcloud.com/public/e2fsprogs/latest/\n"
 392                 "to enable this feature.\n");
 393 #endif
 394         if (make_backfs)
 395                 fprintf(stderr, "Feature will not be enabled until %s"
 396                         "is updated and '%s -O %s %%{device}' "
 397                         "is run.\n\n", E2FSPROGS, TUNE2FS, feature);
 398 }
 399
 400 /* Check whether the file exists in the device */
 401 static int file_in_dev(char *file_name, char *dev_name)
 402 {
 403         FILE *fp;
 404         char debugfs_cmd[256];
 405         unsigned int inode_num;
 406         int i;
 407
 408         /* Construct debugfs command line. */
 409         snprintf(debugfs_cmd, sizeof(debugfs_cmd),
 410                  "%s -c -R 'stat %s' '%s' 2>&1 | egrep '(Inode|unsupported)'",
 411                  DEBUGFS, file_name, dev_name);
 412
 413         fp = popen(debugfs_cmd, "r");
 414         if (!fp) {
 415                 fprintf(stderr, "%s: %s\n", progname, strerror(errno));
 416                 return 0;
 417         }
 418
 419         if (fscanf(fp, "Inode: %u", &inode_num) == 1) { /* exist */
 420                 pclose(fp);
 421                 return 1;
 422         }
 423         i = fread(debugfs_cmd, 1, sizeof(debugfs_cmd) - 1, fp);
 424         if (i) {
 425                 debugfs_cmd[i] = 0;
 426                 fprintf(stderr, "%s", debugfs_cmd);
 427                 if (strstr(debugfs_cmd, "unsupported feature")) {
 428                         disp_old_e2fsprogs_msg("an unknown", 0);
 429                 }
 430                 pclose(fp);
 431                 return -1;
 432         }
 433         pclose(fp);
 434         return 0;
 435 }
 436
 437 /* Check whether the device has already been used with lustre */
 438 int ldiskfs_is_lustre(char *dev, unsigned *mount_type)
 439 {
 440         int ret;
 441
 442         ret = file_in_dev(MOUNT_DATA_FILE, dev);
 443         if (ret) {
 444                 /* in the -1 case, 'extents' means IS a lustre target */
 445                 *mount_type = LDD_MT_LDISKFS;
 446                 return 1;
 447         }
 448
 449         ret = file_in_dev(LAST_RCVD, dev);
 450         if (ret) {
 451                 *mount_type = LDD_MT_LDISKFS;
 452                 return 1;
 453         }
 454
 455         return 0;
 456 }
 457
 458 /* Check if a certain feature is supported by e2fsprogs.
 459  * Firstly we try to use "debugfs supported_features" command to check if
 460  * the feature is supported. If this fails we try to set this feature with
 461  * mke2fs to check for its support. */
 462 static bool is_e2fsprogs_feature_supp(const char *feature)
 463 {
 464         static char supp_features[4096] = "";
 465         FILE *fp;
 466         char cmd[PATH_MAX];
 467         char imgname[] = "/tmp/test-img-XXXXXX";
 468         int fd;
 469         int ret;
 470
 471         if (supp_features[0] == '\0') {
 472                 snprintf(cmd, sizeof(cmd), "%s -c -R supported_features 2>&1",
 473                          DEBUGFS);
 474
 475                 /* Using popen() instead of run_command() since debugfs does
 476                  * not return proper error code if command is not supported */
 477                 fp = popen(cmd, "r");
 478                 if (!fp) {
 479                         fprintf(stderr, "%s: %s\n", progname, strerror(errno));
 480                 } else {
 481                         ret = fread(supp_features, 1,
 482                                     sizeof(supp_features) - 1, fp);
 483                         supp_features[ret] = '\0';
 484                         pclose(fp);
 485                 }
 486         }
 487
 488         if (strstr(supp_features,
 489                    strncmp(feature, "-O ", 3) ? feature : feature + 3))
 490                 return true;
 491
 492         if ((fd = mkstemp(imgname)) < 0)
 493                 return false;
 494
 495         close(fd);
 496
 497         snprintf(cmd, sizeof(cmd), "%s -F %s %s 100 >/dev/null 2>&1",
 498                  MKE2FS, feature, imgname);
 499         /* run_command() displays the output of mke2fs when it fails for
 500          * some feature, so use system() directly */
 501         ret = system(cmd);
 502         unlink(imgname);
 503
 504         return ret == 0;
 505 }
 506
 507 /**
 508  * append_unique: append @key or @key=@val pair to @buf only if @key does not
 509  *                exists
 510  *      @buf: buffer to hold @key or @key=@val
 511  *      @prefix: prefix string before @key
 512  *      @key: key string
 513  *      @val: value string if it's a @key=@val pair
 514  */
 515 static void append_unique(char *buf, char *prefix, char *key, char *val,
 516                           size_t maxbuflen)
 517 {
 518         char *anchor, *end;
 519         int  len;
 520
 521         if (key == NULL)
 522                 return;
 523
 524         anchor = end = strstr(buf, key);
 525         /* try to find exact match string in @buf */
 526         while (end && *end != '\0' && *end != ',' && *end != ' ' && *end != '=')
 527                 ++end;
 528         len = end - anchor;
 529         if (anchor == NULL || strlen(key) != len ||
 530                         strncmp(anchor, key, len) != 0) {
 531                 if (prefix != NULL)
 532                         strscat(buf, prefix, maxbuflen);
 533
 534                 strscat(buf, key, maxbuflen);
 535                 if (val != NULL) {
 536                         strscat(buf, "=\"", maxbuflen);
 537                         strscat(buf, val, maxbuflen);
 538                         strscat(buf, "\"", maxbuflen);
 539                 }
 540         }
 541 }
 542
 543 static int enable_default_ext4_features(struct mkfs_opts *mop, char *anchor,
 544                                         size_t maxbuflen, bool user_spec)
 545 {
 546         unsigned long long blocks = mop->mo_device_kb / mop->mo_blocksize_kb;
 547         bool enable_64bit = false;
 548
 549         /* Enable large block addresses if the LUN is over 2^32 blocks. */
 550         if (blocks > 0xffffffffULL && is_e2fsprogs_feature_supp("-O 64bit"))
 551                 enable_64bit = true;
 552
 553         if (IS_OST(&mop->mo_ldd)) {
 554                 append_unique(anchor, user_spec ? "," : " -O ",
 555                               "extents", NULL, maxbuflen);
 556                 append_unique(anchor, ",", "uninit_bg", NULL, maxbuflen);
 557         } else if (IS_MDT(&mop->mo_ldd)) {
 558                 append_unique(anchor, user_spec ? "," : " -O ",
 559                               "dirdata", NULL, maxbuflen);
 560                 append_unique(anchor, ",", "uninit_bg", NULL, maxbuflen);
 561                 if (enable_64bit)
 562                         append_unique(anchor, ",", "extents", NULL, maxbuflen);
 563                 else
 564                         append_unique(anchor, ",", "^extents", NULL, maxbuflen);
 565         } else {
 566                 append_unique(anchor, user_spec ? "," : " -O ",
 567                               "uninit_bg", NULL, maxbuflen);
 568         }
 569
 570         /* Multiple mount protection enabled only if failover node specified */
 571         if (mop->mo_flags & MO_FAILOVER) {
 572                 if (is_e2fsprogs_feature_supp("-O mmp"))
 573                         append_unique(anchor, ",", "mmp", NULL, maxbuflen);
 574                 else
 575                         disp_old_e2fsprogs_msg("mmp", 1);
 576         }
 577
 578         /* Allow more than 65000 subdirectories */
 579         if (is_e2fsprogs_feature_supp("-O dir_nlink"))
 580                 append_unique(anchor, ",", "dir_nlink", NULL, maxbuflen);
 581
 582         /* The following options are only valid for ext4-based ldiskfs.
 583          * If --backfstype=ext3 is specified, do not enable them. */
 584         if (mop->mo_ldd.ldd_mount_type == LDD_MT_EXT3)
 585                 return 0;
 586
 587         /* Enable quota by default */
 588         if (is_e2fsprogs_feature_supp("-O quota")) {
 589                 append_unique(anchor, ",", "quota", NULL, maxbuflen);
 590         } else {
 591                 fatal();
 592                 fprintf(stderr, "\"-O quota\" must be supported by "
 593                         "e2fsprogs, please upgrade your e2fsprogs.\n");
 594                 return EINVAL;
 595         }
 596
 597         /* Allow files larger than 2TB.  Also needs LU-16, but not harmful. */
 598         if (is_e2fsprogs_feature_supp("-O huge_file"))
 599                 append_unique(anchor, ",", "huge_file", NULL, maxbuflen);
 600
 601         if (enable_64bit)
 602                 append_unique(anchor, ",", "64bit", NULL, maxbuflen);
 603
 604         if (blocks >= 0x1000000000 && is_e2fsprogs_feature_supp("-O meta_bg"))
 605                 append_unique(anchor, ",", "meta_bg", NULL, maxbuflen);
 606
 607         if (enable_64bit || strstr(mop->mo_mkfsopts, "meta_bg"))
 608                 append_unique(anchor, ",", "^resize_inode", NULL, maxbuflen);
 609
 610         /* Allow xattrs larger than one block, stored in a separate inode */
 611         if (IS_MDT(&mop->mo_ldd) && is_e2fsprogs_feature_supp("-O ea_inode"))
 612                 append_unique(anchor, ",", "ea_inode", NULL, maxbuflen);
 613
 614         /* Allow more than 10M directory entries */
 615         if (IS_MDT(&mop->mo_ldd) && is_e2fsprogs_feature_supp("-O large_dir"))
 616                 append_unique(anchor, ",", "large_dir", NULL, maxbuflen);
 617
 618         /* Cluster inode/block bitmaps and inode table for more efficient IO.
 619          * Align the flex groups on a 1MB boundary for better performance. */
 620         /* This -O feature needs to go last, since it adds the "-G" option. */
 621         if (is_e2fsprogs_feature_supp("-O flex_bg")) {
 622                 char tmp_buf[64];
 623
 624                 append_unique(anchor, ",", "flex_bg", NULL, maxbuflen);
 625
 626                 if (IS_OST(&mop->mo_ldd) &&
 627                     strstr(mop->mo_mkfsopts, "-G") == NULL) {
 628                         snprintf(tmp_buf, sizeof(tmp_buf), " -G %u",
 629                                  1024 / mop->mo_blocksize_kb);
 630                         strscat(anchor, tmp_buf, maxbuflen);
 631                 }
 632         }
 633         /* Don't add any more "-O" options here, see last comment above */
 634         return 0;
 635 }
 636
 637 /**
 638  * moveopts_to_end: find the option string, move remaining strings to
 639  *                  where option string starts, and append the option
 640  *                  string at the end
 641  *      @start: where the option string starts before the move
 642  *      RETURN: where the option string starts after the move
 643  */
 644 static char *moveopts_to_end(char *start)
 645 {
 646         size_t len;
 647         char save[512];
 648         char *end, *idx;
 649
 650         /* skip whitespace before options */
 651         end = start + 2;
 652         while (*end == ' ')
 653                 ++end;
 654
 655         /* find end of option characters */
 656         while (*end != ' ' && *end != '\0')
 657                 ++end;
 658
 659         len = end - start;
 660         if (len >= sizeof(save))
 661                 len = sizeof(save) - 1;
 662
 663         /* save options */
 664         strncpy(save, start, len);
 665         save[len] = '\0';
 666
 667         /* move remaining options up front */
 668         if (*end)
 669                 memmove(start, end, strlen(end));
 670         *(start + strlen(end)) = '\0';
 671
 672         /* append the specified options */
 673         if (*(start + strlen(start) - 1) != ' ')
 674                 strcat(start, " ");
 675         idx = start + strlen(start);
 676         strcat(start, save);
 677
 678         return idx;
 679 }
 680
 681 /* Build fs according to type */
 682 int ldiskfs_make_lustre(struct mkfs_opts *mop)
 683 {
 684         char mkfs_cmd[PATH_MAX];
 685         char buf[64];
 686         char *start;
 687         char *dev;
 688         int ret = 0, ext_opts = 0;
 689         bool enable_64bit = false;
 690         long inode_size = 0;
 691         size_t maxbuflen;
 692
 693         mop->mo_blocksize_kb = 4;
 694
 695         start = strstr(mop->mo_mkfsopts, "-b");
 696         if (start) {
 697                 char *end = NULL;
 698                 long blocksize;
 699
 700                 blocksize = strtol(start + 2, &end, 0);
 701                 if (end && (*end == 'k' || *end == 'K'))
 702                         blocksize *= 1024;
 703                 /* EXT4_MIN_BLOCK_SIZE || EXT4_MAX_BLOCK_SIZE */
 704                 if (blocksize < 1024 || blocksize > 65536) {
 705                         fprintf(stderr,
 706                                 "%s: blocksize %lu not in 1024-65536 bytes, normally 4096 bytes\n",
 707                                 progname, blocksize);
 708                         return EINVAL;
 709                 }
 710
 711                 if ((blocksize & (blocksize - 1)) != 0) {
 712                         fprintf(stderr,
 713                                 "%s: blocksize %lu not a power-of-two value\n",
 714                                 progname, blocksize);
 715                         return EINVAL;
 716                 }
 717                 mop->mo_blocksize_kb = blocksize >> 10;
 718         }
 719
 720         if (!(mop->mo_flags & MO_IS_LOOP)) {
 721                 __u64 device_kb = get_device_size(mop->mo_device);
 722
 723                 if (device_kb == 0)
 724                         return ENODEV;
 725
 726                 /* Compare to real size */
 727                 if (mop->mo_device_kb == 0 || device_kb < mop->mo_device_kb)
 728                         mop->mo_device_kb = device_kb;
 729         }
 730
 731         if (mop->mo_device_kb != 0) {
 732                 __u64 block_count;
 733
 734                 if (mop->mo_device_kb < 32384) {
 735                         fprintf(stderr, "%s: size of filesystem must be larger "
 736                                 "than 32MB, but is set to %lldKB\n",
 737                                 progname, (long long)mop->mo_device_kb);
 738                         return EINVAL;
 739                 }
 740                 block_count = mop->mo_device_kb / mop->mo_blocksize_kb;
 741                 if (block_count > 0xffffffffULL) {
 742                         /* If the LUN size is just over 2^32 blocks, limit the
 743                          * filesystem size to 2^32-1 blocks to avoid problems
 744                          * with ldiskfs/mkfs not handling this well. b=22906
 745                          */
 746                         if (block_count < 0x100002000ULL)
 747                                 mop->mo_device_kb =
 748                                         0xffffffffULL * mop->mo_blocksize_kb;
 749                         else
 750                                 enable_64bit = true;
 751                 }
 752         }
 753
 754         if ((mop->mo_ldd.ldd_mount_type != LDD_MT_EXT3) &&
 755             (mop->mo_ldd.ldd_mount_type != LDD_MT_LDISKFS) &&
 756             (mop->mo_ldd.ldd_mount_type != LDD_MT_LDISKFS2)) {
 757                 fprintf(stderr, "%s: unsupported fs type: %d (%s)\n",
 758                         progname, mop->mo_ldd.ldd_mount_type,
 759                         MT_STR(&mop->mo_ldd));
 760
 761                 return EINVAL;
 762         }
 763
 764         /* Journal size in MB */
 765         if (strstr(mop->mo_mkfsopts, "-J") == NULL &&
 766             mop->mo_device_kb > 1024 * 1024) {
 767                 /* Choose our own default journal size */
 768                 long journal_mb = 0, max_mb;
 769
 770                 /* cap journal size at 4GB for MDT, leave at 1GB for OSTs */
 771                 if (IS_MDT(&mop->mo_ldd))
 772                         max_mb = 4096;
 773                 else if (IS_OST(&mop->mo_ldd))
 774                         max_mb = 1024;
 775                 else /* Use mke2fs default size for MGS */
 776                         max_mb = 0;
 777
 778                 /* Use at most 4% of device for journal */
 779                 journal_mb = mop->mo_device_kb * 4 / (1024 * 100);
 780                 if (journal_mb > max_mb)
 781                         journal_mb = max_mb;
 782
 783                 if (journal_mb) {
 784                         snprintf(buf, sizeof(buf), " -J size=%ld", journal_mb);
 785                         strscat(mop->mo_mkfsopts, buf,
 786                                 sizeof(mop->mo_mkfsopts));
 787                 }
 788         }
 789
 790         /*
 791          * The inode size is constituted by following elements
 792          * (assuming all files are in composite layout and has
 793          * 3 components):
 794          *
 795          *   ldiskfs inode size: 160
 796          *   MDT extended attributes size, including:
 797          *      ext4_xattr_header: 32
 798          *      LOV EA size: 32(lov_comp_md_v1) +
 799          *                   3 * 40(lov_comp_md_entry_v1) +
 800          *                   3 * 32(lov_mds_md) +
 801          *                   stripes * 24(lov_ost_data) +
 802          *                   16(xattr_entry) + 4("lov")
 803          *      LMA EA size: 24(lustre_mdt_attrs) +
 804          *                   16(xattr_entry) + 4("lma")
 805          *      SOM EA size: 24(lustre_som_attrs) +
 806          *                   16(xattr_entry) + 4("som")
 807          *      link EA size: 24(link_ea_header) + 18(link_ea_entry) +
 808          *                    16(filename) + 16(xattr_entry) + 4("link")
 809          *   and some margin for 4-byte alignment, ACLs and other EAs.
 810          *
 811          * If we say the average filename length is about 32 bytes,
 812          * the calculation looks like:
 813          * 160 + 32 + (32+3*(40+32)+24*stripes+20) + (24+20) + (24+20) +
 814          *  (24+20) + (~42+16+20) + other <= 512*2^m, {m=0,1,2,3}
 815          */
 816         if (strstr(mop->mo_mkfsopts, "-I") == NULL) {
 817                 if (IS_MDT(&mop->mo_ldd)) {
 818                         if (mop->mo_stripe_count > 59)
 819                                 inode_size = 512; /* bz 7241 */
 820                         /* see also "-i" below for EA blocks */
 821                         else if (mop->mo_stripe_count > 16)
 822                                 inode_size = 2048;
 823                         else
 824                                 inode_size = 1024;
 825                 } else if (IS_OST(&mop->mo_ldd)) {
 826                         /* We store MDS FID and necessary composite
 827                          * layout information in the OST object EA:
 828                          *   ldiskfs inode size: 160
 829                          *   OST extended attributes size, including:
 830                          *      ext4_xattr_header: 32
 831                          *      LMA EA size: 24(lustre_mdt_attrs) +
 832                          *                   16(xattr_entry) + 4("lma")
 833                          *      FID EA size: 52(filter_fid) +
 834                          *                   16(xattr_entry) + 4("fid")
 835                          * 160 + 32 + (24+20) + (52+20) = 308
 836                          */
 837                         inode_size = 512;
 838                 }
 839
 840                 if (inode_size > 0) {
 841                         snprintf(buf, sizeof(buf), " -I %ld", inode_size);
 842                         strscat(mop->mo_mkfsopts, buf,
 843                                 sizeof(mop->mo_mkfsopts));
 844                 }
 845         }
 846
 847         /* Bytes_per_inode: disk size / num inodes */
 848         if (strstr(mop->mo_mkfsopts, "-i") == NULL &&
 849             strstr(mop->mo_mkfsopts, "-N") == NULL) {
 850                 long bytes_per_inode = 0;
 851
 852                 /* Allocate more inodes on MDT devices.  There is
 853                  * no data stored on the MDT, and very little extra
 854                  * metadata beyond the inode.  It could go down as
 855                  * low as 1024 bytes, but this is conservative.
 856                  * Account for external EA blocks for wide striping.
 857                  */
 858                 if (IS_MDT(&mop->mo_ldd)) {
 859                         bytes_per_inode = inode_size + 1536;
 860
 861                         if (mop->mo_stripe_count > 59) {
 862                                 int extra = mop->mo_stripe_count * 24;
 863
 864                                 extra = ((extra - 1) | 4095) + 1;
 865                                 bytes_per_inode += extra;
 866                         }
 867                 }
 868
 869                 /* Allocate fewer inodes on large OST devices.  Most
 870                  * filesystems can be much more aggressive than even
 871                  * this, but it is impossible to know in advance.
 872                  */
 873                 if (IS_OST(&mop->mo_ldd)) {
 874                         /* OST > 16TB assume average file size 1MB */
 875                         if (mop->mo_device_kb > (16ULL << 30))
 876                                 bytes_per_inode = 1024 * 1024;
 877                         /* OST > 4TB assume average file size 512kB */
 878                         else if (mop->mo_device_kb > (4ULL << 30))
 879                                 bytes_per_inode = 512 * 1024;
 880                         /* OST > 1TB assume average file size 256kB */
 881                         else if (mop->mo_device_kb > (1ULL << 30))
 882                                 bytes_per_inode = 256 * 1024;
 883                         /* OST > 10GB assume average file size 64kB,
 884                          * plus a bit so that inodes will fit into a
 885                          * 256x flex_bg without overflowing.
 886                          */
 887                         else if (mop->mo_device_kb > (10ULL << 20))
 888                                 bytes_per_inode = 69905;
 889                 }
 890
 891                 if (bytes_per_inode > 0) {
 892                         snprintf(buf, sizeof(buf), " -i %ld", bytes_per_inode);
 893                         strscat(mop->mo_mkfsopts, buf,
 894                                 sizeof(mop->mo_mkfsopts));
 895                         mop->mo_inode_size = bytes_per_inode;
 896                 }
 897         }
 898
 899         if (verbose < 2)
 900                 strscat(mop->mo_mkfsopts, " -q", sizeof(mop->mo_mkfsopts));
 901
 902         /* start handle -O mkfs options */
 903         start = strstr(mop->mo_mkfsopts, "-O");
 904         if (start) {
 905                 if (strstr(start + 2, "-O") != NULL) {
 906                         fprintf(stderr,
 907                                 "%s: don't specify multiple -O options\n",
 908                                 progname);
 909                         return EINVAL;
 910                 }
 911                 start = moveopts_to_end(start);
 912                 maxbuflen = sizeof(mop->mo_mkfsopts) -
 913                         (start - mop->mo_mkfsopts) - strlen(start);
 914                 ret = enable_default_ext4_features(mop, start, maxbuflen, 1);
 915         } else {
 916                 start = mop->mo_mkfsopts + strlen(mop->mo_mkfsopts);
 917                 maxbuflen = sizeof(mop->mo_mkfsopts) - strlen(mop->mo_mkfsopts);
 918                 ret = enable_default_ext4_features(mop, start, maxbuflen, 0);
 919         }
 920         if (ret)
 921                 return ret;
 922         /* end handle -O mkfs options */
 923
 924         /* start handle -E mkfs options */
 925         start = strstr(mop->mo_mkfsopts, "-E");
 926         if (start) {
 927                 if (strstr(start + 2, "-E") != NULL) {
 928                         fprintf(stderr,
 929                                 "%s: don't specify multiple -E options\n",
 930                                 progname);
 931                         return EINVAL;
 932                 }
 933                 start = moveopts_to_end(start);
 934                 maxbuflen = sizeof(mop->mo_mkfsopts) -
 935                         (start - mop->mo_mkfsopts) - strlen(start);
 936                 ext_opts = 1;
 937         } else {
 938                 start = mop->mo_mkfsopts + strlen(mop->mo_mkfsopts);
 939                 maxbuflen = sizeof(mop->mo_mkfsopts) - strlen(mop->mo_mkfsopts);
 940         }
 941
 942         /* In order to align the filesystem metadata on 1MB boundaries,
 943          * give a resize value that will reserve a power-of-two group
 944          * descriptor blocks, but leave one block for the superblock.
 945          * Only useful for filesystems with < 2^32 blocks due to resize
 946          * limitations.
 947          */
 948         if (!enable_64bit && strstr(mop->mo_mkfsopts, "meta_bg") == NULL &&
 949             IS_OST(&mop->mo_ldd) && mop->mo_device_kb > 100 * 1024) {
 950                 unsigned int group_blocks = mop->mo_blocksize_kb * 8192;
 951                 unsigned int desc_per_block = mop->mo_blocksize_kb * 1024 / 32;
 952                 unsigned int resize_blks;
 953
 954                 resize_blks = (1ULL<<32) - desc_per_block*group_blocks;
 955                 snprintf(buf, sizeof(buf), "%u", resize_blks);
 956                 append_unique(start, ext_opts ? "," : " -E ",
 957                               "resize", buf, maxbuflen);
 958                 ext_opts = 1;
 959         }
 960
 961         /* Avoid zeroing out the full journal - speeds up mkfs */
 962         if (is_e2fsprogs_feature_supp("-E lazy_journal_init"))
 963                 append_unique(start, ext_opts ? "," : " -E ",
 964                               "lazy_journal_init", NULL, maxbuflen);
 965         /* end handle -E mkfs options */
 966
 967         /* Allow reformat of full devices (as opposed to partitions).
 968          * We already checked for mounted dev.
 969          */
 970         strscat(mop->mo_mkfsopts, " -F", sizeof(mop->mo_mkfsopts));
 971
 972         snprintf(mkfs_cmd, sizeof(mkfs_cmd), "%s -j -b %d -L %s ", MKE2FS,
 973                  mop->mo_blocksize_kb * 1024, mop->mo_ldd.ldd_svname);
 974
 975         /* For loop device format the dev, not the filename */
 976         dev = mop->mo_device;
 977         if (mop->mo_flags & MO_IS_LOOP)
 978                 dev = mop->mo_loopdev;
 979
 980         vprint("formatting backing filesystem %s on %s\n",
 981                MT_STR(&mop->mo_ldd), dev);
 982         vprint("\ttarget name   %s\n", mop->mo_ldd.ldd_svname);
 983         vprint("\tkilobytes     %llu\n", mop->mo_device_kb);
 984         vprint("\toptions       %s\n", mop->mo_mkfsopts);
 985
 986         /* mkfs_cmd's trailing space is important! */
 987         strscat(mkfs_cmd, mop->mo_mkfsopts, sizeof(mkfs_cmd));
 988         strscat(mkfs_cmd, " ", sizeof(mkfs_cmd));
 989         strscat(mkfs_cmd, dev, sizeof(mkfs_cmd));
 990         if (mop->mo_device_kb != 0) {
 991                 snprintf(buf, sizeof(buf), " %lluk",
 992                          (unsigned long long)mop->mo_device_kb);
 993                 strscat(mkfs_cmd, buf, sizeof(mkfs_cmd));
 994         }
 995
 996         vprint("mkfs_cmd = %s\n", mkfs_cmd);
 997         ret = run_command(mkfs_cmd, sizeof(mkfs_cmd));
 998         if (ret) {
 999                 fatal();
1000                 fprintf(stderr, "Unable to build fs %s (%d)\n", dev, ret);
1001         }
1002         return ret;
1003 }
1004
1005 int ldiskfs_prepare_lustre(struct mkfs_opts *mop,
1006                            char *wanted_mountopts, size_t len)
1007 {
1008         struct lustre_disk_data *ldd = &mop->mo_ldd;
1009         int ret;
1010
1011         /* Set MO_IS_LOOP to indicate a loopback device is needed */
1012         ret = is_block(mop->mo_device);
1013         if (ret < 0) {
1014                 return errno;
1015         } else if (ret == 0) {
1016                 mop->mo_flags |= MO_IS_LOOP;
1017         }
1018
1019         if (IS_MDT(ldd) || IS_MGS(ldd))
1020                 strscat(wanted_mountopts, ",user_xattr", len);
1021
1022         return 0;
1023 }
1024
1025 int ldiskfs_fix_mountopts(struct mkfs_opts *mop, char *mountopts, size_t len)
1026 {
1027         if (strstr(mountopts, "errors=") == NULL)
1028                 strscat(mountopts, ",errors=remount-ro", len);
1029
1030         return 0;
1031 }
1032
1033 static int read_file(const char *path, char *buf, int size)
1034 {
1035         FILE *fd;
1036
1037         fd = fopen(path, "r");
1038         if (fd == NULL)
1039                 return errno;
1040
1041         if (fgets(buf, size, fd) == NULL) {
1042                 fprintf(stderr, "reading from %s: %s", path, strerror(errno));
1043                 fclose(fd);
1044                 return 1;
1045         }
1046         fclose(fd);
1047
1048         /* strip trailing newline */
1049         size = strlen(buf);
1050         if (buf[size - 1] == '\n')
1051                 buf[size - 1] = '\0';
1052
1053         return 0;
1054 }
1055
1056 static int write_file(const char *path, const char *buf)
1057 {
1058         int fd, rc;
1059
1060         fd = open(path, O_WRONLY);
1061         if (fd < 0)
1062                 return errno;
1063
1064         rc = write(fd, buf, strlen(buf));
1065         close(fd);
1066
1067         return rc < 0 ? errno : 0;
1068 }
1069
1070 static int tune_md_stripe_cache_size(const char *sys_path,
1071                                      struct mount_opts *mop)
1072 {
1073         char path[PATH_MAX];
1074         unsigned long old_stripe_cache_size;
1075         unsigned long new_stripe_cache_size;
1076         char buf[3 * sizeof(old_stripe_cache_size) + 2];
1077         int rc;
1078
1079         if (mop->mo_md_stripe_cache_size <= 0)
1080                 return 0;
1081
1082         new_stripe_cache_size = mop->mo_md_stripe_cache_size;
1083
1084         snprintf(path, sizeof(path), "%s/%s", sys_path, STRIPE_CACHE_SIZE);
1085         rc = read_file(path, buf, sizeof(buf));
1086         if (rc != 0) {
1087                 if (verbose)
1088                         fprintf(stderr, "warning: cannot read '%s': %s\n",
1089                                 path, strerror(errno));
1090                 return rc;
1091         }
1092
1093         old_stripe_cache_size = strtoul(buf, NULL, 0);
1094         if (old_stripe_cache_size == 0 || old_stripe_cache_size == ULONG_MAX)
1095                 return EINVAL;
1096
1097         if (new_stripe_cache_size <= old_stripe_cache_size)
1098                 return 0;
1099
1100         snprintf(buf, sizeof(buf), "%lu", new_stripe_cache_size);
1101         rc = write_file(path, buf);
1102         if (rc != 0) {
1103                 if (verbose)
1104                         fprintf(stderr, "warning: cannot write '%s': %s\n",
1105                                 path, strerror(errno));
1106                 return rc;
1107         }
1108
1109         return 0;
1110 }
1111
1112 static int tune_max_sectors_kb(const char *sys_path, struct mount_opts *mop)
1113 {
1114         char path[PATH_MAX];
1115         unsigned long max_hw_sectors_kb;
1116         unsigned long old_max_sectors_kb;
1117         unsigned long new_max_sectors_kb;
1118         char buf[3 * sizeof(old_max_sectors_kb) + 2];
1119         int rc;
1120
1121         if (mop->mo_max_sectors_kb >= 0) {
1122                 new_max_sectors_kb = mop->mo_max_sectors_kb;
1123                 goto have_new_max_sectors_kb;
1124         }
1125
1126         snprintf(path, sizeof(path), "%s/%s", sys_path, MAX_HW_SECTORS_KB_PATH);
1127         rc = read_file(path, buf, sizeof(buf));
1128         if (rc != 0) {
1129                 /* No MAX_HW_SECTORS_KB_PATH isn't necessary an
1130                  * error for some devices. */
1131                 return 0;
1132         }
1133
1134         max_hw_sectors_kb = strtoul(buf, NULL, 0);
1135         if (max_hw_sectors_kb == 0 || max_hw_sectors_kb == ULLONG_MAX) {
1136                 /* No digits at all or something weird. */
1137                 return 0;
1138         }
1139
1140         new_max_sectors_kb = max_hw_sectors_kb;
1141
1142         /* Don't increase IO request size limit past 16MB.  It is
1143          * about PTLRPC_MAX_BRW_SIZE, but that isn't in a public
1144          * header.  Note that even though the block layer allows
1145          * larger values, setting max_sectors_kb = 32768 causes
1146          * crashes (LU-6974). */
1147         if (new_max_sectors_kb > 16 * 1024)
1148                 new_max_sectors_kb = 16 * 1024;
1149
1150 have_new_max_sectors_kb:
1151         snprintf(path, sizeof(path), "%s/%s", sys_path, MAX_SECTORS_KB_PATH);
1152         rc = read_file(path, buf, sizeof(buf));
1153         if (rc != 0) {
1154                 /* No MAX_SECTORS_KB_PATH isn't necessary an error for
1155                  * some devices. */
1156                 return 0;
1157         }
1158
1159         old_max_sectors_kb = strtoul(buf, NULL, 0);
1160         if (old_max_sectors_kb == 0 || old_max_sectors_kb == ULLONG_MAX) {
1161                 /* No digits at all or something weird. */
1162                 return 0;
1163         }
1164
1165         if (new_max_sectors_kb <= old_max_sectors_kb)
1166                 return 0;
1167
1168         snprintf(buf, sizeof(buf), "%lu", new_max_sectors_kb);
1169         rc = write_file(path, buf);
1170         if (rc != 0) {
1171                 if (verbose)
1172                         fprintf(stderr, "warning: cannot write '%s': %s\n",
1173                                 path, strerror(errno));
1174                 return rc;
1175         }
1176
1177         fprintf(stderr, "%s: increased '%s' from %lu to %lu\n",
1178                 progname, path, old_max_sectors_kb, new_max_sectors_kb);
1179
1180         return 0;
1181 }
1182
1183 static int tune_block_dev_scheduler(const char *sys_path, const char *new_sched)
1184 {
1185         char path[PATH_MAX];
1186         char buf[PATH_MAX];
1187         char *s, *e;
1188         char *old_sched;
1189         int rc;
1190
1191         /* Before setting the scheduler, we need to check to see if
1192          * it's already set to "noop". If it is then we don't want to
1193          * override that setting. If it's set to anything other than
1194          * "noop" then set the scheduler to what has been passed
1195          * in. */
1196
1197         snprintf(path, sizeof(path), "%s/%s", sys_path, SCHEDULER_PATH);
1198         rc = read_file(path, buf, sizeof(buf));
1199         if (rc != 0) {
1200                 if (verbose)
1201                         fprintf(stderr, "%s: cannot read '%s': %s\n",
1202                                 progname, path, strerror(errno));
1203
1204                 return rc;
1205         }
1206
1207         /* The expected format of buf: noop anticipatory deadline [cfq] */
1208         s = strchr(buf, '[');
1209         e = strchr(buf, ']');
1210
1211         /* If the format is not what we expect then be safe and error out. */
1212         if (s == NULL || e == NULL || !(s < e)) {
1213                 if (verbose)
1214                         fprintf(stderr,
1215                                 "%s: cannot parse scheduler options for '%s'\n",
1216                                 progname, path);
1217
1218                 return EINVAL;
1219         }
1220
1221         old_sched = s + 1;
1222         *e = '\0';
1223
1224         if (strcmp(old_sched, "noop") == 0 ||
1225             strcmp(old_sched, "deadline") == 0 ||
1226             strcmp(old_sched, "mq-deadline") == 0 ||
1227             strstr(old_sched, new_sched) == 0)
1228                 return 0;
1229
1230         rc = write_file(path, new_sched);
1231         if (rc != 0) {
1232                 if (verbose)
1233                         fprintf(stderr,
1234                                 "%s: cannot set scheduler on '%s': %s\n",
1235                                 progname, path, strerror(errno));
1236                 return rc;
1237         }
1238
1239         fprintf(stderr, "%s: changed scheduler of '%s' from %s to %s\n",
1240                 progname, path, old_sched, new_sched);
1241
1242         return 0;
1243 }
1244
1245 static int tune_block_dev(const char *src, struct mount_opts *mop);
1246
1247 static int tune_block_dev_slaves(const char *sys_path, struct mount_opts *mop)
1248 {
1249         char slaves_path[PATH_MAX];
1250         DIR *slaves_dir;
1251         struct dirent *d;
1252         int rc = 0;
1253
1254         snprintf(slaves_path, sizeof(slaves_path), "%s/slaves", sys_path);
1255         slaves_dir = opendir(slaves_path);
1256         if (slaves_dir == NULL) {
1257                 if (errno == ENOENT)
1258                         return 0;
1259
1260                 return errno;
1261         }
1262
1263         while ((d = readdir(slaves_dir)) != NULL) {
1264                 char path[PATH_MAX * 2];
1265                 int rc2;
1266
1267                 if (d->d_type != DT_LNK)
1268                         continue;
1269
1270                 snprintf(path, sizeof(path), "/dev/%s", d->d_name);
1271                 rc2 = tune_block_dev(path, mop);
1272                 if (rc2 != 0)
1273                         rc = rc2;
1274         }
1275
1276         closedir(slaves_dir);
1277
1278         return rc;
1279 }
1280
1281 /* This is to tune the kernel for good SCSI performance.
1282  * For that we set the value of /sys/block/{dev}/queue/max_sectors_kb
1283  * to the value of /sys/block/{dev}/queue/max_hw_sectors_kb */
1284 static int tune_block_dev(const char *src, struct mount_opts *mop)
1285 {
1286         struct stat st;
1287         char sys_path[PATH_MAX];
1288         char partition_path[PATH_MAX + sizeof("partition")];
1289         char *real_sys_path = NULL;
1290         int rc;
1291
1292         /*
1293          * Don't apply block device tuning for MDT or MGT devices,
1294          * since we don't need huge IO sizes to get good performance
1295          */
1296         if (!IS_OST(&mop->mo_ldd))
1297                 return 0;
1298
1299         if (src == NULL)
1300                 return EINVAL;
1301
1302         rc = stat(src, &st);
1303         if (rc < 0) {
1304                 if (verbose)
1305                         fprintf(stderr, "warning: cannot stat '%s': %s\n",
1306                                 src, strerror(errno));
1307                 return errno;
1308         }
1309
1310         if (!S_ISBLK(st.st_mode))
1311                 return 0;
1312
1313         if (major(st.st_rdev) == LOOP_MAJOR)
1314                 return 0;
1315
1316         snprintf(sys_path, sizeof(sys_path), "/sys/dev/block/%u:%u",
1317                  major(st.st_rdev), minor(st.st_rdev));
1318
1319         snprintf(partition_path, sizeof(partition_path), "%s/partition",
1320                  sys_path);
1321
1322         rc = access(partition_path, F_OK);
1323         if (rc < 0) {
1324                 if (errno == ENOENT)
1325                         goto have_whole_dev;
1326
1327                 if (verbose)
1328                         fprintf(stderr, "warning: cannot access '%s': %s\n",
1329                                 partition_path, strerror(errno));
1330                 rc = errno;
1331                 goto out;
1332         }
1333
1334         snprintf(sys_path, sizeof(sys_path), "/sys/dev/block/%u:%u/..",
1335                  major(st.st_rdev), minor(st.st_rdev));
1336
1337 have_whole_dev:
1338         /* Since we recurse on slave devices we resolve the sys_path to
1339          * avoid path buffer overflows. */
1340         real_sys_path = realpath(sys_path, NULL);
1341         if (real_sys_path == NULL) {
1342                 if (verbose)
1343                         fprintf(stderr,
1344                                 "warning: cannot resolve '%s': %s\n",
1345                                 sys_path, strerror(errno));
1346                 rc = errno;
1347                 goto out;
1348         }
1349
1350         if (major(st.st_rdev) == MD_MAJOR) {
1351                 rc = tune_md_stripe_cache_size(real_sys_path, mop);
1352         } else {
1353                 /* Ignore errors from tune_max_sectors_kb() and
1354                  * tune_scheduler(). The worst that will happen is a block
1355                  * device with an "incorrect" scheduler. */
1356                 tune_max_sectors_kb(real_sys_path, mop);
1357                 tune_block_dev_scheduler(real_sys_path, DEFAULT_SCHEDULER);
1358
1359                 /* If device is multipath device then tune its slave
1360                  * devices. */
1361                 rc = tune_block_dev_slaves(real_sys_path, mop);
1362         }
1363
1364 out:
1365         free(real_sys_path);
1366
1367         return rc;
1368 }
1369
1370 int ldiskfs_tune_lustre(char *dev, struct mount_opts *mop)
1371 {
1372         return tune_block_dev(dev, mop);
1373 }
1374
1375 int ldiskfs_label_lustre(struct mount_opts *mop)
1376 {
1377         char label_cmd[PATH_MAX];
1378         int rc;
1379
1380         snprintf(label_cmd, sizeof(label_cmd),
1381                  TUNE2FS" -f -L '%s' '%s' >/dev/null 2>&1",
1382                  mop->mo_ldd.ldd_svname, mop->mo_source);
1383         rc = run_command(label_cmd, sizeof(label_cmd));
1384
1385         return rc;
1386 }
1387
1388 int ldiskfs_rename_fsname(struct mkfs_opts *mop, const char *oldname)
1389 {
1390         struct mount_opts opts;
1391         struct lustre_disk_data *ldd = &mop->mo_ldd;
1392         char mntpt[] = "/tmp/mntXXXXXX";
1393         char *dev;
1394         int ret;
1395
1396         /* Change the filesystem label. */
1397         opts.mo_ldd = *ldd;
1398         opts.mo_source = mop->mo_device;
1399         ret = ldiskfs_label_lustre(&opts);
1400         if (ret) {
1401                 if (errno != 0)
1402                         ret = errno;
1403                 fprintf(stderr, "Can't change filesystem label: %s\n",
1404                         strerror(ret));
1405                 return ret;
1406         }
1407
1408         /* Mount this device temporarily in order to write these files */
1409         if (mkdtemp(mntpt) == NULL) {
1410                 if (errno != 0)
1411                         ret = errno;
1412                 else
1413                         ret = EINVAL;
1414                 fprintf(stderr, "Can't create temp mount point %s: %s\n",
1415                         mntpt, strerror(ret));
1416                 return ret;
1417         }
1418
1419 #ifdef HAVE_SELINUX
1420         /*
1421          * Append file context to mount options if SE Linux is enabled
1422          */
1423         if (is_selinux_enabled() > 0)
1424                 append_context_for_mount(mntpt, mop);
1425 #endif
1426
1427         if (mop->mo_flags & MO_IS_LOOP)
1428                 dev = mop->mo_loopdev;
1429         else
1430                 dev = mop->mo_device;
1431         ret = mount(dev, mntpt, MT_STR(ldd), 0, ldd->ldd_mount_opts);
1432         if (ret) {
1433                 if (errno != 0)
1434                         ret = errno;
1435                 fprintf(stderr, "Unable to mount %s: %s\n",
1436                         dev, strerror(ret));
1437                 if (ret == ENODEV)
1438                         fprintf(stderr, "Is the %s module available?\n",
1439                                 MT_STR(ldd));
1440                 goto out_rmdir;
1441         }
1442
1443         ret = lustre_rename_fsname(mop, mntpt, oldname);
1444         umount(mntpt);
1445
1446 out_rmdir:
1447         rmdir(mntpt);
1448         return ret;
1449 }
1450
1451 /* Enable quota accounting */
1452 int ldiskfs_enable_quota(struct mkfs_opts *mop)
1453 {
1454         char *dev;
1455         char cmd[512];
1456         int cmdsz = sizeof(cmd), ret;
1457
1458         if (!is_e2fsprogs_feature_supp("-O quota")) {
1459                 fprintf(stderr, "%s: \"-O quota\" is is not supported by "
1460                         "current e2fsprogs\n", progname);
1461                 return EINVAL;
1462         }
1463
1464         dev = mop->mo_device;
1465         if (mop->mo_flags & MO_IS_LOOP)
1466                 dev = mop->mo_loopdev;
1467
1468         /* Quota feature is already enabled? */
1469         if (is_feature_enabled("quota", dev)) {
1470                 vprint("Quota feature is already enabled.\n");
1471                 return 0;
1472         }
1473
1474         /* Turn on quota feature by "tune2fs -O quota" */
1475         snprintf(cmd, cmdsz, "%s -O quota %s", TUNE2FS, dev);
1476         ret = run_command(cmd, cmdsz);
1477         if (ret)
1478                 fprintf(stderr, "command:%s (%d)", cmd, ret);
1479
1480         return ret;
1481 }
1482
1483 int ldiskfs_init(void)
1484 {
1485         /* Required because full path to DEBUGFS is not specified */
1486         setenv("PATH", "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin", 0);
1487
1488         return 0;
1489 }
1490
1491 void ldiskfs_fini(void)
1492 {
1493         return;
1494 }
1495
1496 #ifndef PLUGIN_DIR
1497 struct module_backfs_ops ldiskfs_ops = {
1498         .init                   = ldiskfs_init,
1499         .fini                   = ldiskfs_fini,
1500         .read_ldd               = ldiskfs_read_ldd,
1501         .write_ldd              = ldiskfs_write_ldd,
1502         .erase_ldd              = ldiskfs_erase_ldd,
1503         .print_ldd_params       = ldiskfs_print_ldd_params,
1504         .is_lustre              = ldiskfs_is_lustre,
1505         .make_lustre            = ldiskfs_make_lustre,
1506         .prepare_lustre         = ldiskfs_prepare_lustre,
1507         .fix_mountopts          = ldiskfs_fix_mountopts,
1508         .tune_lustre            = ldiskfs_tune_lustre,
1509         .label_lustre           = ldiskfs_label_lustre,
1510         .enable_quota           = ldiskfs_enable_quota,
1511         .rename_fsname          = ldiskfs_rename_fsname,
1512 };
1513 #endif /* PLUGIN_DIR */