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