lustre/obdclass/obd_mount_server.c

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