lustre/mgs/mgs_handler.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) 2010, 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/mgs/mgs_handler.c
  37  *
  38  * Author: Nathan Rutman <nathan@clusterfs.com>
  39  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
  40  * Author: Mikhail Pershin <tappro@whamcloud.com>
  41  */
  42
  43 #define DEBUG_SUBSYSTEM S_MGS
  44 #define D_MGS D_CONFIG
  45
  46 #include <obd_class.h>
  47 #include <lprocfs_status.h>
  48 #include <lustre_ioctl.h>
  49 #include <lustre_param.h>
  50
  51 #include "mgs_internal.h"
  52
  53 /*
  54  * Regular MGS handlers
  55  */
  56 static int mgs_connect(struct tgt_session_info *tsi)
  57 {
  58         struct ptlrpc_request   *req = tgt_ses_req(tsi);
  59         int                      rc;
  60
  61         ENTRY;
  62
  63         CFS_FAIL_TIMEOUT(OBD_FAIL_MGS_CONNECT_NET, cfs_fail_val);
  64         rc = tgt_connect(tsi);
  65         if (rc)
  66                 RETURN(rc);
  67
  68         if (lustre_msg_get_conn_cnt(req->rq_reqmsg) > 1)
  69                 lustre_msg_add_op_flags(req->rq_repmsg, MSG_CONNECT_RECONNECT);
  70
  71         RETURN(0);
  72 }
  73
  74 static int mgs_disconnect(struct tgt_session_info *tsi)
  75 {
  76         int rc;
  77
  78         ENTRY;
  79
  80         LASSERT(tsi->tsi_exp);
  81
  82         rc = tgt_disconnect(tsi);
  83         if (rc)
  84                 RETURN(err_serious(rc));
  85         RETURN(0);
  86 }
  87
  88 static int mgs_exception(struct tgt_session_info *tsi)
  89 {
  90         ENTRY;
  91
  92         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_EXCEPTION);
  93
  94         RETURN(0);
  95 }
  96
  97 static int mgs_set_info(struct tgt_session_info *tsi)
  98 {
  99         struct mgs_thread_info  *mgi;
 100         struct mgs_send_param   *msp, *rep_msp;
 101         struct lustre_cfg       *lcfg;
 102         int                      rc;
 103
 104         ENTRY;
 105
 106         mgi = mgs_env_info(tsi->tsi_env);
 107         if (IS_ERR(mgi))
 108                 RETURN(err_serious(PTR_ERR(mgi)));
 109
 110         msp = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_SEND_PARAM);
 111         if (msp == NULL)
 112                 RETURN(err_serious(-EFAULT));
 113
 114         /* Construct lustre_cfg structure to pass to function mgs_setparam */
 115         lustre_cfg_bufs_reset(&mgi->mgi_bufs, NULL);
 116         lustre_cfg_bufs_set_string(&mgi->mgi_bufs, 1, msp->mgs_param);
 117         lcfg = lustre_cfg_new(LCFG_PARAM, &mgi->mgi_bufs);
 118
 119         rc = mgs_setparam(tsi->tsi_env, exp2mgs_dev(tsi->tsi_exp), lcfg,
 120                           mgi->mgi_fsname);
 121         if (rc) {
 122                 LCONSOLE_WARN("%s: Unable to set parameter %s for %s: %d\n",
 123                               tgt_name(tsi->tsi_tgt), msp->mgs_param,
 124                               mgi->mgi_fsname, rc);
 125                 GOTO(out_cfg, rc);
 126         }
 127
 128         /* send back the whole msp in the reply */
 129         rep_msp = req_capsule_server_get(tsi->tsi_pill, &RMF_MGS_SEND_PARAM);
 130         *rep_msp = *msp;
 131         EXIT;
 132 out_cfg:
 133         lustre_cfg_free(lcfg);
 134         return rc;
 135 }
 136
 137 enum ast_type {
 138                 AST_CONFIG = 1,
 139                 AST_PARAMS = 2,
 140                 AST_IR = 3
 141 };
 142
 143 static int mgs_completion_ast_generic(struct ldlm_lock *lock, __u64 flags,
 144                                      void *cbdata, enum ast_type type)
 145 {
 146         ENTRY;
 147
 148         if (!(flags & (LDLM_FL_BLOCK_WAIT | LDLM_FL_BLOCK_GRANTED |
 149                        LDLM_FL_BLOCK_CONV))) {
 150                 struct fs_db *fsdb;
 151
 152                 /* l_ast_data is used as a marker to avoid cancel ldlm lock
 153                  * twice. See LU-2317. */
 154                 lock_res_and_lock(lock);
 155                 fsdb = (struct fs_db *)lock->l_ast_data;
 156                 lock->l_ast_data = NULL;
 157                 unlock_res_and_lock(lock);
 158
 159                 if (fsdb != NULL) {
 160                         struct lustre_handle lockh;
 161
 162                         switch(type) {
 163                                 case AST_CONFIG:
 164                                         /* clear the bit before lock put */
 165                                         clear_bit(FSDB_REVOKING_LOCK,
 166                                                   &fsdb->fsdb_flags);
 167                                         break;
 168                                 case AST_PARAMS:
 169                                         clear_bit(FSDB_REVOKING_PARAMS,
 170                                                   &fsdb->fsdb_flags);
 171                                         break;
 172                                 case AST_IR:
 173                                         mgs_ir_notify_complete(fsdb);
 174                                         break;
 175                                 default:
 176                                         LBUG();
 177                         }
 178
 179                         ldlm_lock2handle(lock, &lockh);
 180                         ldlm_lock_decref_and_cancel(&lockh, LCK_EX);
 181                 }
 182         }
 183
 184         RETURN(ldlm_completion_ast(lock, flags, cbdata));
 185 }
 186
 187 static int mgs_completion_ast_config(struct ldlm_lock *lock, __u64 flags,
 188                                      void *cbdata)
 189 {
 190         return mgs_completion_ast_generic(lock, flags, cbdata, AST_CONFIG);
 191 }
 192
 193 static int mgs_completion_ast_params(struct ldlm_lock *lock, __u64 flags,
 194                                      void *cbdata)
 195 {
 196         return mgs_completion_ast_generic(lock, flags, cbdata, AST_PARAMS);
 197 }
 198
 199 static int mgs_completion_ast_ir(struct ldlm_lock *lock, __u64 flags,
 200                                  void *cbdata)
 201 {
 202         return mgs_completion_ast_generic(lock, flags, cbdata, AST_IR);
 203 }
 204
 205 void mgs_revoke_lock(struct mgs_device *mgs, struct fs_db *fsdb, int type)
 206 {
 207         ldlm_completion_callback cp = NULL;
 208         struct lustre_handle     lockh = { 0 };
 209         struct ldlm_res_id       res_id;
 210         __u64 flags = LDLM_FL_ATOMIC_CB;
 211         int rc;
 212         ENTRY;
 213
 214         LASSERT(fsdb->fsdb_name[0] != '\0');
 215         rc = mgc_fsname2resid(fsdb->fsdb_name, &res_id, type);
 216         LASSERT(rc == 0);
 217         switch (type) {
 218         case CONFIG_T_CONFIG:
 219                 cp = mgs_completion_ast_config;
 220                 if (test_and_set_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags))
 221                         rc = -EALREADY;
 222                 break;
 223         case CONFIG_T_PARAMS:
 224                 cp = mgs_completion_ast_params;
 225                 if (test_and_set_bit(FSDB_REVOKING_PARAMS, &fsdb->fsdb_flags))
 226                         rc = -EALREADY;
 227                 break;
 228         case CONFIG_T_RECOVER:
 229                 cp = mgs_completion_ast_ir;
 230         default:
 231                 break;
 232         }
 233
 234         if (!rc) {
 235                 LASSERT(cp != NULL);
 236                 rc = ldlm_cli_enqueue_local(mgs->mgs_obd->obd_namespace,
 237                                             &res_id, LDLM_PLAIN, NULL, LCK_EX,
 238                                             &flags, ldlm_blocking_ast, cp,
 239                                             NULL, fsdb, 0, LVB_T_NONE, NULL,
 240                                             &lockh);
 241                 if (rc != ELDLM_OK) {
 242                         CERROR("can't take cfg lock for "LPX64"/"LPX64"(%d)\n",
 243                                le64_to_cpu(res_id.name[0]),
 244                                le64_to_cpu(res_id.name[1]), rc);
 245
 246                         if (type == CONFIG_T_CONFIG)
 247                                 clear_bit(FSDB_REVOKING_LOCK,
 248                                           &fsdb->fsdb_flags);
 249
 250                         if (type == CONFIG_T_PARAMS)
 251                                 clear_bit(FSDB_REVOKING_PARAMS,
 252                                           &fsdb->fsdb_flags);
 253                 }
 254                 /* lock has been cancelled in completion_ast. */
 255         }
 256
 257         RETURN_EXIT;
 258 }
 259
 260 /* rc=0 means ok
 261       1 means update
 262      <0 means error */
 263 static int mgs_check_target(const struct lu_env *env,
 264                             struct mgs_device *mgs,
 265                             struct mgs_target_info *mti)
 266 {
 267         int rc;
 268         ENTRY;
 269
 270         rc = mgs_check_index(env, mgs, mti);
 271         if (rc == 0) {
 272                 LCONSOLE_ERROR_MSG(0x13b, "%s claims to have registered, but "
 273                                    "this MGS does not know about it, preventing "
 274                                    "registration.\n", mti->mti_svname);
 275                 rc = -ENOENT;
 276         } else if (rc == -1) {
 277                 LCONSOLE_ERROR_MSG(0x13c, "Client log %s-client has "
 278                                    "disappeared! Regenerating all logs.\n",
 279                                    mti->mti_fsname);
 280                 mti->mti_flags |= LDD_F_WRITECONF;
 281                 rc = 1;
 282         } else {
 283                 /* Index is correctly marked as used */
 284
 285                 /* If the logs don't contain the mti_nids then add
 286                    them as failover nids */
 287                 rc = mgs_check_failnid(env, mgs, mti);
 288         }
 289
 290         RETURN(rc);
 291 }
 292
 293 /* Ensure this is not a failover node that is connecting first*/
 294 static int mgs_check_failover_reg(struct mgs_target_info *mti)
 295 {
 296         lnet_nid_t nid;
 297         char *ptr;
 298         int i;
 299
 300         ptr = mti->mti_params;
 301         while (class_find_param(ptr, PARAM_FAILNODE, &ptr) == 0) {
 302                 while (class_parse_nid_quiet(ptr, &nid, &ptr) == 0) {
 303                         for (i = 0; i < mti->mti_nid_count; i++) {
 304                                 if (nid == mti->mti_nids[i]) {
 305                                         LCONSOLE_WARN("Denying initial registra"
 306                                                       "tion attempt from nid %s"
 307                                                       ", specified as failover"
 308                                                       "\n",libcfs_nid2str(nid));
 309                                         return -EADDRNOTAVAIL;
 310                                 }
 311                         }
 312                 }
 313         }
 314         return 0;
 315 }
 316
 317 /* Called whenever a target starts up.  Flags indicate first connect, etc. */
 318 static int mgs_target_reg(struct tgt_session_info *tsi)
 319 {
 320         struct obd_device       *obd = tsi->tsi_exp->exp_obd;
 321         struct mgs_device       *mgs = exp2mgs_dev(tsi->tsi_exp);
 322         struct mgs_target_info  *mti, *rep_mti;
 323         struct fs_db            *fsdb;
 324         int                      opc;
 325         int                      rc = 0;
 326
 327         ENTRY;
 328
 329         rc = lu_env_refill((struct lu_env *)tsi->tsi_env);
 330         if (rc)
 331                 return err_serious(rc);
 332
 333         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_TARGET_REG);
 334
 335         mti = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_TARGET_INFO);
 336         if (mti == NULL) {
 337                 DEBUG_REQ(D_HA, tgt_ses_req(tsi), "no mgs_send_param");
 338                 RETURN(err_serious(-EFAULT));
 339         }
 340
 341         if (OCD_HAS_FLAG(&tgt_ses_req(tsi)->rq_export->exp_connect_data,
 342                          IMP_RECOV))
 343                 opc = mti->mti_flags & LDD_F_OPC_MASK;
 344         else
 345                 opc = LDD_F_OPC_REG;
 346
 347         if (opc == LDD_F_OPC_READY) {
 348                 CDEBUG(D_MGS, "fs: %s index: %d is ready to reconnect.\n",
 349                        mti->mti_fsname, mti->mti_stripe_index);
 350                 rc = mgs_ir_update(tsi->tsi_env, mgs, mti);
 351                 if (rc) {
 352                         LASSERT(!(mti->mti_flags & LDD_F_IR_CAPABLE));
 353                         CERROR("Update IR return with %d(ignore and IR "
 354                                "disabled)\n", rc);
 355                 }
 356                 GOTO(out_nolock, rc);
 357         }
 358
 359         /* Do not support unregistering right now. */
 360         if (opc != LDD_F_OPC_REG)
 361                 GOTO(out_nolock, rc = -EINVAL);
 362
 363         CDEBUG(D_MGS, "fs: %s index: %d is registered to MGS.\n",
 364                mti->mti_fsname, mti->mti_stripe_index);
 365
 366         if (mti->mti_flags & LDD_F_NEED_INDEX)
 367                 mti->mti_flags |= LDD_F_WRITECONF;
 368
 369         if (!(mti->mti_flags & (LDD_F_WRITECONF | LDD_F_UPGRADE14 |
 370                                 LDD_F_UPDATE))) {
 371                 /* We're just here as a startup ping. */
 372                 CDEBUG(D_MGS, "Server %s is running on %s\n",
 373                        mti->mti_svname, obd_export_nid2str(tsi->tsi_exp));
 374                 rc = mgs_check_target(tsi->tsi_env, mgs, mti);
 375                 /* above will set appropriate mti flags */
 376                 if (rc <= 0)
 377                         /* Nothing wrong, or fatal error */
 378                         GOTO(out_nolock, rc);
 379         } else if (!(mti->mti_flags & LDD_F_NO_PRIMNODE)) {
 380                 rc = mgs_check_failover_reg(mti);
 381                 if (rc)
 382                         GOTO(out_nolock, rc);
 383         }
 384
 385         OBD_FAIL_TIMEOUT(OBD_FAIL_MGS_PAUSE_TARGET_REG, 10);
 386
 387         if (mti->mti_flags & LDD_F_WRITECONF) {
 388                 if (mti->mti_flags & LDD_F_SV_TYPE_MDT &&
 389                     mti->mti_stripe_index == 0) {
 390                         rc = mgs_erase_logs(tsi->tsi_env, mgs,
 391                                             mti->mti_fsname);
 392                         LCONSOLE_WARN("%s: Logs for fs %s were removed by user "
 393                                       "request.  All servers must be restarted "
 394                                       "in order to regenerate the logs."
 395                                       "\n", obd->obd_name, mti->mti_fsname);
 396                 } else if (mti->mti_flags &
 397                            (LDD_F_SV_TYPE_OST | LDD_F_SV_TYPE_MDT)) {
 398                         rc = mgs_erase_log(tsi->tsi_env, mgs, mti->mti_svname);
 399                         LCONSOLE_WARN("%s: Regenerating %s log by user "
 400                                       "request.\n",
 401                                       obd->obd_name, mti->mti_svname);
 402                 }
 403                 mti->mti_flags |= LDD_F_UPDATE;
 404                 /* Erased logs means start from scratch. */
 405                 mti->mti_flags &= ~LDD_F_UPGRADE14;
 406                 if (rc)
 407                         GOTO(out_nolock, rc);
 408         }
 409
 410         rc = mgs_find_or_make_fsdb(tsi->tsi_env, mgs, mti->mti_fsname, &fsdb);
 411         if (rc) {
 412                 CERROR("Can't get db for %s: %d\n", mti->mti_fsname, rc);
 413                 GOTO(out_nolock, rc);
 414         }
 415
 416         /*
 417          * Log writing contention is handled by the fsdb_mutex.
 418          *
 419          * It should be alright if someone was reading while we were
 420          * updating the logs - if we revoke at the end they will just update
 421          * from where they left off.
 422          */
 423
 424         if (mti->mti_flags & LDD_F_UPGRADE14) {
 425                 CERROR("Can't upgrade from 1.4 (%d)\n", rc);
 426                 GOTO(out, rc);
 427         }
 428
 429         if (mti->mti_flags & LDD_F_UPDATE) {
 430                 CDEBUG(D_MGS, "updating %s, index=%d\n", mti->mti_svname,
 431                        mti->mti_stripe_index);
 432
 433                 /* create or update the target log
 434                    and update the client/mdt logs */
 435                 rc = mgs_write_log_target(tsi->tsi_env, mgs, mti, fsdb);
 436                 if (rc) {
 437                         CERROR("Failed to write %s log (%d)\n",
 438                                mti->mti_svname, rc);
 439                         GOTO(out, rc);
 440                 }
 441
 442                 mti->mti_flags &= ~(LDD_F_VIRGIN | LDD_F_UPDATE |
 443                                     LDD_F_NEED_INDEX | LDD_F_WRITECONF |
 444                                     LDD_F_UPGRADE14);
 445                 mti->mti_flags |= LDD_F_REWRITE_LDD;
 446         }
 447
 448 out:
 449         mgs_revoke_lock(mgs, fsdb, CONFIG_T_CONFIG);
 450
 451 out_nolock:
 452         CDEBUG(D_MGS, "replying with %s, index=%d, rc=%d\n", mti->mti_svname,
 453                mti->mti_stripe_index, rc);
 454          /* An error flag is set in the mti reply rather than an error code */
 455         if (rc)
 456                 mti->mti_flags |= LDD_F_ERROR;
 457
 458         /* send back the whole mti in the reply */
 459         rep_mti = req_capsule_server_get(tsi->tsi_pill, &RMF_MGS_TARGET_INFO);
 460         *rep_mti = *mti;
 461
 462         /* Flush logs to disk */
 463         dt_sync(tsi->tsi_env, mgs->mgs_bottom);
 464         RETURN(rc);
 465 }
 466
 467 /* Called whenever a target cleans up. */
 468 static int mgs_target_del(struct tgt_session_info *tsi)
 469 {
 470         ENTRY;
 471
 472         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_TARGET_DEL);
 473
 474         RETURN(0);
 475 }
 476
 477 static int mgs_config_read(struct tgt_session_info *tsi)
 478 {
 479         struct ptlrpc_request   *req = tgt_ses_req(tsi);
 480         struct mgs_config_body  *body;
 481         int                      rc;
 482
 483         ENTRY;
 484
 485         body = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_CONFIG_BODY);
 486         if (body == NULL) {
 487                 DEBUG_REQ(D_HA, req, "no mgs_config_body");
 488                 RETURN(err_serious(-EFAULT));
 489         }
 490
 491         switch (body->mcb_type) {
 492         case CONFIG_T_RECOVER:
 493                 rc = mgs_get_ir_logs(req);
 494                 break;
 495         case CONFIG_T_CONFIG:
 496                 rc = -EOPNOTSUPP;
 497                 break;
 498         default:
 499                 rc = -EINVAL;
 500                 break;
 501         }
 502
 503         RETURN(rc);
 504 }
 505
 506 static int mgs_llog_open(struct tgt_session_info *tsi)
 507 {
 508         struct mgs_thread_info  *mgi;
 509         struct ptlrpc_request   *req = tgt_ses_req(tsi);
 510         char                    *logname;
 511         int                      rc;
 512
 513         ENTRY;
 514
 515         rc = tgt_llog_open(tsi);
 516         if (rc)
 517                 RETURN(rc);
 518
 519         /*
 520          * For old clients there is no direct way of knowing which file system
 521          * a client is operating at the MGS side. But we need to pick up those
 522          * clients so that the MGS can mark the corresponding file system as
 523          * non-IR capable because old clients are not ready to be notified.
 524          *
 525          * Therefore we attempt to detect the file systems name by hacking the
 526          * llog operation which is currently used by the clients to fetch
 527          * configuration logs. At present this is fine because this is the
 528          * ONLY llog operation between mgc and the MGS.
 529          *
 530          * If extra llog operation are going to be added, this function needs
 531          * further work.
 532          *
 533          * When releases prior than 2.0 are not supported, the following code
 534          * can be removed.
 535          */
 536         mgi = mgs_env_info(tsi->tsi_env);
 537         if (IS_ERR(mgi))
 538                 RETURN(PTR_ERR(mgi));
 539
 540         logname = req_capsule_client_get(tsi->tsi_pill, &RMF_NAME);
 541         if (logname) {
 542                 char *ptr = strchr(logname, '-');
 543                 int   len = (int)(ptr - logname);
 544
 545                 if ((ptr == NULL && strcmp(logname, PARAMS_FILENAME) != 0) ||
 546                      len >= sizeof(mgi->mgi_fsname)) {
 547                         LCONSOLE_WARN("%s: non-config logname received: %s\n",
 548                                       tgt_name(tsi->tsi_tgt), logname);
 549                         /* not error, this can be llog test name */
 550                 } else {
 551                         strncpy(mgi->mgi_fsname, logname, len);
 552                         mgi->mgi_fsname[len] = 0;
 553
 554                         rc = mgs_fsc_attach(tsi->tsi_env, tsi->tsi_exp,
 555                                             mgi->mgi_fsname);
 556                         if (rc && rc != -EEXIST) {
 557                                 LCONSOLE_WARN("%s: Unable to add client %s "
 558                                               "to file system %s: %d\n",
 559                                               tgt_name(tsi->tsi_tgt),
 560                                               libcfs_nid2str(req->rq_peer.nid),
 561                                               mgi->mgi_fsname, rc);
 562                         } else {
 563                                 rc = 0;
 564                         }
 565                 }
 566         } else {
 567                 CERROR("%s: no logname in request\n", tgt_name(tsi->tsi_tgt));
 568                 RETURN(-EINVAL);
 569         }
 570         RETURN(rc);
 571 }
 572
 573 static inline int mgs_init_export(struct obd_export *exp)
 574 {
 575         struct mgs_export_data *data = &exp->u.eu_mgs_data;
 576
 577         /* init mgs_export_data for fsc */
 578         spin_lock_init(&data->med_lock);
 579         INIT_LIST_HEAD(&data->med_clients);
 580
 581         spin_lock(&exp->exp_lock);
 582         exp->exp_connecting = 1;
 583         spin_unlock(&exp->exp_lock);
 584
 585         /* self-export doesn't need client data and ldlm initialization */
 586         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
 587                                      &exp->exp_client_uuid)))
 588                 return 0;
 589         return ldlm_init_export(exp);
 590 }
 591
 592 static inline int mgs_destroy_export(struct obd_export *exp)
 593 {
 594         ENTRY;
 595
 596         target_destroy_export(exp);
 597         mgs_client_free(exp);
 598
 599         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
 600                                      &exp->exp_client_uuid)))
 601                 RETURN(0);
 602
 603         ldlm_destroy_export(exp);
 604
 605         RETURN(0);
 606 }
 607
 608 static int mgs_extract_fs_pool(char * arg, char *fsname, char *poolname)
 609 {
 610         char *ptr;
 611
 612         ENTRY;
 613         for (ptr = arg;  (*ptr != '\0') && (*ptr != '.'); ptr++ ) {
 614                 *fsname = *ptr;
 615                 fsname++;
 616         }
 617         if (*ptr == '\0')
 618                 return -EINVAL;
 619         *fsname = '\0';
 620         ptr++;
 621         strcpy(poolname, ptr);
 622
 623         RETURN(0);
 624 }
 625
 626 static int mgs_iocontrol_nodemap(const struct lu_env *env,
 627                                  struct mgs_device *mgs,
 628                                  struct obd_ioctl_data *data)
 629 {
 630         struct lustre_cfg       *lcfg = NULL;
 631         struct lu_nodemap       *nodemap;
 632         lnet_nid_t              nid;
 633         const char              *nodemap_name = NULL;
 634         const char              *nidstr = NULL;
 635         const char              *client_idstr = NULL;
 636         const char              *idtype_str = NULL;
 637         char                    *param = NULL;
 638         char                    fs_idstr[16];
 639         int                     rc = 0;
 640         __u32                   client_id;
 641         __u32                   fs_id;
 642         __u32                   cmd;
 643         int                     idtype;
 644
 645         ENTRY;
 646
 647         if (data->ioc_type != LUSTRE_CFG_TYPE) {
 648                 CERROR("%s: unknown cfg record type: %d\n",
 649                        mgs->mgs_obd->obd_name, data->ioc_type);
 650                 GOTO(out, rc = -EINVAL);
 651         }
 652
 653         if (data->ioc_plen1 > PAGE_CACHE_SIZE)
 654                 GOTO(out, rc = -E2BIG);
 655
 656         OBD_ALLOC(lcfg, data->ioc_plen1);
 657         if (lcfg == NULL)
 658                 GOTO(out, rc = -ENOMEM);
 659
 660         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
 661                 GOTO(out_lcfg, rc = -EFAULT);
 662
 663         cmd = lcfg->lcfg_command;
 664
 665         switch (cmd) {
 666         case LCFG_NODEMAP_ACTIVATE:
 667                 if (lcfg->lcfg_bufcount != 2)
 668                         GOTO(out_lcfg, rc = -EINVAL);
 669                 param = lustre_cfg_string(lcfg, 1);
 670                 if (strcmp(param, "1") == 0)
 671                                 nodemap_activate(1);
 672                 else
 673                                 nodemap_activate(0);
 674                 break;
 675         case LCFG_NODEMAP_ADD:
 676         case LCFG_NODEMAP_DEL:
 677                 if (lcfg->lcfg_bufcount != 2)
 678                         GOTO(out_lcfg, rc = -EINVAL);
 679                 nodemap_name = lustre_cfg_string(lcfg, 1);
 680                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
 681                 break;
 682         case LCFG_NODEMAP_TEST_NID:
 683                 if (lcfg->lcfg_bufcount != 2)
 684                         GOTO(out_lcfg, rc = -EINVAL);
 685                 nidstr = lustre_cfg_string(lcfg, 1);
 686                 nid = libcfs_str2nid(nidstr);
 687                 nodemap = nodemap_classify_nid(nid);
 688                 memset(data->ioc_pbuf1, 0, data->ioc_plen1);
 689                 if (copy_to_user(data->ioc_pbuf1, nodemap->nm_name,
 690                                  strlen(nodemap->nm_name)) != 0)
 691                         GOTO(out_lcfg, rc = -EFAULT);
 692                 break;
 693         case LCFG_NODEMAP_TEST_ID:
 694                 if (lcfg->lcfg_bufcount != 4)
 695                         GOTO(out_lcfg, rc = -EINVAL);
 696                 nidstr = lustre_cfg_string(lcfg, 1);
 697                 idtype_str = lustre_cfg_string(lcfg, 2);
 698                 client_idstr = lustre_cfg_string(lcfg, 3);
 699
 700                 nid = libcfs_str2nid(nidstr);
 701                 nodemap = nodemap_classify_nid(nid);
 702                 client_id = simple_strtoul(client_idstr, NULL, 10);
 703
 704                 if (strcmp(idtype_str, "uid") == 0)
 705                         idtype = NODEMAP_UID;
 706                 else
 707                         idtype = NODEMAP_GID;
 708
 709                 fs_id = nodemap_map_id(nodemap, idtype, NODEMAP_CLIENT_TO_FS,
 710                                        client_id);
 711
 712                 if (data->ioc_plen1 < sizeof(fs_idstr))
 713                         GOTO(out_lcfg, rc = -EINVAL);
 714
 715                 snprintf(fs_idstr, sizeof(fs_idstr), "%u", fs_id);
 716                 if (copy_to_user(data->ioc_pbuf1, fs_idstr,
 717                                  sizeof(fs_idstr)) != 0)
 718                         GOTO(out_lcfg, rc = -EINVAL);
 719                 break;
 720         case LCFG_NODEMAP_ADD_RANGE:
 721         case LCFG_NODEMAP_DEL_RANGE:
 722         case LCFG_NODEMAP_ADD_UIDMAP:
 723         case LCFG_NODEMAP_DEL_UIDMAP:
 724         case LCFG_NODEMAP_ADD_GIDMAP:
 725         case LCFG_NODEMAP_DEL_GIDMAP:
 726                 if (lcfg->lcfg_bufcount != 3)
 727                         GOTO(out_lcfg, rc = -EINVAL);
 728                 nodemap_name = lustre_cfg_string(lcfg, 1);
 729                 param = lustre_cfg_string(lcfg, 2);
 730                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
 731                 break;
 732         case LCFG_NODEMAP_ADMIN:
 733         case LCFG_NODEMAP_TRUSTED:
 734         case LCFG_NODEMAP_SQUASH_UID:
 735         case LCFG_NODEMAP_SQUASH_GID:
 736                 if (lcfg->lcfg_bufcount != 4)
 737                         GOTO(out_lcfg, rc = -EINVAL);
 738                 nodemap_name = lustre_cfg_string(lcfg, 1);
 739                 param = lustre_cfg_string(lcfg, 3);
 740                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
 741                 break;
 742         default:
 743                 rc = -ENOTTY;
 744         }
 745
 746         if (rc != 0) {
 747                 CERROR("%s: OBD_IOC_NODEMAP command %X for %s: rc = %d\n",
 748                        mgs->mgs_obd->obd_name, lcfg->lcfg_command,
 749                        nodemap_name, rc);
 750                 GOTO(out_lcfg, rc);
 751         }
 752
 753 out_lcfg:
 754         OBD_FREE(lcfg, data->ioc_plen1);
 755 out:
 756         RETURN(rc);
 757 }
 758
 759 static int mgs_iocontrol_pool(const struct lu_env *env,
 760                               struct mgs_device *mgs,
 761                               struct obd_ioctl_data *data)
 762 {
 763         struct mgs_thread_info *mgi = mgs_env_info(env);
 764         int rc;
 765         struct lustre_cfg *lcfg = NULL;
 766         char *poolname = NULL;
 767         ENTRY;
 768
 769         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
 770         if (poolname == NULL)
 771                 RETURN(-ENOMEM);
 772
 773         if (data->ioc_type != LUSTRE_CFG_TYPE) {
 774                 CERROR("%s: unknown cfg record type: %d\n",
 775                        mgs->mgs_obd->obd_name, data->ioc_type);
 776                 GOTO(out_pool, rc = -EINVAL);
 777         }
 778
 779         if (data->ioc_plen1 > PAGE_CACHE_SIZE)
 780                 GOTO(out_pool, rc = -E2BIG);
 781
 782         OBD_ALLOC(lcfg, data->ioc_plen1);
 783         if (lcfg == NULL)
 784                 GOTO(out_pool, rc = -ENOMEM);
 785
 786         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
 787                 GOTO(out_lcfg, rc = -EFAULT);
 788
 789         if (lcfg->lcfg_bufcount < 2)
 790                 GOTO(out_lcfg, rc = -EFAULT);
 791
 792         /* first arg is always <fsname>.<poolname> */
 793         rc = mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), mgi->mgi_fsname,
 794                                  poolname);
 795         if (rc)
 796                 GOTO(out_lcfg, rc);
 797
 798         switch (lcfg->lcfg_command) {
 799         case LCFG_POOL_NEW:
 800                 if (lcfg->lcfg_bufcount != 2)
 801                         GOTO(out_lcfg, rc = -EINVAL);
 802                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_NEW, mgi->mgi_fsname,
 803                                   poolname, NULL);
 804                 break;
 805         case LCFG_POOL_ADD:
 806                 if (lcfg->lcfg_bufcount != 3)
 807                         GOTO(out_lcfg, rc = -EINVAL);
 808                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_ADD, mgi->mgi_fsname,
 809                                   poolname, lustre_cfg_string(lcfg, 2));
 810                 break;
 811         case LCFG_POOL_REM:
 812                 if (lcfg->lcfg_bufcount != 3)
 813                         GOTO(out_lcfg, rc = -EINVAL);
 814                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_REM, mgi->mgi_fsname,
 815                                   poolname, lustre_cfg_string(lcfg, 2));
 816                 break;
 817         case LCFG_POOL_DEL:
 818                 if (lcfg->lcfg_bufcount != 2)
 819                         GOTO(out_lcfg, rc = -EINVAL);
 820                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_DEL, mgi->mgi_fsname,
 821                                   poolname, NULL);
 822                 break;
 823         default:
 824                  rc = -EINVAL;
 825         }
 826
 827         if (rc) {
 828                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
 829                        rc, lcfg->lcfg_command, mgi->mgi_fsname, poolname);
 830                 GOTO(out_lcfg, rc);
 831         }
 832
 833 out_lcfg:
 834         OBD_FREE(lcfg, data->ioc_plen1);
 835 out_pool:
 836         OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
 837         RETURN(rc);
 838 }
 839
 840 /* from mdt_iocontrol */
 841 int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
 842                   void *karg, void *uarg)
 843 {
 844         struct mgs_device *mgs = exp2mgs_dev(exp);
 845         struct obd_ioctl_data *data = karg;
 846         struct lu_env env;
 847         int rc = 0;
 848
 849         ENTRY;
 850         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
 851
 852         rc = lu_env_init(&env, LCT_MG_THREAD);
 853         if (rc)
 854                 RETURN(rc);
 855
 856         switch (cmd) {
 857
 858         case OBD_IOC_PARAM: {
 859                 struct mgs_thread_info *mgi = mgs_env_info(&env);
 860                 struct lustre_cfg *lcfg;
 861
 862                 if (data->ioc_type != LUSTRE_CFG_TYPE) {
 863                         CERROR("%s: unknown cfg record type: %d\n",
 864                                mgs->mgs_obd->obd_name, data->ioc_type);
 865                         GOTO(out, rc = -EINVAL);
 866                 }
 867
 868                 OBD_ALLOC(lcfg, data->ioc_plen1);
 869                 if (lcfg == NULL)
 870                         GOTO(out, rc = -ENOMEM);
 871                 if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
 872                         GOTO(out_free, rc = -EFAULT);
 873
 874                 if (lcfg->lcfg_bufcount < 1)
 875                         GOTO(out_free, rc = -EINVAL);
 876
 877                 rc = mgs_setparam(&env, mgs, lcfg, mgi->mgi_fsname);
 878                 if (rc)
 879                         CERROR("%s: setparam err: rc = %d\n",
 880                                exp->exp_obd->obd_name, rc);
 881 out_free:
 882                 OBD_FREE(lcfg, data->ioc_plen1);
 883                 break;
 884         }
 885
 886         case OBD_IOC_REPLACE_NIDS: {
 887                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
 888                         CERROR("No device name specified!\n");
 889                         rc = -EINVAL;
 890                         break;
 891                 }
 892
 893                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
 894                         CERROR("Device name is not NUL terminated!\n");
 895                         rc = -EINVAL;
 896                         break;
 897                 }
 898
 899                 if (data->ioc_plen1 > MTI_NAME_MAXLEN) {
 900                         CERROR("Device name is too long\n");
 901                         rc = -EOVERFLOW;
 902                         break;
 903                 }
 904
 905                 if (!data->ioc_inllen2 || !data->ioc_inlbuf2) {
 906                         CERROR("No NIDs were specified!\n");
 907                         rc = -EINVAL;
 908                         break;
 909                 }
 910
 911                 if (data->ioc_inlbuf2[data->ioc_inllen2 - 1] != 0) {
 912                         CERROR("NID list is not NUL terminated!\n");
 913                         rc = -EINVAL;
 914                         break;
 915                 }
 916
 917                 /* replace nids in llog */
 918                 rc = mgs_replace_nids(&env, mgs, data->ioc_inlbuf1,
 919                                       data->ioc_inlbuf2);
 920                 if (rc)
 921                         CERROR("%s: error replacing nids: rc = %d\n",
 922                                exp->exp_obd->obd_name, rc);
 923
 924                 break;
 925         }
 926
 927         case OBD_IOC_POOL:
 928                 rc = mgs_iocontrol_pool(&env, mgs, data);
 929                 break;
 930
 931         case OBD_IOC_NODEMAP:
 932                 rc = mgs_iocontrol_nodemap(&env, mgs, data);
 933                 break;
 934
 935         case OBD_IOC_DUMP_LOG: {
 936                 struct llog_ctxt *ctxt;
 937
 938                 ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
 939                 rc = class_config_dump_llog(&env, ctxt, data->ioc_inlbuf1,
 940                                             NULL);
 941                 llog_ctxt_put(ctxt);
 942
 943                 break;
 944         }
 945
 946         case OBD_IOC_CATLOGLIST:
 947                 rc = mgs_list_logs(&env, mgs, data);
 948                 break;
 949         case OBD_IOC_LLOG_CANCEL:
 950         case OBD_IOC_LLOG_REMOVE:
 951         case OBD_IOC_LLOG_CHECK:
 952         case OBD_IOC_LLOG_INFO:
 953         case OBD_IOC_LLOG_PRINT: {
 954                 struct llog_ctxt *ctxt;
 955
 956                 ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
 957                 rc = llog_ioctl(&env, ctxt, cmd, data);
 958                 llog_ctxt_put(ctxt);
 959                 break;
 960         }
 961
 962         default:
 963                 CERROR("%s: unknown command %#x\n",
 964                        mgs->mgs_obd->obd_name,  cmd);
 965                 rc = -ENOTTY;
 966                 break;
 967         }
 968 out:
 969         lu_env_fini(&env);
 970         RETURN(rc);
 971 }
 972
 973 static int mgs_connect_to_osd(struct mgs_device *m, const char *nextdev)
 974 {
 975         struct obd_connect_data *data = NULL;
 976         struct obd_device       *obd;
 977         int                      rc;
 978         ENTRY;
 979
 980         OBD_ALLOC_PTR(data);
 981         if (data == NULL)
 982                 RETURN(-ENOMEM);
 983
 984         obd = class_name2obd(nextdev);
 985         if (obd == NULL) {
 986                 CERROR("can't locate next device: %s\n", nextdev);
 987                 GOTO(out, rc = -ENOTCONN);
 988         }
 989
 990         data->ocd_version = LUSTRE_VERSION_CODE;
 991
 992         rc = obd_connect(NULL, &m->mgs_bottom_exp, obd,
 993                          &obd->obd_uuid, data, NULL);
 994         if (rc) {
 995                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
 996                 GOTO(out, rc);
 997         }
 998
 999         m->mgs_bottom = lu2dt_dev(m->mgs_bottom_exp->exp_obd->obd_lu_dev);
1000         m->mgs_dt_dev.dd_lu_dev.ld_site = m->mgs_bottom->dd_lu_dev.ld_site;
1001         LASSERT(m->mgs_dt_dev.dd_lu_dev.ld_site);
1002 out:
1003         OBD_FREE_PTR(data);
1004         RETURN(rc);
1005 }
1006
1007 static struct tgt_handler mgs_mgs_handlers[] = {
1008 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1009                 0,                      MGS_CONNECT,     mgs_connect,
1010                 &RQF_CONNECT, LUSTRE_OBD_VERSION),
1011 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1012                 0,                      MGS_DISCONNECT,  mgs_disconnect,
1013                 &RQF_MDS_DISCONNECT, LUSTRE_OBD_VERSION),
1014 TGT_MGS_HDL_VAR(0,                      MGS_EXCEPTION,   mgs_exception),
1015 TGT_MGS_HDL    (HABEO_REFERO | MUTABOR, MGS_SET_INFO,    mgs_set_info),
1016 TGT_MGS_HDL    (HABEO_REFERO | MUTABOR, MGS_TARGET_REG,  mgs_target_reg),
1017 TGT_MGS_HDL_VAR(0,                      MGS_TARGET_DEL,  mgs_target_del),
1018 TGT_MGS_HDL    (HABEO_REFERO,           MGS_CONFIG_READ, mgs_config_read),
1019 };
1020
1021 static struct tgt_handler mgs_obd_handlers[] = {
1022 TGT_OBD_HDL(0,  OBD_PING,       tgt_obd_ping),
1023 };
1024
1025 static struct tgt_handler mgs_dlm_handlers[] = {
1026 [LDLM_ENQUEUE - LDLM_FIRST_OPC] = {
1027         .th_name = "LDLM_ENQUEUE",
1028         /* don't use th_fail_id for MGS to don't interfere with MDS tests.
1029          * * There are no tests for MGS with OBD_FAIL_LDLM_ENQUEUE_NET so it
1030          * * is safe. If such tests will be needed we have to distinguish
1031          * * MDS and MGS fail ids, e.g use OBD_FAIL_MGS_ENQUEUE_NET for MGS
1032          * * instead of common OBD_FAIL_LDLM_ENQUEUE_NET */
1033         .th_fail_id = 0,
1034         .th_opc = LDLM_ENQUEUE,
1035         .th_flags = HABEO_CLAVIS,
1036         .th_act = tgt_enqueue,
1037         .th_fmt = &RQF_LDLM_ENQUEUE,
1038         .th_version = LUSTRE_DLM_VERSION,
1039         },
1040 };
1041
1042 static struct tgt_handler mgs_llog_handlers[] = {
1043 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_CREATE,      mgs_llog_open),
1044 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_NEXT_BLOCK,  tgt_llog_next_block),
1045 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_READ_HEADER, tgt_llog_read_header),
1046 TGT_LLOG_HDL_VAR(0,     LLOG_ORIGIN_HANDLE_CLOSE,       tgt_llog_close),
1047 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_PREV_BLOCK,  tgt_llog_prev_block),
1048 };
1049
1050 static struct tgt_opc_slice mgs_common_slice[] = {
1051         {
1052                 .tos_opc_start = MGS_FIRST_OPC,
1053                 .tos_opc_end   = MGS_LAST_OPC,
1054                 .tos_hs        = mgs_mgs_handlers
1055         },
1056         {
1057                 .tos_opc_start = OBD_FIRST_OPC,
1058                 .tos_opc_end   = OBD_LAST_OPC,
1059                 .tos_hs        = mgs_obd_handlers
1060         },
1061         {
1062                 .tos_opc_start = LDLM_FIRST_OPC,
1063                 .tos_opc_end   = LDLM_LAST_OPC,
1064                 .tos_hs        = mgs_dlm_handlers
1065         },
1066         {
1067                 .tos_opc_start = LLOG_FIRST_OPC,
1068                 .tos_opc_end   = LLOG_LAST_OPC,
1069                 .tos_hs        = mgs_llog_handlers
1070         },
1071         {
1072                 .tos_opc_start = SEC_FIRST_OPC,
1073                 .tos_opc_end   = SEC_LAST_OPC,
1074                 .tos_hs        = tgt_sec_ctx_handlers
1075         },
1076         {
1077                 .tos_hs        = NULL
1078         }
1079 };
1080
1081 static int mgs_init0(const struct lu_env *env, struct mgs_device *mgs,
1082                      struct lu_device_type *ldt, struct lustre_cfg *lcfg)
1083 {
1084         struct ptlrpc_service_conf       conf;
1085         struct obd_device               *obd;
1086         struct lustre_mount_info        *lmi;
1087         struct llog_ctxt                *ctxt;
1088         struct fs_db                    *fsdb = NULL;
1089         int                              rc;
1090
1091         ENTRY;
1092
1093         lmi = server_get_mount(lustre_cfg_string(lcfg, 0));
1094         if (lmi == NULL)
1095                 RETURN(-ENODEV);
1096
1097         mgs->mgs_dt_dev.dd_lu_dev.ld_ops = &mgs_lu_ops;
1098
1099         rc = mgs_connect_to_osd(mgs, lustre_cfg_string(lcfg, 3));
1100         if (rc)
1101                 GOTO(err_lmi, rc);
1102
1103         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1104         LASSERT(obd);
1105         mgs->mgs_obd = obd;
1106         mgs->mgs_obd->obd_lu_dev = &mgs->mgs_dt_dev.dd_lu_dev;
1107
1108         obd->u.obt.obt_magic = OBT_MAGIC;
1109         obd->u.obt.obt_instance = 0;
1110
1111         /* namespace for mgs llog */
1112         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS",
1113                                                 LDLM_NAMESPACE_SERVER,
1114                                                 LDLM_NAMESPACE_MODEST,
1115                                                 LDLM_NS_TYPE_MGT);
1116         if (obd->obd_namespace == NULL)
1117                 GOTO(err_ops, rc = -ENOMEM);
1118
1119         /* No recovery for MGCs */
1120         obd->obd_replayable = 0;
1121
1122         rc = tgt_init(env, &mgs->mgs_lut, obd, mgs->mgs_bottom,
1123                       mgs_common_slice, OBD_FAIL_MGS_ALL_REQUEST_NET,
1124                       OBD_FAIL_MGS_ALL_REPLY_NET);
1125         if (rc)
1126                 GOTO(err_ns, rc);
1127
1128         rc = mgs_fs_setup(env, mgs);
1129         if (rc) {
1130                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
1131                        obd->obd_name, rc);
1132                 GOTO(err_tgt, rc);
1133         }
1134
1135         rc = llog_setup(env, obd, &obd->obd_olg, LLOG_CONFIG_ORIG_CTXT,
1136                         obd, &llog_osd_ops);
1137         if (rc)
1138                 GOTO(err_fs, rc);
1139
1140         /* XXX: we need this trick till N:1 stack is supported
1141          * set "current" directory for named llogs */
1142         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1143         LASSERT(ctxt);
1144         ctxt->loc_dir = mgs->mgs_configs_dir;
1145         llog_ctxt_put(ctxt);
1146
1147         /* Internal mgs setup */
1148         mgs_init_fsdb_list(mgs);
1149         mutex_init(&mgs->mgs_mutex);
1150         mgs->mgs_start_time = cfs_time_current_sec();
1151         spin_lock_init(&mgs->mgs_lock);
1152
1153         rc = lproc_mgs_setup(mgs, lustre_cfg_string(lcfg, 3));
1154         if (rc != 0) {
1155                 CERROR("%s: cannot initialize proc entry: rc = %d\n",
1156                        obd->obd_name, rc);
1157                 GOTO(err_llog, rc);
1158         }
1159
1160         /* Setup params fsdb and log, so that other servers can make a local
1161          * copy successfully when they are mounted. See LU-4783 */
1162         rc = mgs_params_fsdb_setup(env, mgs, fsdb);
1163         if (rc)
1164                 /* params fsdb and log can be setup later */
1165                 CERROR("%s: %s fsdb and log setup failed: rc = %d\n",
1166                        obd->obd_name, PARAMS_FILENAME, rc);
1167
1168         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1169                            "mgs_ldlm_client", &obd->obd_ldlm_client);
1170
1171         conf = (typeof(conf)) {
1172                 .psc_name               = LUSTRE_MGS_NAME,
1173                 .psc_watchdog_factor    = MGS_SERVICE_WATCHDOG_FACTOR,
1174                 .psc_buf                = {
1175                         .bc_nbufs               = MGS_NBUFS,
1176                         .bc_buf_size            = MGS_BUFSIZE,
1177                         .bc_req_max_size        = MGS_MAXREQSIZE,
1178                         .bc_rep_max_size        = MGS_MAXREPSIZE,
1179                         .bc_req_portal          = MGS_REQUEST_PORTAL,
1180                         .bc_rep_portal          = MGC_REPLY_PORTAL,
1181                 },
1182                 .psc_thr                = {
1183                         .tc_thr_name            = "ll_mgs",
1184                         .tc_nthrs_init          = MGS_NTHRS_INIT,
1185                         .tc_nthrs_max           = MGS_NTHRS_MAX,
1186                         .tc_ctx_tags            = LCT_MG_THREAD,
1187                 },
1188                 .psc_ops                = {
1189                         .so_req_handler         = tgt_request_handle,
1190                         .so_req_printer         = target_print_req,
1191                 },
1192         };
1193
1194         /* Start the service threads */
1195         mgs->mgs_service = ptlrpc_register_service(&conf, obd->obd_proc_entry);
1196         if (IS_ERR(mgs->mgs_service)) {
1197                 rc = PTR_ERR(mgs->mgs_service);
1198                 CERROR("failed to start mgs service: %d\n", rc);
1199                 mgs->mgs_service = NULL;
1200                 GOTO(err_lproc, rc);
1201         }
1202
1203         ping_evictor_start();
1204
1205         CDEBUG(D_INFO, "MGS %s started\n", obd->obd_name);
1206
1207         /* device stack is not yet fully setup to keep no objects behind */
1208         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1209         RETURN(0);
1210 err_lproc:
1211         mgs_params_fsdb_cleanup(env, mgs);
1212         lproc_mgs_cleanup(mgs);
1213 err_llog:
1214         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1215         if (ctxt) {
1216                 ctxt->loc_dir = NULL;
1217                 llog_cleanup(env, ctxt);
1218         }
1219 err_tgt:
1220         tgt_fini(env, &mgs->mgs_lut);
1221 err_fs:
1222         /* No extra cleanup needed for llog_init_commit_thread() */
1223         mgs_fs_cleanup(env, mgs);
1224 err_ns:
1225         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
1226         obd->obd_namespace = NULL;
1227 err_ops:
1228         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1229         if (!cfs_hash_is_empty(mgs2lu_dev(mgs)->ld_site->ls_obj_hash)) {
1230                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_ERROR, NULL);
1231                 lu_site_print(env, mgs2lu_dev(mgs)->ld_site, &msgdata,
1232                                 lu_cdebug_printer);
1233         }
1234         obd_disconnect(mgs->mgs_bottom_exp);
1235 err_lmi:
1236         if (lmi)
1237                 server_put_mount(lustre_cfg_string(lcfg, 0), true);
1238         RETURN(rc);
1239 }
1240
1241 static struct lu_device *mgs_device_free(const struct lu_env *env,
1242                                          struct lu_device *lu)
1243 {
1244         struct mgs_device *mgs = lu2mgs_dev(lu);
1245         ENTRY;
1246
1247         dt_device_fini(&mgs->mgs_dt_dev);
1248         OBD_FREE_PTR(mgs);
1249         RETURN(NULL);
1250 }
1251
1252 static int mgs_process_config(const struct lu_env *env,
1253                               struct lu_device *dev,
1254                               struct lustre_cfg *lcfg)
1255 {
1256         LBUG();
1257         return 0;
1258 }
1259
1260 static int mgs_object_init(const struct lu_env *env, struct lu_object *o,
1261                            const struct lu_object_conf *unused)
1262 {
1263         struct mgs_device *d = lu2mgs_dev(o->lo_dev);
1264         struct lu_device  *under;
1265         struct lu_object  *below;
1266         int                rc = 0;
1267         ENTRY;
1268
1269         /* do no set .do_ops as mgs calls to bottom osd directly */
1270
1271         CDEBUG(D_INFO, "object init, fid = "DFID"\n",
1272                         PFID(lu_object_fid(o)));
1273
1274         under = &d->mgs_bottom->dd_lu_dev;
1275         below = under->ld_ops->ldo_object_alloc(env, o->lo_header, under);
1276         if (below != NULL)
1277                 lu_object_add(o, below);
1278         else
1279                 rc = -ENOMEM;
1280
1281         return 0;
1282 }
1283
1284 static void mgs_object_free(const struct lu_env *env, struct lu_object *o)
1285 {
1286         struct mgs_object *obj = lu2mgs_obj(o);
1287         struct lu_object_header *h = o->lo_header;
1288
1289         dt_object_fini(&obj->mgo_obj);
1290         lu_object_header_fini(h);
1291         OBD_FREE_PTR(obj);
1292 }
1293
1294 static int mgs_object_print(const struct lu_env *env, void *cookie,
1295                             lu_printer_t p, const struct lu_object *l)
1296 {
1297         const struct mgs_object *o = lu2mgs_obj((struct lu_object *) l);
1298
1299         return (*p)(env, cookie, LUSTRE_MGS_NAME"-object@%p", o);
1300 }
1301
1302 struct lu_object_operations mgs_lu_obj_ops = {
1303         .loo_object_init        = mgs_object_init,
1304         .loo_object_free        = mgs_object_free,
1305         .loo_object_print       = mgs_object_print,
1306 };
1307
1308 struct lu_object *mgs_object_alloc(const struct lu_env *env,
1309                                    const struct lu_object_header *hdr,
1310                                    struct lu_device *d)
1311 {
1312         struct lu_object_header *h;
1313         struct mgs_object       *o;
1314         struct lu_object        *l;
1315
1316         LASSERT(hdr == NULL);
1317
1318         OBD_ALLOC_PTR(o);
1319         if (o != NULL) {
1320                 l = &o->mgo_obj.do_lu;
1321                 h = &o->mgo_header;
1322
1323                 lu_object_header_init(h);
1324                 dt_object_init(&o->mgo_obj, h, d);
1325                 lu_object_add_top(h, l);
1326
1327                 l->lo_ops = &mgs_lu_obj_ops;
1328
1329                 return l;
1330         } else {
1331                 return NULL;
1332         }
1333 }
1334
1335 const struct lu_device_operations mgs_lu_ops = {
1336         .ldo_object_alloc       = mgs_object_alloc,
1337         .ldo_process_config     = mgs_process_config,
1338 };
1339
1340 static struct lu_device *mgs_device_alloc(const struct lu_env *env,
1341                                           struct lu_device_type *type,
1342                                           struct lustre_cfg *lcfg)
1343 {
1344         struct mgs_device *mgs;
1345         struct lu_device  *ludev;
1346
1347         OBD_ALLOC_PTR(mgs);
1348         if (mgs == NULL) {
1349                 ludev = ERR_PTR(-ENOMEM);
1350         } else {
1351                 int rc;
1352
1353                 ludev = mgs2lu_dev(mgs);
1354                 dt_device_init(&mgs->mgs_dt_dev, type);
1355                 rc = mgs_init0(env, mgs, type, lcfg);
1356                 if (rc != 0) {
1357                         mgs_device_free(env, ludev);
1358                         ludev = ERR_PTR(rc);
1359                 }
1360         }
1361         return ludev;
1362 }
1363
1364 static struct lu_device *mgs_device_fini(const struct lu_env *env,
1365                                          struct lu_device *d)
1366 {
1367         struct mgs_device       *mgs = lu2mgs_dev(d);
1368         struct obd_device       *obd = mgs->mgs_obd;
1369         struct llog_ctxt        *ctxt;
1370
1371         ENTRY;
1372
1373         LASSERT(mgs->mgs_bottom);
1374
1375         class_disconnect_exports(obd);
1376
1377         ping_evictor_stop();
1378
1379         ptlrpc_unregister_service(mgs->mgs_service);
1380
1381         obd_exports_barrier(obd);
1382         obd_zombie_barrier();
1383
1384         tgt_fini(env, &mgs->mgs_lut);
1385         mgs_params_fsdb_cleanup(env, mgs);
1386         mgs_cleanup_fsdb_list(mgs);
1387         lproc_mgs_cleanup(mgs);
1388
1389         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1390         if (ctxt) {
1391                 ctxt->loc_dir = NULL;
1392                 llog_cleanup(env, ctxt);
1393         }
1394
1395         mgs_fs_cleanup(env, mgs);
1396
1397         ldlm_namespace_free(obd->obd_namespace, NULL, 1);
1398         obd->obd_namespace = NULL;
1399
1400         lu_site_purge(env, d->ld_site, ~0);
1401         if (!cfs_hash_is_empty(d->ld_site->ls_obj_hash)) {
1402                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_ERROR, NULL);
1403                 lu_site_print(env, d->ld_site, &msgdata, lu_cdebug_printer);
1404         }
1405
1406         LASSERT(mgs->mgs_bottom_exp);
1407         obd_disconnect(mgs->mgs_bottom_exp);
1408
1409         server_put_mount(obd->obd_name, true);
1410
1411         RETURN(NULL);
1412 }
1413
1414 /* context key constructor/destructor: mgs_key_init, mgs_key_fini */
1415 LU_KEY_INIT_FINI(mgs, struct mgs_thread_info);
1416
1417 LU_TYPE_INIT_FINI(mgs, &mgs_thread_key);
1418
1419 LU_CONTEXT_KEY_DEFINE(mgs, LCT_MG_THREAD);
1420
1421 static struct lu_device_type_operations mgs_device_type_ops = {
1422         .ldto_init              = mgs_type_init,
1423         .ldto_fini              = mgs_type_fini,
1424
1425         .ldto_start             = mgs_type_start,
1426         .ldto_stop              = mgs_type_stop,
1427
1428         .ldto_device_alloc      = mgs_device_alloc,
1429         .ldto_device_free       = mgs_device_free,
1430
1431         .ldto_device_fini       = mgs_device_fini
1432 };
1433
1434 static struct lu_device_type mgs_device_type = {
1435         .ldt_tags       = LU_DEVICE_DT,
1436         .ldt_name       = LUSTRE_MGS_NAME,
1437         .ldt_ops        = &mgs_device_type_ops,
1438         .ldt_ctx_tags   = LCT_MG_THREAD
1439 };
1440
1441 static int mgs_obd_connect(const struct lu_env *env, struct obd_export **exp,
1442                            struct obd_device *obd, struct obd_uuid *cluuid,
1443                            struct obd_connect_data *data, void *localdata)
1444 {
1445         struct obd_export       *lexp;
1446         struct lustre_handle     conn = { 0 };
1447         int                      rc;
1448
1449         ENTRY;
1450
1451         if (exp == NULL || obd == NULL || cluuid == NULL)
1452                 RETURN(-EINVAL);
1453
1454         rc = class_connect(&conn, obd, cluuid);
1455         if (rc)
1456                 RETURN(rc);
1457
1458         lexp = class_conn2export(&conn);
1459         if (lexp == NULL)
1460                 RETURN(-EFAULT);
1461
1462         if (data != NULL) {
1463                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
1464                 data->ocd_version = LUSTRE_VERSION_CODE;
1465                 lexp->exp_connect_data = *data;
1466         }
1467
1468         tgt_counter_incr(lexp, LPROC_MGS_CONNECT);
1469
1470         rc = mgs_export_stats_init(obd, lexp, localdata);
1471         if (rc)
1472                 class_disconnect(lexp);
1473         else
1474                 *exp = lexp;
1475
1476         RETURN(rc);
1477 }
1478
1479 static int mgs_obd_reconnect(const struct lu_env *env, struct obd_export *exp,
1480                              struct obd_device *obd, struct obd_uuid *cluuid,
1481                              struct obd_connect_data *data, void *localdata)
1482 {
1483         ENTRY;
1484
1485         if (exp == NULL || obd == NULL || cluuid == NULL)
1486                 RETURN(-EINVAL);
1487
1488         tgt_counter_incr(exp, LPROC_MGS_CONNECT);
1489
1490         if (data != NULL) {
1491                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
1492                 data->ocd_version = LUSTRE_VERSION_CODE;
1493                 exp->exp_connect_data = *data;
1494         }
1495
1496         RETURN(mgs_export_stats_init(obd, exp, localdata));
1497 }
1498
1499 static int mgs_obd_disconnect(struct obd_export *exp)
1500 {
1501         int rc;
1502
1503         ENTRY;
1504
1505         LASSERT(exp);
1506
1507         mgs_fsc_cleanup(exp);
1508
1509         class_export_get(exp);
1510         tgt_counter_incr(exp, LPROC_MGS_DISCONNECT);
1511
1512         rc = server_disconnect_export(exp);
1513         class_export_put(exp);
1514         RETURN(rc);
1515 }
1516
1517 /* use obd ops to offer management infrastructure */
1518 static struct obd_ops mgs_obd_device_ops = {
1519         .o_owner                = THIS_MODULE,
1520         .o_connect              = mgs_obd_connect,
1521         .o_reconnect            = mgs_obd_reconnect,
1522         .o_disconnect           = mgs_obd_disconnect,
1523         .o_init_export          = mgs_init_export,
1524         .o_destroy_export       = mgs_destroy_export,
1525         .o_iocontrol            = mgs_iocontrol,
1526 };
1527
1528 static int __init mgs_init(void)
1529 {
1530         return class_register_type(&mgs_obd_device_ops, NULL, true, NULL,
1531 #ifndef HAVE_ONLY_PROCFS_SEQ
1532                                    NULL,
1533 #endif
1534                                    LUSTRE_MGS_NAME, &mgs_device_type);
1535 }
1536
1537 static void /*__exit*/ mgs_exit(void)
1538 {
1539         class_unregister_type(LUSTRE_MGS_NAME);
1540 }
1541
1542 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
1543 MODULE_DESCRIPTION("Lustre  Management Server (MGS)");
1544 MODULE_LICENSE("GPL");
1545
1546 module_init(mgs_init);
1547 module_exit(mgs_exit);