lustre/mgs/mgs_handler.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * GPL HEADER START
   5  *
   6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License version 2 only,
  10  * as published by the Free Software Foundation.
  11  *
  12  * This program is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * General Public License version 2 for more details (a copy is included
  16  * in the LICENSE file that accompanied this code).
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * version 2 along with this program; If not, see
  20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  21  *
  22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  23  * CA 95054 USA or visit www.sun.com if you need additional information or
  24  * have any questions.
  25  *
  26  * GPL HEADER END
  27  */
  28 /*
  29  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  30  * Use is subject to license terms.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  *
  36  * lustre/mgs/mgs_handler.c
  37  *
  38  * Author: Nathan Rutman <nathan@clusterfs.com>
  39  */
  40
  41 #ifndef EXPORT_SYMTAB
  42 # define EXPORT_SYMTAB
  43 #endif
  44 #define DEBUG_SUBSYSTEM S_MGS
  45 #define D_MGS D_CONFIG
  46
  47 #ifdef __KERNEL__
  48 # include <linux/module.h>
  49 # include <linux/pagemap.h>
  50 # include <linux/miscdevice.h>
  51 # include <linux/init.h>
  52 #else
  53 # include <liblustre.h>
  54 #endif
  55
  56 #include <obd_class.h>
  57 #include <lustre_dlm.h>
  58 #include <lprocfs_status.h>
  59 #include <lustre_fsfilt.h>
  60 #include <lustre_disk.h>
  61 #include "mgs_internal.h"
  62 #include <lustre_param.h>
  63
  64 /* Establish a connection to the MGS.*/
  65 static int mgs_connect(const struct lu_env *env,
  66                        struct obd_export **exp, struct obd_device *obd,
  67                        struct obd_uuid *cluuid, struct obd_connect_data *data,
  68                        void *localdata)
  69 {
  70         struct obd_export *lexp;
  71         struct lustre_handle conn = { 0 };
  72         int rc;
  73         ENTRY;
  74
  75         if (!exp || !obd || !cluuid)
  76                 RETURN(-EINVAL);
  77
  78         rc = class_connect(&conn, obd, cluuid);
  79         if (rc)
  80                 RETURN(rc);
  81
  82         lexp = class_conn2export(&conn);
  83         LASSERT(lexp);
  84
  85         mgs_counter_incr(lexp, LPROC_MGS_CONNECT);
  86
  87         if (data != NULL) {
  88                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
  89                 lexp->exp_connect_flags = data->ocd_connect_flags;
  90                 data->ocd_version = LUSTRE_VERSION_CODE;
  91         }
  92
  93         rc = mgs_export_stats_init(obd, lexp, localdata);
  94
  95         if (rc) {
  96                 class_disconnect(lexp);
  97         } else {
  98                 *exp = lexp;
  99         }
 100
 101         RETURN(rc);
 102 }
 103
 104 static int mgs_reconnect(const struct lu_env *env,
 105                          struct obd_export *exp, struct obd_device *obd,
 106                          struct obd_uuid *cluuid, struct obd_connect_data *data,
 107                          void *localdata)
 108 {
 109         ENTRY;
 110
 111         if (exp == NULL || obd == NULL || cluuid == NULL)
 112                 RETURN(-EINVAL);
 113
 114         mgs_counter_incr(exp, LPROC_MGS_CONNECT);
 115
 116         if (data != NULL) {
 117                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
 118                 exp->exp_connect_flags = data->ocd_connect_flags;
 119                 data->ocd_version = LUSTRE_VERSION_CODE;
 120         }
 121
 122         RETURN(mgs_export_stats_init(obd, exp, localdata));
 123 }
 124
 125 static int mgs_disconnect(struct obd_export *exp)
 126 {
 127         int rc;
 128         ENTRY;
 129
 130         LASSERT(exp);
 131
 132         mgs_fsc_cleanup(exp);
 133
 134         class_export_get(exp);
 135         mgs_counter_incr(exp, LPROC_MGS_DISCONNECT);
 136
 137         rc = server_disconnect_export(exp);
 138         class_export_put(exp);
 139         RETURN(rc);
 140 }
 141
 142 static int mgs_cleanup(struct obd_device *obd);
 143 static int mgs_handle(struct ptlrpc_request *req);
 144
 145 static int mgs_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
 146                          struct obd_device *tgt, int *index)
 147 {
 148         int rc;
 149         ENTRY;
 150
 151         LASSERT(olg == &obd->obd_olg);
 152         rc = llog_setup(obd, olg, LLOG_CONFIG_ORIG_CTXT, obd, 0, NULL,
 153                         &llog_lvfs_ops);
 154         RETURN(rc);
 155 }
 156
 157 static int mgs_llog_finish(struct obd_device *obd, int count)
 158 {
 159         struct llog_ctxt *ctxt;
 160         int rc = 0;
 161         ENTRY;
 162
 163         ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
 164         if (ctxt)
 165                 rc = llog_cleanup(ctxt);
 166
 167         RETURN(rc);
 168 }
 169
 170 /* Start the MGS obd */
 171 static int mgs_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 172 {
 173         struct lprocfs_static_vars lvars;
 174         struct mgs_obd *mgs = &obd->u.mgs;
 175         struct lustre_mount_info *lmi;
 176         struct lustre_sb_info *lsi;
 177         struct vfsmount *mnt;
 178         int rc = 0;
 179         ENTRY;
 180
 181         CDEBUG(D_CONFIG, "Starting MGS\n");
 182
 183         /* Find our disk */
 184         lmi = server_get_mount(obd->obd_name);
 185         if (!lmi)
 186                 RETURN(rc = -EINVAL);
 187
 188         mnt = lmi->lmi_mnt;
 189         lsi = s2lsi(lmi->lmi_sb);
 190         obd->obd_fsops = fsfilt_get_ops(MT_STR(lsi->lsi_ldd));
 191         if (IS_ERR(obd->obd_fsops))
 192                 GOTO(err_put, rc = PTR_ERR(obd->obd_fsops));
 193
 194         if (lvfs_check_rdonly(lvfs_sbdev(mnt->mnt_sb))) {
 195                 CERROR("%s: Underlying device is marked as read-only. "
 196                        "Setup failed\n", obd->obd_name);
 197                 GOTO(err_ops, rc = -EROFS);
 198         }
 199
 200         obd->u.obt.obt_magic = OBT_MAGIC;
 201         obd->u.obt.obt_instance = 0;
 202
 203         /* namespace for mgs llog */
 204         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS",
 205                                                 LDLM_NAMESPACE_SERVER,
 206                                                 LDLM_NAMESPACE_MODEST,
 207                                                 LDLM_NS_TYPE_MGT);
 208         if (obd->obd_namespace == NULL)
 209                 GOTO(err_ops, rc = -ENOMEM);
 210
 211         /* ldlm setup */
 212         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
 213                            "mgs_ldlm_client", &obd->obd_ldlm_client);
 214
 215         rc = mgs_fs_setup(obd, mnt);
 216         if (rc) {
 217                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
 218                        obd->obd_name, rc);
 219                 GOTO(err_ns, rc);
 220         }
 221
 222         rc = obd_llog_init(obd, &obd->obd_olg, obd, NULL);
 223         if (rc)
 224                 GOTO(err_fs, rc);
 225
 226         /* No recovery for MGC's */
 227         obd->obd_replayable = 0;
 228
 229         /* Internal mgs setup */
 230         mgs_init_fsdb_list(obd);
 231         cfs_sema_init(&mgs->mgs_sem, 1);
 232         mgs->mgs_start_time = cfs_time_current_sec();
 233
 234         /* Setup proc */
 235         lprocfs_mgs_init_vars(&lvars);
 236         if (lprocfs_obd_setup(obd, lvars.obd_vars) == 0) {
 237                 lproc_mgs_setup(obd);
 238                 rc = lprocfs_alloc_md_stats(obd, LPROC_MGS_LAST);
 239                 if (rc)
 240                         GOTO(err_llog, rc);
 241         }
 242
 243         /* Start the service threads */
 244         mgs->mgs_service =
 245                 ptlrpc_init_svc(MGS_NBUFS, MGS_BUFSIZE, MGS_MAXREQSIZE,
 246                                 MGS_MAXREPSIZE, MGS_REQUEST_PORTAL,
 247                                 MGC_REPLY_PORTAL, 2,
 248                                 mgs_handle, LUSTRE_MGS_NAME,
 249                                 obd->obd_proc_entry, target_print_req,
 250                                 MGS_THREADS_AUTO_MIN, MGS_THREADS_AUTO_MAX,
 251                                 "ll_mgs", LCT_MD_THREAD, NULL);
 252
 253         if (!mgs->mgs_service) {
 254                 CERROR("failed to start service\n");
 255                 GOTO(err_llog, rc = -ENOMEM);
 256         }
 257
 258         rc = ptlrpc_start_threads(mgs->mgs_service);
 259         if (rc)
 260                 GOTO(err_thread, rc);
 261
 262         ping_evictor_start();
 263
 264         LCONSOLE_INFO("MGS %s started\n", obd->obd_name);
 265
 266         RETURN(0);
 267
 268 err_thread:
 269         ptlrpc_unregister_service(mgs->mgs_service);
 270 err_llog:
 271         lproc_mgs_cleanup(obd);
 272         obd_llog_finish(obd, 0);
 273 err_fs:
 274         /* No extra cleanup needed for llog_init_commit_thread() */
 275         mgs_fs_cleanup(obd);
 276 err_ns:
 277         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
 278         obd->obd_namespace = NULL;
 279 err_ops:
 280         fsfilt_put_ops(obd->obd_fsops);
 281 err_put:
 282         server_put_mount(obd->obd_name, mnt);
 283         mgs->mgs_sb = 0;
 284         return rc;
 285 }
 286
 287 static int mgs_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
 288 {
 289         int rc = 0;
 290         ENTRY;
 291
 292         switch (stage) {
 293         case OBD_CLEANUP_EARLY:
 294         case OBD_CLEANUP_EXPORTS:
 295                 rc = obd_llog_finish(obd, 0);
 296                 break;
 297         }
 298         RETURN(rc);
 299 }
 300
 301 /**
 302  * Performs cleanup procedures for passed \a obd given it is mgs obd.
 303  */
 304 static int mgs_cleanup(struct obd_device *obd)
 305 {
 306         struct mgs_obd *mgs = &obd->u.mgs;
 307         ENTRY;
 308
 309         if (mgs->mgs_sb == NULL)
 310                 RETURN(0);
 311
 312         ping_evictor_stop();
 313
 314         ptlrpc_unregister_service(mgs->mgs_service);
 315
 316         mgs_cleanup_fsdb_list(obd);
 317         lproc_mgs_cleanup(obd);
 318         mgs_fs_cleanup(obd);
 319
 320         server_put_mount(obd->obd_name, mgs->mgs_vfsmnt);
 321         mgs->mgs_sb = NULL;
 322
 323         ldlm_namespace_free(obd->obd_namespace, NULL, 1);
 324         obd->obd_namespace = NULL;
 325
 326         fsfilt_put_ops(obd->obd_fsops);
 327
 328         LCONSOLE_INFO("%s has stopped.\n", obd->obd_name);
 329         RETURN(0);
 330 }
 331
 332 static int mgs_completion_ast_config(struct ldlm_lock *lock, int flags,
 333                                      void *cbdata)
 334 {
 335         ENTRY;
 336
 337         if (!(flags & (LDLM_FL_BLOCK_WAIT | LDLM_FL_BLOCK_GRANTED |
 338                        LDLM_FL_BLOCK_CONV))) {
 339                 struct fs_db *fsdb = (struct fs_db *)lock->l_ast_data;
 340                 struct lustre_handle lockh;
 341
 342                 /* clear the bit before lock put */
 343                 cfs_clear_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags);
 344
 345                 ldlm_lock2handle(lock, &lockh);
 346                 ldlm_lock_decref_and_cancel(&lockh, LCK_EX);
 347         }
 348
 349         RETURN(ldlm_completion_ast(lock, flags, cbdata));
 350 }
 351
 352 static int mgs_completion_ast_ir(struct ldlm_lock *lock, int flags,
 353                                  void *cbdata)
 354 {
 355         ENTRY;
 356
 357         if (!(flags & (LDLM_FL_BLOCK_WAIT | LDLM_FL_BLOCK_GRANTED |
 358                        LDLM_FL_BLOCK_CONV))) {
 359                 struct fs_db *fsdb = (struct fs_db *)lock->l_ast_data;
 360                 struct lustre_handle lockh;
 361
 362                 mgs_ir_notify_complete(fsdb);
 363
 364                 ldlm_lock2handle(lock, &lockh);
 365                 ldlm_lock_decref_and_cancel(&lockh, LCK_EX);
 366         }
 367
 368         RETURN(ldlm_completion_ast(lock, flags, cbdata));
 369 }
 370
 371 void mgs_revoke_lock(struct obd_device *obd, struct fs_db *fsdb, int type)
 372 {
 373         ldlm_completion_callback cp = NULL;
 374         struct lustre_handle     lockh = { 0 };
 375         struct ldlm_res_id       res_id;
 376         int flags = LDLM_FL_ATOMIC_CB;
 377         int rc;
 378         ENTRY;
 379
 380         LASSERT(fsdb->fsdb_name[0] != '\0');
 381         rc = mgc_fsname2resid(fsdb->fsdb_name, &res_id, type);
 382         LASSERT(rc == 0);
 383
 384         switch (type) {
 385         case CONFIG_T_CONFIG:
 386                 cp = mgs_completion_ast_config;
 387                 if (cfs_test_and_set_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags))
 388                         rc = -EALREADY;
 389                 break;
 390         case CONFIG_T_RECOVER:
 391                 cp = mgs_completion_ast_ir;
 392         default:
 393                 break;
 394         }
 395
 396         if (!rc) {
 397                 LASSERT(cp != NULL);
 398                 rc = ldlm_cli_enqueue_local(obd->obd_namespace, &res_id,
 399                                             LDLM_PLAIN, NULL, LCK_EX, &flags,
 400                                             ldlm_blocking_ast, cp, NULL,
 401                                             fsdb, 0, NULL, &lockh);
 402                 if (rc != ELDLM_OK) {
 403                         CERROR("can't take cfg lock for "LPX64"/"LPX64"(%d)\n",
 404                                le64_to_cpu(res_id.name[0]),
 405                                le64_to_cpu(res_id.name[1]), rc);
 406
 407                         if (type == CONFIG_T_CONFIG)
 408                                 cfs_clear_bit(FSDB_REVOKING_LOCK,
 409                                               &fsdb->fsdb_flags);
 410                 }
 411                 /* lock has been cancelled in completion_ast. */
 412         }
 413
 414         RETURN_EXIT;
 415 }
 416
 417 /* rc=0 means ok
 418       1 means update
 419      <0 means error */
 420 static int mgs_check_target(struct obd_device *obd, struct mgs_target_info *mti)
 421 {
 422         int rc;
 423         ENTRY;
 424
 425         rc = mgs_check_index(obd, mti);
 426         if (rc == 0) {
 427                 LCONSOLE_ERROR_MSG(0x13b, "%s claims to have registered, but "
 428                                    "this MGS does not know about it, preventing "
 429                                    "registration.\n", mti->mti_svname);
 430                 rc = -ENOENT;
 431         } else if (rc == -1) {
 432                 LCONSOLE_ERROR_MSG(0x13c, "Client log %s-client has "
 433                                    "disappeared! Regenerating all logs.\n",
 434                                    mti->mti_fsname);
 435                 mti->mti_flags |= LDD_F_WRITECONF;
 436                 rc = 1;
 437         } else {
 438                 /* Index is correctly marked as used */
 439
 440                 /* If the logs don't contain the mti_nids then add
 441                    them as failover nids */
 442                 rc = mgs_check_failnid(obd, mti);
 443         }
 444
 445         RETURN(rc);
 446 }
 447
 448 /* Ensure this is not a failover node that is connecting first*/
 449 static int mgs_check_failover_reg(struct mgs_target_info *mti)
 450 {
 451         lnet_nid_t nid;
 452         char *ptr;
 453         int i;
 454
 455         ptr = mti->mti_params;
 456         while (class_find_param(ptr, PARAM_FAILNODE, &ptr) == 0) {
 457                 while (class_parse_nid(ptr, &nid, &ptr) == 0) {
 458                         for (i = 0; i < mti->mti_nid_count; i++) {
 459                                 if (nid == mti->mti_nids[i]) {
 460                                         LCONSOLE_WARN("Denying initial registra"
 461                                                       "tion attempt from nid %s"
 462                                                       ", specified as failover"
 463                                                       "\n",libcfs_nid2str(nid));
 464                                         return -EADDRNOTAVAIL;
 465                                 }
 466                         }
 467                 }
 468         }
 469         return 0;
 470 }
 471
 472 /* Called whenever a target starts up.  Flags indicate first connect, etc. */
 473 static int mgs_handle_target_reg(struct ptlrpc_request *req)
 474 {
 475         struct obd_device *obd = req->rq_export->exp_obd;
 476         struct mgs_target_info *mti, *rep_mti;
 477         struct fs_db *fsdb;
 478         int opc;
 479         int rc = 0;
 480         ENTRY;
 481
 482         mgs_counter_incr(req->rq_export, LPROC_MGS_TARGET_REG);
 483
 484         mti = req_capsule_client_get(&req->rq_pill, &RMF_MGS_TARGET_INFO);
 485
 486         opc = mti->mti_flags & LDD_F_OPC_MASK;
 487         if (opc == LDD_F_OPC_READY) {
 488                 CDEBUG(D_MGS, "fs: %s index: %d is ready to reconnect.\n",
 489                        mti->mti_fsname, mti->mti_stripe_index);
 490                 rc = mgs_ir_update(obd, mti);
 491                 if (rc) {
 492                         LASSERT(!(mti->mti_flags & LDD_F_IR_CAPABLE));
 493                         CERROR("Update IR return with %d(ignore and IR "
 494                                "disabled)\n", rc);
 495                 }
 496                 GOTO(out_nolock, rc);
 497         }
 498
 499         /* Do not support unregistering right now. */
 500         if (opc != LDD_F_OPC_REG)
 501                 GOTO(out_nolock, rc = -EINVAL);
 502
 503         CDEBUG(D_MGS, "fs: %s index: %d is registered to MGS.\n",
 504                mti->mti_fsname, mti->mti_stripe_index);
 505
 506         if (mti->mti_flags & LDD_F_NEED_INDEX)
 507                 mti->mti_flags |= LDD_F_WRITECONF;
 508
 509         if (!(mti->mti_flags & (LDD_F_WRITECONF | LDD_F_UPGRADE14 |
 510                                 LDD_F_UPDATE))) {
 511                 /* We're just here as a startup ping. */
 512                 CDEBUG(D_MGS, "Server %s is running on %s\n",
 513                        mti->mti_svname, obd_export_nid2str(req->rq_export));
 514                 rc = mgs_check_target(obd, mti);
 515                 /* above will set appropriate mti flags */
 516                 if (rc <= 0)
 517                         /* Nothing wrong, or fatal error */
 518                         GOTO(out_nolock, rc);
 519         } else {
 520                 if (!(mti->mti_flags & LDD_F_NO_PRIMNODE)
 521                     && (rc = mgs_check_failover_reg(mti)))
 522                         GOTO(out_nolock, rc);
 523         }
 524
 525         OBD_FAIL_TIMEOUT(OBD_FAIL_MGS_PAUSE_TARGET_REG, 10);
 526
 527         if (mti->mti_flags & LDD_F_WRITECONF) {
 528                 if (mti->mti_flags & LDD_F_SV_TYPE_MDT &&
 529                     mti->mti_stripe_index == 0) {
 530                         rc = mgs_erase_logs(obd, mti->mti_fsname);
 531                         LCONSOLE_WARN("%s: Logs for fs %s were removed by user "
 532                                       "request.  All servers must be restarted "
 533                                       "in order to regenerate the logs."
 534                                       "\n", obd->obd_name, mti->mti_fsname);
 535                 } else if (mti->mti_flags &
 536                            (LDD_F_SV_TYPE_OST | LDD_F_SV_TYPE_MDT)) {
 537                         rc = mgs_erase_log(obd, mti->mti_svname);
 538                         LCONSOLE_WARN("%s: Regenerating %s log by user "
 539                                       "request.\n",
 540                                       obd->obd_name, mti->mti_svname);
 541                 }
 542                 mti->mti_flags |= LDD_F_UPDATE;
 543                 /* Erased logs means start from scratch. */
 544                 mti->mti_flags &= ~LDD_F_UPGRADE14;
 545         }
 546
 547         rc = mgs_find_or_make_fsdb(obd, mti->mti_fsname, &fsdb);
 548         if (rc) {
 549                 CERROR("Can't get db for %s: %d\n", mti->mti_fsname, rc);
 550                 GOTO(out_nolock, rc);
 551         }
 552
 553         /*
 554          * Log writing contention is handled by the fsdb_sem.
 555          *
 556          * It should be alright if someone was reading while we were
 557          * updating the logs - if we revoke at the end they will just update
 558          * from where they left off.
 559          */
 560
 561         /* COMPAT_146 */
 562         if (mti->mti_flags & LDD_F_UPGRADE14) {
 563                 rc = mgs_upgrade_sv_14(obd, mti, fsdb);
 564                 if (rc) {
 565                         CERROR("Can't upgrade from 1.4 (%d)\n", rc);
 566                         GOTO(out, rc);
 567                 }
 568
 569                 /* We're good to go */
 570                 mti->mti_flags |= LDD_F_UPDATE;
 571         }
 572         /* end COMPAT_146 */
 573
 574         if (mti->mti_flags & LDD_F_UPDATE) {
 575                 CDEBUG(D_MGS, "updating %s, index=%d\n", mti->mti_svname,
 576                        mti->mti_stripe_index);
 577
 578                 /* create or update the target log
 579                    and update the client/mdt logs */
 580                 rc = mgs_write_log_target(obd, mti, fsdb);
 581                 if (rc) {
 582                         CERROR("Failed to write %s log (%d)\n",
 583                                mti->mti_svname, rc);
 584                         GOTO(out, rc);
 585                 }
 586
 587                 mti->mti_flags &= ~(LDD_F_VIRGIN | LDD_F_UPDATE |
 588                                     LDD_F_NEED_INDEX | LDD_F_WRITECONF |
 589                                     LDD_F_UPGRADE14);
 590                 mti->mti_flags |= LDD_F_REWRITE_LDD;
 591         }
 592
 593 out:
 594         mgs_revoke_lock(obd, fsdb, CONFIG_T_CONFIG);
 595
 596 out_nolock:
 597         CDEBUG(D_MGS, "replying with %s, index=%d, rc=%d\n", mti->mti_svname,
 598                mti->mti_stripe_index, rc);
 599         req->rq_status = rc;
 600         if (rc)
 601                 /* we need an error flag to tell the target what's going on,
 602                  * instead of just doing it by error code only. */
 603                 mti->mti_flags |= LDD_F_ERROR;
 604
 605         rc = req_capsule_server_pack(&req->rq_pill);
 606         if (rc)
 607                 RETURN(rc);
 608
 609         /* send back the whole mti in the reply */
 610         rep_mti = req_capsule_server_get(&req->rq_pill, &RMF_MGS_TARGET_INFO);
 611         *rep_mti = *mti;
 612
 613         /* Flush logs to disk */
 614         fsfilt_sync(obd, obd->u.mgs.mgs_sb);
 615         RETURN(rc);
 616 }
 617
 618 static int mgs_set_info_rpc(struct ptlrpc_request *req)
 619 {
 620         struct obd_device *obd = req->rq_export->exp_obd;
 621         struct mgs_send_param *msp, *rep_msp;
 622         int rc;
 623         struct lustre_cfg_bufs bufs;
 624         struct lustre_cfg *lcfg;
 625         char fsname[MTI_NAME_MAXLEN];
 626         ENTRY;
 627
 628         msp = req_capsule_client_get(&req->rq_pill, &RMF_MGS_SEND_PARAM);
 629         LASSERT(msp);
 630
 631         /* Construct lustre_cfg structure to pass to function mgs_setparam */
 632         lustre_cfg_bufs_reset(&bufs, NULL);
 633         lustre_cfg_bufs_set_string(&bufs, 1, msp->mgs_param);
 634         lcfg = lustre_cfg_new(LCFG_PARAM, &bufs);
 635         rc = mgs_setparam(obd, lcfg, fsname);
 636         if (rc) {
 637                 CERROR("Error %d in setting the parameter %s for fs %s\n",
 638                        rc, msp->mgs_param, fsname);
 639                 RETURN(rc);
 640         }
 641
 642         lustre_cfg_free(lcfg);
 643
 644         rc = req_capsule_server_pack(&req->rq_pill);
 645         if (rc == 0) {
 646                 rep_msp = req_capsule_server_get(&req->rq_pill, &RMF_MGS_SEND_PARAM);
 647                 rep_msp = msp;
 648         }
 649         RETURN(rc);
 650 }
 651
 652 static int mgs_config_read(struct ptlrpc_request *req)
 653 {
 654         struct mgs_config_body *body;
 655         int rc;
 656         ENTRY;
 657
 658         body = req_capsule_client_get(&req->rq_pill, &RMF_MGS_CONFIG_BODY);
 659         if (body == NULL)
 660                 RETURN(-EINVAL);
 661
 662         switch (body->mcb_type) {
 663         case CONFIG_T_RECOVER:
 664                 rc = mgs_get_ir_logs(req);
 665                 break;
 666
 667         case CONFIG_T_CONFIG:
 668                 rc = -ENOTSUPP;
 669                 break;
 670
 671         default:
 672                 rc = -EINVAL;
 673                 break;
 674         }
 675
 676         RETURN(rc);
 677 }
 678
 679 /*
 680  * similar as in ost_connect_check_sptlrpc()
 681  */
 682 static int mgs_connect_check_sptlrpc(struct ptlrpc_request *req)
 683 {
 684         struct obd_export     *exp = req->rq_export;
 685         struct obd_device     *obd = exp->exp_obd;
 686         struct fs_db          *fsdb;
 687         struct sptlrpc_flavor  flvr;
 688         int                    rc = 0;
 689
 690         if (exp->exp_flvr.sf_rpc == SPTLRPC_FLVR_INVALID) {
 691                 rc = mgs_find_or_make_fsdb(obd, MGSSELF_NAME, &fsdb);
 692                 if (rc)
 693                         return rc;
 694
 695                 cfs_down(&fsdb->fsdb_sem);
 696                 if (sptlrpc_rule_set_choose(&fsdb->fsdb_srpc_gen,
 697                                             LUSTRE_SP_MGC, LUSTRE_SP_MGS,
 698                                             req->rq_peer.nid,
 699                                             &flvr) == 0) {
 700                         /* by defualt allow any flavors */
 701                         flvr.sf_rpc = SPTLRPC_FLVR_ANY;
 702                 }
 703                 cfs_up(&fsdb->fsdb_sem);
 704
 705                 cfs_spin_lock(&exp->exp_lock);
 706
 707                 exp->exp_sp_peer = req->rq_sp_from;
 708                 exp->exp_flvr = flvr;
 709
 710                 if (exp->exp_flvr.sf_rpc != SPTLRPC_FLVR_ANY &&
 711                     exp->exp_flvr.sf_rpc != req->rq_flvr.sf_rpc) {
 712                         CERROR("invalid rpc flavor %x, expect %x, from %s\n",
 713                                req->rq_flvr.sf_rpc, exp->exp_flvr.sf_rpc,
 714                                libcfs_nid2str(req->rq_peer.nid));
 715                         rc = -EACCES;
 716                 }
 717
 718                 cfs_spin_unlock(&exp->exp_lock);
 719         } else {
 720                 if (exp->exp_sp_peer != req->rq_sp_from) {
 721                         CERROR("RPC source %s doesn't match %s\n",
 722                                sptlrpc_part2name(req->rq_sp_from),
 723                                sptlrpc_part2name(exp->exp_sp_peer));
 724                         rc = -EACCES;
 725                 } else {
 726                         rc = sptlrpc_target_export_check(exp, req);
 727                 }
 728         }
 729
 730         return rc;
 731 }
 732
 733 /* Called whenever a target cleans up. */
 734 /* XXX - Currently unused */
 735 static int mgs_handle_target_del(struct ptlrpc_request *req)
 736 {
 737         ENTRY;
 738         mgs_counter_incr(req->rq_export, LPROC_MGS_TARGET_DEL);
 739         RETURN(0);
 740 }
 741
 742 /* XXX - Currently unused */
 743 static int mgs_handle_exception(struct ptlrpc_request *req)
 744 {
 745         ENTRY;
 746         mgs_counter_incr(req->rq_export, LPROC_MGS_EXCEPTION);
 747         RETURN(0);
 748 }
 749
 750 static int mgs_handle_fslog_hack(struct ptlrpc_request *req)
 751 {
 752         char *logname;
 753         char fsname[16];
 754         char *ptr;
 755         int rc;
 756
 757         /* XXX: We suppose that llog at mgs is only used for
 758          * fetching file system log */
 759         logname = req_capsule_client_get(&req->rq_pill, &RMF_NAME);
 760         if (logname == NULL) {
 761                 CERROR("No logname, is llog on MGS used for something else?\n");
 762                 return -EINVAL;
 763         }
 764
 765         ptr = strchr(logname, '-');
 766         rc = (int)(ptr - logname);
 767         if (ptr == NULL || rc >= sizeof(fsname)) {
 768                 CERROR("Invalid logname received: %s\n", logname);
 769                 return -EINVAL;
 770         }
 771
 772         strncpy(fsname, logname, rc);
 773         fsname[rc] = 0;
 774         rc = mgs_fsc_attach(req->rq_export, fsname);
 775         if (rc < 0 && rc != -EEXIST)
 776                 CERROR("add fs client %s returns %d\n", fsname, rc);
 777
 778         return rc;
 779 }
 780
 781 /* TODO: handle requests in a similar way as MDT: see mdt_handle_common() */
 782 int mgs_handle(struct ptlrpc_request *req)
 783 {
 784         int fail = OBD_FAIL_MGS_ALL_REPLY_NET;
 785         int opc, rc = 0;
 786         ENTRY;
 787
 788         req_capsule_init(&req->rq_pill, req, RCL_SERVER);
 789         CFS_FAIL_TIMEOUT_MS(OBD_FAIL_MGS_PAUSE_REQ, cfs_fail_val);
 790         if (CFS_FAIL_CHECK(OBD_FAIL_MGS_ALL_REQUEST_NET))
 791                 RETURN(0);
 792
 793         LASSERT(current->journal_info == NULL);
 794         opc = lustre_msg_get_opc(req->rq_reqmsg);
 795
 796         if (opc == SEC_CTX_INIT ||
 797             opc == SEC_CTX_INIT_CONT ||
 798             opc == SEC_CTX_FINI)
 799                 GOTO(out, rc = 0);
 800
 801         if (opc != MGS_CONNECT) {
 802                 if (!class_connected_export(req->rq_export)) {
 803                         CERROR("lustre_mgs: operation %d on unconnected MGS\n",
 804                                opc);
 805                         req->rq_status = -ENOTCONN;
 806                         GOTO(out, rc = -ENOTCONN);
 807                 }
 808         }
 809
 810         switch (opc) {
 811         case MGS_CONNECT:
 812                 DEBUG_REQ(D_MGS, req, "connect");
 813                 /* MGS and MDS have same request format for connect */
 814                 req_capsule_set(&req->rq_pill, &RQF_MDS_CONNECT);
 815                 rc = target_handle_connect(req);
 816                 if (rc == 0)
 817                         rc = mgs_connect_check_sptlrpc(req);
 818
 819                 if (!rc && (lustre_msg_get_conn_cnt(req->rq_reqmsg) > 1))
 820                         /* Make clients trying to reconnect after a MGS restart
 821                            happy; also requires obd_replayable */
 822                         lustre_msg_add_op_flags(req->rq_repmsg,
 823                                                 MSG_CONNECT_RECONNECT);
 824                 break;
 825         case MGS_DISCONNECT:
 826                 DEBUG_REQ(D_MGS, req, "disconnect");
 827                 /* MGS and MDS have same request format for disconnect */
 828                 req_capsule_set(&req->rq_pill, &RQF_MDS_DISCONNECT);
 829                 rc = target_handle_disconnect(req);
 830                 req->rq_status = rc;            /* superfluous? */
 831                 break;
 832         case MGS_EXCEPTION:
 833                 DEBUG_REQ(D_MGS, req, "exception");
 834                 rc = mgs_handle_exception(req);
 835                 break;
 836         case MGS_TARGET_REG:
 837                 DEBUG_REQ(D_MGS, req, "target add");
 838                 req_capsule_set(&req->rq_pill, &RQF_MGS_TARGET_REG);
 839                 rc = mgs_handle_target_reg(req);
 840                 break;
 841         case MGS_TARGET_DEL:
 842                 DEBUG_REQ(D_MGS, req, "target del");
 843                 rc = mgs_handle_target_del(req);
 844                 break;
 845         case MGS_SET_INFO:
 846                 DEBUG_REQ(D_MGS, req, "set_info");
 847                 req_capsule_set(&req->rq_pill, &RQF_MGS_SET_INFO);
 848                 rc = mgs_set_info_rpc(req);
 849                 break;
 850         case MGS_CONFIG_READ:
 851                 DEBUG_REQ(D_MGS, req, "read config");
 852                 req_capsule_set(&req->rq_pill, &RQF_MGS_CONFIG_READ);
 853                 rc = mgs_config_read(req);
 854                 break;
 855         case LDLM_ENQUEUE:
 856                 DEBUG_REQ(D_MGS, req, "enqueue");
 857                 req_capsule_set(&req->rq_pill, &RQF_LDLM_ENQUEUE);
 858                 rc = ldlm_handle_enqueue(req, ldlm_server_completion_ast,
 859                                          ldlm_server_blocking_ast, NULL);
 860                 break;
 861         case LDLM_BL_CALLBACK:
 862         case LDLM_CP_CALLBACK:
 863                 DEBUG_REQ(D_MGS, req, "callback");
 864                 CERROR("callbacks should not happen on MGS\n");
 865                 LBUG();
 866                 break;
 867
 868         case OBD_PING:
 869                 DEBUG_REQ(D_INFO, req, "ping");
 870                 req_capsule_set(&req->rq_pill, &RQF_OBD_PING);
 871                 rc = target_handle_ping(req);
 872                 break;
 873         case OBD_LOG_CANCEL:
 874                 DEBUG_REQ(D_MGS, req, "log cancel");
 875                 rc = -ENOTSUPP; /* la la la */
 876                 break;
 877
 878         case LLOG_ORIGIN_HANDLE_CREATE:
 879                 DEBUG_REQ(D_MGS, req, "llog_init");
 880                 req_capsule_set(&req->rq_pill, &RQF_LLOG_ORIGIN_HANDLE_CREATE);
 881                 rc = llog_origin_handle_create(req);
 882                 if (rc == 0)
 883                         (void)mgs_handle_fslog_hack(req);
 884                 break;
 885         case LLOG_ORIGIN_HANDLE_NEXT_BLOCK:
 886                 DEBUG_REQ(D_MGS, req, "llog next block");
 887                 req_capsule_set(&req->rq_pill,
 888                                 &RQF_LLOG_ORIGIN_HANDLE_NEXT_BLOCK);
 889                 rc = llog_origin_handle_next_block(req);
 890                 break;
 891         case LLOG_ORIGIN_HANDLE_READ_HEADER:
 892                 DEBUG_REQ(D_MGS, req, "llog read header");
 893                 req_capsule_set(&req->rq_pill,
 894                                 &RQF_LLOG_ORIGIN_HANDLE_READ_HEADER);
 895                 rc = llog_origin_handle_read_header(req);
 896                 break;
 897         case LLOG_ORIGIN_HANDLE_CLOSE:
 898                 DEBUG_REQ(D_MGS, req, "llog close");
 899                 rc = llog_origin_handle_close(req);
 900                 break;
 901         case LLOG_CATINFO:
 902                 DEBUG_REQ(D_MGS, req, "llog catinfo");
 903                 req_capsule_set(&req->rq_pill, &RQF_LLOG_CATINFO);
 904                 rc = llog_catinfo(req);
 905                 break;
 906         default:
 907                 req->rq_status = -ENOTSUPP;
 908                 rc = ptlrpc_error(req);
 909                 RETURN(rc);
 910         }
 911
 912         LASSERT(current->journal_info == NULL);
 913
 914         if (rc)
 915                 CERROR("MGS handle cmd=%d rc=%d\n", opc, rc);
 916
 917 out:
 918         target_send_reply(req, rc, fail);
 919         RETURN(0);
 920 }
 921
 922 static inline int mgs_init_export(struct obd_export *exp)
 923 {
 924         struct mgs_export_data *data = &exp->u.eu_mgs_data;
 925
 926         /* init mgs_export_data for fsc */
 927         cfs_spin_lock_init(&data->med_lock);
 928         CFS_INIT_LIST_HEAD(&data->med_clients);
 929
 930         cfs_spin_lock(&exp->exp_lock);
 931         exp->exp_connecting = 1;
 932         cfs_spin_unlock(&exp->exp_lock);
 933
 934         return ldlm_init_export(exp);
 935 }
 936
 937 static inline int mgs_destroy_export(struct obd_export *exp)
 938 {
 939         ENTRY;
 940
 941         target_destroy_export(exp);
 942         mgs_client_free(exp);
 943         ldlm_destroy_export(exp);
 944
 945         RETURN(0);
 946 }
 947
 948 static int mgs_extract_fs_pool(char * arg, char *fsname, char *poolname)
 949 {
 950         char *ptr;
 951
 952         ENTRY;
 953         for (ptr = arg;  (*ptr != '\0') && (*ptr != '.'); ptr++ ) {
 954                 *fsname = *ptr;
 955                 fsname++;
 956         }
 957         if (*ptr == '\0')
 958                 return -EINVAL;
 959         *fsname = '\0';
 960         ptr++;
 961         strcpy(poolname, ptr);
 962
 963         RETURN(0);
 964 }
 965
 966 static int mgs_iocontrol_pool(struct obd_device *obd,
 967                               struct obd_ioctl_data *data)
 968 {
 969         int rc;
 970         struct lustre_cfg *lcfg = NULL;
 971         struct llog_rec_hdr rec;
 972         char *fsname = NULL;
 973         char *poolname = NULL;
 974         ENTRY;
 975
 976         OBD_ALLOC(fsname, MTI_NAME_MAXLEN);
 977         if (fsname == NULL)
 978                 RETURN(-ENOMEM);
 979
 980         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
 981         if (poolname == NULL) {
 982                 rc = -ENOMEM;
 983                 GOTO(out_pool, rc);
 984         }
 985         rec.lrh_len = llog_data_len(data->ioc_plen1);
 986
 987         if (data->ioc_type == LUSTRE_CFG_TYPE) {
 988                 rec.lrh_type = OBD_CFG_REC;
 989         } else {
 990                 CERROR("unknown cfg record type:%d \n", data->ioc_type);
 991                 rc = -EINVAL;
 992                 GOTO(out_pool, rc);
 993         }
 994
 995         if (data->ioc_plen1 > CFS_PAGE_SIZE) {
 996                 rc = -E2BIG;
 997                 GOTO(out_pool, rc);
 998         }
 999
1000         OBD_ALLOC(lcfg, data->ioc_plen1);
1001         if (lcfg == NULL)
1002                 GOTO(out_pool, rc = -ENOMEM);
1003
1004         if (cfs_copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
1005                 GOTO(out_pool, rc = -EFAULT);
1006
1007         if (lcfg->lcfg_bufcount < 2) {
1008                 GOTO(out_pool, rc = -EFAULT);
1009         }
1010
1011         /* first arg is always <fsname>.<poolname> */
1012         mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), fsname,
1013                             poolname);
1014
1015         switch (lcfg->lcfg_command) {
1016         case LCFG_POOL_NEW: {
1017                 if (lcfg->lcfg_bufcount != 2)
1018                         RETURN(-EINVAL);
1019                 rc = mgs_pool_cmd(obd, LCFG_POOL_NEW, fsname,
1020                                   poolname, NULL);
1021                 break;
1022         }
1023         case LCFG_POOL_ADD: {
1024                 if (lcfg->lcfg_bufcount != 3)
1025                         RETURN(-EINVAL);
1026                 rc = mgs_pool_cmd(obd, LCFG_POOL_ADD, fsname, poolname,
1027                                   lustre_cfg_string(lcfg, 2));
1028                 break;
1029         }
1030         case LCFG_POOL_REM: {
1031                 if (lcfg->lcfg_bufcount != 3)
1032                         RETURN(-EINVAL);
1033                 rc = mgs_pool_cmd(obd, LCFG_POOL_REM, fsname, poolname,
1034                                   lustre_cfg_string(lcfg, 2));
1035                 break;
1036         }
1037         case LCFG_POOL_DEL: {
1038                 if (lcfg->lcfg_bufcount != 2)
1039                         RETURN(-EINVAL);
1040                 rc = mgs_pool_cmd(obd, LCFG_POOL_DEL, fsname,
1041                                   poolname, NULL);
1042                 break;
1043         }
1044         default: {
1045                  rc = -EINVAL;
1046                  GOTO(out_pool, rc);
1047         }
1048         }
1049
1050         if (rc) {
1051                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
1052                        rc, lcfg->lcfg_command, fsname, poolname);
1053                 GOTO(out_pool, rc);
1054         }
1055
1056 out_pool:
1057         if (lcfg != NULL)
1058                 OBD_FREE(lcfg, data->ioc_plen1);
1059
1060         if (fsname != NULL)
1061                 OBD_FREE(fsname, MTI_NAME_MAXLEN);
1062
1063         if (poolname != NULL)
1064                 OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
1065
1066         RETURN(rc);
1067 }
1068
1069 /* from mdt_iocontrol */
1070 int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1071                   void *karg, void *uarg)
1072 {
1073         struct obd_device *obd = exp->exp_obd;
1074         struct obd_ioctl_data *data = karg;
1075         struct lvfs_run_ctxt saved;
1076         int rc = 0;
1077
1078         ENTRY;
1079         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
1080
1081         switch (cmd) {
1082
1083         case OBD_IOC_PARAM: {
1084                 struct lustre_cfg *lcfg;
1085                 struct llog_rec_hdr rec;
1086                 char fsname[MTI_NAME_MAXLEN];
1087
1088                 rec.lrh_len = llog_data_len(data->ioc_plen1);
1089
1090                 if (data->ioc_type == LUSTRE_CFG_TYPE) {
1091                         rec.lrh_type = OBD_CFG_REC;
1092                 } else {
1093                         CERROR("unknown cfg record type:%d \n", data->ioc_type);
1094                         RETURN(-EINVAL);
1095                 }
1096
1097                 OBD_ALLOC(lcfg, data->ioc_plen1);
1098                 if (lcfg == NULL)
1099                         RETURN(-ENOMEM);
1100                 if (cfs_copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
1101                         GOTO(out_free, rc = -EFAULT);
1102
1103                 if (lcfg->lcfg_bufcount < 1)
1104                         GOTO(out_free, rc = -EINVAL);
1105
1106                 rc = mgs_setparam(obd, lcfg, fsname);
1107                 if (rc) {
1108                         CERROR("setparam err %d\n", rc);
1109                         GOTO(out_free, rc);
1110                 }
1111 out_free:
1112                 OBD_FREE(lcfg, data->ioc_plen1);
1113                 RETURN(rc);
1114         }
1115
1116         case OBD_IOC_POOL: {
1117                 RETURN(mgs_iocontrol_pool(obd, data));
1118         }
1119
1120         case OBD_IOC_DUMP_LOG: {
1121                 struct llog_ctxt *ctxt;
1122                 ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
1123                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1124                 rc = class_config_dump_llog(ctxt, data->ioc_inlbuf1, NULL);
1125                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1126                 llog_ctxt_put(ctxt);
1127
1128                 RETURN(rc);
1129         }
1130
1131         case OBD_IOC_LLOG_CHECK:
1132         case OBD_IOC_LLOG_INFO:
1133         case OBD_IOC_LLOG_PRINT: {
1134                 struct llog_ctxt *ctxt;
1135                 ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
1136
1137                 push_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
1138                 rc = llog_ioctl(ctxt, cmd, data);
1139                 pop_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
1140                 llog_ctxt_put(ctxt);
1141
1142                 RETURN(rc);
1143         }
1144
1145         default:
1146                 CDEBUG(D_INFO, "unknown command %x\n", cmd);
1147                 RETURN(-EINVAL);
1148         }
1149         RETURN(0);
1150 }
1151
1152 /* use obd ops to offer management infrastructure */
1153 static struct obd_ops mgs_obd_ops = {
1154         .o_owner           = THIS_MODULE,
1155         .o_connect         = mgs_connect,
1156         .o_reconnect       = mgs_reconnect,
1157         .o_disconnect      = mgs_disconnect,
1158         .o_setup           = mgs_setup,
1159         .o_precleanup      = mgs_precleanup,
1160         .o_cleanup         = mgs_cleanup,
1161         .o_init_export     = mgs_init_export,
1162         .o_destroy_export  = mgs_destroy_export,
1163         .o_iocontrol       = mgs_iocontrol,
1164         .o_llog_init       = mgs_llog_init,
1165         .o_llog_finish     = mgs_llog_finish
1166 };
1167
1168 static int __init mgs_init(void)
1169 {
1170         struct lprocfs_static_vars lvars;
1171
1172         lprocfs_mgs_init_vars(&lvars);
1173         class_register_type(&mgs_obd_ops, NULL,
1174                             lvars.module_vars, LUSTRE_MGS_NAME, NULL);
1175
1176         return 0;
1177 }
1178
1179 static void /*__exit*/ mgs_exit(void)
1180 {
1181         class_unregister_type(LUSTRE_MGS_NAME);
1182 }
1183
1184 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
1185 MODULE_DESCRIPTION("Lustre  Management Server (MGS)");
1186 MODULE_LICENSE("GPL");
1187
1188 module_init(mgs_init);
1189 module_exit(mgs_exit);