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