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