Whamcloud - gitweb
LU-57 Allow OSTs to be created with no primary node
[fs/lustre-release.git] / lustre / utils / mkfs_lustre.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 only,
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License version 2 for more details (a copy is included
16  * in the LICENSE file that accompanied this code).
17  *
18  * You should have received a copy of the GNU General Public License
19  * version 2 along with this program; If not, see
20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
21  *
22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23  * CA 95054 USA or visit www.sun.com if you need additional information or
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
30  * Use is subject to license terms.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/utils/mkfs_lustre.c
37  *
38  * Author: Nathan Rutman <nathan@clusterfs.com>
39 */
40
41 /* This source file is compiled into both mkfs.lustre and tunefs.lustre */
42
43 #if HAVE_CONFIG_H
44 #  include "config.h"
45 #endif /* HAVE_CONFIG_H */
46
47 #ifndef _GNU_SOURCE
48 #define _GNU_SOURCE
49 #endif
50 #include <stdlib.h>
51 #include <stdio.h>
52 #include <unistd.h>
53 #include <fcntl.h>
54 #include <stdarg.h>
55 #include <mntent.h>
56
57 #include <sys/types.h>
58 #include <sys/stat.h>
59 #include <sys/mount.h>
60 #include <sys/utsname.h>
61
62 #include <string.h>
63 #include <getopt.h>
64 #include <limits.h>
65 #include <ctype.h>
66
67 #ifdef __linux__
68 /* libcfs.h is not really needed here, but on SLES10/PPC, fs.h includes idr.h
69  * which requires BITS_PER_LONG to be defined */
70 #include <libcfs/libcfs.h>
71 #ifndef BLKGETSIZE64
72 #include <linux/fs.h> /* for BLKGETSIZE64 */
73 #endif
74 #include <linux/version.h>
75 #endif
76 #include <lustre_disk.h>
77 #include <lustre_param.h>
78 #include <lnet/lnetctl.h>
79 #include <lustre_ver.h>
80 #include "mount_utils.h"
81
82 #ifndef PATH_MAX
83 #define PATH_MAX 4096
84 #endif
85
86 #define MAX_LOOP_DEVICES 16
87 #define L_BLOCK_SIZE 4096
88 #define INDEX_UNASSIGNED 0xFFFF
89 #define MO_IS_LOOP     0x01
90 #define MO_FORCEFORMAT 0x02
91
92 /* used to describe the options to format the lustre disk, not persistent */
93 struct mkfs_opts {
94         struct lustre_disk_data mo_ldd; /* to be written in MOUNT_DATA_FILE */
95         char  mo_device[128];           /* disk device name */
96         char  mo_loopdev[128];          /* in case a loop dev is needed */
97         char  mo_mkfsopts[512];         /* options to the backing-store mkfs */
98         __u64 mo_device_sz;             /* in KB */
99         int   mo_stripe_count;
100         int   mo_flags;
101         int   mo_mgs_failnodes;
102 };
103
104 char *progname;
105 int verbose = 1;
106 static int print_only = 0;
107 static int failover = 0;
108 static int upgrade_to_18 = 0;
109
110 void usage(FILE *out)
111 {
112         fprintf(out, "%s v"LUSTRE_VERSION_STRING"\n", progname);
113         fprintf(out, "usage: %s <target types> [options] <device>\n", progname);
114         fprintf(out,
115                 "\t<device>:block device or file (e.g /dev/sda or /tmp/ost1)\n"
116                 "\ttarget types:\n"
117                 "\t\t--ost: object storage, mutually exclusive with mdt,mgs\n"
118                 "\t\t--mdt: metadata storage, mutually exclusive with ost\n"
119                 "\t\t--mgs: configuration management service - one per site\n"
120                 "\toptions (in order of popularity):\n"
121                 "\t\t--mgsnode=<nid>[,<...>] : NID(s) of a remote mgs node\n"
122                 "\t\t\trequired for all targets other than the mgs node\n"
123                 "\t\t--fsname=<filesystem_name> : default is 'lustre'\n"
124                 "\t\t--failnode=<nid>[,<...>] : NID(s) of a failover partner\n"
125                 "\t\t\tcannot be used with --servicenode\n"
126                 "\t\t--servicenode=<nid>[,<...>] : NID(s) of all service partners\n"
127                 "\t\t\ttreat all nodes as equal service node, cannot be used with --failnode\n"
128                 "\t\t--param <key>=<value> : set a permanent parameter\n"
129                 "\t\t\te.g. --param sys.timeout=40\n"
130                 "\t\t\t     --param lov.stripesize=2M\n"
131                 "\t\t--index=#N : target index (i.e. ost index within lov)\n"
132                 "\t\t--comment=<user comment>: arbitrary string (%d bytes)\n"
133                 "\t\t--mountfsoptions=<opts> : permanent mount options\n"
134                 "\t\t--network=<net>[,<...>] : restrict OST/MDT to network(s)\n"
135 #ifndef TUNEFS
136                 "\t\t--backfstype=<fstype> : backing fs type (ext3, ldiskfs)\n"
137                 "\t\t--device-size=#N(KB) : device size for loop devices\n"
138                 "\t\t--mkfsoptions=<opts> : format options\n"
139                 "\t\t--reformat: overwrite an existing disk\n"
140                 "\t\t--stripe-count-hint=#N : for optimizing MDT inode size\n"
141                 "\t\t--iam-dir: use IAM directory format, not ext3 compatible\n"
142 #else
143                 "\t\t--erase-params : erase all old parameter settings\n"
144                 "\t\t--nomgs: turn off MGS service on this MDT\n"
145                 "\t\t--writeconf: erase all config logs for this fs.\n"
146 #endif
147                 "\t\t--dryrun: just report what we would do; "
148                 "don't write to disk\n"
149                 "\t\t--verbose : e.g. show mkfs progress\n"
150                 "\t\t--quiet\n",
151                 (int)sizeof(((struct lustre_disk_data *)0)->ldd_userdata));
152         return;
153 }
154
155 #define vprint if (verbose > 0) printf
156 #define verrprint if (verbose >= 0) printf
157
158 /*================ utility functions =====================*/
159
160 char *strscat(char *dst, char *src, int buflen) {
161         dst[buflen - 1] = 0;
162         if (strlen(dst) + strlen(src) >= buflen) {
163                 fprintf(stderr, "string buffer overflow (max %d): '%s' + '%s'"
164                         "\n", buflen, dst, src);
165                 exit(EOVERFLOW);
166         }
167         return strcat(dst, src);
168
169 }
170
171 char *strscpy(char *dst, char *src, int buflen) {
172         dst[0] = 0;
173         return strscat(dst, src, buflen);
174 }
175
176 inline unsigned int
177 dev_major (unsigned long long int __dev)
178 {
179         return ((__dev >> 8) & 0xfff) | ((unsigned int) (__dev >> 32) & ~0xfff);
180 }
181
182 inline unsigned int
183 dev_minor (unsigned long long int __dev)
184 {
185         return (__dev & 0xff) | ((unsigned int) (__dev >> 12) & ~0xff);
186 }
187
188 int get_os_version()
189 {
190         static int version = 0;
191
192         if (!version) {
193                 int fd;
194                 char release[4] = "";
195
196                 fd = open("/proc/sys/kernel/osrelease", O_RDONLY);
197                 if (fd < 0) {
198                         fprintf(stderr, "%s: Warning: Can't resolve kernel "
199                                 "version, assuming 2.6\n", progname);
200                 } else {
201                         if (read(fd, release, 4) < 0) {
202                                 fprintf(stderr, "reading from /proc/sys/kernel"
203                                         "/osrelease: %s\n", strerror(errno));
204                                 close(fd);
205                                 exit(-1);
206                         }
207                         close(fd);
208                 }
209                 if (strncmp(release, "2.4.", 4) == 0)
210                         version = 24;
211                 else
212                         version = 26;
213         }
214         return version;
215 }
216
217 static int check_mtab_entry(char *spec)
218 {
219         FILE *fp;
220         struct mntent *mnt;
221
222         fp = setmntent(MOUNTED, "r");
223         if (fp == NULL)
224                 return(0);
225
226         while ((mnt = getmntent(fp)) != NULL) {
227                 if (strcmp(mnt->mnt_fsname, spec) == 0) {
228                         endmntent(fp);
229                         fprintf(stderr, "%s: according to %s %s is "
230                                 "already mounted on %s\n",
231                                 progname, MOUNTED, spec, mnt->mnt_dir);
232                         return(EEXIST);
233                 }
234         }
235         endmntent(fp);
236
237         return(0);
238 }
239
240 /*============ disk dev functions ===================*/
241
242 /* Setup a file in the first unused loop_device */
243 int loop_setup(struct mkfs_opts *mop)
244 {
245         char loop_base[20];
246         char l_device[64];
247         int i, ret = 0;
248
249         /* Figure out the loop device names */
250         if (!access("/dev/loop0", F_OK | R_OK)) {
251                 strcpy(loop_base, "/dev/loop\0");
252         } else if (!access("/dev/loop/0", F_OK | R_OK)) {
253                 strcpy(loop_base, "/dev/loop/\0");
254         } else {
255                 fprintf(stderr, "%s: can't access loop devices\n", progname);
256                 return EACCES;
257         }
258
259         /* Find unused loop device */
260         for (i = 0; i < MAX_LOOP_DEVICES; i++) {
261                 char cmd[PATH_MAX];
262                 int cmdsz = sizeof(cmd);
263
264                 sprintf(l_device, "%s%d", loop_base, i);
265                 if (access(l_device, F_OK | R_OK))
266                         break;
267                 snprintf(cmd, cmdsz, "losetup %s > /dev/null 2>&1", l_device);
268                 ret = system(cmd);
269
270                 /* losetup gets 1 (ret=256) for non-set-up device */
271                 if (ret) {
272                         /* Set up a loopback device to our file */
273                         snprintf(cmd, cmdsz, "losetup %s %s", l_device,
274                                  mop->mo_device);
275                         ret = run_command(cmd, cmdsz);
276                         if (ret == 256)
277                                 /* someone else picked up this loop device
278                                  * behind our back */
279                                 continue;
280                         if (ret) {
281                                 fprintf(stderr, "%s: error %d on losetup: %s\n",
282                                         progname, ret, strerror(ret));
283                                 return ret;
284                         }
285                         strscpy(mop->mo_loopdev, l_device,
286                                 sizeof(mop->mo_loopdev));
287                         return ret;
288                 }
289         }
290
291         fprintf(stderr, "%s: out of loop devices!\n", progname);
292         return EMFILE;
293 }
294
295 int loop_cleanup(struct mkfs_opts *mop)
296 {
297         char cmd[150];
298         int ret = 1;
299         if ((mop->mo_flags & MO_IS_LOOP) && *mop->mo_loopdev) {
300                 sprintf(cmd, "losetup -d %s", mop->mo_loopdev);
301                 ret = run_command(cmd, sizeof(cmd));
302         }
303         return ret;
304 }
305
306 /* Determine if a device is a block device (as opposed to a file) */
307 int is_block(char* devname)
308 {
309         struct stat st;
310         int ret = 0;
311
312         ret = access(devname, F_OK);
313         if (ret != 0)
314                 return 0;
315         ret = stat(devname, &st);
316         if (ret != 0) {
317                 fprintf(stderr, "%s: cannot stat %s\n", progname, devname);
318                 return -1;
319         }
320         return S_ISBLK(st.st_mode);
321 }
322
323 __u64 get_device_size(char* device)
324 {
325         int ret, fd;
326         __u64 size = 0;
327
328         fd = open(device, O_RDONLY);
329         if (fd < 0) {
330                 fprintf(stderr, "%s: cannot open %s: %s\n",
331                         progname, device, strerror(errno));
332                 return 0;
333         }
334
335 #ifdef BLKGETSIZE64
336         /* size in bytes. bz5831 */
337         ret = ioctl(fd, BLKGETSIZE64, (void*)&size);
338 #else
339         {
340                 __u32 lsize = 0;
341                 /* size in blocks */
342                 ret = ioctl(fd, BLKGETSIZE, (void*)&lsize);
343                 size = (__u64)lsize * 512;
344         }
345 #endif
346         close(fd);
347         if (ret < 0) {
348                 fprintf(stderr, "%s: size ioctl failed: %s\n",
349                         progname, strerror(errno));
350                 return 0;
351         }
352
353         vprint("device size = "LPU64"MB\n", size >> 20);
354         /* return value in KB */
355         return size >> 10;
356 }
357
358 int loop_format(struct mkfs_opts *mop)
359 {
360         int ret = 0;
361
362         if (mop->mo_device_sz == 0) {
363                 fatal();
364                 fprintf(stderr, "loop device requires a --device-size= "
365                         "param\n");
366                 return EINVAL;
367         }
368
369         ret = creat(mop->mo_device, S_IRUSR|S_IWUSR);
370         if (ret < 0) {
371                 ret = errno;
372                 fprintf(stderr, "%s: Unable to create backing store: %d\n",
373                         progname, ret);
374         } else {
375                 close(ret);
376         }
377
378         ret = truncate(mop->mo_device, mop->mo_device_sz * 1024);
379         if (ret != 0) {
380                 ret = errno;
381                 fprintf(stderr, "%s: Unable to truncate backing store: %d\n",
382                         progname, ret);
383         }
384
385         return ret;
386 }
387
388 /* Display the need for the latest e2fsprogs to be installed. make_backfs
389  * indicates if the caller is make_lustre_backfs() or not. */
390 static void disp_old_e2fsprogs_msg(const char *feature, int make_backfs)
391 {
392         static int msg_displayed;
393
394         if (msg_displayed) {
395                 fprintf(stderr, "WARNING: %s does not support %s "
396                         "feature.\n\n", E2FSPROGS, feature);
397                 return;
398         }
399
400         msg_displayed++;
401
402         fprintf(stderr, "WARNING: The %s package currently installed on "
403                 "your system does not support \"%s\" feature.\n",
404                 E2FSPROGS, feature);
405 #if !(HAVE_LDISKFSPROGS)
406         fprintf(stderr, "Please install the latest version of e2fsprogs from\n"
407                 "http://downloads.lustre.org/public/tools/e2fsprogs/\n"
408                 "to enable this feature.\n");
409 #endif
410         if (make_backfs)
411                 fprintf(stderr, "Feature will not be enabled until %s"
412                         "is updated and '%s -O %s %%{device}' "
413                         "is run.\n\n", E2FSPROGS, TUNE2FS, feature);
414 }
415
416 /* Check whether the file exists in the device */
417 static int file_in_dev(char *file_name, char *dev_name)
418 {
419         FILE *fp;
420         char debugfs_cmd[256];
421         unsigned int inode_num;
422         int i;
423
424         /* Construct debugfs command line. */
425         snprintf(debugfs_cmd, sizeof(debugfs_cmd),
426                 "%s -c -R 'stat %s' '%s' 2>&1 | egrep '(Inode|unsupported)'",
427                 DEBUGFS, file_name, dev_name);
428
429         fp = popen(debugfs_cmd, "r");
430         if (!fp) {
431                 fprintf(stderr, "%s: %s\n", progname, strerror(errno));
432                 return 0;
433         }
434
435         if (fscanf(fp, "Inode: %u", &inode_num) == 1) { /* exist */
436                 pclose(fp);
437                 return 1;
438         }
439         i = fread(debugfs_cmd, 1, sizeof(debugfs_cmd), fp);
440         if (i) {
441                 debugfs_cmd[i] = 0;
442                 fprintf(stderr, "%s", debugfs_cmd);
443                 if (strstr(debugfs_cmd, "unsupported feature")) {
444                           disp_old_e2fsprogs_msg("an unknown", 0);
445                 }
446                 pclose(fp);
447                 return -1;
448         }
449         pclose(fp);
450         return 0;
451 }
452
453 /* Check whether the device has already been used with lustre */
454 static int is_lustre_target(struct mkfs_opts *mop)
455 {
456         int rc;
457
458         vprint("checking for existing Lustre data: ");
459
460         if ((rc = file_in_dev(MOUNT_DATA_FILE, mop->mo_device))) {
461                 vprint("found %s\n",
462                        (rc == 1) ? MOUNT_DATA_FILE : "extents");
463                  /* in the -1 case, 'extents' means this really IS a lustre
464                     target */
465                 return rc;
466         }
467
468         if ((rc = file_in_dev(LAST_RCVD, mop->mo_device))) {
469                 vprint("found %s\n", LAST_RCVD);
470                 return rc;
471         }
472
473         vprint("not found\n");
474         return 0; /* The device is not a lustre target. */
475 }
476
477 /* Check if a certain feature is supported by e2fsprogs.
478  * Firstly we try to use "debugfs supported_features" command to check if
479  * the feature is supported. If this fails we try to set this feature with
480  * mke2fs to check for its support. */
481 static int is_e2fsprogs_feature_supp(const char *feature)
482 {
483         static char supp_features[4096] = "";
484         FILE *fp;
485         char cmd[PATH_MAX];
486         char imgname[] = "/tmp/test-img-XXXXXX";
487         int fd = -1;
488         int ret = 1;
489
490         if (supp_features[0] == '\0') {
491                 snprintf(cmd, sizeof(cmd), "%s -c -R supported_features 2>&1",
492                          DEBUGFS);
493
494                 /* Using popen() instead of run_command() since debugfs does
495                  * not return proper error code if command is not supported */
496                 fp = popen(cmd, "r");
497                 if (!fp) {
498                         fprintf(stderr, "%s: %s\n", progname, strerror(errno));
499                         return 0;
500                 }
501                 ret = fread(supp_features, 1, sizeof(supp_features), fp);
502                 fclose(fp);
503         }
504         if (ret > 0 && strstr(supp_features,
505                               strncmp(feature, "-O ", 3) ? feature : feature+3))
506                 return 0;
507
508         if ((fd = mkstemp(imgname)) < 0)
509                 return -1;
510         else
511                 close(fd);
512
513         snprintf(cmd, sizeof(cmd), "%s -F %s %s 100 >/dev/null 2>&1",
514                  MKE2FS, feature, imgname);
515         /* run_command() displays the output of mke2fs when it fails for
516          * some feature, so use system() directly */
517         ret = system(cmd);
518         unlink(imgname);
519
520         return ret;
521 }
522
523 static void enable_default_ext4_features(struct mkfs_opts *mop)
524 {
525         if (IS_OST(&mop->mo_ldd))
526                 strscat(mop->mo_mkfsopts, " -O extents,uninit_bg",
527                         sizeof(mop->mo_mkfsopts));
528         else if (IS_MDT(&mop->mo_ldd))
529                 strscat(mop->mo_mkfsopts, " -O dirdata,uninit_bg",
530                         sizeof(mop->mo_mkfsopts));
531         else
532                 strscat(mop->mo_mkfsopts, " -O uninit_bg",
533                         sizeof(mop->mo_mkfsopts));
534
535         /* Multiple mount protection enabled only if failover node specified */
536         if (failover) {
537                 if (is_e2fsprogs_feature_supp("-O mmp") == 0)
538                         strscat(mop->mo_mkfsopts, ",mmp",
539                                 sizeof(mop->mo_mkfsopts));
540                 else
541                         disp_old_e2fsprogs_msg("mmp", 1);
542         }
543
544         /* Allow more than 65000 subdirectories */
545         if (is_e2fsprogs_feature_supp("-O dir_nlink") == 0)
546                 strscat(mop->mo_mkfsopts,",dir_nlink",sizeof(mop->mo_mkfsopts));
547
548 #ifdef HAVE_EXT4_LDISKFS
549         /* The following options are only valid for ext4-based ldiskfs.
550          * If --backfstype=ext3 is specified, do not enable them. */
551         if (mop->mo_ldd.ldd_mount_type == LDD_MT_EXT3)
552                 return;
553
554         /* Allow files larger than 2TB.  Also needs LU-16, but not harmful. */
555         if (is_e2fsprogs_feature_supp("-O huge_file") == 0)
556                 strscat(mop->mo_mkfsopts,",huge_file",sizeof(mop->mo_mkfsopts));
557
558         /* Cluster inode/block bitmaps and inode table for more efficient IO.
559          * Align the flex groups on a 1MB boundary for better performance.
560          * This -O feature needs to go last, since it adds an extra option. */
561         if (is_e2fsprogs_feature_supp("-O flex_bg") == 0) {
562                 char tmp_buf[64];
563
564                 strscat(mop->mo_mkfsopts, ",flex_bg", sizeof(mop->mo_mkfsopts));
565
566                 if (IS_OST(&mop->mo_ldd)) {
567                         snprintf(tmp_buf, sizeof(tmp_buf), " -G %u",
568                                  (1 << 20) / L_BLOCK_SIZE);
569                         strscat(mop->mo_mkfsopts, tmp_buf,
570                                 sizeof(mop->mo_mkfsopts));
571                 }
572         }
573 #endif
574 }
575
576 /* Build fs according to type */
577 int make_lustre_backfs(struct mkfs_opts *mop)
578 {
579         __u64 device_sz = mop->mo_device_sz, block_count = 0;
580         char mkfs_cmd[PATH_MAX];
581         char buf[64];
582         char *dev;
583         int ret = 0;
584
585         if (!(mop->mo_flags & MO_IS_LOOP)) {
586                 mop->mo_device_sz = get_device_size(mop->mo_device);
587
588                 if (mop->mo_device_sz == 0)
589                         return ENODEV;
590
591                 /* Compare to real size */
592                 if (device_sz == 0 || device_sz > mop->mo_device_sz)
593                         device_sz = mop->mo_device_sz;
594                 else
595                         mop->mo_device_sz = device_sz;
596         }
597
598         if (mop->mo_device_sz != 0) {
599                 if (mop->mo_device_sz < 8096){
600                         fprintf(stderr, "%s: size of filesystem must be larger "
601                                 "than 8MB, but is set to %lldKB\n",
602                                 progname, (long long)mop->mo_device_sz);
603                         return EINVAL;
604                 }
605                 block_count = mop->mo_device_sz / (L_BLOCK_SIZE >> 10);
606                 /* If the LUN size is just over 2^32 blocks, limit the
607                  * filesystem size to 2^32-1 blocks to avoid problems with
608                  * ldiskfs/mkfs not handling this size.  Bug 22906 */
609                 if (block_count > 0xffffffffULL && block_count < 0x100002000ULL)
610                         block_count = 0xffffffffULL;
611         }
612
613         if ((mop->mo_ldd.ldd_mount_type == LDD_MT_EXT3) ||
614             (mop->mo_ldd.ldd_mount_type == LDD_MT_LDISKFS) ||
615             (mop->mo_ldd.ldd_mount_type == LDD_MT_LDISKFS2)) {
616                 long inode_size = 0;
617
618                 /* Journal size in MB */
619                 if (strstr(mop->mo_mkfsopts, "-J") == NULL) {
620                         /* Choose our own default journal size */
621                         long journal_sz = 0, max_sz;
622                         if (device_sz > 1024 * 1024) /* 1GB */
623                                 journal_sz = (device_sz / 102400) * 4;
624                         /* cap journal size at 1GB */
625                         if (journal_sz > 1024L)
626                                 journal_sz = 1024L;
627                         /* man mkfs.ext3 */
628                         max_sz = (102400 * L_BLOCK_SIZE) >> 20; /* 400MB */
629                         if (journal_sz > max_sz)
630                                 journal_sz = max_sz;
631                         if (journal_sz) {
632                                 sprintf(buf, " -J size=%ld", journal_sz);
633                                 strscat(mop->mo_mkfsopts, buf,
634                                         sizeof(mop->mo_mkfsopts));
635                         }
636                 }
637
638                 /* Inode size (for extended attributes).  The LOV EA size is
639                  * 32 (EA hdr) + 32 (lov_mds_md) + stripes * 24 (lov_ost_data),
640                  * and we want some margin above that for ACLs, other EAs... */
641                 if (strstr(mop->mo_mkfsopts, "-I") == NULL) {
642                         if (IS_MDT(&mop->mo_ldd)) {
643                                 if (mop->mo_stripe_count > 72)
644                                         inode_size = 512; /* bz 7241 */
645                                         /* see also "-i" below for EA blocks */
646                                 else if (mop->mo_stripe_count > 32)
647                                         inode_size = 2048;
648                                 else if (mop->mo_stripe_count > 10)
649                                         inode_size = 1024;
650                                 else
651                                         inode_size = 512;
652                         } else if (IS_OST(&mop->mo_ldd)) {
653                                 /* We store MDS FID and OST objid in EA on OST
654                                  * we need to make inode bigger as well. */
655                                 inode_size = 256;
656                         }
657
658                         if (inode_size > 0) {
659                                 sprintf(buf, " -I %ld", inode_size);
660                                 strscat(mop->mo_mkfsopts, buf,
661                                         sizeof(mop->mo_mkfsopts));
662                         }
663                 }
664
665                 /* Bytes_per_inode: disk size / num inodes */
666                 if (strstr(mop->mo_mkfsopts, "-i") == NULL &&
667                     strstr(mop->mo_mkfsopts, "-N") == NULL) {
668                         long bytes_per_inode = 0;
669
670                         /* Allocate more inodes on MDT devices.  There is
671                          * no data stored on the MDT, and very little extra
672                          * metadata beyond the inode.  It could go down as
673                          * low as 1024 bytes, but this is conservative.
674                          * Account for external EA blocks for wide striping. */
675                         if (IS_MDT(&mop->mo_ldd)) {
676                                 bytes_per_inode = inode_size + 1536;
677
678                                 if (mop->mo_stripe_count > 72) {
679                                         int extra = mop->mo_stripe_count * 24;
680                                         extra = ((extra - 1) | 4095) + 1;
681                                         bytes_per_inode += extra;
682                                 }
683                         }
684
685                         /* Allocate fewer inodes on large OST devices.  Most
686                          * filesystems can be much more aggressive than even
687                          * this, but it is impossible to know in advance. */
688                         if (IS_OST(&mop->mo_ldd)) {
689                                 /* OST > 8TB assume average file size 1MB */
690                                 if (device_sz >= (8ULL << 30))
691                                         bytes_per_inode = 1024 * 1024;
692                                 /* OST > 1TB assume average file size 256kB */
693                                 else if (device_sz >= (1ULL << 30))
694                                         bytes_per_inode = 256 * 1024;
695                                 /* OST > 100GB assume average file size 64kB,
696                                  * plus a bit so that inodes will fit into a
697                                  * 256x flex_bg without overflowing */
698                                 else if (device_sz >= (10ULL << 20))
699                                         bytes_per_inode = 69905;
700                         }
701
702
703                         if (bytes_per_inode > 0) {
704                                 sprintf(buf, " -i %ld", bytes_per_inode);
705                                 strscat(mop->mo_mkfsopts, buf,
706                                         sizeof(mop->mo_mkfsopts));
707                         }
708                 }
709
710                 if (verbose < 2) {
711                         strscat(mop->mo_mkfsopts, " -q",
712                                 sizeof(mop->mo_mkfsopts));
713                 }
714
715                 if (strstr(mop->mo_mkfsopts, "-O") == NULL)
716                         enable_default_ext4_features(mop);
717
718                 /* In order to align the filesystem metadata on 1MB boundaries,
719                  * give a resize value that will reserve a power-of-two group
720                  * descriptor blocks, but leave one block for the superblock.
721                  * Only useful for filesystems with < 2^32 blocks due to resize
722                  * limitations. */
723                 if (IS_OST(&mop->mo_ldd) && mop->mo_device_sz > 100 * 1024 &&
724                     mop->mo_device_sz / L_BLOCK_SIZE <= 0xffffffff) {
725                         unsigned group_blocks = L_BLOCK_SIZE * 8;
726                         unsigned desc_per_block = L_BLOCK_SIZE / 32;
727                         unsigned resize_blks;
728
729                         resize_blks = (1ULL<<32) - desc_per_block*group_blocks;
730                         snprintf(buf, sizeof(buf)," -E resize=%u,",resize_blks);
731                 } else {
732                         strncpy(buf, " -E ", sizeof(buf));
733                 }
734
735                 /* Avoid zeroing out the full journal - speeds up mkfs */
736                 if (is_e2fsprogs_feature_supp("-E lazy_journal_init") == 0)
737                         strscat(buf, "lazy_journal_init,", sizeof(buf));
738
739                 if (strlen(buf) > strlen(" -E "))
740                         strscat(mop->mo_mkfsopts, buf,sizeof(mop->mo_mkfsopts));
741
742                 /* Allow reformat of full devices (as opposed to
743                    partitions.)  We already checked for mounted dev. */
744                 strscat(mop->mo_mkfsopts, " -F", sizeof(mop->mo_mkfsopts));
745
746                 snprintf(mkfs_cmd, sizeof(mkfs_cmd),
747                          "%s -j -b %d -L %s ", MKE2FS, L_BLOCK_SIZE,
748                          mop->mo_ldd.ldd_svname);
749         } else {
750                 fprintf(stderr,"%s: unsupported fs type: %d (%s)\n",
751                         progname, mop->mo_ldd.ldd_mount_type,
752                         MT_STR(&mop->mo_ldd));
753                 return EINVAL;
754         }
755
756         /* For loop device format the dev, not the filename */
757         dev = mop->mo_device;
758         if (mop->mo_flags & MO_IS_LOOP)
759                 dev = mop->mo_loopdev;
760
761         vprint("formatting backing filesystem %s on %s\n",
762                MT_STR(&mop->mo_ldd), dev);
763         vprint("\ttarget name  %s\n", mop->mo_ldd.ldd_svname);
764         vprint("\t4k blocks     "LPU64"\n", block_count);
765         vprint("\toptions       %s\n", mop->mo_mkfsopts);
766
767         /* mkfs_cmd's trailing space is important! */
768         strscat(mkfs_cmd, mop->mo_mkfsopts, sizeof(mkfs_cmd));
769         strscat(mkfs_cmd, " ", sizeof(mkfs_cmd));
770         strscat(mkfs_cmd, dev, sizeof(mkfs_cmd));
771         if (block_count != 0) {
772                 sprintf(buf, " "LPU64, block_count);
773                 strscat(mkfs_cmd, buf, sizeof(mkfs_cmd));
774         }
775
776         vprint("mkfs_cmd = %s\n", mkfs_cmd);
777         ret = run_command(mkfs_cmd, sizeof(mkfs_cmd));
778         if (ret) {
779                 fatal();
780                 fprintf(stderr, "Unable to build fs %s (%d)\n", dev, ret);
781         }
782         return ret;
783 }
784
785 /* ==================== Lustre config functions =============*/
786
787 void print_ldd(char *str, struct lustre_disk_data *ldd)
788 {
789         printf("\n   %s:\n", str);
790         printf("Target:     %s\n", ldd->ldd_svname);
791         if (ldd->ldd_svindex == INDEX_UNASSIGNED)
792                 printf("Index:      unassigned\n");
793         else
794                 printf("Index:      %d\n", ldd->ldd_svindex);
795         if (ldd->ldd_uuid[0])
796                 printf("UUID:       %s\n", (char *)ldd->ldd_uuid);
797         printf("Lustre FS:  %s\n", ldd->ldd_fsname);
798         printf("Mount type: %s\n", MT_STR(ldd));
799         printf("Flags:      %#x\n", ldd->ldd_flags);
800         printf("              (%s%s%s%s%s%s%s%s%s%s)\n",
801                IS_MDT(ldd) ? "MDT ":"",
802                IS_OST(ldd) ? "OST ":"",
803                IS_MGS(ldd) ? "MGS ":"",
804                ldd->ldd_flags & LDD_F_NEED_INDEX ? "needs_index ":"",
805                ldd->ldd_flags & LDD_F_VIRGIN     ? "first_time ":"",
806                ldd->ldd_flags & LDD_F_UPDATE     ? "update ":"",
807                ldd->ldd_flags & LDD_F_WRITECONF  ? "writeconf ":"",
808                ldd->ldd_flags & LDD_F_IAM_DIR  ? "IAM_dir_format ":"",
809                ldd->ldd_flags & LDD_F_NO_PRIMNODE? "no_primnode ":"",
810                ldd->ldd_flags & LDD_F_UPGRADE14  ? "upgrade1.4 ":"");
811         printf("Persistent mount opts: %s\n", ldd->ldd_mount_opts);
812         printf("Parameters:%s\n", ldd->ldd_params);
813         if (ldd->ldd_userdata[0])
814                 printf("Comment: %s\n", ldd->ldd_userdata);
815         printf("\n");
816 }
817
818 static int touch_file(char *filename)
819 {
820         int fd;
821
822         if (filename == NULL) {
823                 return 1;
824         }
825
826         fd = open(filename, O_CREAT | O_TRUNC, 0600);
827         if (fd < 0) {
828                 return 1;
829         } else {
830                 close(fd);
831                 return 0;
832         }
833 }
834
835 /* keep it less than LL_FID_NAMELEN */
836 #define DUMMY_FILE_NAME_LEN             25
837 #define EXT3_DIRENT_SIZE                DUMMY_FILE_NAME_LEN
838
839 /* Need to add these many entries to this directory to make HTREE dir. */
840 #define MIN_ENTRIES_REQ_FOR_HTREE       ((L_BLOCK_SIZE / EXT3_DIRENT_SIZE))
841
842 static int add_dummy_files(char *dir)
843 {
844         char fpname[PATH_MAX];
845         int i;
846         int rc;
847
848         for (i = 0; i < MIN_ENTRIES_REQ_FOR_HTREE; i++) {
849                 snprintf(fpname, PATH_MAX, "%s/%0*d", dir,
850                          DUMMY_FILE_NAME_LEN, i);
851
852                 rc = touch_file(fpname);
853                 if (rc && rc != -EEXIST) {
854                         fprintf(stderr,
855                                 "%s: Can't create dummy file %s: %s\n",
856                                 progname, fpname , strerror(errno));
857                         return rc;
858                 }
859         }
860         return 0;
861 }
862
863 static int __l_mkdir(char * filepnm, int mode , struct mkfs_opts *mop)
864 {
865         int ret;
866
867         ret = mkdir(filepnm, mode);
868         if (ret && ret != -EEXIST)
869                 return ret;
870
871         /* IAM mode supports ext3 directories of HTREE type only. So add dummy
872          * entries to new directory to create htree type of container for
873          * this directory. */
874         if (mop->mo_ldd.ldd_flags & LDD_F_IAM_DIR)
875                 return add_dummy_files(filepnm);
876         return 0;
877 }
878
879 /* Write the server config files */
880 int write_local_files(struct mkfs_opts *mop)
881 {
882         char mntpt[] = "/tmp/mntXXXXXX";
883         char filepnm[128];
884         char *dev;
885         FILE *filep;
886         int ret = 0;
887         size_t num;
888
889         /* Mount this device temporarily in order to write these files */
890         if (!mkdtemp(mntpt)) {
891                 fprintf(stderr, "%s: Can't create temp mount point %s: %s\n",
892                         progname, mntpt, strerror(errno));
893                 return errno;
894         }
895
896         dev = mop->mo_device;
897         if (mop->mo_flags & MO_IS_LOOP)
898                 dev = mop->mo_loopdev;
899
900         ret = mount(dev, mntpt, MT_STR(&mop->mo_ldd), 0,
901                     mop->mo_ldd.ldd_mount_opts);
902         if (ret) {
903                 fprintf(stderr, "%s: Unable to mount %s: %s\n",
904                         progname, dev, strerror(errno));
905                 ret = errno;
906                 if (errno == ENODEV) {
907                         fprintf(stderr, "Is the %s module available?\n",
908                                 MT_STR(&mop->mo_ldd));
909                 }
910                 goto out_rmdir;
911         }
912
913         /* Set up initial directories */
914         sprintf(filepnm, "%s/%s", mntpt, MOUNT_CONFIGS_DIR);
915         ret = __l_mkdir(filepnm, 0777, mop);
916         if ((ret != 0) && (errno != EEXIST)) {
917                 fprintf(stderr, "%s: Can't make configs dir %s (%s)\n",
918                         progname, filepnm, strerror(errno));
919                 goto out_umnt;
920         } else if (errno == EEXIST) {
921                 ret = 0;
922         }
923
924         /* Save the persistent mount data into a file. Lustre must pre-read
925            this file to get the real mount options. */
926         vprint("Writing %s\n", MOUNT_DATA_FILE);
927         sprintf(filepnm, "%s/%s", mntpt, MOUNT_DATA_FILE);
928         filep = fopen(filepnm, "w");
929         if (!filep) {
930                 fprintf(stderr, "%s: Unable to create %s file: %s\n",
931                         progname, filepnm, strerror(errno));
932                 goto out_umnt;
933         }
934         num = fwrite(&mop->mo_ldd, sizeof(mop->mo_ldd), 1, filep);
935         if (num < 1 && ferror(filep)) {
936                 fprintf(stderr, "%s: Unable to write to file (%s): %s\n",
937                         progname, filepnm, strerror(errno));
938                 goto out_umnt;
939         }
940         fclose(filep);
941         /* COMPAT_146 */
942 #ifdef TUNEFS
943         /* Check for upgrade */
944         if ((mop->mo_ldd.ldd_flags & (LDD_F_UPGRADE14 | LDD_F_SV_TYPE_MGS))
945             == (LDD_F_UPGRADE14 | LDD_F_SV_TYPE_MGS)) {
946                 char cmd[128];
947                 char *term;
948                 int cmdsz = sizeof(cmd);
949                 vprint("Copying old logs\n");
950
951                 /* Copy the old client log to fsname-client */
952                 sprintf(filepnm, "%s/%s/%s-client",
953                         mntpt, MOUNT_CONFIGS_DIR, mop->mo_ldd.ldd_fsname);
954                 snprintf(cmd, cmdsz, "cp %s/%s/client %s", mntpt, MDT_LOGS_DIR,
955                          filepnm);
956                 ret = run_command(cmd, cmdsz);
957                 if (ret) {
958                         fprintf(stderr, "%s: Can't copy 1.4 config %s/client "
959                                 "(%d)\n", progname, MDT_LOGS_DIR, ret);
960                         fprintf(stderr, "mount -t ldiskfs %s somewhere, "
961                                 "find the client log for fs %s and "
962                                 "copy it manually into %s/%s-client, "
963                                 "then umount.\n",
964                                 mop->mo_device,
965                                 mop->mo_ldd.ldd_fsname, MOUNT_CONFIGS_DIR,
966                                 mop->mo_ldd.ldd_fsname);
967                         goto out_umnt;
968                 }
969
970                 /* We need to use the old mdt log because otherwise mdt won't
971                    have complete lov if old clients connect before all
972                    servers upgrade. */
973                 /* Copy the old mdt log to fsname-MDT0000 (get old
974                    name from mdt_UUID) */
975                 ret = 1;
976                 strscpy(filepnm, (char *)mop->mo_ldd.ldd_uuid, sizeof(filepnm));
977                 term = strstr(filepnm, "_UUID");
978                 if (term) {
979                         *term = '\0';
980                         snprintf(cmd, cmdsz, "cp %s/%s/%s %s/%s/%s",
981                                  mntpt, MDT_LOGS_DIR, filepnm,
982                                  mntpt, MOUNT_CONFIGS_DIR,
983                                  mop->mo_ldd.ldd_svname);
984                         ret = run_command(cmd, cmdsz);
985                 }
986                 if (ret) {
987                         fprintf(stderr, "%s: Can't copy 1.4 config %s/%s "
988                                 "(%d)\n", progname, MDT_LOGS_DIR, filepnm, ret);
989                         fprintf(stderr, "mount -t ext3 %s somewhere, "
990                                 "find the MDT log for fs %s and "
991                                 "copy it manually into %s/%s, "
992                                 "then umount.\n",
993                                 mop->mo_device,
994                                 mop->mo_ldd.ldd_fsname, MOUNT_CONFIGS_DIR,
995                                 mop->mo_ldd.ldd_svname);
996                         goto out_umnt;
997                 }
998         }
999 #endif
1000         /* end COMPAT_146 */
1001
1002 out_umnt:
1003         umount(mntpt);
1004 out_rmdir:
1005         rmdir(mntpt);
1006         return ret;
1007 }
1008
1009 int read_local_files(struct mkfs_opts *mop)
1010 {
1011         char tmpdir[] = "/tmp/dirXXXXXX";
1012         char cmd[PATH_MAX];
1013         char filepnm[128];
1014         char *dev;
1015         FILE *filep;
1016         int ret = 0;
1017         int cmdsz = sizeof(cmd);
1018
1019         /* Make a temporary directory to hold Lustre data files. */
1020         if (!mkdtemp(tmpdir)) {
1021                 fprintf(stderr, "%s: Can't create temporary directory %s: %s\n",
1022                         progname, tmpdir, strerror(errno));
1023                 return errno;
1024         }
1025
1026         dev = mop->mo_device;
1027
1028         /* TODO: it's worth observing the get_mountdata() function that is
1029                  in mount_utils.c for getting the mountdata out of the
1030                  filesystem */
1031
1032         /* Construct debugfs command line. */
1033         snprintf(cmd, cmdsz, "%s -c -R 'dump /%s %s/mountdata' '%s'",
1034                  DEBUGFS, MOUNT_DATA_FILE, tmpdir, dev);
1035
1036         ret = run_command(cmd, cmdsz);
1037         if (ret)
1038                 verrprint("%s: Unable to dump %s dir (%d)\n",
1039                           progname, MOUNT_CONFIGS_DIR, ret);
1040
1041         sprintf(filepnm, "%s/mountdata", tmpdir);
1042         filep = fopen(filepnm, "r");
1043         if (filep) {
1044                 size_t num_read;
1045                 vprint("Reading %s\n", MOUNT_DATA_FILE);
1046                 num_read = fread(&mop->mo_ldd, sizeof(mop->mo_ldd), 1, filep);
1047                 if (num_read < 1 && ferror(filep)) {
1048                         fprintf(stderr, "%s: Unable to read from file %s: %s\n",
1049                                 progname, filepnm, strerror(errno));
1050                         goto out_close;
1051                 }
1052         } else {
1053                 /* COMPAT_146 */
1054                 /* Try to read pre-1.6 config from last_rcvd */
1055                 struct lr_server_data lsd;
1056                 verrprint("%s: Unable to read %d.%d config %s.\n",
1057                           progname, LUSTRE_MAJOR, LUSTRE_MINOR, filepnm);
1058
1059                 verrprint("Trying 1.4 config from last_rcvd\n");
1060                 sprintf(filepnm, "%s/%s", tmpdir, LAST_RCVD);
1061
1062                 /* Construct debugfs command line. */
1063                 snprintf(cmd, cmdsz, "%s -c -R 'dump /%s %s' %s",
1064                          DEBUGFS, LAST_RCVD, filepnm, dev);
1065
1066                 ret = run_command(cmd, cmdsz);
1067                 if (ret) {
1068                         fprintf(stderr, "%s: Unable to dump %s file (%d)\n",
1069                                 progname, LAST_RCVD, ret);
1070                         goto out_rmdir;
1071                 }
1072
1073                 filep = fopen(filepnm, "r");
1074                 if (!filep) {
1075                         fprintf(stderr, "%s: Unable to open %s: %s\n",
1076                                 progname, filepnm, strerror(errno));
1077                         ret = errno;
1078                         verrprint("Contents of %s:\n", tmpdir);
1079                         verbose+=2;
1080                         snprintf(cmd, cmdsz, "ls -l %s/", tmpdir);
1081                         run_command(cmd, cmdsz);
1082                         verrprint("Contents of disk:\n");
1083                         snprintf(cmd, cmdsz, "%s -c -R 'ls -l /' %s",
1084                                  DEBUGFS, dev);
1085                         run_command(cmd, cmdsz);
1086
1087                         goto out_rmdir;
1088                 }
1089                 vprint("Reading %s\n", LAST_RCVD);
1090                 ret = fread(&lsd, 1, sizeof(lsd), filep);
1091                 if (ret < sizeof(lsd)) {
1092                         fprintf(stderr, "%s: Short read (%d of %d)\n",
1093                                 progname, ret, (int)sizeof(lsd));
1094                         ret = ferror(filep);
1095                         if (ret)
1096                                 goto out_close;
1097                 }
1098                 vprint("Feature compat=%x, incompat=%x\n",
1099                        lsd.lsd_feature_compat, lsd.lsd_feature_incompat);
1100
1101                 if ((lsd.lsd_feature_compat & OBD_COMPAT_OST) ||
1102                     (lsd.lsd_feature_incompat & OBD_INCOMPAT_OST)) {
1103                         mop->mo_ldd.ldd_flags = LDD_F_SV_TYPE_OST;
1104                         mop->mo_ldd.ldd_svindex = lsd.lsd_ost_index;
1105                 } else if ((lsd.lsd_feature_compat & OBD_COMPAT_MDT) ||
1106                            (lsd.lsd_feature_incompat & OBD_INCOMPAT_MDT)) {
1107                         /* We must co-locate so mgs can see old logs.
1108                            If user doesn't want this, they can copy the old
1109                            logs manually and re-tunefs. */
1110                         mop->mo_ldd.ldd_flags =
1111                                 LDD_F_SV_TYPE_MDT | LDD_F_SV_TYPE_MGS;
1112                         mop->mo_ldd.ldd_svindex = lsd.lsd_mdt_index;
1113                 } else  {
1114                         /* If neither is set, we're pre-1.4.6, make a guess. */
1115                         /* Construct debugfs command line. */
1116                         snprintf(cmd, cmdsz, "%s -c -R 'rdump /%s %s' %s",
1117                                  DEBUGFS, MDT_LOGS_DIR, tmpdir, dev);
1118                         run_command(cmd, cmdsz);
1119
1120                         sprintf(filepnm, "%s/%s", tmpdir, MDT_LOGS_DIR);
1121                         if (lsd.lsd_ost_index > 0) {
1122                                 mop->mo_ldd.ldd_flags = LDD_F_SV_TYPE_OST;
1123                                 mop->mo_ldd.ldd_svindex = lsd.lsd_ost_index;
1124                         } else {
1125                                 /* If there's a LOGS dir, it's an MDT */
1126                                 if ((ret = access(filepnm, F_OK)) == 0) {
1127                                         mop->mo_ldd.ldd_flags =
1128                                         LDD_F_SV_TYPE_MDT |
1129                                         LDD_F_SV_TYPE_MGS;
1130                                         /* Old MDT's are always index 0
1131                                            (pre CMD) */
1132                                         mop->mo_ldd.ldd_svindex = 0;
1133                                 } else {
1134                                         /* The index may not be correct */
1135                                         mop->mo_ldd.ldd_flags =
1136                                         LDD_F_SV_TYPE_OST | LDD_F_NEED_INDEX;
1137                                         verrprint("OST with unknown index\n");
1138                                 }
1139                         }
1140                 }
1141
1142                 ret = 0;
1143                 memcpy(mop->mo_ldd.ldd_uuid, lsd.lsd_uuid,
1144                        sizeof(mop->mo_ldd.ldd_uuid));
1145                 mop->mo_ldd.ldd_flags |= LDD_F_UPGRADE14;
1146         }
1147         /* end COMPAT_146 */
1148 out_close:
1149         fclose(filep);
1150
1151 out_rmdir:
1152         snprintf(cmd, cmdsz, "rm -rf %s", tmpdir);
1153         run_command(cmd, cmdsz);
1154         if (ret)
1155                 verrprint("Failed to read old data (%d)\n", ret);
1156         return ret;
1157 }
1158
1159
1160 void set_defaults(struct mkfs_opts *mop)
1161 {
1162         mop->mo_ldd.ldd_magic = LDD_MAGIC;
1163         mop->mo_ldd.ldd_config_ver = 1;
1164         mop->mo_ldd.ldd_flags = LDD_F_NEED_INDEX | LDD_F_UPDATE | LDD_F_VIRGIN;
1165         mop->mo_mgs_failnodes = 0;
1166         strcpy(mop->mo_ldd.ldd_fsname, "lustre");
1167         mop->mo_ldd.ldd_mount_type = LDD_MT_LDISKFS;
1168
1169         mop->mo_ldd.ldd_svindex = INDEX_UNASSIGNED;
1170         mop->mo_stripe_count = 1;
1171 }
1172
1173 static inline void badopt(const char *opt, char *type)
1174 {
1175         fprintf(stderr, "%s: '--%s' only valid for %s\n",
1176                 progname, opt, type);
1177         usage(stderr);
1178 }
1179
1180 static int add_param(char *buf, char *key, char *val)
1181 {
1182         int end = sizeof(((struct lustre_disk_data *)0)->ldd_params);
1183         int start = strlen(buf);
1184         int keylen = 0;
1185
1186         if (key)
1187                 keylen = strlen(key);
1188         if (start + 1 + keylen + strlen(val) >= end) {
1189                 fprintf(stderr, "%s: params are too long-\n%s %s%s\n",
1190                         progname, buf, key ? key : "", val);
1191                 return 1;
1192         }
1193
1194         sprintf(buf + start, " %s%s", key ? key : "", val);
1195         return 0;
1196 }
1197
1198 /* from mount_lustre */
1199 /* Get rid of symbolic hostnames for tcp, since kernel can't do lookups */
1200 #define MAXNIDSTR 1024
1201 static char *convert_hostnames(char *s1)
1202 {
1203         char *converted, *s2 = 0, *c, *end, sep;
1204         int left = MAXNIDSTR;
1205         lnet_nid_t nid;
1206
1207         converted = malloc(left);
1208         if (converted == NULL) {
1209                 return NULL;
1210         }
1211
1212         end = s1 + strlen(s1);
1213         c = converted;
1214         while ((left > 0) && (s1 < end)) {
1215                 s2 = strpbrk(s1, ",:");
1216                 if (!s2)
1217                         s2 = end;
1218                 sep = *s2;
1219                 *s2 = '\0';
1220                 nid = libcfs_str2nid(s1);
1221
1222                 if (nid == LNET_NID_ANY) {
1223                         fprintf(stderr, "%s: Can't parse NID '%s'\n",
1224                                 progname, s1);
1225                         free(converted);
1226                         return NULL;
1227                 }
1228                 if (strncmp(libcfs_nid2str(nid), "127.0.0.1",
1229                             strlen("127.0.0.1")) == 0) {
1230                         fprintf(stderr, "%s: The NID '%s' resolves to the "
1231                                 "loopback address '%s'.  Lustre requires a "
1232                                 "non-loopback address.\n",
1233                                 progname, s1, libcfs_nid2str(nid));
1234                         free(converted);
1235                         return NULL;
1236                 }
1237
1238                 c += snprintf(c, left, "%s%c", libcfs_nid2str(nid), sep);
1239                 left = converted + MAXNIDSTR - c;
1240                 s1 = s2 + 1;
1241         }
1242         return converted;
1243 }
1244
1245 int parse_opts(int argc, char *const argv[], struct mkfs_opts *mop,
1246                char **mountopts)
1247 {
1248         static struct option long_opt[] = {
1249                 {"iam-dir", 0, 0, 'a'},
1250                 {"backfstype", 1, 0, 'b'},
1251                 {"stripe-count-hint", 1, 0, 'c'},
1252                 {"comment", 1, 0, 'u'},
1253                 {"configdev", 1, 0, 'C'},
1254                 {"device-size", 1, 0, 'd'},
1255                 {"dryrun", 0, 0, 'n'},
1256                 {"erase-params", 0, 0, 'e'},
1257                 {"failnode", 1, 0, 'f'},
1258                 {"failover", 1, 0, 'f'},
1259                 {"mgs", 0, 0, 'G'},
1260                 {"help", 0, 0, 'h'},
1261                 {"index", 1, 0, 'i'},
1262                 {"mkfsoptions", 1, 0, 'k'},
1263                 {"mgsnode", 1, 0, 'm'},
1264                 {"mgsnid", 1, 0, 'm'},
1265                 {"mdt", 0, 0, 'M'},
1266                 {"fsname",1, 0, 'L'},
1267                 {"noformat", 0, 0, 'n'},
1268                 {"nomgs", 0, 0, 'N'},
1269                 {"mountfsoptions", 1, 0, 'o'},
1270                 {"ost", 0, 0, 'O'},
1271                 {"param", 1, 0, 'p'},
1272                 {"print", 0, 0, 'n'},
1273                 {"quiet", 0, 0, 'q'},
1274                 {"reformat", 0, 0, 'r'},
1275                 {"servicenode", 1, 0, 's'},
1276                 {"verbose", 0, 0, 'v'},
1277                 {"writeconf", 0, 0, 'w'},
1278                 {"upgrade_to_18", 0, 0, 'U'},
1279                 {"network", 1, 0, 't'},
1280                 {0, 0, 0, 0}
1281         };
1282         char *optstring = "b:c:C:d:ef:Ghi:k:L:m:MnNo:Op:Pqrs:t:Uu:vw";
1283         int opt;
1284         int rc, longidx;
1285         int failnode_set = 0, servicenode_set = 0;
1286
1287         while ((opt = getopt_long(argc, argv, optstring, long_opt, &longidx)) !=
1288                EOF) {
1289                 switch (opt) {
1290                 case 'a': {
1291                         if (IS_MDT(&mop->mo_ldd))
1292                                 mop->mo_ldd.ldd_flags |= LDD_F_IAM_DIR;
1293                         break;
1294                 }
1295                 case 'b': {
1296                         int i = 0;
1297                         while (i < LDD_MT_LAST) {
1298                                 if (strcmp(optarg, mt_str(i)) == 0) {
1299                                         mop->mo_ldd.ldd_mount_type = i;
1300                                         break;
1301                                 }
1302                                 i++;
1303                         }
1304                         break;
1305                 }
1306                 case 'c':
1307                         if (IS_MDT(&mop->mo_ldd)) {
1308                                 int stripe_count = atol(optarg);
1309                                 if (stripe_count <= 0) {
1310                                         fprintf(stderr, "%s: bad stripe count "
1311                                                 "%d\n", progname, stripe_count);
1312                                         return 1;
1313                                 }
1314                                 mop->mo_stripe_count = stripe_count;
1315                         } else {
1316                                 badopt(long_opt[longidx].name, "MDT");
1317                                 return 1;
1318                         }
1319                         break;
1320                 case 'C': /* Configdev */
1321                         //FIXME
1322                         printf("Configdev not implemented\n");
1323                         return 1;
1324                 case 'd':
1325                         mop->mo_device_sz = atol(optarg);
1326                         break;
1327                 case 'e':
1328                         mop->mo_ldd.ldd_params[0] = '\0';
1329                         /* Must update the mgs logs */
1330                         mop->mo_ldd.ldd_flags |= LDD_F_UPDATE;
1331                         break;
1332                 case 'f':
1333                 case 's': {
1334                         char *nids;
1335
1336                         if ((opt == 'f' && servicenode_set)
1337                             || (opt == 's' && failnode_set)) {
1338                                 fprintf(stderr, "%s: %s cannot use with --%s\n",
1339                                         progname, long_opt[longidx].name,
1340                                         opt == 'f' ? "servicenode" : "failnode");
1341                                 return 1;
1342                         }
1343
1344                         nids = convert_hostnames(optarg);
1345                         if (!nids)
1346                                 return 1;
1347                         rc = add_param(mop->mo_ldd.ldd_params, PARAM_FAILNODE,
1348                                        nids);
1349                         free(nids);
1350                         if (rc)
1351                                 return rc;
1352                         /* Must update the mgs logs */
1353                         mop->mo_ldd.ldd_flags |= LDD_F_UPDATE;
1354                         if (opt == 'f') {
1355                                 failnode_set = 1;
1356                         } else {
1357                                 mop->mo_ldd.ldd_flags |= LDD_F_NO_PRIMNODE;
1358                                 servicenode_set = 1;
1359                         }
1360                         failover = 1;
1361                         break;
1362                 }
1363                 case 'G':
1364                         mop->mo_ldd.ldd_flags |= LDD_F_SV_TYPE_MGS;
1365                         break;
1366                 case 'h':
1367                         usage(stdout);
1368                         return 1;
1369                 case 'i':
1370                         if (!(mop->mo_ldd.ldd_flags &
1371                               (LDD_F_UPGRADE14 | LDD_F_VIRGIN |
1372                                LDD_F_WRITECONF))) {
1373                                 fprintf(stderr, "%s: cannot change the index of"
1374                                         " a registered target\n", progname);
1375                                 return 1;
1376                         }
1377                         if (IS_MDT(&mop->mo_ldd) || IS_OST(&mop->mo_ldd)) {
1378                                 mop->mo_ldd.ldd_svindex = atol(optarg);
1379                                 mop->mo_ldd.ldd_flags &= ~LDD_F_NEED_INDEX;
1380                         } else {
1381                                 badopt(long_opt[longidx].name, "MDT,OST");
1382                                 return 1;
1383                         }
1384                         break;
1385                 case 'k':
1386                         strscpy(mop->mo_mkfsopts, optarg,
1387                                 sizeof(mop->mo_mkfsopts));
1388                         break;
1389                 case 'L': {
1390                         char *tmp;
1391                         if (!(mop->mo_flags & MO_FORCEFORMAT) &&
1392                             (!(mop->mo_ldd.ldd_flags &
1393                                (LDD_F_UPGRADE14 | LDD_F_VIRGIN |
1394                                 LDD_F_WRITECONF)))) {
1395                                 fprintf(stderr, "%s: cannot change the name of"
1396                                         " a registered target\n", progname);
1397                                 return 1;
1398                         }
1399                         if ((strlen(optarg) < 1) || (strlen(optarg) > 8)) {
1400                                 fprintf(stderr, "%s: filesystem name must be "
1401                                         "1-8 chars\n", progname);
1402                                 return 1;
1403                         }
1404                         if ((tmp = strpbrk(optarg, "/:"))) {
1405                                 fprintf(stderr, "%s: char '%c' not allowed in "
1406                                         "filesystem name\n", progname, *tmp);
1407                                 return 1;
1408                         }
1409                         strscpy(mop->mo_ldd.ldd_fsname, optarg,
1410                                 sizeof(mop->mo_ldd.ldd_fsname));
1411                         break;
1412                 }
1413                 case 'm': {
1414                         char *nids = convert_hostnames(optarg);
1415                         if (!nids)
1416                                 return 1;
1417                         rc = add_param(mop->mo_ldd.ldd_params, PARAM_MGSNODE,
1418                                        nids);
1419                         free(nids);
1420                         if (rc)
1421                                 return rc;
1422                         mop->mo_mgs_failnodes++;
1423                         break;
1424                 }
1425                 case 'M':
1426                         mop->mo_ldd.ldd_flags |= LDD_F_SV_TYPE_MDT;
1427                         break;
1428                 case 'n':
1429                         print_only++;
1430                         break;
1431                 case 'N':
1432                         mop->mo_ldd.ldd_flags &= ~LDD_F_SV_TYPE_MGS;
1433                         break;
1434                 case 'o':
1435                         *mountopts = optarg;
1436                         break;
1437                 case 'O':
1438                         mop->mo_ldd.ldd_flags |= LDD_F_SV_TYPE_OST;
1439                         break;
1440                 case 'p':
1441                         rc = add_param(mop->mo_ldd.ldd_params, NULL, optarg);
1442                         if (rc)
1443                                 return rc;
1444                         /* Must update the mgs logs */
1445                         mop->mo_ldd.ldd_flags |= LDD_F_UPDATE;
1446                         break;
1447                 case 'q':
1448                         verbose--;
1449                         break;
1450                 case 'r':
1451                         mop->mo_flags |= MO_FORCEFORMAT;
1452                         break;
1453                 case 't':
1454                         if (!IS_MDT(&mop->mo_ldd) && !IS_OST(&mop->mo_ldd)) {
1455                                 badopt(long_opt[longidx].name, "MDT,OST");
1456                                 return 1;
1457                         }
1458
1459                         if (!optarg)
1460                                 return 1;
1461
1462                         rc = add_param(mop->mo_ldd.ldd_params,
1463                                        PARAM_NETWORK, optarg);
1464                         if (rc != 0)
1465                                 return rc;
1466                         /* Must update the mgs logs */
1467                         mop->mo_ldd.ldd_flags |= LDD_F_UPDATE;
1468                         break;
1469                 case 'u':
1470                         strscpy(mop->mo_ldd.ldd_userdata, optarg,
1471                                 sizeof(mop->mo_ldd.ldd_userdata));
1472                         break;
1473                 case 'v':
1474                         verbose++;
1475                         break;
1476                 case 'w':
1477                         mop->mo_ldd.ldd_flags |= LDD_F_WRITECONF;
1478                         break;
1479                 case 'U':
1480                         upgrade_to_18 = 1;
1481                         break;
1482                 default:
1483                         if (opt != '?') {
1484                                 fatal();
1485                                 fprintf(stderr, "Unknown option '%c'\n", opt);
1486                         }
1487                         return EINVAL;
1488                 }
1489         }//while
1490
1491         /* Last arg is device */
1492         if (optind != argc - 1) {
1493                 fatal();
1494                 fprintf(stderr, "Bad argument: %s\n", argv[optind]);
1495                 return EINVAL;
1496         }
1497
1498         /* single argument: <device> */
1499         if (argc == 2)
1500                 ++print_only;
1501
1502         return 0;
1503 }
1504
1505 /* Search for opt in mntlist, returning true if found.
1506  */
1507 static int in_mntlist(char *opt, char *mntlist)
1508 {
1509         char *ml, *mlp, *item, *ctx = NULL;
1510
1511         if (!(ml = strdup(mntlist))) {
1512                 fprintf(stderr, "%s: out of memory\n", progname);
1513                 exit(1);
1514         }
1515         mlp = ml;
1516         while ((item = strtok_r(mlp, ",", &ctx))) {
1517                 if (!strcmp(opt, item))
1518                         break;
1519                 mlp = NULL;
1520         }
1521         free(ml);
1522         return (item != NULL);
1523 }
1524
1525 /* Issue a message on stderr for every item in wanted_mountopts that is not
1526  * present in mountopts.  The justwarn boolean toggles between error and
1527  * warning message.  Return an error count.
1528  */
1529 static int check_mountfsoptions(char *mountopts, char *wanted_mountopts,
1530                                 int justwarn)
1531 {
1532         char *ml, *mlp, *item, *ctx = NULL;
1533         int errors = 0;
1534
1535         if (!(ml = strdup(wanted_mountopts))) {
1536                 fprintf(stderr, "%s: out of memory\n", progname);
1537                 exit(1);
1538         }
1539         mlp = ml;
1540         while ((item = strtok_r(mlp, ",", &ctx))) {
1541                 if (!in_mntlist(item, mountopts)) {
1542                         fprintf(stderr, "%s: %s mount option `%s' is missing\n",
1543                                 progname, justwarn ? "Warning: default"
1544                                 : "Error: mandatory", item);
1545                         errors++;
1546                 }
1547                 mlp = NULL;
1548         }
1549         free(ml);
1550         return errors;
1551 }
1552
1553 /* Trim embedded white space, leading and trailing commas from string s.
1554  */
1555 static void trim_mountfsoptions(char *s)
1556 {
1557         char *p;
1558
1559         for (p = s; *p; ) {
1560                 if (isspace(*p)) {
1561                         memmove(p, p + 1, strlen(p + 1) + 1);
1562                         continue;
1563                 }
1564                 p++;
1565         }
1566
1567         while (s[0] == ',')
1568                 memmove(&s[0], &s[1], strlen(&s[1]) + 1);
1569
1570         p = s + strlen(s) - 1;
1571         while (p >= s && *p == ',')
1572                 *p-- = '\0';
1573 }
1574
1575 int main(int argc, char *const argv[])
1576 {
1577         struct mkfs_opts mop;
1578         struct lustre_disk_data *ldd;
1579         char *mountopts = NULL;
1580         char always_mountopts[512] = "";
1581         char default_mountopts[512] = "";
1582         int ret = 0;
1583
1584         if ((progname = strrchr(argv[0], '/')) != NULL)
1585                 progname++;
1586         else
1587                 progname = argv[0];
1588
1589         if ((argc < 2) || (argv[argc - 1][0] == '-')) {
1590                 usage(stderr);
1591                 return(EINVAL);
1592         }
1593
1594         memset(&mop, 0, sizeof(mop));
1595         set_defaults(&mop);
1596
1597         /* device is last arg */
1598         strscpy(mop.mo_device, argv[argc - 1], sizeof(mop.mo_device));
1599
1600         /* Are we using a loop device? */
1601         ret = is_block(mop.mo_device);
1602         if (ret < 0)
1603                 goto out;
1604         if (ret == 0)
1605                 mop.mo_flags |= MO_IS_LOOP;
1606
1607 #ifdef TUNEFS
1608         /* For tunefs, we must read in the old values before parsing any
1609            new ones. */
1610
1611         /* Check whether the disk has already been formatted by mkfs.lustre */
1612         ret = is_lustre_target(&mop);
1613         if (ret == 0) {
1614                 fatal();
1615                 fprintf(stderr, "Device %s has not been formatted with "
1616                         "mkfs.lustre\n", mop.mo_device);
1617                 ret = ENODEV;
1618                 goto out;
1619         }
1620
1621         ret = read_local_files(&mop);
1622         if (ret) {
1623                 fatal();
1624                 fprintf(stderr, "Failed to read previous Lustre data from %s "
1625                         "(%d)\n", mop.mo_device, ret);
1626                 goto out;
1627         }
1628         if (strstr(mop.mo_ldd.ldd_params, PARAM_MGSNODE))
1629             mop.mo_mgs_failnodes++;
1630
1631         if (verbose > 0)
1632                 print_ldd("Read previous values", &(mop.mo_ldd));
1633 #endif
1634
1635         ret = parse_opts(argc, argv, &mop, &mountopts);
1636         if (ret)
1637                 goto out;
1638
1639         ldd = &mop.mo_ldd;
1640
1641         if (!(IS_MDT(ldd) || IS_OST(ldd) || IS_MGS(ldd))) {
1642                 fatal();
1643                 fprintf(stderr, "must set target type: MDT,OST,MGS\n");
1644                 ret = EINVAL;
1645                 goto out;
1646         }
1647
1648         if (((IS_MDT(ldd) || IS_MGS(ldd))) && IS_OST(ldd)) {
1649                 fatal();
1650                 fprintf(stderr, "OST type is exclusive with MDT,MGS\n");
1651                 ret = EINVAL;
1652                 goto out;
1653         }
1654
1655         if ((mop.mo_ldd.ldd_flags & (LDD_F_NEED_INDEX | LDD_F_UPGRADE14)) ==
1656             (LDD_F_NEED_INDEX | LDD_F_UPGRADE14)) {
1657                 fatal();
1658                 fprintf(stderr, "Can't find the target index, "
1659                         "specify with --index\n");
1660                 ret = EINVAL;
1661                 goto out;
1662         }
1663 #if 0
1664         /*
1665          * Comment out these 2 checks temporarily, since for multi-MDSes
1666          * in single node only 1 mds node could have mgs service
1667          */
1668         if (IS_MDT(ldd) && !IS_MGS(ldd) && (mop.mo_mgs_failnodes == 0)) {
1669                 verrprint("No management node specified, adding MGS to this "
1670                           "MDT\n");
1671                 ldd->ldd_flags |= LDD_F_SV_TYPE_MGS;
1672         }
1673         if (!IS_MGS(ldd) && (mop.mo_mgs_failnodes == 0)) {
1674                 fatal();
1675                 if (IS_MDT(ldd))
1676                         fprintf(stderr, "Must specify --mgs or --mgsnode=\n");
1677                 else
1678                         fprintf(stderr, "Must specify --mgsnode=\n");
1679                 ret = EINVAL;
1680                 goto out;
1681         }
1682 #endif
1683
1684         /* These are the permanent mount options (always included) */
1685         switch (ldd->ldd_mount_type) {
1686         case LDD_MT_EXT3:
1687         case LDD_MT_LDISKFS:
1688         case LDD_MT_LDISKFS2:
1689                 strscat(default_mountopts, ",errors=remount-ro",
1690                         sizeof(default_mountopts));
1691                 if (IS_MDT(ldd) || IS_MGS(ldd))
1692                         strscat(always_mountopts, ",user_xattr",
1693                                 sizeof(always_mountopts));
1694                 /* NB: Files created while extents are enabled can only be read
1695                  * if mounted using the ext4 or ldiskfs filesystem type. */
1696                 if (IS_OST(ldd) &&
1697                     (ldd->ldd_mount_type == LDD_MT_LDISKFS ||
1698                      ldd->ldd_mount_type == LDD_MT_LDISKFS2)) {
1699                         strscat(default_mountopts, ",extents,mballoc",
1700                                 sizeof(default_mountopts));
1701                 }
1702                 break;
1703         default:
1704                 fatal();
1705                 fprintf(stderr, "unknown fs type %d '%s'\n",
1706                         ldd->ldd_mount_type,
1707                         MT_STR(ldd));
1708                 ret = EINVAL;
1709                 goto out;
1710         }
1711
1712         if (mountopts) {
1713                 trim_mountfsoptions(mountopts);
1714                 (void)check_mountfsoptions(mountopts, default_mountopts, 1);
1715                 if (check_mountfsoptions(mountopts, always_mountopts, 0)) {
1716                         ret = EINVAL;
1717                         goto out;
1718                 }
1719                 sprintf(ldd->ldd_mount_opts, "%s", mountopts);
1720         } else {
1721 #ifdef TUNEFS
1722                 if (ldd->ldd_mount_opts[0] == 0)
1723                         /* use the defaults unless old opts exist */
1724 #endif
1725                 {
1726                         sprintf(ldd->ldd_mount_opts, "%s%s",
1727                                 always_mountopts, default_mountopts);
1728                         trim_mountfsoptions(ldd->ldd_mount_opts);
1729                 }
1730         }
1731
1732         server_make_name(ldd->ldd_flags, ldd->ldd_svindex,
1733                          ldd->ldd_fsname, ldd->ldd_svname);
1734
1735         if (verbose >= 0)
1736                 print_ldd("Permanent disk data", ldd);
1737
1738         if (print_only) {
1739                 printf("exiting before disk write.\n");
1740                 goto out;
1741         }
1742
1743         if (check_mtab_entry(mop.mo_device))
1744                 return(EEXIST);
1745
1746         /* Create the loopback file */
1747         if (mop.mo_flags & MO_IS_LOOP) {
1748                 ret = access(mop.mo_device, F_OK);
1749                 if (ret)
1750                         ret = errno;
1751 #ifndef TUNEFS /* mkfs.lustre */
1752                 /* Reformat the loopback file */
1753                 if (ret || (mop.mo_flags & MO_FORCEFORMAT))
1754                         ret = loop_format(&mop);
1755 #endif
1756                 if (ret == 0)
1757                         ret = loop_setup(&mop);
1758                 if (ret) {
1759                         fatal();
1760                         fprintf(stderr, "Loop device setup for %s failed: %s\n",
1761                                 mop.mo_device, strerror(ret));
1762                         goto out;
1763                 }
1764         }
1765
1766 #ifndef TUNEFS /* mkfs.lustre */
1767         /* Check whether the disk has already been formatted by mkfs.lustre */
1768         if (!(mop.mo_flags & MO_FORCEFORMAT)) {
1769                 ret = is_lustre_target(&mop);
1770                 if (ret) {
1771                         fatal();
1772                         fprintf(stderr, "Device %s was previously formatted "
1773                                 "for lustre. Use --reformat to reformat it, "
1774                                 "or tunefs.lustre to modify.\n",
1775                                 mop.mo_device);
1776                         goto out;
1777                 }
1778         }
1779
1780         /* Format the backing filesystem */
1781         ret = make_lustre_backfs(&mop);
1782         if (ret != 0) {
1783                 fatal();
1784                 fprintf(stderr, "mkfs failed %d\n", ret);
1785                 goto out;
1786         }
1787 #endif
1788
1789         /* Write our config files */
1790         ret = write_local_files(&mop);
1791         if (ret != 0) {
1792                 fatal();
1793                 fprintf(stderr, "failed to write local files\n");
1794                 goto out;
1795         }
1796
1797 out:
1798         loop_cleanup(&mop);
1799
1800         /* Fix any crazy return values from system() */
1801         if (ret && ((ret & 255) == 0))
1802                 return (1);
1803         if (ret)
1804                 verrprint("%s: exiting with %d (%s)\n",
1805                           progname, ret, strerror(ret));
1806         return (ret);
1807 }