Whamcloud - gitweb
LU-6245 libcfs: remove libcfs userland time abstraction
[fs/lustre-release.git] / lustre / utils / mount_lustre.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.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2014, Intel Corporation.
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/mount_lustre.c
37  *
38  * Author: Robert Read <rread@clusterfs.com>
39  * Author: Nathan Rutman <nathan@clusterfs.com>
40  */
41
42 #ifndef _GNU_SOURCE
43 #define _GNU_SOURCE
44 #endif
45 #include <getopt.h>
46 #include <mntent.h>
47 #include <stdbool.h>
48 #include <stdlib.h>
49 #include <stdio.h>
50 #include <unistd.h>
51 #include <fcntl.h>
52 #include <errno.h>
53 #include <string.h>
54 #include <sys/mount.h>
55 #include <lustre_ver.h>
56 #include <ctype.h>
57 #include <limits.h>
58 #include <lnet/nidstr.h>
59 #include <lustre/lustre_idl.h>
60
61 #include "obdctl.h"
62 #include "mount_utils.h"
63
64 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 10, 53, 0)
65 /*
66  * LU-1783
67  * We only #include a kernel level include file here because
68  * important MS_ flag #defines are missing from the SLES version
69  * of sys/mount.h
70  * In the future if SLES updates sys/mount.h to have a more complete
71  * set of flag #defines we should stop including linux/fs.h
72  */
73 #if !defined(MS_RDONLY)
74 #include <linux/fs.h>
75 #endif
76 #endif
77
78 #ifdef HAVE_LIBMOUNT
79 # define WITH_LIBMOUNT  "(libmount)"
80 #else
81 # define WITH_LIBMOUNT  ""
82 #endif
83
84 #define MAXOPT 4096
85 #define MAX_RETRIES 99
86
87 int     verbose;
88 int     version;
89 char    *progname;
90
91 void usage(FILE *out)
92 {
93         fprintf(out, "\nThis mount helper should only be invoked via the "
94                 "mount (8) command,\ne.g. mount -t lustre dev dir\n\n");
95         fprintf(out, "usage: %s [-fhnvV] [-o <mntopt>] <device> <mountpt>\n",
96                 progname);
97         fprintf(out,
98                 "\t<device>: the disk device, or for a client:\n"
99                 "\t\t<mgmtnid>[:<altmgtnid>...]:/<filesystem>-client\n"
100                 "\t<filesystem>: name of the Lustre filesystem (e.g. lustre1)\n"
101                 "\t<mountpt>: filesystem mountpoint (e.g. /mnt/lustre)\n"
102                 "\t-f|--fake: fake mount (updates /etc/mtab)\n"
103                 "\t-o force|--force: force mount even if already in /etc/mtab\n"
104                 "\t-h|--help: print this usage message\n"
105                 "\t-n|--nomtab: do not update /etc/mtab after mount\n"
106                 "\t-v|--verbose: print verbose config settings\n"
107                 "\t-V|--version: output build version of the utility and exit\n"
108                 "\t<mntopt>: one or more comma separated of:\n"
109                 "\t\t(no)flock,(no)user_xattr,(no)acl\n"
110                 "\t\tabort_recov: abort server recovery handling\n"
111                 "\t\tnosvc: only start MGC/MGS obds\n"
112                 "\t\tnomgs: only start target obds, using existing MGS\n"
113                 "\t\tnoscrub: NOT auto start OI scrub unless start explicitly\n"
114                 "\t\tskip_lfsck: NOT auto resume the paused/crashed LFSCK\n"
115                 "\t\texclude=<ostname>[:<ostname>] : colon-separated list of "
116                 "inactive OSTs (e.g. lustre-OST0001)\n"
117                 "\t\tretry=<num>: number of times mount is retried by client\n"
118                 "\t\tmd_stripe_cache_size=<num>: set the raid stripe cache "
119                 "size for the underlying raid if present\n");
120         exit((out != stdout) ? EINVAL : 0);
121 }
122
123 /* Get rid of symbolic hostnames for tcp, since kernel can't do lookups */
124 #define MAXNIDSTR 1024
125 static char *convert_hostnames(char *s1)
126 {
127         char *converted, *s2 = 0, *c;
128         char sep;
129         int left = MAXNIDSTR;
130         lnet_nid_t nid;
131
132         converted = malloc(left);
133         if (converted == NULL) {
134                 fprintf(stderr, "out of memory: needed %d bytes\n",
135                         MAXNIDSTR);
136                 return NULL;
137         }
138         c = converted;
139         while ((left > 0) && (*s1 != '/')) {
140                 s2 = strpbrk(s1, ",:");
141                 if (!s2)
142                         goto out_free;
143                 sep = *s2;
144                 *s2 = '\0';
145                 nid = libcfs_str2nid(s1);
146                 *s2 = sep;                      /* back to original string */
147                 if (nid == LNET_NID_ANY)
148                         goto out_free;
149                 c += snprintf(c, left, "%s%c", libcfs_nid2str(nid), sep);
150                 left = converted + MAXNIDSTR - c;
151                 s1 = s2 + 1;
152         }
153         snprintf(c, left, "%s", s1);
154         return converted;
155 out_free:
156         fprintf(stderr, "%s: Can't parse NID '%s'\n", progname, s1);
157         free(converted);
158         return NULL;
159 }
160
161 /*****************************************************************************
162  *
163  * This part was cribbed from util-linux/mount/mount.c.  There was no clear
164  * license information, but many other files in the package are identified as
165  * GNU GPL, so it's a pretty safe bet that was their intent.
166  *
167  ****************************************************************************/
168 struct opt_map {
169         const char *opt;        /* option name */
170         int inv;                /* true if flag value should be inverted */
171         int mask;               /* flag mask value */
172 };
173
174 static const struct opt_map opt_map[] = {
175   /*"optname", inv,ms_mask */
176   /* These flags are parsed by mount, not lustre */
177   { "defaults", 0, 0         },      /* default options */
178   { "remount",  0, MS_REMOUNT},      /* remount with different options */
179   { "rw",       1, MS_RDONLY },      /* read-write */
180   { "ro",       0, MS_RDONLY },      /* read-only */
181   { "exec",     1, MS_NOEXEC },      /* permit execution of binaries */
182   { "noexec",   0, MS_NOEXEC },      /* don't execute binaries */
183   { "suid",     1, MS_NOSUID },      /* honor suid executables */
184   { "nosuid",   0, MS_NOSUID },      /* don't honor suid executables */
185   { "dev",      1, MS_NODEV  },      /* interpret device files  */
186   { "nodev",    0, MS_NODEV  },      /* don't interpret devices */
187   { "sync",     0, MS_SYNCHRONOUS},  /* synchronous I/O */
188   { "async",    1, MS_SYNCHRONOUS},  /* asynchronous I/O */
189   { "atime",    1, MS_NOATIME  },    /* set file access time on read */
190   { "noatime",  0, MS_NOATIME  },    /* do not set file access time on read */
191 #ifdef MS_NODIRATIME
192   { "diratime", 1, MS_NODIRATIME },  /* set file access time on read */
193   { "nodiratime",0,MS_NODIRATIME },  /* do not set file access time on read */
194 #endif
195 #ifdef MS_RELATIME
196   { "relatime", 0, MS_RELATIME },  /* set file access time on read */
197   { "norelatime",1,MS_RELATIME },  /* do not set file access time on read */
198 #endif
199 #ifdef MS_STRICTATIME
200   { "strictatime",0,MS_STRICTATIME },  /* update access time strictly */
201 #endif
202   { "auto",     0, 0         },      /* Can be mounted using -a */
203   { "noauto",   0, 0         },      /* Can only be mounted explicitly */
204   { "nousers",  1, 0         },      /* Forbid ordinary user to mount */
205   { "nouser",   1, 0         },      /* Forbid ordinary user to mount */
206   { "noowner",  1, 0         },      /* Device owner has no special privs */
207   { "_netdev",  0, 0         },      /* Device accessible only via network */
208   { "loop",     0, 0         },
209   { NULL,       0, 0         }
210 };
211 /****************************************************************************/
212
213 /* 1  = don't pass on to lustre
214    0  = pass on to lustre */
215 static int parse_one_option(const char *check, int *flagp)
216 {
217         const struct opt_map *opt;
218
219         for (opt = &opt_map[0]; opt->opt != NULL; opt++) {
220                 if (strncmp(check, opt->opt, strlen(opt->opt)) == 0) {
221                         if (opt->mask) {
222                                 if (opt->inv)
223                                         *flagp &= ~(opt->mask);
224                                 else
225                                         *flagp |= opt->mask;
226                         }
227                         return 1;
228                 }
229         }
230         /* Assume any unknown options are valid and pass them on.  The mount
231            will fail if lmd_parse, ll_options or ldiskfs doesn't recognize it.*/
232         return 0;
233 }
234
235 static void append_option(char *options, const char *one)
236 {
237         if (*options)
238                 strcat(options, ",");
239         strcat(options, one);
240 }
241
242 /* Replace options with subset of Lustre-specific options, and
243    fill in mount flags */
244 int parse_options(struct mount_opts *mop, char *orig_options, int *flagp)
245 {
246         char *options, *opt, *nextopt, *arg, *val;
247
248         options = calloc(strlen(orig_options) + 1, 1);
249         *flagp = 0;
250         nextopt = orig_options;
251         while ((opt = strsep(&nextopt, ","))) {
252                 if (!*opt)
253                         /* empty option */
254                         continue;
255
256                 /* Handle retries in a slightly different
257                  * manner */
258                 arg = opt;
259                 val = strchr(opt, '=');
260                 /* please note that some ldiskfs mount options are also in the form
261                  * of param=value. We should pay attention not to remove those
262                  * mount options, see bug 22097. */
263                 if (val && strncmp(arg, "md_stripe_cache_size", 20) == 0) {
264                         mop->mo_md_stripe_cache_size = atoi(val + 1);
265                 } else if (val && strncmp(arg, "retry", 5) == 0) {
266                         mop->mo_retry = atoi(val + 1);
267                         if (mop->mo_retry > MAX_RETRIES)
268                                 mop->mo_retry = MAX_RETRIES;
269                         else if (mop->mo_retry < 0)
270                                 mop->mo_retry = 0;
271                 } else if (val && strncmp(arg, "mgssec", 6) == 0) {
272                         append_option(options, opt);
273                 } else if (strncmp(arg, "nosvc", 5) == 0) {
274                         mop->mo_nosvc = 1;
275                         append_option(options, opt);
276                 } else if (strcmp(opt, "force") == 0) {
277                         /* XXX special check for 'force' option */
278                         ++mop->mo_force;
279                         printf("force: %d\n", mop->mo_force);
280                 } else if (parse_one_option(opt, flagp) == 0) {
281                         /* pass this on as an option */
282                         append_option(options, opt);
283                 }
284         }
285 #ifdef MS_STRICTATIME
286 #if LUSTRE_VERSION_CODE > OBD_OCD_VERSION(3, 2, 53, 0)
287         /*
288          * LU-1783
289          * In the future when upstream fixes land in all supported kernels
290          * we should stop forcing MS_STRICTATIME in lustre mounts.
291          * We override the kernel level default of MS_RELATIME for now
292          * due to a kernel vfs level bug in atime updates that fails
293          * to reset timestamps from the future.
294          */
295 #warn "remove MS_STRICTATIME override if kernel updates atime from the future"
296 #endif
297         /* set strictatime to default if NOATIME or RELATIME
298            not given explicit */
299         if (!(*flagp & (MS_NOATIME | MS_RELATIME)))
300                 *flagp |= MS_STRICTATIME;
301 #endif
302         strcpy(orig_options, options);
303         free(options);
304
305         return 0;
306 }
307
308 /* Add mgsnids from ldd params */
309 static int add_mgsnids(struct mount_opts *mop, char *options,
310                        const char *params)
311 {
312         char *ptr = (char *)params;
313         char tmp, *sep;
314
315         while ((ptr = strstr(ptr, PARAM_MGSNODE)) != NULL) {
316                 sep = strchr(ptr, ' ');
317                 if (sep != NULL) {
318                         tmp = *sep;
319                         *sep = '\0';
320                 }
321                 append_option(options, ptr);
322                 mop->mo_have_mgsnid++;
323                 if (sep) {
324                         *sep = tmp;
325                         ptr = sep;
326                 } else {
327                         break;
328                 }
329         }
330
331         return 0;
332 }
333
334 static int clear_update_ondisk(char *source, struct lustre_disk_data *ldd)
335 {
336         char wanted_mountopts[512] = "";
337         struct mkfs_opts mkop;
338         int ret;
339         int ret2;
340
341         memset(&mkop, 0, sizeof(mkop));
342         mkop.mo_ldd = *ldd;
343         mkop.mo_ldd.ldd_flags &= ~LDD_F_UPDATE;
344         if (strlen(source) > sizeof(mkop.mo_device)-1) {
345                 fatal();
346                 fprintf(stderr, "Device name too long: %s\n", source);
347                 return -E2BIG;
348         }
349         strncpy(mkop.mo_device, source, sizeof(mkop.mo_device));
350
351         ret = osd_prepare_lustre(&mkop,
352                                  wanted_mountopts, sizeof(wanted_mountopts));
353         if (ret) {
354                 fatal();
355                 fprintf(stderr, "Can't prepare device %s: %s\n",
356                         source, strerror(ret));
357                 return ret;
358         }
359
360         /* Create the loopback file */
361         if (mkop.mo_flags & MO_IS_LOOP) {
362                 ret = access(mkop.mo_device, F_OK);
363                 if (ret) {
364                         ret = errno;
365                         fatal();
366                         fprintf(stderr, "Can't access device %s: %s\n",
367                                         source, strerror(ret));
368                         return ret;
369                 }
370
371                 ret = loop_setup(&mkop);
372                 if (ret) {
373                         fatal();
374                         fprintf(stderr, "Loop device setup for %s failed: %s\n",
375                                         mkop.mo_device, strerror(ret));
376                         return ret;
377                 }
378         }
379         ret = osd_write_ldd(&mkop);
380         if (ret != 0) {
381                 fatal();
382                 fprintf(stderr, "failed to write local files: %s\n",
383                         strerror(ret));
384         }
385
386         ret2 = loop_cleanup(&mkop);
387         if (ret == 0)
388                 ret = ret2;
389
390         return ret;
391 }
392
393 static int parse_ldd(char *source, struct mount_opts *mop, char *options)
394 {
395         struct lustre_disk_data *ldd = &mop->mo_ldd;
396         char *cur, *start;
397         int rc;
398
399         rc = osd_is_lustre(source, &ldd->ldd_mount_type);
400         if (rc == 0) {
401                 fprintf(stderr, "%s: %s has not been formatted with mkfs.lustre"
402                         " or the backend filesystem type is not supported by "
403                         "this tool\n", progname, source);
404                 return ENODEV;
405         }
406
407         rc = osd_read_ldd(source, ldd);
408         if (rc) {
409                 fprintf(stderr, "%s: %s failed to read permanent mount"
410                         " data: %s\n", progname, source,
411                         rc >= 0 ? strerror(rc) : "");
412                 return rc;
413         }
414
415         if ((IS_MDT(ldd) || IS_OST(ldd)) &&
416             (ldd->ldd_flags & LDD_F_NEED_INDEX)) {
417                 fprintf(stderr, "%s: %s has no index assigned "
418                         "(probably formatted with old mkfs)\n",
419                         progname, source);
420                 return EINVAL;
421         }
422
423         if (ldd->ldd_flags & LDD_F_UPGRADE14) {
424                 fprintf(stderr, "%s: we cannot upgrade %s from this (very old) "
425                         "Lustre version\n", progname, source);
426                 return EINVAL;
427         }
428
429         if (ldd->ldd_flags & LDD_F_UPDATE)
430                 clear_update_ondisk(source, ldd);
431
432         /* Since we never rewrite ldd, ignore temp flags */
433         ldd->ldd_flags &= ~(LDD_F_VIRGIN | LDD_F_WRITECONF);
434
435         /* svname of the form lustre:OST1234 means never registered */
436         rc = strlen(ldd->ldd_svname);
437         if (strcmp(ldd->ldd_svname, "MGS") != 0) {
438                 if (rc < 8) {
439                         fprintf(stderr, "%s: invalid name '%s'\n",
440                                 progname, ldd->ldd_svname);
441                         return EINVAL;
442                 } else if (ldd->ldd_svname[rc - 8] == ':') {
443                         ldd->ldd_svname[rc - 8] = '-';
444                         ldd->ldd_flags |= LDD_F_VIRGIN;
445                 } else if (ldd->ldd_svname[rc - 8] == '=') {
446                         ldd->ldd_svname[rc - 8] = '-';
447                         ldd->ldd_flags |= LDD_F_WRITECONF;
448                 }
449         }
450         /* backend osd type */
451         append_option(options, "osd=");
452         strcat(options, mt_type(ldd->ldd_mount_type));
453
454         append_option(options, ldd->ldd_mount_opts);
455
456         if (!mop->mo_have_mgsnid) {
457                 /* Only use disk data if mount -o mgsnode=nid wasn't
458                  * specified */
459                 if (ldd->ldd_flags & LDD_F_SV_TYPE_MGS) {
460                         append_option(options, "mgs");
461                         mop->mo_have_mgsnid++;
462                 } else {
463                         add_mgsnids(mop, options, ldd->ldd_params);
464                 }
465         }
466         /* Better have an mgsnid by now */
467         if (!mop->mo_have_mgsnid) {
468                 fprintf(stderr, "%s: missing option mgsnode=<nid>\n",
469                         progname);
470                 return EINVAL;
471         }
472
473         if (ldd->ldd_flags & LDD_F_VIRGIN)
474                 append_option(options, "virgin");
475         if (ldd->ldd_flags & LDD_F_UPDATE)
476                 append_option(options, "update");
477         if (ldd->ldd_flags & LDD_F_WRITECONF)
478                 append_option(options, "writeconf");
479         if (ldd->ldd_flags & LDD_F_NO_PRIMNODE)
480                 append_option(options, "noprimnode");
481
482         /* prefix every lustre parameter with param= so that in-kernel
483          * mount can recognize them properly and send to MGS at registration */
484         start = ldd->ldd_params;
485         while (start && *start != '\0') {
486                 while (*start == ' ') start++;
487                 if (*start == '\0')
488                         break;
489                 cur = start;
490                 start = strchr(cur, ' ');
491                 if (start) {
492                         *start = '\0';
493                         start++;
494                 }
495                 append_option(options, "param=");
496                 strcat(options, cur);
497         }
498
499         /* svname must be last option */
500         append_option(options, "svname=");
501         strcat(options, ldd->ldd_svname);
502
503         return 0;
504 }
505
506 static void set_defaults(struct mount_opts *mop)
507 {
508         memset(mop, 0, sizeof(*mop));
509         mop->mo_usource = NULL;
510         mop->mo_source = NULL;
511         mop->mo_nomtab = 0;
512         mop->mo_fake = 0;
513         mop->mo_force = 0;
514         mop->mo_retry = 0;
515         mop->mo_have_mgsnid = 0;
516         mop->mo_md_stripe_cache_size = 16384;
517         mop->mo_orig_options = "";
518         mop->mo_nosvc = 0;
519 }
520
521 static int parse_opts(int argc, char *const argv[], struct mount_opts *mop)
522 {
523         static struct option long_opt[] = {
524                 {"fake", 0, 0, 'f'},
525                 {"force", 0, 0, 1},
526                 {"help", 0, 0, 'h'},
527                 {"nomtab", 0, 0, 'n'},
528                 {"options", 1, 0, 'o'},
529                 {"verbose", 0, 0, 'v'},
530                 {"version", 0, 0, 'V'},
531                 {0, 0, 0, 0}
532         };
533         char real_path[PATH_MAX] = {'\0'};
534         FILE *f;
535         char path[256], name[256];
536         size_t sz;
537         char *ptr;
538         int opt, rc;
539
540         while ((opt = getopt_long(argc, argv, "fhno:vV",
541                                   long_opt, NULL)) != EOF){
542                 switch (opt) {
543                 case 1:
544                         ++mop->mo_force;
545                         printf("force: %d\n", mop->mo_force);
546                         break;
547                 case 'f':
548                         ++mop->mo_fake;
549                         printf("fake: %d\n", mop->mo_fake);
550                         break;
551                 case 'h':
552                         usage(stdout);
553                         break;
554                 case 'n':
555                         ++mop->mo_nomtab;
556                         printf("nomtab: %d\n", mop->mo_nomtab);
557                         break;
558                 case 'o':
559                         mop->mo_orig_options = optarg;
560                         break;
561                 case 'v':
562                         ++verbose;
563                         break;
564                 case 'V':
565                         ++version;
566                         fprintf(stdout, "%s %s %s\n", progname,
567                                 LUSTRE_VERSION_STRING, WITH_LIBMOUNT);
568                         return 0;
569                 default:
570                         fprintf(stderr, "%s: unknown option '%c'\n",
571                                         progname, opt);
572                         usage(stderr);
573                         break;
574                 }
575         }
576
577         if (optind + 2 > argc) {
578                 fprintf(stderr, "%s: too few arguments\n", progname);
579                 usage(stderr);
580         }
581
582         mop->mo_usource = argv[optind];
583         if (!mop->mo_usource) {
584                 usage(stderr);
585         }
586
587         /**
588          * Try to get the real path to the device, in case it is a
589          * symbolic link for instance
590          */
591         if (realpath(mop->mo_usource, real_path) != NULL) {
592                 ptr = strrchr(real_path, '/');
593                 if (ptr && strncmp(ptr, "/dm-", 4) == 0 && isdigit(*(ptr + 4))) {
594                         snprintf(path, sizeof(path), "/sys/block/%s/dm/name", ptr+1);
595                         if ((f = fopen(path, "r"))) {
596                                 /* read "<name>\n" from sysfs */
597                                 if (fgets(name, sizeof(name), f) && (sz = strlen(name)) > 1) {
598                                         name[sz - 1] = '\0';
599                                         snprintf(real_path, sizeof(real_path), "/dev/mapper/%s", name);
600                                 }
601                                 fclose(f);
602                         }
603                 }
604                 mop->mo_usource = strdup(real_path);
605         }
606
607         ptr = strstr(mop->mo_usource, ":/");
608         if (ptr != NULL) {
609                 mop->mo_source = convert_hostnames(mop->mo_usource);
610                 if (!mop->mo_source)
611                         usage(stderr);
612         } else {
613                 mop->mo_source = strdup(mop->mo_usource);
614         }
615
616         if (realpath(argv[optind + 1], mop->mo_target) == NULL) {
617                 rc = errno;
618                 fprintf(stderr, "warning: %s: cannot resolve: %s\n",
619                                 argv[optind + 1], strerror(errno));
620                 return rc;
621         }
622
623         return 0;
624 }
625
626 int main(int argc, char *const argv[])
627 {
628         struct mount_opts mop;
629         char *options;
630         int i, rc, flags;
631
632         progname = strrchr(argv[0], '/');
633         progname = progname ? progname + 1 : argv[0];
634
635         set_defaults(&mop);
636
637         rc = parse_opts(argc, argv, &mop);
638         if (rc || version)
639                 return rc;
640
641         if (verbose) {
642                 for (i = 0; i < argc; i++)
643                         printf("arg[%d] = %s\n", i, argv[i]);
644                 printf("source = %s (%s), target = %s\n", mop.mo_usource,
645                        mop.mo_source, mop.mo_target);
646                 printf("options = %s\n", mop.mo_orig_options);
647         }
648
649         options = malloc(MAXOPT);
650         if (options == NULL) {
651                 fprintf(stderr, "can't allocate memory for options\n");
652                 return -1;
653         }
654         strcpy(options, mop.mo_orig_options);
655         rc = parse_options(&mop, options, &flags);
656         if (rc) {
657                 fprintf(stderr, "%s: can't parse options: %s\n",
658                         progname, options);
659                 return(EINVAL);
660         }
661
662         if (!mop.mo_force) {
663                 rc = check_mtab_entry(mop.mo_usource, mop.mo_source,
664                                       mop.mo_target, "lustre");
665                 if (rc && !(flags & MS_REMOUNT)) {
666                         fprintf(stderr, "%s: according to %s %s is "
667                                 "already mounted on %s\n", progname, MOUNTED,
668                                 mop.mo_usource, mop.mo_target);
669                         return(EEXIST);
670                 }
671                 if (!rc && (flags & MS_REMOUNT)) {
672                         fprintf(stderr, "%s: according to %s %s is "
673                                 "not already mounted on %s\n", progname, MOUNTED,
674                                 mop.mo_usource, mop.mo_target);
675                         return(ENOENT);
676                 }
677         }
678         if (flags & MS_REMOUNT)
679                 mop.mo_nomtab++;
680
681         rc = access(mop.mo_target, F_OK);
682         if (rc) {
683                 rc = errno;
684                 fprintf(stderr, "%s: %s inaccessible: %s\n", progname,
685                         mop.mo_target, strerror(errno));
686                 return rc;
687         }
688
689         if (strstr(mop.mo_usource, ":/") == NULL) {
690                 rc = osd_init();
691                 if (rc)
692                         return rc;
693
694                 rc = parse_ldd(mop.mo_source, &mop, options);
695                 if (rc)
696                         return rc;
697         }
698
699         /* In Linux 2.4, the target device doesn't get passed to any of our
700            functions.  So we'll stick it on the end of the options. */
701         append_option(options, "device=");
702         strcat(options, mop.mo_source);
703
704         if (verbose)
705                 printf("mounting device %s at %s, flags=%#x options=%s\n",
706                        mop.mo_source, mop.mo_target, flags, options);
707
708         if (strstr(mop.mo_usource, ":/") == NULL &&
709             osd_tune_lustre(mop.mo_source, &mop)) {
710                 if (verbose)
711                         fprintf(stderr, "%s: unable to set tunables for %s"
712                                         " (may cause reduced IO performance)\n",
713                                         argv[0], mop.mo_source);
714         }
715
716         if (!mop.mo_fake) {
717                 /* flags and target get to lustre_get_sb(), but not
718                  * lustre_fill_super().  Lustre ignores the flags, but mount
719                  * does not. */
720                 for (i = 0, rc = -EAGAIN; i <= mop.mo_retry && rc != 0; i++) {
721                         rc = mount(mop.mo_source, mop.mo_target, "lustre",
722                                    flags, (void *)options);
723                         if (rc == 0) {
724                                 /* change label from <fsname>:<index> to
725                                  * <fsname>-<index> to indicate the device has
726                                  *  been registered. only if the label is
727                                  *  supposed to be changed and target service
728                                  *  is supposed to start */
729                                 if (mop.mo_ldd.ldd_flags &
730                                    (LDD_F_VIRGIN | LDD_F_WRITECONF)) {
731                                         if (mop.mo_nosvc == 0)
732                                                 (void)osd_label_lustre(&mop);
733                                 }
734                         } else {
735                                 if (verbose) {
736                                         fprintf(stderr, "%s: mount %s at %s "
737                                                 "failed: %s retries left: "
738                                                 "%d\n", basename(progname),
739                                                 mop.mo_usource, mop.mo_target,
740                                                 strerror(errno),
741                                                 mop.mo_retry - i);
742                                 }
743
744                                 if (mop.mo_retry) {
745                                         int limit = i/2 > 5 ? i/2 : 5;
746
747                                         sleep(1 << limit);
748                                 } else {
749                                         rc = errno;
750                                 }
751                         }
752                 }
753         }
754
755         if (rc) {
756                 char *cli;
757
758                 rc = errno;
759
760                 cli = strrchr(mop.mo_usource, ':');
761                 if (cli && (strlen(cli) > 2))
762                         cli += 2;
763                 else
764                         cli = NULL;
765
766                 fprintf(stderr, "%s: mount %s at %s failed: %s\n", progname,
767                         mop.mo_usource, mop.mo_target, strerror(errno));
768                 if (errno == EBUSY)
769                         fprintf(stderr, "Is the backend filesystem mounted?\n"
770                                         "Check /etc/mtab and /proc/mounts\n");
771                 if (errno == ENODEV)
772                         fprintf(stderr, "Are the lustre modules loaded?\n"
773                                 "Check /etc/modprobe.conf and "
774                                 "/proc/filesystems\n");
775                 if (errno == ENOTBLK)
776                         fprintf(stderr, "Do you need -o loop?\n");
777                 if (errno == ENOMEDIUM)
778                         fprintf(stderr,
779                                 "This filesystem needs at least 1 OST\n");
780                 if (errno == ENOENT) {
781                         fprintf(stderr, "Is the MGS specification correct?\n");
782                         fprintf(stderr, "Is the filesystem name correct?\n");
783                         fprintf(stderr, "If upgrading, is the copied client log"
784                                 " valid? (see upgrade docs)\n");
785                 }
786                 if (errno == EALREADY)
787                         fprintf(stderr, "The target service is already running."
788                                 " (%s)\n", mop.mo_usource);
789                 if (errno == ENXIO)
790                         fprintf(stderr, "The target service failed to start "
791                                 "(bad config log?) (%s).  "
792                                 "See /var/log/messages.\n", mop.mo_usource);
793                 if (errno == EIO)
794                         fprintf(stderr, "Is the MGS running?\n");
795                 if (errno == EADDRINUSE)
796                         fprintf(stderr, "The target service's index is already "
797                                 "in use. (%s)\n", mop.mo_usource);
798                 if (errno == EINVAL) {
799                         fprintf(stderr, "This may have multiple causes.\n");
800                         if (cli)
801                                 fprintf(stderr, "Is '%s' the correct filesystem"
802                                         " name?\n", cli);
803                         fprintf(stderr, "Are the mount options correct?\n");
804                         fprintf(stderr, "Check the syslog for more info.\n");
805                 }
806
807                 /* May as well try to clean up loop devs */
808                 if (strncmp(mop.mo_usource, "/dev/loop", 9) == 0) {
809                         char cmd[256];
810                         int ret;
811                         sprintf(cmd, "/sbin/losetup -d %s", mop.mo_usource);
812                         if ((ret = system(cmd)) < 0)
813                                 rc = errno;
814                         else if (ret > 0)
815                                 rc = WEXITSTATUS(ret);
816                 }
817
818         } else {
819                 /* Deal with utab just for client. Note that we ignore
820                  * the return value here since it is not worth to fail
821                  * mount by prevent some rare cases */
822                 if (strstr(mop.mo_usource, ":/") != NULL)
823                         update_utab_entry(&mop);
824                 if (!mop.mo_nomtab) {
825                         rc = update_mtab_entry(mop.mo_usource, mop.mo_target,
826                                                "lustre", mop.mo_orig_options,
827                                                0, 0, 0);
828                 }
829         }
830
831         free(options);
832         /* mo_usource should be freed, but we can rely on the kernel */
833         free(mop.mo_source);
834
835         if (strstr(mop.mo_usource, ":/") == NULL)
836                 osd_fini();
837
838         return rc;
839 }