Whamcloud - gitweb
LU-15451 sec: read-only nodemap flag
[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         case LCFG_NODEMAP_READONLY_MOUNT:
866                 if (lcfg->lcfg_bufcount != 4)
867                         GOTO(out_lcfg, rc = -EINVAL);
868                 nodemap_name = lustre_cfg_string(lcfg, 1);
869                 param = lustre_cfg_string(lcfg, 3);
870                 rc = mgs_nodemap_cmd(env, mgs, cmd, nodemap_name, param);
871                 break;
872         default:
873                 rc = -ENOTTY;
874         }
875
876         if (rc) {
877                 CDEBUG_LIMIT(rc == -EEXIST ? D_INFO : D_ERROR,
878                              "%s: OBD_IOC_NODEMAP command %X for %s: rc = %d\n",
879                              mgs->mgs_obd->obd_name, lcfg->lcfg_command,
880                              nodemap_name, rc);
881                 GOTO(out_lcfg, rc);
882         }
883
884         /* revoke nodemap lock */
885         rc = mgs_find_or_make_fsdb(env, mgs, LUSTRE_NODEMAP_NAME, &fsdb);
886         if (rc < 0) {
887                 CWARN("%s: cannot make nodemap fsdb: rc = %d\n",
888                       mgs->mgs_obd->obd_name, rc);
889         } else {
890                 mgs_revoke_lock(mgs, fsdb, MGS_CFG_T_NODEMAP);
891                 mgs_put_fsdb(mgs, fsdb);
892         }
893
894 out_lcfg:
895         OBD_FREE(lcfg, data->ioc_plen1);
896 out:
897         RETURN(rc);
898 }
899
900 static int mgs_iocontrol_pool(const struct lu_env *env,
901                               struct mgs_device *mgs,
902                               struct obd_ioctl_data *data)
903 {
904         struct mgs_thread_info *mgi = mgs_env_info(env);
905         int rc;
906         struct lustre_cfg *lcfg = NULL;
907         char *poolname = NULL;
908         ENTRY;
909
910         OBD_ALLOC(poolname, LOV_MAXPOOLNAME + 1);
911         if (poolname == NULL)
912                 RETURN(-ENOMEM);
913
914         if (data->ioc_type != LUSTRE_CFG_TYPE) {
915                 CERROR("%s: unknown cfg record type: %d\n",
916                        mgs->mgs_obd->obd_name, data->ioc_type);
917                 GOTO(out_pool, rc = -EINVAL);
918         }
919
920         if (data->ioc_plen1 > PAGE_SIZE)
921                 GOTO(out_pool, rc = -E2BIG);
922
923         OBD_ALLOC(lcfg, data->ioc_plen1);
924         if (lcfg == NULL)
925                 GOTO(out_pool, rc = -ENOMEM);
926
927         if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
928                 GOTO(out_lcfg, rc = -EFAULT);
929
930         if (lcfg->lcfg_bufcount < 2)
931                 GOTO(out_lcfg, rc = -EFAULT);
932
933         /* first arg is always <fsname>.<poolname> */
934         rc = mgs_extract_fs_pool(lustre_cfg_string(lcfg, 1), mgi->mgi_fsname,
935                                  poolname);
936         if (rc)
937                 GOTO(out_lcfg, rc);
938
939         switch (lcfg->lcfg_command) {
940         case LCFG_POOL_NEW:
941                 if (lcfg->lcfg_bufcount != 2)
942                         GOTO(out_lcfg, rc = -EINVAL);
943                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_NEW, mgi->mgi_fsname,
944                                   poolname, NULL);
945                 break;
946         case LCFG_POOL_ADD:
947                 if (lcfg->lcfg_bufcount != 3)
948                         GOTO(out_lcfg, rc = -EINVAL);
949                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_ADD, mgi->mgi_fsname,
950                                   poolname, lustre_cfg_string(lcfg, 2));
951                 break;
952         case LCFG_POOL_REM:
953                 if (lcfg->lcfg_bufcount != 3)
954                         GOTO(out_lcfg, rc = -EINVAL);
955                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_REM, mgi->mgi_fsname,
956                                   poolname, lustre_cfg_string(lcfg, 2));
957                 break;
958         case LCFG_POOL_DEL:
959                 if (lcfg->lcfg_bufcount != 2)
960                         GOTO(out_lcfg, rc = -EINVAL);
961                 rc = mgs_pool_cmd(env, mgs, LCFG_POOL_DEL, mgi->mgi_fsname,
962                                   poolname, NULL);
963                 break;
964         default:
965                  rc = -EINVAL;
966         }
967
968         if (rc) {
969                 CERROR("OBD_IOC_POOL err %d, cmd %X for pool %s.%s\n",
970                        rc, lcfg->lcfg_command, mgi->mgi_fsname, poolname);
971                 GOTO(out_lcfg, rc);
972         }
973
974 out_lcfg:
975         OBD_FREE(lcfg, data->ioc_plen1);
976 out_pool:
977         OBD_FREE(poolname, LOV_MAXPOOLNAME + 1);
978         RETURN(rc);
979 }
980
981 /* from mdt_iocontrol */
982 static int mgs_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
983                          void *karg, void __user *uarg)
984 {
985         struct mgs_device *mgs = exp2mgs_dev(exp);
986         struct obd_ioctl_data *data = karg;
987         struct lu_env env;
988         int rc = 0;
989
990         ENTRY;
991         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
992
993         rc = lu_env_init(&env, LCT_MG_THREAD);
994         if (rc)
995                 RETURN(rc);
996
997         switch (cmd) {
998
999         case OBD_IOC_PARAM: {
1000                 struct lustre_cfg *lcfg;
1001
1002                 if (data->ioc_type != LUSTRE_CFG_TYPE) {
1003                         CERROR("%s: unknown cfg record type: %d\n",
1004                                mgs->mgs_obd->obd_name, data->ioc_type);
1005                         GOTO(out, rc = -EINVAL);
1006                 }
1007
1008                 OBD_ALLOC(lcfg, data->ioc_plen1);
1009                 if (lcfg == NULL)
1010                         GOTO(out, rc = -ENOMEM);
1011                 if (copy_from_user(lcfg, data->ioc_pbuf1, data->ioc_plen1))
1012                         GOTO(out_free, rc = -EFAULT);
1013
1014                 if (lcfg->lcfg_bufcount < 1)
1015                         GOTO(out_free, rc = -EINVAL);
1016
1017                 rc = mgs_set_param(&env, mgs, lcfg);
1018                 if (rc)
1019                         CERROR("%s: setparam err: rc = %d\n",
1020                                exp->exp_obd->obd_name, rc);
1021 out_free:
1022                 OBD_FREE(lcfg, data->ioc_plen1);
1023                 break;
1024         }
1025
1026         case OBD_IOC_REPLACE_NIDS: {
1027                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1028                         rc = -EINVAL;
1029                         CERROR("%s: no device or fsname specified: rc = %d\n",
1030                                exp->exp_obd->obd_name, rc);
1031                         break;
1032                 }
1033
1034                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1035                         rc = -EOVERFLOW;
1036                         CERROR("%s: device or fsname is too long: rc = %d\n",
1037                                exp->exp_obd->obd_name, rc);
1038                         break;
1039                 }
1040
1041                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1042                         rc = -EINVAL;
1043                         CERROR("%s: device or fsname is not NUL terminated: "
1044                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1045                         break;
1046                 }
1047
1048                 if (!data->ioc_inllen2 || !data->ioc_inlbuf2) {
1049                         rc = -EINVAL;
1050                         CERROR("%s: no NIDs specified: rc = %d\n",
1051                                exp->exp_obd->obd_name, rc);
1052                         break;
1053                 }
1054
1055                 if (data->ioc_inlbuf2[data->ioc_inllen2 - 1] != 0) {
1056                         rc = -EINVAL;
1057                         CERROR("%s: NID list is not NUL terminated: "
1058                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1059                         break;
1060                 }
1061
1062                 /* replace nids in llog */
1063                 rc = mgs_replace_nids(&env, mgs, data->ioc_inlbuf1,
1064                                       data->ioc_inlbuf2);
1065                 if (rc)
1066                         CERROR("%s: error replacing nids: rc = %d\n",
1067                                exp->exp_obd->obd_name, rc);
1068
1069                 break;
1070         }
1071
1072         case OBD_IOC_CLEAR_CONFIGS: {
1073                 if (!data->ioc_inllen1 || !data->ioc_inlbuf1) {
1074                         rc = -EINVAL;
1075                         CERROR("%s: no device or fsname specified: rc = %d\n",
1076                                exp->exp_obd->obd_name, rc);
1077                         break;
1078                 }
1079
1080                 if (data->ioc_inllen1 > MTI_NAME_MAXLEN) {
1081                         rc = -EOVERFLOW;
1082                         CERROR("%s: device or fsname is too long: rc = %d\n",
1083                                exp->exp_obd->obd_name, rc);
1084                         break;
1085                 }
1086
1087                 if (data->ioc_inlbuf1[data->ioc_inllen1 - 1] != 0) {
1088                         rc = -EINVAL;
1089                         CERROR("%s: device or fsname is not NUL terminated: "
1090                                "rc = %d\n", exp->exp_obd->obd_name, rc);
1091                         break;
1092                 }
1093
1094                 /* remove records marked SKIP from config logs */
1095                 rc = mgs_clear_configs(&env, mgs, data->ioc_inlbuf1);
1096                 if (rc)
1097                         CERROR("%s: error clearing config log: rc = %d\n",
1098                                exp->exp_obd->obd_name, rc);
1099
1100                 break;
1101         }
1102
1103         case OBD_IOC_POOL:
1104                 rc = mgs_iocontrol_pool(&env, mgs, data);
1105                 break;
1106
1107         case OBD_IOC_BARRIER:
1108                 rc = mgs_iocontrol_barrier(&env, mgs, data);
1109                 break;
1110
1111         case OBD_IOC_NODEMAP:
1112                 rc = mgs_iocontrol_nodemap(&env, mgs, data);
1113                 break;
1114
1115         case OBD_IOC_LCFG_FORK:
1116                 rc = mgs_lcfg_fork(&env, mgs, data->ioc_inlbuf1,
1117                                    data->ioc_inlbuf2);
1118                 break;
1119
1120         case OBD_IOC_LCFG_ERASE:
1121                 rc = mgs_lcfg_erase(&env, mgs, data->ioc_inlbuf1);
1122                 break;
1123
1124         case OBD_IOC_CATLOGLIST:
1125                 rc = mgs_list_logs(&env, mgs, data);
1126                 break;
1127         case OBD_IOC_LLOG_CANCEL:
1128         case OBD_IOC_LLOG_REMOVE:
1129         case OBD_IOC_LLOG_CHECK:
1130         case OBD_IOC_LLOG_INFO:
1131         case OBD_IOC_LLOG_PRINT: {
1132                 struct llog_ctxt *ctxt;
1133
1134                 ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1135                 rc = llog_ioctl(&env, ctxt, cmd, data);
1136                 llog_ctxt_put(ctxt);
1137                 break;
1138         }
1139
1140         default:
1141                 CERROR("%s: unknown command %#x\n",
1142                        mgs->mgs_obd->obd_name,  cmd);
1143                 rc = -ENOTTY;
1144                 break;
1145         }
1146 out:
1147         lu_env_fini(&env);
1148         RETURN(rc);
1149 }
1150
1151 static int mgs_connect_to_osd(struct mgs_device *m, const char *nextdev)
1152 {
1153         struct obd_connect_data *data = NULL;
1154         struct obd_device       *obd;
1155         int                      rc;
1156         ENTRY;
1157
1158         OBD_ALLOC_PTR(data);
1159         if (data == NULL)
1160                 RETURN(-ENOMEM);
1161
1162         obd = class_name2obd(nextdev);
1163         if (obd == NULL) {
1164                 CERROR("can't locate next device: %s\n", nextdev);
1165                 GOTO(out, rc = -ENOTCONN);
1166         }
1167
1168         data->ocd_version = LUSTRE_VERSION_CODE;
1169
1170         rc = obd_connect(NULL, &m->mgs_bottom_exp, obd,
1171                          &obd->obd_uuid, data, NULL);
1172         if (rc) {
1173                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
1174                 GOTO(out, rc);
1175         }
1176
1177         m->mgs_bottom = lu2dt_dev(m->mgs_bottom_exp->exp_obd->obd_lu_dev);
1178         m->mgs_dt_dev.dd_lu_dev.ld_site = m->mgs_bottom->dd_lu_dev.ld_site;
1179         LASSERT(m->mgs_dt_dev.dd_lu_dev.ld_site);
1180 out:
1181         OBD_FREE_PTR(data);
1182         RETURN(rc);
1183 }
1184
1185 static struct tgt_handler mgs_mgs_handlers[] = {
1186 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1187                 0,                      MGS_CONNECT,     mgs_connect,
1188                 &RQF_CONNECT, LUSTRE_OBD_VERSION),
1189 TGT_RPC_HANDLER(MGS_FIRST_OPC,
1190                 0,                      MGS_DISCONNECT,  mgs_disconnect,
1191                 &RQF_MDS_DISCONNECT, LUSTRE_OBD_VERSION),
1192 TGT_MGS_HDL_VAR(0,                      MGS_EXCEPTION,   mgs_exception),
1193 #if LUSTRE_VERSION_CODE < OBD_OCD_VERSION(2, 18, 53, 0)
1194 TGT_MGS_HDL(HAS_REPLY | IS_MUTABLE,     MGS_SET_INFO,    mgs_set_info),
1195 #endif
1196 TGT_MGS_HDL(HAS_REPLY | IS_MUTABLE,     MGS_TARGET_REG,  mgs_target_reg),
1197 TGT_MGS_HDL_VAR(0,                      MGS_TARGET_DEL,  mgs_target_del),
1198 TGT_MGS_HDL(HAS_REPLY,                  MGS_CONFIG_READ, mgs_config_read),
1199 };
1200
1201 static struct tgt_handler mgs_obd_handlers[] = {
1202 TGT_OBD_HDL(0,  OBD_PING,       tgt_obd_ping),
1203 };
1204
1205 static struct tgt_handler mgs_dlm_handlers[] = {
1206 [LDLM_ENQUEUE - LDLM_FIRST_OPC] = {
1207         .th_name = "LDLM_ENQUEUE",
1208         /* don't use th_fail_id for MGS to don't interfere with MDS tests.
1209          * * There are no tests for MGS with OBD_FAIL_LDLM_ENQUEUE_NET so it
1210          * * is safe. If such tests will be needed we have to distinguish
1211          * * MDS and MGS fail ids, e.g use OBD_FAIL_MGS_ENQUEUE_NET for MGS
1212          * * instead of common OBD_FAIL_LDLM_ENQUEUE_NET */
1213         .th_fail_id = 0,
1214         .th_opc = LDLM_ENQUEUE,
1215         .th_flags = HAS_KEY,
1216         .th_act = tgt_enqueue,
1217         .th_fmt = &RQF_LDLM_ENQUEUE,
1218         .th_version = LUSTRE_DLM_VERSION,
1219         },
1220 };
1221
1222 static struct tgt_handler mgs_llog_handlers[] = {
1223 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_CREATE,      mgs_llog_open),
1224 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_NEXT_BLOCK,  tgt_llog_next_block),
1225 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_READ_HEADER, tgt_llog_read_header),
1226 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_PREV_BLOCK,  tgt_llog_prev_block),
1227 };
1228
1229 static struct tgt_opc_slice mgs_common_slice[] = {
1230         {
1231                 .tos_opc_start = MGS_FIRST_OPC,
1232                 .tos_opc_end   = MGS_LAST_OPC,
1233                 .tos_hs        = mgs_mgs_handlers
1234         },
1235         {
1236                 .tos_opc_start = OBD_FIRST_OPC,
1237                 .tos_opc_end   = OBD_LAST_OPC,
1238                 .tos_hs        = mgs_obd_handlers
1239         },
1240         {
1241                 .tos_opc_start = LDLM_FIRST_OPC,
1242                 .tos_opc_end   = LDLM_LAST_OPC,
1243                 .tos_hs        = mgs_dlm_handlers
1244         },
1245         {
1246                 .tos_opc_start = LLOG_FIRST_OPC,
1247                 .tos_opc_end   = LLOG_LAST_OPC,
1248                 .tos_hs        = mgs_llog_handlers
1249         },
1250         {
1251                 .tos_opc_start = SEC_FIRST_OPC,
1252                 .tos_opc_end   = SEC_LAST_OPC,
1253                 .tos_hs        = tgt_sec_ctx_handlers
1254         },
1255         {
1256                 .tos_hs        = NULL
1257         }
1258 };
1259
1260 static int mgs_init0(const struct lu_env *env, struct mgs_device *mgs,
1261                      struct lu_device_type *ldt, struct lustre_cfg *lcfg)
1262 {
1263         struct ptlrpc_service_conf       conf;
1264         struct obd_device               *obd;
1265         struct lustre_mount_info        *lmi;
1266         struct llog_ctxt                *ctxt;
1267         int                              rc;
1268
1269         ENTRY;
1270
1271         lmi = server_get_mount(lustre_cfg_string(lcfg, 0));
1272         if (lmi == NULL)
1273                 RETURN(-ENODEV);
1274
1275         mgs->mgs_dt_dev.dd_lu_dev.ld_ops = &mgs_lu_ops;
1276
1277         rc = mgs_connect_to_osd(mgs, lustre_cfg_string(lcfg, 3));
1278         if (rc)
1279                 GOTO(err_lmi, rc);
1280
1281         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1282         LASSERT(obd);
1283         mgs->mgs_obd = obd;
1284         mgs->mgs_obd->obd_lu_dev = &mgs->mgs_dt_dev.dd_lu_dev;
1285
1286         obd->u.obt.obt_magic = OBT_MAGIC;
1287         obd->u.obt.obt_instance = 0;
1288
1289         /* namespace for mgs llog */
1290         obd->obd_namespace = ldlm_namespace_new(obd ,"MGS",
1291                                                 LDLM_NAMESPACE_SERVER,
1292                                                 LDLM_NAMESPACE_MODEST,
1293                                                 LDLM_NS_TYPE_MGT);
1294         if (IS_ERR(obd->obd_namespace)) {
1295                 rc = PTR_ERR(obd->obd_namespace);
1296                 CERROR("%s: unable to create server namespace: rc = %d\n",
1297                        obd->obd_name, rc);
1298                 obd->obd_namespace = NULL;
1299                 GOTO(err_ops, rc);
1300         }
1301
1302         /* No recovery for MGCs */
1303         obd->obd_replayable = 0;
1304
1305         rc = tgt_init(env, &mgs->mgs_lut, obd, mgs->mgs_bottom,
1306                       mgs_common_slice, OBD_FAIL_MGS_ALL_REQUEST_NET,
1307                       OBD_FAIL_MGS_ALL_REPLY_NET);
1308         if (rc)
1309                 GOTO(err_ns, rc);
1310
1311         rc = mgs_fs_setup(env, mgs);
1312         if (rc) {
1313                 CERROR("%s: MGS filesystem method init failed: rc = %d\n",
1314                        obd->obd_name, rc);
1315                 GOTO(err_tgt, rc);
1316         }
1317
1318         rc = llog_setup(env, obd, &obd->obd_olg, LLOG_CONFIG_ORIG_CTXT,
1319                         obd, &llog_osd_ops);
1320         if (rc)
1321                 GOTO(err_fs, rc);
1322
1323         /* XXX: we need this trick till N:1 stack is supported
1324          * set "current" directory for named llogs */
1325         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1326         LASSERT(ctxt);
1327         ctxt->loc_dir = mgs->mgs_configs_dir;
1328         llog_ctxt_put(ctxt);
1329
1330         /* Internal mgs setup */
1331         mgs_init_fsdb_list(mgs);
1332         mutex_init(&mgs->mgs_mutex);
1333         mgs->mgs_start_time = ktime_get_real_seconds();
1334         spin_lock_init(&mgs->mgs_lock);
1335         mutex_init(&mgs->mgs_health_mutex);
1336         init_rwsem(&mgs->mgs_barrier_rwsem);
1337
1338         rc = mgs_lcfg_rename(env, mgs);
1339         if (rc)
1340                 GOTO(err_llog, rc);
1341
1342         rc = lproc_mgs_setup(mgs, lustre_cfg_string(lcfg, 3));
1343         if (rc != 0) {
1344                 CERROR("%s: cannot initialize proc entry: rc = %d\n",
1345                        obd->obd_name, rc);
1346                 GOTO(err_llog, rc);
1347         }
1348
1349         /* Setup params fsdb and log, so that other servers can make a local
1350          * copy successfully when they are mounted. See LU-4783 */
1351         rc = mgs_params_fsdb_setup(env, mgs);
1352         if (rc)
1353                 /* params fsdb and log can be setup later */
1354                 CERROR("%s: %s fsdb and log setup failed: rc = %d\n",
1355                        obd->obd_name, PARAMS_FILENAME, rc);
1356
1357         /* Setup _mgs fsdb, useful for srpc */
1358         mgs__mgs_fsdb_setup(env, mgs);
1359
1360         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1361                            "mgs_ldlm_client", &obd->obd_ldlm_client);
1362
1363         conf = (typeof(conf)) {
1364                 .psc_name               = LUSTRE_MGS_NAME,
1365                 .psc_watchdog_factor    = MGS_SERVICE_WATCHDOG_FACTOR,
1366                 .psc_buf                = {
1367                         .bc_nbufs               = MGS_NBUFS,
1368                         .bc_buf_size            = MGS_BUFSIZE,
1369                         .bc_req_max_size        = MGS_MAXREQSIZE,
1370                         .bc_rep_max_size        = MGS_MAXREPSIZE,
1371                         .bc_req_portal          = MGS_REQUEST_PORTAL,
1372                         .bc_rep_portal          = MGC_REPLY_PORTAL,
1373                 },
1374                 .psc_thr                = {
1375                         .tc_thr_name            = "ll_mgs",
1376                         .tc_nthrs_init          = MGS_NTHRS_INIT,
1377                         .tc_nthrs_max           = MGS_NTHRS_MAX,
1378                         .tc_ctx_tags            = LCT_MG_THREAD,
1379                 },
1380                 .psc_ops                = {
1381                         .so_req_handler         = tgt_request_handle,
1382                         .so_req_printer         = target_print_req,
1383                 },
1384         };
1385
1386         /* Start the service threads */
1387         mgs->mgs_service = ptlrpc_register_service(&conf, &obd->obd_kset,
1388                                                    obd->obd_debugfs_entry);
1389         if (IS_ERR(mgs->mgs_service)) {
1390                 rc = PTR_ERR(mgs->mgs_service);
1391                 CERROR("failed to start mgs service: %d\n", rc);
1392                 mgs->mgs_service = NULL;
1393                 GOTO(err_lproc, rc);
1394         }
1395
1396         ping_evictor_start();
1397
1398         CDEBUG(D_INFO, "MGS %s started\n", obd->obd_name);
1399
1400         /* device stack is not yet fully setup to keep no objects behind */
1401         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1402         RETURN(0);
1403 err_lproc:
1404         mgs_params_fsdb_cleanup(env, mgs);
1405         lproc_mgs_cleanup(mgs);
1406 err_llog:
1407         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1408         if (ctxt) {
1409                 ctxt->loc_dir = NULL;
1410                 llog_cleanup(env, ctxt);
1411         }
1412 err_tgt:
1413         tgt_fini(env, &mgs->mgs_lut);
1414 err_fs:
1415         /* No extra cleanup needed for llog_init_commit_thread() */
1416         mgs_fs_cleanup(env, mgs);
1417 err_ns:
1418         ldlm_namespace_free(obd->obd_namespace, NULL, 0);
1419         obd->obd_namespace = NULL;
1420 err_ops:
1421         lu_site_purge(env, mgs2lu_dev(mgs)->ld_site, ~0);
1422         lu_site_print(env, mgs2lu_dev(mgs)->ld_site,
1423                       &mgs2lu_dev(mgs)->ld_site->ls_obj_hash.nelems,
1424                       D_OTHER, lu_cdebug_printer);
1425         obd_disconnect(mgs->mgs_bottom_exp);
1426 err_lmi:
1427         if (lmi)
1428                 server_put_mount(lustre_cfg_string(lcfg, 0), true);
1429         RETURN(rc);
1430 }
1431
1432 static struct lu_device *mgs_device_free(const struct lu_env *env,
1433                                          struct lu_device *lu)
1434 {
1435         struct mgs_device *mgs = lu2mgs_dev(lu);
1436         ENTRY;
1437
1438         dt_device_fini(&mgs->mgs_dt_dev);
1439         OBD_FREE_PTR(mgs);
1440         RETURN(NULL);
1441 }
1442
1443 static int mgs_process_config(const struct lu_env *env,
1444                               struct lu_device *dev,
1445                               struct lustre_cfg *lcfg)
1446 {
1447         LBUG();
1448         return 0;
1449 }
1450
1451 static int mgs_object_init(const struct lu_env *env, struct lu_object *o,
1452                            const struct lu_object_conf *unused)
1453 {
1454         struct mgs_device *d = lu2mgs_dev(o->lo_dev);
1455         struct lu_device  *under;
1456         struct lu_object  *below;
1457         int                rc = 0;
1458         ENTRY;
1459
1460         /* do no set .do_ops as mgs calls to bottom osd directly */
1461
1462         CDEBUG(D_INFO, "object init, fid = "DFID"\n",
1463                         PFID(lu_object_fid(o)));
1464
1465         under = &d->mgs_bottom->dd_lu_dev;
1466         below = under->ld_ops->ldo_object_alloc(env, o->lo_header, under);
1467         if (below != NULL)
1468                 lu_object_add(o, below);
1469         else
1470                 rc = -ENOMEM;
1471
1472         return rc;
1473 }
1474
1475 static void mgs_object_free(const struct lu_env *env, struct lu_object *o)
1476 {
1477         struct mgs_object *obj = lu2mgs_obj(o);
1478         struct lu_object_header *h = o->lo_header;
1479
1480         dt_object_fini(&obj->mgo_obj);
1481         lu_object_header_fini(h);
1482         OBD_FREE_PRE(obj, sizeof(*obj), "kfreed");
1483         kfree_rcu(obj, mgo_header.loh_rcu);
1484 }
1485
1486 static int mgs_object_print(const struct lu_env *env, void *cookie,
1487                             lu_printer_t p, const struct lu_object *l)
1488 {
1489         const struct mgs_object *o = lu2mgs_obj((struct lu_object *) l);
1490
1491         return (*p)(env, cookie, LUSTRE_MGS_NAME"-object@%p", o);
1492 }
1493
1494 static const struct lu_object_operations mgs_lu_obj_ops = {
1495         .loo_object_init        = mgs_object_init,
1496         .loo_object_free        = mgs_object_free,
1497         .loo_object_print       = mgs_object_print,
1498 };
1499
1500 static struct lu_object *mgs_object_alloc(const struct lu_env *env,
1501                                           const struct lu_object_header *hdr,
1502                                           struct lu_device *d)
1503 {
1504         struct lu_object_header *h;
1505         struct mgs_object       *o;
1506         struct lu_object        *l;
1507
1508         LASSERT(hdr == NULL);
1509
1510         OBD_ALLOC_PTR(o);
1511         if (o != NULL) {
1512                 l = &o->mgo_obj.do_lu;
1513                 h = &o->mgo_header;
1514
1515                 lu_object_header_init(h);
1516                 dt_object_init(&o->mgo_obj, h, d);
1517                 lu_object_add_top(h, l);
1518
1519                 l->lo_ops = &mgs_lu_obj_ops;
1520
1521                 return l;
1522         } else {
1523                 return NULL;
1524         }
1525 }
1526
1527 const struct lu_device_operations mgs_lu_ops = {
1528         .ldo_object_alloc       = mgs_object_alloc,
1529         .ldo_process_config     = mgs_process_config,
1530 };
1531
1532 static struct lu_device *mgs_device_alloc(const struct lu_env *env,
1533                                           struct lu_device_type *type,
1534                                           struct lustre_cfg *lcfg)
1535 {
1536         struct mgs_device *mgs;
1537         struct lu_device  *ludev;
1538
1539         OBD_ALLOC_PTR(mgs);
1540         if (mgs == NULL) {
1541                 ludev = ERR_PTR(-ENOMEM);
1542         } else {
1543                 int rc;
1544
1545                 ludev = mgs2lu_dev(mgs);
1546                 dt_device_init(&mgs->mgs_dt_dev, type);
1547                 rc = mgs_init0(env, mgs, type, lcfg);
1548                 if (rc != 0) {
1549                         mgs_device_free(env, ludev);
1550                         ludev = ERR_PTR(rc);
1551                 }
1552         }
1553         return ludev;
1554 }
1555
1556 static struct lu_device *mgs_device_fini(const struct lu_env *env,
1557                                          struct lu_device *d)
1558 {
1559         struct mgs_device       *mgs = lu2mgs_dev(d);
1560         struct obd_device       *obd = mgs->mgs_obd;
1561         struct llog_ctxt        *ctxt;
1562
1563         ENTRY;
1564
1565         LASSERT(mgs->mgs_bottom);
1566
1567         class_disconnect_exports(obd);
1568
1569         ping_evictor_stop();
1570
1571         mutex_lock(&mgs->mgs_health_mutex);
1572         ptlrpc_unregister_service(mgs->mgs_service);
1573         mutex_unlock(&mgs->mgs_health_mutex);
1574
1575         mgs_params_fsdb_cleanup(env, mgs);
1576         mgs_cleanup_fsdb_list(mgs);
1577
1578         ldlm_namespace_free_prior(obd->obd_namespace, NULL, 1);
1579         obd_exports_barrier(obd);
1580         obd_zombie_barrier();
1581
1582         tgt_fini(env, &mgs->mgs_lut);
1583         lproc_mgs_cleanup(mgs);
1584
1585         ctxt = llog_get_context(mgs->mgs_obd, LLOG_CONFIG_ORIG_CTXT);
1586         if (ctxt) {
1587                 ctxt->loc_dir = NULL;
1588                 llog_cleanup(env, ctxt);
1589         }
1590
1591         mgs_fs_cleanup(env, mgs);
1592
1593         ldlm_namespace_free_post(obd->obd_namespace);
1594         obd->obd_namespace = NULL;
1595
1596         lu_site_purge(env, d->ld_site, ~0);
1597         lu_site_print(env, d->ld_site, &d->ld_site->ls_obj_hash.nelems,
1598                       D_OTHER, lu_cdebug_printer);
1599         LASSERT(mgs->mgs_bottom_exp);
1600         obd_disconnect(mgs->mgs_bottom_exp);
1601
1602         server_put_mount(obd->obd_name, true);
1603
1604         RETURN(NULL);
1605 }
1606
1607 /* context key constructor/destructor: mgs_key_init, mgs_key_fini */
1608 LU_KEY_INIT_FINI(mgs, struct mgs_thread_info);
1609
1610 LU_TYPE_INIT_FINI(mgs, &mgs_thread_key);
1611
1612 LU_CONTEXT_KEY_DEFINE(mgs, LCT_MG_THREAD);
1613
1614 static const struct lu_device_type_operations mgs_device_type_ops = {
1615         .ldto_init              = mgs_type_init,
1616         .ldto_fini              = mgs_type_fini,
1617
1618         .ldto_start             = mgs_type_start,
1619         .ldto_stop              = mgs_type_stop,
1620
1621         .ldto_device_alloc      = mgs_device_alloc,
1622         .ldto_device_free       = mgs_device_free,
1623
1624         .ldto_device_fini       = mgs_device_fini
1625 };
1626
1627 static struct lu_device_type mgs_device_type = {
1628         .ldt_tags       = LU_DEVICE_DT,
1629         .ldt_name       = LUSTRE_MGS_NAME,
1630         .ldt_ops        = &mgs_device_type_ops,
1631         .ldt_ctx_tags   = LCT_MG_THREAD
1632 };
1633
1634 static int mgs_obd_reconnect(const struct lu_env *env, struct obd_export *exp,
1635                              struct obd_device *obd, struct obd_uuid *cluuid,
1636                              struct obd_connect_data *data, void *localdata)
1637 {
1638         ENTRY;
1639
1640         if (exp == NULL || obd == NULL || cluuid == NULL)
1641                 RETURN(-EINVAL);
1642
1643         tgt_counter_incr(exp, LPROC_MGS_CONNECT);
1644
1645         if (data != NULL) {
1646                 data->ocd_connect_flags &= MGS_CONNECT_SUPPORTED;
1647
1648                 if (data->ocd_connect_flags & OBD_CONNECT_FLAGS2)
1649                         data->ocd_connect_flags2 &= MGS_CONNECT_SUPPORTED2;
1650
1651                 exp->exp_connect_data = *data;
1652                 data->ocd_version = LUSTRE_VERSION_CODE;
1653         }
1654
1655         RETURN(mgs_export_stats_init(obd, exp, localdata));
1656 }
1657
1658 static int mgs_obd_connect(const struct lu_env *env, struct obd_export **exp,
1659                            struct obd_device *obd, struct obd_uuid *cluuid,
1660                            struct obd_connect_data *data, void *localdata)
1661 {
1662         struct obd_export       *lexp;
1663         struct lustre_handle     conn = {
1664                 .cookie = 0,
1665         };
1666         int                      rc;
1667
1668         ENTRY;
1669
1670         if (exp == NULL || obd == NULL || cluuid == NULL)
1671                 RETURN(-EINVAL);
1672
1673         rc = class_connect(&conn, obd, cluuid);
1674         if (rc)
1675                 RETURN(rc);
1676
1677         lexp = class_conn2export(&conn);
1678         if (lexp == NULL)
1679                 RETURN(-EFAULT);
1680
1681         rc = mgs_obd_reconnect(env, lexp, obd, cluuid, data, localdata);
1682         if (rc)
1683                 GOTO(out_disconnect, rc);
1684
1685         *exp = lexp;
1686
1687         RETURN(rc);
1688
1689 out_disconnect:
1690         class_disconnect(lexp);
1691
1692         return rc;
1693 }
1694
1695 static int mgs_obd_disconnect(struct obd_export *exp)
1696 {
1697         int rc;
1698
1699         ENTRY;
1700
1701         LASSERT(exp);
1702
1703         mgs_fsc_cleanup(exp);
1704
1705         class_export_get(exp);
1706         tgt_counter_incr(exp, LPROC_MGS_DISCONNECT);
1707
1708         rc = server_disconnect_export(exp);
1709         class_export_put(exp);
1710         RETURN(rc);
1711 }
1712
1713 static int mgs_health_check(const struct lu_env *env, struct obd_device *obd)
1714 {
1715         struct mgs_device *mgs = lu2mgs_dev(obd->obd_lu_dev);
1716         int rc = 0;
1717
1718         mutex_lock(&mgs->mgs_health_mutex);
1719         rc |= ptlrpc_service_health_check(mgs->mgs_service);
1720         mutex_unlock(&mgs->mgs_health_mutex);
1721
1722         return rc != 0 ? 1 : 0;
1723 }
1724
1725 /* use obd ops to offer management infrastructure */
1726 static const struct obd_ops mgs_obd_device_ops = {
1727         .o_owner                = THIS_MODULE,
1728         .o_connect              = mgs_obd_connect,
1729         .o_reconnect            = mgs_obd_reconnect,
1730         .o_disconnect           = mgs_obd_disconnect,
1731         .o_init_export          = mgs_init_export,
1732         .o_destroy_export       = mgs_destroy_export,
1733         .o_iocontrol            = mgs_iocontrol,
1734         .o_health_check         = mgs_health_check,
1735 };
1736
1737 static int __init mgs_init(void)
1738 {
1739         return class_register_type(&mgs_obd_device_ops, NULL, true,
1740                                    LUSTRE_MGS_NAME, &mgs_device_type);
1741 }
1742
1743 static void __exit mgs_exit(void)
1744 {
1745         class_unregister_type(LUSTRE_MGS_NAME);
1746 }
1747
1748 MODULE_AUTHOR("OpenSFS, Inc. <http://www.lustre.org/>");
1749 MODULE_DESCRIPTION("Lustre Management Server (MGS)");
1750 MODULE_VERSION(LUSTRE_VERSION_STRING);
1751 MODULE_LICENSE("GPL");
1752
1753 module_init(mgs_init);
1754 module_exit(mgs_exit);