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