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