lustre/obdclass/obd_mount_server.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2013, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/obdclass/obd_mount_server.c
  33  *
  34  * Server mount routines
  35  *
  36  * Author: Nathan Rutman <nathan@clusterfs.com>
  37  */
  38
  39
  40 #define DEBUG_SUBSYSTEM S_CLASS
  41 #define D_MOUNT (D_SUPER | D_CONFIG /* | D_WARNING */)
  42 #define PRINT_CMD CDEBUG
  43 #define PRINT_MASK (D_SUPER | D_CONFIG)
  44
  45 #include <linux/types.h>
  46 #ifdef HAVE_LINUX_SELINUX_IS_ENABLED
  47 #include <linux/selinux.h>
  48 #endif
  49 #include <linux/statfs.h>
  50 #include <linux/version.h>
  51 #include <linux/delay.h>
  52
  53 #include <llog_swab.h>
  54 #include <lustre_disk.h>
  55 #include <uapi/linux/lustre/lustre_ioctl.h>
  56 #include <lustre_log.h>
  57 #include <uapi/linux/lustre/lustre_param.h>
  58 #include <obd.h>
  59 #include <obd_class.h>
  60
  61 /*********** mount lookup *********/
  62
  63 static DEFINE_MUTEX(lustre_mount_info_lock);
  64 static LIST_HEAD(server_mount_info_list);
  65
  66 static struct lustre_mount_info *server_find_mount(const char *name)
  67 {
  68         struct list_head *tmp;
  69         struct lustre_mount_info *lmi;
  70         ENTRY;
  71
  72         list_for_each(tmp, &server_mount_info_list) {
  73                 lmi = list_entry(tmp, struct lustre_mount_info,
  74                                  lmi_list_chain);
  75                 if (strcmp(name, lmi->lmi_name) == 0)
  76                         RETURN(lmi);
  77         }
  78         RETURN(NULL);
  79 }
  80
  81 /* we must register an obd for a mount before we call the setup routine.
  82  *_setup will call lustre_get_mount to get the mnt struct
  83  by obd_name, since we can't pass the pointer to setup. */
  84 static int server_register_mount(const char *name, struct super_block *sb)
  85 {
  86         struct lustre_mount_info *lmi;
  87         char *name_cp;
  88         ENTRY;
  89
  90         LASSERT(sb);
  91
  92         OBD_ALLOC(lmi, sizeof(*lmi));
  93         if (!lmi)
  94                 RETURN(-ENOMEM);
  95         OBD_ALLOC(name_cp, strlen(name) + 1);
  96         if (!name_cp) {
  97                 OBD_FREE(lmi, sizeof(*lmi));
  98                 RETURN(-ENOMEM);
  99         }
 100         strcpy(name_cp, name);
 101
 102         mutex_lock(&lustre_mount_info_lock);
 103
 104         if (server_find_mount(name)) {
 105                 mutex_unlock(&lustre_mount_info_lock);
 106                 OBD_FREE(lmi, sizeof(*lmi));
 107                 OBD_FREE(name_cp, strlen(name) + 1);
 108                 CERROR("Already registered %s\n", name);
 109                 RETURN(-EEXIST);
 110         }
 111         lmi->lmi_name = name_cp;
 112         lmi->lmi_sb = sb;
 113         list_add(&lmi->lmi_list_chain, &server_mount_info_list);
 114
 115         mutex_unlock(&lustre_mount_info_lock);
 116
 117         CDEBUG(D_MOUNT, "register mount %p from %s\n", sb, name);
 118
 119         RETURN(0);
 120 }
 121
 122 /* when an obd no longer needs a mount */
 123 static int server_deregister_mount(const char *name)
 124 {
 125         struct lustre_mount_info *lmi;
 126         ENTRY;
 127
 128         mutex_lock(&lustre_mount_info_lock);
 129         lmi = server_find_mount(name);
 130         if (!lmi) {
 131                 mutex_unlock(&lustre_mount_info_lock);
 132                 CERROR("%s not registered\n", name);
 133                 RETURN(-ENOENT);
 134         }
 135
 136         CDEBUG(D_MOUNT, "deregister mount %p from %s\n", lmi->lmi_sb, name);
 137
 138         OBD_FREE(lmi->lmi_name, strlen(lmi->lmi_name) + 1);
 139         list_del(&lmi->lmi_list_chain);
 140         OBD_FREE(lmi, sizeof(*lmi));
 141         mutex_unlock(&lustre_mount_info_lock);
 142
 143         RETURN(0);
 144 }
 145
 146 /* obd's look up a registered mount using their obdname. This is just
 147    for initial obd setup to find the mount struct.  It should not be
 148    called every time you want to mntget. */
 149 struct lustre_mount_info *server_get_mount(const char *name)
 150 {
 151         struct lustre_mount_info *lmi;
 152         struct lustre_sb_info *lsi;
 153         ENTRY;
 154
 155         mutex_lock(&lustre_mount_info_lock);
 156         lmi = server_find_mount(name);
 157         mutex_unlock(&lustre_mount_info_lock);
 158         if (!lmi) {
 159                 CERROR("Can't find mount for %s\n", name);
 160                 RETURN(NULL);
 161         }
 162         lsi = s2lsi(lmi->lmi_sb);
 163
 164         atomic_inc(&lsi->lsi_mounts);
 165
 166         CDEBUG(D_MOUNT, "get mount %p from %s, refs=%d\n", lmi->lmi_sb,
 167                name, atomic_read(&lsi->lsi_mounts));
 168
 169         RETURN(lmi);
 170 }
 171 EXPORT_SYMBOL(server_get_mount);
 172
 173 /**
 174  * server_put_mount: to be called from obd_cleanup methods
 175  * @name:       obd name
 176  * @dereg_mnt:  0 or 1 depending on whether the mount is to be deregistered or
 177  * not
 178  *
 179  * The caller decides whether server_deregister_mount() needs to be called or
 180  * not. Calling of server_deregister_mount() does not depend on refcounting on
 181  * lsi because we could have say the mgs and mds on the same node and we
 182  * unmount the mds, then the ref on the lsi would still be non-zero but we
 183  * would still want to deregister the mds mount.
 184  */
 185 int server_put_mount(const char *name, bool dereg_mnt)
 186 {
 187         struct lustre_mount_info *lmi;
 188         struct lustre_sb_info *lsi;
 189         ENTRY;
 190
 191         mutex_lock(&lustre_mount_info_lock);
 192         lmi = server_find_mount(name);
 193         mutex_unlock(&lustre_mount_info_lock);
 194         if (!lmi) {
 195                 CERROR("Can't find mount for %s\n", name);
 196                 RETURN(-ENOENT);
 197         }
 198         lsi = s2lsi(lmi->lmi_sb);
 199
 200         CDEBUG(D_MOUNT, "put mount %p from %s, refs=%d\n",
 201                lmi->lmi_sb, name, atomic_read(&lsi->lsi_mounts));
 202
 203         if (lustre_put_lsi(lmi->lmi_sb))
 204                 CDEBUG(D_MOUNT, "Last put of mount %p from %s\n",
 205                        lmi->lmi_sb, name);
 206
 207         if (dereg_mnt)
 208                 /* this obd should never need the mount again */
 209                 server_deregister_mount(name);
 210
 211         RETURN(0);
 212 }
 213 EXPORT_SYMBOL(server_put_mount);
 214
 215 /* Set up a MGS to serve startup logs */
 216 static int server_start_mgs(struct super_block *sb)
 217 {
 218         struct lustre_sb_info    *lsi = s2lsi(sb);
 219         struct lustre_mount_info *lmi;
 220         int    rc = 0;
 221         ENTRY;
 222
 223         /* It is impossible to have more than 1 MGS per node, since
 224            MGC wouldn't know which to connect to */
 225         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
 226         if (lmi) {
 227                 lsi = s2lsi(lmi->lmi_sb);
 228                 LCONSOLE_ERROR_MSG(0x15d, "The MGS service was already started"
 229                                    " from server\n");
 230                 RETURN(-EALREADY);
 231         }
 232
 233         CDEBUG(D_CONFIG, "Start MGS service %s\n", LUSTRE_MGS_OBDNAME);
 234
 235         rc = server_register_mount(LUSTRE_MGS_OBDNAME, sb);
 236
 237         if (!rc) {
 238                 rc = lustre_start_simple(LUSTRE_MGS_OBDNAME, LUSTRE_MGS_NAME,
 239                                          LUSTRE_MGS_OBDNAME, NULL, NULL,
 240                                          lsi->lsi_osd_obdname, NULL);
 241                 /* server_deregister_mount() is not called previously, for lsi
 242                  * and other stuff can't be freed cleanly when mgs calls
 243                  * server_put_mount() in error handling case (see b=17758),
 244                  * this problem is caused by a bug in mgs_init0, which forgot
 245                  * calling server_put_mount in error case. */
 246
 247                 if (rc)
 248                         server_deregister_mount(LUSTRE_MGS_OBDNAME);
 249         }
 250
 251         if (rc)
 252                 LCONSOLE_ERROR_MSG(0x15e, "Failed to start MGS '%s' (%d). "
 253                                    "Is the 'mgs' module loaded?\n",
 254                                    LUSTRE_MGS_OBDNAME, rc);
 255         RETURN(rc);
 256 }
 257
 258 static int server_stop_mgs(struct super_block *sb)
 259 {
 260         struct obd_device *obd;
 261         int rc;
 262         struct lustre_mount_info *lmi;
 263         ENTRY;
 264
 265         /* Do not stop MGS if this device is not the running MGT */
 266         lmi = server_find_mount(LUSTRE_MGS_OBDNAME);
 267         if (lmi != NULL && lmi->lmi_sb != sb)
 268                 RETURN(0);
 269
 270         CDEBUG(D_MOUNT, "Stop MGS service %s\n", LUSTRE_MGS_OBDNAME);
 271
 272         /* There better be only one MGS */
 273         obd = class_name2obd(LUSTRE_MGS_OBDNAME);
 274         if (!obd) {
 275                 CDEBUG(D_CONFIG, "mgs %s not running\n", LUSTRE_MGS_OBDNAME);
 276                 RETURN(-EALREADY);
 277         }
 278
 279         /* The MGS should always stop when we say so */
 280         obd->obd_force = 1;
 281         rc = class_manual_cleanup(obd);
 282         RETURN(rc);
 283 }
 284
 285 /* Since there's only one mgc per node, we have to change it's fs to get
 286    access to the right disk. */
 287 static int server_mgc_set_fs(const struct lu_env *env,
 288                              struct obd_device *mgc, struct super_block *sb)
 289 {
 290         struct lustre_sb_info *lsi = s2lsi(sb);
 291         int rc;
 292         ENTRY;
 293
 294         CDEBUG(D_MOUNT, "Set mgc disk for %s\n", lsi->lsi_lmd->lmd_dev);
 295
 296         /* cl_mgc_sem in mgc insures we sleep if the mgc_fs is busy */
 297         rc = obd_set_info_async(env, mgc->obd_self_export,
 298                                 sizeof(KEY_SET_FS), KEY_SET_FS,
 299                                 sizeof(*sb), sb, NULL);
 300         if (rc != 0)
 301                 CERROR("can't set_fs %d\n", rc);
 302
 303         RETURN(rc);
 304 }
 305
 306 static int server_mgc_clear_fs(const struct lu_env *env,
 307                                struct obd_device *mgc)
 308 {
 309         int rc;
 310         ENTRY;
 311
 312         CDEBUG(D_MOUNT, "Unassign mgc disk\n");
 313
 314         rc = obd_set_info_async(env, mgc->obd_self_export,
 315                                 sizeof(KEY_CLEAR_FS), KEY_CLEAR_FS,
 316                                 0, NULL, NULL);
 317         RETURN(rc);
 318 }
 319
 320 static inline bool is_mdc_device(const char *devname)
 321 {
 322         char *ptr;
 323
 324         ptr = strrchr(devname, '-');
 325         return ptr != NULL && strcmp(ptr, "-mdc") == 0;
 326 }
 327
 328 static inline bool tgt_is_mdt(const char *tgtname, __u32 *idx)
 329 {
 330         int type;
 331
 332         type = server_name2index(tgtname, idx, NULL);
 333
 334         return type == LDD_F_SV_TYPE_MDT;
 335 }
 336
 337 /**
 338  * Convert OST/MDT name(fsname-{MDT,OST}xxxx) to a lwp name with the @idx:yyyy
 339  * (fsname-MDTyyyy-lwp-{MDT,OST}xxxx)
 340  **/
 341 int tgt_name2lwp_name(const char *tgt_name, char *lwp_name, int len, __u32 idx)
 342 {
 343         char            *fsname;
 344         const char      *tgt;
 345         int             rc;
 346         ENTRY;
 347
 348         OBD_ALLOC(fsname, MTI_NAME_MAXLEN);
 349         if (fsname == NULL)
 350                 RETURN(-ENOMEM);
 351
 352         rc = server_name2fsname(tgt_name, fsname, &tgt);
 353         if (rc != 0) {
 354                 CERROR("%s: failed to get fsname from tgt_name: rc = %d\n",
 355                        tgt_name, rc);
 356                 GOTO(cleanup, rc);
 357         }
 358
 359         if (*tgt != '-' && *tgt != ':') {
 360                 CERROR("%s: invalid tgt_name name!\n", tgt_name);
 361                 GOTO(cleanup, rc = -EINVAL);
 362         }
 363
 364         tgt++;
 365         if (strncmp(tgt, "OST", 3) != 0 && strncmp(tgt, "MDT", 3) != 0) {
 366                 CERROR("%s is not an OST or MDT target!\n", tgt_name);
 367                 GOTO(cleanup, rc = -EINVAL);
 368         }
 369         snprintf(lwp_name, len, "%s-MDT%04x-%s-%s",
 370                  fsname, idx, LUSTRE_LWP_NAME, tgt);
 371
 372         GOTO(cleanup, rc = 0);
 373
 374 cleanup:
 375         if (fsname != NULL)
 376                 OBD_FREE(fsname, MTI_NAME_MAXLEN);
 377
 378         return rc;
 379 }
 380 EXPORT_SYMBOL(tgt_name2lwp_name);
 381
 382 static LIST_HEAD(lwp_register_list);
 383 static DEFINE_SPINLOCK(lwp_register_list_lock);
 384
 385 static void lustre_put_lwp_item(struct lwp_register_item *lri)
 386 {
 387         if (atomic_dec_and_test(&lri->lri_ref)) {
 388                 LASSERT(list_empty(&lri->lri_list));
 389
 390                 if (*lri->lri_exp != NULL)
 391                         class_export_put(*lri->lri_exp);
 392                 OBD_FREE_PTR(lri);
 393         }
 394 }
 395
 396 int lustre_register_lwp_item(const char *lwpname, struct obd_export **exp,
 397                              register_lwp_cb cb_func, void *cb_data)
 398 {
 399         struct obd_device        *lwp;
 400         struct lwp_register_item *lri;
 401         bool cb = false;
 402         ENTRY;
 403
 404         LASSERTF(strlen(lwpname) < MTI_NAME_MAXLEN, "lwpname is too long %s\n",
 405                  lwpname);
 406         LASSERT(exp != NULL && *exp == NULL);
 407
 408         OBD_ALLOC_PTR(lri);
 409         if (lri == NULL)
 410                 RETURN(-ENOMEM);
 411
 412         lwp = class_name2obd(lwpname);
 413         if (lwp != NULL && lwp->obd_set_up == 1) {
 414                 struct obd_uuid *uuid;
 415
 416                 OBD_ALLOC_PTR(uuid);
 417                 if (uuid == NULL) {
 418                         OBD_FREE_PTR(lri);
 419                         RETURN(-ENOMEM);
 420                 }
 421                 memcpy(uuid->uuid, lwpname, strlen(lwpname));
 422                 *exp = cfs_hash_lookup(lwp->obd_uuid_hash, uuid);
 423                 OBD_FREE_PTR(uuid);
 424         }
 425
 426         memcpy(lri->lri_name, lwpname, strlen(lwpname));
 427         lri->lri_exp = exp;
 428         lri->lri_cb_func = cb_func;
 429         lri->lri_cb_data = cb_data;
 430         INIT_LIST_HEAD(&lri->lri_list);
 431         /*
 432          * Initialize the lri_ref at 2, one will be released before
 433          * current function returned via lustre_put_lwp_item(), the
 434          * other will be released in lustre_deregister_lwp_item().
 435          */
 436         atomic_set(&lri->lri_ref, 2);
 437
 438         spin_lock(&lwp_register_list_lock);
 439         list_add(&lri->lri_list, &lwp_register_list);
 440         if (*exp != NULL)
 441                 cb = true;
 442         spin_unlock(&lwp_register_list_lock);
 443
 444         if (cb && cb_func != NULL)
 445                 cb_func(cb_data);
 446         lustre_put_lwp_item(lri);
 447
 448         RETURN(0);
 449 }
 450 EXPORT_SYMBOL(lustre_register_lwp_item);
 451
 452 void lustre_deregister_lwp_item(struct obd_export **exp)
 453 {
 454         struct lwp_register_item *lri;
 455         bool removed = false;
 456         int repeat = 0;
 457
 458         spin_lock(&lwp_register_list_lock);
 459         list_for_each_entry(lri, &lwp_register_list, lri_list) {
 460                 if (exp == lri->lri_exp) {
 461                         list_del_init(&lri->lri_list);
 462                         removed = true;
 463                         break;
 464                 }
 465         }
 466         spin_unlock(&lwp_register_list_lock);
 467
 468         if (!removed)
 469                 return;
 470
 471         /* See lustre_notify_lwp_list(), in some extreme race conditions,
 472          * the notify callback could be still on the fly, we need to wait
 473          * for the callback done before moving on to free the data used
 474          * by callback. */
 475         while (atomic_read(&lri->lri_ref) > 1) {
 476                 CDEBUG(D_MOUNT, "lri reference count %u, repeat: %d\n",
 477                        atomic_read(&lri->lri_ref), repeat);
 478                 repeat++;
 479                 set_current_state(TASK_INTERRUPTIBLE);
 480                 schedule_timeout(cfs_time_seconds(1));
 481         }
 482         lustre_put_lwp_item(lri);
 483 }
 484 EXPORT_SYMBOL(lustre_deregister_lwp_item);
 485
 486 struct obd_export *lustre_find_lwp_by_index(const char *dev, __u32 idx)
 487 {
 488         struct lustre_mount_info *lmi;
 489         struct lustre_sb_info    *lsi;
 490         struct obd_device        *lwp;
 491         struct obd_export        *exp = NULL;
 492         char                      fsname[16];
 493         char                      lwp_name[24];
 494         int                       rc;
 495
 496         lmi = server_get_mount(dev);
 497         if (lmi == NULL)
 498                 return NULL;
 499
 500         lsi = s2lsi(lmi->lmi_sb);
 501         rc = server_name2fsname(lsi->lsi_svname, fsname, NULL);
 502         if (rc != 0) {
 503                 CERROR("%s: failed to get fsname: rc = %d\n",
 504                        lsi->lsi_svname, rc);
 505                 goto err_lmi;
 506         }
 507
 508         snprintf(lwp_name, sizeof(lwp_name), "%s-MDT%04x", fsname, idx);
 509         mutex_lock(&lsi->lsi_lwp_mutex);
 510         list_for_each_entry(lwp, &lsi->lsi_lwp_list, obd_lwp_list) {
 511                 char *ptr = strstr(lwp->obd_name, lwp_name);
 512
 513                 if (ptr != NULL && lwp->obd_lwp_export != NULL) {
 514                         exp = class_export_get(lwp->obd_lwp_export);
 515                         break;
 516                 }
 517         }
 518         mutex_unlock(&lsi->lsi_lwp_mutex);
 519
 520 err_lmi:
 521         server_put_mount(dev, false);
 522
 523         return exp;
 524 }
 525 EXPORT_SYMBOL(lustre_find_lwp_by_index);
 526
 527 void lustre_notify_lwp_list(struct obd_export *exp)
 528 {
 529         struct lwp_register_item *lri;
 530         LASSERT(exp != NULL);
 531
 532 again:
 533         spin_lock(&lwp_register_list_lock);
 534         list_for_each_entry(lri, &lwp_register_list, lri_list) {
 535                 if (strcmp(exp->exp_obd->obd_name, lri->lri_name))
 536                         continue;
 537                 if (*lri->lri_exp != NULL)
 538                         continue;
 539                 *lri->lri_exp = class_export_get(exp);
 540                 if (lri->lri_cb_func == NULL)
 541                         continue;
 542                 atomic_inc(&lri->lri_ref);
 543                 spin_unlock(&lwp_register_list_lock);
 544
 545                 lri->lri_cb_func(lri->lri_cb_data);
 546                 lustre_put_lwp_item(lri);
 547
 548                 /* Others may have changed the list after we unlock, we have
 549                  * to rescan the list from the beginning. Usually, the list
 550                  * 'lwp_register_list' is very short, and there is 'guard'
 551                  * lri::lri_exp that will prevent the callback to be done
 552                  * repeatedly. So rescanning the list has no problem. */
 553                 goto again;
 554         }
 555         spin_unlock(&lwp_register_list_lock);
 556 }
 557 EXPORT_SYMBOL(lustre_notify_lwp_list);
 558
 559 static int lustre_lwp_connect(struct obd_device *lwp, bool is_mdt)
 560 {
 561         struct lu_env            env;
 562         struct lu_context        session_ctx;
 563         struct obd_export       *exp;
 564         struct obd_uuid         *uuid = NULL;
 565         struct obd_connect_data *data = NULL;
 566         int                      rc;
 567         ENTRY;
 568
 569         /* log has been fully processed, let clients connect */
 570         rc = lu_env_init(&env, lwp->obd_lu_dev->ld_type->ldt_ctx_tags);
 571         if (rc != 0)
 572                 RETURN(rc);
 573
 574         lu_context_init(&session_ctx, LCT_SERVER_SESSION);
 575         session_ctx.lc_thread = NULL;
 576         lu_context_enter(&session_ctx);
 577         env.le_ses = &session_ctx;
 578
 579         OBD_ALLOC_PTR(data);
 580         if (data == NULL)
 581                 GOTO(out, rc = -ENOMEM);
 582
 583         data->ocd_connect_flags = OBD_CONNECT_VERSION | OBD_CONNECT_INDEX;
 584         data->ocd_version = LUSTRE_VERSION_CODE;
 585         data->ocd_connect_flags |= OBD_CONNECT_FID | OBD_CONNECT_AT |
 586                 OBD_CONNECT_LRU_RESIZE | OBD_CONNECT_FULL20 |
 587                 OBD_CONNECT_LVB_TYPE | OBD_CONNECT_LIGHTWEIGHT |
 588                 OBD_CONNECT_LFSCK | OBD_CONNECT_BULK_MBITS;
 589
 590         if (is_mdt)
 591                 data->ocd_connect_flags |= OBD_CONNECT_MDS_MDS;
 592
 593         OBD_ALLOC_PTR(uuid);
 594         if (uuid == NULL)
 595                 GOTO(out, rc = -ENOMEM);
 596
 597         if (strlen(lwp->obd_name) > sizeof(uuid->uuid)) {
 598                 CERROR("%s: Too long lwp name %s, max_size is %d\n",
 599                        lwp->obd_name, lwp->obd_name, (int)sizeof(uuid->uuid));
 600                 GOTO(out, rc = -EINVAL);
 601         }
 602
 603         /* Use lwp name as the uuid, so we find the export by lwp name later */
 604         memcpy(uuid->uuid, lwp->obd_name, strlen(lwp->obd_name));
 605         rc = obd_connect(&env, &exp, lwp, uuid, data, NULL);
 606         if (rc != 0) {
 607                 CERROR("%s: connect failed: rc = %d\n", lwp->obd_name, rc);
 608         } else {
 609                 if (unlikely(lwp->obd_lwp_export != NULL))
 610                         class_export_put(lwp->obd_lwp_export);
 611                 lwp->obd_lwp_export = class_export_get(exp);
 612         }
 613
 614         GOTO(out, rc);
 615
 616 out:
 617         if (data != NULL)
 618                 OBD_FREE_PTR(data);
 619         if (uuid != NULL)
 620                 OBD_FREE_PTR(uuid);
 621
 622         lu_env_fini(&env);
 623         lu_context_exit(&session_ctx);
 624         lu_context_fini(&session_ctx);
 625
 626         return rc;
 627 }
 628
 629 /**
 630  * lwp is used by slaves (Non-MDT0 targets) to manage the connection to MDT0,
 631  * or from the OSTx to MDTy.
 632  **/
 633 static int lustre_lwp_setup(struct lustre_cfg *lcfg, struct lustre_sb_info *lsi,
 634                             __u32 idx)
 635 {
 636         struct obd_device       *obd;
 637         char                    *lwpname = NULL;
 638         char                    *lwpuuid = NULL;
 639         int                      rc;
 640         ENTRY;
 641
 642         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
 643                             lcfg->lcfg_nid);
 644         if (rc != 0) {
 645                 CERROR("%s: Can't add uuid: rc =%d\n", lsi->lsi_svname, rc);
 646                 RETURN(rc);
 647         }
 648
 649         OBD_ALLOC(lwpname, MTI_NAME_MAXLEN);
 650         if (lwpname == NULL)
 651                 GOTO(out, rc = -ENOMEM);
 652
 653         rc = tgt_name2lwp_name(lsi->lsi_svname, lwpname, MTI_NAME_MAXLEN, idx);
 654         if (rc != 0) {
 655                 CERROR("%s: failed to generate lwp name: rc = %d\n",
 656                        lsi->lsi_svname, rc);
 657                 GOTO(out, rc);
 658         }
 659
 660         OBD_ALLOC(lwpuuid, MTI_NAME_MAXLEN);
 661         if (lwpuuid == NULL)
 662                 GOTO(out, rc = -ENOMEM);
 663
 664         sprintf(lwpuuid, "%s_UUID", lwpname);
 665         rc = lustre_start_simple(lwpname, LUSTRE_LWP_NAME,
 666                                  lwpuuid, lustre_cfg_string(lcfg, 1),
 667                                  NULL, NULL, NULL);
 668         if (rc) {
 669                 CERROR("%s: setup up failed: rc %d\n", lwpname, rc);
 670                 GOTO(out, rc);
 671         }
 672
 673         obd = class_name2obd(lwpname);
 674         LASSERT(obd != NULL);
 675
 676         rc = lustre_lwp_connect(obd, strstr(lsi->lsi_svname, "-MDT") != NULL);
 677         if (rc == 0) {
 678                 obd->u.cli.cl_max_mds_easize = MAX_MD_SIZE;
 679                 mutex_lock(&lsi->lsi_lwp_mutex);
 680                 list_add_tail(&obd->obd_lwp_list, &lsi->lsi_lwp_list);
 681                 mutex_unlock(&lsi->lsi_lwp_mutex);
 682         } else {
 683                 CERROR("%s: connect failed: rc = %d\n", lwpname, rc);
 684         }
 685
 686         GOTO(out, rc);
 687
 688 out:
 689         if (lwpname != NULL)
 690                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
 691         if (lwpuuid != NULL)
 692                 OBD_FREE(lwpuuid, MTI_NAME_MAXLEN);
 693
 694         return rc;
 695 }
 696
 697 /* the caller is responsible for memory free */
 698 static struct obd_device *lustre_find_lwp(struct lustre_sb_info *lsi,
 699                                           char **lwpname, __u32 idx)
 700 {
 701         struct obd_device       *lwp;
 702         int                      rc = 0;
 703         ENTRY;
 704
 705         LASSERT(lwpname != NULL);
 706         LASSERT(IS_OST(lsi) || IS_MDT(lsi));
 707
 708         OBD_ALLOC(*lwpname, MTI_NAME_MAXLEN);
 709         if (*lwpname == NULL)
 710                 RETURN(ERR_PTR(-ENOMEM));
 711
 712         rc = tgt_name2lwp_name(lsi->lsi_svname, *lwpname, MTI_NAME_MAXLEN, idx);
 713         if (rc != 0) {
 714                 CERROR("%s: failed to generate lwp name: rc = %d\n",
 715                        lsi->lsi_svname, rc);
 716                 GOTO(out, rc = -EINVAL);
 717         }
 718
 719         lwp = class_name2obd(*lwpname);
 720
 721 out:
 722         if (rc != 0) {
 723                 if (*lwpname != NULL) {
 724                         OBD_FREE(*lwpname, MTI_NAME_MAXLEN);
 725                         *lwpname = NULL;
 726                 }
 727                 lwp = ERR_PTR(rc);
 728         }
 729
 730         RETURN(lwp != NULL ? lwp : ERR_PTR(-ENOENT));
 731 }
 732
 733 static int lustre_lwp_add_conn(struct lustre_cfg *cfg,
 734                                struct lustre_sb_info *lsi, __u32 idx)
 735 {
 736         struct lustre_cfg_bufs *bufs = NULL;
 737         struct lustre_cfg      *lcfg = NULL;
 738         char                   *lwpname = NULL;
 739         struct obd_device      *lwp;
 740         int                     rc;
 741         ENTRY;
 742
 743         lwp = lustre_find_lwp(lsi, &lwpname, idx);
 744         if (IS_ERR(lwp)) {
 745                 CERROR("%s: can't find lwp device.\n", lsi->lsi_svname);
 746                 GOTO(out, rc = PTR_ERR(lwp));
 747         }
 748         LASSERT(lwpname != NULL);
 749
 750         OBD_ALLOC_PTR(bufs);
 751         if (bufs == NULL)
 752                 GOTO(out, rc = -ENOMEM);
 753
 754         lustre_cfg_bufs_reset(bufs, lwpname);
 755         lustre_cfg_bufs_set_string(bufs, 1,
 756                                    lustre_cfg_string(cfg, 1));
 757
 758         OBD_ALLOC(lcfg, lustre_cfg_len(bufs->lcfg_bufcount, bufs->lcfg_buflen));
 759         if (!lcfg)
 760                 GOTO(out_cfg, rc = -ENOMEM);
 761         lustre_cfg_init(lcfg, LCFG_ADD_CONN, bufs);
 762
 763         rc = class_add_conn(lwp, lcfg);
 764         if (rc)
 765                 CERROR("%s: can't add conn: rc = %d\n", lwpname, rc);
 766
 767         if (lcfg)
 768                 OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount,
 769                                               lcfg->lcfg_buflens));
 770 out_cfg:
 771         if (bufs != NULL)
 772                 OBD_FREE_PTR(bufs);
 773 out:
 774         if (lwpname != NULL)
 775                 OBD_FREE(lwpname, MTI_NAME_MAXLEN);
 776         RETURN(rc);
 777 }
 778
 779 /**
 780  * Retrieve MDT nids from the client log, then start the lwp device.
 781  * there are only two scenarios which would include mdt nid.
 782  * 1.
 783  * marker   5 (flags=0x01, v2.1.54.0) lustre-MDTyyyy  'add mdc' xxx-
 784  * add_uuid  nid=192.168.122.162@tcp(0x20000c0a87aa2)  0:  1:192.168.122.162@tcp
 785  * attach    0:lustre-MDTyyyy-mdc  1:mdc  2:lustre-clilmv_UUID
 786  * setup     0:lustre-MDTyyyy-mdc  1:lustre-MDTyyyy_UUID  2:192.168.122.162@tcp
 787  * add_uuid  nid=192.168.172.1@tcp(0x20000c0a8ac01)  0:  1:192.168.172.1@tcp
 788  * add_conn  0:lustre-MDTyyyy-mdc  1:192.168.172.1@tcp
 789  * modify_mdc_tgts add 0:lustre-clilmv  1:lustre-MDTyyyy_UUID xxxx
 790  * marker   5 (flags=0x02, v2.1.54.0) lustre-MDTyyyy  'add mdc' xxxx-
 791  * 2.
 792  * marker   7 (flags=0x01, v2.1.54.0) lustre-MDTyyyy  'add failnid' xxxx-
 793  * add_uuid  nid=192.168.122.2@tcp(0x20000c0a87a02)  0:  1:192.168.122.2@tcp
 794  * add_conn  0:lustre-MDTyyyy-mdc  1:192.168.122.2@tcp
 795  * marker   7 (flags=0x02, v2.1.54.0) lustre-MDTyyyy  'add failnid' xxxx-
 796  **/
 797 static int client_lwp_config_process(const struct lu_env *env,
 798                                      struct llog_handle *handle,
 799                                      struct llog_rec_hdr *rec, void *data)
 800 {
 801         struct config_llog_instance *cfg = data;
 802         int                          cfg_len = rec->lrh_len;
 803         char                        *cfg_buf = (char *) (rec + 1);
 804         struct lustre_cfg           *lcfg = NULL;
 805         struct lustre_sb_info       *lsi;
 806         int                          rc = 0, swab = 0;
 807         ENTRY;
 808
 809         if (rec->lrh_type != OBD_CFG_REC) {
 810                 CERROR("Unknown llog record type %#x encountered\n",
 811                        rec->lrh_type);
 812                 RETURN(-EINVAL);
 813         }
 814
 815         if (cfg->cfg_sb == NULL)
 816                 GOTO(out, rc = -EINVAL);
 817         lsi = s2lsi(cfg->cfg_sb);
 818
 819         lcfg = (struct lustre_cfg *)cfg_buf;
 820         if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
 821                 lustre_swab_lustre_cfg(lcfg);
 822                 swab = 1;
 823         }
 824
 825         rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
 826         if (rc)
 827                 GOTO(out, rc);
 828
 829         switch (lcfg->lcfg_command) {
 830         case LCFG_MARKER: {
 831                 struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
 832
 833                 lustre_swab_cfg_marker(marker, swab,
 834                                        LUSTRE_CFG_BUFLEN(lcfg, 1));
 835                 if (marker->cm_flags & CM_SKIP ||
 836                     marker->cm_flags & CM_EXCLUDE)
 837                         GOTO(out, rc = 0);
 838
 839                 if (!tgt_is_mdt(marker->cm_tgtname, &cfg->cfg_lwp_idx))
 840                         GOTO(out, rc = 0);
 841
 842                 if (IS_MDT(lsi) && cfg->cfg_lwp_idx != 0)
 843                         GOTO(out, rc = 0);
 844
 845                 if (!strncmp(marker->cm_comment, "add mdc", 7) ||
 846                     !strncmp(marker->cm_comment, "add failnid", 11)) {
 847                         if (marker->cm_flags & CM_START) {
 848                                 cfg->cfg_flags = CFG_F_MARKER;
 849                                 /* This hack is to differentiate the
 850                                  * ADD_UUID is come from "add mdc" record
 851                                  * or from "add failnid" record. */
 852                                 if (!strncmp(marker->cm_comment,
 853                                              "add failnid", 11))
 854                                         cfg->cfg_flags |= CFG_F_SKIP;
 855                         } else if (marker->cm_flags & CM_END) {
 856                                 cfg->cfg_flags = 0;
 857                         }
 858                 }
 859                 break;
 860         }
 861         case LCFG_ADD_UUID: {
 862                 if (cfg->cfg_flags == CFG_F_MARKER) {
 863                         rc = lustre_lwp_setup(lcfg, lsi, cfg->cfg_lwp_idx);
 864                         /* XXX: process only the first nid as
 865                          * we don't need another instance of lwp */
 866                         cfg->cfg_flags |= CFG_F_SKIP;
 867                 } else if (cfg->cfg_flags == (CFG_F_MARKER | CFG_F_SKIP)) {
 868                         rc = class_add_uuid(lustre_cfg_string(lcfg, 1),
 869                                             lcfg->lcfg_nid);
 870                         if (rc)
 871                                 CERROR("%s: Fail to add uuid, rc:%d\n",
 872                                        lsi->lsi_svname, rc);
 873                 }
 874                 break;
 875         }
 876         case LCFG_ADD_CONN: {
 877                 char *devname = lustre_cfg_string(lcfg, 0);
 878                 char *ptr;
 879                 __u32 idx     = 0;
 880
 881                 if (!is_mdc_device(devname))
 882                         break;
 883
 884                 ptr = strrchr(devname, '-');
 885                 if (ptr == NULL)
 886                         break;
 887
 888                 *ptr = 0;
 889                 if (!tgt_is_mdt(devname, &idx)) {
 890                         *ptr = '-';
 891                         break;
 892                 }
 893                 *ptr = '-';
 894
 895                 if (IS_MDT(lsi) && idx != 0)
 896                         break;
 897
 898                 rc = lustre_lwp_add_conn(lcfg, lsi, idx);
 899                 break;
 900         }
 901         default:
 902                 break;
 903         }
 904 out:
 905         RETURN(rc);
 906 }
 907
 908 static int lustre_disconnect_lwp(struct super_block *sb)
 909 {
 910         struct lustre_sb_info           *lsi     = s2lsi(sb);
 911         struct obd_device               *lwp;
 912         char                            *logname = NULL;
 913         struct lustre_cfg_bufs          *bufs    = NULL;
 914         struct config_llog_instance     *cfg     = NULL;
 915         int                              rc      = 0;
 916         int                              rc1     = 0;
 917         ENTRY;
 918
 919         if (likely(lsi->lsi_lwp_started)) {
 920                 OBD_ALLOC(logname, MTI_NAME_MAXLEN);
 921                 if (logname == NULL)
 922                         RETURN(-ENOMEM);
 923
 924                 rc = server_name2fsname(lsi->lsi_svname, logname, NULL);
 925                 if (rc != 0) {
 926                         CERROR("%s: failed to get fsname from svname: "
 927                                "rc = %d\n", lsi->lsi_svname, rc);
 928                         GOTO(out, rc = -EINVAL);
 929                 }
 930
 931                 strcat(logname, "-client");
 932                 OBD_ALLOC_PTR(cfg);
 933                 if (cfg == NULL)
 934                         GOTO(out, rc = -ENOMEM);
 935
 936                 /* end log first */
 937                 cfg->cfg_instance = ll_get_cfg_instance(sb);
 938                 rc = lustre_end_log(sb, logname, cfg);
 939                 if (rc != 0 && rc != -ENOENT)
 940                         GOTO(out, rc);
 941
 942                 lsi->lsi_lwp_started = 0;
 943         }
 944
 945         OBD_ALLOC_PTR(bufs);
 946         if (bufs == NULL)
 947                 GOTO(out, rc = -ENOMEM);
 948
 949         mutex_lock(&lsi->lsi_lwp_mutex);
 950         list_for_each_entry(lwp, &lsi->lsi_lwp_list, obd_lwp_list) {
 951                 struct lustre_cfg *lcfg;
 952
 953                 if (likely(lwp->obd_lwp_export != NULL)) {
 954                         class_export_put(lwp->obd_lwp_export);
 955                         lwp->obd_lwp_export = NULL;
 956                 }
 957
 958                 lustre_cfg_bufs_reset(bufs, lwp->obd_name);
 959                 lustre_cfg_bufs_set_string(bufs, 1, NULL);
 960                 OBD_ALLOC(lcfg, lustre_cfg_len(bufs->lcfg_bufcount,
 961                                                bufs->lcfg_buflen));
 962                 if (!lcfg) {
 963                         rc = -ENOMEM;
 964                         break;
 965                 }
 966                 lustre_cfg_init(lcfg, LCFG_CLEANUP, bufs);
 967
 968                 /* Disconnect import first. NULL is passed for the '@env',
 969                  * since it will not be used. */
 970                 rc = lwp->obd_lu_dev->ld_ops->ldo_process_config(NULL,
 971                                                         lwp->obd_lu_dev, lcfg);
 972                 OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount,
 973                                               lcfg->lcfg_buflens));
 974                 if (rc != 0 && rc != -ETIMEDOUT) {
 975                         CERROR("%s: fail to disconnect LWP: rc = %d\n",
 976                                lwp->obd_name, rc);
 977                         rc1 = rc;
 978                 }
 979         }
 980         mutex_unlock(&lsi->lsi_lwp_mutex);
 981
 982         GOTO(out, rc);
 983
 984 out:
 985         if (bufs != NULL)
 986                 OBD_FREE_PTR(bufs);
 987         if (cfg != NULL)
 988                 OBD_FREE_PTR(cfg);
 989         if (logname != NULL)
 990                 OBD_FREE(logname, MTI_NAME_MAXLEN);
 991
 992         return rc1 != 0 ? rc1 : rc;
 993 }
 994
 995 /**
 996  * Stop the lwp for an OST/MDT target.
 997  **/
 998 static int lustre_stop_lwp(struct super_block *sb)
 999 {
1000         struct lustre_sb_info   *lsi = s2lsi(sb);
1001         struct obd_device       *lwp;
1002         int                      rc  = 0;
1003         int                      rc1 = 0;
1004         ENTRY;
1005
1006         mutex_lock(&lsi->lsi_lwp_mutex);
1007         while (!list_empty(&lsi->lsi_lwp_list)) {
1008                 lwp = list_entry(lsi->lsi_lwp_list.next, struct obd_device,
1009                                  obd_lwp_list);
1010                 list_del_init(&lwp->obd_lwp_list);
1011                 lwp->obd_force = 1;
1012                 mutex_unlock(&lsi->lsi_lwp_mutex);
1013
1014                 rc = class_manual_cleanup(lwp);
1015                 if (rc != 0) {
1016                         CERROR("%s: fail to stop LWP: rc = %d\n",
1017                                lwp->obd_name, rc);
1018                         rc1 = rc;
1019                 }
1020                 mutex_lock(&lsi->lsi_lwp_mutex);
1021         }
1022         mutex_unlock(&lsi->lsi_lwp_mutex);
1023
1024         RETURN(rc1 != 0 ? rc1 : rc);
1025 }
1026
1027 /**
1028  * Start the lwp(fsname-MDTyyyy-lwp-{MDT,OST}xxxx) for a MDT/OST or MDT target.
1029  **/
1030 static int lustre_start_lwp(struct super_block *sb)
1031 {
1032         struct lustre_sb_info       *lsi = s2lsi(sb);
1033         struct config_llog_instance *cfg = NULL;
1034         char                        *logname;
1035         int                          rc;
1036         ENTRY;
1037
1038         if (unlikely(lsi->lsi_lwp_started))
1039                 RETURN(0);
1040
1041         OBD_ALLOC(logname, MTI_NAME_MAXLEN);
1042         if (logname == NULL)
1043                 RETURN(-ENOMEM);
1044
1045         rc = server_name2fsname(lsi->lsi_svname, logname, NULL);
1046         if (rc != 0) {
1047                 CERROR("%s: failed to get fsname from svname: rc = %d\n",
1048                        lsi->lsi_svname, rc);
1049                 GOTO(out, rc = -EINVAL);
1050         }
1051
1052         strcat(logname, "-client");
1053         OBD_ALLOC_PTR(cfg);
1054         if (cfg == NULL)
1055                 GOTO(out, rc = -ENOMEM);
1056
1057         cfg->cfg_callback = client_lwp_config_process;
1058         cfg->cfg_instance = ll_get_cfg_instance(sb);
1059         rc = lustre_process_log(sb, logname, cfg);
1060         /* need to remove config llog from mgc */
1061         lsi->lsi_lwp_started = 1;
1062
1063         GOTO(out, rc);
1064
1065 out:
1066         OBD_FREE(logname, MTI_NAME_MAXLEN);
1067         if (cfg != NULL)
1068                 OBD_FREE_PTR(cfg);
1069
1070         return rc;
1071 }
1072
1073 static DEFINE_MUTEX(server_start_lock);
1074
1075 /* Stop MDS/OSS if nobody is using them */
1076 static int server_stop_servers(int lsiflags)
1077 {
1078         struct obd_device *obd = NULL;
1079         struct obd_type *type = NULL;
1080         int rc = 0;
1081         bool type_last;
1082         ENTRY;
1083
1084         mutex_lock(&server_start_lock);
1085
1086         /* Either an MDT or an OST or neither  */
1087         /* if this was an MDT, and there are no more MDT's, clean up the MDS */
1088         if (lsiflags & LDD_F_SV_TYPE_MDT) {
1089                 obd = class_name2obd(LUSTRE_MDS_OBDNAME);
1090                 type = class_search_type(LUSTRE_MDT_NAME);
1091         } else if (lsiflags & LDD_F_SV_TYPE_OST) {
1092         /* if this was an OST, and there are no more OST's, clean up the OSS */
1093                 obd = class_name2obd(LUSTRE_OSS_OBDNAME);
1094                 type = class_search_type(LUSTRE_OST_NAME);
1095         }
1096
1097         /* server_stop_servers is a pair of server_start_targets
1098          * Here we put type which was taken at server_start_targets.
1099          * If type is NULL then there is a wrong logic around type or
1100          * type reference. */
1101         LASSERTF(type, "Server flags %d, obd %s\n", lsiflags,
1102                  obd ? obd->obd_name : "NULL");
1103
1104         type_last = (type->typ_refcnt == 1);
1105
1106         class_put_type(type);
1107         if (obd != NULL && type_last) {
1108                 obd->obd_force = 1;
1109                 /* obd_fail doesn't mean much on a server obd */
1110                 rc = class_manual_cleanup(obd);
1111         }
1112
1113         mutex_unlock(&server_start_lock);
1114
1115         RETURN(rc);
1116 }
1117
1118 int server_mti_print(const char *title, struct mgs_target_info *mti)
1119 {
1120         PRINT_CMD(PRINT_MASK, "mti %s\n", title);
1121         PRINT_CMD(PRINT_MASK, "server: %s\n", mti->mti_svname);
1122         PRINT_CMD(PRINT_MASK, "fs:     %s\n", mti->mti_fsname);
1123         PRINT_CMD(PRINT_MASK, "uuid:   %s\n", mti->mti_uuid);
1124         PRINT_CMD(PRINT_MASK, "ver: %d  flags: %#x\n",
1125                   mti->mti_config_ver, mti->mti_flags);
1126         return 0;
1127 }
1128
1129 /* Generate data for registration */
1130 static int server_lsi2mti(struct lustre_sb_info *lsi,
1131                           struct mgs_target_info *mti)
1132 {
1133         struct lnet_process_id id;
1134         int rc, i = 0;
1135         int cplen = 0;
1136         ENTRY;
1137
1138         if (!IS_SERVER(lsi))
1139                 RETURN(-EINVAL);
1140
1141         if (strlcpy(mti->mti_svname, lsi->lsi_svname, sizeof(mti->mti_svname))
1142             >= sizeof(mti->mti_svname))
1143                 RETURN(-E2BIG);
1144
1145         mti->mti_nid_count = 0;
1146         while (LNetGetId(i++, &id) != -ENOENT) {
1147                 if (LNET_NETTYP(LNET_NIDNET(id.nid)) == LOLND)
1148                         continue;
1149
1150                 /* server use --servicenode param, only allow specified
1151                  * nids be registered */
1152                 if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) != 0 &&
1153                     class_match_nid(lsi->lsi_lmd->lmd_params,
1154                                     PARAM_FAILNODE, id.nid) < 1)
1155                         continue;
1156
1157                 /* match specified network */
1158                 if (!class_match_net(lsi->lsi_lmd->lmd_params,
1159                                      PARAM_NETWORK, LNET_NIDNET(id.nid)))
1160                         continue;
1161
1162                 mti->mti_nids[mti->mti_nid_count] = id.nid;
1163                 mti->mti_nid_count++;
1164                 if (mti->mti_nid_count >= MTI_NIDS_MAX) {
1165                         CWARN("Only using first %d nids for %s\n",
1166                               mti->mti_nid_count, mti->mti_svname);
1167                         break;
1168                 }
1169         }
1170
1171         if (mti->mti_nid_count == 0) {
1172                 CERROR("Failed to get NID for server %s, please check whether "
1173                        "the target is specifed with improper --servicenode or "
1174                        "--network options.\n", mti->mti_svname);
1175                 RETURN(-EINVAL);
1176         }
1177
1178         mti->mti_lustre_ver = LUSTRE_VERSION_CODE;
1179         mti->mti_config_ver = 0;
1180
1181         rc = server_name2fsname(lsi->lsi_svname, mti->mti_fsname, NULL);
1182         if (rc != 0)
1183                 return rc;
1184
1185         rc = server_name2index(lsi->lsi_svname, &mti->mti_stripe_index, NULL);
1186         if (rc < 0)
1187                 return rc;
1188         /* Orion requires index to be set */
1189         LASSERT(!(rc & LDD_F_NEED_INDEX));
1190         /* keep only LDD flags */
1191         mti->mti_flags = lsi->lsi_flags & LDD_F_MASK;
1192         if (mti->mti_flags & (LDD_F_WRITECONF | LDD_F_VIRGIN))
1193                 mti->mti_flags |= LDD_F_UPDATE;
1194         cplen = strlcpy(mti->mti_params, lsi->lsi_lmd->lmd_params,
1195                         sizeof(mti->mti_params));
1196         if (cplen >= sizeof(mti->mti_params))
1197                 return -E2BIG;
1198         return 0;
1199 }
1200
1201 /* Register an old or new target with the MGS. If needed MGS will construct
1202    startup logs and assign index */
1203 static int server_register_target(struct lustre_sb_info *lsi)
1204 {
1205         struct obd_device *mgc = lsi->lsi_mgc;
1206         struct mgs_target_info *mti = NULL;
1207         bool writeconf;
1208         int rc;
1209         int tried = 0;
1210         ENTRY;
1211
1212         LASSERT(mgc);
1213
1214         if (!IS_SERVER(lsi))
1215                 RETURN(-EINVAL);
1216
1217         OBD_ALLOC_PTR(mti);
1218         if (!mti)
1219                 RETURN(-ENOMEM);
1220
1221         rc = server_lsi2mti(lsi, mti);
1222         if (rc)
1223                 GOTO(out, rc);
1224
1225         CDEBUG(D_MOUNT, "Registration %s, fs=%s, %s, index=%04x, flags=%#x\n",
1226                mti->mti_svname, mti->mti_fsname,
1227                libcfs_nid2str(mti->mti_nids[0]), mti->mti_stripe_index,
1228                mti->mti_flags);
1229
1230         /* if write_conf is true, the registration must succeed */
1231         writeconf = !!(lsi->lsi_flags & (LDD_F_NEED_INDEX | LDD_F_UPDATE));
1232         mti->mti_flags |= LDD_F_OPC_REG;
1233
1234 again:
1235         /* Register the target */
1236         /* FIXME use mgc_process_config instead */
1237         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1238                                 sizeof(KEY_REGISTER_TARGET),
1239                                 KEY_REGISTER_TARGET,
1240                                 sizeof(*mti), mti, NULL);
1241         if (rc) {
1242                 if (mti->mti_flags & LDD_F_ERROR) {
1243                         LCONSOLE_ERROR_MSG(0x160,
1244                                 "%s: the MGS refuses to allow this server "
1245                                 "to start: rc = %d. Please see messages on "
1246                                 "the MGS.\n", lsi->lsi_svname, rc);
1247                 } else if (writeconf) {
1248                         if ((rc == -ESHUTDOWN || rc == -EIO) && ++tried < 5) {
1249                                 /* The connection with MGS is not established.
1250                                  * Try again after 2 seconds. Interruptable. */
1251                                 set_current_state(TASK_INTERRUPTIBLE);
1252                                 schedule_timeout(cfs_time_seconds(2));
1253                                 set_current_state(TASK_RUNNING);
1254                                 if (!signal_pending(current))
1255                                         goto again;
1256                         }
1257
1258                         LCONSOLE_ERROR_MSG(0x15f,
1259                                 "%s: cannot register this server with the MGS: "
1260                                 "rc = %d. Is the MGS running?\n",
1261                                 lsi->lsi_svname, rc);
1262                 } else {
1263                         CDEBUG(D_HA, "%s: error registering with the MGS: "
1264                                "rc = %d (not fatal)\n", lsi->lsi_svname, rc);
1265                         /* reset the error code for non-fatal error. */
1266                         rc = 0;
1267                 }
1268                 GOTO(out, rc);
1269         }
1270
1271 out:
1272         if (mti)
1273                 OBD_FREE_PTR(mti);
1274         RETURN(rc);
1275 }
1276
1277 /**
1278  * Notify the MGS that this target is ready.
1279  * Used by IR - if the MGS receives this message, it will notify clients.
1280  */
1281 static int server_notify_target(struct super_block *sb, struct obd_device *obd)
1282 {
1283         struct lustre_sb_info *lsi = s2lsi(sb);
1284         struct obd_device *mgc = lsi->lsi_mgc;
1285         struct mgs_target_info *mti = NULL;
1286         int rc;
1287         ENTRY;
1288
1289         LASSERT(mgc);
1290
1291         if (!(IS_SERVER(lsi)))
1292                 RETURN(-EINVAL);
1293
1294         OBD_ALLOC_PTR(mti);
1295         if (!mti)
1296                 RETURN(-ENOMEM);
1297         rc = server_lsi2mti(lsi, mti);
1298         if (rc)
1299                 GOTO(out, rc);
1300
1301         mti->mti_instance = obd->u.obt.obt_instance;
1302         mti->mti_flags |= LDD_F_OPC_READY;
1303
1304         /* FIXME use mgc_process_config instead */
1305         rc = obd_set_info_async(NULL, mgc->u.cli.cl_mgc_mgsexp,
1306                                 sizeof(KEY_REGISTER_TARGET),
1307                                 KEY_REGISTER_TARGET,
1308                                 sizeof(*mti), mti, NULL);
1309
1310         /* Imperative recovery: if the mgs informs us to use IR? */
1311         if (!rc && !(mti->mti_flags & LDD_F_ERROR) &&
1312             (mti->mti_flags & LDD_F_IR_CAPABLE))
1313                 lsi->lsi_flags |= LDD_F_IR_CAPABLE;
1314
1315 out:
1316         if (mti)
1317                 OBD_FREE_PTR(mti);
1318         RETURN(rc);
1319
1320 }
1321
1322 /** Start server targets: MDTs and OSTs
1323  */
1324 static int server_start_targets(struct super_block *sb)
1325 {
1326         struct obd_device *obd;
1327         struct lustre_sb_info *lsi = s2lsi(sb);
1328         struct config_llog_instance cfg;
1329         struct lu_env mgc_env;
1330         struct lu_device *dev;
1331         char *name_service, *obd_name_service = NULL;
1332         struct obd_type *type = NULL;
1333         int rc;
1334         ENTRY;
1335
1336         CDEBUG(D_MOUNT, "starting target %s\n", lsi->lsi_svname);
1337
1338         LASSERTF(IS_MDT(lsi) || IS_OST(lsi), "designed for MDT or OST only\n");
1339
1340         if (IS_MDT(lsi)) {
1341                 obd_name_service = LUSTRE_MDS_OBDNAME;
1342                 name_service = LUSTRE_MDS_NAME;
1343         } else {
1344                 obd_name_service = LUSTRE_OSS_OBDNAME;
1345                 name_service = LUSTRE_OSS_NAME;
1346         }
1347
1348         /* make sure MDS/OSS is started */
1349         mutex_lock(&server_start_lock);
1350         obd = class_name2obd(obd_name_service);
1351         if (!obd) {
1352                 rc = lustre_start_simple(obd_name_service, name_service,
1353                                          (IS_MDT(lsi) ?
1354                                           LUSTRE_MDS_OBDNAME"_uuid" :
1355                                           LUSTRE_OSS_OBDNAME"_uuid"),
1356                                          NULL, NULL, NULL, NULL);
1357                 if (rc) {
1358                         mutex_unlock(&server_start_lock);
1359                         CERROR("failed to start %s: %d\n",
1360                                obd_name_service, rc);
1361                         RETURN(rc);
1362                 }
1363         }
1364         /* hold a type reference and put it at server_stop_servers */
1365         type = class_get_type(IS_MDT(lsi) ?
1366                               LUSTRE_MDT_NAME : LUSTRE_OST_NAME);
1367         lsi->lsi_server_started = 1;
1368         mutex_unlock(&server_start_lock);
1369         if (OBD_FAIL_PRECHECK(OBD_FAIL_OBD_STOP_MDS_RACE) &&
1370             IS_MDT(lsi)) {
1371                 OBD_RACE(OBD_FAIL_OBD_STOP_MDS_RACE);
1372                 msleep(2 * MSEC_PER_SEC);
1373         }
1374
1375         rc = lu_env_init(&mgc_env, LCT_MG_THREAD);
1376         if (rc != 0)
1377                 GOTO(out_stop_service, rc);
1378
1379         /* Set the mgc fs to our server disk.  This allows the MGC to
1380          * read and write configs locally, in case it can't talk to the MGS. */
1381         rc = server_mgc_set_fs(&mgc_env, lsi->lsi_mgc, sb);
1382         if (rc)
1383                 GOTO(out_env, rc);
1384
1385         /* Register with MGS */
1386         rc = server_register_target(lsi);
1387         if (rc)
1388                 GOTO(out_mgc, rc);
1389
1390         /* Let the target look up the mount using the target's name
1391            (we can't pass the sb or mnt through class_process_config.) */
1392         rc = server_register_mount(lsi->lsi_svname, sb);
1393         if (rc)
1394                 GOTO(out_mgc, rc);
1395
1396         /* Start targets using the llog named for the target */
1397         memset(&cfg, 0, sizeof(cfg));
1398         cfg.cfg_callback = class_config_llog_handler;
1399         cfg.cfg_sub_clds = CONFIG_SUB_SERVER;
1400         rc = lustre_process_log(sb, lsi->lsi_svname, &cfg);
1401         if (rc) {
1402                 CERROR("failed to start server %s: %d\n",
1403                        lsi->lsi_svname, rc);
1404                 /* Do NOT call server_deregister_mount() here. This makes it
1405                  * impossible to find mount later in cleanup time and leaves
1406                  * @lsi and othder stuff leaked. -umka */
1407                 GOTO(out_mgc, rc);
1408         }
1409
1410         obd = class_name2obd(lsi->lsi_svname);
1411         if (!obd) {
1412                 CERROR("no server named %s was started\n", lsi->lsi_svname);
1413                 GOTO(out_mgc, rc = -ENXIO);
1414         }
1415
1416         if (IS_OST(lsi) || IS_MDT(lsi)) {
1417                 rc = lustre_start_lwp(sb);
1418                 if (rc) {
1419                         CERROR("%s: failed to start LWP: %d\n",
1420                                lsi->lsi_svname, rc);
1421                         GOTO(out_mgc, rc);
1422                 }
1423         }
1424
1425         server_notify_target(sb, obd);
1426
1427         /* calculate recovery timeout, do it after lustre_process_log */
1428         server_calc_timeout(lsi, obd);
1429
1430         /* log has been fully processed, let clients connect */
1431         dev = obd->obd_lu_dev;
1432         if (dev && dev->ld_ops->ldo_prepare) {
1433                 struct lu_env env;
1434
1435                 rc = lu_env_init(&env, dev->ld_type->ldt_ctx_tags);
1436                 if (rc == 0) {
1437                         struct lu_context  session_ctx;
1438
1439                         lu_context_init(&session_ctx, LCT_SERVER_SESSION);
1440                         session_ctx.lc_thread = NULL;
1441                         lu_context_enter(&session_ctx);
1442                         env.le_ses = &session_ctx;
1443
1444                         rc = dev->ld_ops->ldo_prepare(&env, NULL, dev);
1445
1446                         lu_env_fini(&env);
1447                         lu_context_exit(&session_ctx);
1448                         lu_context_fini(&session_ctx);
1449                 }
1450         }
1451
1452         /* abort recovery only on the complete stack:
1453          * many devices can be involved */
1454         if ((lsi->lsi_lmd->lmd_flags & LMD_FLG_ABORT_RECOV) &&
1455             (OBP(obd, iocontrol))) {
1456                 obd_iocontrol(OBD_IOC_ABORT_RECOVERY, obd->obd_self_export, 0,
1457                               NULL, NULL);
1458         }
1459
1460 out_mgc:
1461         /* Release the mgc fs for others to use */
1462         server_mgc_clear_fs(&mgc_env, lsi->lsi_mgc);
1463 out_env:
1464         lu_env_fini(&mgc_env);
1465 out_stop_service:
1466         /* in case of error upper function call
1467          * server_put_super->server_stop_servers()
1468          */
1469
1470         RETURN(rc);
1471 }
1472
1473 static int lsi_prepare(struct lustre_sb_info *lsi)
1474 {
1475         const char *osd_type;
1476         const char *fstype;
1477         __u32 index;
1478         int rc;
1479         ENTRY;
1480
1481         LASSERT(lsi);
1482         LASSERT(lsi->lsi_lmd);
1483
1484         /* The server name is given as a mount line option */
1485         if (lsi->lsi_lmd->lmd_profile == NULL) {
1486                 LCONSOLE_ERROR("Can't determine server name\n");
1487                 RETURN(-EINVAL);
1488         }
1489
1490         /* Determine osd type */
1491         if (lsi->lsi_lmd->lmd_osd_type == NULL) {
1492                 osd_type = LUSTRE_OSD_LDISKFS_NAME;
1493                 fstype = "ldiskfs";
1494         } else {
1495                 osd_type = lsi->lsi_lmd->lmd_osd_type;
1496                 fstype = lsi->lsi_lmd->lmd_osd_type;
1497         }
1498
1499         if (strlen(lsi->lsi_lmd->lmd_profile) >= sizeof(lsi->lsi_svname) ||
1500             strlen(osd_type) >= sizeof(lsi->lsi_osd_type) ||
1501             strlen(fstype) >= sizeof(lsi->lsi_fstype))
1502                 RETURN(-ENAMETOOLONG);
1503
1504         strlcpy(lsi->lsi_svname, lsi->lsi_lmd->lmd_profile,
1505                 sizeof(lsi->lsi_svname));
1506         strlcpy(lsi->lsi_osd_type, osd_type, sizeof(lsi->lsi_osd_type));
1507         /* XXX: a temp. solution for components using ldiskfs
1508          *      to be removed in one of the subsequent patches */
1509         strlcpy(lsi->lsi_fstype, fstype, sizeof(lsi->lsi_fstype));
1510
1511         /* Determine server type */
1512         rc = server_name2index(lsi->lsi_svname, &index, NULL);
1513         if (rc < 0) {
1514                 if (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) {
1515                         /* Assume we're a bare MGS */
1516                         rc = 0;
1517                         lsi->lsi_lmd->lmd_flags |= LMD_FLG_NOSVC;
1518                 } else {
1519                         LCONSOLE_ERROR("Can't determine server type of '%s'\n",
1520                                        lsi->lsi_svname);
1521                         RETURN(rc);
1522                 }
1523         }
1524         lsi->lsi_flags |= rc;
1525
1526         /* Add mount line flags that used to be in ldd:
1527          * writeconf, mgs, anything else?
1528          */
1529         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_WRITECONF) ?
1530                 LDD_F_WRITECONF : 0;
1531         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_VIRGIN) ?
1532                 LDD_F_VIRGIN : 0;
1533         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_UPDATE) ?
1534                 LDD_F_UPDATE : 0;
1535         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_MGS) ?
1536                 LDD_F_SV_TYPE_MGS : 0;
1537         lsi->lsi_flags |= (lsi->lsi_lmd->lmd_flags & LMD_FLG_NO_PRIMNODE) ?
1538                 LDD_F_NO_PRIMNODE : 0;
1539
1540         RETURN(0);
1541 }
1542
1543 /*************** server mount ******************/
1544
1545 /** Start the shutdown of servers at umount.
1546  */
1547 static void server_put_super(struct super_block *sb)
1548 {
1549         struct lustre_sb_info *lsi = s2lsi(sb);
1550         struct obd_device     *obd;
1551         char *tmpname, *extraname = NULL;
1552         int tmpname_sz;
1553         int lsiflags = lsi->lsi_flags;
1554         bool stop_servers = lsi->lsi_server_started;
1555         ENTRY;
1556
1557         LASSERT(IS_SERVER(lsi));
1558
1559         tmpname_sz = strlen(lsi->lsi_svname) + 1;
1560         OBD_ALLOC(tmpname, tmpname_sz);
1561         memcpy(tmpname, lsi->lsi_svname, tmpname_sz);
1562         CDEBUG(D_MOUNT, "server put_super %s\n", tmpname);
1563         if (IS_MDT(lsi) && (lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC))
1564                 snprintf(tmpname, tmpname_sz, "MGS");
1565
1566         /* disconnect the lwp first to drain off the inflight request */
1567         if (IS_OST(lsi) || IS_MDT(lsi)) {
1568                 int     rc;
1569
1570                 rc = lustre_disconnect_lwp(sb);
1571                 if (rc != 0 && rc != -ETIMEDOUT &&
1572                     rc != -ENOTCONN && rc != -ESHUTDOWN)
1573                         CWARN("%s: failed to disconnect lwp: rc= %d\n",
1574                               tmpname, rc);
1575         }
1576
1577         /* Stop the target */
1578         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
1579             (IS_MDT(lsi) || IS_OST(lsi))) {
1580                 struct lustre_profile *lprof = NULL;
1581
1582                 /* tell the mgc to drop the config log */
1583                 lustre_end_log(sb, lsi->lsi_svname, NULL);
1584
1585                 /* COMPAT_146 - profile may get deleted in mgc_cleanup.
1586                    If there are any setup/cleanup errors, save the lov
1587                    name for safety cleanup later. */
1588                 lprof = class_get_profile(lsi->lsi_svname);
1589                 if (lprof != NULL) {
1590                         if (lprof->lp_dt != NULL) {
1591                                 OBD_ALLOC(extraname, strlen(lprof->lp_dt) + 1);
1592                                 strncpy(extraname, lprof->lp_dt,
1593                                         strlen(lprof->lp_dt) + 1);
1594                         }
1595                         class_put_profile(lprof);
1596                 }
1597
1598                 obd = class_name2obd(lsi->lsi_svname);
1599                 if (obd) {
1600                         CDEBUG(D_MOUNT, "stopping %s\n", obd->obd_name);
1601                         if (lsiflags & LSI_UMOUNT_FAILOVER)
1602                                 obd->obd_fail = 1;
1603                         /* We can't seem to give an error return code
1604                          * to .put_super, so we better make sure we clean up! */
1605                         obd->obd_force = 1;
1606                         class_manual_cleanup(obd);
1607                         if (OBD_FAIL_PRECHECK(OBD_FAIL_OBD_STOP_MDS_RACE)) {
1608                                 int idx;
1609                                 server_name2index(lsi->lsi_svname, &idx, NULL);
1610                                 /* sleeping for MDT0001 */
1611                                 if (idx == 1)
1612                                         OBD_RACE(OBD_FAIL_OBD_STOP_MDS_RACE);
1613                         }
1614                 } else {
1615                         CERROR("no obd %s\n", lsi->lsi_svname);
1616                         server_deregister_mount(lsi->lsi_svname);
1617                 }
1618         }
1619
1620         /* If they wanted the mgs to stop separately from the mdt, they
1621            should have put it on a different device. */
1622         if (IS_MGS(lsi)) {
1623                 /* if MDS start with --nomgs, don't stop MGS then */
1624                 if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS))
1625                         server_stop_mgs(sb);
1626         }
1627
1628         if (IS_OST(lsi) || IS_MDT(lsi)) {
1629                 if (lustre_stop_lwp(sb) < 0)
1630                         CERROR("%s: failed to stop lwp!\n", tmpname);
1631         }
1632
1633         /* Clean the mgc and sb */
1634         lustre_common_put_super(sb);
1635
1636         /* wait till all in-progress cleanups are done
1637          * specifically we're interested in ofd cleanup
1638          * as it pins OSS */
1639         obd_zombie_barrier();
1640
1641         /* Stop the servers (MDS, OSS) if no longer needed.  We must wait
1642            until the target is really gone so that our type refcount check
1643            is right. */
1644         if (stop_servers)
1645                 server_stop_servers(lsiflags);
1646
1647         /* In case of startup or cleanup err, stop related obds */
1648         if (extraname) {
1649                 obd = class_name2obd(extraname);
1650                 if (obd) {
1651                         CWARN("Cleaning orphaned obd %s\n", extraname);
1652                         obd->obd_force = 1;
1653                         class_manual_cleanup(obd);
1654                 }
1655                 OBD_FREE(extraname, strlen(extraname) + 1);
1656         }
1657
1658         LCONSOLE_WARN("server umount %s complete\n", tmpname);
1659         OBD_FREE(tmpname, tmpname_sz);
1660         EXIT;
1661 }
1662
1663 /** Called only for 'umount -f'
1664  */
1665 static void server_umount_begin(struct super_block *sb)
1666 {
1667         struct lustre_sb_info *lsi = s2lsi(sb);
1668         ENTRY;
1669
1670         CDEBUG(D_MOUNT, "umount -f\n");
1671         /* umount = failover
1672            umount -f = force
1673            no third way to do non-force, non-failover */
1674         lsi->lsi_flags &= ~LSI_UMOUNT_FAILOVER;
1675         EXIT;
1676 }
1677
1678 static int server_statfs(struct dentry *dentry, struct kstatfs *buf)
1679 {
1680         struct super_block *sb = dentry->d_sb;
1681         struct lustre_sb_info *lsi = s2lsi(sb);
1682         struct obd_statfs statfs;
1683         int rc;
1684         ENTRY;
1685
1686         if (lsi->lsi_dt_dev) {
1687                 rc = dt_statfs(NULL, lsi->lsi_dt_dev, &statfs);
1688                 if (rc == 0) {
1689                         statfs_unpack(buf, &statfs);
1690                         buf->f_type = sb->s_magic;
1691                         RETURN(0);
1692                 }
1693         }
1694
1695         /* just return 0 */
1696         buf->f_type = sb->s_magic;
1697         buf->f_bsize = sb->s_blocksize;
1698         buf->f_blocks = 1;
1699         buf->f_bfree = 0;
1700         buf->f_bavail = 0;
1701         buf->f_files = 1;
1702         buf->f_ffree = 0;
1703         buf->f_namelen = NAME_MAX;
1704         RETURN(0);
1705 }
1706
1707 #ifdef HAVE_SUPEROPS_USE_DENTRY
1708 int server_show_options(struct seq_file *seq, struct dentry *dentry)
1709 #else
1710 int server_show_options(struct seq_file *seq, struct vfsmount *vfs)
1711 #endif
1712 {
1713         struct lustre_sb_info *lsi;
1714         struct lustre_mount_data *lmd;
1715
1716 #ifdef HAVE_SUPEROPS_USE_DENTRY
1717         LASSERT(seq != NULL && dentry != NULL);
1718         lsi = s2lsi(dentry->d_sb);
1719 #else
1720         LASSERT(seq != NULL && vfs != NULL);
1721         lsi = s2lsi(vfs->mnt_sb);
1722 #endif
1723
1724         lmd = lsi->lsi_lmd;
1725         seq_printf(seq, ",svname=%s", lmd->lmd_profile);
1726
1727         if  (lmd->lmd_flags & LMD_FLG_ABORT_RECOV)
1728                 seq_puts(seq, ",abort_recov");
1729
1730         if (lmd->lmd_flags & LMD_FLG_NOIR)
1731                 seq_puts(seq, ",noir");
1732
1733         if (lmd->lmd_flags & LMD_FLG_NOSVC)
1734                 seq_puts(seq, ",nosvc");
1735
1736         if (lmd->lmd_flags & LMD_FLG_NOMGS)
1737                 seq_puts(seq, ",nomgs");
1738
1739         if (lmd->lmd_flags & LMD_FLG_NOSCRUB)
1740                 seq_puts(seq, ",noscrub");
1741         if (lmd->lmd_flags & LMD_FLG_SKIP_LFSCK)
1742                 seq_puts(seq, ",skip_lfsck");
1743
1744         if (lmd->lmd_flags & LMD_FLG_DEV_RDONLY)
1745                 seq_puts(seq, ",rdonly_dev");
1746
1747         if (lmd->lmd_flags & LMD_FLG_MGS)
1748                 seq_puts(seq, ",mgs");
1749
1750         if (lmd->lmd_mgs != NULL)
1751                 seq_printf(seq, ",mgsnode=%s", lmd->lmd_mgs);
1752
1753         if (lmd->lmd_osd_type != NULL)
1754                 seq_printf(seq, ",osd=%s", lmd->lmd_osd_type);
1755
1756         if (lmd->lmd_opts != NULL) {
1757                 seq_putc(seq, ',');
1758                 seq_puts(seq, lmd->lmd_opts);
1759         }
1760
1761         RETURN(0);
1762 }
1763
1764 /** The operations we support directly on the superblock:
1765  * mount, umount, and df.
1766  */
1767 static struct super_operations server_ops = {
1768         .put_super      = server_put_super,
1769         .umount_begin   = server_umount_begin, /* umount -f */
1770         .statfs         = server_statfs,
1771         .show_options   = server_show_options,
1772 };
1773
1774 /*
1775  * Xattr support for Lustre servers
1776  */
1777 #ifdef HAVE_IOP_XATTR
1778 static ssize_t lustre_getxattr(struct dentry *dentry, const char *name,
1779                                 void *buffer, size_t size)
1780 {
1781         if (!selinux_is_enabled())
1782                 return -EOPNOTSUPP;
1783         return -ENODATA;
1784 }
1785
1786 static int lustre_setxattr(struct dentry *dentry, const char *name,
1787                             const void *value, size_t size, int flags)
1788 {
1789         return -EOPNOTSUPP;
1790 }
1791 #endif
1792
1793 static ssize_t lustre_listxattr(struct dentry *d_entry, char *name,
1794                                 size_t size)
1795 {
1796         return -EOPNOTSUPP;
1797 }
1798
1799 static bool is_cmd_supported(unsigned int command)
1800 {
1801         switch (command) {
1802         case FITRIM:
1803                 return true;
1804         default:
1805                 return false;
1806         }
1807
1808         return false;
1809 }
1810
1811 static long server_ioctl(struct file *filp, unsigned int command,
1812                          unsigned long arg)
1813 {
1814         struct file active_filp;
1815         struct inode *inode = file_inode(filp);
1816         struct lustre_sb_info *lsi = s2lsi(inode->i_sb);
1817         struct super_block *dd_sb = dt_mnt_sb_get(lsi->lsi_dt_dev);
1818         struct inode *active_inode;
1819         int err = -EOPNOTSUPP;
1820
1821         if (IS_ERR(dd_sb) || !is_cmd_supported(command))
1822                 return err;
1823
1824         active_inode = igrab(dd_sb->s_root->d_inode);
1825         if (!active_inode)
1826                 return -EACCES;
1827
1828         active_filp.f_inode = active_inode;
1829         if (active_inode->i_fop && active_inode->i_fop->unlocked_ioctl)
1830                 err = active_inode->i_fop->unlocked_ioctl(&active_filp,
1831                                                           command, arg);
1832         iput(active_inode);
1833         return err;
1834 }
1835
1836 static const struct inode_operations server_inode_operations = {
1837 #ifdef HAVE_IOP_XATTR
1838         .setxattr       = lustre_setxattr,
1839         .getxattr       = lustre_getxattr,
1840 #endif
1841         .listxattr      = lustre_listxattr,
1842 };
1843
1844 static const struct file_operations server_file_operations = {
1845         .unlocked_ioctl = server_ioctl,
1846 };
1847
1848 #define log2(n) ffz(~(n))
1849 #define LUSTRE_SUPER_MAGIC 0x0BD00BD1
1850
1851 static int server_fill_super_common(struct super_block *sb)
1852 {
1853         struct inode *root = NULL;
1854         ENTRY;
1855
1856         CDEBUG(D_MOUNT, "Server sb, dev=%d\n", (int)sb->s_dev);
1857
1858         sb->s_blocksize = 4096;
1859         sb->s_blocksize_bits = log2(sb->s_blocksize);
1860         sb->s_magic = LUSTRE_SUPER_MAGIC;
1861         sb->s_maxbytes = 0; /* we don't allow file IO on server mountpoints */
1862         sb->s_flags |= SB_RDONLY;
1863         sb->s_op = &server_ops;
1864
1865         root = new_inode(sb);
1866         if (!root) {
1867                 CERROR("Can't make root inode\n");
1868                 RETURN(-EIO);
1869         }
1870
1871         /* returns -EIO for every operation */
1872         /* make_bad_inode(root); -- badness - can't umount */
1873         /* apparently we need to be a directory for the mount to finish */
1874         root->i_mode = S_IFDIR;
1875         root->i_op = &server_inode_operations;
1876         root->i_fop = &server_file_operations;
1877         sb->s_root = d_make_root(root);
1878         if (!sb->s_root) {
1879                 CERROR("%s: can't make root dentry\n", sb->s_id);
1880                 RETURN(-EIO);
1881         }
1882
1883         RETURN(0);
1884 }
1885
1886 static int osd_start(struct lustre_sb_info *lsi, unsigned long mflags)
1887 {
1888         struct lustre_mount_data *lmd = lsi->lsi_lmd;
1889         struct obd_device *obd;
1890         struct dt_device_param p;
1891         char flagstr[20 + 1 + 10 + 1];
1892         int rc;
1893         ENTRY;
1894
1895         CDEBUG(D_MOUNT,
1896                "Attempting to start %s, type=%s, lsifl=%x, mountfl=%lx\n",
1897                lsi->lsi_svname, lsi->lsi_osd_type, lsi->lsi_flags, mflags);
1898
1899         sprintf(lsi->lsi_osd_obdname, "%s-osd", lsi->lsi_svname);
1900         strcpy(lsi->lsi_osd_uuid, lsi->lsi_osd_obdname);
1901         strcat(lsi->lsi_osd_uuid, "_UUID");
1902         snprintf(flagstr, sizeof(flagstr), "%lu:%u", mflags, lmd->lmd_flags);
1903
1904         obd = class_name2obd(lsi->lsi_osd_obdname);
1905         if (obd == NULL) {
1906                 rc = lustre_start_simple(lsi->lsi_osd_obdname,
1907                                          lsi->lsi_osd_type,
1908                                          lsi->lsi_osd_uuid, lmd->lmd_dev,
1909                                          flagstr, lsi->lsi_lmd->lmd_opts,
1910                                          lsi->lsi_svname);
1911                 if (rc)
1912                         GOTO(out, rc);
1913                 obd = class_name2obd(lsi->lsi_osd_obdname);
1914                 LASSERT(obd);
1915         } else {
1916                 CDEBUG(D_MOUNT, "%s already started\n", lsi->lsi_osd_obdname);
1917                 /* but continue setup to allow special case of MDT and internal
1918                  * MGT being started separately. */
1919                 if (!((IS_MGS(lsi) && (lsi->lsi_lmd->lmd_flags &
1920                                       LMD_FLG_NOMGS)) ||
1921                      (IS_MDT(lsi) && (lsi->lsi_lmd->lmd_flags &
1922                                       LMD_FLG_NOSVC))))
1923                         RETURN(-EALREADY);
1924         }
1925
1926         rc = obd_connect(NULL, &lsi->lsi_osd_exp,
1927                          obd, &obd->obd_uuid, NULL, NULL);
1928
1929         if (rc) {
1930                 obd->obd_force = 1;
1931                 class_manual_cleanup(obd);
1932                 lsi->lsi_dt_dev = NULL;
1933                 RETURN(rc);
1934         }
1935
1936         LASSERT(obd->obd_lu_dev);
1937         lu_device_get(obd->obd_lu_dev);
1938         lsi->lsi_dt_dev = lu2dt_dev(obd->obd_lu_dev);
1939         LASSERT(lsi->lsi_dt_dev);
1940
1941         /* set disk context for llog usage */
1942         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
1943         obd->obd_lvfs_ctxt.dt = lsi->lsi_dt_dev;
1944
1945         dt_conf_get(NULL, lsi->lsi_dt_dev, &p);
1946 out:
1947         RETURN(rc);
1948 }
1949
1950 /** Fill in the superblock info for a Lustre server.
1951  * Mount the device with the correct options.
1952  * Read the on-disk config file.
1953  * Start the services.
1954  */
1955 int server_fill_super(struct super_block *sb)
1956 {
1957         struct lustre_sb_info *lsi = s2lsi(sb);
1958         int rc;
1959         ENTRY;
1960
1961         /* to simulate target mount race */
1962         OBD_RACE(OBD_FAIL_TGT_MOUNT_RACE);
1963
1964         rc = lsi_prepare(lsi);
1965         if (rc) {
1966                 lustre_put_lsi(sb);
1967                 RETURN(rc);
1968         }
1969
1970         /* Start low level OSD */
1971         rc = osd_start(lsi, sb->s_flags);
1972         if (rc) {
1973                 CERROR("Unable to start osd on %s: %d\n",
1974                        lsi->lsi_lmd->lmd_dev, rc);
1975                 lustre_put_lsi(sb);
1976                 RETURN(rc);
1977         }
1978
1979         CDEBUG(D_MOUNT, "Found service %s on device %s\n",
1980                lsi->lsi_svname, lsi->lsi_lmd->lmd_dev);
1981
1982         if (class_name2obd(lsi->lsi_svname)) {
1983                 LCONSOLE_ERROR_MSG(0x161, "The target named %s is already "
1984                                    "running. Double-mount may have compromised"
1985                                    " the disk journal.\n",
1986                                    lsi->lsi_svname);
1987                 lustre_put_lsi(sb);
1988                 RETURN(-EALREADY);
1989         }
1990
1991         /* Start MGS before MGC */
1992         if (IS_MGS(lsi) && !(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOMGS)) {
1993                 rc = server_start_mgs(sb);
1994                 if (rc)
1995                         GOTO(out_mnt, rc);
1996         }
1997
1998         /* Start MGC before servers */
1999         rc = lustre_start_mgc(sb);
2000         if (rc)
2001                 GOTO(out_mnt, rc);
2002
2003         /* Set up all obd devices for service */
2004         if (!(lsi->lsi_lmd->lmd_flags & LMD_FLG_NOSVC) &&
2005             (IS_OST(lsi) || IS_MDT(lsi))) {
2006                 rc = server_start_targets(sb);
2007                 if (rc < 0) {
2008                         CERROR("Unable to start targets: %d\n", rc);
2009                         GOTO(out_mnt, rc);
2010                 }
2011                 /* FIXME overmount client here, or can we just start a
2012                  * client log and client_fill_super on this sb?  We
2013                  * need to make sure server_put_super gets called too
2014                  * - ll_put_super calls lustre_common_put_super; check
2015                  * there for LSI_SERVER flag, call s_p_s if so.
2016                  *
2017                  * Probably should start client from new thread so we
2018                  * can return.  Client will not finish until all
2019                  * servers are connected.  Note - MGS-only server does
2020                  * NOT get a client, since there is no lustre fs
2021                  * associated - the MGS is for all lustre fs's */
2022         }
2023
2024         rc = server_fill_super_common(sb);
2025         if (rc)
2026                 GOTO(out_mnt, rc);
2027
2028         RETURN(0);
2029 out_mnt:
2030         /* We jump here in case of failure while starting targets or MGS.
2031          * In this case we can't just put @mnt and have to do real cleanup
2032          * with stoping targets, etc. */
2033         server_put_super(sb);
2034         return rc;
2035 }
2036
2037 /*
2038  * Calculate timeout value for a target.
2039  */
2040 void server_calc_timeout(struct lustre_sb_info *lsi, struct obd_device *obd)
2041 {
2042         struct lustre_mount_data *lmd;
2043         int soft = 0;
2044         int hard = 0;
2045         int factor = 0;
2046         bool has_ir = !!(lsi->lsi_flags & LDD_F_IR_CAPABLE);
2047         int min = OBD_RECOVERY_TIME_MIN;
2048
2049         LASSERT(IS_SERVER(lsi));
2050
2051         lmd = lsi->lsi_lmd;
2052         if (lmd) {
2053                 soft   = lmd->lmd_recovery_time_soft;
2054                 hard   = lmd->lmd_recovery_time_hard;
2055                 has_ir = has_ir && !(lmd->lmd_flags & LMD_FLG_NOIR);
2056                 obd->obd_no_ir = !has_ir;
2057         }
2058
2059         if (soft == 0)
2060                 soft = OBD_RECOVERY_TIME_SOFT;
2061         if (hard == 0)
2062                 hard = OBD_RECOVERY_TIME_HARD;
2063
2064         /* target may have ir_factor configured. */
2065         factor = OBD_IR_FACTOR_DEFAULT;
2066         if (obd->obd_recovery_ir_factor)
2067                 factor = obd->obd_recovery_ir_factor;
2068
2069         if (has_ir) {
2070                 int new_soft = soft;
2071
2072                 /* adjust timeout value by imperative recovery */
2073                 new_soft = (soft * factor) / OBD_IR_FACTOR_MAX;
2074                 /* make sure the timeout is not too short */
2075                 new_soft = max(min, new_soft);
2076
2077                 LCONSOLE_INFO("%s: Imperative Recovery enabled, recovery "
2078                               "window shrunk from %d-%d down to %d-%d\n",
2079                               obd->obd_name, soft, hard, new_soft, hard);
2080
2081                 soft = new_soft;
2082         } else {
2083                 LCONSOLE_INFO("%s: Imperative Recovery not enabled, recovery "
2084                               "window %d-%d\n", obd->obd_name, soft, hard);
2085         }
2086
2087         /* we're done */
2088         obd->obd_recovery_timeout = max_t(time64_t, obd->obd_recovery_timeout,
2089                                           soft);
2090         obd->obd_recovery_time_hard = hard;
2091         obd->obd_recovery_ir_factor = factor;
2092 }