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