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