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