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