Whamcloud - gitweb
688b538078e992f826261468b578759423032d5a
[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  *
31  * lustre/mgs/mgs_handler.c
32  *
33  * Author: Nathan Rutman <nathan@clusterfs.com>
34  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
35  * Author: Mikhail Pershin <tappro@whamcloud.com>
36  */
37
38 #define DEBUG_SUBSYSTEM S_MGS
39 #define D_MGS D_CONFIG
40
41 #include <obd_class.h>
42 #include <lprocfs_status.h>
43 #include <uapi/linux/lustre/lustre_ioctl.h>
44 #include <uapi/linux/lustre/lustre_param.h>
45 #include <uapi/linux/lustre/lustre_barrier_user.h>
46
47 #include "mgs_internal.h"
48
49 /*
50  * Regular MGS handlers
51  */
52 static int mgs_connect(struct tgt_session_info *tsi)
53 {
54         struct ptlrpc_request   *req = tgt_ses_req(tsi);
55         int                      rc;
56
57         ENTRY;
58
59         CFS_FAIL_TIMEOUT(OBD_FAIL_MGS_CONNECT_NET, cfs_fail_val);
60         rc = tgt_connect(tsi);
61         if (rc)
62                 RETURN(rc);
63
64         if (lustre_msg_get_conn_cnt(req->rq_reqmsg) > 1)
65                 lustre_msg_add_op_flags(req->rq_repmsg, MSG_CONNECT_RECONNECT);
66
67         RETURN(0);
68 }
69
70 static int mgs_disconnect(struct tgt_session_info *tsi)
71 {
72         int rc;
73
74         ENTRY;
75
76         LASSERT(tsi->tsi_exp);
77
78         rc = tgt_disconnect(tsi);
79         if (rc)
80                 RETURN(err_serious(rc));
81         RETURN(0);
82 }
83
84 static int mgs_exception(struct tgt_session_info *tsi)
85 {
86         ENTRY;
87
88         tgt_counter_incr(tsi->tsi_exp, LPROC_MGS_EXCEPTION);
89
90         RETURN(0);
91 }
92
93 static inline bool str_starts_with(const char *str, const char *prefix)
94 {
95         return strncmp(str, prefix, strlen(prefix)) == 0;
96 }
97
98 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 18, 53, 0)
99 static int mgs_set_info(struct tgt_session_info *tsi)
100 {
101         struct mgs_thread_info *mgi;
102         struct mgs_send_param *msp;
103         size_t param_len;
104         char *s;
105
106         ENTRY;
107
108         mgi = mgs_env_info(tsi->tsi_env);
109         if (IS_ERR(mgi))
110                 RETURN(err_serious(PTR_ERR(mgi)));
111
112         msp = req_capsule_client_get(tsi->tsi_pill, &RMF_MGS_SEND_PARAM);
113         if (msp == NULL)
114                 RETURN(err_serious(-EFAULT));
115
116         param_len = strnlen(msp->mgs_param, sizeof(msp->mgs_param));
117         if (param_len == 0 || param_len == sizeof(msp->mgs_param))
118                 RETURN(-EINVAL);
119
120         /* We only allow '*.lov.stripe{size,count,offset}=*' from an RPC. */
121         s = strchr(msp->mgs_param, '.');
122         if (s == NULL)
123                 RETURN(-EINVAL);
124
125         if (!str_starts_with(s + 1, "lov.stripesize=") &&
126             !str_starts_with(s + 1, "lov.stripecount=") &&
127             !str_starts_with(s + 1, "lov.stripeoffset="))
128                 RETURN(-EINVAL);
129
130         /* do nothing */
131         CDEBUG(D_MGS, "%s: ignoring set info '%s'\n",
132                tgt_name(tsi->tsi_tgt), msp->mgs_param);
133         RETURN(0);
134 }
135 #endif
136
137 enum ast_type {
138         AST_CONFIG      = 1,
139         AST_PARAMS      = 2,
140         AST_IR          = 3,
141         AST_BARRIER     = 4,
142 };
143
144 static int mgs_completion_ast_generic(struct ldlm_lock *lock, __u64 flags,
145                                      void *cbdata, enum ast_type type)
146 {
147         ENTRY;
148
149         if (!(flags & LDLM_FL_BLOCKED_MASK)) {
150                 struct fs_db *fsdb;
151
152                 /* l_ast_data is used as a marker to avoid cancel ldlm lock
153                  * twice. See LU-2317. */
154                 lock_res_and_lock(lock);
155                 fsdb = (struct fs_db *)lock->l_ast_data;
156                 lock->l_ast_data = NULL;
157                 unlock_res_and_lock(lock);
158
159                 if (fsdb != NULL) {
160                         struct lustre_handle lockh;
161
162                         switch(type) {
163                                 case AST_CONFIG:
164                                         /* clear the bit before lock put */
165                                         clear_bit(FSDB_REVOKING_LOCK,
166                                                   &fsdb->fsdb_flags);
167                                         break;
168                                 case AST_PARAMS:
169                                         clear_bit(FSDB_REVOKING_PARAMS,
170                                                   &fsdb->fsdb_flags);
171                                         break;
172                                 case AST_IR:
173                                         mgs_ir_notify_complete(fsdb);
174                                         break;
175                                 case AST_BARRIER:
176                                         break;
177                                 default:
178                                         LBUG();
179                         }
180
181                         ldlm_lock2handle(lock, &lockh);
182                         ldlm_lock_decref_and_cancel(&lockh, LCK_EX);
183                 }
184         }
185
186         RETURN(ldlm_completion_ast(lock, flags, cbdata));
187 }
188
189 static int mgs_completion_ast_config(struct ldlm_lock *lock, __u64 flags,
190                                      void *cbdata)
191 {
192         return mgs_completion_ast_generic(lock, flags, cbdata, AST_CONFIG);
193 }
194
195 static int mgs_completion_ast_params(struct ldlm_lock *lock, __u64 flags,
196                                      void *cbdata)
197 {
198         return mgs_completion_ast_generic(lock, flags, cbdata, AST_PARAMS);
199 }
200
201 static int mgs_completion_ast_ir(struct ldlm_lock *lock, __u64 flags,
202                                  void *cbdata)
203 {
204         return mgs_completion_ast_generic(lock, flags, cbdata, AST_IR);
205 }
206
207 static int mgs_completion_ast_barrier(struct ldlm_lock *lock, __u64 flags,
208                                       void *cbdata)
209 {
210         return mgs_completion_ast_generic(lock, flags, cbdata, AST_BARRIER);
211 }
212
213 void mgs_revoke_lock(struct mgs_device *mgs, struct fs_db *fsdb,
214                      enum mgs_cfg_type 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 MGS_CFG_T_CONFIG:
230         case MGS_CFG_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 MGS_CFG_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 MGS_CFG_T_RECOVER:
241                 cp = mgs_completion_ast_ir;
242                 break;
243         case MGS_CFG_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 == MGS_CFG_T_CONFIG)
264                                 clear_bit(FSDB_REVOKING_LOCK,
265                                           &fsdb->fsdb_flags);
266
267                         if (type == MGS_CFG_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, MGS_CFG_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 MGS_CFG_T_RECOVER:
579                 rc = mgs_get_ir_logs(req);
580                 break;
581         case MGS_CFG_T_NODEMAP:
582                 rc = nodemap_get_config_req(req->rq_export->exp_obd, req);
583                 break;
584         case MGS_CFG_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 if (strcmp(idtype_str, "gid") == 0)
818                         idtype = NODEMAP_GID;
819                 else if (strcmp(idtype_str, "projid") == 0)
820                         idtype = NODEMAP_PROJID;
821                 else
822                         GOTO(out_lcfg, rc = -EINVAL);
823
824                 rc = kstrtoul(client_idstr, 10, &client_id);
825                 if (rc != 0)
826                         GOTO(out_lcfg, rc = -EINVAL);
827
828                 rc = nodemap_test_id(nid, idtype, client_id, &fs_id);
829                 if (rc < 0)
830                         GOTO(out_lcfg, rc = -EINVAL);
831
832                 if (data->ioc_plen1 < sizeof(fs_idstr))
833                         GOTO(out_lcfg, rc = -EINVAL);
834
835                 snprintf(fs_idstr, sizeof(fs_idstr), "%u", fs_id);
836                 if (copy_to_user(data->ioc_pbuf1, fs_idstr,
837                                  sizeof(fs_idstr)) != 0)
838                         GOTO(out_lcfg, rc = -EINVAL);
839                 break;
840         case LCFG_NODEMAP_ADD_RANGE:
841         case LCFG_NODEMAP_DEL_RANGE:
842         case LCFG_NODEMAP_ADD_UIDMAP:
843         case LCFG_NODEMAP_DEL_UIDMAP:
844         case LCFG_NODEMAP_ADD_GIDMAP:
845         case LCFG_NODEMAP_DEL_GIDMAP:
846         case LCFG_NODEMAP_ADD_PROJIDMAP:
847         case LCFG_NODEMAP_DEL_PROJIDMAP:
848         case LCFG_NODEMAP_SET_FILESET:
849         case LCFG_NODEMAP_SET_SEPOL:
850                 if (lcfg->lcfg_bufcount != 3)
851                         GOTO(out_lcfg, rc = -EINVAL);
852                 nodemap_name = lustre_cfg_string(lcfg, 1);
853                 param = lustre_cfg_string(lcfg, 2);
854                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
855                 break;
856         case LCFG_NODEMAP_ADMIN:
857         case LCFG_NODEMAP_TRUSTED:
858         case LCFG_NODEMAP_DENY_UNKNOWN:
859         case LCFG_NODEMAP_SQUASH_UID:
860         case LCFG_NODEMAP_SQUASH_GID:
861         case LCFG_NODEMAP_SQUASH_PROJID:
862         case LCFG_NODEMAP_MAP_MODE:
863         case LCFG_NODEMAP_AUDIT_MODE:
864         case LCFG_NODEMAP_FORBID_ENCRYPT:
865                 if (lcfg->lcfg_bufcount != 4)
866                         GOTO(out_lcfg, rc = -EINVAL);
867                 nodemap_name = lustre_cfg_string(lcfg, 1);
868                 param = lustre_cfg_string(lcfg, 3);
869                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
870                 break;
871         default:
872                 rc = -ENOTTY;
873         }
874
875         if (rc) {
876                 CDEBUG_LIMIT(rc == -EEXIST ? D_INFO : D_ERROR,
877                              "%s: OBD_IOC_NODEMAP command %X for %s: rc = %d\n",
878                              mgs->mgs_obd->obd_name, lcfg->lcfg_command,
879                              nodemap_name, rc);
880                 GOTO(out_lcfg, rc);
881         }
882
883         /* revoke nodemap lock */
884         rc = mgs_find_or_make_fsdb(env, mgs, LUSTRE_NODEMAP_NAME, &fsdb);
885         if (rc < 0) {
886                 CWARN("%s: cannot make nodemap fsdb: rc = %d\n",
887                       mgs->mgs_obd->obd_name, rc);
888         } else {
889                 mgs_revoke_lock(mgs, fsdb, MGS_CFG_T_NODEMAP);
890                 mgs_put_fsdb(mgs, fsdb);
891         }
892
893 out_lcfg:
894         OBD_FREE(lcfg, data->ioc_plen1);
895 out:
896         RETURN(rc);
897 }
898
899 static int mgs_iocontrol_pool(const struct lu_env *env,
900                               struct mgs_device *mgs,
901                               struct obd_ioctl_data *data)
902 {
903         struct mgs_thread_info *mgi = mgs_env_info(env);
904         int rc;
905         struct lustre_cfg *lcfg = NULL;
906         char *poolname = NULL;
907         ENTRY;
908
909         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
910         if (poolname == NULL)
911                 RETURN(-ENOMEM);
912
913         if (data->ioc_type != LUSTRE_CFG_TYPE) {
914                 CERROR("%s: unknown cfg record type: %d\n",
915                        mgs->mgs_obd->obd_name, data->ioc_type);
916                 GOTO(out_pool, rc = -EINVAL);
917         }
918
919         if (data->ioc_plen1 > PAGE_SIZE)
920                 GOTO(out_pool, rc = -E2BIG);
921
922         OBD_ALLOC(lcfg, data->ioc_plen1);
923         if (lcfg == NULL)
924                 GOTO(out_pool, rc = -ENOMEM);
925
926         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
927                 GOTO(out_lcfg, rc = -EFAULT);
928
929         if (lcfg->lcfg_bufcount < 2)
930                 GOTO(out_lcfg, rc = -EFAULT);
931
932         /* first arg is always <fsname>.<poolname> */
933         rc = mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), mgi->mgi_fsname,
934                                  poolname);
935         if (rc)
936                 GOTO(out_lcfg, rc);
937
938         switch (lcfg->lcfg_command) {
939         case LCFG_POOL_NEW:
940                 if (lcfg->lcfg_bufcount != 2)
941                         GOTO(out_lcfg, rc = -EINVAL);
942                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_NEW, mgi->mgi_fsname,
943                                   poolname, NULL);
944                 break;
945         case LCFG_POOL_ADD:
946                 if (lcfg->lcfg_bufcount != 3)
947                         GOTO(out_lcfg, rc = -EINVAL);
948                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_ADD, mgi->mgi_fsname,
949                                   poolname, lustre_cfg_string(lcfg, 2));
950                 break;
951         case LCFG_POOL_REM:
952                 if (lcfg->lcfg_bufcount != 3)
953                         GOTO(out_lcfg, rc = -EINVAL);
954                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_REM, mgi->mgi_fsname,
955                                   poolname, lustre_cfg_string(lcfg, 2));
956                 break;
957         case LCFG_POOL_DEL:
958                 if (lcfg->lcfg_bufcount != 2)
959                         GOTO(out_lcfg, rc = -EINVAL);
960                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_DEL, mgi->mgi_fsname,
961                                   poolname, NULL);
962                 break;
963         default:
964                  rc = -EINVAL;
965         }
966
967         if (rc) {
968                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
969                        rc, lcfg->lcfg_command, mgi->mgi_fsname, poolname);
970                 GOTO(out_lcfg, rc);
971         }
972
973 out_lcfg:
974         OBD_FREE(lcfg, data->ioc_plen1);
975 out_pool:
976         OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
977         RETURN(rc);
978 }
979
980 /* from mdt_iocontrol */
981 static int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
982                          void *karg, void __user *uarg)
983 {
984         struct mgs_device *mgs = exp2mgs_dev(exp);
985         struct obd_ioctl_data *data = karg;
986         struct lu_env env;
987         int rc = 0;
988
989         ENTRY;
990         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
991
992         rc = lu_env_init(&env, LCT_MG_THREAD);
993         if (rc)
994                 RETURN(rc);
995
996         switch (cmd) {
997
998         case OBD_IOC_PARAM: {
999                 struct lustre_cfg *lcfg;
1000
1001                 if (data->ioc_type != LUSTRE_CFG_TYPE) {
1002                         CERROR("%s: unknown cfg record type: %d\n",
1003                                mgs->mgs_obd->obd_name, data->ioc_type);
1004                         GOTO(out, rc = -EINVAL);
1005                 }
1006
1007                 OBD_ALLOC(lcfg, data->ioc_plen1);
1008                 if (lcfg == NULL)
1009                         GOTO(out, rc = -ENOMEM);
1010                 if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
1011                         GOTO(out_free, rc = -EFAULT);
1012
1013                 if (lcfg->lcfg_bufcount < 1)
1014                         GOTO(out_free, rc = -EINVAL);
1015
1016                 rc = mgs_set_param(&env, mgs, lcfg);
1017                 if (rc)
1018                         CERROR("%s: setparam err: rc = %d\n",
1019                                exp->exp_obd->obd_name, rc);
1020 out_free:
1021                 OBD_FREE(lcfg, data->ioc_plen1);
1022                 break;
1023         }
1024
1025         case OBD_IOC_REPLACE_NIDS: {
1026                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1027                         rc = -EINVAL;
1028                         CERROR("%s: no device or fsname specified: rc = %d\n",
1029                                exp->exp_obd->obd_name, rc);
1030                         break;
1031                 }
1032
1033                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1034                         rc = -EOVERFLOW;
1035                         CERROR("%s: device or fsname is too long: rc = %d\n",
1036                                exp->exp_obd->obd_name, rc);
1037                         break;
1038                 }
1039
1040                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1041                         rc = -EINVAL;
1042                         CERROR("%s: device or fsname is not NUL terminated: "
1043                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1044                         break;
1045                 }
1046
1047                 if (!data->ioc_inllen2 || !data->ioc_inlbuf2) {
1048                         rc = -EINVAL;
1049                         CERROR("%s: no NIDs specified: rc = %d\n",
1050                                exp->exp_obd->obd_name, rc);
1051                         break;
1052                 }
1053
1054                 if (data->ioc_inlbuf2[data->ioc_inllen2 - 1] != 0) {
1055                         rc = -EINVAL;
1056                         CERROR("%s: NID list is not NUL terminated: "
1057                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1058                         break;
1059                 }
1060
1061                 /* replace nids in llog */
1062                 rc = mgs_replace_nids(&env, mgs, data->ioc_inlbuf1,
1063                                       data->ioc_inlbuf2);
1064                 if (rc)
1065                         CERROR("%s: error replacing nids: rc = %d\n",
1066                                exp->exp_obd->obd_name, rc);
1067
1068                 break;
1069         }
1070
1071         case OBD_IOC_CLEAR_CONFIGS: {
1072                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1073                         rc = -EINVAL;
1074                         CERROR("%s: no device or fsname specified: rc = %d\n",
1075                                exp->exp_obd->obd_name, rc);
1076                         break;
1077                 }
1078
1079                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1080                         rc = -EOVERFLOW;
1081                         CERROR("%s: device or fsname is too long: rc = %d\n",
1082                                exp->exp_obd->obd_name, rc);
1083                         break;
1084                 }
1085
1086                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1087                         rc = -EINVAL;
1088                         CERROR("%s: device or fsname is not NUL terminated: "
1089                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1090                         break;
1091                 }
1092
1093                 /* remove records marked SKIP from config logs */
1094                 rc = mgs_clear_configs(&env, mgs, data->ioc_inlbuf1);
1095                 if (rc)
1096                         CERROR("%s: error clearing config log: rc = %d\n",
1097                                exp->exp_obd->obd_name, rc);
1098
1099                 break;
1100         }
1101
1102         case OBD_IOC_POOL:
1103                 rc = mgs_iocontrol_pool(&env, mgs, data);
1104                 break;
1105
1106         case OBD_IOC_BARRIER:
1107                 rc = mgs_iocontrol_barrier(&env, mgs, data);
1108                 break;
1109
1110         case OBD_IOC_NODEMAP:
1111                 rc = mgs_iocontrol_nodemap(&env, mgs, data);
1112                 break;
1113
1114         case OBD_IOC_LCFG_FORK:
1115                 rc = mgs_lcfg_fork(&env, mgs, data->ioc_inlbuf1,
1116                                    data->ioc_inlbuf2);
1117                 break;
1118
1119         case OBD_IOC_LCFG_ERASE:
1120                 rc = mgs_lcfg_erase(&env, mgs, data->ioc_inlbuf1);
1121                 break;
1122
1123         case OBD_IOC_CATLOGLIST:
1124                 rc = mgs_list_logs(&env, mgs, data);
1125                 break;
1126         case OBD_IOC_LLOG_CANCEL:
1127         case OBD_IOC_LLOG_REMOVE:
1128         case OBD_IOC_LLOG_CHECK:
1129         case OBD_IOC_LLOG_INFO:
1130         case OBD_IOC_LLOG_PRINT: {
1131                 struct llog_ctxt *ctxt;
1132
1133                 ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1134                 rc = llog_ioctl(&env, ctxt, cmd, data);
1135                 llog_ctxt_put(ctxt);
1136                 break;
1137         }
1138
1139         default:
1140                 CERROR("%s: unknown command %#x\n",
1141                        mgs->mgs_obd->obd_name,  cmd);
1142                 rc = -ENOTTY;
1143                 break;
1144         }
1145 out:
1146         lu_env_fini(&env);
1147         RETURN(rc);
1148 }
1149
1150 static int mgs_connect_to_osd(struct mgs_device *m, const char *nextdev)
1151 {
1152         struct obd_connect_data *data = NULL;
1153         struct obd_device       *obd;
1154         int                      rc;
1155         ENTRY;
1156
1157         OBD_ALLOC_PTR(data);
1158         if (data == NULL)
1159                 RETURN(-ENOMEM);
1160
1161         obd = class_name2obd(nextdev);
1162         if (obd == NULL) {
1163                 CERROR("can't locate next device: %s\n", nextdev);
1164                 GOTO(out, rc = -ENOTCONN);
1165         }
1166
1167         data->ocd_version = LUSTRE_VERSION_CODE;
1168
1169         rc = obd_connect(NULL, &m->mgs_bottom_exp, obd,
1170                          &obd->obd_uuid, data, NULL);
1171         if (rc) {
1172                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
1173                 GOTO(out, rc);
1174         }
1175
1176         m->mgs_bottom = lu2dt_dev(m->mgs_bottom_exp->exp_obd->obd_lu_dev);
1177         m->mgs_dt_dev.dd_lu_dev.ld_site = m->mgs_bottom->dd_lu_dev.ld_site;
1178         LASSERT(m->mgs_dt_dev.dd_lu_dev.ld_site);
1179 out:
1180         OBD_FREE_PTR(data);
1181         RETURN(rc);
1182 }
1183
1184 static struct tgt_handler mgs_mgs_handlers[] = {
1185 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1186                 0,                      MGS_CONNECT,     mgs_connect,
1187                 &RQF_CONNECT, LUSTRE_OBD_VERSION),
1188 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1189                 0,                      MGS_DISCONNECT,  mgs_disconnect,
1190                 &RQF_MDS_DISCONNECT, LUSTRE_OBD_VERSION),
1191 TGT_MGS_HDL_VAR(0,                      MGS_EXCEPTION,   mgs_exception),
1192 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 18, 53, 0)
1193 TGT_MGS_HDL(HAS_REPLY | IS_MUTABLE,     MGS_SET_INFO,    mgs_set_info),
1194 #endif
1195 TGT_MGS_HDL(HAS_REPLY | IS_MUTABLE,     MGS_TARGET_REG,  mgs_target_reg),
1196 TGT_MGS_HDL_VAR(0,                      MGS_TARGET_DEL,  mgs_target_del),
1197 TGT_MGS_HDL(HAS_REPLY,                  MGS_CONFIG_READ, mgs_config_read),
1198 };
1199
1200 static struct tgt_handler mgs_obd_handlers[] = {
1201 TGT_OBD_HDL(0,  OBD_PING,       tgt_obd_ping),
1202 };
1203
1204 static struct tgt_handler mgs_dlm_handlers[] = {
1205 [LDLM_ENQUEUE - LDLM_FIRST_OPC] = {
1206         .th_name = "LDLM_ENQUEUE",
1207         /* don't use th_fail_id for MGS to don't interfere with MDS tests.
1208          * * There are no tests for MGS with OBD_FAIL_LDLM_ENQUEUE_NET so it
1209          * * is safe. If such tests will be needed we have to distinguish
1210          * * MDS and MGS fail ids, e.g use OBD_FAIL_MGS_ENQUEUE_NET for MGS
1211          * * instead of common OBD_FAIL_LDLM_ENQUEUE_NET */
1212         .th_fail_id = 0,
1213         .th_opc = LDLM_ENQUEUE,
1214         .th_flags = HAS_KEY,
1215         .th_act = tgt_enqueue,
1216         .th_fmt = &RQF_LDLM_ENQUEUE,
1217         .th_version = LUSTRE_DLM_VERSION,
1218         },
1219 };
1220
1221 static struct tgt_handler mgs_llog_handlers[] = {
1222 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_CREATE,      mgs_llog_open),
1223 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_NEXT_BLOCK,  tgt_llog_next_block),
1224 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_READ_HEADER, tgt_llog_read_header),
1225 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_PREV_BLOCK,  tgt_llog_prev_block),
1226 };
1227
1228 static struct tgt_opc_slice mgs_common_slice[] = {
1229         {
1230                 .tos_opc_start = MGS_FIRST_OPC,
1231                 .tos_opc_end   = MGS_LAST_OPC,
1232                 .tos_hs        = mgs_mgs_handlers
1233         },
1234         {
1235                 .tos_opc_start = OBD_FIRST_OPC,
1236                 .tos_opc_end   = OBD_LAST_OPC,
1237                 .tos_hs        = mgs_obd_handlers
1238         },
1239         {
1240                 .tos_opc_start = LDLM_FIRST_OPC,
1241                 .tos_opc_end   = LDLM_LAST_OPC,
1242                 .tos_hs        = mgs_dlm_handlers
1243         },
1244         {
1245                 .tos_opc_start = LLOG_FIRST_OPC,
1246                 .tos_opc_end   = LLOG_LAST_OPC,
1247                 .tos_hs        = mgs_llog_handlers
1248         },
1249         {
1250                 .tos_opc_start = SEC_FIRST_OPC,
1251                 .tos_opc_end   = SEC_LAST_OPC,
1252                 .tos_hs        = tgt_sec_ctx_handlers
1253         },
1254         {
1255                 .tos_hs        = NULL
1256         }
1257 };
1258
1259 static int mgs_init0(const struct lu_env *env, struct mgs_device *mgs,
1260                      struct lu_device_type *ldt, struct lustre_cfg *lcfg)
1261 {
1262         struct ptlrpc_service_conf       conf;
1263         struct obd_device               *obd;
1264         struct lustre_mount_info        *lmi;
1265         struct llog_ctxt                *ctxt;
1266         int                              rc;
1267
1268         ENTRY;
1269
1270         lmi = server_get_mount(lustre_cfg_string(lcfg, 0));
1271         if (lmi == NULL)
1272                 RETURN(-ENODEV);
1273
1274         mgs->mgs_dt_dev.dd_lu_dev.ld_ops = &mgs_lu_ops;
1275
1276         rc = mgs_connect_to_osd(mgs, lustre_cfg_string(lcfg, 3));
1277         if (rc)
1278                 GOTO(err_lmi, rc);
1279
1280         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1281         LASSERT(obd);
1282         mgs->mgs_obd = obd;
1283         mgs->mgs_obd->obd_lu_dev = &mgs->mgs_dt_dev.dd_lu_dev;
1284
1285         obd->u.obt.obt_magic = OBT_MAGIC;
1286         obd->u.obt.obt_instance = 0;
1287
1288         /* namespace for mgs llog */
1289         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS",
1290                                                 LDLM_NAMESPACE_SERVER,
1291                                                 LDLM_NAMESPACE_MODEST,
1292                                                 LDLM_NS_TYPE_MGT);
1293         if (IS_ERR(obd->obd_namespace)) {
1294                 rc = PTR_ERR(obd->obd_namespace);
1295                 CERROR("%s: unable to create server namespace: rc = %d\n",
1296                        obd->obd_name, rc);
1297                 obd->obd_namespace = NULL;
1298                 GOTO(err_ops, rc);
1299         }
1300
1301         /* No recovery for MGCs */
1302         obd->obd_replayable = 0;
1303
1304         rc = tgt_init(env, &mgs->mgs_lut, obd, mgs->mgs_bottom,
1305                       mgs_common_slice, OBD_FAIL_MGS_ALL_REQUEST_NET,
1306                       OBD_FAIL_MGS_ALL_REPLY_NET);
1307         if (rc)
1308                 GOTO(err_ns, rc);
1309
1310         rc = mgs_fs_setup(env, mgs);
1311         if (rc) {
1312                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
1313                        obd->obd_name, rc);
1314                 GOTO(err_tgt, rc);
1315         }
1316
1317         rc = llog_setup(env, obd, &obd->obd_olg, LLOG_CONFIG_ORIG_CTXT,
1318                         obd, &llog_osd_ops);
1319         if (rc)
1320                 GOTO(err_fs, rc);
1321
1322         /* XXX: we need this trick till N:1 stack is supported
1323          * set "current" directory for named llogs */
1324         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1325         LASSERT(ctxt);
1326         ctxt->loc_dir = mgs->mgs_configs_dir;
1327         llog_ctxt_put(ctxt);
1328
1329         /* Internal mgs setup */
1330         mgs_init_fsdb_list(mgs);
1331         mutex_init(&mgs->mgs_mutex);
1332         mgs->mgs_start_time = ktime_get_real_seconds();
1333         spin_lock_init(&mgs->mgs_lock);
1334         mutex_init(&mgs->mgs_health_mutex);
1335         init_rwsem(&mgs->mgs_barrier_rwsem);
1336
1337         rc = mgs_lcfg_rename(env, mgs);
1338         if (rc)
1339                 GOTO(err_llog, rc);
1340
1341         rc = lproc_mgs_setup(mgs, lustre_cfg_string(lcfg, 3));
1342         if (rc != 0) {
1343                 CERROR("%s: cannot initialize proc entry: rc = %d\n",
1344                        obd->obd_name, rc);
1345                 GOTO(err_llog, rc);
1346         }
1347
1348         /* Setup params fsdb and log, so that other servers can make a local
1349          * copy successfully when they are mounted. See LU-4783 */
1350         rc = mgs_params_fsdb_setup(env, mgs);
1351         if (rc)
1352                 /* params fsdb and log can be setup later */
1353                 CERROR("%s: %s fsdb and log setup failed: rc = %d\n",
1354                        obd->obd_name, PARAMS_FILENAME, rc);
1355
1356         /* Setup _mgs fsdb, useful for srpc */
1357         mgs__mgs_fsdb_setup(env, mgs);
1358
1359         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1360                            "mgs_ldlm_client", &obd->obd_ldlm_client);
1361
1362         conf = (typeof(conf)) {
1363                 .psc_name               = LUSTRE_MGS_NAME,
1364                 .psc_watchdog_factor    = MGS_SERVICE_WATCHDOG_FACTOR,
1365                 .psc_buf                = {
1366                         .bc_nbufs               = MGS_NBUFS,
1367                         .bc_buf_size            = MGS_BUFSIZE,
1368                         .bc_req_max_size        = MGS_MAXREQSIZE,
1369                         .bc_rep_max_size        = MGS_MAXREPSIZE,
1370                         .bc_req_portal          = MGS_REQUEST_PORTAL,
1371                         .bc_rep_portal          = MGC_REPLY_PORTAL,
1372                 },
1373                 .psc_thr                = {
1374                         .tc_thr_name            = "ll_mgs",
1375                         .tc_nthrs_init          = MGS_NTHRS_INIT,
1376                         .tc_nthrs_max           = MGS_NTHRS_MAX,
1377                         .tc_ctx_tags            = LCT_MG_THREAD,
1378                 },
1379                 .psc_ops                = {
1380                         .so_req_handler         = tgt_request_handle,
1381                         .so_req_printer         = target_print_req,
1382                 },
1383         };
1384
1385         /* Start the service threads */
1386         mgs->mgs_service = ptlrpc_register_service(&conf, &obd->obd_kset,
1387                                                    obd->obd_debugfs_entry);
1388         if (IS_ERR(mgs->mgs_service)) {
1389                 rc = PTR_ERR(mgs->mgs_service);
1390                 CERROR("failed to start mgs service: %d\n", rc);
1391                 mgs->mgs_service = NULL;
1392                 GOTO(err_lproc, rc);
1393         }
1394
1395         ping_evictor_start();
1396
1397         CDEBUG(D_INFO, "MGS %s started\n", obd->obd_name);
1398
1399         /* device stack is not yet fully setup to keep no objects behind */
1400         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1401         RETURN(0);
1402 err_lproc:
1403         mgs_params_fsdb_cleanup(env, mgs);
1404         lproc_mgs_cleanup(mgs);
1405 err_llog:
1406         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1407         if (ctxt) {
1408                 ctxt->loc_dir = NULL;
1409                 llog_cleanup(env, ctxt);
1410         }
1411 err_tgt:
1412         tgt_fini(env, &mgs->mgs_lut);
1413 err_fs:
1414         /* No extra cleanup needed for llog_init_commit_thread() */
1415         mgs_fs_cleanup(env, mgs);
1416 err_ns:
1417         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
1418         obd->obd_namespace = NULL;
1419 err_ops:
1420         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1421         lu_site_print(env, mgs2lu_dev(mgs)->ld_site,
1422                       &mgs2lu_dev(mgs)->ld_site->ls_obj_hash.nelems,
1423                       D_OTHER, lu_cdebug_printer);
1424         obd_disconnect(mgs->mgs_bottom_exp);
1425 err_lmi:
1426         if (lmi)
1427                 server_put_mount(lustre_cfg_string(lcfg, 0), true);
1428         RETURN(rc);
1429 }
1430
1431 static struct lu_device *mgs_device_free(const struct lu_env *env,
1432                                          struct lu_device *lu)
1433 {
1434         struct mgs_device *mgs = lu2mgs_dev(lu);
1435         ENTRY;
1436
1437         dt_device_fini(&mgs->mgs_dt_dev);
1438         OBD_FREE_PTR(mgs);
1439         RETURN(NULL);
1440 }
1441
1442 static int mgs_process_config(const struct lu_env *env,
1443                               struct lu_device *dev,
1444                               struct lustre_cfg *lcfg)
1445 {
1446         LBUG();
1447         return 0;
1448 }
1449
1450 static int mgs_object_init(const struct lu_env *env, struct lu_object *o,
1451                            const struct lu_object_conf *unused)
1452 {
1453         struct mgs_device *d = lu2mgs_dev(o->lo_dev);
1454         struct lu_device  *under;
1455         struct lu_object  *below;
1456         int                rc = 0;
1457         ENTRY;
1458
1459         /* do no set .do_ops as mgs calls to bottom osd directly */
1460
1461         CDEBUG(D_INFO, "object init, fid = "DFID"\n",
1462                         PFID(lu_object_fid(o)));
1463
1464         under = &d->mgs_bottom->dd_lu_dev;
1465         below = under->ld_ops->ldo_object_alloc(env, o->lo_header, under);
1466         if (below != NULL)
1467                 lu_object_add(o, below);
1468         else
1469                 rc = -ENOMEM;
1470
1471         return rc;
1472 }
1473
1474 static void mgs_object_free(const struct lu_env *env, struct lu_object *o)
1475 {
1476         struct mgs_object *obj = lu2mgs_obj(o);
1477         struct lu_object_header *h = o->lo_header;
1478
1479         dt_object_fini(&obj->mgo_obj);
1480         lu_object_header_fini(h);
1481         OBD_FREE_PRE(obj, sizeof(*obj), "kfreed");
1482         kfree_rcu(obj, mgo_header.loh_rcu);
1483 }
1484
1485 static int mgs_object_print(const struct lu_env *env, void *cookie,
1486                             lu_printer_t p, const struct lu_object *l)
1487 {
1488         const struct mgs_object *o = lu2mgs_obj((struct lu_object *) l);
1489
1490         return (*p)(env, cookie, LUSTRE_MGS_NAME"-object@%p", o);
1491 }
1492
1493 static const struct lu_object_operations mgs_lu_obj_ops = {
1494         .loo_object_init        = mgs_object_init,
1495         .loo_object_free        = mgs_object_free,
1496         .loo_object_print       = mgs_object_print,
1497 };
1498
1499 static struct lu_object *mgs_object_alloc(const struct lu_env *env,
1500                                           const struct lu_object_header *hdr,
1501                                           struct lu_device *d)
1502 {
1503         struct lu_object_header *h;
1504         struct mgs_object       *o;
1505         struct lu_object        *l;
1506
1507         LASSERT(hdr == NULL);
1508
1509         OBD_ALLOC_PTR(o);
1510         if (o != NULL) {
1511                 l = &o->mgo_obj.do_lu;
1512                 h = &o->mgo_header;
1513
1514                 lu_object_header_init(h);
1515                 dt_object_init(&o->mgo_obj, h, d);
1516                 lu_object_add_top(h, l);
1517
1518                 l->lo_ops = &mgs_lu_obj_ops;
1519
1520                 return l;
1521         } else {
1522                 return NULL;
1523         }
1524 }
1525
1526 const struct lu_device_operations mgs_lu_ops = {
1527         .ldo_object_alloc       = mgs_object_alloc,
1528         .ldo_process_config     = mgs_process_config,
1529 };
1530
1531 static struct lu_device *mgs_device_alloc(const struct lu_env *env,
1532                                           struct lu_device_type *type,
1533                                           struct lustre_cfg *lcfg)
1534 {
1535         struct mgs_device *mgs;
1536         struct lu_device  *ludev;
1537
1538         OBD_ALLOC_PTR(mgs);
1539         if (mgs == NULL) {
1540                 ludev = ERR_PTR(-ENOMEM);
1541         } else {
1542                 int rc;
1543
1544                 ludev = mgs2lu_dev(mgs);
1545                 dt_device_init(&mgs->mgs_dt_dev, type);
1546                 rc = mgs_init0(env, mgs, type, lcfg);
1547                 if (rc != 0) {
1548                         mgs_device_free(env, ludev);
1549                         ludev = ERR_PTR(rc);
1550                 }
1551         }
1552         return ludev;
1553 }
1554
1555 static struct lu_device *mgs_device_fini(const struct lu_env *env,
1556                                          struct lu_device *d)
1557 {
1558         struct mgs_device       *mgs = lu2mgs_dev(d);
1559         struct obd_device       *obd = mgs->mgs_obd;
1560         struct llog_ctxt        *ctxt;
1561
1562         ENTRY;
1563
1564         LASSERT(mgs->mgs_bottom);
1565
1566         class_disconnect_exports(obd);
1567
1568         ping_evictor_stop();
1569
1570         mutex_lock(&mgs->mgs_health_mutex);
1571         ptlrpc_unregister_service(mgs->mgs_service);
1572         mutex_unlock(&mgs->mgs_health_mutex);
1573
1574         mgs_params_fsdb_cleanup(env, mgs);
1575         mgs_cleanup_fsdb_list(mgs);
1576
1577         ldlm_namespace_free_prior(obd->obd_namespace, NULL, 1);
1578         obd_exports_barrier(obd);
1579         obd_zombie_barrier();
1580
1581         tgt_fini(env, &mgs->mgs_lut);
1582         lproc_mgs_cleanup(mgs);
1583
1584         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1585         if (ctxt) {
1586                 ctxt->loc_dir = NULL;
1587                 llog_cleanup(env, ctxt);
1588         }
1589
1590         mgs_fs_cleanup(env, mgs);
1591
1592         ldlm_namespace_free_post(obd->obd_namespace);
1593         obd->obd_namespace = NULL;
1594
1595         lu_site_purge(env, d->ld_site, ~0);
1596         lu_site_print(env, d->ld_site, &d->ld_site->ls_obj_hash.nelems,
1597                       D_OTHER, lu_cdebug_printer);
1598         LASSERT(mgs->mgs_bottom_exp);
1599         obd_disconnect(mgs->mgs_bottom_exp);
1600
1601         server_put_mount(obd->obd_name, true);
1602
1603         RETURN(NULL);
1604 }
1605
1606 /* context key constructor/destructor: mgs_key_init, mgs_key_fini */
1607 LU_KEY_INIT_FINI(mgs, struct mgs_thread_info);
1608
1609 LU_TYPE_INIT_FINI(mgs, &mgs_thread_key);
1610
1611 LU_CONTEXT_KEY_DEFINE(mgs, LCT_MG_THREAD);
1612
1613 static const struct lu_device_type_operations mgs_device_type_ops = {
1614         .ldto_init              = mgs_type_init,
1615         .ldto_fini              = mgs_type_fini,
1616
1617         .ldto_start             = mgs_type_start,
1618         .ldto_stop              = mgs_type_stop,
1619
1620         .ldto_device_alloc      = mgs_device_alloc,
1621         .ldto_device_free       = mgs_device_free,
1622
1623         .ldto_device_fini       = mgs_device_fini
1624 };
1625
1626 static struct lu_device_type mgs_device_type = {
1627         .ldt_tags       = LU_DEVICE_DT,
1628         .ldt_name       = LUSTRE_MGS_NAME,
1629         .ldt_ops        = &mgs_device_type_ops,
1630         .ldt_ctx_tags   = LCT_MG_THREAD
1631 };
1632
1633 static int mgs_obd_reconnect(const struct lu_env *env, struct obd_export *exp,
1634                              struct obd_device *obd, struct obd_uuid *cluuid,
1635                              struct obd_connect_data *data, void *localdata)
1636 {
1637         ENTRY;
1638
1639         if (exp == NULL || obd == NULL || cluuid == NULL)
1640                 RETURN(-EINVAL);
1641
1642         tgt_counter_incr(exp, LPROC_MGS_CONNECT);
1643
1644         if (data != NULL) {
1645                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
1646
1647                 if (data->ocd_connect_flags & OBD_CONNECT_FLAGS2)
1648                         data->ocd_connect_flags2 &= MGS_CONNECT_SUPPORTED2;
1649
1650                 exp->exp_connect_data = *data;
1651                 data->ocd_version = LUSTRE_VERSION_CODE;
1652         }
1653
1654         RETURN(mgs_export_stats_init(obd, exp, localdata));
1655 }
1656
1657 static int mgs_obd_connect(const struct lu_env *env, struct obd_export **exp,
1658                            struct obd_device *obd, struct obd_uuid *cluuid,
1659                            struct obd_connect_data *data, void *localdata)
1660 {
1661         struct obd_export       *lexp;
1662         struct lustre_handle     conn = {
1663                 .cookie = 0,
1664         };
1665         int                      rc;
1666
1667         ENTRY;
1668
1669         if (exp == NULL || obd == NULL || cluuid == NULL)
1670                 RETURN(-EINVAL);
1671
1672         rc = class_connect(&conn, obd, cluuid);
1673         if (rc)
1674                 RETURN(rc);
1675
1676         lexp = class_conn2export(&conn);
1677         if (lexp == NULL)
1678                 RETURN(-EFAULT);
1679
1680         rc = mgs_obd_reconnect(env, lexp, obd, cluuid, data, localdata);
1681         if (rc)
1682                 GOTO(out_disconnect, rc);
1683
1684         *exp = lexp;
1685
1686         RETURN(rc);
1687
1688 out_disconnect:
1689         class_disconnect(lexp);
1690
1691         return rc;
1692 }
1693
1694 static int mgs_obd_disconnect(struct obd_export *exp)
1695 {
1696         int rc;
1697
1698         ENTRY;
1699
1700         LASSERT(exp);
1701
1702         mgs_fsc_cleanup(exp);
1703
1704         class_export_get(exp);
1705         tgt_counter_incr(exp, LPROC_MGS_DISCONNECT);
1706
1707         rc = server_disconnect_export(exp);
1708         class_export_put(exp);
1709         RETURN(rc);
1710 }
1711
1712 static int mgs_health_check(const struct lu_env *env, struct obd_device *obd)
1713 {
1714         struct mgs_device *mgs = lu2mgs_dev(obd->obd_lu_dev);
1715         int rc = 0;
1716
1717         mutex_lock(&mgs->mgs_health_mutex);
1718         rc |= ptlrpc_service_health_check(mgs->mgs_service);
1719         mutex_unlock(&mgs->mgs_health_mutex);
1720
1721         return rc != 0 ? 1 : 0;
1722 }
1723
1724 /* use obd ops to offer management infrastructure */
1725 static const struct obd_ops mgs_obd_device_ops = {
1726         .o_owner                = THIS_MODULE,
1727         .o_connect              = mgs_obd_connect,
1728         .o_reconnect            = mgs_obd_reconnect,
1729         .o_disconnect           = mgs_obd_disconnect,
1730         .o_init_export          = mgs_init_export,
1731         .o_destroy_export       = mgs_destroy_export,
1732         .o_iocontrol            = mgs_iocontrol,
1733         .o_health_check         = mgs_health_check,
1734 };
1735
1736 static int __init mgs_init(void)
1737 {
1738         return class_register_type(&mgs_obd_device_ops, NULL, true,
1739                                    LUSTRE_MGS_NAME, &mgs_device_type);
1740 }
1741
1742 static void __exit mgs_exit(void)
1743 {
1744         class_unregister_type(LUSTRE_MGS_NAME);
1745 }
1746
1747 MODULE_AUTHOR("OpenSFS, Inc. <http://www.lustre.org/>");
1748 MODULE_DESCRIPTION("Lustre Management Server (MGS)");
1749 MODULE_VERSION(LUSTRE_VERSION_STRING);
1750 MODULE_LICENSE("GPL");
1751
1752 module_init(mgs_init);
1753 module_exit(mgs_exit);