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  2008 Sun Microsystems, Inc. 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
  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_client_add(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(0);
 123 }
 124
 125 static int mgs_disconnect(struct obd_export *exp)
 126 {
 127         int rc;
 128         ENTRY;
 129
 130         LASSERT(exp);
 131
 132         class_export_get(exp);
 133         mgs_counter_incr(exp, LPROC_MGS_DISCONNECT);
 134
 135         rc = server_disconnect_export(exp);
 136
 137         class_export_put(exp);
 138         RETURN(rc);
 139 }
 140
 141 static int mgs_cleanup(struct obd_device *obd);
 142 static int mgs_handle(struct ptlrpc_request *req);
 143
 144 static int mgs_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
 145                          struct obd_device *tgt, int *index)
 146 {
 147         int rc;
 148         ENTRY;
 149
 150         LASSERT(olg == &obd->obd_olg);
 151         rc = llog_setup(obd, olg, LLOG_CONFIG_ORIG_CTXT, obd, 0, NULL,
 152                         &llog_lvfs_ops);
 153         RETURN(rc);
 154 }
 155
 156 static int mgs_llog_finish(struct obd_device *obd, int count)
 157 {
 158         struct llog_ctxt *ctxt;
 159         int rc = 0;
 160         ENTRY;
 161
 162         ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
 163         if (ctxt)
 164                 rc = llog_cleanup(ctxt);
 165
 166         RETURN(rc);
 167 }
 168
 169 /* Start the MGS obd */
 170 static int mgs_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 171 {
 172         struct lprocfs_static_vars lvars;
 173         struct mgs_obd *mgs = &obd->u.mgs;
 174         struct lustre_mount_info *lmi;
 175         struct lustre_sb_info *lsi;
 176         struct vfsmount *mnt;
 177         int rc = 0;
 178         ENTRY;
 179
 180         CDEBUG(D_CONFIG, "Starting MGS\n");
 181
 182         /* Find our disk */
 183         lmi = server_get_mount(obd->obd_name);
 184         if (!lmi)
 185                 RETURN(rc = -EINVAL);
 186
 187         mnt = lmi->lmi_mnt;
 188         lsi = s2lsi(lmi->lmi_sb);
 189         obd->obd_fsops = fsfilt_get_ops(MT_STR(lsi->lsi_ldd));
 190         if (IS_ERR(obd->obd_fsops))
 191                 GOTO(err_put, rc = PTR_ERR(obd->obd_fsops));
 192
 193         if (lvfs_check_rdonly(lvfs_sbdev(mnt->mnt_sb))) {
 194                 CERROR("%s: Underlying device is marked as read-only. "
 195                        "Setup failed\n", obd->obd_name);
 196                 GOTO(err_ops, rc = -EROFS);
 197         }
 198
 199         /* namespace for mgs llog */
 200         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS", LDLM_NAMESPACE_SERVER,
 201                                                 LDLM_NAMESPACE_MODEST);
 202         if (obd->obd_namespace == NULL)
 203                 GOTO(err_ops, rc = -ENOMEM);
 204
 205         /* ldlm setup */
 206         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
 207                            "mgs_ldlm_client", &obd->obd_ldlm_client);
 208
 209         rc = mgs_fs_setup(obd, mnt);
 210         if (rc) {
 211                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
 212                        obd->obd_name, rc);
 213                 GOTO(err_ns, rc);
 214         }
 215
 216         rc = obd_llog_init(obd, &obd->obd_olg, obd, NULL);
 217         if (rc)
 218                 GOTO(err_fs, rc);
 219
 220         /* No recovery for MGC's */
 221         obd->obd_replayable = 0;
 222
 223         /* Internal mgs setup */
 224         mgs_init_fsdb_list(obd);
 225         cfs_sema_init(&mgs->mgs_sem, 1);
 226
 227         /* Setup proc */
 228         lprocfs_mgs_init_vars(&lvars);
 229         if (lprocfs_obd_setup(obd, lvars.obd_vars) == 0) {
 230                 lproc_mgs_setup(obd);
 231                 rc = lprocfs_alloc_md_stats(obd, LPROC_MGS_LAST);
 232                 if (rc)
 233                         GOTO(err_llog, rc);
 234         }
 235
 236         /* Start the service threads */
 237         mgs->mgs_service =
 238                 ptlrpc_init_svc(MGS_NBUFS, MGS_BUFSIZE, MGS_MAXREQSIZE,
 239                                 MGS_MAXREPSIZE, MGS_REQUEST_PORTAL,
 240                                 MGC_REPLY_PORTAL, 2,
 241                                 mgs_handle, LUSTRE_MGS_NAME,
 242                                 obd->obd_proc_entry, target_print_req,
 243                                 MGS_THREADS_AUTO_MIN, MGS_THREADS_AUTO_MAX,
 244                                 "ll_mgs", LCT_MD_THREAD, NULL);
 245
 246         if (!mgs->mgs_service) {
 247                 CERROR("failed to start service\n");
 248                 GOTO(err_llog, rc = -ENOMEM);
 249         }
 250
 251         rc = ptlrpc_start_threads(obd, mgs->mgs_service);
 252         if (rc)
 253                 GOTO(err_thread, rc);
 254
 255         ping_evictor_start();
 256
 257         LCONSOLE_INFO("MGS %s started\n", obd->obd_name);
 258
 259         RETURN(0);
 260
 261 err_thread:
 262         ptlrpc_unregister_service(mgs->mgs_service);
 263 err_llog:
 264         lproc_mgs_cleanup(obd);
 265         obd_llog_finish(obd, 0);
 266 err_fs:
 267         /* No extra cleanup needed for llog_init_commit_thread() */
 268         mgs_fs_cleanup(obd);
 269 err_ns:
 270         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
 271         obd->obd_namespace = NULL;
 272 err_ops:
 273         fsfilt_put_ops(obd->obd_fsops);
 274 err_put:
 275         server_put_mount(obd->obd_name, mnt);
 276         mgs->mgs_sb = 0;
 277         return rc;
 278 }
 279
 280 static int mgs_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
 281 {
 282         int rc = 0;
 283         ENTRY;
 284
 285         switch (stage) {
 286         case OBD_CLEANUP_EARLY:
 287         case OBD_CLEANUP_EXPORTS:
 288                 rc = obd_llog_finish(obd, 0);
 289                 break;
 290         }
 291         RETURN(rc);
 292 }
 293
 294 /**
 295  * Performs cleanup procedures for passed \a obd given it is mgs obd.
 296  */
 297 static int mgs_cleanup(struct obd_device *obd)
 298 {
 299         struct mgs_obd *mgs = &obd->u.mgs;
 300         ENTRY;
 301
 302         if (mgs->mgs_sb == NULL)
 303                 RETURN(0);
 304
 305         ping_evictor_stop();
 306
 307         ptlrpc_unregister_service(mgs->mgs_service);
 308
 309         mgs_cleanup_fsdb_list(obd);
 310         lproc_mgs_cleanup(obd);
 311         mgs_fs_cleanup(obd);
 312
 313         server_put_mount(obd->obd_name, mgs->mgs_vfsmnt);
 314         mgs->mgs_sb = NULL;
 315
 316         ldlm_namespace_free(obd->obd_namespace, NULL, 1);
 317         obd->obd_namespace = NULL;
 318
 319         fsfilt_put_ops(obd->obd_fsops);
 320
 321         LCONSOLE_INFO("%s has stopped.\n", obd->obd_name);
 322         RETURN(0);
 323 }
 324
 325 /* similar to filter_prepare_destroy */
 326 static int mgs_get_cfg_lock(struct obd_device *obd, char *fsname,
 327                             struct lustre_handle *lockh)
 328 {
 329         struct ldlm_res_id res_id;
 330         int rc, flags = 0;
 331         ENTRY;
 332
 333         rc = mgc_fsname2resid(fsname, &res_id);
 334         if (!rc)
 335                 rc = ldlm_cli_enqueue_local(obd->obd_namespace, &res_id,
 336                                             LDLM_PLAIN, NULL, LCK_EX,
 337                                             &flags, ldlm_blocking_ast,
 338                                             ldlm_completion_ast, NULL,
 339                                             fsname, 0, NULL, lockh);
 340         if (rc)
 341                 CERROR("can't take cfg lock for %s (%d)\n", fsname, rc);
 342
 343         RETURN(rc);
 344 }
 345
 346 static int mgs_put_cfg_lock(struct lustre_handle *lockh)
 347 {
 348         ENTRY;
 349         ldlm_lock_decref(lockh, LCK_EX);
 350         RETURN(0);
 351 }
 352
 353 void mgs_revoke_lock(struct obd_device *obd, struct fs_db *fsdb)
 354 {
 355         struct lustre_handle lockh;
 356         int                  lockrc;
 357
 358         LASSERT(fsdb->fsdb_name[0] != '\0');
 359
 360         if (cfs_test_and_set_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags) == 0) {
 361                 lockrc = mgs_get_cfg_lock(obd, fsdb->fsdb_name, &lockh);
 362                 /* clear the bit before lock put */
 363                 cfs_clear_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags);
 364
 365                 if (lockrc != ELDLM_OK)
 366                         CERROR("lock error %d for fs %s\n",
 367                                lockrc, fsdb->fsdb_name);
 368                 else
 369                         mgs_put_cfg_lock(&lockh);
 370         }
 371 }
 372
 373 /* rc=0 means ok
 374       1 means update
 375      <0 means error */
 376 static int mgs_check_target(struct obd_device *obd, struct mgs_target_info *mti)
 377 {
 378         int rc;
 379         ENTRY;
 380
 381         rc = mgs_check_index(obd, mti);
 382         if (rc == 0) {
 383                 LCONSOLE_ERROR_MSG(0x13b, "%s claims to have registered, but "
 384                                    "this MGS does not know about it, preventing "
 385                                    "registration.\n", mti->mti_svname);
 386                 rc = -ENOENT;
 387         } else if (rc == -1) {
 388                 LCONSOLE_ERROR_MSG(0x13c, "Client log %s-client has "
 389                                    "disappeared! Regenerating all logs.\n",
 390                                    mti->mti_fsname);
 391                 mti->mti_flags |= LDD_F_WRITECONF;
 392                 rc = 1;
 393         } else {
 394                 /* Index is correctly marked as used */
 395
 396                 /* If the logs don't contain the mti_nids then add
 397                    them as failover nids */
 398                 rc = mgs_check_failnid(obd, mti);
 399         }
 400
 401         RETURN(rc);
 402 }
 403
 404 /* Called whenever a target starts up.  Flags indicate first connect, etc. */
 405 static int mgs_handle_target_reg(struct ptlrpc_request *req)
 406 {
 407         struct obd_device *obd = req->rq_export->exp_obd;
 408         struct mgs_target_info *mti, *rep_mti;
 409         struct fs_db *fsdb;
 410         int rc = 0;
 411         ENTRY;
 412
 413         mgs_counter_incr(req->rq_export, LPROC_MGS_TARGET_REG);
 414
 415         mti = req_capsule_client_get(&req->rq_pill, &RMF_MGS_TARGET_INFO);
 416         if (!(mti->mti_flags & (LDD_F_WRITECONF | LDD_F_UPGRADE14 |
 417                                 LDD_F_UPDATE))) {
 418                 /* We're just here as a startup ping. */
 419                 CDEBUG(D_MGS, "Server %s is running on %s\n",
 420                        mti->mti_svname, obd_export_nid2str(req->rq_export));
 421                 rc = mgs_check_target(obd, mti);
 422                 /* above will set appropriate mti flags */
 423                 if (rc <= 0)
 424                         /* Nothing wrong, or fatal error */
 425                         GOTO(out_nolock, rc);
 426         }
 427
 428         OBD_FAIL_TIMEOUT(OBD_FAIL_MGS_PAUSE_TARGET_REG, 10);
 429
 430         if (mti->mti_flags & LDD_F_WRITECONF) {
 431                 if (mti->mti_flags & LDD_F_SV_TYPE_MDT &&
 432                     mti->mti_stripe_index == 0) {
 433                         rc = mgs_erase_logs(obd, mti->mti_fsname);
 434                         LCONSOLE_WARN("%s: Logs for fs %s were removed by user "
 435                                       "request.  All servers must be restarted "
 436                                       "in order to regenerate the logs."
 437                                       "\n", obd->obd_name, mti->mti_fsname);
 438                 } else if (mti->mti_flags &
 439                            (LDD_F_SV_TYPE_OST | LDD_F_SV_TYPE_MDT)) {
 440                         rc = mgs_erase_log(obd, mti->mti_svname);
 441                         LCONSOLE_WARN("%s: Regenerating %s log by user "
 442                                       "request.\n",
 443                                       obd->obd_name, mti->mti_svname);
 444                 }
 445                 mti->mti_flags |= LDD_F_UPDATE;
 446                 /* Erased logs means start from scratch. */
 447                 mti->mti_flags &= ~LDD_F_UPGRADE14;
 448         }
 449
 450         rc = mgs_find_or_make_fsdb(obd, mti->mti_fsname, &fsdb);
 451         if (rc) {
 452                 CERROR("Can't get db for %s: %d\n", mti->mti_fsname, rc);
 453                 GOTO(out_nolock, rc);
 454         }
 455
 456         /*
 457          * Log writing contention is handled by the fsdb_sem.
 458          *
 459          * It should be alright if someone was reading while we were
 460          * updating the logs - if we revoke at the end they will just update
 461          * from where they left off.
 462          */
 463
 464         /* COMPAT_146 */
 465         if (mti->mti_flags & LDD_F_UPGRADE14) {
 466                 rc = mgs_upgrade_sv_14(obd, mti, fsdb);
 467                 if (rc) {
 468                         CERROR("Can't upgrade from 1.4 (%d)\n", rc);
 469                         GOTO(out, rc);
 470                 }
 471
 472                 /* We're good to go */
 473                 mti->mti_flags |= LDD_F_UPDATE;
 474         }
 475         /* end COMPAT_146 */
 476
 477         if (mti->mti_flags & LDD_F_UPDATE) {
 478                 CDEBUG(D_MGS, "updating %s, index=%d\n", mti->mti_svname,
 479                        mti->mti_stripe_index);
 480
 481                 /* create or update the target log
 482                    and update the client/mdt logs */
 483                 rc = mgs_write_log_target(obd, mti, fsdb);
 484                 if (rc) {
 485                         CERROR("Failed to write %s log (%d)\n",
 486                                mti->mti_svname, rc);
 487                         GOTO(out, rc);
 488                 }
 489
 490                 mti->mti_flags &= ~(LDD_F_VIRGIN | LDD_F_UPDATE |
 491                                     LDD_F_NEED_INDEX | LDD_F_WRITECONF |
 492                                     LDD_F_UPGRADE14);
 493                 mti->mti_flags |= LDD_F_REWRITE_LDD;
 494         }
 495
 496 out:
 497         mgs_revoke_lock(obd, fsdb);
 498
 499 out_nolock:
 500         CDEBUG(D_MGS, "replying with %s, index=%d, rc=%d\n", mti->mti_svname,
 501                mti->mti_stripe_index, rc);
 502         rc = req_capsule_server_pack(&req->rq_pill);
 503         if (rc)
 504                 RETURN(rc);
 505
 506         /* send back the whole mti in the reply */
 507         rep_mti = req_capsule_server_get(&req->rq_pill, &RMF_MGS_TARGET_INFO);
 508         *rep_mti = *mti;
 509
 510         /* Flush logs to disk */
 511         fsfilt_sync(obd, obd->u.mgs.mgs_sb);
 512         RETURN(rc);
 513 }
 514
 515 static int mgs_set_info_rpc(struct ptlrpc_request *req)
 516 {
 517         struct obd_device *obd = req->rq_export->exp_obd;
 518         struct mgs_send_param *msp, *rep_msp;
 519         int rc;
 520         struct lustre_cfg_bufs bufs;
 521         struct lustre_cfg *lcfg;
 522         char fsname[MTI_NAME_MAXLEN];
 523         ENTRY;
 524
 525         msp = req_capsule_client_get(&req->rq_pill, &RMF_MGS_SEND_PARAM);
 526         LASSERT(msp);
 527
 528         /* Construct lustre_cfg structure to pass to function mgs_setparam */
 529         lustre_cfg_bufs_reset(&bufs, NULL);
 530         lustre_cfg_bufs_set_string(&bufs, 1, msp->mgs_param);
 531         lcfg = lustre_cfg_new(LCFG_PARAM, &bufs);
 532         rc = mgs_setparam(obd, lcfg, fsname);
 533         if (rc) {
 534                 CERROR("Error %d in setting the parameter %s for fs %s\n",
 535                        rc, msp->mgs_param, fsname);
 536                 RETURN(rc);
 537         }
 538
 539         lustre_cfg_free(lcfg);
 540
 541         rc = req_capsule_server_pack(&req->rq_pill);
 542         if (rc == 0) {
 543                 rep_msp = req_capsule_server_get(&req->rq_pill, &RMF_MGS_SEND_PARAM);
 544                 rep_msp = msp;
 545         }
 546         RETURN(rc);
 547 }
 548
 549 /*
 550  * similar as in ost_connect_check_sptlrpc()
 551  */
 552 static int mgs_connect_check_sptlrpc(struct ptlrpc_request *req)
 553 {
 554         struct obd_export     *exp = req->rq_export;
 555         struct obd_device     *obd = exp->exp_obd;
 556         struct fs_db          *fsdb;
 557         struct sptlrpc_flavor  flvr;
 558         int                    rc = 0;
 559
 560         if (exp->exp_flvr.sf_rpc == SPTLRPC_FLVR_INVALID) {
 561                 rc = mgs_find_or_make_fsdb(obd, MGSSELF_NAME, &fsdb);
 562                 if (rc)
 563                         return rc;
 564
 565                 cfs_down(&fsdb->fsdb_sem);
 566                 if (sptlrpc_rule_set_choose(&fsdb->fsdb_srpc_gen,
 567                                             LUSTRE_SP_MGC, LUSTRE_SP_MGS,
 568                                             req->rq_peer.nid,
 569                                             &flvr) == 0) {
 570                         /* by defualt allow any flavors */
 571                         flvr.sf_rpc = SPTLRPC_FLVR_ANY;
 572                 }
 573                 cfs_up(&fsdb->fsdb_sem);
 574
 575                 cfs_spin_lock(&exp->exp_lock);
 576
 577                 exp->exp_sp_peer = req->rq_sp_from;
 578                 exp->exp_flvr = flvr;
 579
 580                 if (exp->exp_flvr.sf_rpc != SPTLRPC_FLVR_ANY &&
 581                     exp->exp_flvr.sf_rpc != req->rq_flvr.sf_rpc) {
 582                         CERROR("invalid rpc flavor %x, expect %x, from %s\n",
 583                                req->rq_flvr.sf_rpc, exp->exp_flvr.sf_rpc,
 584                                libcfs_nid2str(req->rq_peer.nid));
 585                         rc = -EACCES;
 586                 }
 587
 588                 cfs_spin_unlock(&exp->exp_lock);
 589         } else {
 590                 if (exp->exp_sp_peer != req->rq_sp_from) {
 591                         CERROR("RPC source %s doesn't match %s\n",
 592                                sptlrpc_part2name(req->rq_sp_from),
 593                                sptlrpc_part2name(exp->exp_sp_peer));
 594                         rc = -EACCES;
 595                 } else {
 596                         rc = sptlrpc_target_export_check(exp, req);
 597                 }
 598         }
 599
 600         return rc;
 601 }
 602
 603 /* Called whenever a target cleans up. */
 604 /* XXX - Currently unused */
 605 static int mgs_handle_target_del(struct ptlrpc_request *req)
 606 {
 607         ENTRY;
 608         mgs_counter_incr(req->rq_export, LPROC_MGS_TARGET_DEL);
 609         RETURN(0);
 610 }
 611
 612 /* XXX - Currently unused */
 613 static int mgs_handle_exception(struct ptlrpc_request *req)
 614 {
 615         ENTRY;
 616         mgs_counter_incr(req->rq_export, LPROC_MGS_EXCEPTION);
 617         RETURN(0);
 618 }
 619
 620 /* TODO: handle requests in a similar way as MDT: see mdt_handle_common() */
 621 int mgs_handle(struct ptlrpc_request *req)
 622 {
 623         int fail = OBD_FAIL_MGS_ALL_REPLY_NET;
 624         int opc, rc = 0;
 625         ENTRY;
 626
 627         req_capsule_init(&req->rq_pill, req, RCL_SERVER);
 628         OBD_FAIL_TIMEOUT_MS(OBD_FAIL_MGS_PAUSE_REQ, obd_fail_val);
 629         if (OBD_FAIL_CHECK(OBD_FAIL_MGS_ALL_REQUEST_NET))
 630                 RETURN(0);
 631
 632         LASSERT(current->journal_info == NULL);
 633         opc = lustre_msg_get_opc(req->rq_reqmsg);
 634
 635         if (opc == SEC_CTX_INIT ||
 636             opc == SEC_CTX_INIT_CONT ||
 637             opc == SEC_CTX_FINI)
 638                 GOTO(out, rc = 0);
 639
 640         if (opc != MGS_CONNECT) {
 641                 if (!class_connected_export(req->rq_export)) {
 642                         CERROR("lustre_mgs: operation %d on unconnected MGS\n",
 643                                opc);
 644                         req->rq_status = -ENOTCONN;
 645                         GOTO(out, rc = -ENOTCONN);
 646                 }
 647         }
 648
 649         switch (opc) {
 650         case MGS_CONNECT:
 651                 DEBUG_REQ(D_MGS, req, "connect");
 652                 /* MGS and MDS have same request format for connect */
 653                 req_capsule_set(&req->rq_pill, &RQF_MDS_CONNECT);
 654                 rc = target_handle_connect(req);
 655                 if (rc == 0)
 656                         rc = mgs_connect_check_sptlrpc(req);
 657
 658                 if (!rc && (lustre_msg_get_conn_cnt(req->rq_reqmsg) > 1))
 659                         /* Make clients trying to reconnect after a MGS restart
 660                            happy; also requires obd_replayable */
 661                         lustre_msg_add_op_flags(req->rq_repmsg,
 662                                                 MSG_CONNECT_RECONNECT);
 663                 break;
 664         case MGS_DISCONNECT:
 665                 DEBUG_REQ(D_MGS, req, "disconnect");
 666                 /* MGS and MDS have same request format for disconnect */
 667                 req_capsule_set(&req->rq_pill, &RQF_MDS_DISCONNECT);
 668                 rc = target_handle_disconnect(req);
 669                 req->rq_status = rc;            /* superfluous? */
 670                 break;
 671         case MGS_EXCEPTION:
 672                 DEBUG_REQ(D_MGS, req, "exception");
 673                 rc = mgs_handle_exception(req);
 674                 break;
 675         case MGS_TARGET_REG:
 676                 DEBUG_REQ(D_MGS, req, "target add");
 677                 req_capsule_set(&req->rq_pill, &RQF_MGS_TARGET_REG);
 678                 rc = mgs_handle_target_reg(req);
 679                 break;
 680         case MGS_TARGET_DEL:
 681                 DEBUG_REQ(D_MGS, req, "target del");
 682                 rc = mgs_handle_target_del(req);
 683                 break;
 684         case MGS_SET_INFO:
 685                 DEBUG_REQ(D_MGS, req, "set_info");
 686                 req_capsule_set(&req->rq_pill, &RQF_MGS_SET_INFO);
 687                 rc = mgs_set_info_rpc(req);
 688                 break;
 689
 690         case LDLM_ENQUEUE:
 691                 DEBUG_REQ(D_MGS, req, "enqueue");
 692                 req_capsule_set(&req->rq_pill, &RQF_LDLM_ENQUEUE);
 693                 rc = ldlm_handle_enqueue(req, ldlm_server_completion_ast,
 694                                          ldlm_server_blocking_ast, NULL);
 695                 break;
 696         case LDLM_BL_CALLBACK:
 697         case LDLM_CP_CALLBACK:
 698                 DEBUG_REQ(D_MGS, req, "callback");
 699                 CERROR("callbacks should not happen on MGS\n");
 700                 LBUG();
 701                 break;
 702
 703         case OBD_PING:
 704                 DEBUG_REQ(D_INFO, req, "ping");
 705                 req_capsule_set(&req->rq_pill, &RQF_OBD_PING);
 706                 rc = target_handle_ping(req);
 707                 break;
 708         case OBD_LOG_CANCEL:
 709                 DEBUG_REQ(D_MGS, req, "log cancel");
 710                 rc = -ENOTSUPP; /* la la la */
 711                 break;
 712
 713         case LLOG_ORIGIN_HANDLE_CREATE:
 714                 DEBUG_REQ(D_MGS, req, "llog_init");
 715                 req_capsule_set(&req->rq_pill, &RQF_LLOG_ORIGIN_HANDLE_CREATE);
 716                 rc = llog_origin_handle_create(req);
 717                 break;
 718         case LLOG_ORIGIN_HANDLE_NEXT_BLOCK:
 719                 DEBUG_REQ(D_MGS, req, "llog next block");
 720                 req_capsule_set(&req->rq_pill,
 721                                 &RQF_LLOG_ORIGIN_HANDLE_NEXT_BLOCK);
 722                 rc = llog_origin_handle_next_block(req);
 723                 break;
 724         case LLOG_ORIGIN_HANDLE_READ_HEADER:
 725                 DEBUG_REQ(D_MGS, req, "llog read header");
 726                 req_capsule_set(&req->rq_pill,
 727                                 &RQF_LLOG_ORIGIN_HANDLE_READ_HEADER);
 728                 rc = llog_origin_handle_read_header(req);
 729                 break;
 730         case LLOG_ORIGIN_HANDLE_CLOSE:
 731                 DEBUG_REQ(D_MGS, req, "llog close");
 732                 rc = llog_origin_handle_close(req);
 733                 break;
 734         case LLOG_CATINFO:
 735                 DEBUG_REQ(D_MGS, req, "llog catinfo");
 736                 req_capsule_set(&req->rq_pill, &RQF_LLOG_CATINFO);
 737                 rc = llog_catinfo(req);
 738                 break;
 739         default:
 740                 req->rq_status = -ENOTSUPP;
 741                 rc = ptlrpc_error(req);
 742                 RETURN(rc);
 743         }
 744
 745         LASSERT(current->journal_info == NULL);
 746
 747         if (rc)
 748                 CERROR("MGS handle cmd=%d rc=%d\n", opc, rc);
 749
 750 out:
 751         target_send_reply(req, rc, fail);
 752         RETURN(0);
 753 }
 754
 755 static inline int mgs_init_export(struct obd_export *exp)
 756 {
 757         cfs_spin_lock(&exp->exp_lock);
 758         exp->exp_connecting = 1;
 759         cfs_spin_unlock(&exp->exp_lock);
 760
 761         return ldlm_init_export(exp);
 762 }
 763
 764 static inline int mgs_destroy_export(struct obd_export *exp)
 765 {
 766         ENTRY;
 767
 768         target_destroy_export(exp);
 769         mgs_client_free(exp);
 770         ldlm_destroy_export(exp);
 771
 772         RETURN(0);
 773 }
 774
 775 static int mgs_extract_fs_pool(char * arg, char *fsname, char *poolname)
 776 {
 777         char *ptr;
 778
 779         ENTRY;
 780         for (ptr = arg;  (*ptr != '\0') && (*ptr != '.'); ptr++ ) {
 781                 *fsname = *ptr;
 782                 fsname++;
 783         }
 784         if (*ptr == '\0')
 785                 return -EINVAL;
 786         *fsname = '\0';
 787         ptr++;
 788         strcpy(poolname, ptr);
 789
 790         RETURN(0);
 791 }
 792
 793 static int mgs_iocontrol_pool(struct obd_device *obd,
 794                               struct obd_ioctl_data *data)
 795 {
 796         int rc;
 797         struct lustre_cfg *lcfg = NULL;
 798         struct llog_rec_hdr rec;
 799         char *fsname = NULL;
 800         char *poolname = NULL;
 801         ENTRY;
 802
 803         OBD_ALLOC(fsname, MTI_NAME_MAXLEN);
 804         if (fsname == NULL)
 805                 RETURN(-ENOMEM);
 806
 807         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
 808         if (poolname == NULL) {
 809                 rc = -ENOMEM;
 810                 GOTO(out_pool, rc);
 811         }
 812         rec.lrh_len = llog_data_len(data->ioc_plen1);
 813
 814         if (data->ioc_type == LUSTRE_CFG_TYPE) {
 815                 rec.lrh_type = OBD_CFG_REC;
 816         } else {
 817                 CERROR("unknown cfg record type:%d \n", data->ioc_type);
 818                 rc = -EINVAL;
 819                 GOTO(out_pool, rc);
 820         }
 821
 822         if (data->ioc_plen1 > CFS_PAGE_SIZE) {
 823                 rc = -E2BIG;
 824                 GOTO(out_pool, rc);
 825         }
 826
 827         OBD_ALLOC(lcfg, data->ioc_plen1);
 828         if (lcfg == NULL)
 829                 GOTO(out_pool, rc = -ENOMEM);
 830
 831         if (cfs_copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
 832                 GOTO(out_pool, rc = -EFAULT);
 833
 834         if (lcfg->lcfg_bufcount < 2) {
 835                 GOTO(out_pool, rc = -EFAULT);
 836         }
 837
 838         /* first arg is always <fsname>.<poolname> */
 839         mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), fsname,
 840                             poolname);
 841
 842         switch (lcfg->lcfg_command) {
 843         case LCFG_POOL_NEW: {
 844                 if (lcfg->lcfg_bufcount != 2)
 845                         RETURN(-EINVAL);
 846                 rc = mgs_pool_cmd(obd, LCFG_POOL_NEW, fsname,
 847                                   poolname, NULL);
 848                 break;
 849         }
 850         case LCFG_POOL_ADD: {
 851                 if (lcfg->lcfg_bufcount != 3)
 852                         RETURN(-EINVAL);
 853                 rc = mgs_pool_cmd(obd, LCFG_POOL_ADD, fsname, poolname,
 854                                   lustre_cfg_string(lcfg, 2));
 855                 break;
 856         }
 857         case LCFG_POOL_REM: {
 858                 if (lcfg->lcfg_bufcount != 3)
 859                         RETURN(-EINVAL);
 860                 rc = mgs_pool_cmd(obd, LCFG_POOL_REM, fsname, poolname,
 861                                   lustre_cfg_string(lcfg, 2));
 862                 break;
 863         }
 864         case LCFG_POOL_DEL: {
 865                 if (lcfg->lcfg_bufcount != 2)
 866                         RETURN(-EINVAL);
 867                 rc = mgs_pool_cmd(obd, LCFG_POOL_DEL, fsname,
 868                                   poolname, NULL);
 869                 break;
 870         }
 871         default: {
 872                  rc = -EINVAL;
 873                  GOTO(out_pool, rc);
 874         }
 875         }
 876
 877         if (rc) {
 878                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
 879                        rc, lcfg->lcfg_command, fsname, poolname);
 880                 GOTO(out_pool, rc);
 881         }
 882
 883 out_pool:
 884         if (lcfg != NULL)
 885                 OBD_FREE(lcfg, data->ioc_plen1);
 886
 887         if (fsname != NULL)
 888                 OBD_FREE(fsname, MTI_NAME_MAXLEN);
 889
 890         if (poolname != NULL)
 891                 OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
 892
 893         RETURN(rc);
 894 }
 895
 896 /* from mdt_iocontrol */
 897 int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
 898                   void *karg, void *uarg)
 899 {
 900         struct obd_device *obd = exp->exp_obd;
 901         struct obd_ioctl_data *data = karg;
 902         struct lvfs_run_ctxt saved;
 903         int rc = 0;
 904
 905         ENTRY;
 906         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
 907
 908         switch (cmd) {
 909
 910         case OBD_IOC_PARAM: {
 911                 struct lustre_cfg *lcfg;
 912                 struct llog_rec_hdr rec;
 913                 char fsname[MTI_NAME_MAXLEN];
 914
 915                 rec.lrh_len = llog_data_len(data->ioc_plen1);
 916
 917                 if (data->ioc_type == LUSTRE_CFG_TYPE) {
 918                         rec.lrh_type = OBD_CFG_REC;
 919                 } else {
 920                         CERROR("unknown cfg record type:%d \n", data->ioc_type);
 921                         RETURN(-EINVAL);
 922                 }
 923
 924                 OBD_ALLOC(lcfg, data->ioc_plen1);
 925                 if (lcfg == NULL)
 926                         RETURN(-ENOMEM);
 927                 if (cfs_copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
 928                         GOTO(out_free, rc = -EFAULT);
 929
 930                 if (lcfg->lcfg_bufcount < 1)
 931                         GOTO(out_free, rc = -EINVAL);
 932
 933                 rc = mgs_setparam(obd, lcfg, fsname);
 934                 if (rc) {
 935                         CERROR("setparam err %d\n", rc);
 936                         GOTO(out_free, rc);
 937                 }
 938 out_free:
 939                 OBD_FREE(lcfg, data->ioc_plen1);
 940                 RETURN(rc);
 941         }
 942
 943         case OBD_IOC_POOL: {
 944                 RETURN(mgs_iocontrol_pool(obd, data));
 945         }
 946
 947         case OBD_IOC_DUMP_LOG: {
 948                 struct llog_ctxt *ctxt;
 949                 ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
 950                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 951                 rc = class_config_dump_llog(ctxt, data->ioc_inlbuf1, NULL);
 952                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 953                 llog_ctxt_put(ctxt);
 954
 955                 RETURN(rc);
 956         }
 957
 958         case OBD_IOC_LLOG_CHECK:
 959         case OBD_IOC_LLOG_INFO:
 960         case OBD_IOC_LLOG_PRINT: {
 961                 struct llog_ctxt *ctxt;
 962                 ctxt = llog_get_context(obd, LLOG_CONFIG_ORIG_CTXT);
 963
 964                 push_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
 965                 rc = llog_ioctl(ctxt, cmd, data);
 966                 pop_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
 967                 llog_ctxt_put(ctxt);
 968
 969                 RETURN(rc);
 970         }
 971
 972         default:
 973                 CDEBUG(D_INFO, "unknown command %x\n", cmd);
 974                 RETURN(-EINVAL);
 975         }
 976         RETURN(0);
 977 }
 978
 979 /* use obd ops to offer management infrastructure */
 980 static struct obd_ops mgs_obd_ops = {
 981         .o_owner           = THIS_MODULE,
 982         .o_connect         = mgs_connect,
 983         .o_reconnect       = mgs_reconnect,
 984         .o_disconnect      = mgs_disconnect,
 985         .o_setup           = mgs_setup,
 986         .o_precleanup      = mgs_precleanup,
 987         .o_cleanup         = mgs_cleanup,
 988         .o_init_export     = mgs_init_export,
 989         .o_destroy_export  = mgs_destroy_export,
 990         .o_iocontrol       = mgs_iocontrol,
 991         .o_llog_init       = mgs_llog_init,
 992         .o_llog_finish     = mgs_llog_finish
 993 };
 994
 995 static int __init mgs_init(void)
 996 {
 997         struct lprocfs_static_vars lvars;
 998
 999         lprocfs_mgs_init_vars(&lvars);
1000         class_register_type(&mgs_obd_ops, NULL,
1001                             lvars.module_vars, LUSTRE_MGS_NAME, NULL);
1002
1003         return 0;
1004 }
1005
1006 static void /*__exit*/ mgs_exit(void)
1007 {
1008         class_unregister_type(LUSTRE_MGS_NAME);
1009 }
1010
1011 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
1012 MODULE_DESCRIPTION("Lustre  Management Server (MGS)");
1013 MODULE_LICENSE("GPL");
1014
1015 module_init(mgs_init);
1016 module_exit(mgs_exit);