Whamcloud - gitweb
LU-8066 ldlm: move all remaining files from procfs to debugfs
[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.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2010, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  * Lustre is a trademark of Sun Microsystems, Inc.
31  *
32  * lustre/mgs/mgs_handler.c
33  *
34  * Author: Nathan Rutman <nathan@clusterfs.com>
35  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
36  * Author: Mikhail Pershin <tappro@whamcloud.com>
37  */
38
39 #define DEBUG_SUBSYSTEM S_MGS
40 #define D_MGS D_CONFIG
41
42 #include <obd_class.h>
43 #include <lprocfs_status.h>
44 #include <uapi/linux/lustre/lustre_ioctl.h>
45 #include <uapi/linux/lustre/lustre_param.h>
46 #include <uapi/linux/lustre/lustre_barrier_user.h>
47
48 #include "mgs_internal.h"
49
50 /*
51  * Regular MGS handlers
52  */
53 static int mgs_connect(struct tgt_session_info *tsi)
54 {
55         struct ptlrpc_request   *req = tgt_ses_req(tsi);
56         int                      rc;
57
58         ENTRY;
59
60         CFS_FAIL_TIMEOUT(OBD_FAIL_MGS_CONNECT_NET, cfs_fail_val);
61         rc = tgt_connect(tsi);
62         if (rc)
63                 RETURN(rc);
64
65         if (lustre_msg_get_conn_cnt(req->rq_reqmsg) > 1)
66                 lustre_msg_add_op_flags(req->rq_repmsg, MSG_CONNECT_RECONNECT);
67
68         RETURN(0);
69 }
70
71 static int mgs_disconnect(struct tgt_session_info *tsi)
72 {
73         int rc;
74
75         ENTRY;
76
77         LASSERT(tsi->tsi_exp);
78
79         rc = tgt_disconnect(tsi);
80         if (rc)
81                 RETURN(err_serious(rc));
82         RETURN(0);
83 }
84
85 static int mgs_exception(struct tgt_session_info *tsi)
86 {
87         ENTRY;
88
89         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_EXCEPTION);
90
91         RETURN(0);
92 }
93
94 static inline bool str_starts_with(const char *str, const char *prefix)
95 {
96         return strncmp(str, prefix, strlen(prefix)) == 0;
97 }
98
99 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 13, 53, 0)
100 static int mgs_set_info(struct tgt_session_info *tsi)
101 {
102         struct mgs_thread_info  *mgi;
103         struct mgs_send_param   *msp, *rep_msp;
104         struct lustre_cfg       *lcfg;
105         size_t                   param_len;
106         char                    *s;
107         int                      rc;
108
109         ENTRY;
110
111         mgi = mgs_env_info(tsi->tsi_env);
112         if (IS_ERR(mgi))
113                 RETURN(err_serious(PTR_ERR(mgi)));
114
115         msp = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_SEND_PARAM);
116         if (msp == NULL)
117                 RETURN(err_serious(-EFAULT));
118
119         param_len = strnlen(msp->mgs_param, sizeof(msp->mgs_param));
120         if (param_len == 0 || param_len == sizeof(msp->mgs_param))
121                 RETURN(-EINVAL);
122
123         /* We only allow '*.lov.stripe{size,count,offset}=*' from an RPC. */
124         s = strchr(msp->mgs_param, '.');
125         if (s == NULL)
126                 RETURN(-EINVAL);
127
128         if (!str_starts_with(s + 1, "lov.stripesize=") &&
129             !str_starts_with(s + 1, "lov.stripecount=") &&
130             !str_starts_with(s + 1, "lov.stripeoffset="))
131                 RETURN(-EINVAL);
132
133         /* Construct lustre_cfg structure to pass to function mgs_set_param */
134         lustre_cfg_bufs_reset(&mgi->mgi_bufs, NULL);
135         lustre_cfg_bufs_set_string(&mgi->mgi_bufs, 1, msp->mgs_param);
136         OBD_ALLOC(lcfg, lustre_cfg_len(mgi->mgi_bufs.lcfg_bufcount,
137                                        mgi->mgi_bufs.lcfg_buflen));
138         if (!lcfg)
139                 RETURN(-ENOMEM);
140         lustre_cfg_init(lcfg, LCFG_PARAM, &mgi->mgi_bufs);
141
142         rc = mgs_set_param(tsi->tsi_env, exp2mgs_dev(tsi->tsi_exp), lcfg);
143         if (rc) {
144                 LCONSOLE_WARN("%s: Unable to set parameter %s: %d\n",
145                               tgt_name(tsi->tsi_tgt), msp->mgs_param, rc);
146                 GOTO(out_cfg, rc);
147         }
148
149         /* send back the whole msp in the reply */
150         rep_msp = req_capsule_server_get(tsi->tsi_pill, &RMF_MGS_SEND_PARAM);
151         *rep_msp = *msp;
152         EXIT;
153 out_cfg:
154         OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount, lcfg->lcfg_buflens));
155         return rc;
156 }
157 #endif
158
159 enum ast_type {
160         AST_CONFIG      = 1,
161         AST_PARAMS      = 2,
162         AST_IR          = 3,
163         AST_BARRIER     = 4,
164 };
165
166 static int mgs_completion_ast_generic(struct ldlm_lock *lock, __u64 flags,
167                                      void *cbdata, enum ast_type type)
168 {
169         ENTRY;
170
171         if (!(flags & LDLM_FL_BLOCKED_MASK)) {
172                 struct fs_db *fsdb;
173
174                 /* l_ast_data is used as a marker to avoid cancel ldlm lock
175                  * twice. See LU-2317. */
176                 lock_res_and_lock(lock);
177                 fsdb = (struct fs_db *)lock->l_ast_data;
178                 lock->l_ast_data = NULL;
179                 unlock_res_and_lock(lock);
180
181                 if (fsdb != NULL) {
182                         struct lustre_handle lockh;
183
184                         switch(type) {
185                                 case AST_CONFIG:
186                                         /* clear the bit before lock put */
187                                         clear_bit(FSDB_REVOKING_LOCK,
188                                                   &fsdb->fsdb_flags);
189                                         break;
190                                 case AST_PARAMS:
191                                         clear_bit(FSDB_REVOKING_PARAMS,
192                                                   &fsdb->fsdb_flags);
193                                         break;
194                                 case AST_IR:
195                                         mgs_ir_notify_complete(fsdb);
196                                         break;
197                                 case AST_BARRIER:
198                                         break;
199                                 default:
200                                         LBUG();
201                         }
202
203                         ldlm_lock2handle(lock, &lockh);
204                         ldlm_lock_decref_and_cancel(&lockh, LCK_EX);
205                 }
206         }
207
208         RETURN(ldlm_completion_ast(lock, flags, cbdata));
209 }
210
211 static int mgs_completion_ast_config(struct ldlm_lock *lock, __u64 flags,
212                                      void *cbdata)
213 {
214         return mgs_completion_ast_generic(lock, flags, cbdata, AST_CONFIG);
215 }
216
217 static int mgs_completion_ast_params(struct ldlm_lock *lock, __u64 flags,
218                                      void *cbdata)
219 {
220         return mgs_completion_ast_generic(lock, flags, cbdata, AST_PARAMS);
221 }
222
223 static int mgs_completion_ast_ir(struct ldlm_lock *lock, __u64 flags,
224                                  void *cbdata)
225 {
226         return mgs_completion_ast_generic(lock, flags, cbdata, AST_IR);
227 }
228
229 static int mgs_completion_ast_barrier(struct ldlm_lock *lock, __u64 flags,
230                                       void *cbdata)
231 {
232         return mgs_completion_ast_generic(lock, flags, cbdata, AST_BARRIER);
233 }
234
235 void mgs_revoke_lock(struct mgs_device *mgs, struct fs_db *fsdb, int type)
236 {
237         ldlm_completion_callback cp = NULL;
238         struct lustre_handle     lockh = {
239                 .cookie = 0,
240         };
241         struct ldlm_res_id       res_id;
242         __u64 flags = LDLM_FL_ATOMIC_CB;
243         int rc;
244         ENTRY;
245
246         LASSERT(fsdb->fsdb_name[0] != '\0');
247         rc = mgc_fsname2resid(fsdb->fsdb_name, &res_id, type);
248         LASSERT(rc == 0);
249         switch (type) {
250         case CONFIG_T_CONFIG:
251         case CONFIG_T_NODEMAP:
252                 cp = mgs_completion_ast_config;
253                 if (test_and_set_bit(FSDB_REVOKING_LOCK, &fsdb->fsdb_flags))
254                         rc = -EALREADY;
255                 break;
256         case CONFIG_T_PARAMS:
257                 cp = mgs_completion_ast_params;
258                 if (test_and_set_bit(FSDB_REVOKING_PARAMS, &fsdb->fsdb_flags))
259                         rc = -EALREADY;
260                 break;
261         case CONFIG_T_RECOVER:
262                 cp = mgs_completion_ast_ir;
263                 break;
264         case CONFIG_T_BARRIER:
265                 cp = mgs_completion_ast_barrier;
266                 break;
267         default:
268                 break;
269         }
270
271         if (!rc) {
272                 LASSERT(cp != NULL);
273                 rc = ldlm_cli_enqueue_local(mgs->mgs_obd->obd_namespace,
274                                             &res_id, LDLM_PLAIN, NULL, LCK_EX,
275                                             &flags, ldlm_blocking_ast, cp,
276                                             NULL, fsdb, 0, LVB_T_NONE, NULL,
277                                             &lockh);
278                 if (rc != ELDLM_OK) {
279                         CERROR("%s: can't take cfg lock for %#llx/%#llx : rc = %d\n",
280                                mgs->mgs_obd->obd_name,
281                                le64_to_cpu(res_id.name[0]),
282                                le64_to_cpu(res_id.name[1]), rc);
283
284                         if (type == CONFIG_T_CONFIG)
285                                 clear_bit(FSDB_REVOKING_LOCK,
286                                           &fsdb->fsdb_flags);
287
288                         if (type == CONFIG_T_PARAMS)
289                                 clear_bit(FSDB_REVOKING_PARAMS,
290                                           &fsdb->fsdb_flags);
291                 }
292                 /* lock has been cancelled in completion_ast. */
293         }
294
295         RETURN_EXIT;
296 }
297
298 /* rc=0 means ok
299       1 means update
300      <0 means error */
301 static int mgs_check_target(const struct lu_env *env,
302                             struct mgs_device *mgs,
303                             struct mgs_target_info *mti)
304 {
305         int rc;
306         ENTRY;
307
308         rc = mgs_check_index(env, mgs, mti);
309         if (rc == 0) {
310                 LCONSOLE_ERROR_MSG(0x13b, "%s claims to have registered, but "
311                                    "this MGS does not know about it, preventing "
312                                    "registration.\n", mti->mti_svname);
313                 rc = -ENOENT;
314         } else if (rc == -1) {
315                 LCONSOLE_ERROR_MSG(0x13c, "Client log %s-client has "
316                                    "disappeared! Regenerating all logs.\n",
317                                    mti->mti_fsname);
318                 mti->mti_flags |= LDD_F_WRITECONF;
319                 rc = 1;
320         } else {
321                 /* Index is correctly marked as used */
322                 rc = 0;
323         }
324
325         RETURN(rc);
326 }
327
328 /* Ensure this is not a failover node that is connecting first*/
329 static int mgs_check_failover_reg(struct mgs_target_info *mti)
330 {
331         lnet_nid_t nid;
332         char *ptr;
333         int i;
334
335         ptr = mti->mti_params;
336         while (class_find_param(ptr, PARAM_FAILNODE, &ptr) == 0) {
337                 while (class_parse_nid_quiet(ptr, &nid, &ptr) == 0) {
338                         for (i = 0; i < mti->mti_nid_count; i++) {
339                                 if (nid == mti->mti_nids[i]) {
340                                         LCONSOLE_WARN("Denying initial registra"
341                                                       "tion attempt from nid %s"
342                                                       ", specified as failover"
343                                                       "\n",libcfs_nid2str(nid));
344                                         return -EADDRNOTAVAIL;
345                                 }
346                         }
347                 }
348         }
349         return 0;
350 }
351
352 /* Called whenever a target starts up.  Flags indicate first connect, etc. */
353 static int mgs_target_reg(struct tgt_session_info *tsi)
354 {
355         struct obd_device *obd = tsi->tsi_exp->exp_obd;
356         struct mgs_device *mgs = exp2mgs_dev(tsi->tsi_exp);
357         struct mgs_target_info *mti, *rep_mti;
358         struct fs_db *b_fsdb = NULL; /* barrier fsdb */
359         struct fs_db *c_fsdb = NULL; /* config fsdb */
360         char barrier_name[20];
361         int opc;
362         int rc = 0;
363
364         ENTRY;
365
366         rc = lu_env_refill((struct lu_env *)tsi->tsi_env);
367         if (rc)
368                 return err_serious(rc);
369
370         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_TARGET_REG);
371
372         mti = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_TARGET_INFO);
373         if (mti == NULL) {
374                 DEBUG_REQ(D_HA, tgt_ses_req(tsi), "no mgs_send_param");
375                 RETURN(err_serious(-EFAULT));
376         }
377
378         down_read(&mgs->mgs_barrier_rwsem);
379
380         if (OCD_HAS_FLAG(&tgt_ses_req(tsi)->rq_export->exp_connect_data,
381                          IMP_RECOV))
382                 opc = mti->mti_flags & LDD_F_OPC_MASK;
383         else
384                 opc = LDD_F_OPC_REG;
385
386         if (opc == LDD_F_OPC_READY) {
387                 CDEBUG(D_MGS, "fs: %s index: %d is ready to reconnect.\n",
388                         mti->mti_fsname, mti->mti_stripe_index);
389                 rc = mgs_ir_update(tsi->tsi_env, mgs, mti);
390                 if (rc) {
391                         LASSERT(!(mti->mti_flags & LDD_F_IR_CAPABLE));
392                         CERROR("%s: Update IR return failure: rc = %d\n",
393                                mti->mti_fsname, rc);
394                 }
395
396                 GOTO(out_norevoke, rc);
397         }
398
399         /* Do not support unregistering right now. */
400         if (opc != LDD_F_OPC_REG)
401                 GOTO(out_norevoke, rc = -EINVAL);
402
403         snprintf(barrier_name, sizeof(barrier_name) - 1, "%s-%s",
404                  mti->mti_fsname, BARRIER_FILENAME);
405         rc = mgs_find_or_make_fsdb(tsi->tsi_env, mgs, barrier_name, &b_fsdb);
406         if (rc) {
407                 CERROR("%s: Can't get db for %s: rc = %d\n",
408                        mti->mti_fsname, barrier_name, rc);
409
410                 GOTO(out_norevoke, rc);
411         }
412
413         CDEBUG(D_MGS, "fs: %s index: %d is registered to MGS.\n",
414                mti->mti_fsname, mti->mti_stripe_index);
415
416         if (mti->mti_flags & LDD_F_SV_TYPE_MDT) {
417                 if (b_fsdb->fsdb_barrier_status == BS_FREEZING_P1 ||
418                     b_fsdb->fsdb_barrier_status == BS_FREEZING_P2 ||
419                     b_fsdb->fsdb_barrier_status == BS_FROZEN) {
420                         LCONSOLE_WARN("%s: the system is in barrier, refuse "
421                                       "the connection from MDT %s temporary\n",
422                                       obd->obd_name, mti->mti_svname);
423
424                         GOTO(out_norevoke, rc = -EBUSY);
425                 }
426
427                 if (!(exp_connect_flags(tsi->tsi_exp) & OBD_CONNECT_BARRIER) &&
428                     !b_fsdb->fsdb_barrier_disabled) {
429                         LCONSOLE_WARN("%s: the MDT %s does not support write "
430                                       "barrier, so disable barrier on the "
431                                       "whole system.\n",
432                                       obd->obd_name, mti->mti_svname);
433
434                         b_fsdb->fsdb_barrier_disabled = 1;
435                 }
436         }
437
438         if (mti->mti_flags & LDD_F_NEED_INDEX)
439                 mti->mti_flags |= LDD_F_WRITECONF;
440
441         if (!(mti->mti_flags & (LDD_F_WRITECONF | LDD_F_UPGRADE14 |
442                                 LDD_F_UPDATE))) {
443                 /* We're just here as a startup ping. */
444                 CDEBUG(D_MGS, "Server %s is running on %s\n",
445                        mti->mti_svname, obd_export_nid2str(tsi->tsi_exp));
446                 rc = mgs_check_target(tsi->tsi_env, mgs, mti);
447                 /* above will set appropriate mti flags */
448                 if (rc <= 0)
449                         /* Nothing wrong, or fatal error */
450                         GOTO(out_norevoke, rc);
451         } else if (!(mti->mti_flags & LDD_F_NO_PRIMNODE)) {
452                 rc = mgs_check_failover_reg(mti);
453                 if (rc)
454                         GOTO(out_norevoke, rc);
455         }
456
457         OBD_FAIL_TIMEOUT(OBD_FAIL_MGS_PAUSE_TARGET_REG, 10);
458
459         if (mti->mti_flags & LDD_F_WRITECONF) {
460                 if (mti->mti_flags & LDD_F_SV_TYPE_MDT &&
461                     mti->mti_stripe_index == 0) {
462                         mgs_put_fsdb(mgs, b_fsdb);
463                         b_fsdb = NULL;
464                         rc = mgs_erase_logs(tsi->tsi_env, mgs,
465                                             mti->mti_fsname);
466                         LCONSOLE_WARN("%s: Logs for fs %s were removed by user "
467                                       "request.  All servers must be restarted "
468                                       "in order to regenerate the logs: rc = %d"
469                                       "\n", obd->obd_name, mti->mti_fsname, rc);
470                         if (rc && rc != -ENOENT)
471                                 GOTO(out_norevoke, rc);
472
473                         rc = mgs_find_or_make_fsdb(tsi->tsi_env, mgs,
474                                                    barrier_name, &b_fsdb);
475                         if (rc) {
476                                 CERROR("Can't get db for %s: %d\n",
477                                        barrier_name, rc);
478
479                                 GOTO(out_norevoke, rc);
480                         }
481
482                         if (!(exp_connect_flags(tsi->tsi_exp) &
483                               OBD_CONNECT_BARRIER)) {
484                                 LCONSOLE_WARN("%s: the MDT %s does not support "
485                                               "write barrier, disable barrier "
486                                               "on the whole system.\n",
487                                               obd->obd_name, mti->mti_svname);
488
489                                 b_fsdb->fsdb_barrier_disabled = 1;
490                         }
491                 } else if (mti->mti_flags &
492                            (LDD_F_SV_TYPE_OST | LDD_F_SV_TYPE_MDT)) {
493                         rc = mgs_erase_log(tsi->tsi_env, mgs, mti->mti_svname);
494                         LCONSOLE_WARN("%s: Regenerating %s log by user "
495                                       "request: rc = %d\n",
496                                       obd->obd_name, mti->mti_svname, rc);
497                         if (rc)
498                                 GOTO(out_norevoke, rc);
499                 }
500
501                 mti->mti_flags |= LDD_F_UPDATE;
502                 /* Erased logs means start from scratch. */
503                 mti->mti_flags &= ~LDD_F_UPGRADE14;
504         }
505
506         rc = mgs_find_or_make_fsdb(tsi->tsi_env, mgs, mti->mti_fsname, &c_fsdb);
507         if (rc) {
508                 CERROR("Can't get db for %s: %d\n", mti->mti_fsname, rc);
509
510                 GOTO(out_norevoke, rc);
511         }
512
513         /*
514          * Log writing contention is handled by the fsdb_mutex.
515          *
516          * It should be alright if someone was reading while we were
517          * updating the logs - if we revoke at the end they will just update
518          * from where they left off.
519          */
520
521         if (mti->mti_flags & LDD_F_UPGRADE14) {
522                 CERROR("Can't upgrade from 1.4 (%d)\n", rc);
523                 GOTO(out, rc);
524         }
525
526         if (mti->mti_flags & LDD_F_UPDATE) {
527                 CDEBUG(D_MGS, "updating %s, index=%d\n", mti->mti_svname,
528                        mti->mti_stripe_index);
529
530                 /* create or update the target log
531                    and update the client/mdt logs */
532                 rc = mgs_write_log_target(tsi->tsi_env, mgs, mti, c_fsdb);
533                 if (rc) {
534                         CERROR("Failed to write %s log (%d)\n",
535                                mti->mti_svname, rc);
536                         GOTO(out, rc);
537                 }
538
539                 mti->mti_flags &= ~(LDD_F_VIRGIN | LDD_F_UPDATE |
540                                     LDD_F_NEED_INDEX | LDD_F_WRITECONF |
541                                     LDD_F_UPGRADE14);
542                 mti->mti_flags |= LDD_F_REWRITE_LDD;
543         }
544
545 out:
546         mgs_revoke_lock(mgs, c_fsdb, CONFIG_T_CONFIG);
547
548 out_norevoke:
549         if (!rc && mti->mti_flags & LDD_F_SV_TYPE_MDT && b_fsdb) {
550                 if (!c_fsdb) {
551                         rc = mgs_find_or_make_fsdb(tsi->tsi_env, mgs,
552                                                    mti->mti_fsname, &c_fsdb);
553                         if (rc)
554                                 CERROR("Fail to get db for %s: %d\n",
555                                        mti->mti_fsname, rc);
556                 }
557
558                 if (c_fsdb) {
559                         memcpy(b_fsdb->fsdb_mdt_index_map,
560                                c_fsdb->fsdb_mdt_index_map, INDEX_MAP_SIZE);
561                         b_fsdb->fsdb_mdt_count = c_fsdb->fsdb_mdt_count;
562                 }
563         }
564
565         up_read(&mgs->mgs_barrier_rwsem);
566
567         CDEBUG(D_MGS, "replying with %s, index=%d, rc=%d\n", mti->mti_svname,
568                mti->mti_stripe_index, rc);
569          /* An error flag is set in the mti reply rather than an error code */
570         if (rc)
571                 mti->mti_flags |= LDD_F_ERROR;
572
573         /* send back the whole mti in the reply */
574         rep_mti = req_capsule_server_get(tsi->tsi_pill, &RMF_MGS_TARGET_INFO);
575         *rep_mti = *mti;
576
577         /* Flush logs to disk */
578         dt_sync(tsi->tsi_env, mgs->mgs_bottom);
579         if (b_fsdb)
580                 mgs_put_fsdb(mgs, b_fsdb);
581         if (c_fsdb)
582                 mgs_put_fsdb(mgs, c_fsdb);
583         RETURN(rc);
584 }
585
586 /* Called whenever a target cleans up. */
587 static int mgs_target_del(struct tgt_session_info *tsi)
588 {
589         ENTRY;
590
591         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_TARGET_DEL);
592
593         RETURN(0);
594 }
595
596 static int mgs_config_read(struct tgt_session_info *tsi)
597 {
598         struct ptlrpc_request   *req = tgt_ses_req(tsi);
599         struct mgs_config_body  *body;
600         int                      rc;
601
602         ENTRY;
603
604         body = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_CONFIG_BODY);
605         if (body == NULL) {
606                 DEBUG_REQ(D_HA, req, "no mgs_config_body");
607                 RETURN(err_serious(-EFAULT));
608         }
609
610         switch (body->mcb_type) {
611         case CONFIG_T_RECOVER:
612                 rc = mgs_get_ir_logs(req);
613                 break;
614         case CONFIG_T_NODEMAP:
615                 rc = nodemap_get_config_req(req->rq_export->exp_obd, req);
616                 break;
617         case CONFIG_T_CONFIG:
618                 rc = -EOPNOTSUPP;
619                 break;
620         default:
621                 rc = -EINVAL;
622                 break;
623         }
624
625         RETURN(rc);
626 }
627
628 static int mgs_llog_open(struct tgt_session_info *tsi)
629 {
630         struct mgs_thread_info  *mgi;
631         struct ptlrpc_request   *req = tgt_ses_req(tsi);
632         char                    *logname;
633         int                      rc;
634
635         ENTRY;
636
637         rc = tgt_llog_open(tsi);
638         if (rc)
639                 RETURN(rc);
640
641         /*
642          * For old clients there is no direct way of knowing which file system
643          * a client is operating at the MGS side. But we need to pick up those
644          * clients so that the MGS can mark the corresponding file system as
645          * non-IR capable because old clients are not ready to be notified.
646          *
647          * Therefore we attempt to detect the file systems name by hacking the
648          * llog operation which is currently used by the clients to fetch
649          * configuration logs. At present this is fine because this is the
650          * ONLY llog operation between mgc and the MGS.
651          *
652          * If extra llog operation are going to be added, this function needs
653          * further work.
654          *
655          * When releases prior than 2.0 are not supported, the following code
656          * can be removed.
657          */
658         mgi = mgs_env_info(tsi->tsi_env);
659         if (IS_ERR(mgi))
660                 RETURN(PTR_ERR(mgi));
661
662         logname = req_capsule_client_get(tsi->tsi_pill, &RMF_NAME);
663         if (logname) {
664                 char *ptr = strrchr(logname, '-');
665                 int   len = (ptr != NULL) ? (int)(ptr - logname) : 0;
666
667                 if (ptr == NULL || len >= sizeof(mgi->mgi_fsname)) {
668                         if (strcmp(logname, PARAMS_FILENAME) != 0)
669                                 LCONSOLE_WARN("%s: non-config logname "
670                                               "received: %s\n",
671                                               tgt_name(tsi->tsi_tgt),
672                                               logname);
673                         /* not error, this can be llog test name */
674                 } else {
675                         strncpy(mgi->mgi_fsname, logname, len);
676                         mgi->mgi_fsname[len] = 0;
677
678                         rc = mgs_fsc_attach(tsi->tsi_env, tsi->tsi_exp,
679                                             mgi->mgi_fsname);
680                         if (rc && rc != -EEXIST) {
681                                 LCONSOLE_WARN("%s: Unable to add client %s "
682                                               "to file system %s: %d\n",
683                                               tgt_name(tsi->tsi_tgt),
684                                               libcfs_nid2str(req->rq_peer.nid),
685                                               mgi->mgi_fsname, rc);
686                         } else {
687                                 rc = 0;
688                         }
689                 }
690         } else {
691                 CERROR("%s: no logname in request\n", tgt_name(tsi->tsi_tgt));
692                 RETURN(-EINVAL);
693         }
694         RETURN(rc);
695 }
696
697 static inline int mgs_init_export(struct obd_export *exp)
698 {
699         struct mgs_export_data *data = &exp->u.eu_mgs_data;
700
701         /* init mgs_export_data for fsc */
702         spin_lock_init(&data->med_lock);
703         INIT_LIST_HEAD(&data->med_clients);
704
705         spin_lock(&exp->exp_lock);
706         exp->exp_connecting = 1;
707         spin_unlock(&exp->exp_lock);
708
709         /* self-export doesn't need client data and ldlm initialization */
710         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
711                                      &exp->exp_client_uuid)))
712                 return 0;
713         return ldlm_init_export(exp);
714 }
715
716 static inline int mgs_destroy_export(struct obd_export *exp)
717 {
718         ENTRY;
719
720         target_destroy_export(exp);
721         mgs_client_free(exp);
722
723         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
724                                      &exp->exp_client_uuid)))
725                 RETURN(0);
726
727         ldlm_destroy_export(exp);
728
729         RETURN(0);
730 }
731
732 static int mgs_extract_fs_pool(char *arg, char *fsname, char *poolname)
733 {
734         size_t len;
735         char *ptr;
736
737         ENTRY;
738         /* Validate name */
739         for (ptr = arg; *ptr != '\0'; ptr++) {
740                 if (!isalnum(*ptr) && *ptr != '_' && *ptr != '-' && *ptr != '.')
741                         return -EINVAL;
742         }
743
744         /* Test for fsname.poolname format.
745          * strlen() test if poolname is empty
746          */
747         ptr = strchr(arg, '.');
748         if (!ptr || !strlen(ptr))
749                 return -EINVAL;
750         ptr++;
751
752         /* Also make sure poolname is not to long. */
753         if (strlen(ptr) > LOV_MAXPOOLNAME)
754                 return -ENAMETOOLONG;
755         strncpy(poolname, ptr, strlen(ptr));
756
757         /* Test if fsname is empty */
758         len = strlen(arg) - strlen(ptr) - 1;
759         if (!len)
760                 return -EINVAL;
761
762         /* or too long */
763         if (len > LUSTRE_MAXFSNAME)
764                 return -ENAMETOOLONG;
765
766         strncpy(fsname, arg, len);
767
768         RETURN(0);
769 }
770
771 static int mgs_iocontrol_nodemap(const struct lu_env *env,
772                                  struct mgs_device *mgs,
773                                  struct obd_ioctl_data *data)
774 {
775         struct lustre_cfg       *lcfg = NULL;
776         struct fs_db            *fsdb;
777         lnet_nid_t              nid;
778         const char              *nodemap_name = NULL;
779         const char              *nidstr = NULL;
780         const char              *client_idstr = NULL;
781         const char              *idtype_str = NULL;
782         char                    *param = NULL;
783         char                    fs_idstr[16];
784         char                    name_buf[LUSTRE_NODEMAP_NAME_LENGTH + 1];
785         int                     rc = 0;
786         unsigned long           client_id;
787         __u32                   fs_id;
788         __u32                   cmd;
789         int                     idtype;
790
791         ENTRY;
792
793         if (data->ioc_type != LUSTRE_CFG_TYPE) {
794                 CERROR("%s: unknown cfg record type: %d\n",
795                        mgs->mgs_obd->obd_name, data->ioc_type);
796                 GOTO(out, rc = -EINVAL);
797         }
798
799         if (data->ioc_plen1 > PAGE_SIZE)
800                 GOTO(out, rc = -E2BIG);
801
802         OBD_ALLOC(lcfg, data->ioc_plen1);
803         if (lcfg == NULL)
804                 GOTO(out, rc = -ENOMEM);
805
806         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
807                 GOTO(out_lcfg, rc = -EFAULT);
808
809         cmd = lcfg->lcfg_command;
810
811         switch (cmd) {
812         case LCFG_NODEMAP_ACTIVATE:
813                 if (lcfg->lcfg_bufcount != 2)
814                         GOTO(out_lcfg, rc = -EINVAL);
815                 param = lustre_cfg_string(lcfg, 1);
816                 if (strcmp(param, "1") == 0)
817                                 nodemap_activate(1);
818                 else
819                                 nodemap_activate(0);
820                 break;
821         case LCFG_NODEMAP_ADD:
822         case LCFG_NODEMAP_DEL:
823                 if (lcfg->lcfg_bufcount != 2)
824                         GOTO(out_lcfg, rc = -EINVAL);
825                 nodemap_name = lustre_cfg_string(lcfg, 1);
826                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
827                 break;
828         case LCFG_NODEMAP_TEST_NID:
829                 if (lcfg->lcfg_bufcount != 2)
830                         GOTO(out_lcfg, rc = -EINVAL);
831                 nidstr = lustre_cfg_string(lcfg, 1);
832                 nid = libcfs_str2nid(nidstr);
833                 nodemap_test_nid(nid, name_buf, sizeof(name_buf));
834                 rc = copy_to_user(data->ioc_pbuf1, name_buf,
835                                   MIN(data->ioc_plen1, sizeof(name_buf)));
836                 if (rc != 0)
837                         GOTO(out_lcfg, rc = -EFAULT);
838                 break;
839         case LCFG_NODEMAP_TEST_ID:
840                 if (lcfg->lcfg_bufcount != 4)
841                         GOTO(out_lcfg, rc = -EINVAL);
842                 nidstr = lustre_cfg_string(lcfg, 1);
843                 idtype_str = lustre_cfg_string(lcfg, 2);
844                 client_idstr = lustre_cfg_string(lcfg, 3);
845
846                 nid = libcfs_str2nid(nidstr);
847                 if (strcmp(idtype_str, "uid") == 0)
848                         idtype = NODEMAP_UID;
849                 else
850                         idtype = NODEMAP_GID;
851
852                 rc = kstrtoul(client_idstr, 10, &client_id);
853                 if (rc != 0)
854                         GOTO(out_lcfg, rc = -EINVAL);
855
856                 rc = nodemap_test_id(nid, idtype, client_id, &fs_id);
857                 if (rc < 0)
858                         GOTO(out_lcfg, rc = -EINVAL);
859
860                 if (data->ioc_plen1 < sizeof(fs_idstr))
861                         GOTO(out_lcfg, rc = -EINVAL);
862
863                 snprintf(fs_idstr, sizeof(fs_idstr), "%u", fs_id);
864                 if (copy_to_user(data->ioc_pbuf1, fs_idstr,
865                                  sizeof(fs_idstr)) != 0)
866                         GOTO(out_lcfg, rc = -EINVAL);
867                 break;
868         case LCFG_NODEMAP_ADD_RANGE:
869         case LCFG_NODEMAP_DEL_RANGE:
870         case LCFG_NODEMAP_ADD_UIDMAP:
871         case LCFG_NODEMAP_DEL_UIDMAP:
872         case LCFG_NODEMAP_ADD_GIDMAP:
873         case LCFG_NODEMAP_DEL_GIDMAP:
874         case LCFG_NODEMAP_SET_FILESET:
875                 if (lcfg->lcfg_bufcount != 3)
876                         GOTO(out_lcfg, rc = -EINVAL);
877                 nodemap_name = lustre_cfg_string(lcfg, 1);
878                 param = lustre_cfg_string(lcfg, 2);
879                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
880                 break;
881         case LCFG_NODEMAP_ADMIN:
882         case LCFG_NODEMAP_TRUSTED:
883         case LCFG_NODEMAP_DENY_UNKNOWN:
884         case LCFG_NODEMAP_SQUASH_UID:
885         case LCFG_NODEMAP_SQUASH_GID:
886         case LCFG_NODEMAP_MAP_MODE:
887         case LCFG_NODEMAP_AUDIT_MODE:
888                 if (lcfg->lcfg_bufcount != 4)
889                         GOTO(out_lcfg, rc = -EINVAL);
890                 nodemap_name = lustre_cfg_string(lcfg, 1);
891                 param = lustre_cfg_string(lcfg, 3);
892                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
893                 break;
894         default:
895                 rc = -ENOTTY;
896         }
897
898         if (rc != 0) {
899                 CERROR("%s: OBD_IOC_NODEMAP command %X for %s: rc = %d\n",
900                        mgs->mgs_obd->obd_name, lcfg->lcfg_command,
901                        nodemap_name, rc);
902                 GOTO(out_lcfg, rc);
903         }
904
905         /* revoke nodemap lock */
906         rc = mgs_find_or_make_fsdb(env, mgs, LUSTRE_NODEMAP_NAME, &fsdb);
907         if (rc < 0) {
908                 CWARN("%s: cannot make nodemap fsdb: rc = %d\n",
909                       mgs->mgs_obd->obd_name, rc);
910         } else {
911                 mgs_revoke_lock(mgs, fsdb, CONFIG_T_NODEMAP);
912                 mgs_put_fsdb(mgs, fsdb);
913         }
914
915 out_lcfg:
916         OBD_FREE(lcfg, data->ioc_plen1);
917 out:
918         RETURN(rc);
919 }
920
921 static int mgs_iocontrol_pool(const struct lu_env *env,
922                               struct mgs_device *mgs,
923                               struct obd_ioctl_data *data)
924 {
925         struct mgs_thread_info *mgi = mgs_env_info(env);
926         int rc;
927         struct lustre_cfg *lcfg = NULL;
928         char *poolname = NULL;
929         ENTRY;
930
931         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
932         if (poolname == NULL)
933                 RETURN(-ENOMEM);
934
935         if (data->ioc_type != LUSTRE_CFG_TYPE) {
936                 CERROR("%s: unknown cfg record type: %d\n",
937                        mgs->mgs_obd->obd_name, data->ioc_type);
938                 GOTO(out_pool, rc = -EINVAL);
939         }
940
941         if (data->ioc_plen1 > PAGE_SIZE)
942                 GOTO(out_pool, rc = -E2BIG);
943
944         OBD_ALLOC(lcfg, data->ioc_plen1);
945         if (lcfg == NULL)
946                 GOTO(out_pool, rc = -ENOMEM);
947
948         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
949                 GOTO(out_lcfg, rc = -EFAULT);
950
951         if (lcfg->lcfg_bufcount < 2)
952                 GOTO(out_lcfg, rc = -EFAULT);
953
954         /* first arg is always <fsname>.<poolname> */
955         rc = mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), mgi->mgi_fsname,
956                                  poolname);
957         if (rc)
958                 GOTO(out_lcfg, rc);
959
960         switch (lcfg->lcfg_command) {
961         case LCFG_POOL_NEW:
962                 if (lcfg->lcfg_bufcount != 2)
963                         GOTO(out_lcfg, rc = -EINVAL);
964                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_NEW, mgi->mgi_fsname,
965                                   poolname, NULL);
966                 break;
967         case LCFG_POOL_ADD:
968                 if (lcfg->lcfg_bufcount != 3)
969                         GOTO(out_lcfg, rc = -EINVAL);
970                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_ADD, mgi->mgi_fsname,
971                                   poolname, lustre_cfg_string(lcfg, 2));
972                 break;
973         case LCFG_POOL_REM:
974                 if (lcfg->lcfg_bufcount != 3)
975                         GOTO(out_lcfg, rc = -EINVAL);
976                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_REM, mgi->mgi_fsname,
977                                   poolname, lustre_cfg_string(lcfg, 2));
978                 break;
979         case LCFG_POOL_DEL:
980                 if (lcfg->lcfg_bufcount != 2)
981                         GOTO(out_lcfg, rc = -EINVAL);
982                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_DEL, mgi->mgi_fsname,
983                                   poolname, NULL);
984                 break;
985         default:
986                  rc = -EINVAL;
987         }
988
989         if (rc) {
990                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
991                        rc, lcfg->lcfg_command, mgi->mgi_fsname, poolname);
992                 GOTO(out_lcfg, rc);
993         }
994
995 out_lcfg:
996         OBD_FREE(lcfg, data->ioc_plen1);
997 out_pool:
998         OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
999         RETURN(rc);
1000 }
1001
1002 /* from mdt_iocontrol */
1003 static int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1004                          void *karg, void __user *uarg)
1005 {
1006         struct mgs_device *mgs = exp2mgs_dev(exp);
1007         struct obd_ioctl_data *data = karg;
1008         struct lu_env env;
1009         int rc = 0;
1010
1011         ENTRY;
1012         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
1013
1014         rc = lu_env_init(&env, LCT_MG_THREAD);
1015         if (rc)
1016                 RETURN(rc);
1017
1018         switch (cmd) {
1019
1020         case OBD_IOC_PARAM: {
1021                 struct lustre_cfg *lcfg;
1022
1023                 if (data->ioc_type != LUSTRE_CFG_TYPE) {
1024                         CERROR("%s: unknown cfg record type: %d\n",
1025                                mgs->mgs_obd->obd_name, data->ioc_type);
1026                         GOTO(out, rc = -EINVAL);
1027                 }
1028
1029                 OBD_ALLOC(lcfg, data->ioc_plen1);
1030                 if (lcfg == NULL)
1031                         GOTO(out, rc = -ENOMEM);
1032                 if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
1033                         GOTO(out_free, rc = -EFAULT);
1034
1035                 if (lcfg->lcfg_bufcount < 1)
1036                         GOTO(out_free, rc = -EINVAL);
1037
1038                 rc = mgs_set_param(&env, mgs, lcfg);
1039                 if (rc)
1040                         CERROR("%s: setparam err: rc = %d\n",
1041                                exp->exp_obd->obd_name, rc);
1042 out_free:
1043                 OBD_FREE(lcfg, data->ioc_plen1);
1044                 break;
1045         }
1046
1047         case OBD_IOC_REPLACE_NIDS: {
1048                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1049                         rc = -EINVAL;
1050                         CERROR("%s: no device or fsname specified: rc = %d\n",
1051                                exp->exp_obd->obd_name, rc);
1052                         break;
1053                 }
1054
1055                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1056                         rc = -EOVERFLOW;
1057                         CERROR("%s: device or fsname is too long: rc = %d\n",
1058                                exp->exp_obd->obd_name, rc);
1059                         break;
1060                 }
1061
1062                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1063                         rc = -EINVAL;
1064                         CERROR("%s: device or fsname is not NUL terminated: "
1065                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1066                         break;
1067                 }
1068
1069                 if (!data->ioc_inllen2 || !data->ioc_inlbuf2) {
1070                         rc = -EINVAL;
1071                         CERROR("%s: no NIDs specified: rc = %d\n",
1072                                exp->exp_obd->obd_name, rc);
1073                         break;
1074                 }
1075
1076                 if (data->ioc_inlbuf2[data->ioc_inllen2 - 1] != 0) {
1077                         rc = -EINVAL;
1078                         CERROR("%s: NID list is not NUL terminated: "
1079                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1080                         break;
1081                 }
1082
1083                 /* replace nids in llog */
1084                 rc = mgs_replace_nids(&env, mgs, data->ioc_inlbuf1,
1085                                       data->ioc_inlbuf2);
1086                 if (rc)
1087                         CERROR("%s: error replacing nids: rc = %d\n",
1088                                exp->exp_obd->obd_name, rc);
1089
1090                 break;
1091         }
1092
1093         case OBD_IOC_CLEAR_CONFIGS: {
1094                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1095                         rc = -EINVAL;
1096                         CERROR("%s: no device or fsname specified: rc = %d\n",
1097                                exp->exp_obd->obd_name, rc);
1098                         break;
1099                 }
1100
1101                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1102                         rc = -EOVERFLOW;
1103                         CERROR("%s: device or fsname is too long: rc = %d\n",
1104                                exp->exp_obd->obd_name, rc);
1105                         break;
1106                 }
1107
1108                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1109                         rc = -EINVAL;
1110                         CERROR("%s: device or fsname is not NUL terminated: "
1111                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1112                         break;
1113                 }
1114
1115                 /* remove records marked SKIP from config logs */
1116                 rc = mgs_clear_configs(&env, mgs, data->ioc_inlbuf1);
1117                 if (rc)
1118                         CERROR("%s: error clearing config log: rc = %d\n",
1119                                exp->exp_obd->obd_name, rc);
1120
1121                 break;
1122         }
1123
1124         case OBD_IOC_POOL:
1125                 rc = mgs_iocontrol_pool(&env, mgs, data);
1126                 break;
1127
1128         case OBD_IOC_BARRIER:
1129                 rc = mgs_iocontrol_barrier(&env, mgs, data);
1130                 break;
1131
1132         case OBD_IOC_NODEMAP:
1133                 rc = mgs_iocontrol_nodemap(&env, mgs, data);
1134                 break;
1135
1136         case OBD_IOC_LCFG_FORK:
1137                 rc = mgs_lcfg_fork(&env, mgs, data->ioc_inlbuf1,
1138                                    data->ioc_inlbuf2);
1139                 break;
1140
1141         case OBD_IOC_LCFG_ERASE:
1142                 rc = mgs_lcfg_erase(&env, mgs, data->ioc_inlbuf1);
1143                 break;
1144
1145         case OBD_IOC_CATLOGLIST:
1146                 rc = mgs_list_logs(&env, mgs, data);
1147                 break;
1148         case OBD_IOC_LLOG_CANCEL:
1149         case OBD_IOC_LLOG_REMOVE:
1150         case OBD_IOC_LLOG_CHECK:
1151         case OBD_IOC_LLOG_INFO:
1152         case OBD_IOC_LLOG_PRINT: {
1153                 struct llog_ctxt *ctxt;
1154
1155                 ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1156                 rc = llog_ioctl(&env, ctxt, cmd, data);
1157                 llog_ctxt_put(ctxt);
1158                 break;
1159         }
1160
1161         default:
1162                 CERROR("%s: unknown command %#x\n",
1163                        mgs->mgs_obd->obd_name,  cmd);
1164                 rc = -ENOTTY;
1165                 break;
1166         }
1167 out:
1168         lu_env_fini(&env);
1169         RETURN(rc);
1170 }
1171
1172 static int mgs_connect_to_osd(struct mgs_device *m, const char *nextdev)
1173 {
1174         struct obd_connect_data *data = NULL;
1175         struct obd_device       *obd;
1176         int                      rc;
1177         ENTRY;
1178
1179         OBD_ALLOC_PTR(data);
1180         if (data == NULL)
1181                 RETURN(-ENOMEM);
1182
1183         obd = class_name2obd(nextdev);
1184         if (obd == NULL) {
1185                 CERROR("can't locate next device: %s\n", nextdev);
1186                 GOTO(out, rc = -ENOTCONN);
1187         }
1188
1189         data->ocd_version = LUSTRE_VERSION_CODE;
1190
1191         rc = obd_connect(NULL, &m->mgs_bottom_exp, obd,
1192                          &obd->obd_uuid, data, NULL);
1193         if (rc) {
1194                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
1195                 GOTO(out, rc);
1196         }
1197
1198         m->mgs_bottom = lu2dt_dev(m->mgs_bottom_exp->exp_obd->obd_lu_dev);
1199         m->mgs_dt_dev.dd_lu_dev.ld_site = m->mgs_bottom->dd_lu_dev.ld_site;
1200         LASSERT(m->mgs_dt_dev.dd_lu_dev.ld_site);
1201 out:
1202         OBD_FREE_PTR(data);
1203         RETURN(rc);
1204 }
1205
1206 static struct tgt_handler mgs_mgs_handlers[] = {
1207 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1208                 0,                      MGS_CONNECT,     mgs_connect,
1209                 &RQF_CONNECT, LUSTRE_OBD_VERSION),
1210 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1211                 0,                      MGS_DISCONNECT,  mgs_disconnect,
1212                 &RQF_MDS_DISCONNECT, LUSTRE_OBD_VERSION),
1213 TGT_MGS_HDL_VAR(0,                      MGS_EXCEPTION,   mgs_exception),
1214 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 13, 53, 0)
1215 TGT_MGS_HDL    (HABEO_REFERO | MUTABOR, MGS_SET_INFO,    mgs_set_info),
1216 #endif
1217 TGT_MGS_HDL    (HABEO_REFERO | MUTABOR, MGS_TARGET_REG,  mgs_target_reg),
1218 TGT_MGS_HDL_VAR(0,                      MGS_TARGET_DEL,  mgs_target_del),
1219 TGT_MGS_HDL    (HABEO_REFERO,           MGS_CONFIG_READ, mgs_config_read),
1220 };
1221
1222 static struct tgt_handler mgs_obd_handlers[] = {
1223 TGT_OBD_HDL(0,  OBD_PING,       tgt_obd_ping),
1224 };
1225
1226 static struct tgt_handler mgs_dlm_handlers[] = {
1227 [LDLM_ENQUEUE - LDLM_FIRST_OPC] = {
1228         .th_name = "LDLM_ENQUEUE",
1229         /* don't use th_fail_id for MGS to don't interfere with MDS tests.
1230          * * There are no tests for MGS with OBD_FAIL_LDLM_ENQUEUE_NET so it
1231          * * is safe. If such tests will be needed we have to distinguish
1232          * * MDS and MGS fail ids, e.g use OBD_FAIL_MGS_ENQUEUE_NET for MGS
1233          * * instead of common OBD_FAIL_LDLM_ENQUEUE_NET */
1234         .th_fail_id = 0,
1235         .th_opc = LDLM_ENQUEUE,
1236         .th_flags = HABEO_CLAVIS,
1237         .th_act = tgt_enqueue,
1238         .th_fmt = &RQF_LDLM_ENQUEUE,
1239         .th_version = LUSTRE_DLM_VERSION,
1240         },
1241 };
1242
1243 static struct tgt_handler mgs_llog_handlers[] = {
1244 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_CREATE,      mgs_llog_open),
1245 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_NEXT_BLOCK,  tgt_llog_next_block),
1246 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_READ_HEADER, tgt_llog_read_header),
1247 TGT_LLOG_HDL_VAR(0,     LLOG_ORIGIN_HANDLE_CLOSE,       tgt_llog_close),
1248 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_PREV_BLOCK,  tgt_llog_prev_block),
1249 };
1250
1251 static struct tgt_opc_slice mgs_common_slice[] = {
1252         {
1253                 .tos_opc_start = MGS_FIRST_OPC,
1254                 .tos_opc_end   = MGS_LAST_OPC,
1255                 .tos_hs        = mgs_mgs_handlers
1256         },
1257         {
1258                 .tos_opc_start = OBD_FIRST_OPC,
1259                 .tos_opc_end   = OBD_LAST_OPC,
1260                 .tos_hs        = mgs_obd_handlers
1261         },
1262         {
1263                 .tos_opc_start = LDLM_FIRST_OPC,
1264                 .tos_opc_end   = LDLM_LAST_OPC,
1265                 .tos_hs        = mgs_dlm_handlers
1266         },
1267         {
1268                 .tos_opc_start = LLOG_FIRST_OPC,
1269                 .tos_opc_end   = LLOG_LAST_OPC,
1270                 .tos_hs        = mgs_llog_handlers
1271         },
1272         {
1273                 .tos_opc_start = SEC_FIRST_OPC,
1274                 .tos_opc_end   = SEC_LAST_OPC,
1275                 .tos_hs        = tgt_sec_ctx_handlers
1276         },
1277         {
1278                 .tos_hs        = NULL
1279         }
1280 };
1281
1282 static int mgs_init0(const struct lu_env *env, struct mgs_device *mgs,
1283                      struct lu_device_type *ldt, struct lustre_cfg *lcfg)
1284 {
1285         struct ptlrpc_service_conf       conf;
1286         struct obd_device               *obd;
1287         struct lustre_mount_info        *lmi;
1288         struct llog_ctxt                *ctxt;
1289         int                              rc;
1290
1291         ENTRY;
1292
1293         lmi = server_get_mount(lustre_cfg_string(lcfg, 0));
1294         if (lmi == NULL)
1295                 RETURN(-ENODEV);
1296
1297         mgs->mgs_dt_dev.dd_lu_dev.ld_ops = &mgs_lu_ops;
1298
1299         rc = mgs_connect_to_osd(mgs, lustre_cfg_string(lcfg, 3));
1300         if (rc)
1301                 GOTO(err_lmi, rc);
1302
1303         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1304         LASSERT(obd);
1305         mgs->mgs_obd = obd;
1306         mgs->mgs_obd->obd_lu_dev = &mgs->mgs_dt_dev.dd_lu_dev;
1307
1308         obd->u.obt.obt_magic = OBT_MAGIC;
1309         obd->u.obt.obt_instance = 0;
1310
1311         /* namespace for mgs llog */
1312         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS",
1313                                                 LDLM_NAMESPACE_SERVER,
1314                                                 LDLM_NAMESPACE_MODEST,
1315                                                 LDLM_NS_TYPE_MGT);
1316         if (obd->obd_namespace == NULL)
1317                 GOTO(err_ops, rc = -ENOMEM);
1318
1319         /* No recovery for MGCs */
1320         obd->obd_replayable = 0;
1321
1322         rc = tgt_init(env, &mgs->mgs_lut, obd, mgs->mgs_bottom,
1323                       mgs_common_slice, OBD_FAIL_MGS_ALL_REQUEST_NET,
1324                       OBD_FAIL_MGS_ALL_REPLY_NET);
1325         if (rc)
1326                 GOTO(err_ns, rc);
1327
1328         rc = mgs_fs_setup(env, mgs);
1329         if (rc) {
1330                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
1331                        obd->obd_name, rc);
1332                 GOTO(err_tgt, rc);
1333         }
1334
1335         rc = llog_setup(env, obd, &obd->obd_olg, LLOG_CONFIG_ORIG_CTXT,
1336                         obd, &llog_osd_ops);
1337         if (rc)
1338                 GOTO(err_fs, rc);
1339
1340         /* XXX: we need this trick till N:1 stack is supported
1341          * set "current" directory for named llogs */
1342         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1343         LASSERT(ctxt);
1344         ctxt->loc_dir = mgs->mgs_configs_dir;
1345         llog_ctxt_put(ctxt);
1346
1347         /* Internal mgs setup */
1348         mgs_init_fsdb_list(mgs);
1349         mutex_init(&mgs->mgs_mutex);
1350         mgs->mgs_start_time = ktime_get_real_seconds();
1351         spin_lock_init(&mgs->mgs_lock);
1352         mutex_init(&mgs->mgs_health_mutex);
1353         init_rwsem(&mgs->mgs_barrier_rwsem);
1354
1355         rc = mgs_lcfg_rename(env, mgs);
1356         if (rc)
1357                 GOTO(err_llog, rc);
1358
1359         rc = lproc_mgs_setup(mgs, lustre_cfg_string(lcfg, 3));
1360         if (rc != 0) {
1361                 CERROR("%s: cannot initialize proc entry: rc = %d\n",
1362                        obd->obd_name, rc);
1363                 GOTO(err_llog, rc);
1364         }
1365
1366         /* Setup params fsdb and log, so that other servers can make a local
1367          * copy successfully when they are mounted. See LU-4783 */
1368         rc = mgs_params_fsdb_setup(env, mgs);
1369         if (rc)
1370                 /* params fsdb and log can be setup later */
1371                 CERROR("%s: %s fsdb and log setup failed: rc = %d\n",
1372                        obd->obd_name, PARAMS_FILENAME, rc);
1373
1374         /* Setup _mgs fsdb, useful for srpc */
1375         mgs__mgs_fsdb_setup(env, mgs);
1376
1377         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1378                            "mgs_ldlm_client", &obd->obd_ldlm_client);
1379
1380         conf = (typeof(conf)) {
1381                 .psc_name               = LUSTRE_MGS_NAME,
1382                 .psc_watchdog_factor    = MGS_SERVICE_WATCHDOG_FACTOR,
1383                 .psc_buf                = {
1384                         .bc_nbufs               = MGS_NBUFS,
1385                         .bc_buf_size            = MGS_BUFSIZE,
1386                         .bc_req_max_size        = MGS_MAXREQSIZE,
1387                         .bc_rep_max_size        = MGS_MAXREPSIZE,
1388                         .bc_req_portal          = MGS_REQUEST_PORTAL,
1389                         .bc_rep_portal          = MGC_REPLY_PORTAL,
1390                 },
1391                 .psc_thr                = {
1392                         .tc_thr_name            = "ll_mgs",
1393                         .tc_nthrs_init          = MGS_NTHRS_INIT,
1394                         .tc_nthrs_max           = MGS_NTHRS_MAX,
1395                         .tc_ctx_tags            = LCT_MG_THREAD,
1396                 },
1397                 .psc_ops                = {
1398                         .so_req_handler         = tgt_request_handle,
1399                         .so_req_printer         = target_print_req,
1400                 },
1401         };
1402
1403         /* Start the service threads */
1404         mgs->mgs_service = ptlrpc_register_service(&conf, &obd->obd_kset,
1405                                                    obd->obd_debugfs_entry);
1406         if (IS_ERR(mgs->mgs_service)) {
1407                 rc = PTR_ERR(mgs->mgs_service);
1408                 CERROR("failed to start mgs service: %d\n", rc);
1409                 mgs->mgs_service = NULL;
1410                 GOTO(err_lproc, rc);
1411         }
1412
1413         ping_evictor_start();
1414
1415         CDEBUG(D_INFO, "MGS %s started\n", obd->obd_name);
1416
1417         /* device stack is not yet fully setup to keep no objects behind */
1418         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1419         RETURN(0);
1420 err_lproc:
1421         mgs_params_fsdb_cleanup(env, mgs);
1422         lproc_mgs_cleanup(mgs);
1423 err_llog:
1424         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1425         if (ctxt) {
1426                 ctxt->loc_dir = NULL;
1427                 llog_cleanup(env, ctxt);
1428         }
1429 err_tgt:
1430         tgt_fini(env, &mgs->mgs_lut);
1431 err_fs:
1432         /* No extra cleanup needed for llog_init_commit_thread() */
1433         mgs_fs_cleanup(env, mgs);
1434 err_ns:
1435         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
1436         obd->obd_namespace = NULL;
1437 err_ops:
1438         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1439         if (!cfs_hash_is_empty(mgs2lu_dev(mgs)->ld_site->ls_obj_hash)) {
1440                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_OTHER, NULL);
1441                 lu_site_print(env, mgs2lu_dev(mgs)->ld_site, &msgdata,
1442                                 lu_cdebug_printer);
1443         }
1444         obd_disconnect(mgs->mgs_bottom_exp);
1445 err_lmi:
1446         if (lmi)
1447                 server_put_mount(lustre_cfg_string(lcfg, 0), true);
1448         RETURN(rc);
1449 }
1450
1451 static struct lu_device *mgs_device_free(const struct lu_env *env,
1452                                          struct lu_device *lu)
1453 {
1454         struct mgs_device *mgs = lu2mgs_dev(lu);
1455         ENTRY;
1456
1457         dt_device_fini(&mgs->mgs_dt_dev);
1458         OBD_FREE_PTR(mgs);
1459         RETURN(NULL);
1460 }
1461
1462 static int mgs_process_config(const struct lu_env *env,
1463                               struct lu_device *dev,
1464                               struct lustre_cfg *lcfg)
1465 {
1466         LBUG();
1467         return 0;
1468 }
1469
1470 static int mgs_object_init(const struct lu_env *env, struct lu_object *o,
1471                            const struct lu_object_conf *unused)
1472 {
1473         struct mgs_device *d = lu2mgs_dev(o->lo_dev);
1474         struct lu_device  *under;
1475         struct lu_object  *below;
1476         int                rc = 0;
1477         ENTRY;
1478
1479         /* do no set .do_ops as mgs calls to bottom osd directly */
1480
1481         CDEBUG(D_INFO, "object init, fid = "DFID"\n",
1482                         PFID(lu_object_fid(o)));
1483
1484         under = &d->mgs_bottom->dd_lu_dev;
1485         below = under->ld_ops->ldo_object_alloc(env, o->lo_header, under);
1486         if (below != NULL)
1487                 lu_object_add(o, below);
1488         else
1489                 rc = -ENOMEM;
1490
1491         return rc;
1492 }
1493
1494 static void mgs_object_free(const struct lu_env *env, struct lu_object *o)
1495 {
1496         struct mgs_object *obj = lu2mgs_obj(o);
1497         struct lu_object_header *h = o->lo_header;
1498
1499         dt_object_fini(&obj->mgo_obj);
1500         lu_object_header_fini(h);
1501         OBD_FREE_PTR(obj);
1502 }
1503
1504 static int mgs_object_print(const struct lu_env *env, void *cookie,
1505                             lu_printer_t p, const struct lu_object *l)
1506 {
1507         const struct mgs_object *o = lu2mgs_obj((struct lu_object *) l);
1508
1509         return (*p)(env, cookie, LUSTRE_MGS_NAME"-object@%p", o);
1510 }
1511
1512 static struct lu_object_operations mgs_lu_obj_ops = {
1513         .loo_object_init        = mgs_object_init,
1514         .loo_object_free        = mgs_object_free,
1515         .loo_object_print       = mgs_object_print,
1516 };
1517
1518 static struct lu_object *mgs_object_alloc(const struct lu_env *env,
1519                                           const struct lu_object_header *hdr,
1520                                           struct lu_device *d)
1521 {
1522         struct lu_object_header *h;
1523         struct mgs_object       *o;
1524         struct lu_object        *l;
1525
1526         LASSERT(hdr == NULL);
1527
1528         OBD_ALLOC_PTR(o);
1529         if (o != NULL) {
1530                 l = &o->mgo_obj.do_lu;
1531                 h = &o->mgo_header;
1532
1533                 lu_object_header_init(h);
1534                 dt_object_init(&o->mgo_obj, h, d);
1535                 lu_object_add_top(h, l);
1536
1537                 l->lo_ops = &mgs_lu_obj_ops;
1538
1539                 return l;
1540         } else {
1541                 return NULL;
1542         }
1543 }
1544
1545 const struct lu_device_operations mgs_lu_ops = {
1546         .ldo_object_alloc       = mgs_object_alloc,
1547         .ldo_process_config     = mgs_process_config,
1548 };
1549
1550 static struct lu_device *mgs_device_alloc(const struct lu_env *env,
1551                                           struct lu_device_type *type,
1552                                           struct lustre_cfg *lcfg)
1553 {
1554         struct mgs_device *mgs;
1555         struct lu_device  *ludev;
1556
1557         OBD_ALLOC_PTR(mgs);
1558         if (mgs == NULL) {
1559                 ludev = ERR_PTR(-ENOMEM);
1560         } else {
1561                 int rc;
1562
1563                 ludev = mgs2lu_dev(mgs);
1564                 dt_device_init(&mgs->mgs_dt_dev, type);
1565                 rc = mgs_init0(env, mgs, type, lcfg);
1566                 if (rc != 0) {
1567                         mgs_device_free(env, ludev);
1568                         ludev = ERR_PTR(rc);
1569                 }
1570         }
1571         return ludev;
1572 }
1573
1574 static struct lu_device *mgs_device_fini(const struct lu_env *env,
1575                                          struct lu_device *d)
1576 {
1577         struct mgs_device       *mgs = lu2mgs_dev(d);
1578         struct obd_device       *obd = mgs->mgs_obd;
1579         struct llog_ctxt        *ctxt;
1580
1581         ENTRY;
1582
1583         LASSERT(mgs->mgs_bottom);
1584
1585         class_disconnect_exports(obd);
1586
1587         ping_evictor_stop();
1588
1589         mutex_lock(&mgs->mgs_health_mutex);
1590         ptlrpc_unregister_service(mgs->mgs_service);
1591         mutex_unlock(&mgs->mgs_health_mutex);
1592
1593         mgs_params_fsdb_cleanup(env, mgs);
1594         mgs_cleanup_fsdb_list(mgs);
1595
1596         ldlm_namespace_free_prior(obd->obd_namespace, NULL, 1);
1597         obd_exports_barrier(obd);
1598         obd_zombie_barrier();
1599
1600         tgt_fini(env, &mgs->mgs_lut);
1601         lproc_mgs_cleanup(mgs);
1602
1603         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1604         if (ctxt) {
1605                 ctxt->loc_dir = NULL;
1606                 llog_cleanup(env, ctxt);
1607         }
1608
1609         mgs_fs_cleanup(env, mgs);
1610
1611         ldlm_namespace_free_post(obd->obd_namespace);
1612         obd->obd_namespace = NULL;
1613
1614         lu_site_purge(env, d->ld_site, ~0);
1615         if (!cfs_hash_is_empty(d->ld_site->ls_obj_hash)) {
1616                 LIBCFS_DEBUG_MSG_DATA_DECL(msgdata, D_OTHER, NULL);
1617                 lu_site_print(env, d->ld_site, &msgdata, lu_cdebug_printer);
1618         }
1619
1620         LASSERT(mgs->mgs_bottom_exp);
1621         obd_disconnect(mgs->mgs_bottom_exp);
1622
1623         server_put_mount(obd->obd_name, true);
1624
1625         RETURN(NULL);
1626 }
1627
1628 /* context key constructor/destructor: mgs_key_init, mgs_key_fini */
1629 LU_KEY_INIT_FINI(mgs, struct mgs_thread_info);
1630
1631 LU_TYPE_INIT_FINI(mgs, &mgs_thread_key);
1632
1633 LU_CONTEXT_KEY_DEFINE(mgs, LCT_MG_THREAD);
1634
1635 static struct lu_device_type_operations mgs_device_type_ops = {
1636         .ldto_init              = mgs_type_init,
1637         .ldto_fini              = mgs_type_fini,
1638
1639         .ldto_start             = mgs_type_start,
1640         .ldto_stop              = mgs_type_stop,
1641
1642         .ldto_device_alloc      = mgs_device_alloc,
1643         .ldto_device_free       = mgs_device_free,
1644
1645         .ldto_device_fini       = mgs_device_fini
1646 };
1647
1648 static struct lu_device_type mgs_device_type = {
1649         .ldt_tags       = LU_DEVICE_DT,
1650         .ldt_name       = LUSTRE_MGS_NAME,
1651         .ldt_ops        = &mgs_device_type_ops,
1652         .ldt_ctx_tags   = LCT_MG_THREAD
1653 };
1654
1655 static int mgs_obd_reconnect(const struct lu_env *env, struct obd_export *exp,
1656                              struct obd_device *obd, struct obd_uuid *cluuid,
1657                              struct obd_connect_data *data, void *localdata)
1658 {
1659         ENTRY;
1660
1661         if (exp == NULL || obd == NULL || cluuid == NULL)
1662                 RETURN(-EINVAL);
1663
1664         tgt_counter_incr(exp, LPROC_MGS_CONNECT);
1665
1666         if (data != NULL) {
1667                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
1668
1669                 if (data->ocd_connect_flags & OBD_CONNECT_FLAGS2)
1670                         data->ocd_connect_flags2 &= MGS_CONNECT_SUPPORTED2;
1671
1672                 exp->exp_connect_data = *data;
1673                 data->ocd_version = LUSTRE_VERSION_CODE;
1674         }
1675
1676         RETURN(mgs_export_stats_init(obd, exp, localdata));
1677 }
1678
1679 static int mgs_obd_connect(const struct lu_env *env, struct obd_export **exp,
1680                            struct obd_device *obd, struct obd_uuid *cluuid,
1681                            struct obd_connect_data *data, void *localdata)
1682 {
1683         struct obd_export       *lexp;
1684         struct lustre_handle     conn = {
1685                 .cookie = 0,
1686         };
1687         int                      rc;
1688
1689         ENTRY;
1690
1691         if (exp == NULL || obd == NULL || cluuid == NULL)
1692                 RETURN(-EINVAL);
1693
1694         rc = class_connect(&conn, obd, cluuid);
1695         if (rc)
1696                 RETURN(rc);
1697
1698         lexp = class_conn2export(&conn);
1699         if (lexp == NULL)
1700                 RETURN(-EFAULT);
1701
1702         rc = mgs_obd_reconnect(env, lexp, obd, cluuid, data, localdata);
1703         if (rc)
1704                 GOTO(out_disconnect, rc);
1705
1706         *exp = lexp;
1707
1708         RETURN(rc);
1709
1710 out_disconnect:
1711         class_disconnect(lexp);
1712
1713         return rc;
1714 }
1715
1716 static int mgs_obd_disconnect(struct obd_export *exp)
1717 {
1718         int rc;
1719
1720         ENTRY;
1721
1722         LASSERT(exp);
1723
1724         mgs_fsc_cleanup(exp);
1725
1726         class_export_get(exp);
1727         tgt_counter_incr(exp, LPROC_MGS_DISCONNECT);
1728
1729         rc = server_disconnect_export(exp);
1730         class_export_put(exp);
1731         RETURN(rc);
1732 }
1733
1734 static int mgs_health_check(const struct lu_env *env, struct obd_device *obd)
1735 {
1736         struct mgs_device *mgs = lu2mgs_dev(obd->obd_lu_dev);
1737         int rc = 0;
1738
1739         mutex_lock(&mgs->mgs_health_mutex);
1740         rc |= ptlrpc_service_health_check(mgs->mgs_service);
1741         mutex_unlock(&mgs->mgs_health_mutex);
1742
1743         return rc != 0 ? 1 : 0;
1744 }
1745
1746 /* use obd ops to offer management infrastructure */
1747 static struct obd_ops mgs_obd_device_ops = {
1748         .o_owner                = THIS_MODULE,
1749         .o_connect              = mgs_obd_connect,
1750         .o_reconnect            = mgs_obd_reconnect,
1751         .o_disconnect           = mgs_obd_disconnect,
1752         .o_init_export          = mgs_init_export,
1753         .o_destroy_export       = mgs_destroy_export,
1754         .o_iocontrol            = mgs_iocontrol,
1755         .o_health_check         = mgs_health_check,
1756 };
1757
1758 static int __init mgs_init(void)
1759 {
1760         return class_register_type(&mgs_obd_device_ops, NULL, true, NULL,
1761                                    LUSTRE_MGS_NAME, &mgs_device_type);
1762 }
1763
1764 static void __exit mgs_exit(void)
1765 {
1766         class_unregister_type(LUSTRE_MGS_NAME);
1767 }
1768
1769 MODULE_AUTHOR("OpenSFS, Inc. <http://www.lustre.org/>");
1770 MODULE_DESCRIPTION("Lustre Management Server (MGS)");
1771 MODULE_VERSION(LUSTRE_VERSION_STRING);
1772 MODULE_LICENSE("GPL");
1773
1774 module_init(mgs_init);
1775 module_exit(mgs_exit);