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