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