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