lustre/obdclass/obd_mount.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/obdclass/obd_mount.c
  37  *
  38  * Client/server mount routines
  39  *
  40  * Author: Nathan Rutman <nathan@clusterfs.com>
  41  */
  42
  43
  44 #define DEBUG_SUBSYSTEM S_CLASS
  45 #define D_MOUNT D_SUPER|D_CONFIG /*|D_WARNING */
  46 #define PRINT_CMD CDEBUG
  47 #define PRINT_MASK D_SUPER|D_CONFIG
  48
  49 #include <obd.h>
  50 #include <lvfs.h>
  51 #include <lustre_fsfilt.h>
  52 #include <obd_class.h>
  53 #include <lustre/lustre_user.h>
  54 #include <linux/version.h>
  55 #include <lustre_log.h>
  56 #include <lustre_disk.h>
  57 #include <lustre_param.h>
  58
  59 static int (*client_fill_super)(struct super_block *sb) = NULL;
  60 static void (*kill_super_cb)(struct super_block *sb) = NULL;
  61
  62 /*********** mount lookup *********/
  63
  64 CFS_DECLARE_MUTEX(lustre_mount_info_lock);
  65 static CFS_LIST_HEAD(server_mount_info_list);
  66
  67 static struct lustre_mount_info *server_find_mount(const char *name)
  68 {
  69         cfs_list_t *tmp;
  70         struct lustre_mount_info *lmi;
  71         ENTRY;
  72
  73         cfs_list_for_each(tmp, &server_mount_info_list) {
  74                 lmi = cfs_list_entry(tmp, struct lustre_mount_info,
  75                                      lmi_list_chain);
  76                 if (strcmp(name, lmi->lmi_name) == 0)
  77                         RETURN(lmi);
  78         }
  79         RETURN(NULL);
  80 }
  81
  82 /* we must register an obd for a mount before we call the setup routine.
  83    *_setup will call lustre_get_mount to get the mnt struct
  84    by obd_name, since we can't pass the pointer to setup. */
  85 static int server_register_mount(const char *name, struct super_block *sb,
  86                           struct vfsmount *mnt)
  87 {
  88         struct lustre_mount_info *lmi;
  89         char *name_cp;
  90         ENTRY;
  91
  92         LASSERT(mnt);
  93         LASSERT(sb);
  94
  95         OBD_ALLOC(lmi, sizeof(*lmi));
  96         if (!lmi)
  97                 RETURN(-ENOMEM);
  98         OBD_ALLOC(name_cp, strlen(name) + 1);
  99         if (!name_cp) {
 100                 OBD_FREE(lmi, sizeof(*lmi));
 101                 RETURN(-ENOMEM);
 102         }
 103         strcpy(name_cp, name);
 104
 105         cfs_down(&lustre_mount_info_lock);
 106
 107         if (server_find_mount(name)) {
 108                 cfs_up(&lustre_mount_info_lock);
 109                 OBD_FREE(lmi, sizeof(*lmi));
 110                 OBD_FREE(name_cp, strlen(name) + 1);
 111                 CERROR("Already registered %s\n", name);
 112                 RETURN(-EEXIST);
 113         }
 114         lmi->lmi_name = name_cp;
 115         lmi->lmi_sb = sb;
 116         lmi->lmi_mnt = mnt;
 117         cfs_list_add(&lmi->lmi_list_chain, &server_mount_info_list);
 118
 119         cfs_up(&lustre_mount_info_lock);
 120
 121         CDEBUG(D_MOUNT, "reg_mnt %p from %s, vfscount=%d\n",
 122                lmi->lmi_mnt, name, cfs_atomic_read(&lmi->lmi_mnt->mnt_count));
 123
 124         RETURN(0);
 125 }
 126
 127 /* when an obd no longer needs a mount */
 128 static int server_deregister_mount(const char *name)
 129 {
 130         struct lustre_mount_info *lmi;
 131         ENTRY;
 132
 133         cfs_down(&lustre_mount_info_lock);
 134         lmi = server_find_mount(name);
 135         if (!lmi) {
 136                 cfs_up(&lustre_mount_info_lock);
 137                 CERROR("%s not registered\n", name);
 138                 RETURN(-ENOENT);
 139         }
 140
 141         CDEBUG(D_MOUNT, "dereg_mnt %p from %s, vfscount=%d\n",
 142                lmi->lmi_mnt, name, cfs_atomic_read(&lmi->lmi_mnt->mnt_count));
 143
 144         OBD_FREE(lmi->lmi_name, strlen(lmi->lmi_name) + 1);
 145         cfs_list_del(&lmi->lmi_list_chain);
 146         OBD_FREE(lmi, sizeof(*lmi));
 147         cfs_up(&lustre_mount_info_lock);
 148
 149         RETURN(0);
 150 }
 151
 152 /* obd's look up a registered mount using their obdname. This is just
 153    for initial obd setup to find the mount struct.  It should not be
 154    called every time you want to mntget. */
 155 struct lustre_mount_info *server_get_mount(const char *name)
 156 {
 157         struct lustre_mount_info *lmi;
 158         struct lustre_sb_info *lsi;
 159         ENTRY;
 160
 161         cfs_down(&lustre_mount_info_lock);
 162         lmi = server_find_mount(name);
 163         cfs_up(&lustre_mount_info_lock);
 164         if (!lmi) {
 165                 CERROR("Can't find mount for %s\n", name);
 166                 RETURN(NULL);
 167         }
 168         lsi = s2lsi(lmi->lmi_sb);
 169         mntget(lmi->lmi_mnt);
 170         cfs_atomic_inc(&lsi->lsi_mounts);
 171
 172         CDEBUG(D_MOUNT, "get_mnt %p from %s, refs=%d, vfscount=%d\n",
 173                lmi->lmi_mnt, name, cfs_atomic_read(&lsi->lsi_mounts),
 174                cfs_atomic_read(&lmi->lmi_mnt->mnt_count));
 175
 176         RETURN(lmi);
 177 }
 178
 179 /*
 180  * Used by mdt to get mount_info from obdname.
 181  * There are no blocking when using the mount_info.
 182  * Do not use server_get_mount for this purpose.
 183  */
 184 struct lustre_mount_info *server_get_mount_2(const char *name)
 185 {
 186         struct lustre_mount_info *lmi;
 187         ENTRY;
 188
 189         cfs_down(&lustre_mount_info_lock);
 190         lmi = server_find_mount(name);
 191         cfs_up(&lustre_mount_info_lock);
 192         if (!lmi)
 193                 CERROR("Can't find mount for %s\n", name);
 194
 195         RETURN(lmi);
 196 }
 197
 198 static void unlock_mntput(struct vfsmount *mnt)
 199 {
 200         if (kernel_locked()) {
 201                 cfs_unlock_kernel();
 202                 mntput(mnt);
 203                 cfs_lock_kernel();
 204         } else {
 205                 mntput(mnt);
 206         }
 207 }
 208
 209 static int lustre_put_lsi(struct super_block *sb);
 210
 211 /* to be called from obd_cleanup methods */
 212 int server_put_mount(const char *name, struct vfsmount *mnt)
 213 {
 214         struct lustre_mount_info *lmi;
 215         struct lustre_sb_info *lsi;
 216         int count = atomic_read(&mnt->mnt_count) - 1;
 217         ENTRY;
 218
 219         /* This might be the last one, can't deref after this */
 220         unlock_mntput(mnt);
 221
 222         cfs_down(&lustre_mount_info_lock);
 223         lmi = server_find_mount(name);
 224         cfs_up(&lustre_mount_info_lock);
 225         if (!lmi) {
 226                 CERROR("Can't find mount for %s\n", name);
 227                 RETURN(-ENOENT);
 228         }
 229         lsi = s2lsi(lmi->lmi_sb);
 230         LASSERT(lmi->lmi_mnt == mnt);
 231
 232         CDEBUG(D_MOUNT, "put_mnt %p from %s, refs=%d, vfscount=%d\n",
 233                lmi->lmi_mnt, name, cfs_atomic_read(&lsi->lsi_mounts), count);
 234
 235         if (lustre_put_lsi(lmi->lmi_sb)) {
 236                 CDEBUG(D_MOUNT, "Last put of mnt %p from %s, vfscount=%d\n",
 237                        lmi->lmi_mnt, name, count);
 238                 /* last mount is the One True Mount */
 239                 if (count > 1)
 240                         CERROR("%s: mount busy, vfscount=%d!\n", name, count);
 241         }
 242
 243         /* this obd should never need the mount again */
 244         server_deregister_mount(name);
 245
 246         RETURN(0);
 247 }
 248
 249 /* Corresponding to server_get_mount_2 */
 250 int server_put_mount_2(const char *name, struct vfsmount *mnt)
 251 {
 252         ENTRY;
 253         RETURN(0);
 254 }
 255
 256 /******* mount helper utilities *********/
 257
 258 #if 0
 259 static void ldd_print(struct lustre_disk_data *ldd)
 260 {
 261         PRINT_CMD(PRINT_MASK, "  disk data:\n");
 262         PRINT_CMD(PRINT_MASK, "server:  %s\n", ldd->ldd_svname);
 263         PRINT_CMD(PRINT_MASK, "uuid:    %s\n", (char *)ldd->ldd_uuid);
 264         PRINT_CMD(PRINT_MASK, "fs:      %s\n", ldd->ldd_fsname);
 265         PRINT_CMD(PRINT_MASK, "index:   %04x\n", ldd->ldd_svindex);
 266         PRINT_CMD(PRINT_MASK, "config:  %d\n", ldd->ldd_config_ver);
 267         PRINT_CMD(PRINT_MASK, "flags:   %#x\n", ldd->ldd_flags);
 268         PRINT_CMD(PRINT_MASK, "diskfs:  %s\n", MT_STR(ldd));
 269         PRINT_CMD(PRINT_MASK, "options: %s\n", ldd->ldd_mount_opts);
 270         PRINT_CMD(PRINT_MASK, "params:  %s\n", ldd->ldd_params);
 271         PRINT_CMD(PRINT_MASK, "comment: %s\n", ldd->ldd_userdata);
 272 }
 273 #endif
 274
 275 static int ldd_parse(struct lvfs_run_ctxt *mount_ctxt,
 276                            struct lustre_disk_data *ldd)
 277 {
 278         struct lvfs_run_ctxt saved;
 279         struct file *file;
 280         loff_t off = 0;
 281         unsigned long len;
 282         int rc;
 283         ENTRY;
 284
 285         push_ctxt(&saved, mount_ctxt, NULL);
 286
 287         file = filp_open(MOUNT_DATA_FILE, O_RDONLY, 0644);
 288         if (IS_ERR(file)) {
 289                 rc = PTR_ERR(file);
 290                 CERROR("cannot open %s: rc = %d\n", MOUNT_DATA_FILE, rc);
 291                 GOTO(out, rc);
 292         }
 293
 294         len = i_size_read(file->f_dentry->d_inode);
 295         CDEBUG(D_MOUNT, "Have %s, size %lu\n", MOUNT_DATA_FILE, len);
 296         if (len != sizeof(*ldd)) {
 297                 CERROR("disk data size does not match: see %lu expect %u\n",
 298                        len, (int)sizeof(*ldd));
 299                 GOTO(out_close, rc = -EINVAL);
 300         }
 301
 302         rc = lustre_fread(file, ldd, len, &off);
 303         if (rc != len) {
 304                 CERROR("error reading %s: read %d of %lu\n",
 305                        MOUNT_DATA_FILE, rc, len);
 306                 GOTO(out_close, rc = -EINVAL);
 307         }
 308         rc = 0;
 309
 310         if (ldd->ldd_magic != LDD_MAGIC) {
 311                 /* FIXME add swabbing support */
 312                 CERROR("Bad magic in %s: %x!=%x\n", MOUNT_DATA_FILE,
 313                        ldd->ldd_magic, LDD_MAGIC);
 314                 GOTO(out_close, rc = -EINVAL);
 315         }
 316
 317         if (ldd->ldd_feature_incompat & ~LDD_INCOMPAT_SUPP) {
 318                 CERROR("%s: unsupported incompat filesystem feature(s) %x\n",
 319                        ldd->ldd_svname,
 320                        ldd->ldd_feature_incompat & ~LDD_INCOMPAT_SUPP);
 321                 GOTO(out_close, rc = -EINVAL);
 322         }
 323         if (ldd->ldd_feature_rocompat & ~LDD_ROCOMPAT_SUPP) {
 324                 CERROR("%s: unsupported read-only filesystem feature(s) %x\n",
 325                        ldd->ldd_svname,
 326                        ldd->ldd_feature_rocompat & ~LDD_ROCOMPAT_SUPP);
 327                 /* Do something like remount filesystem read-only */
 328                 GOTO(out_close, rc = -EINVAL);
 329         }
 330
 331 out_close:
 332         filp_close(file, 0);
 333 out:
 334         pop_ctxt(&saved, mount_ctxt, NULL);
 335         RETURN(rc);
 336 }
 337
 338 static int ldd_write(struct lvfs_run_ctxt *mount_ctxt,
 339                      struct lustre_disk_data *ldd)
 340 {
 341         struct lvfs_run_ctxt saved;
 342         struct file *file;
 343         loff_t off = 0;
 344         unsigned long len = sizeof(struct lustre_disk_data);
 345         int rc = 0;
 346         ENTRY;
 347
 348         LASSERT(ldd->ldd_magic == LDD_MAGIC);
 349
 350         ldd->ldd_config_ver++;
 351
 352         push_ctxt(&saved, mount_ctxt, NULL);
 353
 354         file = filp_open(MOUNT_DATA_FILE, O_RDWR, 0644);
 355         if (IS_ERR(file)) {
 356                 rc = PTR_ERR(file);
 357                 CERROR("cannot open %s: rc = %d\n", MOUNT_DATA_FILE, rc);
 358                 GOTO(out, rc);
 359         }
 360
 361         rc = lustre_fwrite(file, ldd, len, &off);
 362         if (rc != len) {
 363                 CERROR("error writing %s: read %d of %lu\n",
 364                        MOUNT_DATA_FILE, rc, len);
 365                 GOTO(out_close, rc = -EINVAL);
 366         }
 367
 368         rc = 0;
 369
 370 out_close:
 371         filp_close(file, 0);
 372 out:
 373         pop_ctxt(&saved, mount_ctxt, NULL);
 374         RETURN(rc);
 375 }
 376
 377
 378 /**************** config llog ********************/
 379
 380 /** Get a config log from the MGS and process it.
 381  * This func is called for both clients and servers.
 382  * Continue to process new statements appended to the logs
 383  * (whenever the config lock is revoked) until lustre_end_log
 384  * is called.
 385  * @param sb The superblock is used by the MGC to write to the local copy of
 386  *   the config log
 387  * @param logname The name of the llog to replicate from the MGS
 388  * @param cfg Since the same mgc may be used to follow multiple config logs
 389  *   (e.g. ost1, ost2, client), the config_llog_instance keeps the state for
 390  *   this log, and is added to the mgc's list of logs to follow.
 391  */
 392 int lustre_process_log(struct super_block *sb, char *logname,
 393                      struct config_llog_instance *cfg)
 394 {
 395         struct lustre_cfg *lcfg;
 396         struct lustre_cfg_bufs bufs;
 397         struct lustre_sb_info *lsi = s2lsi(sb);
 398         struct obd_device *mgc = lsi->lsi_mgc;
 399         int rc;
 400         ENTRY;
 401
 402         LASSERT(mgc);
 403         LASSERT(cfg);
 404
 405         /* mgc_process_config */
 406         lustre_cfg_bufs_reset(&bufs, mgc->obd_name);
 407         lustre_cfg_bufs_set_string(&bufs, 1, logname);
 408         lustre_cfg_bufs_set(&bufs, 2, cfg, sizeof(*cfg));
 409         lustre_cfg_bufs_set(&bufs, 3, &sb, sizeof(sb));
 410         lcfg = lustre_cfg_new(LCFG_LOG_START, &bufs);
 411         rc = obd_process_config(mgc, sizeof(*lcfg), lcfg);
 412         lustre_cfg_free(lcfg);
 413
 414         if (rc == -EINVAL)
 415                 LCONSOLE_ERROR_MSG(0x15b, "%s: The configuration from log '%s'"
 416                                    "failed from the MGS (%d).  Make sure this "
 417                                    "client and the MGS are running compatible "
 418                                    "versions of Lustre.\n",
 419                                    mgc->obd_name, logname, rc);
 420
 421         if (rc)
 422                 LCONSOLE_ERROR_MSG(0x15c, "%s: The configuration from log '%s' "
 423                                    "failed (%d). This may be the result of "
 424                                    "communication errors between this node and "
 425                                    "the MGS, a bad configuration, or other "
 426                                    "errors. See the syslog for more "
 427                                    "information.\n", mgc->obd_name, logname,
 428                                    rc);
 429
 430         /* class_obd_list(); */
 431         RETURN(rc);
 432 }
 433
 434 /* Stop watching this config log for updates */
 435 int lustre_end_log(struct super_block *sb, char *logname,
 436                        struct config_llog_instance *cfg)
 437 {
 438         struct lustre_cfg *lcfg;
 439         struct lustre_cfg_bufs bufs;
 440         struct lustre_sb_info *lsi = s2lsi(sb);
 441         struct obd_device *mgc = lsi->lsi_mgc;
 442         int rc;
 443         ENTRY;
 444
 445         if (!mgc)
 446                 RETURN(-ENOENT);
 447
 448         /* mgc_process_config */
 449         lustre_cfg_bufs_reset(&bufs, mgc->obd_name);
 450         lustre_cfg_bufs_set_string(&bufs, 1, logname);
 451         if (cfg)
 452                 lustre_cfg_bufs_set(&bufs, 2, cfg, sizeof(*cfg));
 453         lcfg = lustre_cfg_new(LCFG_LOG_END, &bufs);
 454         rc = obd_process_config(mgc, sizeof(*lcfg), lcfg);
 455         lustre_cfg_free(lcfg);
 456         RETURN(rc);
 457 }
 458
 459 /**************** obd start *******************/
 460
 461 /** lustre_cfg_bufs are a holdover from 1.4; we can still set these up from
 462  * lctl (and do for echo cli/srv.
 463  */
 464 int do_lcfg(char *cfgname, lnet_nid_t nid, int cmd,
 465             char *s1, char *s2, char *s3, char *s4)
 466 {
 467         struct lustre_cfg_bufs bufs;
 468         struct lustre_cfg    * lcfg = NULL;
 469         int rc;
 470
 471         CDEBUG(D_TRACE, "lcfg %s %#x %s %s %s %s\n", cfgname,
 472                cmd, s1, s2, s3, s4);
 473
 474         lustre_cfg_bufs_reset(&bufs, cfgname);
 475         if (s1)
 476                 lustre_cfg_bufs_set_string(&bufs, 1, s1);
 477         if (s2)
 478                 lustre_cfg_bufs_set_string(&bufs, 2, s2);
 479         if (s3)
 480                 lustre_cfg_bufs_set_string(&bufs, 3, s3);
 481         if (s4)
 482                 lustre_cfg_bufs_set_string(&bufs, 4, s4);
 483
 484         lcfg = lustre_cfg_new(cmd, &bufs);
 485         lcfg->lcfg_nid = nid;
 486         rc = class_process_config(lcfg);
 487         lustre_cfg_free(lcfg);
 488         return(rc);
 489 }
 490
 491 /** Call class_attach and class_setup.  These methods in turn call
 492  * obd type-specific methods.
 493  */
 494 static int lustre_start_simple(char *obdname, char *type, char *uuid,
 495                                char *s1, char *s2)
 496 {
 497         int rc;
 498         CDEBUG(D_MOUNT, "Starting obd %s (typ=%s)\n", obdname, type);
 499
 500         rc = do_lcfg(obdname, 0, LCFG_ATTACH, type, uuid, 0, 0);
 501         if (rc) {
 502                 CERROR("%s attach error %d\n", obdname, rc);
 503                 return(rc);
 504         }
 505         rc = do_lcfg(obdname, 0, LCFG_SETUP, s1, s2, 0, 0);
 506         if (rc) {
 507                 CERROR("%s setup error %d\n", obdname, rc);
 508                 do_lcfg(obdname, 0, LCFG_DETACH, 0, 0, 0, 0);
 509         }
 510         return rc;
 511 }
 512
 513 /* Set up a MGS to serve startup logs */
 514 static int server_start_mgs(struct super_block *sb)
 515 {
 516         struct lustre_sb_info    *lsi = s2lsi(sb);
 517         struct vfsmount          *mnt = lsi->lsi_srv_mnt;
 518         struct lustre_mount_info *lmi;
 519         int    rc = 0;
 520         ENTRY;
 521         LASSERT(mnt);
 522
 523         /* It is impossible to have more than 1 MGS per node, since
 524            MGC wouldn't know which to connect to */
 525         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
 526         if (lmi) {
 527                 lsi = s2lsi(lmi->lmi_sb);
 528                 LCONSOLE_ERROR_MSG(0x15d, "The MGS service was already started"
 529                                    " from server %s\n",
 530                                    lsi->lsi_ldd->ldd_svname);
 531                 RETURN(-EALREADY);
 532         }
 533
 534         CDEBUG(D_CONFIG, "Start MGS service %s\n", LUSTRE_MGS_OBDNAME);
 535
 536         rc = server_register_mount(LUSTRE_MGS_OBDNAME, sb, mnt);
 537
 538         if (!rc) {
 539                 rc = lustre_start_simple(LUSTRE_MGS_OBDNAME, LUSTRE_MGS_NAME,
 540                                          LUSTRE_MGS_OBDNAME, 0, 0);
 541                 /* Do NOT call server_deregister_mount() here. This leads to
 542                  * inability cleanup cleanly and free lsi and other stuff when
 543                  * mgs calls server_put_mount() in error handling case. -umka */
 544         }
 545
 546         if (rc)
 547                 LCONSOLE_ERROR_MSG(0x15e, "Failed to start MGS '%s' (%d). "
 548                                    "Is the 'mgs' module loaded?\n",
 549                                    LUSTRE_MGS_OBDNAME, rc);
 550         RETURN(rc);
 551 }
 552
 553 static int server_stop_mgs(struct super_block *sb)
 554 {
 555         struct obd_device *obd;
 556         int rc;
 557         ENTRY;
 558
 559         CDEBUG(D_MOUNT, "Stop MGS service %s\n", LUSTRE_MGS_OBDNAME);
 560
 561         /* There better be only one MGS */
 562         obd = class_name2obd(LUSTRE_MGS_OBDNAME);
 563         if (!obd) {
 564                 CDEBUG(D_CONFIG, "mgs %s not running\n", LUSTRE_MGS_OBDNAME);
 565                 RETURN(-EALREADY);
 566         }
 567
 568         /* The MGS should always stop when we say so */
 569         obd->obd_force = 1;
 570         rc = class_manual_cleanup(obd);
 571         RETURN(rc);
 572 }
 573
 574 CFS_DECLARE_MUTEX(mgc_start_lock);
 575
 576 /** Set up a mgc obd to process startup logs
 577  *
 578  * \param sb [in] super block of the mgc obd
 579  *
 580  * \retval 0 success, otherwise error code
 581  */
 582 static int lustre_start_mgc(struct super_block *sb)
 583 {
 584         struct obd_connect_data *data = NULL;
 585         struct lustre_sb_info *lsi = s2lsi(sb);
 586         struct obd_device *obd;
 587         struct obd_export *exp;
 588         struct obd_uuid *uuid;
 589         class_uuid_t uuidc;
 590         lnet_nid_t nid;
 591         char *mgcname, *niduuid, *mgssec;
 592         char *ptr;
 593         int recov_bk;
 594         int rc = 0, i = 0, j, len;
 595         ENTRY;
 596
 597         LASSERT(lsi->lsi_lmd);
 598
 599         /* Find the first non-lo MGS nid for our MGC name */
 600         if (lsi->lsi_flags & LSI_SERVER) {
 601                 ptr = lsi->lsi_ldd->ldd_params;
 602                 /* Use mgsnode= nids */
 603                 if ((class_find_param(ptr, PARAM_MGSNODE, &ptr) == 0) &&
 604                     (class_parse_nid(ptr, &nid, &ptr) == 0)) {
 605                         i++;
 606                 } else if (IS_MGS(lsi->lsi_ldd)) {
 607                         lnet_process_id_t id;
 608                         while ((rc = LNetGetId(i++, &id)) != -ENOENT) {
 609                                 if (LNET_NETTYP(LNET_NIDNET(id.nid)) == LOLND)
 610                                         continue;
 611                                 nid = id.nid;
 612                                 i++;
 613                                 break;
 614                         }
 615                 }
 616         } else { /* client */
 617                 /* Use nids from mount line: uml1,1@elan:uml2,2@elan:/lustre */
 618                 ptr = lsi->lsi_lmd->lmd_dev;
 619                 if (class_parse_nid(ptr, &nid, &ptr) == 0)
 620                         i++;
 621         }
 622         if (i == 0) {
 623                 CERROR("No valid MGS nids found.\n");
 624                 RETURN(-EINVAL);
 625         }
 626
 627         len = strlen(LUSTRE_MGC_OBDNAME) + strlen(libcfs_nid2str(nid)) + 1;
 628         OBD_ALLOC(mgcname, len);
 629         OBD_ALLOC(niduuid, len + 2);
 630         if (!mgcname || !niduuid)
 631                 GOTO(out_free, rc = -ENOMEM);
 632         sprintf(mgcname, "%s%s", LUSTRE_MGC_OBDNAME, libcfs_nid2str(nid));
 633
 634         mgssec = lsi->lsi_lmd->lmd_mgssec ? lsi->lsi_lmd->lmd_mgssec : "";
 635
 636         cfs_mutex_down(&mgc_start_lock);
 637
 638         obd = class_name2obd(mgcname);
 639         if (obd && !obd->obd_stopping) {
 640                 rc = obd_set_info_async(obd->obd_self_export,
 641                                         strlen(KEY_MGSSEC), KEY_MGSSEC,
 642                                         strlen(mgssec), mgssec, NULL);
 643                 if (rc)
 644                         GOTO(out_free, rc);
 645
 646                 /* Re-using an existing MGC */
 647                 cfs_atomic_inc(&obd->u.cli.cl_mgc_refcount);
 648
 649                 recov_bk = 0;
 650                 /* If we are restarting the MGS, don't try to keep the MGC's
 651                    old connection, or registration will fail. */
 652                 if ((lsi->lsi_flags & LSI_SERVER) && IS_MGS(lsi->lsi_ldd)) {
 653                         CDEBUG(D_MOUNT, "New MGS with live MGC\n");
 654                         recov_bk = 1;
 655                 }
 656
 657                 /* Try all connections, but only once (again).
 658                    We don't want to block another target from starting
 659                    (using its local copy of the log), but we do want to connect
 660                    if at all possible. */
 661                 recov_bk++;
 662                 CDEBUG(D_MOUNT, "%s: Set MGC reconnect %d\n", mgcname,recov_bk);
 663                 rc = obd_set_info_async(obd->obd_self_export,
 664                                         sizeof(KEY_INIT_RECOV_BACKUP),
 665                                         KEY_INIT_RECOV_BACKUP,
 666                                         sizeof(recov_bk), &recov_bk, NULL);
 667                 GOTO(out, rc = 0);
 668         }
 669
 670         CDEBUG(D_MOUNT, "Start MGC '%s'\n", mgcname);
 671
 672         /* Add the primary nids for the MGS */
 673         i = 0;
 674         sprintf(niduuid, "%s_%x", mgcname, i);
 675         if (lsi->lsi_flags & LSI_SERVER) {
 676                 ptr = lsi->lsi_ldd->ldd_params;
 677                 if (IS_MGS(lsi->lsi_ldd)) {
 678                         /* Use local nids (including LO) */
 679                         lnet_process_id_t id;
 680                         while ((rc = LNetGetId(i++, &id)) != -ENOENT) {
 681                                 rc = do_lcfg(mgcname, id.nid,
 682                                              LCFG_ADD_UUID, niduuid, 0,0,0);
 683                         }
 684                 } else {
 685                         /* Use mgsnode= nids */
 686                         if (class_find_param(ptr, PARAM_MGSNODE, &ptr) != 0) {
 687                                 CERROR("No MGS nids given.\n");
 688                                 GOTO(out_free, rc = -EINVAL);
 689                         }
 690                         while (class_parse_nid(ptr, &nid, &ptr) == 0) {
 691                                 rc = do_lcfg(mgcname, nid,
 692                                              LCFG_ADD_UUID, niduuid, 0,0,0);
 693                                 i++;
 694                         }
 695                 }
 696         } else { /* client */
 697                 /* Use nids from mount line: uml1,1@elan:uml2,2@elan:/lustre */
 698                 ptr = lsi->lsi_lmd->lmd_dev;
 699                 while (class_parse_nid(ptr, &nid, &ptr) == 0) {
 700                         rc = do_lcfg(mgcname, nid,
 701                                      LCFG_ADD_UUID, niduuid, 0,0,0);
 702                         i++;
 703                         /* Stop at the first failover nid */
 704                         if (*ptr == ':')
 705                                 break;
 706                 }
 707         }
 708         if (i == 0) {
 709                 CERROR("No valid MGS nids found.\n");
 710                 GOTO(out_free, rc = -EINVAL);
 711         }
 712         lsi->lsi_lmd->lmd_mgs_failnodes = 1;
 713
 714         /* Random uuid for MGC allows easier reconnects */
 715         OBD_ALLOC_PTR(uuid);
 716         ll_generate_random_uuid(uuidc);
 717         class_uuid_unparse(uuidc, uuid);
 718
 719         /* Start the MGC */
 720         rc = lustre_start_simple(mgcname, LUSTRE_MGC_NAME,
 721                                  (char *)uuid->uuid, LUSTRE_MGS_OBDNAME,
 722                                  niduuid);
 723         OBD_FREE_PTR(uuid);
 724         if (rc)
 725                 GOTO(out_free, rc);
 726
 727         /* Add any failover MGS nids */
 728         i = 1;
 729         while ((*ptr == ':' ||
 730                 class_find_param(ptr, PARAM_MGSNODE, &ptr) == 0)) {
 731                 /* New failover node */
 732                 sprintf(niduuid, "%s_%x", mgcname, i);
 733                 j = 0;
 734                 while (class_parse_nid(ptr, &nid, &ptr) == 0) {
 735                         j++;
 736                         rc = do_lcfg(mgcname, nid,
 737                                      LCFG_ADD_UUID, niduuid, 0,0,0);
 738                         if (*ptr == ':')
 739                                 break;
 740                 }
 741                 if (j > 0) {
 742                         rc = do_lcfg(mgcname, 0, LCFG_ADD_CONN,
 743                                      niduuid, 0, 0, 0);
 744                         i++;
 745                 } else {
 746                         /* at ":/fsname" */
 747                         break;
 748                 }
 749         }
 750         lsi->lsi_lmd->lmd_mgs_failnodes = i;
 751
 752         obd = class_name2obd(mgcname);
 753         if (!obd) {
 754                 CERROR("Can't find mgcobd %s\n", mgcname);
 755                 GOTO(out_free, rc = -ENOTCONN);
 756         }
 757
 758         rc = obd_set_info_async(obd->obd_self_export,
 759                                 strlen(KEY_MGSSEC), KEY_MGSSEC,
 760                                 strlen(mgssec), mgssec, NULL);
 761         if (rc)
 762                 GOTO(out_free, rc);
 763
 764         /* Keep a refcount of servers/clients who started with "mount",
 765            so we know when we can get rid of the mgc. */
 766         cfs_atomic_set(&obd->u.cli.cl_mgc_refcount, 1);
 767
 768         /* Try all connections, but only once. */
 769         recov_bk = 1;
 770         rc = obd_set_info_async(obd->obd_self_export,
 771                                 sizeof(KEY_INIT_RECOV_BACKUP),
 772                                 KEY_INIT_RECOV_BACKUP,
 773                                 sizeof(recov_bk), &recov_bk, NULL);
 774         if (rc)
 775                 /* nonfatal */
 776                 CWARN("can't set %s %d\n", KEY_INIT_RECOV_BACKUP, rc);
 777         /* We connect to the MGS at setup, and don't disconnect until cleanup */
 778         OBD_ALLOC_PTR(data);
 779         if (data == NULL)
 780                 GOTO(out, rc = -ENOMEM);
 781         data->ocd_connect_flags = OBD_CONNECT_VERSION | OBD_CONNECT_FID |
 782                                   OBD_CONNECT_AT | OBD_CONNECT_FULL20;
 783         data->ocd_version = LUSTRE_VERSION_CODE;
 784         rc = obd_connect(NULL, &exp, obd, &(obd->obd_uuid), data, NULL);
 785         OBD_FREE_PTR(data);
 786         if (rc) {
 787                 CERROR("connect failed %d\n", rc);
 788                 GOTO(out, rc);
 789         }
 790
 791         obd->u.cli.cl_mgc_mgsexp = exp;
 792
 793 out:
 794         /* Keep the mgc info in the sb. Note that many lsi's can point
 795            to the same mgc.*/
 796         lsi->lsi_mgc = obd;
 797 out_free:
 798         cfs_mutex_up(&mgc_start_lock);
 799
 800         if (mgcname)
 801                 OBD_FREE(mgcname, len);
 802         if (niduuid)
 803                 OBD_FREE(niduuid, len + 2);
 804         RETURN(rc);
 805 }
 806
 807 static int lustre_stop_mgc(struct super_block *sb)
 808 {
 809         struct lustre_sb_info *lsi = s2lsi(sb);
 810         struct obd_device *obd;
 811         char *niduuid = 0, *ptr = 0;
 812         int i, rc = 0, len = 0;
 813         ENTRY;
 814
 815         if (!lsi)
 816                 RETURN(-ENOENT);
 817         obd = lsi->lsi_mgc;
 818         if (!obd)
 819                 RETURN(-ENOENT);
 820         lsi->lsi_mgc = NULL;
 821
 822         cfs_mutex_down(&mgc_start_lock);
 823         LASSERT(cfs_atomic_read(&obd->u.cli.cl_mgc_refcount) > 0);
 824         if (!cfs_atomic_dec_and_test(&obd->u.cli.cl_mgc_refcount)) {
 825                 /* This is not fatal, every client that stops
 826                    will call in here. */
 827                 CDEBUG(D_MOUNT, "mgc still has %d references.\n",
 828                        cfs_atomic_read(&obd->u.cli.cl_mgc_refcount));
 829                 GOTO(out, rc = -EBUSY);
 830         }
 831
 832         /* The MGC has no recoverable data in any case.
 833          * force shotdown set in umount_begin */
 834         obd->obd_no_recov = 1;
 835
 836         if (obd->u.cli.cl_mgc_mgsexp) {
 837                 /* An error is not fatal, if we are unable to send the
 838                    disconnect mgs ping evictor cleans up the export */
 839                 rc = obd_disconnect(obd->u.cli.cl_mgc_mgsexp);
 840                 if (rc)
 841                         CDEBUG(D_MOUNT, "disconnect failed %d\n", rc);
 842         }
 843
 844         /* Save the obdname for cleaning the nid uuids, which are
 845            obdname_XX */
 846         len = strlen(obd->obd_name) + 6;
 847         OBD_ALLOC(niduuid, len);
 848         if (niduuid) {
 849                 strcpy(niduuid, obd->obd_name);
 850                 ptr = niduuid + strlen(niduuid);
 851         }
 852
 853         rc = class_manual_cleanup(obd);
 854         if (rc)
 855                 GOTO(out, rc);
 856
 857         /* Clean the nid uuids */
 858         if (!niduuid)
 859                 GOTO(out, rc = -ENOMEM);
 860
 861         for (i = 0; i < lsi->lsi_lmd->lmd_mgs_failnodes; i++) {
 862                 sprintf(ptr, "_%x", i);
 863                 rc = do_lcfg(LUSTRE_MGC_OBDNAME, 0, LCFG_DEL_UUID,
 864                              niduuid, 0, 0, 0);
 865                 if (rc)
 866                         CERROR("del MDC UUID %s failed: rc = %d\n",
 867                                niduuid, rc);
 868         }
 869 out:
 870         if (niduuid)
 871                 OBD_FREE(niduuid, len);
 872
 873         /* class_import_put will get rid of the additional connections */
 874         cfs_mutex_up(&mgc_start_lock);
 875         RETURN(rc);
 876 }
 877
 878 /* Since there's only one mgc per node, we have to change it's fs to get
 879    access to the right disk. */
 880 static int server_mgc_set_fs(struct obd_device *mgc, struct super_block *sb)
 881 {
 882         struct lustre_sb_info *lsi = s2lsi(sb);
 883         int rc;
 884         ENTRY;
 885
 886         CDEBUG(D_MOUNT, "Set mgc disk for %s\n", lsi->lsi_lmd->lmd_dev);
 887
 888         /* cl_mgc_sem in mgc insures we sleep if the mgc_fs is busy */
 889         rc = obd_set_info_async(mgc->obd_self_export,
 890                                 sizeof(KEY_SET_FS), KEY_SET_FS,
 891                                 sizeof(*sb), sb, NULL);
 892         if (rc) {
 893                 CERROR("can't set_fs %d\n", rc);
 894         }
 895
 896         RETURN(rc);
 897 }
 898
 899 static int server_mgc_clear_fs(struct obd_device *mgc)
 900 {
 901         int rc;
 902         ENTRY;
 903
 904         CDEBUG(D_MOUNT, "Unassign mgc disk\n");
 905
 906         rc = obd_set_info_async(mgc->obd_self_export,
 907                                 sizeof(KEY_CLEAR_FS), KEY_CLEAR_FS,
 908                                 0, NULL, NULL);
 909         RETURN(rc);
 910 }
 911
 912 CFS_DECLARE_MUTEX(server_start_lock);
 913
 914 /* Stop MDS/OSS if nobody is using them */
 915 static int server_stop_servers(int lddflags, int lsiflags)
 916 {
 917         struct obd_device *obd = NULL;
 918         struct obd_type *type = NULL;
 919         int rc = 0;
 920         ENTRY;
 921
 922         cfs_mutex_down(&server_start_lock);
 923
 924         /* Either an MDT or an OST or neither  */
 925         /* if this was an MDT, and there are no more MDT's, clean up the MDS */
 926         if ((lddflags & LDD_F_SV_TYPE_MDT) &&
 927             (obd = class_name2obd(LUSTRE_MDS_OBDNAME))) {
 928                 /*FIXME pre-rename, should eventually be LUSTRE_MDT_NAME*/
 929                 type = class_search_type(LUSTRE_MDS_NAME);
 930         }
 931         /* if this was an OST, and there are no more OST's, clean up the OSS */
 932         if ((lddflags & LDD_F_SV_TYPE_OST) &&
 933             (obd = class_name2obd(LUSTRE_OSS_OBDNAME))) {
 934                 type = class_search_type(LUSTRE_OST_NAME);
 935         }
 936
 937         if (obd && (!type || !type->typ_refcnt)) {
 938                 int err;
 939                 obd->obd_force = 1;
 940                 /* obd_fail doesn't mean much on a server obd */
 941                 err = class_manual_cleanup(obd);
 942                 if (!rc)
 943                         rc = err;
 944         }
 945
 946         cfs_mutex_up(&server_start_lock);
 947
 948         RETURN(rc);
 949 }
 950
 951 int server_mti_print(char *title, struct mgs_target_info *mti)
 952 {
 953         PRINT_CMD(PRINT_MASK, "mti %s\n", title);
 954         PRINT_CMD(PRINT_MASK, "server: %s\n", mti->mti_svname);
 955         PRINT_CMD(PRINT_MASK, "fs:     %s\n", mti->mti_fsname);
 956         PRINT_CMD(PRINT_MASK, "uuid:   %s\n", mti->mti_uuid);
 957         PRINT_CMD(PRINT_MASK, "ver: %d  flags: %#x\n",
 958                   mti->mti_config_ver, mti->mti_flags);
 959         return(0);
 960 }
 961
 962 static int server_sb2mti(struct super_block *sb, struct mgs_target_info *mti)
 963 {
 964         struct lustre_sb_info    *lsi = s2lsi(sb);
 965         struct lustre_disk_data  *ldd = lsi->lsi_ldd;
 966         lnet_process_id_t         id;
 967         int i = 0;
 968         ENTRY;
 969
 970         if (!(lsi->lsi_flags & LSI_SERVER))
 971                 RETURN(-EINVAL);
 972
 973         strncpy(mti->mti_fsname, ldd->ldd_fsname,
 974                 sizeof(mti->mti_fsname));
 975         strncpy(mti->mti_svname, ldd->ldd_svname,
 976                 sizeof(mti->mti_svname));
 977
 978         mti->mti_nid_count = 0;
 979         while (LNetGetId(i++, &id) != -ENOENT) {
 980                 if (LNET_NETTYP(LNET_NIDNET(id.nid)) == LOLND)
 981                         continue;
 982                 mti->mti_nids[mti->mti_nid_count] = id.nid;
 983                 mti->mti_nid_count++;
 984                 if (mti->mti_nid_count >= MTI_NIDS_MAX) {
 985                         CWARN("Only using first %d nids for %s\n",
 986                               mti->mti_nid_count, mti->mti_svname);
 987                         break;
 988                 }
 989         }
 990
 991         mti->mti_lustre_ver = LUSTRE_VERSION_CODE;
 992         mti->mti_config_ver = 0;
 993         mti->mti_flags = ldd->ldd_flags;
 994         mti->mti_stripe_index = ldd->ldd_svindex;
 995         memcpy(mti->mti_uuid, ldd->ldd_uuid, sizeof(mti->mti_uuid));
 996         if (strlen(ldd->ldd_params) > sizeof(mti->mti_params)) {
 997                 CERROR("params too big for mti\n");
 998                 RETURN(-ENOMEM);
 999         }
1000         memcpy(mti->mti_params, ldd->ldd_params, sizeof(mti->mti_params));
1001         RETURN(0);
1002 }
1003
1004 /* Register an old or new target with the MGS. If needed MGS will construct
1005    startup logs and assign index */
1006 int server_register_target(struct super_block *sb)
1007 {
1008         struct lustre_sb_info *lsi = s2lsi(sb);
1009         struct obd_device *mgc = lsi->lsi_mgc;
1010         struct lustre_disk_data *ldd = lsi->lsi_ldd;
1011         struct mgs_target_info *mti = NULL;
1012         int rc;
1013         ENTRY;
1014
1015         LASSERT(mgc);
1016
1017         if (!(lsi->lsi_flags & LSI_SERVER))
1018                 RETURN(-EINVAL);
1019
1020         OBD_ALLOC_PTR(mti);
1021         if (!mti)
1022                 RETURN(-ENOMEM);
1023         rc = server_sb2mti(sb, mti);
1024         if (rc)
1025                 GOTO(out, rc);
1026
1027         CDEBUG(D_MOUNT, "Registration %s, fs=%s, %s, index=%04x, flags=%#x\n",
1028                mti->mti_svname, mti->mti_fsname,
1029                libcfs_nid2str(mti->mti_nids[0]), mti->mti_stripe_index,
1030                mti->mti_flags);
1031
1032         /* Register the target */
1033         /* FIXME use mgc_process_config instead */
1034         rc = obd_set_info_async(mgc->u.cli.cl_mgc_mgsexp,
1035                                 sizeof(KEY_REGISTER_TARGET), KEY_REGISTER_TARGET,
1036                                 sizeof(*mti), mti, NULL);
1037         if (rc)
1038                 GOTO(out, rc);
1039
1040         /* Always update our flags */
1041         ldd->ldd_flags = mti->mti_flags & ~LDD_F_REWRITE_LDD;
1042
1043         /* If this flag is set, it means the MGS wants us to change our
1044            on-disk data. (So far this means just the index.) */
1045         if (mti->mti_flags & LDD_F_REWRITE_LDD) {
1046                 char *label;
1047                 int err;
1048                 CDEBUG(D_MOUNT, "Changing on-disk index from %#x to %#x "
1049                        "for %s\n", ldd->ldd_svindex, mti->mti_stripe_index,
1050                        mti->mti_svname);
1051                 ldd->ldd_svindex = mti->mti_stripe_index;
1052                 strncpy(ldd->ldd_svname, mti->mti_svname,
1053                         sizeof(ldd->ldd_svname));
1054                 /* or ldd_make_sv_name(ldd); */
1055                 ldd_write(&mgc->obd_lvfs_ctxt, ldd);
1056                 err = fsfilt_set_label(mgc, lsi->lsi_srv_mnt->mnt_sb,
1057                                        mti->mti_svname);
1058                 if (err)
1059                         CERROR("Label set error %d\n", err);
1060                 label = fsfilt_get_label(mgc, lsi->lsi_srv_mnt->mnt_sb);
1061                 if (label)
1062                         CDEBUG(D_MOUNT, "Disk label changed to %s\n", label);
1063
1064                 /* Flush the new ldd to disk */
1065                 fsfilt_sync(mgc, lsi->lsi_srv_mnt->mnt_sb);
1066         }
1067
1068 out:
1069         if (mti)
1070                 OBD_FREE_PTR(mti);
1071         RETURN(rc);
1072 }
1073
1074 /** Start server targets: MDTs and OSTs
1075  */
1076 static int server_start_targets(struct super_block *sb, struct vfsmount *mnt)
1077 {
1078         struct obd_device *obd;
1079         struct lustre_sb_info *lsi = s2lsi(sb);
1080         struct config_llog_instance cfg;
1081         int rc;
1082         ENTRY;
1083
1084         CDEBUG(D_MOUNT, "starting target %s\n", lsi->lsi_ldd->ldd_svname);
1085
1086 #if 0
1087         /* If we're an MDT, make sure the global MDS is running */
1088         if (lsi->lsi_ldd->ldd_flags & LDD_F_SV_TYPE_MDT) {
1089                 /* make sure the MDS is started */
1090                 cfs_mutex_down(&server_start_lock);
1091                 obd = class_name2obd(LUSTRE_MDS_OBDNAME);
1092                 if (!obd) {
1093                         rc = lustre_start_simple(LUSTRE_MDS_OBDNAME,
1094                     /* FIXME pre-rename, should eventually be LUSTRE_MDS_NAME */
1095                                                  LUSTRE_MDT_NAME,
1096                                                  LUSTRE_MDS_OBDNAME"_uuid",
1097                                                  0, 0);
1098                         if (rc) {
1099                                 cfs_mutex_up(&server_start_lock);
1100                                 CERROR("failed to start MDS: %d\n", rc);
1101                                 RETURN(rc);
1102                         }
1103                 }
1104                 cfs_mutex_up(&server_start_lock);
1105         }
1106 #endif
1107
1108         /* If we're an OST, make sure the global OSS is running */
1109         if (lsi->lsi_ldd->ldd_flags & LDD_F_SV_TYPE_OST) {
1110                 /* make sure OSS is started */
1111                 cfs_mutex_down(&server_start_lock);
1112                 obd = class_name2obd(LUSTRE_OSS_OBDNAME);
1113                 if (!obd) {
1114                         rc = lustre_start_simple(LUSTRE_OSS_OBDNAME,
1115                                                  LUSTRE_OSS_NAME,
1116                                                  LUSTRE_OSS_OBDNAME"_uuid",
1117                                                  0, 0);
1118                         if (rc) {
1119                                 cfs_mutex_up(&server_start_lock);
1120                                 CERROR("failed to start OSS: %d\n", rc);
1121                                 RETURN(rc);
1122                         }
1123                 }
1124                 cfs_mutex_up(&server_start_lock);
1125         }
1126
1127         /* Set the mgc fs to our server disk.  This allows the MGC to
1128          * read and write configs locally, in case it can't talk to the MGS. */
1129         rc = server_mgc_set_fs(lsi->lsi_mgc, sb);
1130         if (rc)
1131                 RETURN(rc);
1132
1133         /* Register with MGS */
1134         rc = server_register_target(sb);
1135         if (rc && (lsi->lsi_ldd->ldd_flags &
1136                    (LDD_F_NEED_INDEX | LDD_F_UPDATE | LDD_F_UPGRADE14))){
1137                 CERROR("Required registration failed for %s: %d\n",
1138                        lsi->lsi_ldd->ldd_svname, rc);
1139                 if (rc == -EIO) {
1140                         LCONSOLE_ERROR_MSG(0x15f, "Communication error with "
1141                                            "the MGS.  Is the MGS running?\n");
1142                 }
1143                 GOTO(out_mgc, rc);
1144         }
1145         if (rc == -EINVAL) {
1146                 LCONSOLE_ERROR_MSG(0x160, "The MGS is refusing to allow this "
1147                                    "server (%s) to start. Please see messages"
1148                                    " on the MGS node.\n",
1149                                    lsi->lsi_ldd->ldd_svname);
1150                 GOTO(out_mgc, rc);
1151         }
1152         /* non-fatal error of registeration with MGS */
1153         if (rc)
1154                 CDEBUG(D_MOUNT, "Cannot register with MGS: %d\n", rc);
1155
1156         /* Let the target look up the mount using the target's name
1157            (we can't pass the sb or mnt through class_process_config.) */
1158         rc = server_register_mount(lsi->lsi_ldd->ldd_svname, sb, mnt);
1159         if (rc)
1160                 GOTO(out_mgc, rc);
1161
1162         /* Start targets using the llog named for the target */
1163         memset(&cfg, 0, sizeof(cfg));
1164         rc = lustre_process_log(sb, lsi->lsi_ldd->ldd_svname, &cfg);
1165         if (rc) {
1166                 CERROR("failed to start server %s: %d\n",
1167                        lsi->lsi_ldd->ldd_svname, rc);
1168                 /* Do NOT call server_deregister_mount() here. This makes it
1169                  * impossible to find mount later in cleanup time and leaves
1170                  * @lsi and othder stuff leaked. -umka */
1171                 GOTO(out_mgc, rc);
1172         }
1173
1174 out_mgc:
1175         /* Release the mgc fs for others to use */
1176         server_mgc_clear_fs(lsi->lsi_mgc);
1177
1178         if (!rc) {
1179                 obd = class_name2obd(lsi->lsi_ldd->ldd_svname);
1180                 if (!obd) {
1181                         CERROR("no server named %s was started\n",
1182                                lsi->lsi_ldd->ldd_svname);
1183                         RETURN(-ENXIO);
1184                 }
1185
1186                 if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_ABORT_RECOV) &&
1187                     (OBP(obd, iocontrol))) {
1188                         obd_iocontrol(OBD_IOC_ABORT_RECOVERY,
1189                                       obd->obd_self_export, 0, NULL, NULL);
1190                 }
1191
1192                 /* log has been fully processed */
1193                 obd_notify(obd, NULL, OBD_NOTIFY_CONFIG, (void *)CONFIG_LOG);
1194         }
1195
1196         RETURN(rc);
1197 }
1198
1199 /***************** lustre superblock **************/
1200
1201 struct lustre_sb_info *lustre_init_lsi(struct super_block *sb)
1202 {
1203         struct lustre_sb_info *lsi;
1204         ENTRY;
1205
1206         OBD_ALLOC_PTR(lsi);
1207         if (!lsi)
1208                 RETURN(NULL);
1209         OBD_ALLOC_PTR(lsi->lsi_lmd);
1210         if (!lsi->lsi_lmd) {
1211                 OBD_FREE_PTR(lsi);
1212                 RETURN(NULL);
1213         }
1214
1215         lsi->lsi_lmd->lmd_exclude_count = 0;
1216         lsi->lsi_lmd->lmd_recovery_time_soft = 0;
1217         lsi->lsi_lmd->lmd_recovery_time_hard = 0;
1218         s2lsi_nocast(sb) = lsi;
1219         /* we take 1 extra ref for our setup */
1220         cfs_atomic_set(&lsi->lsi_mounts, 1);
1221
1222         /* Default umount style */
1223         lsi->lsi_flags = LSI_UMOUNT_FAILOVER;
1224
1225         RETURN(lsi);
1226 }
1227
1228 static int lustre_free_lsi(struct super_block *sb)
1229 {
1230         struct lustre_sb_info *lsi = s2lsi(sb);
1231         ENTRY;
1232
1233         LASSERT(lsi != NULL);
1234         CDEBUG(D_MOUNT, "Freeing lsi %p\n", lsi);
1235
1236         /* someone didn't call server_put_mount. */
1237         LASSERT(cfs_atomic_read(&lsi->lsi_mounts) == 0);
1238
1239         if (lsi->lsi_ldd != NULL)
1240                 OBD_FREE(lsi->lsi_ldd, sizeof(*lsi->lsi_ldd));
1241
1242         if (lsi->lsi_lmd != NULL) {
1243                 if (lsi->lsi_lmd->lmd_dev != NULL)
1244                         OBD_FREE(lsi->lsi_lmd->lmd_dev,
1245                                  strlen(lsi->lsi_lmd->lmd_dev) + 1);
1246                 if (lsi->lsi_lmd->lmd_profile != NULL)
1247                         OBD_FREE(lsi->lsi_lmd->lmd_profile,
1248                                  strlen(lsi->lsi_lmd->lmd_profile) + 1);
1249                 if (lsi->lsi_lmd->lmd_mgssec != NULL)
1250                         OBD_FREE(lsi->lsi_lmd->lmd_mgssec,
1251                                  strlen(lsi->lsi_lmd->lmd_mgssec) + 1);
1252                 if (lsi->lsi_lmd->lmd_opts != NULL)
1253                         OBD_FREE(lsi->lsi_lmd->lmd_opts,
1254                                  strlen(lsi->lsi_lmd->lmd_opts) + 1);
1255                 if (lsi->lsi_lmd->lmd_exclude_count)
1256                         OBD_FREE(lsi->lsi_lmd->lmd_exclude,
1257                                  sizeof(lsi->lsi_lmd->lmd_exclude[0]) *
1258                                  lsi->lsi_lmd->lmd_exclude_count);
1259                 OBD_FREE(lsi->lsi_lmd, sizeof(*lsi->lsi_lmd));
1260         }
1261
1262         LASSERT(lsi->lsi_llsbi == NULL);
1263         OBD_FREE(lsi, sizeof(*lsi));
1264         s2lsi_nocast(sb) = NULL;
1265
1266         RETURN(0);
1267 }
1268
1269 /* The lsi has one reference for every server that is using the disk -
1270    e.g. MDT, MGS, and potentially MGC */
1271 static int lustre_put_lsi(struct super_block *sb)
1272 {
1273         struct lustre_sb_info *lsi = s2lsi(sb);
1274         ENTRY;
1275
1276         LASSERT(lsi != NULL);
1277
1278         CDEBUG(D_MOUNT, "put %p %d\n", sb, cfs_atomic_read(&lsi->lsi_mounts));
1279         if (cfs_atomic_dec_and_test(&lsi->lsi_mounts)) {
1280                 lustre_free_lsi(sb);
1281                 RETURN(1);
1282         }
1283         RETURN(0);
1284 }
1285
1286 /*************** server mount ******************/
1287
1288 /** Kernel mount using mount options in MOUNT_DATA_FILE.
1289  * Since this file lives on the disk, we pre-mount using a common
1290  * type, read the file, then re-mount using the type specified in the
1291  * file.
1292  */
1293 static struct vfsmount *server_kernel_mount(struct super_block *sb)
1294 {
1295         struct lvfs_run_ctxt mount_ctxt;
1296         struct lustre_sb_info *lsi = s2lsi(sb);
1297         struct lustre_disk_data *ldd;
1298         struct lustre_mount_data *lmd = lsi->lsi_lmd;
1299         struct vfsmount *mnt;
1300         char *options = NULL;
1301         unsigned long page, s_flags;
1302         struct page *__page;
1303         int rc;
1304         ENTRY;
1305
1306         OBD_ALLOC(ldd, sizeof(*ldd));
1307         if (!ldd)
1308                 RETURN(ERR_PTR(-ENOMEM));
1309
1310         /* In the past, we have always used flags = 0.
1311            Note ext3/ldiskfs can't be mounted ro. */
1312         s_flags = sb->s_flags;
1313
1314         /* allocate memory for options */
1315         OBD_PAGE_ALLOC(__page, CFS_ALLOC_STD);
1316         if (!__page)
1317                 GOTO(out_free, rc = -ENOMEM);
1318         page = (unsigned long)cfs_page_address(__page);
1319         options = (char *)page;
1320         memset(options, 0, CFS_PAGE_SIZE);
1321
1322         /* mount-line options must be added for pre-mount because it may
1323          * contain mount options such as journal_dev which are required
1324          * to mount successfuly the underlying filesystem */
1325         if (lmd->lmd_opts && (*(lmd->lmd_opts) != 0))
1326                 strncat(options, lmd->lmd_opts, CFS_PAGE_SIZE - 1);
1327
1328         /* Pre-mount ldiskfs to read the MOUNT_DATA_FILE */
1329         CDEBUG(D_MOUNT, "Pre-mount ldiskfs %s\n", lmd->lmd_dev);
1330         mnt = ll_kern_mount("ldiskfs", s_flags, lmd->lmd_dev, (void *)options);
1331         if (IS_ERR(mnt)) {
1332                 rc = PTR_ERR(mnt);
1333                 CERROR("premount %s:%#lx ldiskfs failed: %d "
1334                         "Is the ldiskfs module available?\n",
1335                         lmd->lmd_dev, s_flags, rc );
1336                 GOTO(out_free, rc);
1337         }
1338
1339         OBD_SET_CTXT_MAGIC(&mount_ctxt);
1340         mount_ctxt.pwdmnt = mnt;
1341         mount_ctxt.pwd = mnt->mnt_root;
1342         mount_ctxt.fs = get_ds();
1343
1344         rc = ldd_parse(&mount_ctxt, ldd);
1345         unlock_mntput(mnt);
1346
1347         if (rc) {
1348                 CERROR("premount parse options failed: rc = %d\n", rc);
1349                 GOTO(out_free, rc);
1350         }
1351
1352         /* Done with our pre-mount, now do the real mount. */
1353
1354         /* Glom up mount options */
1355         memset(options, 0, CFS_PAGE_SIZE);
1356         strncpy(options, ldd->ldd_mount_opts, CFS_PAGE_SIZE - 2);
1357
1358         /* Add in any mount-line options */
1359         if (lmd->lmd_opts && (*(lmd->lmd_opts) != 0)) {
1360                 int len = CFS_PAGE_SIZE - strlen(options) - 2;
1361                 if (*options != 0)
1362                         strcat(options, ",");
1363                 strncat(options, lmd->lmd_opts, len);
1364         }
1365
1366         /* Special permanent mount flags */
1367         if (IS_OST(ldd))
1368             s_flags |= MS_NOATIME | MS_NODIRATIME;
1369
1370         CDEBUG(D_MOUNT, "kern_mount: %s %s %s\n",
1371                MT_STR(ldd), lmd->lmd_dev, options);
1372         mnt = ll_kern_mount(MT_STR(ldd), s_flags, lmd->lmd_dev,
1373                             (void *)options);
1374         if (IS_ERR(mnt)) {
1375                 rc = PTR_ERR(mnt);
1376                 CERROR("ll_kern_mount failed: rc = %d\n", rc);
1377                 GOTO(out_free, rc);
1378         }
1379
1380         if (lmd->lmd_flags & LMD_FLG_ABORT_RECOV)
1381                 simple_truncate(mnt->mnt_sb->s_root, mnt, LAST_RCVD,
1382                                 LR_CLIENT_START);
1383
1384         OBD_PAGE_FREE(__page);
1385         lsi->lsi_ldd = ldd;   /* freed at lsi cleanup */
1386         CDEBUG(D_SUPER, "%s: mnt = %p\n", lmd->lmd_dev, mnt);
1387         RETURN(mnt);
1388
1389 out_free:
1390         if (__page)
1391                 OBD_PAGE_FREE(__page);
1392         OBD_FREE(ldd, sizeof(*ldd));
1393         lsi->lsi_ldd = NULL;
1394         RETURN(ERR_PTR(rc));
1395 }
1396
1397 /** Wait here forever until the mount refcount is 0 before completing umount,
1398  * else we risk dereferencing a null pointer.
1399  * LNET may take e.g. 165s before killing zombies.
1400  */
1401 static void server_wait_finished(struct vfsmount *mnt)
1402 {
1403        cfs_waitq_t             waitq;
1404        int                     rc, waited = 0;
1405        cfs_sigset_t            blocked;
1406
1407        cfs_waitq_init(&waitq);
1408
1409        while (atomic_read(&mnt->mnt_count) > 1) {
1410                if (waited && (waited % 30 == 0))
1411                        LCONSOLE_WARN("Mount still busy with %d refs after "
1412                                       "%d secs.\n",
1413                                       atomic_read(&mnt->mnt_count),
1414                                       waited);
1415                /* Cannot use l_event_wait() for an interruptible sleep. */
1416                waited += 3;
1417                blocked = l_w_e_set_sigs(sigmask(SIGKILL));
1418                cfs_waitq_wait_event_interruptible_timeout(
1419                        waitq,
1420                        (atomic_read(&mnt->mnt_count) == 1),
1421                        cfs_time_seconds(3),
1422                        rc);
1423                cfs_block_sigs(blocked);
1424                if (rc < 0) {
1425                        LCONSOLE_EMERG("Danger: interrupted umount %s with "
1426                                       "%d refs!\n",
1427                                       mnt->mnt_devname,
1428                                       atomic_read(&mnt->mnt_count));
1429                        break;
1430                }
1431
1432        }
1433 }
1434
1435 /** Start the shutdown of servers at umount.
1436  */
1437 static void server_put_super(struct super_block *sb)
1438 {
1439         struct lustre_sb_info *lsi = s2lsi(sb);
1440         struct obd_device     *obd;
1441         struct vfsmount       *mnt = lsi->lsi_srv_mnt;
1442         char *tmpname, *extraname = NULL;
1443         int tmpname_sz;
1444         int lddflags = lsi->lsi_ldd->ldd_flags;
1445         int lsiflags = lsi->lsi_flags;
1446         ENTRY;
1447
1448         LASSERT(lsiflags & LSI_SERVER);
1449
1450         tmpname_sz = strlen(lsi->lsi_ldd->ldd_svname) + 1;
1451         OBD_ALLOC(tmpname, tmpname_sz);
1452         memcpy(tmpname, lsi->lsi_ldd->ldd_svname, tmpname_sz);
1453         CDEBUG(D_MOUNT, "server put_super %s\n", tmpname);
1454         if (IS_MDT(lsi->lsi_ldd) && (lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC))
1455                 snprintf(tmpname, tmpname_sz, "MGS");
1456
1457         /* Stop the target */
1458         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1459             (IS_MDT(lsi->lsi_ldd) || IS_OST(lsi->lsi_ldd))) {
1460                 struct lustre_profile *lprof = NULL;
1461
1462                 /* tell the mgc to drop the config log */
1463                 lustre_end_log(sb, lsi->lsi_ldd->ldd_svname, NULL);
1464
1465                 /* COMPAT_146 - profile may get deleted in mgc_cleanup.
1466                    If there are any setup/cleanup errors, save the lov
1467                    name for safety cleanup later. */
1468                 lprof = class_get_profile(lsi->lsi_ldd->ldd_svname);
1469                 if (lprof && lprof->lp_dt) {
1470                         OBD_ALLOC(extraname, strlen(lprof->lp_dt) + 1);
1471                         strcpy(extraname, lprof->lp_dt);
1472                 }
1473
1474                 obd = class_name2obd(lsi->lsi_ldd->ldd_svname);
1475                 if (obd) {
1476                         CDEBUG(D_MOUNT, "stopping %s\n", obd->obd_name);
1477                         if (lsi->lsi_flags & LSI_UMOUNT_FAILOVER)
1478                                 obd->obd_fail = 1;
1479                         /* We can't seem to give an error return code
1480                          * to .put_super, so we better make sure we clean up! */
1481                         obd->obd_force = 1;
1482                         class_manual_cleanup(obd);
1483                 } else {
1484                         CERROR("no obd %s\n", lsi->lsi_ldd->ldd_svname);
1485                         server_deregister_mount(lsi->lsi_ldd->ldd_svname);
1486                 }
1487         }
1488
1489         /* If they wanted the mgs to stop separately from the mdt, they
1490            should have put it on a different device. */
1491         if (IS_MGS(lsi->lsi_ldd)) {
1492                 /* if MDS start with --nomgs, don't stop MGS then */
1493                 if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS))
1494                         server_stop_mgs(sb);
1495         }
1496
1497         /* Clean the mgc and sb */
1498         lustre_common_put_super(sb);
1499
1500         /* Wait for the targets to really clean up - can't exit (and let the
1501            sb get destroyed) while the mount is still in use */
1502         server_wait_finished(mnt);
1503
1504         /* drop the One True Mount */
1505         unlock_mntput(mnt);
1506
1507         /* Stop the servers (MDS, OSS) if no longer needed.  We must wait
1508            until the target is really gone so that our type refcount check
1509            is right. */
1510         server_stop_servers(lddflags, lsiflags);
1511
1512         /* In case of startup or cleanup err, stop related obds */
1513         if (extraname) {
1514                 obd = class_name2obd(extraname);
1515                 if (obd) {
1516                         CWARN("Cleaning orphaned obd %s\n", extraname);
1517                         obd->obd_force = 1;
1518                         class_manual_cleanup(obd);
1519                 }
1520                 OBD_FREE(extraname, strlen(extraname) + 1);
1521         }
1522
1523         LCONSOLE_WARN("server umount %s complete\n", tmpname);
1524         OBD_FREE(tmpname, tmpname_sz);
1525         EXIT;
1526 }
1527
1528 /** Called only for 'umount -f'
1529  */
1530 #ifdef HAVE_UMOUNTBEGIN_VFSMOUNT
1531 static void server_umount_begin(struct vfsmount *vfsmnt, int flags)
1532 {
1533         struct super_block *sb = vfsmnt->mnt_sb;
1534 #else
1535 static void server_umount_begin(struct super_block *sb)
1536 {
1537 #endif
1538         struct lustre_sb_info *lsi = s2lsi(sb);
1539         ENTRY;
1540
1541 #ifdef HAVE_UMOUNTBEGIN_VFSMOUNT
1542         if (!(flags & MNT_FORCE)) {
1543                 EXIT;
1544                 return;
1545         }
1546 #endif
1547
1548         CDEBUG(D_MOUNT, "umount -f\n");
1549         /* umount = failover
1550            umount -f = force
1551            no third way to do non-force, non-failover */
1552         lsi->lsi_flags &= ~LSI_UMOUNT_FAILOVER;
1553         lsi->lsi_flags |= LSI_UMOUNT_FORCE;
1554         EXIT;
1555 }
1556
1557 #ifndef HAVE_STATFS_DENTRY_PARAM
1558 static int server_statfs (struct super_block *sb, cfs_kstatfs_t *buf)
1559 {
1560 #else
1561 static int server_statfs (struct dentry *dentry, cfs_kstatfs_t *buf)
1562 {
1563         struct super_block *sb = dentry->d_sb;
1564 #endif
1565         struct vfsmount *mnt = s2lsi(sb)->lsi_srv_mnt;
1566         ENTRY;
1567
1568         if (mnt && mnt->mnt_sb && mnt->mnt_sb->s_op->statfs) {
1569 #ifdef HAVE_STATFS_DENTRY_PARAM
1570                 int rc = mnt->mnt_sb->s_op->statfs(mnt->mnt_root, buf);
1571 #else
1572                 int rc = mnt->mnt_sb->s_op->statfs(mnt->mnt_sb, buf);
1573 #endif
1574                 if (!rc) {
1575                         buf->f_type = sb->s_magic;
1576                         RETURN(0);
1577                 }
1578         }
1579
1580         /* just return 0 */
1581         buf->f_type = sb->s_magic;
1582         buf->f_bsize = sb->s_blocksize;
1583         buf->f_blocks = 1;
1584         buf->f_bfree = 0;
1585         buf->f_bavail = 0;
1586         buf->f_files = 1;
1587         buf->f_ffree = 0;
1588         buf->f_namelen = NAME_MAX;
1589         RETURN(0);
1590 }
1591
1592 /** The operations we support directly on the superblock:
1593  * mount, umount, and df.
1594  */
1595 static struct super_operations server_ops =
1596 {
1597         .put_super      = server_put_super,
1598         .umount_begin   = server_umount_begin, /* umount -f */
1599         .statfs         = server_statfs,
1600 };
1601
1602 #define log2(n) cfs_ffz(~(n))
1603 #define LUSTRE_SUPER_MAGIC 0x0BD00BD1
1604
1605 static int server_fill_super_common(struct super_block *sb)
1606 {
1607         struct inode *root = 0;
1608         ENTRY;
1609
1610         CDEBUG(D_MOUNT, "Server sb, dev=%d\n", (int)sb->s_dev);
1611
1612         sb->s_blocksize = 4096;
1613         sb->s_blocksize_bits = log2(sb->s_blocksize);
1614         sb->s_magic = LUSTRE_SUPER_MAGIC;
1615         sb->s_maxbytes = 0; //PAGE_CACHE_MAXBYTES;
1616         sb->s_flags |= MS_RDONLY;
1617         sb->s_op = &server_ops;
1618
1619         root = new_inode(sb);
1620         if (!root) {
1621                 CERROR("Can't make root inode\n");
1622                 RETURN(-EIO);
1623         }
1624
1625         /* returns -EIO for every operation */
1626         /* make_bad_inode(root); -- badness - can't umount */
1627         /* apparently we need to be a directory for the mount to finish */
1628         root->i_mode = S_IFDIR;
1629
1630         sb->s_root = d_alloc_root(root);
1631         if (!sb->s_root) {
1632                 CERROR("Can't make root dentry\n");
1633                 iput(root);
1634                 RETURN(-EIO);
1635         }
1636
1637         RETURN(0);
1638 }
1639
1640 /** Fill in the superblock info for a Lustre server.
1641  * Mount the device with the correct options.
1642  * Read the on-disk config file.
1643  * Start the services.
1644  */
1645 static int server_fill_super(struct super_block *sb)
1646 {
1647         struct lustre_sb_info *lsi = s2lsi(sb);
1648         struct vfsmount *mnt;
1649         int rc;
1650         ENTRY;
1651
1652         /* the One True Mount */
1653         mnt = server_kernel_mount(sb);
1654         if (IS_ERR(mnt)) {
1655                 rc = PTR_ERR(mnt);
1656                 CERROR("Unable to mount device %s: %d\n",
1657                        lsi->lsi_lmd->lmd_dev, rc);
1658                 lustre_put_lsi(sb);
1659                 RETURN(rc);
1660         }
1661         lsi->lsi_srv_mnt = mnt;
1662
1663         LASSERT(lsi->lsi_ldd);
1664         CDEBUG(D_MOUNT, "Found service %s for fs '%s' on device %s\n",
1665                lsi->lsi_ldd->ldd_svname, lsi->lsi_ldd->ldd_fsname,
1666                lsi->lsi_lmd->lmd_dev);
1667
1668         if (class_name2obd(lsi->lsi_ldd->ldd_svname)) {
1669                 LCONSOLE_ERROR_MSG(0x161, "The target named %s is already "
1670                                    "running. Double-mount may have compromised"
1671                                    " the disk journal.\n",
1672                                    lsi->lsi_ldd->ldd_svname);
1673                 lustre_put_lsi(sb);
1674                 unlock_mntput(mnt);
1675                 RETURN(-EALREADY);
1676         }
1677
1678         /* Start MGS before MGC */
1679         if (IS_MGS(lsi->lsi_ldd) && !(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS)){
1680                 rc = server_start_mgs(sb);
1681                 if (rc)
1682                         GOTO(out_mnt, rc);
1683         }
1684
1685         /* Start MGC before servers */
1686         rc = lustre_start_mgc(sb);
1687         if (rc)
1688                 GOTO(out_mnt, rc);
1689
1690         /* Set up all obd devices for service */
1691         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1692                 (IS_OST(lsi->lsi_ldd) || IS_MDT(lsi->lsi_ldd))) {
1693                 rc = server_start_targets(sb, mnt);
1694                 if (rc < 0) {
1695                         CERROR("Unable to start targets: %d\n", rc);
1696                         GOTO(out_mnt, rc);
1697                 }
1698         /* FIXME overmount client here,
1699            or can we just start a client log and client_fill_super on this sb?
1700            We need to make sure server_put_super gets called too - ll_put_super
1701            calls lustre_common_put_super; check there for LSI_SERVER flag,
1702            call s_p_s if so.
1703            Probably should start client from new thread so we can return.
1704            Client will not finish until all servers are connected.
1705            Note - MGS-only server does NOT get a client, since there is no
1706            lustre fs associated - the MGS is for all lustre fs's */
1707         }
1708
1709         rc = server_fill_super_common(sb);
1710         if (rc)
1711                 GOTO(out_mnt, rc);
1712
1713         RETURN(0);
1714 out_mnt:
1715         /* We jump here in case of failure while starting targets or MGS.
1716          * In this case we can't just put @mnt and have to do real cleanup
1717          * with stoping targets, etc. */
1718         server_put_super(sb);
1719         return rc;
1720 }
1721
1722 /* Get the index from the obd name.
1723    rc = server type, or
1724    rc < 0  on error
1725    if endptr isn't NULL it is set to end of name */
1726 int server_name2index(char *svname, __u32 *idx, char **endptr)
1727 {
1728         unsigned long index;
1729         int rc;
1730         char *dash = strrchr(svname, '-');
1731         if (!dash)
1732                 return(-EINVAL);
1733
1734         /* intepret <fsname>-MDTXXXXX-mdc as mdt, the better way is to pass
1735          * in the fsname, then determine the server index */
1736         if (!strcmp(LUSTRE_MDC_NAME, dash + 1)) {
1737                 dash--;
1738                 for (; dash > svname && *dash != '-'; dash--);
1739                 if (dash == svname)
1740                         return(-EINVAL);
1741         }
1742
1743         if (strncmp(dash + 1, "MDT", 3) == 0)
1744                 rc = LDD_F_SV_TYPE_MDT;
1745         else if (strncmp(dash + 1, "OST", 3) == 0)
1746                 rc = LDD_F_SV_TYPE_OST;
1747         else
1748                 return(-EINVAL);
1749         if (strcmp(dash + 4, "all") == 0)
1750                 return rc | LDD_F_SV_ALL;
1751
1752         index = simple_strtoul(dash + 4, endptr, 16);
1753         *idx = index;
1754         return rc;
1755 }
1756
1757 /*************** mount common betweeen server and client ***************/
1758
1759 /* Common umount */
1760 int lustre_common_put_super(struct super_block *sb)
1761 {
1762         int rc;
1763         ENTRY;
1764
1765         CDEBUG(D_MOUNT, "dropping sb %p\n", sb);
1766
1767         /* Drop a ref to the MGC */
1768         rc = lustre_stop_mgc(sb);
1769         if (rc && (rc != -ENOENT)) {
1770                 if (rc != -EBUSY) {
1771                         CERROR("Can't stop MGC: %d\n", rc);
1772                         RETURN(rc);
1773                 }
1774                 /* BUSY just means that there's some other obd that
1775                    needs the mgc.  Let him clean it up. */
1776                 CDEBUG(D_MOUNT, "MGC still in use\n");
1777         }
1778         /* Drop a ref to the mounted disk */
1779         lustre_put_lsi(sb);
1780         lu_types_stop();
1781         RETURN(rc);
1782 }
1783
1784 static void lmd_print(struct lustre_mount_data *lmd)
1785 {
1786         int i;
1787
1788         PRINT_CMD(PRINT_MASK, "  mount data:\n");
1789         if (lmd_is_client(lmd))
1790                 PRINT_CMD(PRINT_MASK, "profile: %s\n", lmd->lmd_profile);
1791         PRINT_CMD(PRINT_MASK, "device:  %s\n", lmd->lmd_dev);
1792         PRINT_CMD(PRINT_MASK, "flags:   %x\n", lmd->lmd_flags);
1793
1794         if (lmd->lmd_opts)
1795                 PRINT_CMD(PRINT_MASK, "options: %s\n", lmd->lmd_opts);
1796
1797         if (lmd->lmd_recovery_time_soft)
1798                 PRINT_CMD(PRINT_MASK, "recovery time soft: %d\n",
1799                           lmd->lmd_recovery_time_soft);
1800
1801         if (lmd->lmd_recovery_time_hard)
1802                 PRINT_CMD(PRINT_MASK, "recovery time hard: %d\n",
1803                           lmd->lmd_recovery_time_hard);
1804
1805         for (i = 0; i < lmd->lmd_exclude_count; i++) {
1806                 PRINT_CMD(PRINT_MASK, "exclude %d:  OST%04x\n", i,
1807                           lmd->lmd_exclude[i]);
1808         }
1809 }
1810
1811 /* Is this server on the exclusion list */
1812 int lustre_check_exclusion(struct super_block *sb, char *svname)
1813 {
1814         struct lustre_sb_info *lsi = s2lsi(sb);
1815         struct lustre_mount_data *lmd = lsi->lsi_lmd;
1816         __u32 index;
1817         int i, rc;
1818         ENTRY;
1819
1820         rc = server_name2index(svname, &index, NULL);
1821         if (rc != LDD_F_SV_TYPE_OST)
1822                 /* Only exclude OSTs */
1823                 RETURN(0);
1824
1825         CDEBUG(D_MOUNT, "Check exclusion %s (%d) in %d of %s\n", svname,
1826                index, lmd->lmd_exclude_count, lmd->lmd_dev);
1827
1828         for(i = 0; i < lmd->lmd_exclude_count; i++) {
1829                 if (index == lmd->lmd_exclude[i]) {
1830                         CWARN("Excluding %s (on exclusion list)\n", svname);
1831                         RETURN(1);
1832                 }
1833         }
1834         RETURN(0);
1835 }
1836
1837 /* mount -v  -o exclude=lustre-OST0001:lustre-OST0002 -t lustre ... */
1838 static int lmd_make_exclusion(struct lustre_mount_data *lmd, char *ptr)
1839 {
1840         char *s1 = ptr, *s2;
1841         __u32 index, *exclude_list;
1842         int rc = 0, devmax;
1843         ENTRY;
1844
1845         /* The shortest an ost name can be is 8 chars: -OST0000.
1846            We don't actually know the fsname at this time, so in fact
1847            a user could specify any fsname. */
1848         devmax = strlen(ptr) / 8 + 1;
1849
1850         /* temp storage until we figure out how many we have */
1851         OBD_ALLOC(exclude_list, sizeof(index) * devmax);
1852         if (!exclude_list)
1853                 RETURN(-ENOMEM);
1854
1855         /* we enter this fn pointing at the '=' */
1856         while (*s1 && *s1 != ' ' && *s1 != ',') {
1857                 s1++;
1858                 rc = server_name2index(s1, &index, &s2);
1859                 if (rc < 0) {
1860                         CERROR("Can't parse server name '%s'\n", s1);
1861                         break;
1862                 }
1863                 if (rc == LDD_F_SV_TYPE_OST)
1864                         exclude_list[lmd->lmd_exclude_count++] = index;
1865                 else
1866                         CDEBUG(D_MOUNT, "ignoring exclude %.7s\n", s1);
1867                 s1 = s2;
1868                 /* now we are pointing at ':' (next exclude)
1869                    or ',' (end of excludes) */
1870                 if (lmd->lmd_exclude_count >= devmax)
1871                         break;
1872         }
1873         if (rc >= 0) /* non-err */
1874                 rc = 0;
1875
1876         if (lmd->lmd_exclude_count) {
1877                 /* permanent, freed in lustre_free_lsi */
1878                 OBD_ALLOC(lmd->lmd_exclude, sizeof(index) *
1879                           lmd->lmd_exclude_count);
1880                 if (lmd->lmd_exclude) {
1881                         memcpy(lmd->lmd_exclude, exclude_list,
1882                                sizeof(index) * lmd->lmd_exclude_count);
1883                 } else {
1884                         rc = -ENOMEM;
1885                         lmd->lmd_exclude_count = 0;
1886                 }
1887         }
1888         OBD_FREE(exclude_list, sizeof(index) * devmax);
1889         RETURN(rc);
1890 }
1891
1892 static int lmd_parse_mgssec(struct lustre_mount_data *lmd, char *ptr)
1893 {
1894         char   *tail;
1895         int     length;
1896
1897         if (lmd->lmd_mgssec != NULL) {
1898                 OBD_FREE(lmd->lmd_mgssec, strlen(lmd->lmd_mgssec) + 1);
1899                 lmd->lmd_mgssec = NULL;
1900         }
1901
1902         tail = strchr(ptr, ',');
1903         if (tail == NULL)
1904                 length = strlen(ptr);
1905         else
1906                 length = tail - ptr;
1907
1908         OBD_ALLOC(lmd->lmd_mgssec, length + 1);
1909         if (lmd->lmd_mgssec == NULL)
1910                 return -ENOMEM;
1911
1912         memcpy(lmd->lmd_mgssec, ptr, length);
1913         lmd->lmd_mgssec[length] = '\0';
1914         return 0;
1915 }
1916
1917 /** Parse mount line options
1918  * e.g. mount -v -t lustre -o abort_recov uml1:uml2:/lustre-client /mnt/lustre
1919  * dev is passed as device=uml1:/lustre by mount.lustre
1920  */
1921 static int lmd_parse(char *options, struct lustre_mount_data *lmd)
1922 {
1923         char *s1, *s2, *devname = NULL;
1924         struct lustre_mount_data *raw = (struct lustre_mount_data *)options;
1925         int rc = 0;
1926         ENTRY;
1927
1928         LASSERT(lmd);
1929         if (!options) {
1930                 LCONSOLE_ERROR_MSG(0x162, "Missing mount data: check that "
1931                                    "/sbin/mount.lustre is installed.\n");
1932                 RETURN(-EINVAL);
1933         }
1934
1935         /* Options should be a string - try to detect old lmd data */
1936         if ((raw->lmd_magic & 0xffffff00) == (LMD_MAGIC & 0xffffff00)) {
1937                 LCONSOLE_ERROR_MSG(0x163, "You're using an old version of "
1938                                    "/sbin/mount.lustre.  Please install "
1939                                    "version %s\n", LUSTRE_VERSION_STRING);
1940                 RETURN(-EINVAL);
1941         }
1942         lmd->lmd_magic = LMD_MAGIC;
1943
1944         /* Set default flags here */
1945
1946         s1 = options;
1947         while (*s1) {
1948                 int clear = 0;
1949                 int time_min = 2 * (CONNECTION_SWITCH_MAX +
1950                                2 * INITIAL_CONNECT_TIMEOUT);
1951
1952                 /* Skip whitespace and extra commas */
1953                 while (*s1 == ' ' || *s1 == ',')
1954                         s1++;
1955
1956                 /* Client options are parsed in ll_options: eg. flock,
1957                    user_xattr, acl */
1958
1959                 /* Parse non-ldiskfs options here. Rather than modifying
1960                    ldiskfs, we just zero these out here */
1961                 if (strncmp(s1, "abort_recov", 11) == 0) {
1962                         lmd->lmd_flags |= LMD_FLG_ABORT_RECOV;
1963                         clear++;
1964                 } else if (strncmp(s1, "recovery_time_soft=", 19) == 0) {
1965                         lmd->lmd_recovery_time_soft = max_t(int,
1966                                 simple_strtoul(s1 + 19, NULL, 10), time_min);
1967                         clear++;
1968                 } else if (strncmp(s1, "recovery_time_hard=", 19) == 0) {
1969                         lmd->lmd_recovery_time_hard = max_t(int,
1970                                 simple_strtoul(s1 + 19, NULL, 10), time_min);
1971                         clear++;
1972                 } else if (strncmp(s1, "nosvc", 5) == 0) {
1973                         lmd->lmd_flags |= LMD_FLG_NOSVC;
1974                         clear++;
1975                 } else if (strncmp(s1, "nomgs", 5) == 0) {
1976                         lmd->lmd_flags |= LMD_FLG_NOMGS;
1977                         clear++;
1978                 } else if (strncmp(s1, "mgssec=", 7) == 0) {
1979                         rc = lmd_parse_mgssec(lmd, s1 + 7);
1980                         if (rc)
1981                                 goto invalid;
1982                         clear++;
1983                 /* ost exclusion list */
1984                 } else if (strncmp(s1, "exclude=", 8) == 0) {
1985                         rc = lmd_make_exclusion(lmd, s1 + 7);
1986                         if (rc)
1987                                 goto invalid;
1988                         clear++;
1989                 }
1990                 /* Linux 2.4 doesn't pass the device, so we stuck it at the
1991                    end of the options. */
1992                 else if (strncmp(s1, "device=", 7) == 0) {
1993                         devname = s1 + 7;
1994                         /* terminate options right before device.  device
1995                            must be the last one. */
1996                         *s1 = '\0';
1997                         break;
1998                 }
1999
2000                 /* Find next opt */
2001                 s2 = strchr(s1, ',');
2002                 if (s2 == NULL) {
2003                         if (clear)
2004                                 *s1 = '\0';
2005                         break;
2006                 }
2007                 s2++;
2008                 if (clear)
2009                         memmove(s1, s2, strlen(s2) + 1);
2010                 else
2011                         s1 = s2;
2012         }
2013
2014         if (!devname) {
2015                 LCONSOLE_ERROR_MSG(0x164, "Can't find the device name "
2016                                    "(need mount option 'device=...')\n");
2017                 goto invalid;
2018         }
2019
2020         s1 = strstr(devname, ":/");
2021         if (s1) {
2022                 ++s1;
2023                 lmd->lmd_flags = LMD_FLG_CLIENT;
2024                 /* Remove leading /s from fsname */
2025                 while (*++s1 == '/') ;
2026                 /* Freed in lustre_free_lsi */
2027                 OBD_ALLOC(lmd->lmd_profile, strlen(s1) + 8);
2028                 if (!lmd->lmd_profile)
2029                         RETURN(-ENOMEM);
2030                 sprintf(lmd->lmd_profile, "%s-client", s1);
2031         }
2032
2033         /* Freed in lustre_free_lsi */
2034         OBD_ALLOC(lmd->lmd_dev, strlen(devname) + 1);
2035         if (!lmd->lmd_dev)
2036                 RETURN(-ENOMEM);
2037         strcpy(lmd->lmd_dev, devname);
2038
2039         /* Save mount options */
2040         s1 = options + strlen(options) - 1;
2041         while (s1 >= options && (*s1 == ',' || *s1 == ' '))
2042                 *s1-- = 0;
2043         if (*options != 0) {
2044                 /* Freed in lustre_free_lsi */
2045                 OBD_ALLOC(lmd->lmd_opts, strlen(options) + 1);
2046                 if (!lmd->lmd_opts)
2047                         RETURN(-ENOMEM);
2048                 strcpy(lmd->lmd_opts, options);
2049         }
2050
2051         lmd_print(lmd);
2052         lmd->lmd_magic = LMD_MAGIC;
2053
2054         RETURN(rc);
2055
2056 invalid:
2057         CERROR("Bad mount options %s\n", options);
2058         RETURN(-EINVAL);
2059 }
2060
2061
2062 /** This is the entry point for the mount call into Lustre.
2063  * This is called when a server or client is mounted,
2064  * and this is where we start setting things up.
2065  * @param data Mount options (e.g. -o flock,abort_recov)
2066  */
2067 int lustre_fill_super(struct super_block *sb, void *data, int silent)
2068 {
2069         struct lustre_mount_data *lmd;
2070         struct lustre_sb_info *lsi;
2071         int rc;
2072         ENTRY;
2073
2074         CDEBUG(D_MOUNT|D_VFSTRACE, "VFS Op: sb %p\n", sb);
2075
2076         lsi = lustre_init_lsi(sb);
2077         if (!lsi)
2078                 RETURN(-ENOMEM);
2079         lmd = lsi->lsi_lmd;
2080
2081         /*
2082          * Disable lockdep during mount, because mount locking patterns are
2083          * `special'.
2084          */
2085         cfs_lockdep_off();
2086
2087         /* Figure out the lmd from the mount options */
2088         if (lmd_parse((char *)data, lmd)) {
2089                 lustre_put_lsi(sb);
2090                 GOTO(out, rc = -EINVAL);
2091         }
2092
2093         if (lmd_is_client(lmd)) {
2094                 CDEBUG(D_MOUNT, "Mounting client %s\n", lmd->lmd_profile);
2095                 if (!client_fill_super) {
2096                         LCONSOLE_ERROR_MSG(0x165, "Nothing registered for "
2097                                            "client mount! Is the 'lustre' "
2098                                            "module loaded?\n");
2099                         lustre_put_lsi(sb);
2100                         rc = -ENODEV;
2101                 } else {
2102                         rc = lustre_start_mgc(sb);
2103                         if (rc) {
2104                                 lustre_put_lsi(sb);
2105                                 GOTO(out, rc);
2106                         }
2107                         /* Connect and start */
2108                         /* (should always be ll_fill_super) */
2109                         rc = (*client_fill_super)(sb);
2110                         /* c_f_s will call lustre_common_put_super on failure */
2111                 }
2112         } else {
2113                 CDEBUG(D_MOUNT, "Mounting server from %s\n", lmd->lmd_dev);
2114                 lsi->lsi_flags |= LSI_SERVER;
2115                 rc = server_fill_super(sb);
2116                 /* s_f_s calls lustre_start_mgc after the mount because we need
2117                    the MGS nids which are stored on disk.  Plus, we may
2118                    need to start the MGS first. */
2119                 /* s_f_s will call server_put_super on failure */
2120         }
2121
2122         /* If error happens in fill_super() call, @lsi will be killed there.
2123          * This is why we do not put it here. */
2124         GOTO(out, rc);
2125 out:
2126         if (rc) {
2127                 CERROR("Unable to mount %s (%d)\n",
2128                        s2lsi(sb) ? lmd->lmd_dev : "", rc);
2129         } else {
2130                 CDEBUG(D_SUPER, "Mount %s complete\n",
2131                        lmd->lmd_dev);
2132         }
2133         cfs_lockdep_on();
2134         return rc;
2135 }
2136
2137
2138 /* We can't call ll_fill_super by name because it lives in a module that
2139    must be loaded after this one. */
2140 void lustre_register_client_fill_super(int (*cfs)(struct super_block *sb))
2141 {
2142         client_fill_super = cfs;
2143 }
2144
2145 void lustre_register_kill_super_cb(void (*cfs)(struct super_block *sb))
2146 {
2147         kill_super_cb = cfs;
2148 }
2149
2150 /***************** FS registration ******************/
2151
2152 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,6,18))
2153 struct super_block * lustre_get_sb(struct file_system_type *fs_type,
2154                                int flags, const char *devname, void * data)
2155 {
2156         return get_sb_nodev(fs_type, flags, data, lustre_fill_super);
2157 }
2158 #else
2159 int lustre_get_sb(struct file_system_type *fs_type,
2160                                int flags, const char *devname, void * data,
2161                                struct vfsmount *mnt)
2162 {
2163         return get_sb_nodev(fs_type, flags, data, lustre_fill_super, mnt);
2164 }
2165 #endif
2166
2167 void lustre_kill_super(struct super_block *sb)
2168 {
2169         struct lustre_sb_info *lsi = s2lsi(sb);
2170
2171         if (kill_super_cb && lsi && !(lsi->lsi_flags & LSI_SERVER))
2172                 (*kill_super_cb)(sb);
2173
2174         kill_anon_super(sb);
2175 }
2176
2177 /** Register the "lustre" fs type
2178  */
2179 struct file_system_type lustre_fs_type = {
2180         .owner        = THIS_MODULE,
2181         .name         = "lustre",
2182         .get_sb       = lustre_get_sb,
2183         .kill_sb      = lustre_kill_super,
2184         .fs_flags     = FS_BINARY_MOUNTDATA | FS_REQUIRES_DEV |
2185 #ifdef FS_HAS_FIEMAP
2186                         FS_HAS_FIEMAP |
2187 #endif
2188                         LL_RENAME_DOES_D_MOVE,
2189 };
2190
2191 int lustre_register_fs(void)
2192 {
2193         return register_filesystem(&lustre_fs_type);
2194 }
2195
2196 int lustre_unregister_fs(void)
2197 {
2198         return unregister_filesystem(&lustre_fs_type);
2199 }
2200
2201 EXPORT_SYMBOL(lustre_register_client_fill_super);
2202 EXPORT_SYMBOL(lustre_register_kill_super_cb);
2203 EXPORT_SYMBOL(lustre_common_put_super);
2204 EXPORT_SYMBOL(lustre_process_log);
2205 EXPORT_SYMBOL(lustre_end_log);
2206 EXPORT_SYMBOL(server_get_mount);
2207 EXPORT_SYMBOL(server_get_mount_2);
2208 EXPORT_SYMBOL(server_put_mount);
2209 EXPORT_SYMBOL(server_put_mount_2);
2210 EXPORT_SYMBOL(server_register_target);
2211 EXPORT_SYMBOL(server_name2index);
2212 EXPORT_SYMBOL(server_mti_print);
2213 EXPORT_SYMBOL(do_lcfg);