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