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