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