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